libcycript.cy

   1 /* Cycript - Optimizing JavaScript Compiler/Runtime
   2  * Copyright (C) 2009-2015  Jay Freeman (saurik)
   3 */
   4
   5 /* GNU Affero General Public License, Version 3 {{{ */
   6 /*
   7  * This program is free software: you can redistribute it and/or modify
   8  * it under the terms of the GNU Affero General Public License as published by
   9  * the Free Software Foundation, either version 3 of the License, or
  10  * (at your option) any later version.
  11
  12  * This program is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15  * GNU Affero General Public License for more details.
  16
  17  * You should have received a copy of the GNU Affero General Public License
  18  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
  19 **/
  20 /* }}} */
  21
  22 var process = {
  23     env: {},
  24 };
  25
  26 (function() {
  27
  28 let $cy_set = function(object, properties) {
  29     for (const name in properties)
  30         Object.defineProperty(object, name, {
  31             configurable: true,
  32             enumerable: false,
  33             writable: true,
  34             value: properties[name],
  35         });
  36 };
  37
  38 const F_OK = 0;
  39 const X_OK = (1<<0);
  40 const W_OK = (1<<1);
  41 const R_OK = (1<<2);
  42
  43 typedef long size_t;
  44
  45 extern "C" int access(const char *path, int amode);
  46 extern "C" char *getcwd(char *buf, size_t size);
  47 extern "C" int getpid();
  48
  49 $cy_set(Date.prototype, {
  50     toCYON: function() {
  51         return `new ${this.constructor.name}(${this.toUTCString().toCYON()})`;
  52     },
  53 });
  54
  55 $cy_set(Error.prototype, {
  56     toCYON: function() {
  57         let stack = this.stack.split('\n');
  58         if (stack.slice(-1)[0] == "global code")
  59             stack = stack.slice(0, -1);
  60         for (let i = 0; i != stack.length; ++i)
  61             stack[i] = '\n    ' + stack[i];
  62         return `new ${this.constructor.name}(${this.message.toCYON()}) /*${stack.join('')} */`;
  63     },
  64 });
  65
  66 let IsFile = function(path) {
  67     // XXX: this doesn't work on symlinks, but I don't want to fix stat :/
  68     return access(path, F_OK) == 0 && access(path + '/', F_OK) == -1;
  69 };
  70
  71 let StartsWith = function(lhs, rhs) {
  72     return lhs.substring(0, rhs.length) == rhs;
  73 };
  74
  75 let ResolveFile = function(exact, name) {
  76     if (exact && IsFile(name))
  77         return name;
  78     for (let suffix of ['.js', '.json'])
  79         if (IsFile(name + suffix))
  80             return name + suffix;
  81     return null;
  82 };
  83
  84
  85 let GetLibraryPath = function() {
  86     let handle = dlopen("/usr/lib/libcycript.dylib", RTLD_NOLOAD);
  87     if (handle == null)
  88         return null;
  89
  90     try {
  91         let CYHandleServer = dlsym(handle, "CYHandleServer");
  92         if (CYHandleServer == null)
  93             return null;
  94
  95         let info = new Dl_info;
  96         if (dladdr(CYHandleServer, info) == 0)
  97             return null;
  98
  99         let path = info->dli_fname;
 100         let slash = path.lastIndexOf('/');
 101         if (slash == -1)
 102             return null;
 103
 104         return path.substr(0, slash);
 105     } finally {
 106         dlclose(handle);
 107     }
 108 };
 109
 110 let ResolveFolder = function(name) {
 111     if (access(name + '/', F_OK) == -1)
 112         return null;
 113
 114     if (IsFile(name + "/package.json")) {
 115         let package = require(name + "/package.json");
 116         let path = ResolveFile(true, name + "/" + package.main);
 117         if (path != null)
 118             return path;
 119     }
 120
 121     return ResolveFile(false, name + "/index");
 122 };
 123
 124 let ResolveEither = function(name) {
 125     let path = null;
 126     if (path == null)
 127         path = ResolveFile(true, name);
 128     if (path == null)
 129         path = ResolveFolder(name);
 130     return path;
 131 };
 132
 133 require.resolve = function(name) {
 134     if (StartsWith(name, '/')) {
 135         let path = ResolveEither(name);
 136         if (path != null)
 137             return path;
 138     } else {
 139         let cwd = new (typedef char[1024]);
 140         cwd = getcwd(cwd, cwd.length).toString();
 141         cwd = cwd.split('/');
 142
 143         if (StartsWith(name, './') || StartsWith(name, '../')) {
 144             let path = ResolveEither(cwd + '/' + name);
 145             if (path != null)
 146                 return path;
 147         } else {
 148             for (let i = cwd.length; i != 0; --i) {
 149                 let modules = cwd.slice(0, i).concat("node_modules").join('/');
 150                 let path = ResolveEither(modules + "/" + name);
 151                 if (path != null)
 152                     return path;
 153             }
 154
 155             let library = GetLibraryPath();
 156             let path = ResolveFile(true, library + "/cycript0.9/" + name + ".cy");
 157             if (path != null)
 158                 return path;
 159         }
 160     }
 161
 162     throw new Error("Cannot find module '" + name + "'");
 163 };
 164
 165 var bindings = {};
 166
 167 process.binding = function(name) {
 168     let binding = bindings[name];
 169     if (typeof binding != 'undefined')
 170         return binding;
 171
 172     switch (name) {
 173         case 'buffer': binding = {
 174             setupBufferJS() {
 175             },
 176         }; break;
 177
 178         case 'cares_wrap': binding = {
 179         }; break;
 180
 181         case 'constants': binding = {
 182         }; break;
 183
 184         case 'fs': binding = {
 185             FSInitialize() {
 186             },
 187
 188             lstat() {
 189                 throw new Error("stat(" + arguments[0] + ")");
 190             },
 191         }; break;
 192
 193         case 'pipe_wrap': binding = {
 194         }; break;
 195
 196         case 'smalloc': binding = {
 197             alloc() {
 198             },
 199         }; break;
 200
 201         case 'stream_wrap': binding = {
 202         }; break;
 203
 204         case 'tcp_wrap': binding = {
 205         }; break;
 206
 207         case 'timer_wrap': binding = {
 208             kOnTimeout: 0,
 209             Timer: {
 210             },
 211         }; break;
 212
 213         case 'tty_wrap': binding = {
 214         }; break;
 215
 216         case 'uv': binding = {
 217         }; break;
 218
 219         default:
 220             throw new Error('No such module: ' + name);
 221     }
 222
 223     bindings[name] = binding;
 224     return binding;
 225 };
 226
 227 let environ = *(typedef char ***)(dlsym(RTLD_DEFAULT, "environ"));
 228 for (let i = 0; environ[i] != null; ++i) {
 229     let assign = environ[i];
 230     let equal = assign.indexOf('=');
 231     let name = assign.substr(0, equal);
 232     let value = assign.substr(equal + 1);
 233     process.env[name.toString()] = value;
 234 }
 235
 236 process.pid = getpid();
 237
 238 })();