Add ObjC.Object#$moduleName (#16)

Useful to determine which module owns a given class.

Author: dweinstein

index.js

@@ -406,6 +406,7 @@ function Runtime() {
         "$superClass",
         "$class",
         "$className",
+        "$moduleName",
         "$protocols",
         "$methods",
         "$ownMethods",
@@ -419,6 +420,7 @@ function Runtime() {
         let cachedSuperClass = null;
         let cachedClass = null;
         let cachedClassName = null;
+        let cachedModuleName = null;
         let cachedProtocols = null;
         let cachedMethodNames = null;
         let cachedProtocolMethods = null;
@@ -518,6 +520,11 @@ function Runtime() {
                                 cachedClassName = api.object_getClassName(handle).readUtf8String();
                         }
                         return cachedClassName;
+                    case "$moduleName":
+                        if (cachedModuleName === null) {
+                            cachedModuleName = api.class_getImageName(classHandle()).readUtf8String();
+                        }
+                        return cachedModuleName;
                     case "$protocols":
                         if (cachedProtocols === null) {
                             cachedProtocols = {};
@@ -2674,6 +2681,7 @@ function getApi() {
                 "objc_registerClassPair": ['void', ['pointer']],
                 "class_isMetaClass": ['bool', ['pointer']],
                 "class_getName": ['pointer', ['pointer']],
+                "class_getImageName": ['pointer', ['pointer']],
                 "class_copyProtocolList": ['pointer', ['pointer', 'pointer']],
                 "class_copyMethodList": ['pointer', ['pointer', 'pointer']],
                 "class_getClassMethod": ['pointer', ['pointer', 'pointer']],

test/basics.m

@@ -17,6 +17,7 @@
   TESTENTRY (kind_can_be_retrieved)
   TESTENTRY (super_can_be_retrieved)
   TESTENTRY (class_name_can_be_retrieved)
+  TESTENTRY (module_name_can_be_retrieved)
   TESTENTRY (protocols_can_be_retrieved)
   TESTENTRY (all_method_names_can_be_retrieved)
   TESTENTRY (own_method_names_can_be_retrieved)
@@ -218,6 +219,19 @@ - (void)secret {}
   EXPECT_SEND_MESSAGE_WITH ("\"string\"");
 }
 
+TESTCASE (module_name_can_be_retrieved)
+{
+  COMPILE_AND_LOAD_SCRIPT (
+      "var NSString = ObjC.classes.NSString;"
+      "var badger = NSString.stringWithString_(\"badger\");"
+      "send(NSString.$moduleName);"
+      "send(badger.$moduleName);");
+  EXPECT_SEND_MESSAGE_WITH ("\"/System/Library/Frameworks"
+      "/Foundation.framework/Versions/C/Foundation\"");
+  EXPECT_SEND_MESSAGE_WITH ("\"/System/Library/Frameworks"
+      "/CoreFoundation.framework/Versions/A/CoreFoundation\"");
+}
+
 TESTCASE (protocols_can_be_retrieved)
 {
   COMPILE_AND_LOAD_SCRIPT (