// This creates a closed, vase-like spline surface by building up
// circular cross-sections.


	
import java.awt.Frame;
import java.awt.event.WindowAdapter;
import java.awt.event.WindowEvent;
import javax.media.opengl.*;
import javax.media.opengl.glu.*;
import javax.media.opengl.awt.GLCanvas;
import com.jogamp.opengl.util.*;
import java.awt.*;
import javax.swing.*;
import java.awt.event.*;
import java.nio.FloatBuffer;

import javax.swing.event.*;



public class ClosedSurface implements GLEventListener, ActionListener, ChangeListener {
	
	public static void main(String[] args) {
		new ClosedSurface();
	}
	
	private int INITIAL_WIDTH=800;
	private int INITIAL_HEIGHT=800;
	
	JButton quitButton, spinButton;
	private GLCanvas canvas;
	private GL2 gl;
	private GLU glu;
	private boolean spinning = false;
	private float viewerX = 20f;
	private float viewerY  = 5f;
	private float viewerZ = 7f;
	private JSlider xSlider, ySlider, zSlider;
	private float theta = 0f;
	
	private float lightAmbient[] = {0f, 0f, 0f, 1f};
	private float lightDiffuse[] = {0.9f, 0.9f, 0.9f, 1f};
	private float lightSpecular[] = {0.1f, 0.1f, 0.1f, 1f};
	
	private float lightPos[] = {30f, 5f, 10f, 1f};
	
	private float materialDiffuse[] = {1f, 0f, 1f, 1f};
	private float materialSpecular[] = {1f, 1f, 1f, 1f};
	
	private float pseudoCircle[][] = {
			{-1f, 0f, 0f}, {-1f, 0.5f, 0f}, {-0.5f, 1f, 0f}, {0f, 1f, 0f},
			{0.5f, 1f, 0f}, {1f, 0.5f, 0f}, {1f, 0f, 0f}, {1f, -0.5f, 0f},
			{0.5f, -1f, 0f}, {0f, -1f, 0f}, {-0.5f, -1f, 0f}, {-1f, -0.5f, 0f},
			{-1f, 0f, 0f}
	};
	
	
	private float buffer1[], buffer2[];
	
	int count = 0;
	
	public ClosedSurface() {
			GLProfile glp=GLProfile.getDefault();
			GLCapabilities caps = new GLCapabilities(glp);
			canvas = new GLCanvas(caps);
			canvas.addGLEventListener(this);

			JFrame frame = new JFrame("CLOSED SURFACE");

			frame.setSize(INITIAL_WIDTH, INITIAL_HEIGHT);
			frame.setLayout(new BorderLayout());
			JPanel north = new JPanel( new BorderLayout());
			
			JPanel firstMainRow = new JPanel( new FlowLayout(FlowLayout.LEADING));
			
			quitButton = new JButton( "Quit");
			quitButton.addActionListener(this);
			firstMainRow.add(quitButton);
			spinButton = new JButton( "Spin");
			spinButton.addActionListener(this);
			firstMainRow.add(spinButton);
			
			north.add(firstMainRow, BorderLayout.NORTH);
			
			JPanel secondMainRow = new JPanel(new GridLayout(3, 1));
			
			JPanel row1 = new JPanel(new BorderLayout());
			xSlider = newSlider(row1, -100, 100, 25, "Light Position X");
			xSlider.setValue( (int)(lightPos[0]));
			secondMainRow.add(row1);
			JPanel row2 = new JPanel(new BorderLayout());
			ySlider = newSlider(row2, -100, 100, 25, "Light Position Y");
			ySlider.setValue( (int)(lightPos[1]));
			secondMainRow.add(row2);
			JPanel row3 = new JPanel(new BorderLayout());
			zSlider = newSlider(row3, -100, 100, 25, "Ligt Position Z");
			zSlider.setValue( (int)(lightPos[2]));
			secondMainRow.add(row3);
			
			north.add(secondMainRow, BorderLayout.CENTER);
			
	
			frame.add(north, BorderLayout.NORTH);
			JPanel myCanvas = new JPanel(new GridLayout(1,1));
			myCanvas.add(canvas);
			frame.add(myCanvas, BorderLayout.CENTER);
			
			frame.setVisible(true);

			FPSAnimator animator = new FPSAnimator(canvas, 60);
			animator.start(); 
	}
	
	// This assumes the parent is a panel using BorderLayout.
	JSlider newSlider(JPanel parent, int min, int max, int step, String label) {
		JSlider S = new JSlider(min, max);
		S.setMajorTickSpacing(step);
		S.setPaintTicks(true);
		S.setPaintLabels(true); 
		S.addChangeListener(this);
		JLabel name = new JLabel(label);
		parent.add(name, BorderLayout.WEST); 
		parent.add(S, BorderLayout.CENTER);
		return S;
	}

	public void actionPerformed(ActionEvent event) {
			if (event.getSource() == quitButton)
				System.exit(0);
			else if (event.getSource() == spinButton)
				spinning = !spinning;

	}
	
	public void stateChanged(ChangeEvent e) {
		if (e.getSource() == xSlider) {
			lightPos[0] = xSlider.getValue();
		}
		else if (e.getSource() == ySlider) {
			lightPos[1] = ySlider.getValue();
		}
		else if (e.getSource() == zSlider) {
			lightPos[2] = zSlider.getValue();
		}

	}


	public void display(GLAutoDrawable drawable) {
		update();
		render(drawable);
	}

	private void update() {		
		if (spinning)
			theta += 1f;
	}

	
	private void render(GLAutoDrawable drawable) {
		float Red[] = {1f, 0f, 0f};
		float Green[] = {0f, 1f, 0f};
		
		gl.glClear(GL2.GL_COLOR_BUFFER_BIT | GL2.GL_DEPTH_BUFFER_BIT);
		gl.glMatrixMode(GL2.GL_MODELVIEW);
		gl.glLoadIdentity();
		glu.gluLookAt(viewerX, viewerY, viewerZ, 0f, 2f, 5f, 0f, 0f, 1f);
		gl.glLightfv(GL2.GL_LIGHT0,  GL2.GL_POSITION, lightPos, 0);

		gl.glPushMatrix();
		gl.glRotatef(theta, 0f, 0f, 1f);
		gl.glPushMatrix();
		gl.glTranslatef(0f, 0f, 4f);
		gl.glMaterialfv(GL2.GL_FRONT, GL2.GL_DIFFUSE, Red, 0);
		drawPatches();
		gl.glPopMatrix();
		gl.glPushMatrix();
		gl.glTranslatef(0f, 0f, -4f);
		gl.glMaterialfv(GL2.GL_FRONT, GL2.GL_DIFFUSE, Green, 0);
		drawBetterVase();
		gl.glPopMatrix();
		gl.glPopMatrix(); 
	}
	
	private void drawPatches() {
		for (int row = 0; row < 2; row++) 
			for (int patch = 0; patch <4; patch++) {
				gl.glMap2f(GL2.GL_MAP2_VERTEX_3, 0f,1f, 3, 4, 0f, 1f, 39, 4, FloatBuffer.wrap(buffer1, row*13*3*3+patch*9, 13*3*7-row*13*3*3-patch*9));
				gl.glMapGrid2f(10, 0f, 1f, 10, 0f, 1f);
				gl.glEvalMesh2(GL2.GL_FILL, 0, 10, 0, 10);
			}
	}
	


	public void dispose(GLAutoDrawable drawable) {
		// put the cleanup code here
		
	}

	public void init(GLAutoDrawable drawable) {
		gl = drawable.getGL().getGL2();
		glu = new GLU();
		gl.glEnable(GL2.GL_DEPTH_TEST);
		gl.glMatrixMode(GL2.GL_PROJECTION);
		gl.glLoadIdentity();
		glu.gluPerspective(60f, 1f, 0.5f, 200f); 
		gl.glMatrixMode(GL2.GL_MODELVIEW);
		gl.glLoadIdentity();
		glu.gluLookAt(viewerX, viewerY, viewerZ, 0f, 2f, 5f, 0f, 0f, 1f);
		gl.glClearColor(1f,  1f, 0f, 1f);
		gl.glClear(GL2.GL_COLOR_BUFFER_BIT | GL2.GL_DEPTH_BUFFER_BIT);
		
		gl.glEnable(GL2.GL_LIGHTING);
		gl.glEnable(GL2.GL_LIGHT0);
		gl.glLightfv(GL2.GL_LIGHT0,  GL2.GL_AMBIENT, lightAmbient, 0);
		gl.glLightfv(GL2.GL_LIGHT0,  GL2.GL_DIFFUSE, lightDiffuse, 0);
		gl.glLightfv(GL2.GL_LIGHT0,  GL2.GL_SPECULAR, lightSpecular, 0);
		gl.glLightfv(GL2.GL_LIGHT0,  GL2.GL_POSITION, lightPos, 0);

		
		gl.glMaterialfv(GL2.GL_FRONT, GL2.GL_SPECULAR, materialSpecular, 0);
	
		gl.glEnable(GL2.GL_AUTO_NORMAL);
		gl.glEnable(GL2.GL_MAP2_VERTEX_3);
		gl.glEnable(GL2.GL_NORMALIZE);
		
		buildVase();
	}
	
	public void buildVase() {
		float radius[] = {1f, 1f, 1.5f, 1.5f, 2f, 2.5f, 2.5f};
		buffer1 = new float[7*13*3];
		for (int i = 0; i < 7; i++)
			for (int j = 0; j < 13; j++) {
				for (int k = 0; k < 2; k++)
					buffer1[i*13*3+j*3+k] = pseudoCircle[j][k]*radius[i];
				buffer1[i*13*3+j*3+2] = 8-i;
			}
	}
	
	public void drawBetterVase() {
		int N = 30;
		int SIZE = 3*N+1;
		float theta = (float)(-2*Math.PI/(SIZE-1));
		float heights[] = {8f, 7f, 6f, 5f, 4f, 3f, 2f};
		float radii[] = {1f, 1f, 1f, 1.5f, 2f, 2.5f, 2.5f};
		
		float patch[] = new float[4*4*3];
		for (int i = 0; i < N; i++) {
			for (int top = 0; top < 6; top += 3) {
				for (int row = 0; row < 4; row++) {
					for (int col = 0; col < 4; col++) {
						patch[row*4*3+col*3] = (float)( radii[row+top]*Math.cos(theta*(3*i+col)) );
						patch[row*4*3+col*3+1] = (float)( radii[row+top]*Math.sin(theta*(3*i+col)) );
						patch[row*4*3+col*3+2] = heights[row+top];
					}
				}
				gl.glMap2f(GL2.GL_MAP2_VERTEX_3, 0f,1f, 3, 4, 0f, 1f, 12, 4, FloatBuffer.wrap(patch));
				gl.glMapGrid2f(10, 0f, 1f, 10, 0f, 1f);
				gl.glEvalMesh2(GL2.GL_FILL, 0, 10, 0, 10);
	
			}
		}
	}
		

	public void reshape(GLAutoDrawable drawable, int x, int y, int width, int height) {
		// this is called when the window is resized
		gl.glViewport(0, 0, width, height);
		float aspect = width*1.0f/height;
		gl.glMatrixMode(GL2.GL_PROJECTION);
		gl.glLoadIdentity();
		glu.gluPerspective(60f, aspect, 0.5f, 200f); 
		gl.glMatrixMode(GL2.GL_MODELVIEW);
		
		
	}
	
}