X-Git-Url: http://git.ithinksw.org/ITFoundation.git/blobdiff_plain/9022764aafc0a65ed10dfeef65b52cee01731cd5..3941e1bf85cdad02f5f7825d61cbbded49d035fe:/ITAppleEventCenter.m

diff --git a/ITAppleEventCenter.m b/ITAppleEventCenter.m
index ed1ad83..b2c1d46 100755
--- a/ITAppleEventCenter.m
+++ b/ITAppleEventCenter.m
@@ -23,74 +23,152 @@ static ITAppleEventCenter *_sharedAECenter = nil;
 {
     if( _sharedAECenter ) {
         return _sharedAECenter;
-    } else {	
+    } 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
 {
     //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 = nil;
-    
+
     AppleEvent sendEvent, replyEvent;
-    AEIdleUPP upp = NewAEIdleUPP(&MyAEIdleCallback);
-    
+
     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;
+	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,[sendString 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);
     }
-    */
+
+    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 \"%@\"",(int)buildError.fError,buildError.fErrorPos,[sendString 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;
-        
+
         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];
+                _finalString = [NSString stringWithCharacters:result length:charResultSize/sizeof(unichar)];
             }
         }
         free(result);
     }
-    
+
     AEDisposeDesc(&sendEvent);
     AEDisposeDesc(&replyEvent);
-    
+
     return _finalString;
 }
 
@@ -99,60 +177,57 @@ static ITAppleEventCenter *_sharedAECenter = nil;
     //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];
     long result = 0;
-    
+
     AppleEvent sendEvent, replyEvent;
-    AEIdleUPP upp = NewAEIdleUPP(&MyAEIdleCallback);
-    
+
     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;
-    }
-    */
+	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,[sendString 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 {
         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);
-            } else {
-                NSLog(@"%i", result);
             }
         }
     }
-    
+
     AEDisposeDesc(&sendEvent);
     AEDisposeDesc(&replyEvent);
-    
+
     return result;
 }
 
@@ -161,64 +236,63 @@ static ITAppleEventCenter *_sharedAECenter = nil;
     //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 = nil;
-    
+
     AppleEvent sendEvent, replyEvent;
-    AEIdleUPP upp = NewAEIdleUPP(&MyAEIdleCallback);
-    
+
     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;
-    }*/
-    
+	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,[sendString 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;
-        
+
         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];
+                _finalString = [NSString stringWithCharacters:result length:charResultSize/sizeof(unichar)];
             }
         }
         free(result);
     }
-    
+
     AEDisposeDesc(&sendEvent);
     AEDisposeDesc(&replyEvent);
-    
+
     return _finalString;
 }
 
@@ -227,60 +301,57 @@ static ITAppleEventCenter *_sharedAECenter = nil;
     //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];
     long result = 0;
-    
+
     AppleEvent sendEvent, replyEvent;
-    AEIdleUPP upp = NewAEIdleUPP(&MyAEIdleCallback);
-    
+
     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);
-    
+	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,[sendString 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 {
         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);
-            } else {
-                NSLog(@"%i", result);
             }
         }
     }
-    
+
     AEDisposeDesc(&sendEvent);
     AEDisposeDesc(&replyEvent);
-    
+
     return result;
 }
 
@@ -290,55 +361,54 @@ static ITAppleEventCenter *_sharedAECenter = nil;
     const char *sendString;
     int i;
     NSString  *_finalString = nil;
-    
+
     AEEventClass eClass = *((unsigned long*)[eventClass UTF8String]);
     AEEventID    eID    = *((unsigned long*)[eventID UTF8String]);
-    
+
     AppleEvent sendEvent, replyEvent;
-    AEIdleUPP upp = NewAEIdleUPP(&MyAEIdleCallback);
-    
+
     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];
+		  [[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;
-    }
-    */
+	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,[sendString 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;
-        
+
         err2 = AESizeOfParam(&replyEvent, keyDirectObject, &resultType, &resultSize);
         result=malloc(resultSize);
-        
+
         if (err2) {
             NSLog(@"Error After AESizeOfParam: %i", err2);
         } else {
@@ -346,7 +416,7 @@ static ITAppleEventCenter *_sharedAECenter = nil;
             if (err3) {
                 NSLog(@"Error After AEGetParamPtr: %i", err3);
             } else {
-                _finalString = [[NSString stringWithCharacters:result length:charResultSize/sizeof(unichar)] copy];
+                _finalString = [NSString stringWithCharacters:result length:charResultSize/sizeof(unichar)];
             }
         }
         free(result);
@@ -365,18 +435,18 @@ static ITAppleEventCenter *_sharedAECenter = nil;
     //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, nil, nil);
-    
+    AESend(&event, &reply, kAENoReply, kAENormalPriority, kAEDefaultTimeout, idleUPP, nil);
+
     AEDisposeDesc(&dest);
     AEDisposeDesc(&event);
     AEDisposeDesc(&reply);
 }
 
 - (void)printCarbonDesc:(AEDesc*)desc {
-    Handle xx;
+    /*Handle xx;
     AEPrintDescToHandle(desc,&xx);
     NSLog(@"Handle: %s", *xx);
-    DisposeHandle(xx);
+    DisposeHandle(xx);*/
 }
 
 
@@ -386,11 +456,10 @@ static ITAppleEventCenter *_sharedAECenter = nil;
     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];
+    const char *sendString = [[NSString stringWithFormat:@"'----':obj { form:'indx', want:'%s', seld:abso($616C6C20$), from:'null'() }", [key UTF8String]] UTF8String];
     AEArrayDataPointer result = nil;
 
     AppleEvent sendEvent, replyEvent;
-    AEIdleUPP upp = NewAEIdleUPP(&MyAEIdleCallback);
 
     DescType resultType;
     Size resultSize, charResultSize;
@@ -409,7 +478,7 @@ static ITAppleEventCenter *_sharedAECenter = nil;
         NSLog(@"%d:%d at \"%@\"",(int)buildError.fError,buildError.fErrorPos,[sendString substringToIndex:buildError.fErrorPos]);
     }
 
-    err = AESend(&sendEvent, &replyEvent, kAEWaitReply, kAENormalPriority, kNoTimeOut, upp, NULL);
+    err = AESend(&sendEvent, &replyEvent, kAEWaitReply, kAENormalPriority, kNoTimeOut, idleUPP, NULL);
 
     //[self printCarbonDesc:&replyEvent];
 
@@ -431,4 +500,63 @@ static ITAppleEventCenter *_sharedAECenter = nil;
     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];
+    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,[sendString 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;
+}
+
 @end