X-Git-Url: http://git.ithinksw.org/ITFoundation.git/blobdiff_plain/f8c9f9165f78d2bbfa5c9465b2af1d13dad05671..0471d3908d12b15bd1962ad57402da9f838ce66c:/ITAppleEventCenter.m?ds=sidebyside diff --git a/ITAppleEventCenter.m b/ITAppleEventCenter.m index 8ad8af5..9efe080 100755 --- a/ITAppleEventCenter.m +++ b/ITAppleEventCenter.m @@ -1,5 +1,6 @@ #import "ITAppleEventCenter.h" -//oh, wait, i forgot i had this open. +#import "ITDebug.h" + static Boolean MyAEIdleCallback ( EventRecord * theEvent, SInt32 * sleepTime, @@ -55,39 +56,40 @@ static ITAppleEventCenter *_sharedAECenter = nil; OSErr berr, err2, err3; if ((GetProcessPID(&psn, &pid) == noErr) && (pid == 0)) { - //NSLog(@"Error getting PID of application! Exiting."); + ITDebugLog(@"Error getting PID of application."); return nil; } - - //NSLog(@"_sendString: %s", sendString); berr = AEBuildAppleEvent(eClass, eID, typeProcessSerialNumber,(ProcessSerialNumber*)&psn, sizeof(ProcessSerialNumber), kAutoGenerateReturnID, 0, &sendEvent, &buildError, sendString); -//joe add the ITFDEBUG stuff back? - //[self printCarbonDesc:&sendEvent]; + [self printCarbonDesc:&sendEvent]; - if (err) { - //NSLog(@"%d:%d at \"%@\"",(int)buildError.fError,buildError.fErrorPos,[nssendString substringToIndex:buildError.fErrorPos]); + if (berr) { + ITDebugLog(@"Error: %d:%d at \"%@\"",(int)buildError.fError,buildError.fErrorPos,[nssendString substringToIndex:buildError.fErrorPos]); } - err = AESend(&sendEvent, &replyEvent, kAEWaitReply, kAENormalPriority, kNoTimeOut, idleUPP, NULL); + err = AESend(&sendEvent, &replyEvent, kAEWaitReply, kAENormalPriority, /*kAEDefaultTimeout*/30, idleUPP, NULL); - //[self printCarbonDesc:&replyEvent]; + [self printCarbonDesc:&replyEvent]; if (err) { - //NSLog(@"Send Error: %i",err); + ITDebugLog(@"Send Error: %i",err); } else { unichar *result = 0; err2 = AESizeOfParam(&replyEvent, keyDirectObject, &resultType, &resultSize); - result = malloc(resultSize); + if (resultSize != 0) { + result = malloc(resultSize); + } else { + return nil; + } if (err2) { - //NSLog(@"Error After AESizeOfParam: %i", err2); + ITDebugLog(@"Error After AESizeOfParam: %i", err2); } else { err3 = AEGetParamPtr(&replyEvent, keyDirectObject, resultType, NULL, result, resultSize, &charResultSize); if (err3) { - //NSLog(@"Error After AEGetParamPtr: %i", err3); + ITDebugLog(@"Error After AEGetParamPtr: %i", err3); } else { _finalString = [NSString stringWithCharacters:result length:charResultSize/sizeof(unichar)]; } @@ -121,39 +123,39 @@ static ITAppleEventCenter *_sharedAECenter = nil; OSErr err2, err3; if ((GetProcessPID(&psn, &pid) == noErr) && (pid == 0)) { - //NSLog(@"Error getting PID of application! Exiting."); + ITDebugLog(@"Error getting PID of application."); return nil; } - - //NSLog(@"_sendString: %s", sendString); berr = AEBuildAppleEvent(eClass, eID, typeProcessSerialNumber,(ProcessSerialNumber*)&psn, sizeof(ProcessSerialNumber), kAutoGenerateReturnID, 0, &sendEvent, &buildError, sendString); - NSLog(@"sending..."); if (!berr) [self printCarbonDesc:&sendEvent]; if (berr) { - //NSLog(@"%d:%d at \"%@\"",(int)buildError.fError,buildError.fErrorPos,[nssendString substringToIndex:buildError.fErrorPos]); + ITDebugLog(@"Error: %d:%d at \"%@\"",(int)buildError.fError,buildError.fErrorPos,[nssendString substringToIndex:buildError.fErrorPos]); } - err = AESend(&sendEvent, &replyEvent, kAEWaitReply, kAENormalPriority, kNoTimeOut, idleUPP, NULL); - NSLog(@"replying..."); + err = AESend(&sendEvent, &replyEvent, kAEWaitReply, kAENormalPriority, /*kAEDefaultTimeout*/30, idleUPP, NULL); if (!err) [self printCarbonDesc:&replyEvent]; if (err) { - //NSLog(@"Send Error: %i",err); + ITDebugLog(@"Send Error: %i",err); } else { unichar *result = 0; err2 = AESizeOfParam(&replyEvent, keyDirectObject, &resultType, &resultSize); - result = malloc(resultSize); + if (resultSize != 0) { + result = malloc(resultSize); + } else { + return nil; + } if (err2) { - //NSLog(@"Error After AESizeOfParam: %i", err2); + ITDebugLog(@"Error After AESizeOfParam: %i", err2); } else { err3 = AEGetParamPtr(&replyEvent, keyDirectObject, resultType, NULL, result, resultSize, &charResultSize); if (err3) { - //NSLog(@"Error After AEGetParamPtr: %i", err3); + ITDebugLog(@"Error After AEGetParamPtr: %i", err3); } else { _finalString = [NSString stringWithCharacters:result length:charResultSize/sizeof(unichar)]; } @@ -188,36 +190,34 @@ static ITAppleEventCenter *_sharedAECenter = nil; OSErr berr, err2, err3; if ((GetProcessPID(&psn, &pid) == noErr) && (pid == 0)) { - //NSLog(@"Error getting PID of application! Exiting."); + ITDebugLog(@"Error getting PID of application."); return nil; } - - //NSLog(@"_sendString: %s", sendString); berr = AEBuildAppleEvent(eClass, eID, typeProcessSerialNumber,(ProcessSerialNumber*)&psn, sizeof(ProcessSerialNumber), kAutoGenerateReturnID, 0, &sendEvent, &buildError, sendString); - //[self printCarbonDesc:&sendEvent]; + [self printCarbonDesc:&sendEvent]; - if (err) { - //NSLog(@"%d:%d at \"%@\"",(int)buildError.fError,buildError.fErrorPos,[nssendString substringToIndex:buildError.fErrorPos]); + if (berr) { + ITDebugLog(@"Error: %d:%d at \"%@\"",(int)buildError.fError,buildError.fErrorPos,[nssendString substringToIndex:buildError.fErrorPos]); } - err = AESend(&sendEvent, &replyEvent, kAEWaitReply, kAENormalPriority, kNoTimeOut, idleUPP, NULL); + err = AESend(&sendEvent, &replyEvent, kAEWaitReply, kAENormalPriority, /*kAEDefaultTimeout*/30, idleUPP, NULL); - //[self printCarbonDesc:&replyEvent]; + [self printCarbonDesc:&replyEvent]; if (err) { - //NSLog(@"Send Error: %i",err); + ITDebugLog(@"Send Error: %i",err); } else { err2 = AESizeOfParam(&replyEvent, keyDirectObject, &resultType, &resultSize); if (err2) { - //NSLog(@"Error After AESizeOfParam: %i", err2); + ITDebugLog(@"Error After AESizeOfParam: %i", err2); } else { err3 = AEGetParamPtr(&replyEvent, keyDirectObject, resultType, NULL, &result, resultSize, &charResultSize); if (err3) { - //NSLog(@"Error After AEGetParamPtr: %i", err3); + ITDebugLog(@"Error After AEGetParamPtr: %i", err3); } } } @@ -230,7 +230,6 @@ static ITAppleEventCenter *_sharedAECenter = nil; - (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]); int pid; @@ -249,39 +248,41 @@ static ITAppleEventCenter *_sharedAECenter = nil; OSErr err2, err3; if ((GetProcessPID(&psn, &pid) == noErr) && (pid == 0)) { - //NSLog(@"Error getting PID of application! Exiting."); + ITDebugLog(@"Error getting PID of application."); return nil; } - //NSLog(@"_sendString: %s", sendString); - berr = AEBuildAppleEvent(eClass, eID, typeProcessSerialNumber,(ProcessSerialNumber*)&psn, sizeof(ProcessSerialNumber), kAutoGenerateReturnID, 0, &sendEvent, &buildError, sendString); - //[self printCarbonDesc:&sendEvent]; + [self printCarbonDesc:&sendEvent]; - if (err) { - //NSLog(@"%d:%d at \"%@\"",(int)buildError.fError,buildError.fErrorPos,[nssendString substringToIndex:buildError.fErrorPos]); + if (berr) { + ITDebugLog(@"Error: %d:%d at \"%@\"",(int)buildError.fError,buildError.fErrorPos,[nssendString substringToIndex:buildError.fErrorPos]); } - err = AESend(&sendEvent, &replyEvent, kAEWaitReply, kAENormalPriority, kNoTimeOut, idleUPP, NULL); + err = AESend(&sendEvent, &replyEvent, kAEWaitReply, kAENormalPriority, /*kAEDefaultTimeout*/30, idleUPP, NULL); - //[self printCarbonDesc:&replyEvent]; + [self printCarbonDesc:&replyEvent]; if (err) { - //NSLog(@"Send Error: %i",err); + ITDebugLog(@"Send Error: %i",err); } else { unichar *result = 0; err2 = AESizeOfParam(&replyEvent, keyDirectObject, &resultType, &resultSize); - result = malloc(resultSize); - + if (resultSize != 0) { + result = malloc(resultSize); + } else { + return nil; + } + if (err2) { - //NSLog(@"Error After AESizeOfParam: %i", err2); + ITDebugLog(@"Error After AESizeOfParam: %i", err2); } else { err3 = AEGetParamPtr(&replyEvent, keyDirectObject, resultType, NULL, result, resultSize, &charResultSize); if (err3) { - //NSLog(@"Error After AEGetParamPtr: %i", err3); + ITDebugLog(@"Error After AEGetParamPtr: %i", err3); } else { _finalString = [NSString stringWithCharacters:result length:charResultSize/sizeof(unichar)]; } @@ -297,7 +298,6 @@ static ITAppleEventCenter *_sharedAECenter = nil; - (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]); @@ -316,36 +316,34 @@ static ITAppleEventCenter *_sharedAECenter = nil; OSErr err2, err3; if ((GetProcessPID(&psn, &pid) == noErr) && (pid == 0)) { - //NSLog(@"Error getting PID of application! Exiting."); + ITDebugLog(@"Error getting PID of application."); return nil; } - - // //NSLog(@"_sendString: %s", sendString); berr = AEBuildAppleEvent(eClass, eID, typeProcessSerialNumber,(ProcessSerialNumber*)&psn, sizeof(ProcessSerialNumber), kAutoGenerateReturnID, 0, &sendEvent, &buildError, sendString); - //[self printCarbonDesc:&sendEvent]; + [self printCarbonDesc:&sendEvent]; - if (err) { - //NSLog(@"%d:%d at \"%@\"",(int)buildError.fError,buildError.fErrorPos,[nssendString substringToIndex:buildError.fErrorPos]); + if (berr) { + ITDebugLog(@"Error: %d:%d at \"%@\"",(int)buildError.fError,buildError.fErrorPos,[nssendString substringToIndex:buildError.fErrorPos]); } - err = AESend(&sendEvent, &replyEvent, kAEWaitReply, kAENormalPriority, kNoTimeOut, idleUPP, NULL); + err = AESend(&sendEvent, &replyEvent, kAEWaitReply, kAENormalPriority, /*kAEDefaultTimeout*/30, idleUPP, NULL); - //[self printCarbonDesc:&replyEvent]; + [self printCarbonDesc:&replyEvent]; if (err) { - //NSLog(@"Send Error: %i",err); + ITDebugLog(@"Send Error: %i",err); } else { err2 = AESizeOfParam(&replyEvent, keyDirectObject, &resultType, &resultSize); if (err2) { - //NSLog(@"Error After AESizeOfParam: %i", err2); + ITDebugLog(@"Error After AESizeOfParam: %i", err2); } else { err3 = AEGetParamPtr(&replyEvent, keyDirectObject, resultType, NULL, &result, resultSize, &charResultSize); if (err3) { - //NSLog(@"Error After AEGetParamPtr: %i", err3); + ITDebugLog(@"Error After AEGetParamPtr: %i", err3); } } } @@ -385,38 +383,39 @@ static ITAppleEventCenter *_sharedAECenter = nil; sendString = [buildString UTF8String]; if ((GetProcessPID(&psn, &pid) == noErr) && (pid == 0)) { - //NSLog(@"Error getting PID of application! Exiting."); + ITDebugLog(@"Error getting PID of application."); return nil; } - - //NSLog(@"_sendString: %s", sendString); berr = AEBuildAppleEvent(eClass, eID, typeProcessSerialNumber,(ProcessSerialNumber*)&psn, sizeof(ProcessSerialNumber), kAutoGenerateReturnID, 0, &sendEvent, &buildError, sendString); - //[self printCarbonDesc:&sendEvent]; + [self printCarbonDesc:&sendEvent]; - if (err) { - //NSLog(@"%d:%d at \"%@\"",(int)buildError.fError,buildError.fErrorPos,[buildString substringToIndex:buildError.fErrorPos]); + if (berr) { + ITDebugLog(@"Error: %d:%d at \"%@\"",(int)buildError.fError,buildError.fErrorPos,[buildString substringToIndex:buildError.fErrorPos]); } - err = AESend(&sendEvent, &replyEvent, kAEWaitReply, kAENormalPriority, kNoTimeOut, idleUPP, NULL); + err = AESend(&sendEvent, &replyEvent, kAEWaitReply, kAENormalPriority, /*kAEDefaultTimeout*/30, idleUPP, NULL); - //[self printCarbonDesc:&replyEvent]; + [self printCarbonDesc:&replyEvent]; if (err) { - //NSLog(@"Send Error: %i",err); + ITDebugLog(@"Send Error: %i",err); } else { unichar *result = 0; err2 = AESizeOfParam(&replyEvent, keyDirectObject, &resultType, &resultSize); - result=malloc(resultSize); - + if (resultSize != 0) { + result = malloc(resultSize); + } else { + return nil; + } if (err2) { - //NSLog(@"Error After AESizeOfParam: %i", err2); + ITDebugLog(@"Error After AESizeOfParam: %i", err2); } else { err3 = AEGetParamPtr(&replyEvent, keyDirectObject, resultType, NULL, result, resultSize, &charResultSize); if (err3) { - //NSLog(@"Error After AEGetParamPtr: %i", err3); + ITDebugLog(@"Error After AEGetParamPtr: %i", err3); } else { _finalString = [NSString stringWithCharacters:result length:charResultSize/sizeof(unichar)]; } @@ -430,7 +429,6 @@ static ITAppleEventCenter *_sharedAECenter = nil; - (void)sendAEWithEventClass:(NSString*)eventClass eventID:(NSString*)eventID appPSN:(ProcessSerialNumber)psn { - //Add error checking... AEEventClass eClass = *((unsigned long*)[eventClass UTF8String]); AEEventID eID = *((unsigned long*)[eventID UTF8String]); AEDesc dest; @@ -440,14 +438,14 @@ static ITAppleEventCenter *_sharedAECenter = nil; OSStatus cerr,cerr2,err; //AEBuildAppleEvent(eClass, eID, typeProcessSerialNumber,(ProcessSerialNumber*)&psn, sizeof(ProcessSerialNumber), kAutoGenerateReturnID, kAnyTransactionID, &event, nil, ""); if ((GetProcessPID(&psn, &pid) == noErr) && (pid == 0)) { - //NSLog(@"Error getting PID of application! Exiting."); + ITDebugLog(@"Error getting PID of application."); return; } cerr = AECreateDesc(typeProcessSerialNumber,(ProcessSerialNumber*)&psn,sizeof(ProcessSerialNumber),&dest); cerr2 = AECreateAppleEvent(eClass,eID,&dest,kAutoGenerateReturnID,kAnyTransactionID,&event); -//[self printCarbonDesc:&event]; - err = AESend(&event, &reply, kAENoReply, kAENormalPriority, kAEDefaultTimeout, idleUPP, nil); -//[self printCarbonDesc:&reply]; + [self printCarbonDesc:&event]; + err = AESend(&event, &reply, kAENoReply, kAENormalPriority, /*kAEDefaultTimeout*/30, idleUPP, nil); + [self printCarbonDesc:&reply]; if (!cerr2) AEDisposeDesc(&dest); if (!cerr) AEDisposeDesc(&event); if (!err) AEDisposeDesc(&reply); @@ -456,18 +454,17 @@ static ITAppleEventCenter *_sharedAECenter = nil; - (void)printCarbonDesc:(AEDesc*)desc { Handle xx; AEPrintDescToHandle(desc,&xx); - NSLog(@"Handle: %s", *xx); + ITDebugLog(@"AE Descriptor: %s", *xx); 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]]; + NSString *nssendString = [NSString stringWithFormat:@"'----':obj { form:'indx', want:'%s', seld:type('all '), from:'null'() }", [key UTF8String]]; const char *sendString = [nssendString UTF8String]; AEArrayDataPointer result = nil; int pid; @@ -478,31 +475,34 @@ static ITAppleEventCenter *_sharedAECenter = nil; AEBuildError buildError; OSStatus err; - //NSLog(@"_sendString: %s", sendString); if ((GetProcessPID(&psn, &pid) == noErr) && (pid == 0)) { - //NSLog(@"Error getting PID of application! Exiting."); + ITDebugLog(@"Error getting PID of application."); return nil; } err = AEBuildAppleEvent(eClass, eID, typeProcessSerialNumber,(ProcessSerialNumber*)&psn, sizeof(ProcessSerialNumber), kAutoGenerateReturnID, 0, &sendEvent, &buildError, sendString); - //[self printCarbonDesc:&sendEvent]; + [self printCarbonDesc:&sendEvent]; if (err) { - //NSLog(@"%d:%d at \"%@\"",(int)buildError.fError,buildError.fErrorPos,[nssendString substringToIndex:buildError.fErrorPos]); + ITDebugLog(@"Error: %d:%d at \"%@\"",(int)buildError.fError,buildError.fErrorPos,[nssendString substringToIndex:buildError.fErrorPos]); } - err = AESend(&sendEvent, &replyEvent, kAEWaitReply, kAENormalPriority, kNoTimeOut, idleUPP, NULL); + err = AESend(&sendEvent, &replyEvent, kAEWaitReply, kAENormalPriority, /*kAEDefaultTimeout*/30, idleUPP, NULL); - //[self printCarbonDesc:&replyEvent]; + [self printCarbonDesc:&replyEvent]; if (err) { - //NSLog(@"Send Error: %i",err); + ITDebugLog(@"Send Error: %i",err); } else { SInt32 count, resultCount; AECountItems(&replyEvent,&count); - result=malloc(sizeof(AEDesc)*count); + if ((sizeof(AEDesc)*count) != 0) { + result=malloc(sizeof(AEDesc)*count); + } else { + return nil; + } AEGetArray(&replyEvent, kAEDescArray, result, sizeof(AEDesc)*count, NULL, NULL, &resultCount); free(result); @@ -534,36 +534,34 @@ if ((GetProcessPID(&psn, &pid) == noErr) && (pid == 0)) { OSErr err2, err3; if ((GetProcessPID(&psn, &pid) == noErr) && (pid == 0)) { - //NSLog(@"Error getting PID of application! Exiting."); + ITDebugLog(@"Error getting PID of application."); return nil; } - - //NSLog(@"_sendString: %s", sendString); berr = AEBuildAppleEvent(eClass, eID, typeProcessSerialNumber,(ProcessSerialNumber*)&psn, sizeof(ProcessSerialNumber), kAutoGenerateReturnID, 0, &sendEvent, &buildError, sendString); - //[self printCarbonDesc:&sendEvent]; + [self printCarbonDesc:&sendEvent]; - if (err) { - //NSLog(@"%d:%d at \"%@\"",(int)buildError.fError,buildError.fErrorPos,[string substringToIndex:buildError.fErrorPos]); + if (berr) { + ITDebugLog(@"Error: %d:%d at \"%@\"",(int)buildError.fError,buildError.fErrorPos,[string substringToIndex:buildError.fErrorPos]); } - err = AESend(&sendEvent, &replyEvent, kAEWaitReply, kAENormalPriority, kNoTimeOut, idleUPP, NULL); + err = AESend(&sendEvent, &replyEvent, kAEWaitReply, kAENormalPriority, /*kAEDefaultTimeout*/30, idleUPP, NULL); - //[self printCarbonDesc:&replyEvent]; + [self printCarbonDesc:&replyEvent]; if (err) { - //NSLog(@"Send Error: %i",err); + ITDebugLog(@"Send Error: %i",err); } else { err2 = AESizeOfParam(&replyEvent, keyDirectObject, &resultType, &resultSize); if (err2) { - //NSLog(@"Error After AESizeOfParam: %i", err2); + ITDebugLog(@"Error After AESizeOfParam: %i", err2); } else { err3 = AEGetParamPtr(&replyEvent, keyDirectObject, resultType, NULL, &result, resultSize, &charResultSize); if (err3) { - //NSLog(@"Error After AEGetParamPtr: %i", err3); + ITDebugLog(@"Error After AEGetParamPtr: %i", err3); } } } @@ -571,7 +569,7 @@ if ((GetProcessPID(&psn, &pid) == noErr) && (pid == 0)) { if (!berr) AEDisposeDesc(&sendEvent); if (!err) AEDisposeDesc(&replyEvent); -//NSLog(@"waffles say %d",result); +ITDebugLog(@"waffles say %d",result); return result; } @@ -591,33 +589,35 @@ return result; OSStatus berr, err; if ((GetProcessPID(&psn, &pid) == noErr) && (pid == 0)) { - //NSLog(@"Error getting PID of application! Exiting."); + ITDebugLog(@"Error getting PID of application."); return nil; } - - //NSLog(@"_sendString: %s", sendString); berr = AEBuildAppleEvent(eClass, eID, typeProcessSerialNumber,(ProcessSerialNumber*)&psn, sizeof(ProcessSerialNumber), kAutoGenerateReturnID, 0, &sendEvent, &buildError, sendString); - //[self printCarbonDesc:&sendEvent]; + [self printCarbonDesc:&sendEvent]; - if (err) { - //NSLog(@"%d:%d at \"%@\"",(int)buildError.fError,buildError.fErrorPos,[string substringToIndex:buildError.fErrorPos]); + if (berr) { + ITDebugLog(@"Error: %d:%d at \"%@\"",(int)buildError.fError,buildError.fErrorPos,[string substringToIndex:buildError.fErrorPos]); } - err = AESend(&sendEvent, &replyEvent, kAEWaitReply, kAENormalPriority, kNoTimeOut, idleUPP, NULL); + err = AESend(&sendEvent, &replyEvent, kAEWaitReply, kAENormalPriority, /*kAEDefaultTimeout*/30, idleUPP, NULL); - //[self printCarbonDesc:&replyEvent]; + [self printCarbonDesc:&replyEvent]; if (err) { - //NSLog(@"Send Error: %i",err); + ITDebugLog(@"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); - + SInt32 count, resultCount; + + AECountItems(&replyEvent,&count); + if ((sizeof(AEDesc)*count) != 0) { + result=malloc(sizeof(AEDesc)*count); + } else { + return nil; + } + AEGetArray(&replyEvent, kAEDescArray, result, sizeof(AEDesc)*count, NULL, NULL, &resultCount); + free(result); } @@ -626,4 +626,70 @@ return result; return result; } + +- (NSData*)sendAEWithSendStringForData:(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]); + int pid; + + const char *sendString = [nssendString UTF8String]; + NSData *_finalData = nil; + + AppleEvent sendEvent, replyEvent; + + DescType resultType; + Size resultSize, charResultSize; + + AEBuildError buildError; + OSStatus berr,err; + OSErr err2, err3; + + if ((GetProcessPID(&psn, &pid) == noErr) && (pid == 0)) { + ITDebugLog(@"Error getting PID of application."); + return nil; + } + + berr = AEBuildAppleEvent(eClass, eID, typeProcessSerialNumber,(ProcessSerialNumber*)&psn, sizeof(ProcessSerialNumber), kAutoGenerateReturnID, 0, &sendEvent, &buildError, sendString); + if (!berr) [self printCarbonDesc:&sendEvent]; + + if (berr) { + ITDebugLog(@"Error: %d:%d at \"%@\"",(int)buildError.fError,buildError.fErrorPos,[nssendString substringToIndex:buildError.fErrorPos]); + } + + err = AESend(&sendEvent, &replyEvent, kAEWaitReply, kAENormalPriority, /*kAEDefaultTimeout*/30, idleUPP, NULL); + if (!err) [self printCarbonDesc:&replyEvent]; + + if (err) { + ITDebugLog(@"Send Error: %i",err); + } else { + unichar *result = 0; + + err2 = AESizeOfParam(&replyEvent, keyDirectObject, &resultType, &resultSize); + if (resultSize != 0) { + result = malloc(resultSize); + } else { + return nil; + } + + if (err2) { + ITDebugLog(@"Error After AESizeOfParam: %i", err2); + } else { + err3 = AEGetParamPtr(&replyEvent, keyDirectObject, resultType, NULL, result, resultSize, &charResultSize); + + if (err3) { + ITDebugLog(@"Error After AEGetParamPtr: %i", err3); + } else { + _finalData = [NSData dataWithBytesNoCopy:result length:charResultSize freeWhenDone:YES]; + } + } + } + + if (!berr) AEDisposeDesc(&sendEvent); + if (!err) AEDisposeDesc(&replyEvent); + + return _finalData; +} + @end \ No newline at end of file