/* Create a semaphore and immediately lock it.  This will be

     * unlocked by the openApplication or openDocuments Apple Event.

     * The OS guarantees that one (and only one) of these will be

     * sent during the app startup process.  The events are delivered

     * very quickly, so this only slightly increases startup time.  The

     * startJavaVM function in eclipseCarbon.c is also blocking on this

     * event, because startJavaVM is called prior to this initialization

     * process.

     */

	MPCreateBinarySemaphore(&startupEventSemaphore);

	MPWaitOnSemaphore(startupEventSemaphore, kDurationForever);

	/* Install the Apple Event handlers */

	InstallApplicationEventHandler(NewEventHandlerUPP(appleEventProc), GetEventTypeCount(kEvents), kEvents, 0, NULL);

	AEInstallEventHandler(kCoreEventClass, kAEOpenApplication, NewAEEventHandlerUPP(openApplicationAEProc), 0, false);

	AEInstallEventHandler(kCoreEventClass, kAEOpenDocuments, NewAEEventHandlerUPP(openDocumentsAEProc), 0, false);

}

}

/* This is taken from an Apple example on handling Apple Events manually */

static OSStatus appleEventProc(EventHandlerCallRef inCaller, EventRef inEvent, void* inRefcon) {

    Boolean release = false;

    EventRecord eventRecord;

    OSErr ignoreErrForThisSample;

    // Events of type kEventAppleEvent must be removed from the queue

    //  before being passed to AEProcessAppleEvent.

    if (IsEventInQueue(GetMainEventQueue(), inEvent)) {

        // RemoveEventFromQueue will release the event, which will

        //  destroy it if we don't retain it first.

        RetainEvent(inEvent);

        release = true;

        RemoveEventFromQueue(GetMainEventQueue(), inEvent);

    }

    // Convert the event ref to the type AEProcessAppleEvent expects.

    ConvertEventRefToEventRecord(inEvent, &eventRecord);

    ignoreErrForThisSample = AEProcessAppleEvent(&eventRecord);

    if (release) {

        ReleaseEvent(inEvent);

    }

    // This Carbon event has been handled, even if no AppleEvent handlers

    //  were installed for the Apple event.

    return noErr;

}

/* openApplication doesn't do anything except signal the startup semaphore */

static pascal OSErr openApplicationAEProc(const AppleEvent *theAppleEvent, AppleEvent *reply, long handlerRefcon) {

	MPSignalSemaphore(startupEventSemaphore);

    return noErr;

}

/* openDocuments parses out the list of files that triggered this application

 * to launch, and sets them into the _TCHAR **startupOpenedDocuments which

 * will be consumed by startJavaVM in eclipseCarbon.c as commandline 

 * paramaters.  When this process is complete, the startup semaphore

 * will be signalled.

 */

static pascal OSErr openDocumentsAEProc(const AppleEvent *theAppleEvent, AppleEvent *reply, long handlerRefcon) {

    AEDescList docList;

    FSRef fsRef;

		CFURLRef resolved;

		Boolean isFolder, wasAliased;

		CFStringRef string;

    long index;

    long count = 0;

    OSErr err = AEGetParamDesc(theAppleEvent, keyDirectObject, typeAEList, &docList);

    require_noerr(err, CantGetDocList);

    err = AECountItems(&docList, &count);

    require_noerr(err, CantGetCount);

		//CFStringRef imageString = CFStringCreateWithCString(kCFAllocatorDefault, featureImage, kCFStringEncodingASCII);

		startupOpenedDocuments = malloc((count) * sizeof(_TCHAR*));

		memset(startupOpenedDocuments, 0, (count) * sizeof(_TCHAR*));

		for (index = 1; index <= count; index++) {

			err = AEGetNthPtr(&docList, index, typeFSRef, NULL, NULL, &fsRef, sizeof(FSRef), NULL);

			require_noerr(err, CantGetDocDescPtr);

			if (FSResolveAliasFile(&fsRef, true, &isFolder, &wasAliased) == noErr) {

     		resolved = CFURLCreateFromFSRef(kCFAllocatorDefault, &fsRef);

     		if (resolved != NULL) {

       		string = CFURLCopyFileSystemPath(resolved, kCFURLPOSIXPathStyle);

       		CFIndex length = CFStringGetMaximumSizeForEncoding(CFStringGetLength(string), kCFStringEncodingUTF8);

       		char *s = malloc(length);

       		if (CFStringGetCString(string, s, length, kCFStringEncodingUTF8)) {

						startupOpenedDocuments[index - 1] = s;

       		}

					else {

         		free(s);

       		}

       		CFRelease(string);

       		CFRelease(resolved);

				}

			}

    }

CantGetCount:

CantGetDocDescPtr:

    AEDisposeDesc(&docList);

CantGetDocList:

    if (err != noErr) {

        // For handlers that expect a reply, add error information here.

    }

		MPSignalSemaphore(startupEventSemaphore);

    return err;

}