]> git.saurik.com Git - cycript.git/blobdiff - libcycript.cy
Avoid naming functors without symbols as just "1".
[cycript.git] / libcycript.cy
index e9a612f04549da3156eb4d65b182c82ff74ab371..57e8894a79ba7efaf966f597360dd424514a2e73 100644 (file)
@@ -1,3 +1,30 @@
+/* Cycript - The Truly Universal Scripting Language
+ * Copyright (C) 2009-2016  Jay Freeman (saurik)
+*/
+
+/* GNU Affero General Public License, Version 3 {{{ */
+/*
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU Affero General Public License as published by
+ * the Free Software Foundation, either version 3 of the License, or
+ * (at your option) any later version.
+
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU Affero General Public License for more details.
+
+ * You should have received a copy of the GNU Affero General Public License
+ * along with this program.  If not, see <http://www.gnu.org/licenses/>.
+**/
+/* }}} */
+
+(function() {
+
+this.typeid = function(object) {
+    return object.$cyt;
+};
+
 let $cy_set = function(object, properties) {
     for (const name in properties)
         Object.defineProperty(object, name, {
@@ -8,6 +35,12 @@ let $cy_set = function(object, properties) {
         });
 };
 
+$cy_set(Boolean.prototype, {
+    toCYON: function() {
+        return `new Boolean(${this.toString()})`;
+    },
+});
+
 $cy_set(Date.prototype, {
     toCYON: function() {
         return `new ${this.constructor.name}(${this.toUTCString().toCYON()})`;
@@ -16,6 +49,397 @@ $cy_set(Date.prototype, {
 
 $cy_set(Error.prototype, {
     toCYON: function() {
-        return `new ${this.constructor.name}(${this.message.toCYON()})`;
+        let stack = this.stack;
+        if (typeof stack == 'undefined')
+            stack = '';
+        else {
+            stack = stack.split('\n');
+            if (stack.slice(-1)[0] == "global code")
+                stack = stack.slice(0, -1);
+            for (let i = 0; i != stack.length; ++i)
+                stack[i] = '\n    ' + stack[i];
+            if (stack.length == 0)
+                stack = '';
+            else {
+                stack = stack.join('');
+                stack = ` /*${stack} */`;
+            }
+        }
+        return `new ${this.constructor.name}(${this.message.toCYON()})${stack}`;
+    },
+});
+
+$cy_set(Number.prototype, {
+    toCYON: function() {
+        if ("$cyt" in this)
+            return `${this.$cyt.toCYON()}(${this.toString()})`;
+        return `new Number(${this.toString()})`;
     },
 });
+
+$cy_set(RegExp.prototype, {
+    toCYON: function() {
+        return this.toString();
+    },
+});
+
+// XXX: Java should just always be available
+if ("Java" in Cycript) {
+
+// XXX: this is a half-assed EventEmitter
+// XXX: this doesn't even have the same semantics
+
+Java.handlers_ = {};
+
+Java.on = function(event, handler) {
+    var handlers;
+    if (event in this.handlers_)
+        handlers = this.handlers_[event];
+    else {
+        handlers = [];
+        this.handlers_[event] = handlers;
+    }
+
+    if (this.handlers_ == null)
+        handler();
+    else
+        handlers.push(handler);
+};
+
+Java.emit = function(event) {
+    if (event in this.handlers_) {
+        var handlers = this.handlers_[event];
+        if (handlers != null)
+            for (var handler of handlers)
+                handler();
+    }
+
+    this.handlers_[event] = null;
+};
+
+Java.on('setup', function() {
+    $cy_set(java.lang.Boolean.prototype, {
+        toCYON: function() {
+            return `new java.lang.Boolean(${this->value})`;
+        },
+    });
+
+    $cy_set(java.lang.Byte.prototype, {
+        toCYON: function() {
+            return `new java.lang.Byte(${this->value})`;
+        },
+    });
+
+    $cy_set(java.lang.Character.prototype, {
+        toCYON: function() {
+            return `new java.lang.Character(${this->value})`;
+        },
+    });
+
+    $cy_set(java.lang.Short.prototype, {
+        toCYON: function() {
+            return `new java.lang.Short(${this->value})`;
+        },
+    });
+
+    $cy_set(java.lang.Integer.prototype, {
+        toCYON: function() {
+            return `new java.lang.Integer(${this->value})`;
+        },
+    });
+
+    $cy_set(java.lang.Long.prototype, {
+        toCYON: function() {
+            return `new java.lang.Long(${this->value})`;
+        },
+    });
+
+    $cy_set(java.lang.Float.prototype, {
+        toCYON: function() {
+            return `new java.lang.Float(${this->value})`;
+        },
+    });
+
+    $cy_set(java.lang.Double.prototype, {
+        toCYON: function() {
+            return `new java.lang.Double(${this->value})`;
+        },
+    });
+
+    $cy_set(java.lang.Object.prototype, {
+        toCYON: function(key) {
+            return "#" + this.toString().toCYON();
+        },
+
+        // XXX: due to lack of interface prototypes :(
+        $cyg: function(key) {
+            return this.get(key);
+        },
+
+        // XXX: due to lack of interface prototypes :(
+        $cys: function(key, value) {
+            if ("set" in this)
+                this.set(key, value);
+            else
+                this.put(key, value);
+        },
+    });
+});
+
+}
+
+if ("ObjectiveC" in Cycript) {
+    $cy_set(NSArray.prototype, {
+        $cyg: function(key) {
+            return objc_msgSend(this, "objectAtIndex:", key);
+        },
+
+        $cys: function(key, value) {
+            return objc_msgSend(this, "setObject:atIndex:", value, key);
+        },
+    });
+
+    $cy_set(NSDictionary.prototype, {
+        $cyg: function(key) {
+            return objc_msgSend(this, "objectForKey:", key);
+        },
+
+        $cys: function(key, value) {
+            return objc_msgSend(this, "setObject:forKey:", value, key);
+        },
+    });
+}
+
+let IsFile = function(path) {
+    // XXX: this doesn't work on symlinks, but I don't want to fix stat :/
+    return access(path, F_OK) == 0 && access(path + '/', F_OK) == -1;
+};
+
+let StartsWith = function(lhs, rhs) {
+    return lhs.substring(0, rhs.length) == rhs;
+};
+
+let ResolveFile = function(exact, name) {
+    if (exact && IsFile(name))
+        return name;
+    for (let suffix of ['.js', '.json'])
+        if (IsFile(name + suffix))
+            return name + suffix;
+    return null;
+};
+
+
+let GetLibraryPath = function() {
+    let handle = dlopen("/usr/lib/libcycript.dylib", RTLD_NOLOAD);
+    if (handle == null)
+        return null;
+
+    try {
+        let CYHandleServer = dlsym(handle, "CYHandleServer");
+        if (CYHandleServer == null)
+            return null;
+
+        let info = new Dl_info;
+        if (dladdr(CYHandleServer, info) == 0)
+            return null;
+
+        let path = info->dli_fname;
+        let slash = path.lastIndexOf('/');
+        if (slash == -1)
+            return null;
+
+        path = path.substr(0, slash);
+
+        GetLibraryPath = function() {
+            return path;
+        };
+
+        return GetLibraryPath();
+    } finally {
+        dlclose(handle);
+    }
+};
+
+let ResolveFolder = function(name) {
+    if (access(name + '/', F_OK) == -1)
+        return null;
+
+    if (IsFile(name + "/package.json")) {
+        let package = require(name + "/package.json");
+        let path = ResolveFile(true, name + "/" + package.main);
+        if (path != null)
+            return path;
+    }
+
+    return ResolveFile(false, name + "/index");
+};
+
+let ResolveEither = function(name) {
+    let path = null;
+    if (path == null)
+        path = ResolveFile(true, name);
+    if (path == null)
+        path = ResolveFolder(name);
+    return path;
+};
+
+require.resolve = function(name) {
+    if (StartsWith(name, '/')) {
+        let path = ResolveEither(name);
+        if (path != null)
+            return path;
+    } else {
+        let cwd = new (typedef char[1024]);
+        cwd = getcwd(cwd, cwd.length).toString();
+        cwd = cwd.split('/');
+
+        if (StartsWith(name, './') || StartsWith(name, '../')) {
+            let path = ResolveEither(cwd + '/' + name);
+            if (path != null)
+                return path;
+        } else {
+            for (let i = cwd.length; i != 0; --i) {
+                let modules = cwd.slice(0, i).concat("node_modules").join('/');
+                let path = ResolveEither(modules + "/" + name);
+                if (path != null)
+                    return path;
+            }
+
+            let library = GetLibraryPath();
+            let path = ResolveFile(true, library + "/cycript0.9/" + name + ".cy");
+            if (path != null)
+                return path;
+        }
+    }
+
+    throw new Error("Cannot find module '" + name + "'");
+};
+
+var _syscall = function(value) {
+    if (value == -1)
+        throw new Error(strerror(errno));
+};
+
+var info = *new (struct stat);
+if (false) {
+} else if ("st_atim" in info) {
+    var st_atime = "st_atim";
+    var st_mtime = "st_mtim";
+    var st_ctime = "st_ctim";
+} else if ("st_atimespec" in info) {
+    var st_atime = "st_atimespec";
+    var st_mtime = "st_mtimespec";
+    var st_ctime = "st_ctimespec";
+} else {
+    var st_atime = "st_atime";
+    var st_mtime = "st_mtime";
+    var st_ctime = "st_ctime";
+}
+
+var toDate = function(timespec) {
+    return new Date(timespec.tv_sec * 1000 + timespec.tv_nsec / 1000);
+};
+
+var bindings = {};
+
+process.binding = function(name) {
+    let binding = bindings[name];
+    if (typeof binding != 'undefined')
+        return binding;
+
+    switch (name) {
+        case 'buffer': binding = {
+            setupBufferJS() {
+            },
+        }; break;
+
+        case 'cares_wrap': binding = {
+        }; break;
+
+        case 'constants': binding = {
+        }; break;
+
+        case 'fs': binding = {
+            FSInitialize() {
+            },
+
+            lstat(path) {
+                var info = new (struct stat);
+                _syscall(lstat(path, info));
+
+                return {
+                    dev: info->st_dev,
+                    mode: info->st_mode,
+                    nlink: info->st_nlink,
+                    uid: info->st_uid,
+                    gid: info->st_gid,
+                    rdev: info->st_rdev,
+                    blksize: info->st_blksize,
+                    ino: info->st_ino,
+                    size: info->st_size,
+                    blocks: info->st_blocks,
+
+                    atime: toDate(info->[st_atime]),
+                    mtime: toDate(info->[st_mtime]),
+                    ctime: toDate(info->[st_ctime]),
+
+                    isSymbolicLink() {
+                        return S_ISLNK(this.mode);
+                    },
+                };
+            },
+        }; break;
+
+        case 'pipe_wrap': binding = {
+        }; break;
+
+        case 'smalloc': binding = {
+            alloc() {
+            },
+        }; break;
+
+        case 'stream_wrap': binding = {
+        }; break;
+
+        case 'tcp_wrap': binding = {
+        }; break;
+
+        case 'timer_wrap': binding = {
+            kOnTimeout: 0,
+            Timer: {
+            },
+        }; break;
+
+        case 'tty_wrap': binding = {
+        }; break;
+
+        case 'uv': binding = {
+        }; break;
+
+        default:
+            throw new Error('No such module: ' + name);
+    }
+
+    bindings[name] = binding;
+    return binding;
+};
+
+process.env = {};
+
+let environ = *(typedef char ***)(dlsym(RTLD_DEFAULT, "environ"));
+for (let i = 0; environ[i] != null; ++i) {
+    let assign = environ[i];
+    let equal = assign.indexOf('=');
+    let name = assign.substr(0, equal);
+    let value = assign.substr(equal + 1);
+    process.env[name.toString()] = value;
+}
+
+process.cwd = function() {
+    let cwd = new (typedef char[1024]);
+    return getcwd(cwd, cwd.length).toString();
+};
+
+process.pid = getpid();
+
+})();