/*
 *      @(#)ParametricEase.java 1.0 99/02/14 23:00:00
 *
 * Copyright (c) 1999. All Rights Reserved.
 *
 * This software is provided "AS IS," without a warranty of any kind. ALL
 * EXPRESS OR IMPLIED CONDITIONS, REPRESENTATIONS AND WARRANTIES, INCLUDING ANY
 * IMPLIED WARRANTY OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE OR
 * NON-INFRINGEMENT, ARE HEREBY EXCLUDED. WE SHALL NOT BE
 * LIABLE FOR ANY DAMAGES SUFFERED BY LICENSEE AS A RESULT OF USING, MODIFYING
 * OR DISTRIBUTING THE SOFTWARE OR ITS DERIVATIVES. IN NO EVENT WILL SUN OR ITS
 * LICENSORS BE LIABLE FOR ANY LOST REVENUE, PROFIT OR DATA, OR FOR DIRECT,
 * INDIRECT, SPECIAL, CONSEQUENTIAL, INCIDENTAL OR PUNITIVE DAMAGES, HOWEVER
 * CAUSED AND REGARDLESS OF THE THEORY OF LIABILITY, ARISING OUT OF THE USE OF
 * OR INABILITY TO USE SOFTWARE, EVEN IF SUN HAS BEEN ADVISED OF THE
 * POSSIBILITY OF SUCH DAMAGES.
 *
 * This software is not designed or intended for use in on-line control of
 * aircraft, air traffic, aircraft navigation or aircraft communications; or in
 * the design, construction, operation or maintenance of any nuclear
 * facility. Licensee represents and warrants that it will not use or
 * redistribute the Software for such purposes.
 *
 * @Author: Kovalan Muniandy
 */

import java.applet.Applet;
import java.awt.*;
import java.awt.event.*;
import com.sun.j3d.utils.geometry.ColorCube;
import com.sun.j3d.utils.applet.MainFrame;
import com.sun.j3d.utils.universe.*;
import com.sun.j3d.utils.behaviors.mouse.MouseRotate;
import com.sun.j3d.utils.behaviors.mouse.MouseZoom;
import com.sun.j3d.utils.behaviors.mouse.MouseTranslate;
import javax.media.j3d.*;
import javax.vecmath.*;
import java.net.URL;
import java.net.MalformedURLException;
import java.io.*;
import java.awt.image.BufferedImage;
import com.sun.j3d.loaders.vrml97.VrmlLoader;
import com.sun.j3d.utils.image.TextureLoader;
import com.sun.j3d.loaders.Scene;
import com.sun.image.codec.jpeg.*;
import ncsa.j3d.ui.record.RecordableCanvas3D;
import kovey.book99.geometry.basicElements.Vertex;
import kovey.book99.geometry.basicElements.VertexList;
import kovey.book99.geometry.curves.Curve;
import kovey.book99.geometry.curves.CubicBSplineCurve;

public class ParametricEase extends Applet implements ActionListener, Runnable {
    public static void main(String[] args) {
        boolean ease = false;
        boolean arcLength = false;
        if ( 0 < args.length ) {
            for ( int idx=0; idx < args.length; idx++ ) {
                if ( args[idx].equals( "ease" ) )
                    ease = true;
                else if ( args[idx].equals( "arclength" ) )
                    arcLength = true;
            }
        }
        new MainFrame(new ParametricEase(ease, arcLength), 500, 180);
    }

    String              location;
    RecordableCanvas3D  canvas;
    SimpleUniverse      universe;
    TransformGroup      vpTransGroup;
    VrmlLoader          loader;
    View                view;
    Panel               panel;
    Label               label;
    BranchGroup         sceneRoot;
    TransformGroup      examineGroup;
    BranchGroup         sceneGroup;
    BoundingSphere      sceneBounds;
    DirectionalLight    headLight;
    AmbientLight        ambLight;
    TextField           textField;
    Cursor              waitCursor;
    Cursor              handCursor;
    Scene               scene = null;

    Thread animator;
    Transform3D objectXf;
    protected boolean enableEase = false;
    protected boolean enableArcLength = false;

    ParametricEase( boolean ease, boolean arcLength ) {
        enableEase = ease;
        enableArcLength = arcLength;

        setLayout(new BorderLayout());

        canvas = new RecordableCanvas3D( null );
        canvas.captureInPostRender( false );
        canvas.setFilePrefix( "f" );
        add( "Center", canvas );

        waitCursor = new Cursor(Cursor.WAIT_CURSOR);
        handCursor = new Cursor(Cursor.HAND_CURSOR);

        universe = new SimpleUniverse(canvas);
        ViewingPlatform viewingPlatform = universe.getViewingPlatform();
        vpTransGroup = viewingPlatform.getViewPlatformTransform();
        Viewer viewer = universe.getViewer();
        view = viewer.getView();

        setupScene();

        loadVRML( "./pmagsp1m.wrl" );

        getReady();
    }

    public void actionPerformed(ActionEvent ae) {
    }

    class AnimatorFactory extends Behavior {
        Runnable parent;
        public AnimatorFactory( Runnable theParent ) {
            parent = theParent;
        }
        public void initialize() {
            wakeupOn( new WakeupOnElapsedFrames(0) );
        }
        public void processStimulus( java.util.Enumeration criteria ) {
            if ( null == animator ) {
                // First scene is being shown. Get ready to animate.
                animator = new Thread( parent );
                animator.start();
            }
        }
    }

    void setupScene() {
        sceneRoot = new BranchGroup();

        BoundingSphere backBounds =
            new BoundingSphere(new Point3d(), Double.MAX_VALUE);
        TextureLoader bgTexture = new TextureLoader("./sunrise.jpg", this);
	    Background bg = new Background( bgTexture.getImage() );
	    bg.setApplicationBounds( backBounds );
        sceneRoot.addChild( bg );

        examineGroup = new TransformGroup();
        examineGroup.setCapability(TransformGroup.ALLOW_CHILDREN_EXTEND);
        examineGroup.setCapability(TransformGroup.ALLOW_CHILDREN_READ);
        examineGroup.setCapability(TransformGroup.ALLOW_CHILDREN_WRITE);
        examineGroup.setCapability(TransformGroup.ALLOW_TRANSFORM_READ);
        examineGroup.setCapability(TransformGroup.ALLOW_TRANSFORM_WRITE);
        sceneRoot.addChild(examineGroup);

        BoundingSphere behaviorBounds = new BoundingSphere(new Point3d(),
              Double.MAX_VALUE);

        MouseRotate mr = new MouseRotate();
        mr.setTransformGroup(examineGroup);
        mr.setSchedulingBounds(behaviorBounds);
        sceneRoot.addChild(mr);

        MouseTranslate mt = new MouseTranslate();
        mt.setTransformGroup(examineGroup);
        mt.setSchedulingBounds(behaviorBounds);
        sceneRoot.addChild(mt);

        MouseZoom mz = new MouseZoom();
        mz.setTransformGroup(examineGroup);
        mz.setSchedulingBounds(behaviorBounds);
        sceneRoot.addChild(mz);

        AnimatorFactory animationStarter = new AnimatorFactory( this );
        animationStarter.setSchedulingBounds(behaviorBounds);
        sceneRoot.addChild( animationStarter );
        
        BoundingSphere lightBounds =
            new BoundingSphere(new Point3d(), Double.MAX_VALUE);

        ambLight = new AmbientLight(true, new Color3f(1.0f, 1.0f, 1.0f));
        ambLight.setInfluencingBounds(lightBounds);
        ambLight.setCapability(Light.ALLOW_STATE_WRITE);
        sceneRoot.addChild(ambLight);

        headLight = new DirectionalLight();
        headLight.setCapability(Light.ALLOW_STATE_WRITE);
        headLight.setInfluencingBounds(lightBounds);
        sceneRoot.addChild(headLight);

        universe.addBranchGraph(sceneRoot);
    }

    void loadVRML(String location) {
        if ( null == loader )
            loader = new VrmlLoader();

        canvas.setCursor(waitCursor);

        if (sceneGroup != null) {
            sceneGroup.detach();
        }

        try {
            URL loadUrl = new URL(location);
            try {
                // load the scene
                scene = loader.load( loadUrl );
            }
            catch (Exception e) {
                System.out.println("Exception loading URL:" + e);
            }
        }
        catch (MalformedURLException badUrl) {
            // location may be a path name
            try {
                  // load the scene
                  scene = loader.load(location);
            }
            catch (Exception e) {
                  System.out.println("Exception loading file from path:" + e);
            }
        }

        if (scene != null) {
            // get the scene group
            sceneGroup = scene.getSceneGroup();
            sceneGroup.setCapability(BranchGroup.ALLOW_DETACH);
            sceneGroup.setCapability(BranchGroup.ALLOW_BOUNDS_READ);

            // add the scene group  to the scene
            examineGroup.addChild(sceneGroup);
            
            // now that the scene group is "live" we can inquire the bounds
            sceneBounds = (BoundingSphere)sceneGroup.getBounds();
        }

        canvas.setCursor(handCursor);
    }

    void getReady() {
        // view.setSceneAntialiasingEnable( true );

        Transform3D xf = new Transform3D();
        Transform3D eyeXf = new Transform3D();

        view.setFrontClipDistance( view.getFrontClipDistance() - 0.095 );
	    // pull the eye back far enough to see the whole object
        Point3d center = new Point3d();
	    sceneBounds.getCenter(center);
	    double radius = sceneBounds.getRadius();
	    Vector3d temp = new Vector3d(center);
	    xf.set(temp);
	    double eyeDist = 0.4*radius / Math.tan(view.getFieldOfView() / 2.0);
        view.setBackClipDistance( eyeDist );
        temp.x = 0.0;
	    temp.y = 0.0;
	    temp.z = eyeDist;
	    eyeXf.set(temp);
	    xf.mul(eyeXf);
	    vpTransGroup.setTransform(xf); // set the view transform 

        objectXf = new Transform3D();
        objectXf.setIdentity();
        // objectXf.set( 0.5 );
        Vector3d move = new Vector3d( -20.0, 0.0, -70.0);
        objectXf.set( move );
        xf.rotX( (-90.0/180.0) * Math.PI );
        objectXf.mul( xf );
        xf.rotZ( (10.0/180.0) * Math.PI );
        objectXf.mul( xf );

        examineGroup.setTransform( objectXf );
    }

    public void run() {
        try {
            canvas.startRecording();
            VertexList cp = getCurvePoints();

            Transform3D xf = new Transform3D();
            Vector3d translate = new Vector3d();

            for ( int index=0; index < cp.getCount(); index++ ) {
                Vertex v = cp.getAt( index );
                translate.set( v.getRealX(), v.getRealY(), v.getRealZ() );

                xf.setIdentity();
                xf.setTranslation( translate );
                xf.mul( objectXf );

                examineGroup.setTransform( xf );

                canvas.rendezvous();    // wait until frame is written to jpg file
            }
        }
        catch ( Exception e ) {
        }
    }

    VertexList getCurvePoints() {
        VertexList points = null;
        try {
            VertexList cp = new VertexList(); // List of control points
            cp.addTailReal( 0, 0, 0);
            cp.addTailReal( 2.5, 5.0, 8.0 );
            cp.addTailReal( 5, -5.0, 16.0 );
            cp.addTailReal( 20.0, 0.0, 55.0 );

            CubicBSplineCurve curve = new CubicBSplineCurve( cp );
            curve.setCurveType( Curve.PHANTOM );
            double uInc = enableArcLength? 0.005 : 0.01;
            curve.setIncrementU( uInc );
            curve.enableArcLength( enableArcLength, 300.0, enableEase );
            
            System.out.println( "Ease: " + enableEase + ", Arc Length: " +
                enableArcLength );

            points = curve.getPoints();
        }
        catch ( Throwable e ) {
            e.toString();
        }
        return points;
    }
}