X-Git-Url: http://git.ithinksw.org/ITFoundation.git/blobdiff_plain/0d9333bf9f0cfd67f68314fe40b37a0034131c84..e49df79ca1b49ae546b2f8ad7744689979e5f6b7:/ITAppleEventCenter.m diff --git a/ITAppleEventCenter.m b/ITAppleEventCenter.m index 1588305..1fedec5 100755 --- a/ITAppleEventCenter.m +++ b/ITAppleEventCenter.m @@ -21,184 +21,429 @@ static ITAppleEventCenter *_sharedAECenter = nil; + (id)sharedCenter { - if( _sharedAECenter != nil ) { - return _sharedAECenter; - } else { - _sharedAECenter = [[ITAppleEventCenter alloc] init]; + if( _sharedAECenter ) { return _sharedAECenter; + } else { + return _sharedAECenter = [[ITAppleEventCenter alloc] init]; } } +- (id)init +{ + if (self = [super init]) + { + idleUPP = NewAEIdleUPP(MyAEIdleCallback); + } + return self; +} + +- (void)dealloc +{ + DisposeAEIdleUPP(idleUPP); +} + - (NSString*)sendAEWithRequestedKey:(NSString*)key eventClass:(NSString*)eventClass eventID:(NSString*)eventID appPSN:(ProcessSerialNumber)psn { - /*if ( (!key) || (!eventClass) || (!eventID) || (psn.highLongOfPSN == kNoProcess) ) { - return @""; - } else*/ { + //Add error checking... AEEventClass eClass = *((unsigned long*)[eventClass UTF8String]); - AEEventID eID = *((unsigned long*)[eventID UTF8String]); - - const char *sendString = [[NSString stringWithFormat:@"'----':obj { form:'prop', want:type('prop'), seld:type('%s'), from:'null'() }", [key UTF8String]] UTF8String]; - NSString *_finalString; - + AEEventID eID = *((unsigned long*)[eventID UTF8String]); + + NSString *nssendString = [NSString stringWithFormat:@"'----':obj { form:'prop', want:type('prop'), seld:type('%s'), from:'null'() }", [key UTF8String]]; + const char *sendString = [nssendString UTF8String]; + NSString *_finalString = nil; + AppleEvent sendEvent, replyEvent; - AEIdleUPP upp = NewAEIdleUPP(&MyAEIdleCallback); - - char *charResult; + DescType resultType; Size resultSize, charResultSize; - int pid; - + AEBuildError buildError; OSStatus err; OSErr err2, err3; - - if (GetProcessPID(&psn, &pid) == noErr) { - if (pid ==0) { - NSLog(@"Process doesn't exist! Exiting."); - return nil; - } + /* + if ((GetProcessPID(&psn, &pid) == noErr) && (pid == 0)) { + NSLog(@"Error getting PID of application! Exiting."); + return nil; + } + */ + //NSLog(@"_sendString: %s", sendString); + + err = AEBuildAppleEvent(eClass, eID, typeProcessSerialNumber,(ProcessSerialNumber*)&psn, sizeof(ProcessSerialNumber), kAutoGenerateReturnID, 0, &sendEvent, &buildError, sendString); + + [self printCarbonDesc:&sendEvent]; + + if (err) { + NSLog(@"%d:%d at \"%@\"",(int)buildError.fError,buildError.fErrorPos,[nssendString substringToIndex:buildError.fErrorPos]); + } + + err = AESend(&sendEvent, &replyEvent, kAEWaitReply, kAENormalPriority, kNoTimeOut, idleUPP, NULL); + + [self printCarbonDesc:&replyEvent]; + + if (err) { + NSLog(@"Send Error: %i",err); } else { - NSLog(@"Error getting PID of application to send to! Exiting."); - return nil; + unichar *result = 0; + + err2 = AESizeOfParam(&replyEvent, keyDirectObject, &resultType, &resultSize); + result = malloc(resultSize); + + if (err2) { + NSLog(@"Error After AESizeOfParam: %i", err2); + } else { + err3 = AEGetParamPtr(&replyEvent, keyDirectObject, resultType, NULL, result, resultSize, &charResultSize); + + if (err3) { + NSLog(@"Error After AEGetParamPtr: %i", err3); + } else { + _finalString = [NSString stringWithCharacters:result length:charResultSize/sizeof(unichar)]; + } + } + free(result); } - - NSLog(@"_sendString: %s", sendString); - + + AEDisposeDesc(&sendEvent); + AEDisposeDesc(&replyEvent); + + return _finalString; +} + +- (NSString*)sendAEWithSendString:(NSString*)nssendString eventClass:(NSString*)eventClass eventID:(NSString*)eventID appPSN:(ProcessSerialNumber)psn +{ + //Add error checking... + AEEventClass eClass = *((unsigned long*)[eventClass UTF8String]); + AEEventID eID = *((unsigned long*)[eventID UTF8String]); + + const char *sendString = [nssendString UTF8String]; + NSString *_finalString = nil; + + AppleEvent sendEvent, replyEvent; + + DescType resultType; + Size resultSize, charResultSize; + + AEBuildError buildError; + OSStatus err; + OSErr err2, err3; + /* + if ((GetProcessPID(&psn, &pid) == noErr) && (pid == 0)) { + NSLog(@"Error getting PID of application! Exiting."); + return nil; + } + */ + //NSLog(@"_sendString: %s", sendString); + err = AEBuildAppleEvent(eClass, eID, typeProcessSerialNumber,(ProcessSerialNumber*)&psn, sizeof(ProcessSerialNumber), kAutoGenerateReturnID, 0, &sendEvent, &buildError, sendString); - + [self printCarbonDesc:&sendEvent]; - + if (err) { - NSLog(@"%d:%d at \"%@\"",buildError.fError,buildError.fErrorPos,[sendString substringToIndex:buildError.fErrorPos]); + NSLog(@"%d:%d at \"%@\"",(int)buildError.fError,buildError.fErrorPos,[nssendString substringToIndex:buildError.fErrorPos]); } - - err = AESend(&sendEvent, &replyEvent, kAEWaitReply, kAENormalPriority, kNoTimeOut, upp, NULL); - + + err = AESend(&sendEvent, &replyEvent, kAEWaitReply, kAENormalPriority, kNoTimeOut, idleUPP, NULL); + [self printCarbonDesc:&replyEvent]; - + if (err) { NSLog(@"Send Error: %i",err); } else { + unichar *result = 0; - unichar* result=0; - err2 = AESizeOfParam(&replyEvent, keyDirectObject, &resultType, &resultSize); - result=malloc(resultSize); - - if (resultType == typeUInt32) { - NSLog(@"waffles"); - } - - if (err2) { NSLog(@"Error After AESizeOfParam: %i", err2); } else { - - err3 = AEGetParamPtr(&replyEvent, keyDirectObject, resultType, NULL, result, resultSize, &charResultSize); - - if (err3) { NSLog(@"Error After AEGetParamPtr: %i", err3); } else { - - _finalString = [[NSString stringWithCharacters:result length:charResultSize/sizeof(unichar)] copy]; - - } + result = malloc(resultSize); + + if (err2) { + NSLog(@"Error After AESizeOfParam: %i", err2); + } else { + err3 = AEGetParamPtr(&replyEvent, keyDirectObject, resultType, NULL, result, resultSize, &charResultSize); + + if (err3) { + NSLog(@"Error After AEGetParamPtr: %i", err3); + } else { + _finalString = [NSString stringWithCharacters:result length:charResultSize/sizeof(unichar)]; + } } + free(result); } - + AEDisposeDesc(&sendEvent); AEDisposeDesc(&replyEvent); - + return _finalString; - } } -- (NSString*)sendTwoTierAEWithRequestedKey:(NSString*)key fromObjectByKey:(NSString*)object eventClass:(NSString*)eventClass eventID:(NSString*)eventID appPSN:(ProcessSerialNumber)psn +- (long)sendAEWithRequestedKeyForNumber:(NSString*)key eventClass:(NSString*)eventClass eventID:(NSString*)eventID appPSN:(ProcessSerialNumber)psn { - /*if ( (!key) || (!object) || (!eventClass) || (!eventID) || (psn.highLongOfPSN == kNoProcess) ) { - return @""; - } else*/ { + //Add error checking... AEEventClass eClass = *((unsigned long*)[eventClass UTF8String]); AEEventID eID = *((unsigned long*)[eventID UTF8String]); - - const char *sendString = [[NSString stringWithFormat:@"'----':obj { form:'prop', want:type('prop'), seld:type('%s'), from:obj { form:'prop', want:type('prop'), seld:type('%s'), from:'null'() } }", [key UTF8String], [object UTF8String]] UTF8String]; - NSString *_finalString; - + + NSString *nssendString = [NSString stringWithFormat:@"'----':obj { form:'prop', want:type('prop'), seld:type('%s'), from:'null'() }", [key UTF8String]]; + const char *sendString = [nssendString UTF8String]; + long result = 0; + AppleEvent sendEvent, replyEvent; - AEIdleUPP upp = NewAEIdleUPP(&MyAEIdleCallback); - - char *charResult; + DescType resultType; Size resultSize, charResultSize; - int pid; - + AEBuildError buildError; OSStatus err; OSErr err2, err3; - - if (GetProcessPID(&psn, &pid) == noErr) { - if (pid ==0) { - NSLog(@"Process doesn't exist! Exiting."); - return nil; - } + /* + if ((GetProcessPID(&psn, &pid) == noErr) && (pid == 0)) { + NSLog(@"Error getting PID of application! Exiting."); + return nil; + } + */ + //NSLog(@"_sendString: %s", sendString); + + err = AEBuildAppleEvent(eClass, eID, typeProcessSerialNumber,(ProcessSerialNumber*)&psn, sizeof(ProcessSerialNumber), kAutoGenerateReturnID, 0, &sendEvent, &buildError, sendString); + + [self printCarbonDesc:&sendEvent]; + + if (err) { + NSLog(@"%d:%d at \"%@\"",(int)buildError.fError,buildError.fErrorPos,[nssendString substringToIndex:buildError.fErrorPos]); + } + + err = AESend(&sendEvent, &replyEvent, kAEWaitReply, kAENormalPriority, kNoTimeOut, idleUPP, NULL); + + [self printCarbonDesc:&replyEvent]; + + if (err) { + NSLog(@"Send Error: %i",err); } else { - NSLog(@"Error getting PID of application to send to! Exiting."); - return nil; + err2 = AESizeOfParam(&replyEvent, keyDirectObject, &resultType, &resultSize); + + if (err2) { + NSLog(@"Error After AESizeOfParam: %i", err2); + } else { + err3 = AEGetParamPtr(&replyEvent, keyDirectObject, resultType, NULL, &result, resultSize, &charResultSize); + + if (err3) { + NSLog(@"Error After AEGetParamPtr: %i", err3); + } + } } - - NSLog(@"_sendString: %s", sendString); - + + AEDisposeDesc(&sendEvent); + AEDisposeDesc(&replyEvent); + + return result; +} + +- (NSString*)sendTwoTierAEWithRequestedKey:(NSString*)key fromObjectByKey:(NSString*)object eventClass:(NSString*)eventClass eventID:(NSString*)eventID appPSN:(ProcessSerialNumber)psn +{ + //Add error checking... + AEEventClass eClass = *((unsigned long*)[eventClass UTF8String]); + AEEventID eID = *((unsigned long*)[eventID UTF8String]); + + NSString *nssendString = [NSString stringWithFormat:@"'----':obj { form:'prop', want:type('prop'), seld:type('%s'), from:obj { form:'prop', want:type('prop'), seld:type('%s'), from:'null'() } }", [key UTF8String], [object UTF8String]]; + const char *sendString = [nssendString UTF8String]; + NSString *_finalString = nil; + + AppleEvent sendEvent, replyEvent; + + DescType resultType; + Size resultSize, charResultSize; + + AEBuildError buildError; + OSStatus err; + OSErr err2, err3; + /* + if ((GetProcessPID(&psn, &pid) == noErr) && (pid == 0)) { + NSLog(@"Error getting PID of application! Exiting."); + return nil; + }*/ + + //NSLog(@"_sendString: %s", sendString); + err = AEBuildAppleEvent(eClass, eID, typeProcessSerialNumber,(ProcessSerialNumber*)&psn, sizeof(ProcessSerialNumber), kAutoGenerateReturnID, 0, &sendEvent, &buildError, sendString); - + [self printCarbonDesc:&sendEvent]; - + if (err) { - NSLog(@"%d:%d at \"%@\"",buildError.fError,buildError.fErrorPos,[sendString substringToIndex:buildError.fErrorPos]); + NSLog(@"%d:%d at \"%@\"",(int)buildError.fError,buildError.fErrorPos,[nssendString substringToIndex:buildError.fErrorPos]); } - - err = AESend(&sendEvent, &replyEvent, kAEWaitReply, kAENormalPriority, kNoTimeOut, upp, NULL); - + + err = AESend(&sendEvent, &replyEvent, kAEWaitReply, kAENormalPriority, kNoTimeOut, idleUPP, NULL); + [self printCarbonDesc:&replyEvent]; - + if (err) { NSLog(@"Send Error: %i",err); } else { - unichar* result=0; - + unichar *result = 0; + err2 = AESizeOfParam(&replyEvent, keyDirectObject, &resultType, &resultSize); - result=malloc(resultSize); - - if (err2) { NSLog(@"Error After AESizeOfParam: %i", err2); } else { - - err3 = AEGetParamPtr(&replyEvent, keyDirectObject, resultType, NULL, result, resultSize, &charResultSize); - - if (err3) { NSLog(@"Error After AEGetParamPtr: %i", err3); } else { - - _finalString = [[NSString stringWithCharacters:result length:charResultSize/sizeof(unichar)] copy]; - - } + result = malloc(resultSize); + + if (err2) { + NSLog(@"Error After AESizeOfParam: %i", err2); + } else { + err3 = AEGetParamPtr(&replyEvent, keyDirectObject, resultType, NULL, result, resultSize, &charResultSize); + + if (err3) { + NSLog(@"Error After AEGetParamPtr: %i", err3); + } else { + _finalString = [NSString stringWithCharacters:result length:charResultSize/sizeof(unichar)]; + } } + free(result); } - + AEDisposeDesc(&sendEvent); AEDisposeDesc(&replyEvent); - + return _finalString; +} + +- (long)sendTwoTierAEWithRequestedKeyForNumber:(NSString*)key fromObjectByKey:(NSString*)object eventClass:(NSString*)eventClass eventID:(NSString*)eventID appPSN:(ProcessSerialNumber)psn +{ + //Add error checking... + AEEventClass eClass = *((unsigned long*)[eventClass UTF8String]); + AEEventID eID = *((unsigned long*)[eventID UTF8String]); + + NSString *nssendString = [NSString stringWithFormat:@"'----':obj { form:'prop', want:type('prop'), seld:type('%s'), from:obj { form:'prop', want:type('prop'), seld:type('%s'), from:'null'() } }", [key UTF8String], [object UTF8String]]; + const char *sendString = [nssendString UTF8String]; + long result = 0; + + AppleEvent sendEvent, replyEvent; + + DescType resultType; + Size resultSize, charResultSize; + + AEBuildError buildError; + OSStatus err; + OSErr err2, err3; + /* + if ((GetProcessPID(&psn, &pid) == noErr) && (pid == 0)) { + NSLog(@"Error getting PID of application! Exiting."); + return nil; + } + */ + // NSLog(@"_sendString: %s", sendString); + + err = AEBuildAppleEvent(eClass, eID, typeProcessSerialNumber,(ProcessSerialNumber*)&psn, sizeof(ProcessSerialNumber), kAutoGenerateReturnID, 0, &sendEvent, &buildError, sendString); + + [self printCarbonDesc:&sendEvent]; + + if (err) { + NSLog(@"%d:%d at \"%@\"",(int)buildError.fError,buildError.fErrorPos,[nssendString substringToIndex:buildError.fErrorPos]); + } + + err = AESend(&sendEvent, &replyEvent, kAEWaitReply, kAENormalPriority, kNoTimeOut, idleUPP, NULL); + + [self printCarbonDesc:&replyEvent]; + + if (err) { + NSLog(@"Send Error: %i",err); + } else { + err2 = AESizeOfParam(&replyEvent, keyDirectObject, &resultType, &resultSize); + + if (err2) { + NSLog(@"Error After AESizeOfParam: %i", err2); + } else { + err3 = AEGetParamPtr(&replyEvent, keyDirectObject, resultType, NULL, &result, resultSize, &charResultSize); + + if (err3) { + NSLog(@"Error After AEGetParamPtr: %i", err3); + } + } } + + AEDisposeDesc(&sendEvent); + AEDisposeDesc(&replyEvent); + + return result; } +- (NSString *)sendAEWithRequestedArray:(NSArray *)array eventClass:(NSString*)eventClass eventID:(NSString*)eventID appPSN:(ProcessSerialNumber)psn +{ + NSString *buildString = [NSString stringWithFormat:@"{ form:'prop', want:type('prop'), seld:type('%s'), from:'null'() }", [[array objectAtIndex:0] UTF8String]]; + const char *sendString; + int i; + NSString *_finalString = nil; + + AEEventClass eClass = *((unsigned long*)[eventClass UTF8String]); + AEEventID eID = *((unsigned long*)[eventID UTF8String]); + + AppleEvent sendEvent, replyEvent; + + DescType resultType; + Size resultSize, charResultSize; + + AEBuildError buildError; + OSStatus err; + OSErr err2, err3; + + for (i = 1; i < [array count]; i++) { + NSString *from = [NSString stringWithFormat:@"{ form:'prop', want:type('prop'), seld:type('%s'), from:obj %@ }", + [[array objectAtIndex:i] UTF8String], buildString]; + buildString = from; + } + buildString = [@"'----':obj " stringByAppendingString:buildString]; + sendString = [buildString UTF8String]; + /* + if ((GetProcessPID(&psn, &pid) == noErr) && (pid == 0)) { + NSLog(@"Error getting PID of application! Exiting."); + return nil; + } + */ + //NSLog(@"_sendString: %s", sendString); + + err = AEBuildAppleEvent(eClass, eID, typeProcessSerialNumber,(ProcessSerialNumber*)&psn, sizeof(ProcessSerialNumber), kAutoGenerateReturnID, 0, &sendEvent, &buildError, sendString); + + [self printCarbonDesc:&sendEvent]; + + if (err) { + NSLog(@"%d:%d at \"%@\"",(int)buildError.fError,buildError.fErrorPos,[buildString substringToIndex:buildError.fErrorPos]); + } + + err = AESend(&sendEvent, &replyEvent, kAEWaitReply, kAENormalPriority, kNoTimeOut, idleUPP, NULL); + + [self printCarbonDesc:&replyEvent]; + + if (err) { + NSLog(@"Send Error: %i",err); + } else { + unichar *result = 0; + + err2 = AESizeOfParam(&replyEvent, keyDirectObject, &resultType, &resultSize); + result=malloc(resultSize); + + if (err2) { + NSLog(@"Error After AESizeOfParam: %i", err2); + } else { + err3 = AEGetParamPtr(&replyEvent, keyDirectObject, resultType, NULL, result, resultSize, &charResultSize); + if (err3) { + NSLog(@"Error After AEGetParamPtr: %i", err3); + } else { + _finalString = [NSString stringWithCharacters:result length:charResultSize/sizeof(unichar)]; + } + } + free(result); + } + return _finalString; +} - (void)sendAEWithEventClass:(NSString*)eventClass eventID:(NSString*)eventID appPSN:(ProcessSerialNumber)psn { - /*if ( (!eventClass) || (!eventID) || (psn.highLongOfPSN == kNoProcess) ) { - return; - } else */{ - AEEventClass eClass = *((unsigned long*)[eventClass UTF8String]); - AEEventID eID = *((unsigned long*)[eventID UTF8String]); - AppleEvent event, reply; - - AEBuildAppleEvent(eClass, eID, typeProcessSerialNumber,(ProcessSerialNumber*)&psn, sizeof(ProcessSerialNumber), kAutoGenerateReturnID, kAnyTransactionID, &event, nil, ""); - - AESend(&event, &reply, kAENoReply, kAENormalPriority, kAEDefaultTimeout, nil, nil); - - AEDisposeDesc(&event); - AEDisposeDesc(&reply); - } + //Add error checking... + AEEventClass eClass = *((unsigned long*)[eventClass UTF8String]); + AEEventID eID = *((unsigned long*)[eventID UTF8String]); + AEDesc dest; + AppleEvent event, reply; + + //AEBuildAppleEvent(eClass, eID, typeProcessSerialNumber,(ProcessSerialNumber*)&psn, sizeof(ProcessSerialNumber), kAutoGenerateReturnID, kAnyTransactionID, &event, nil, ""); + AECreateDesc(typeProcessSerialNumber,(ProcessSerialNumber*)&psn,sizeof(ProcessSerialNumber),&dest); + AECreateAppleEvent(eClass,eID,&dest,kAutoGenerateReturnID,kAnyTransactionID,&event); + AESend(&event, &reply, kAENoReply, kAENormalPriority, kAEDefaultTimeout, idleUPP, nil); + + AEDisposeDesc(&dest); + AEDisposeDesc(&event); + AEDisposeDesc(&reply); } - (void)printCarbonDesc:(AEDesc*)desc { @@ -208,4 +453,163 @@ static ITAppleEventCenter *_sharedAECenter = nil; DisposeHandle(xx); } + +- (AEArrayDataPointer)sendAEWithRequestedKeyForArray:(NSString*)key eventClass:(NSString*)eventClass eventID:(NSString*)eventID appPSN:(ProcessSerialNumber)psn +{ + //Add error checking... + AEEventClass eClass = *((unsigned long*)[eventClass UTF8String]); + AEEventID eID = *((unsigned long*)[eventID UTF8String]); + + NSString *nssendString = [NSString stringWithFormat:@"'----':obj { form:'indx', want:'%s', seld:abso($616C6C20$), from:'null'() }", [key UTF8String]]; + const char *sendString = [nssendString UTF8String]; + AEArrayDataPointer result = nil; + + AppleEvent sendEvent, replyEvent; + + + AEBuildError buildError; + OSStatus err; + + //NSLog(@"_sendString: %s", sendString); + + err = AEBuildAppleEvent(eClass, eID, typeProcessSerialNumber,(ProcessSerialNumber*)&psn, sizeof(ProcessSerialNumber), kAutoGenerateReturnID, 0, &sendEvent, &buildError, sendString); + + [self printCarbonDesc:&sendEvent]; + + if (err) { + NSLog(@"%d:%d at \"%@\"",(int)buildError.fError,buildError.fErrorPos,[nssendString substringToIndex:buildError.fErrorPos]); + } + + err = AESend(&sendEvent, &replyEvent, kAEWaitReply, kAENormalPriority, kNoTimeOut, idleUPP, NULL); + + [self printCarbonDesc:&replyEvent]; + + if (err) { + NSLog(@"Send Error: %i",err); + } else { + SInt32 count, resultCount; + + AECountItems(&replyEvent,&count); + result=malloc(sizeof(AEDesc)*count); + AEGetArray(&replyEvent, kAEDescArray, result, sizeof(AEDesc)*count, NULL, NULL, &resultCount); + + free(result); + } + + AEDisposeDesc(&sendEvent); + AEDisposeDesc(&replyEvent); + + return result; +} + +- (long)sendAEWithSendStringForNumber:(NSString*)string eventClass:(NSString*)eventClass eventID:(NSString*)eventID appPSN:(ProcessSerialNumber)psn +{ + //Add error checking... + AEEventClass eClass = *((unsigned long*)[eventClass UTF8String]); + AEEventID eID = *((unsigned long*)[eventID UTF8String]); + + const char *sendString = [string UTF8String]; + SInt32 result = 0; + + AppleEvent sendEvent, replyEvent; + + DescType resultType; + Size resultSize, charResultSize; + + AEBuildError buildError; + OSStatus err; + OSErr err2, err3; + /* + if ((GetProcessPID(&psn, &pid) == noErr) && (pid == 0)) { + NSLog(@"Error getting PID of application! Exiting."); + return nil; + } + */ + //NSLog(@"_sendString: %s", sendString); + + err = AEBuildAppleEvent(eClass, eID, typeProcessSerialNumber,(ProcessSerialNumber*)&psn, sizeof(ProcessSerialNumber), kAutoGenerateReturnID, 0, &sendEvent, &buildError, sendString); + + [self printCarbonDesc:&sendEvent]; + + if (err) { + NSLog(@"%d:%d at \"%@\"",(int)buildError.fError,buildError.fErrorPos,[string substringToIndex:buildError.fErrorPos]); + } + + err = AESend(&sendEvent, &replyEvent, kAEWaitReply, kAENormalPriority, kNoTimeOut, idleUPP, NULL); + + [self printCarbonDesc:&replyEvent]; + + if (err) { + NSLog(@"Send Error: %i",err); + } else { + err2 = AESizeOfParam(&replyEvent, keyDirectObject, &resultType, &resultSize); + + if (err2) { + NSLog(@"Error After AESizeOfParam: %i", err2); + } else { + err3 = AEGetParamPtr(&replyEvent, keyDirectObject, resultType, NULL, &result, resultSize, &charResultSize); + + if (err3) { + NSLog(@"Error After AEGetParamPtr: %i", err3); + } + } + } + + +AEDisposeDesc(&sendEvent); +AEDisposeDesc(&replyEvent); +NSLog(@"waffles say %d",result); +return result; +} + +- (AEArrayDataPointer)sendAEWithSendStringForArray:(NSString*)string eventClass:(NSString*)eventClass eventID:(NSString*)eventID appPSN:(ProcessSerialNumber)psn +{ + //Add error checking... + AEEventClass eClass = *((unsigned long*)[eventClass UTF8String]); + AEEventID eID = *((unsigned long*)[eventID UTF8String]); + + const char *sendString = [string UTF8String]; + AEArrayDataPointer result = NULL; + + AppleEvent sendEvent, replyEvent; + + AEBuildError buildError; + OSStatus err; + /* + if ((GetProcessPID(&psn, &pid) == noErr) && (pid == 0)) { + NSLog(@"Error getting PID of application! Exiting."); + return nil; + } + */ + //NSLog(@"_sendString: %s", sendString); + + err = AEBuildAppleEvent(eClass, eID, typeProcessSerialNumber,(ProcessSerialNumber*)&psn, sizeof(ProcessSerialNumber), kAutoGenerateReturnID, 0, &sendEvent, &buildError, sendString); + + [self printCarbonDesc:&sendEvent]; + + if (err) { + NSLog(@"%d:%d at \"%@\"",(int)buildError.fError,buildError.fErrorPos,[string substringToIndex:buildError.fErrorPos]); + } + + err = AESend(&sendEvent, &replyEvent, kAEWaitReply, kAENormalPriority, kNoTimeOut, idleUPP, NULL); + + [self printCarbonDesc:&replyEvent]; + + if (err) { + NSLog(@"Send Error: %i",err); + } else { + SInt32 count, resultCount; + + AECountItems(&replyEvent,&count); + result=malloc(sizeof(AEDesc)*count); + AEGetArray(&replyEvent, kAEDescArray, result, sizeof(AEDesc)*count, NULL, NULL, &resultCount); + + free(result); + } + + AEDisposeDesc(&sendEvent); + AEDisposeDesc(&replyEvent); + + return result; +} @end