ITAppleEventCenter.m

   1 #import "ITAppleEventCenter.h"
   2
   3 Boolean MyAEIdleCallback (
   4                                          EventRecord * theEvent,
   5                                          SInt32 * sleepTime,
   6                                          RgnHandle * mouseRgn
   7                                          );
   8
   9 Boolean MyAEIdleCallback (
  10                                          EventRecord * theEvent,
  11                                          SInt32 * sleepTime,
  12                                          RgnHandle * mouseRgn
  13                                          )
  14 {
  15     return FALSE;
  16 }
  17
  18 @implementation ITAppleEventCenter
  19
  20 static ITAppleEventCenter *_sharedAECenter = nil;
  21
  22 + (id)sharedCenter
  23 {
  24     if( _sharedAECenter != nil ) {
  25         return _sharedAECenter;
  26     } else {
  27         _sharedAECenter = [[ITAppleEventCenter alloc] init];
  28         return _sharedAECenter;
  29     }
  30 }
  31
  32 - (NSString*)sendAEWithRequestedKey:(NSString*)key eventClass:(NSString*)eventClass eventID:(NSString*)eventID appPSN:(ProcessSerialNumber)psn
  33 {
  34     /*if ( (!key) || (!eventClass) || (!eventID) || (psn.highLongOfPSN == kNoProcess) ) {
  35         return @"";
  36     } else*/ {
  37     AEEventClass eClass = *((unsigned long*)[eventClass UTF8String]);
  38     AEEventID    eID    = *((unsigned long*)[eventID UTF8String]);
  39
  40     const char *sendString = [[NSString stringWithFormat:@"'----':obj { form:'prop', want:type('prop'), seld:type('%s'), from:'null'() }", [key UTF8String]] UTF8String];
  41     NSString  *_finalString;
  42
  43     AppleEvent sendEvent, replyEvent;
  44     AEIdleUPP upp = NewAEIdleUPP(&MyAEIdleCallback);
  45
  46     char *charResult;
  47     DescType resultType;
  48     Size resultSize, charResultSize;
  49     int pid;
  50
  51     AEBuildError buildError;
  52     OSStatus err;
  53     OSErr err2, err3;
  54
  55     if (GetProcessPID(&psn, &pid) == noErr) {
  56         if (pid ==0) {
  57             NSLog(@"Process doesn't exist! Exiting.");
  58             return nil;
  59         }
  60     } else {
  61         NSLog(@"Error getting PID of application to send to! Exiting.");
  62         return nil;
  63     }
  64
  65     NSLog(@"_sendString: %s", sendString);
  66
  67     err = AEBuildAppleEvent(eClass, eID, typeProcessSerialNumber,(ProcessSerialNumber*)&psn, sizeof(ProcessSerialNumber), kAutoGenerateReturnID, 0, &sendEvent, &buildError, sendString);
  68
  69     [self printCarbonDesc:&sendEvent];
  70
  71     if (err) {
  72         NSLog(@"%d:%d at \"%@\"",buildError.fError,buildError.fErrorPos,[sendString substringToIndex:buildError.fErrorPos]);
  73     }
  74
  75     err = AESend(&sendEvent, &replyEvent, kAEWaitReply, kAENormalPriority, kNoTimeOut, upp, NULL);
  76
  77     [self printCarbonDesc:&replyEvent];
  78
  79     if (err) {
  80         NSLog(@"Send Error: %i",err);
  81     } else {
  82
  83         unichar* result=0;
  84
  85         err2 = AESizeOfParam(&replyEvent, keyDirectObject, &resultType, &resultSize);
  86         result=malloc(resultSize);
  87
  88         if (resultType == typeUInt32) {
  89             NSLog(@"waffles");
  90         }
  91
  92         if (err2) { NSLog(@"Error After AESizeOfParam: %i", err2); } else {
  93
  94         err3 = AEGetParamPtr(&replyEvent, keyDirectObject, resultType, NULL, result, resultSize, &charResultSize);
  95
  96         if (err3) { NSLog(@"Error After AEGetParamPtr: %i", err3); } else {
  97
  98         _finalString = [[NSString stringWithCharacters:result length:charResultSize/sizeof(unichar)] copy];
  99
 100         }
 101         }
 102     }
 103
 104     AEDisposeDesc(&sendEvent);
 105     AEDisposeDesc(&replyEvent);
 106
 107     return _finalString;
 108     }
 109 }
 110
 111 - (NSString*)sendTwoTierAEWithRequestedKey:(NSString*)key fromObjectByKey:(NSString*)object eventClass:(NSString*)eventClass eventID:(NSString*)eventID appPSN:(ProcessSerialNumber)psn
 112 {
 113     /*if ( (!key) || (!object) || (!eventClass) || (!eventID) || (psn.highLongOfPSN == kNoProcess) ) {
 114         return @"";
 115     } else*/ {
 116     AEEventClass eClass = *((unsigned long*)[eventClass UTF8String]);
 117     AEEventID    eID    = *((unsigned long*)[eventID UTF8String]);
 118
 119     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];
 120     NSString  *_finalString;
 121
 122     AppleEvent sendEvent, replyEvent;
 123     AEIdleUPP upp = NewAEIdleUPP(&MyAEIdleCallback);
 124
 125     char *charResult;
 126     DescType resultType;
 127     Size resultSize, charResultSize;
 128     int pid;
 129
 130     AEBuildError buildError;
 131     OSStatus err;
 132     OSErr err2, err3;
 133
 134     if (GetProcessPID(&psn, &pid) == noErr) {
 135         if (pid ==0) {
 136             NSLog(@"Process doesn't exist! Exiting.");
 137             return nil;
 138         }
 139     } else {
 140         NSLog(@"Error getting PID of application to send to! Exiting.");
 141         return nil;
 142     }
 143
 144     NSLog(@"_sendString: %s", sendString);
 145
 146     err = AEBuildAppleEvent(eClass, eID, typeProcessSerialNumber,(ProcessSerialNumber*)&psn, sizeof(ProcessSerialNumber), kAutoGenerateReturnID, 0, &sendEvent, &buildError, sendString);
 147
 148     [self printCarbonDesc:&sendEvent];
 149
 150     if (err) {
 151         NSLog(@"%d:%d at \"%@\"",buildError.fError,buildError.fErrorPos,[sendString substringToIndex:buildError.fErrorPos]);
 152     }
 153
 154     err = AESend(&sendEvent, &replyEvent, kAEWaitReply, kAENormalPriority, kNoTimeOut, upp, NULL);
 155
 156     [self printCarbonDesc:&replyEvent];
 157
 158     if (err) {
 159         NSLog(@"Send Error: %i",err);
 160     } else {
 161         unichar* result=0;
 162
 163         err2 = AESizeOfParam(&replyEvent, keyDirectObject, &resultType, &resultSize);
 164         result=malloc(resultSize);
 165
 166         if (err2) { NSLog(@"Error After AESizeOfParam: %i", err2); } else {
 167
 168         err3 = AEGetParamPtr(&replyEvent, keyDirectObject, resultType, NULL, result, resultSize, &charResultSize);
 169
 170         if (err3) { NSLog(@"Error After AEGetParamPtr: %i", err3); } else {
 171
 172         _finalString = [[NSString stringWithCharacters:result length:charResultSize/sizeof(unichar)] copy];
 173
 174         }
 175         }
 176     }
 177
 178     AEDisposeDesc(&sendEvent);
 179     AEDisposeDesc(&replyEvent);
 180
 181     return _finalString;
 182     }
 183 }
 184
 185
 186 - (void)sendAEWithEventClass:(NSString*)eventClass eventID:(NSString*)eventID appPSN:(ProcessSerialNumber)psn
 187 {
 188     /*if ( (!eventClass) || (!eventID) || (psn.highLongOfPSN == kNoProcess) ) {
 189         return;
 190     } else */{
 191         AEEventClass eClass = *((unsigned long*)[eventClass UTF8String]);
 192         AEEventID    eID    = *((unsigned long*)[eventID UTF8String]);
 193         AppleEvent event, reply;
 194
 195         AEBuildAppleEvent(eClass, eID, typeProcessSerialNumber,(ProcessSerialNumber*)&psn, sizeof(ProcessSerialNumber), kAutoGenerateReturnID, kAnyTransactionID, &event, nil, "");
 196
 197         AESend(&event, &reply, kAENoReply, kAENormalPriority, kAEDefaultTimeout, nil, nil);
 198
 199         AEDisposeDesc(&event);
 200         AEDisposeDesc(&reply);
 201     }
 202 }
 203
 204 - (void)printCarbonDesc:(AEDesc*)desc {
 205     Handle xx;
 206     AEPrintDescToHandle(desc,&xx);
 207     NSLog(@"Handle: %s", *xx);
 208     DisposeHandle(xx);
 209 }
 210
 211 @end