import java.lang.Math.*;
import java.applet.Applet;
import java.awt.*;
import java.awt.event.*;
import com.sun.j3d.utils.applet.MainFrame;
import com.sun.j3d.utils.universe.*;
import com.sun.j3d.utils.image.TextureLoader;
import com.sun.j3d.utils.geometry.Box;
import com.sun.j3d.utils.behaviors.mouse.* ;
import javax.media.j3d.*;
import javax.swing.* ;
import javax.vecmath.*;

public class TextureImage2 extends Applet {
  
    private java.net.URL texImage = null;
	BranchGroup objRoot;
	SimpleUniverse universe;
	
	private int nbLatt = 10;
	private int nbLong = 20;
	private int nbP;
	
	Color3f objEmissive = new Color3f(0.0f, 0.0f, 0.0f);
	Color3f objAmbient = new Color3f(0.0f, 0.0f, 0.0f);
	Color3f objDiffuse = new Color3f(1.0f, 1.0f, 1.0f);
	Color3f objSpecular = new Color3f(0.0f, 0.0f, 0.0f);
	float objShininess = 1;

	// Set up the global lights
	Color3f lColor1 = new Color3f(1.0f, 1.0f, 1.0f);
	Vector3f lDir1  = new Vector3f(-1.0f, -1.0f, -1.0f);



	private float[] mkPoints()
	{
		float[] v = new float[nbP*3];
		int i,j,n;
		float pi = (float) 3.1415927;
		float incrLong = 2*pi/nbLong;
		float incrLatt = pi/nbLatt;
		n=0;
		float la = -pi/2;
		for( i=0; i<nbLatt; i++ ){
			float la2 = la + incrLatt;
			float lo = 0;
			for( j=0; j<nbLong; ++j ){
				float lo2 = lo + incrLong;
				v[n] = (float) (Math.cos(la)*Math.cos(lo))  ; v[n+1] = (float) (Math.cos(la)*Math.sin(lo))  ; v[n+2] = (float) (Math.sin(la)); n+=3;
				v[n] = (float) (Math.cos(la)*Math.cos(lo2)); v[n+1] = (float) (Math.cos(la)*Math.sin(lo2))  ; v[n+2] = (float) Math.sin(la); n+=3;
				v[n] = (float) (Math.cos(la2)*Math.cos(lo2)); v[n+1] = (float) (Math.cos(la2)*Math.sin(lo2)); v[n+2] = (float) Math.sin(la2); n+=3;
				v[n] = (float) (Math.cos(la2)*Math.cos(lo))  ; v[n+1] = (float) (Math.cos(la2)*Math.sin(lo)); v[n+2] = (float) Math.sin(la2); n+=3;
				lo = lo2;
			}
			la = la2;			
		}
		return v;
	}

	private float[] mkTexCoordinates()
	{
		int nb=2;
		float[] v = new float[nbP*nb];
		int i,j,n;
		float incrLong = 1.0f/nbLong;
		float incrLatt = 1.0f/nbLatt;
		n=0;
		float la = 0;
		for( i=0; i<nbLatt; i++ ){
			float la2 = la + incrLatt;
			float lo = 0;
			for( j=0; j<nbLong; ++j ){
				float lo2 = lo + incrLong;
				v[n+1] = la ; v[n] = lo ; n+=nb;
				v[n+1] = la ; v[n] = lo2; n+=nb;
				v[n+1] = la2; v[n] = lo2; n+=nb;
				v[n+1] = la2; v[n] = lo ; n+=nb;
				lo = lo2;
			}
			la = la2;			
		}
		return v;
	}

    public BranchGroup createSceneGraph() {
		nbP = 4*(nbLatt+1)*(nbLong+1);
	// Create the root of the branch graph
	objRoot = new BranchGroup();
	objRoot.setCapability( BranchGroup.ALLOW_BOUNDS_READ );

	// sphere d'application de divers elements
	BoundingSphere boundsSphere = 
	    new BoundingSphere(new Point3d(0.0,0.0,0.0), 2000.0);

	// Create the transform group node and initialize it to the
	// identity.  Enable the TRANSFORM_WRITE capability so that
	// our behavior code can modify it at runtime.  Add it to the
	// root of the subgraph.
	TransformGroup objTrans = new TransformGroup();
	objTrans.setCapability(TransformGroup.ALLOW_TRANSFORM_WRITE  );
	objRoot.addChild(objTrans);

	// Light sources
	DirectionalLight lgt1 = new DirectionalLight(lColor1, lDir1);
	lgt1.setInfluencingBounds(boundsSphere);
	lgt1.setEnable(true);
	objRoot.addChild(lgt1);

	// Create a material
	Material material = new Material( objAmbient, objEmissive, objDiffuse, objSpecular, objShininess );
	material.setLightingEnable(true);
	
	// Create appearance object for textured object
	Appearance app = new Appearance();
	Texture tex = new TextureLoader(texImage, this).getTexture();
	//app.setTexture(tex);
	TextureAttributes texAttr = new TextureAttributes();
 	texAttr.setTextureMode(TextureAttributes.REPLACE);
	app.setTextureAttributes(texAttr);
	app.setMaterial(material);

	// Create a geometry
	QuadArray geometry = new QuadArray( nbP, QuadArray.COORDINATES | QuadArray.NORMALS | QuadArray.TEXTURE_COORDINATE_2   );
	geometry.setCoordinates( 0, mkPoints() );
	geometry.setNormals( 0, mkPoints() );
 	geometry.setTextureCoordinates( 0, 0, mkTexCoordinates() );
	

	// Create textured cube and add it to the scene graph.
	objTrans.addChild(new Shape3D(geometry, app));


	// mise en place du fond
	Background background = new Background(new Color3f(0.05f,0.05f,0.05f)) ;
    background.setApplicationBounds(boundsSphere);
 	objRoot.addChild(background) ;

	// on donne la possibile a l'application (et en particulier
	// a la gestion de la souris) d'aller modifier apres compilation
	// les valeurs de la tranformation 
	objTrans.setCapability(TransformGroup.ALLOW_TRANSFORM_WRITE);
	objTrans.setCapability(TransformGroup.ALLOW_TRANSFORM_READ);

	// on associe les mouvements de la souris a des actions
	// sur le noeud transformGroup

	// rotation de la scene sur boutton gauche
	MouseRotate behavior = new MouseRotate();
	behavior.setTransformGroup(objTrans);
	objRoot.addChild(behavior);
	behavior.setSchedulingBounds(boundsSphere);

	// zoom de la objRoot sur boutton du milieu
	MouseZoom behavior2 = new MouseZoom();
	behavior2.setTransformGroup(objTrans);
	objRoot.addChild(behavior2);
	behavior2.setSchedulingBounds(boundsSphere);

	// translation de la objRoot sur boutton de droite
	MouseTranslate behavior3 = new MouseTranslate();
	behavior3.setTransformGroup(objTrans);
	objRoot.addChild(behavior3);
	behavior3.setSchedulingBounds(boundsSphere);

        // Have Java 3D perform optimizations on this objRoot graph.
        objRoot.compile();

	return objRoot;
    }

    public TextureImage2() {
    }

    public TextureImage2(java.net.URL url) {
        texImage = url;
    }

    public void init() {
        if (texImage == null) {
  	    // the path to the image for an applet
  	    try {
	        texImage = new java.net.URL(getCodeBase().toString() +
					    "./earth.jpg");
	    }
	    catch (java.net.MalformedURLException ex) {
	        System.out.println(ex.getMessage());
		System.exit(1);
	    }
	}
	setLayout(new BorderLayout());
        GraphicsConfiguration config =
           SimpleUniverse.getPreferredConfiguration();

        Canvas3D c = new Canvas3D(config);
	add("Center", c);

	// Create a simple scene and attach it to the virtual universe
	BranchGroup scene = createSceneGraph();
	universe = new SimpleUniverse(c);

	viewAll() ;

	universe.addBranchGraph(scene);
    }

    //
    // The following allows TextureImage to be run as an application
    // as well as an applet
    //
    public static void main(String[] args) {
        java.net.URL url = null;
        if (args.length > 0) {
	    try {
	        url = new java.net.URL("file:" + args[0]);
	    }
	    catch (java.net.MalformedURLException ex) {
	        System.out.println(ex.getMessage());
		System.exit(1);
	    }
	}
	else {
	    // the path to the image for an application
	    try {
	        url = new java.net.URL("file:./earth.jpg");
	    }
	    catch (java.net.MalformedURLException ex) {
	        System.out.println(ex.getMessage());
		System.exit(1);
	    }
	}
	new MainFrame(new TextureImage2(url), 256, 256);
    }

    /**
     * Positionne la camera de maniere a pouvoir voir la totalite de la scene
     */
    public void viewAll()
    {
	BoundingSphere mybounds = (BoundingSphere) objRoot.getBounds() ;
	double t[] = new double[3] ;
	Point3d center=new Point3d() ;
	mybounds.getCenter(center) ;
	center.get(t) ;

	// on positionne la camera de facon a voir la sphere
	TransformGroup cameraPosition = universe.getViewingPlatform().
	    getViewPlatformTransform() ;

	Transform3D trans = new Transform3D() ;
	trans.setTranslation(new Vector3f((float)t[0], 
				  (float)t[1], 
				  (float)t[2]+(float) mybounds.getRadius()*3));
	cameraPosition.setTransform(trans) ;
    }

}