#include <Cocoa/Cocoa.h>

#include <JavaVM/jni.h>

#include <dlfcn.h>

#include <pthread.h>

#define DEBUG_TRACE	1

#define TRACE(fmt, ...) \

	do { if (DEBUG_TRACE) fprintf(err, "%s:%d:%s(): " fmt "\n", __FILE__, __LINE__, __func__, __VA_ARGS__); fflush(err); } while (0)

// JNI_CreateJavaVM

typedef jint (JNICALL CREATEVM)(JavaVM **pvm, void **env, void *args);

void die(JNIEnv *env);

@interface AppDelegate : NSObject <NSApplicationDelegate>

@end

FILE *err = NULL;

JavaVM *jvm = NULL;

static const char *JNI_CREATEJAVAVM = "JNI_CreateJavaVM";

void *jvm_lib = NULL;

void *create_vm(const char *jvm_lib_path)

{

	void *sym = NULL;

	jvm_lib = dlopen(jvm_lib_path, RTLD_LAZY | RTLD_GLOBAL);

	if (jvm_lib) {

		TRACE("Found libjli.dylib%s", "");

		sym = dlsym(jvm_lib, JNI_CREATEJAVAVM);

	} else {

		TRACE("Unable to find libjli.dylib%s", "");

	}

	return sym;

}

static void *launchJava(void *ptr)

{

	int k = 0;

	JNIEnv		*env = NULL;

	JNINativeMethod	nm_activity[20];

	jint		res;

	jclass		cls;

	jmethodID	mid;

	jobject		gui;

	jthrowable	ex;

	// JDK > 1.5

	JavaVMInitArgs	vm_args;

	vm_args.nOptions = 3;

	JavaVMOption options[vm_args.nOptions];

	options[0].optionString	   = "-Djava.class.path=.:../../../gluegen/build/gluegen-rt.jar:../../build/jar/jogl-all.jar";

//	options[1].optionString	   = "-Djava.library.path=lib";

	options[1].optionString	   = "-Dnativewindow.debug=all";

	options[2].optionString	   = "-Djogl.debug=all";

	vm_args.version		   = JNI_VERSION_1_4;

	vm_args.options		   = options;

	vm_args.ignoreUnrecognized = JNI_TRUE;

	/* Create the Java VM */

	CREATEVM *CreateVM = create_vm((char *)ptr);

	TRACE("CreateVM:%lx env:%lx vm_args:%lx", (long unsigned int)CreateVM, (long unsigned int)&env, (long unsigned int)&vm_args);

	res = CreateVM(&jvm, (void**)&env, &vm_args);

	if (res < 0) {

		TRACE("Can't create Java VM%s", "");

		exit(1);

	} else {

		TRACE("VM Created%s", "");

	}

	cls = (*env)->FindClass(env, "Bug1398macOSContextOpsOnMainThread");

	ex = (*env)->ExceptionOccurred(env);

	if (ex) {

		die(env);

	}

	mid = (*env)->GetMethodID(env, cls, "<init>", "()V");

	if (mid == NULL)

		goto destroy;

	gui = (*env)->NewObject(env, cls, mid);

	TRACE("Just passed NewObject()...%s", "");

destroy:

	if ((*env)->ExceptionOccurred(env)) {

		// handle exception

	}

	if (err)

		fclose(err);

	if (jvm_lib) {

		dlclose(jvm_lib);

		jvm_lib = NULL;

	}

	die(env);

	return 0;

}

void show_error_dialog(JNIEnv *env, jthrowable ex)

{

	jclass dialogClass = (*env)->FindClass(env, "javax/swing/JOptionPane");

	jmethodID showMsg = (*env)->GetStaticMethodID(env, dialogClass, "showMessageDialog", "(Ljava/awt/Component;Ljava/lang/Object;Ljava/lang/String;I)V");

	jstring msg = (*env)->NewStringUTF(env, "\nWe be dead...\n\n");

	// extract message from exception

	jclass stringClass = (*env)->FindClass(env, "java/lang/String");

	jclass exClass = (*env)->GetObjectClass(env, ex);

	jmethodID exGetMessage = (*env)->GetMethodID(env, exClass, "getMessage", "()Ljava/lang/String;");

	jmethodID concat = (*env)->GetMethodID(env, stringClass, "concat", "(Ljava/lang/String;)Ljava/lang/String;");

	jstring exMsg = (*env)->CallObjectMethod(env, ex, exGetMessage);

	msg = (*env)->CallObjectMethod(env, msg, concat, exMsg); // append exception message to msg

	jstring title = (*env)->NewStringUTF(env, "Error");

	(*env)->CallStaticVoidMethod(env, dialogClass, showMsg, NULL, msg, title, (jint)0);

}

void die(JNIEnv *env)

{

	TRACE("\n*\n*\n*\ndieing...\n%s", "");

	jthrowable ex = (*env)->ExceptionOccurred(env);

	if (ex) {

		(*env)->ExceptionDescribe(env);

		show_error_dialog(env, ex);

	}

	// DestroyJavaVM hangs on Windows so just exit for now

#ifndef WIN32

	(*jvm)->DestroyJavaVM(jvm);

#else

	if (jvm_lib)

		FreeLibrary(jvm_lib);

	if (c_lib)

		FreeLibrary(c_lib);

#endif

	TRACE("VM = DEAD!%s\n", "");

	exit(0);

}

void create_jvm_thread(const char *jvm_lib_path)

{

	pthread_t vmthread;

	struct rlimit limit;

	size_t stack_size = 0;

	int rc = getrlimit(RLIMIT_STACK, &limit);

	if (rc == 0) {

		if (limit.rlim_cur != 0LL) {

			stack_size = (size_t)limit.rlim_cur;

		}

	}

	pthread_attr_t thread_attr;

	pthread_attr_init(&thread_attr);

	pthread_attr_setscope(&thread_attr, PTHREAD_SCOPE_SYSTEM);

	pthread_attr_setdetachstate(&thread_attr, PTHREAD_CREATE_DETACHED);

	if (stack_size > 0) {

		pthread_attr_setstacksize(&thread_attr, stack_size);

	}

	pthread_create(&vmthread, &thread_attr, launchJava, (void *)jvm_lib_path);

	pthread_attr_destroy(&thread_attr);

}

static AppDelegate* _appDelegate;

int main(int argc, const char *argv[])

{

	err = stderr;

	for (int k = 1; k < argc; k++) {

		TRACE("argv[%d]:%s", k, argv[k]);

	}

	if (argc < 2) {

		TRACE("Usage: Bug1398macOSContextOpsOnMainThread %s", "[libjli.dylib path]");

		exit(1);

	}

	@autoreleasepool

	{

		_appDelegate = [AppDelegate new];

		[NSApplication sharedApplication];

		[NSApp activateIgnoringOtherApps:YES];

		[NSApp setDelegate:_appDelegate];

		create_jvm_thread(argv[1]);

		return NSApplicationMain(argc, (const char **)argv);

	}

}

@interface AppDelegate ()

@property (strong) IBOutlet NSWindow *window;

@end

@implementation AppDelegate

-(id) init

{

	self = [super init];

	NSLog(@"init");

	return self;

}

- (void)applicationDidFinishLaunching:(NSNotification *)aNotification {

	NSLog(@"App starting...");

	//Create a new Block Operation and add it to the Operation Queue

	NSOperationQueue *operationQueue = [NSOperationQueue new];

	NSBlockOperation *startUpCompletionOperation = [NSBlockOperation blockOperationWithBlock:^{

		//The startup Object has been loaded now close the splash screen

		//This the completion block operation

		[[NSOperationQueue mainQueue] addOperationWithBlock:^{

			NSLog(@"startUpCompletionOperation main thread? ANS - %@",[NSThread isMainThread]? @"YES":@"NO");

//			launchJava((void *)"jre/lib/jli/libjli.dylib");

		}];

	}];

	NSBlockOperation *startUpOperation = [NSBlockOperation blockOperationWithBlock:^{

		// wait for everything to load and JVM to power up

		sleep(3); // wait for a bit for NewObject to complete

	}];

	[startUpCompletionOperation addDependency:startUpOperation];

	[operationQueue addOperation:startUpCompletionOperation];

	[operationQueue addOperation:startUpOperation];

}

@end

import java.awt.BorderLayout;

import java.awt.Color;

import java.awt.Container;

import java.awt.Dimension;

import java.awt.DisplayMode;

import java.awt.GraphicsDevice;

import java.awt.GraphicsConfiguration;

import java.awt.Rectangle;

import java.awt.Toolkit;

import java.awt.event.WindowAdapter;

import java.awt.event.WindowEvent;

import javax.swing.JFrame;

import javax.swing.JPanel;

import com.jogamp.opengl.GL2;

import com.jogamp.opengl.GLAutoDrawable;

import com.jogamp.opengl.GLCapabilities;

import com.jogamp.opengl.GLEventListener;

import com.jogamp.opengl.GLProfile;

import com.jogamp.opengl.awt.GLCanvas;

import com.jogamp.opengl.util.FPSAnimator;

public class Bug1398macOSContextOpsOnMainThread extends JFrame implements GLEventListener {

	protected GLCanvas canvas;

	static {

		GLProfile.initSingleton();

	}

	public Bug1398macOSContextOpsOnMainThread() throws Exception {

		System.out.println("Java version: " + Runtime.class.getPackage().getSpecificationVersion() + " (" + Runtime.class.getPackage().getImplementationVersion() + ")");

		System.out.println("classloader:" + Thread.currentThread().getContextClassLoader());

		System.out.println("OS: " + System.getProperty("os.name") + " " + System.getProperty("os.version") + " " + System.getProperty("os.arch"));

		setTitle("Bug1398macOSContextOpsOnMainThread");

		//setUndecorated(true);

		//setResizable(false);

		setDefaultCloseOperation(EXIT_ON_CLOSE);

		setBackground(Color.WHITE);

		Dimension dim = new Dimension(800, 600);

		GraphicsDevice device = getGraphicsConfiguration().getDevice();

		DisplayMode dm = device.getDisplayMode();

		System.out.println("w:" + dm.getWidth() + " h:" + dm.getHeight() + " rr:" + dm.getRefreshRate() + " bits:" + dm.getBitDepth() + " dim.w:" + dim.width + " dim.h:" + dim.height);

		GLCapabilities caps = new GLCapabilities(GLProfile.get(GLProfile.GL2));

		canvas = new GLCanvas(caps);

		canvas.setBounds(0, 0, 1, 1);

		JPanel panel = new JPanel();

		panel.setLayout(null);

		panel.setPreferredSize(dim);

		panel.add(canvas);

		Container c = getContentPane();

		c.setLayout(new BorderLayout());

		c.add(panel, BorderLayout.CENTER);

		pack();

		// center window

		GraphicsConfiguration gc = getGraphicsConfiguration();

		Rectangle bounds = gc.getBounds();

		System.out.println("gc.bounds: " + bounds);

		dim = Toolkit.getDefaultToolkit().getScreenSize();

		System.out.println("dim: " + dim);

		int w = getSize().width;

		int h = getSize().height;

		int x = (dim.width  - w) / 2;

		int y = (dim.height - h) / 2;

		setLocation(x, y);

		setVisible(true);

		final FPSAnimator animator = new FPSAnimator(canvas, 5, true);

		addWindowListener(new WindowAdapter() {

			public void windowClosing(WindowEvent e) {

				// Run this on another thread than the AWT event queue to

				// make sure the call to Animator.stop() completes before

				// exiting

				new Thread(new Runnable() {

					public void run() {

						animator.stop();

					}

				}).start();

			}

		});

		animator.start();

	}

	/**

	 * OpenGL funcs

	 */

	private void initExtension(GL2 gl, String glExtensionName) {

		if (!gl.isExtensionAvailable(glExtensionName)) {

			final String message = "OpenGL extension \"" + glExtensionName + "\" not available.\n\nPlease update your display driver to the latest version.";

			throw new RuntimeException(message);

		}

	}

	@Override

	public void init(GLAutoDrawable drawable) {

		GL2 gl = drawable.getGL().getGL2();

		int[] arg = new int[1];

		gl.glGetIntegerv(GL2.GL_MAX_TEXTURE_SIZE, arg, 0);

		System.out.println("GL_MAX_TEXTURE_SIZE:" + arg[0]);

		System.out.println("Available GL Extensions: " + gl.glGetString(GL2.GL_EXTENSIONS));

		initExtension(gl, "GL_ARB_texture_non_power_of_two");

	}

	@Override

	public void dispose(GLAutoDrawable drawable) {

		GL2 gl = drawable.getGL().getGL2();

	}

	@Override

	public void reshape(GLAutoDrawable drawable, int x, int y, int width, int height) {

		GL2 gl = drawable.getGL().getGL2();

	}

	@Override

	public void display(GLAutoDrawable drawable) {

		GL2 gl = drawable.getGL().getGL2();

	}

}

gcc -x objective-c -framework Cocoa -o Bug1398macOSContextOpsOnMainThread Bug1398macOSContextOpsOnMainThread.c \

	&& javac -source 1.8 -target 1.8 -classpath ../../../gluegen/build/gluegen-rt.jar:../../build/jar/jogl-all.jar Bug1398macOSContextOpsOnMainThread.java