+#include <stdio.h>
+#include <err.h>
+#include <crt_externs.h>
+#include <string.h>
+#include <mach/mach.h>
+#include <mach-o/ldsyms.h>
+#include <mach-o/dyld_images.h>
+#include <stdlib.h>
+
+__attribute__((constructor))
+void init(int argc, const char *argv[], const char *envp[], const char *appl[], void *vars __attribute__((unused))) {
+ int i;
+
+ printf("argv = %p\n", argv);
+ for (i=0; argv[i]; i++) {
+ printf("argv[%2d] = %p %.100s%s\n", i, argv[i], argv[i], strlen(argv[i]) > 100 ? "..." : "");
+ }
+ printf("envp = %p\n", envp);
+ for (i=0; envp[i]; i++) {
+ printf("envp[%2d] = %p %.100s%s\n", i, envp[i], envp[i], strlen(envp[i]) > 100 ? "..." : "");
+ }
+ printf("appl = %p\n", appl);
+ for (i=0; appl[i]; i++) {
+ printf("appl[%2d] = %p %.100s%s\n", i, appl[i], appl[i], strlen(appl[i]) > 100 ? "..." : "");
+ }
+}
+
+void printexecinfo(void)
+{
+ int ret;
+ uint64_t stackaddr;
+ size_t len = sizeof(stackaddr);
+
+ printf("executable load address = 0x%016llx\n", (uint64_t)(uintptr_t)&_mh_execute_header);
+
+ ret = sysctlbyname("kern.usrstack64", &stackaddr, &len, NULL, 0);
+ if (ret == -1)
+ err(1, "sysctlbyname");
+
+ printf(" stack address = 0x%016llx\n", stackaddr);
+}
+
+void printdyldinfo(void)
+{
+ task_dyld_info_data_t info;
+ mach_msg_type_number_t size = TASK_DYLD_INFO_COUNT;
+ kern_return_t kret;
+ struct dyld_all_image_infos *all_image_infos;
+
+ kret = task_info(mach_task_self(), TASK_DYLD_INFO,
+ (void *)&info, &size);
+ if (kret != KERN_SUCCESS)
+ errx(1, "task_info: %s", mach_error_string(kret));
+
+ all_image_infos = (struct dyld_all_image_infos *)(uintptr_t)info.all_image_info_addr;
+
+ printf(" dyld load address = 0x%016llx\n", (uint64_t)(uintptr_t)all_image_infos->dyldImageLoadAddress);
+ printf(" shared cache slide = 0x%016llx\n", (uint64_t)(uintptr_t)all_image_infos->sharedCacheSlide);
+
+}
+
+int main(int argc, char *argv[]) {
+
+ printexecinfo();
+ printdyldinfo();
+
+ return 0;
+}