-/* Cycript - Inlining/Optimizing JavaScript Compiler
- * Copyright (C) 2009 Jay Freeman (saurik)
+/* Cycript - Optimizing JavaScript Compiler/Runtime
+ * Copyright (C) 2009-2013 Jay Freeman (saurik)
*/
-/* Modified BSD License {{{ */
+/* GNU General Public License, Version 3 {{{ */
/*
- * Redistribution and use in source and binary
- * forms, with or without modification, are permitted
- * provided that the following conditions are met:
+ * Cycript is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published
+ * by the Free Software Foundation, either version 3 of the License,
+ * or (at your option) any later version.
*
- * 1. Redistributions of source code must retain the
- * above copyright notice, this list of conditions
- * and the following disclaimer.
- * 2. Redistributions in binary form must reproduce the
- * above copyright notice, this list of conditions
- * and the following disclaimer in the documentation
- * and/or other materials provided with the
- * distribution.
- * 3. The name of the author may not be used to endorse
- * or promote products derived from this software
- * without specific prior written permission.
+ * Cycript 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 General Public License for more details.
*
- * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS''
- * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING,
- * BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
- * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE
- * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
- * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
- * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
- * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
- * LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR
- * TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
- * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
- * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-*/
+ * You should have received a copy of the GNU General Public License
+ * along with Cycript. If not, see <http://www.gnu.org/licenses/>.
+**/
/* }}} */
#include <dlfcn.h>
+
#include <mach/mach.h>
-extern "C" {
-#include <mach-o/nlist.h>
-}
+#ifdef __APPLE__
+#include "TargetConditionals.h"
+#endif
+
+#ifdef TARGET_OS_IPHONE
+#include <mach/vm_map.h>
+#define mach_vm_allocate vm_allocate
+#define mach_vm_protect vm_protect
+#define mach_vm_write vm_write
+#define mach_vm_address_t vm_address_t
+#else
+#include <mach/mach_vm.h>
+#endif
+
+#include <mach/machine/thread_status.h>
#include <cstdio>
#include <pthread.h>
#include "Pooling.hpp"
#include "Trampoline.t.hpp"
-extern "C" void __pthread_set_self(pthread_t);
-
-template <typename Type_>
-static void nlset(Type_ &function, struct nlist *nl, size_t index) {
- struct nlist &name(nl[index]);
- uintptr_t value(name.n_value);
- _assert(value != 0);
- if ((name.n_desc & N_ARM_THUMB_DEF) != 0)
- value |= 0x00000001;
- function = value;
-}
+extern "C" void CYHandleServer(pid_t);
void InjectLibrary(pid_t pid) {
- // XXX: break this into the build environment
- const char *library("/usr/lib/libcycript.dylib");
-
- static const size_t Stack_(8 * 1024);
- size_t length(strlen(library) + 1), depth(sizeof(Baton) + length);
- depth = (depth + sizeof(uintptr_t) + 1) / sizeof(uintptr_t) * sizeof(uintptr_t);
-
- CYPool pool;
- uint8_t *local(reinterpret_cast<uint8_t *>(apr_palloc(pool, depth)));
- Baton *baton(reinterpret_cast<Baton *>(local));
-
- uintptr_t set_self_internal;
- uintptr_t set_self_external;
-
-#if defined(__i386__) || defined(__arm__)
- struct nlist nl[3];
- memset(nl, 0, sizeof(nl));
- nl[0].n_un.n_name = (char *) "__pthread_set_self";
- nl[1].n_un.n_name = (char *) "___pthread_set_self";
- nlist("/usr/lib/libSystem.B.dylib", nl);
- nlset(set_self_internal, nl, 0);
- nlset(set_self_external, nl, 1);
-#else
- set_self_internal = 0;
- set_self_external = 0;
-#endif
-
- baton->_pthread_set_self = reinterpret_cast<void (*)(pthread_t)>(reinterpret_cast<uintptr_t>(&__pthread_set_self) - set_self_external + set_self_internal);
-
- baton->pthread_create = &pthread_create;
- baton->pthread_join = &pthread_join;
-
- baton->dlopen = &dlopen;
- baton->dlsym = &dlsym;
-
- baton->mach_thread_self = &mach_thread_self;
- baton->thread_terminate = &thread_terminate;
-
- baton->pid = getpid();
- memcpy(baton->library, library, length);
-
- vm_size_t size(depth + Stack_);
+ Dl_info addr;
+ _assert(dladdr(reinterpret_cast<void *>(&CYHandleServer), &addr) != 0);
+ const char *library(addr.dli_fname);
mach_port_t self(mach_task_self()), task;
_krncall(task_for_pid(self, pid, &task));
- vm_address_t stack;
- _krncall(vm_allocate(task, &stack, size, true));
- vm_address_t data(stack + Stack_);
-
- vm_write(task, data, reinterpret_cast<vm_address_t>(baton), depth);
+ mach_msg_type_number_t count;
- vm_address_t code;
- _krncall(vm_allocate(task, &code, sizeof(Trampoline_), true));
- vm_write(task, code, reinterpret_cast<vm_address_t>(Trampoline_), sizeof(Trampoline_));
- _krncall(vm_protect(task, code, sizeof(Trampoline_), false, VM_PROT_READ | VM_PROT_EXECUTE));
+ task_dyld_info info;
+ count = TASK_DYLD_INFO_COUNT;
+ _krncall(task_info(task, TASK_DYLD_INFO, reinterpret_cast<task_info_t>(&info), &count));
+ _assert(count == TASK_DYLD_INFO_COUNT);
+ _assert(info.all_image_info_addr != 0);
thread_act_t thread;
_krncall(thread_create(task, &thread));
- thread_state_flavor_t flavor;
- mach_msg_type_number_t count;
+#if defined (__i386__) || defined(__x86_64__)
+ x86_thread_state_t state;
+#elif defined(__arm__)
+ arm_thread_state_t state;
+#else
+ #error XXX: implement
+#endif
+
+ memset(&state, 0, sizeof(state));
+ mach_msg_type_number_t read(MACHINE_THREAD_STATE_COUNT);
+ _krncall(thread_get_state(thread, MACHINE_THREAD_STATE, reinterpret_cast<thread_state_t>(&state), &read));
+ _assert(read == MACHINE_THREAD_STATE_COUNT);
+
+ Trampoline *trampoline;
+ size_t align;
size_t push;
-#if defined(__arm__)
- arm_thread_state_t state;
- flavor = ARM_THREAD_STATE;
- count = ARM_THREAD_STATE_COUNT;
+#if defined(__i386__) || defined(__x86_64__)
+ switch (state.tsh.flavor) {
+ case i386_THREAD_STATE:
+ trampoline = &Trampoline_i386_;
+ align = 4;
+ push = 5;
+ break;
+ case x86_THREAD_STATE64:
+ trampoline = &Trampoline_x86_64_;
+ align = 8;
+ push = 2;
+ break;
+ default:
+ _assert(false);
+ }
+#elif defined(__arm__)
+ trampoline = &Trampoline_armv6_;
+ align = 4;
push = 0;
-#elif defined(__i386__) || defined(__x86_64__)
- i386_thread_state_t state;
- flavor = i386_THREAD_STATE;
- count = i386_THREAD_STATE_COUNT;
- push = 5;
#else
#error XXX: implement
#endif
- uintptr_t frame[push];
- if (sizeof(frame) != 0)
- memset(frame, 0, sizeof(frame));
+ static const size_t Stack_(8 * 1024);
+ size_t length(strlen(library) + 1), depth(sizeof(Baton) + length);
+ depth = (depth + align + 1) / align * align;
- memset(&state, 0, sizeof(state));
+ CYPool pool;
+ uint8_t *local(pool.malloc<uint8_t>(depth));
+ Baton *baton(reinterpret_cast<Baton *>(local));
- mach_msg_type_number_t read(count);
- _krncall(thread_get_state(thread, flavor, reinterpret_cast<thread_state_t>(&state), &read));
- _assert(count == count);
+ baton->dyld = info.all_image_info_addr;
+ baton->pid = getpid();
+ memcpy(baton->library, library, length);
-#if defined(__arm__)
- state.r[0] = data;
- state.sp = stack + Stack_;
- state.pc = code;
+ mach_vm_size_t size(depth + Stack_);
+ mach_vm_address_t stack;
+ _krncall(mach_vm_allocate(task, &stack, size, true));
- if ((state.pc & 0x1) != 0) {
- state.pc &= ~0x1;
- state.cpsr |= 0x20;
- }
-#elif defined(__i386__) || defined(__x86_64__)
- frame[0] = 0;
- frame[1] = data;
+ mach_vm_address_t data(stack + Stack_);
+ _krncall(mach_vm_write(task, data, reinterpret_cast<mach_vm_address_t>(baton), depth));
- state.__eip = code;
- state.__esp = stack + Stack_ - sizeof(frame);
+ mach_vm_address_t code;
+ _krncall(mach_vm_allocate(task, &code, trampoline->size_, true));
+ _krncall(mach_vm_write(task, code, reinterpret_cast<mach_vm_address_t>(trampoline->data_), trampoline->size_));
+ _krncall(mach_vm_protect(task, code, trampoline->size_, false, VM_PROT_READ | VM_PROT_EXECUTE));
+
+ uint32_t frame[push];
+ if (sizeof(frame) != 0)
+ memset(frame, 0, sizeof(frame));
+
+#if defined(__i386__) || defined(__x86_64__)
+ switch (state.tsh.flavor) {
+ case i386_THREAD_STATE:
+ frame[1] = data;
+ state.uts.ts32.__eip = code + trampoline->entry_;
+ state.uts.ts32.__esp = stack + Stack_ - sizeof(frame);
+ break;
+ case x86_THREAD_STATE64:
+ state.uts.ts64.__rdi = data;
+ state.uts.ts64.__rip = code + trampoline->entry_;
+ state.uts.ts64.__rsp = stack + Stack_ - sizeof(frame);
+ break;
+ default:
+ _assert(false);
+ }
+#elif defined(__arm__)
+ state.__r[0] = data;
+ state.__pc = code + trampoline->entry_;
+ state.__sp = stack + Stack_ - sizeof(frame);
+
+ if ((state.__pc & 0x1) != 0) {
+ state.__pc &= ~0x1;
+ state.__cpsr |= 0x20;
+ }
#else
#error XXX: implement
#endif
if (sizeof(frame) != 0)
- vm_write(task, stack + Stack_ - sizeof(frame), reinterpret_cast<vm_address_t>(frame), sizeof(frame));
+ _krncall(mach_vm_write(task, stack + Stack_ - sizeof(frame), reinterpret_cast<mach_vm_address_t>(frame), sizeof(frame)));
- _krncall(thread_set_state(thread, flavor, reinterpret_cast<thread_state_t>(&state), count));
+ _krncall(thread_set_state(thread, MACHINE_THREAD_STATE, reinterpret_cast<thread_state_t>(&state), MACHINE_THREAD_STATE_COUNT));
_krncall(thread_resume(thread));
_krncall(mach_port_deallocate(self, task));