AppleScript Class recognition and Array count

Question

I have an application "SolarMaxOsX" written in Obj C
This app is scriptable
I have a class named Ups and in Ups.m I have written  following methods:
- (id)init {
    self = [super init];
    NSLog(@"Init Ups at %p", self);
    self.upsName = [NSString stringWithFormat:@"S2000"];
//    upsPort = [NSNumber numberWithInteger:1];
    self.upsPort = 1;
    self.upsIpAddress= [NSString stringWithFormat:@"192.168.10.101"];
    self.upsDataListToDisplayInTable = [self fillUpsListDictionary];
    _uniqueID = [[NSUUID UUID] UUIDString];
    return self;
/* For appleScript recognition */
- (BOOL)application: (NSApplication *)  sender delegateHandlesKey:(NSString *)key   {
    if ([key isEqualToString: @"Ups"]) return YES;
    if ([key isEqualToString: @"upsDescriptionDict"]) return YES;
    if ([key isEqualToString: @"networkStatus"]) return YES;
    if ([key isEqualToString: @"networkOk"]) return YES;
    return NO;
- (NSUniqueIDSpecifier *)objectSpecifier {
    NSScriptClassDescription *appDescription = (NSScriptClassDescription *)[NSApp classDescription];
    return [[NSUniqueIDSpecifier alloc] initWithContainerClassDescription:appDescription containerSpecifier:nil key:@"Ups" uniqueID:self.uniqueID];
In AppDelegate.m:
There is an array : Upss declared as follows:
NSArray (Upss *) Ups; declared and initialised in AppDelegate.m file
self.Upss = [self initUpss];
sdef file for SolarMax Suite follows (compiles correctly)
<suite name="SolarMax Suite" code="SMap" description="Apple Events supportés par l&apos;application SolarMaxMain">
<class name="Ups" code="SCup" description="An object UPS in SolarMaxOsX." >
<cocoa class="Ups" inherits="item" plural="Upss"/>
<property name="id" code="ID  " type="text" access="r" description="The unique identifier of the note.">
<cocoa key="uniqueID"/>
</property>
</class>
<element description="List of Ups" type="Ups">
<cocoa key="Upss"/>
</element>
<class name="AppDelegate" code="SCad" description="main class in SolarMaxOsX.">
<cocoa class="AppDelegate" />
// Liste des Ups reconnus dans le fichier de configuration
<property name="Upss" code="SMno" type="Ups" access="r">
<cocoa key="Upss"/>
</property>
</class>
</suite>
I want to get a count for array Upss
Script follows
tell application "/Users/guydesbief/Library/Developer/Xcode/DerivedData/SolarMaxOsX-cgcuhyptmpmtiegixfnbbhpexjhn/Build/Products/Debug/SolarMaxOsX.app" to activate
-- delay 30
tell application "/Users/guydesbief/Library/Developer/Xcode/DerivedData/SolarMaxOsX-cgcuhyptmpmtiegixfnbbhpexjhn/Build/Products/Debug/SolarMaxOsX.app"
    --    set nomAppli to the name of application
    --    set theWindows to windows
    set NbWin to the count of windows
    set theWindow to first item of windows
    properties of the theWindow
    tell window "UPS Sumary"
        --click on "Statistics button"
        -- click  on button 1 of theWindow
        --        set enabled of button1 to true
    end tell
    --class of Upss
    count of Upss
end tell
I get the following answers:
tell application "SolarMaxOsX"
    activate
    count every window of current application
        --> 1
    get item 1 of every window
        --> window id 3113
    get properties of window id 3113
        --> {closeable:true, zoomed:false, class:window, index:1, visible:true, name:"UPS Sumary", miniaturizable:true, id:3113, miniaturized:false, resizable:true, bounds:{1485, 31, 1985, 579}, zoomable:true}
    count every Ups of current application
        --> error number -1728
Résultat :
error "Erreur dans SolarMaxOsX : Il est impossible d’obtenir every Ups." number -1728 from every Ups
What do I have missed ?
Logiciel  OS X 10.9.5 (13F34) (Mavericks)
Xcode Version 6.1 (6A1052d)
Éditeur AppleScript Version 2.6.1 (152.1)
AppleScript 2.3.2

Answer 1

Hi Hiroto
It is much better thanks
Now count of onduleurs works
Hi Hiro,
It is much better Thanks for your help
Now, count od onduleurs works
tell application "/Users/guydesbief/Library/Developer/Xcode/DerivedData/SolarMaxOsX-cgcuhyptmpmt iegixfnbbhpexjhn/Build/Products/Debug/SolarMaxOsX.app" to activate
-- delay 30
tell application "/Users/guydesbief/Library/Developer/Xcode/DerivedData/SolarMaxOsX-cgcuhyptmpmt iegixfnbbhpexjhn/Build/Products/Debug/SolarMaxOsX.app"
       --    set nomAppli to the name of application
       --    set theWindows to windows
       class of onduleurs
       count of onduleurs
       --    get properties
       set NbWin to the count of windows
       set theWindow to first item of windows
       properties of the theWindow
       tell window "UPS Sumary"
             --click on "Statistics button"
             -- click  on button 1 of theWindow
             --           set enabled of button1 to true
       end tell
       get properties
       get id of first onduleur of onduleurs
The results in appleScript:
tell application "SolarMaxOsX"
         activate
         get class of every onduleur
                 --> {onduleur, onduleur, onduleur}
         count every onduleur of current application
                 --> 3
         count every window of current application
                 --> 1
         get item 1 of every window
                 --> window id 9796
         get properties of window id 9796
                 --> {closeable:true, zoomed:false, class:window, index:1, visible:true, name:"UPS Sumary", miniaturizable:true, id:9796, miniaturized:false, resizable:true, bounds:{30, 28, 530, 576}, zoomable:true}
         get properties
                 --> error number -10000
Résultat :
error "Erreur dans SolarMaxOsX : Le gestionnaire AppleEvent a échoué." number -10000
And the results of my logging in Objective C debugger:
My sdef file
2014-12-01 23:56:36.040 SolarMaxOsX[37551:303] Appdelegate handles onduleursArray
2014-12-01 23:56:36.040 SolarMaxOsX[37551:303] handles onduleursArray OK
2014-12-01 23:56:36.041 SolarMaxOsX[37551:303] Appdelegate handles onduleursArray
2014-12-01 23:56:36.041 SolarMaxOsX[37551:303] handles onduleursArray OK
2014-12-01 23:56:36.042 SolarMaxOsX[37551:303] Appdelegate handles orderedWindows
2014-12-01 23:56:36.042 SolarMaxOsX[37551:303] Appdelegate handles orderedWindows
2014-12-01 23:56:36.043 SolarMaxOsX[37551:303] Appdelegate handles orderedWindows
2014-12-01 23:56:36.043 SolarMaxOsX[37551:303] Appdelegate handles orderedWindows
2014-12-01 23:56:36.044 SolarMaxOsX[37551:303] Appdelegate handles scriptingProperties
2014-12-01 23:56:36.044 SolarMaxOsX[37551:303] Appdelegate handles classCode
2014-12-01 23:56:36.044 SolarMaxOsX[37551:303] Appdelegate handles onduleursArray
2014-12-01 23:56:36.045 SolarMaxOsX[37551:303] handles onduleursArray OK
2014-12-01 23:56:36.045 SolarMaxOsX[37551:303] Appdelegate handles terminologyVersion
2014-12-01 23:56:36.045 SolarMaxOsX[37551:303] Appdelegate handles version
2014-12-01 23:56:36.045 SolarMaxOsX[37551:303] Appdelegate handles name
2014-12-01 23:56:36.045 SolarMaxOsX[37551:303] Appdelegate handles isActive
2014-12-01 23:56:36.046 SolarMaxOsX[37551:303] An exception was thrown during execution of an NSScriptCommand...
2014-12-01 23:56:36.046 SolarMaxOsX[37551:303] Error while returning the result of a script command: the result object...
classCode = 1667330160;
isActive = 1;
name = SolarMaxOsX;
onduleursArray =     (
"<Ups: 0x6000002c0bd0>",
"<Ups: 0x6100002c24c0>",
"<Ups: 0x6000000df100>"
terminologyVersion = 1;
version = "1.1";
...could not be converted to an Apple event descriptor of type 'application properties'. The 'onduleursArray' entry could not be converted to an Apple event descriptor of type 'onduleur'. This instance of the class '__NSArrayM' returned nil when sent -objectSpecifier (is it not overridden?) and there is no coercible type declared for the scripting class 'onduleur'.
It seems that my objectSpecifier method in Ups Category (or Ups class) is never called
My sdef File:
    <!-- Suite Solar Max -->
    <suite name="SolarMax Suite" code="SMap" description="Apple Events supportés par SolarMaxOsX">
        <!-- suppress warning for missing "savable file format" type -->
        <enumeration name="savable file format" code = "savf" hidden="yes">
            <enumerator name= "dummy" code="VTdm"
            description="A dummy file format."/>
        </enumeration>
        <class name="application" code="capp" description="SolarMaxOsX’s top level scripting object." plural="applications" inherits="application">
            <cocoa class="NSApplication"/>
<element type="onduleur" access="r">
                    <cocoa key="onduleursArray"/>
            </element>
            <property name="onduleurs" code="SMor" description="Array of onduleurs." access="r">
                <type  type="onduleur" list="yes"/>
            <cocoa key="onduleursArray"/>
            </property>
            <property name="name" code="pnam" description="The name of the application." type="text" access="r"/>
            <property name="frontmost" code="pisf" description="Is this the frontmost (active) application?" type="boolean" access="r">
                <cocoa key="isActive"/>
            </property>
            <property name="version" code="vers" description="The version of the application." type="text" access="r"/>
            <property name="terminology version" code="TEvn" type="integer" access="r">
                <cocoa key="terminologyVersion"/>
            </property>
        </class>
<class name="onduleur" code="SCup" description="An object onduleur in SolarMaxOsX." plural="onduleurs">
            <cocoa class="Ups" inherits="item" />
            <property name="id" code="ID  " type="text" access="r" description="The unique identifier of the onduleur">
                <cocoa key="uniqueID"/>
            </property>
            <property name="OnduleurName" code="pnam" description="The onduleur name. ." type="text">
                <cocoa key="name"/>
            </property>
       </class>
        // Class SolarMaxOsX to access to first window
        <class name="SolarMaxOsX" code="SMos" description="main window in SolarMaxOsX.">
        <cocoa class="SolarMaxOsX" />
</class>
    </suite>
Categories for all classes in he same file: AppDelegate+AppleScriptExtensions.m (category file)
//  SolarMaxOsX+AppleScriptExtensions.m
//  SolarMaxOsX
//  Created by  Guy DESBIEF on 28/11/2014.
#import "AppDelegate+AppleScriptExtensions.h"
#import "Ups.h"
@implementation NSObject (MNscriptability)
- (void) returnError:(int)n string:(NSString*)s {
    NSScriptCommand* c = [NSScriptCommand currentCommand];
    [c setScriptErrorNumber:n];
    if (s)
        [c setScriptErrorString:s];
@end
@implementation AppDelegate (AppleScriptExtensions)
#define APPLESCRIPT_TERMINOLOGY_VERSION 1
#pragma mark ACCESSOR METHODS
-(NSNumber *) terminologyVersion {
    return [NSNumber numberWithInt:APPLESCRIPT_TERMINOLOGY_VERSION];
// For appleScript recognition
-(NSUInteger) countOfOnduleursArray
    MyLog(@"countOfOnduleursArray");
    return [self.onduleursArray count];
- (Ups *) objectInOnduleursArrayAtIndex : (int) index {
    MyLog(@"objectInOnduleursArrayAtIndex %index", index);
     Ups *upsItem = [self.onduleursArray objectAtIndex:index];
    if (upsItem != nil)
        return upsItem;
    } return nil;
- (Ups *) valueInOnduleursArrayAtIndex:(unsigned int)i {
    MyLog(@"valueInOnduleursArrayAtIndex %i", i);
    if (![[NSScriptCommand currentCommand] isKindOfClass:[NSExistsCommand class]])
        if (i >= [onduleursArray count]) {
            [self returnError:errAENoSuchObject string:@"No such Ups."];
            return nil;
    MyLog(@"valueInOnduleursArrayAtIndex index OK: %i", i);
    return [onduleursArray objectAtIndex: i];
- (BOOL)application: (NSApplication *)  sender delegateHandlesKey:(NSString *)key   {
     MyLog(@"Appdelegate handles %@",key);
    if ([key isEqualToString: @"terminologyVersion"]) return YES;
     if ([key isEqualToString: @"onduleursArray"]) {
       MyLog(@"handles %@ OK",key);
     return YES;
    return NO;
@end
@implementation Ups (AppleScriptExtensions)
- (NSUniqueIDSpecifier *) objectSpecifier
    MyLog(@"objectSpecifier (UPS) OK");
    return [[NSUniqueIDSpecifier allocWithZone:[self  zone]]
            initWithContainerClassDescription: (NSScriptClassDescription *)[NSApp classDescription]
            containerSpecifier: nil
            key: @"onduleursArray"
            uniqueID: uniqueID];
@end
AppDelegate+AppleScriptExtensions.h (category file)
// SolarMaxOsX+AppleScriptExtensions.h
//  SolarMaxOsX
//  Created by  Guy DESBIEF on 28/11/2014.
#import <Foundation/Foundation.h>
#import "AppDelegate.h"
@class AppDelegate;
@class Ups;
@interface NSObject (MNscriptability)
- (void) returnError:(int)n string:(NSString*)s;
@end
@interface AppDelegate  (AppleScriptExtensions)
#ifdef NDEBUG
#define MyLog(f, ...)
#else
#define MyLog(f, ...) NSLog(f, ## __VA_ARGS__)
#endif
- (BOOL)application: (NSApplication *)  sender delegateHandlesKey:(NSString *)key;
- (NSUInteger) countOfOnduleursArray;