Remove some thankfully now-obsolete UNIX includes.

[ldid.git] / ldid.cpp

diff --git a/ldid.cpp b/ldid.cpp
index 6250a7de522f703d39e610824796b6f4e2735485..7e56f145c6b0bff5a60314d38e4fcd4d5c7d3fe6 100644 (file)
--- a/ldid.cpp
+++ b/ldid.cpp
@@ -2,18 +2,19 @@
  * Copyright (C) 2007-2012  Jay Freeman (saurik)
 */
 
  * Copyright (C) 2007-2012  Jay Freeman (saurik)
 */
 

-/* GNU Lesser General Public License, Version 3 {{{ */
-/* This program is free software: you can redistribute it and/or modify
- * it under the terms of the GNU General Public License as published by
+/* 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.
  * 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
  * 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 General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License
+ * 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/>.
 **/
 /* }}} */
  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
 **/
 /* }}} */


@@ -22,16 +23,14 @@
 #include "minimal/string.h"
 #include "minimal/mapping.h"
 
 #include "minimal/string.h"
 #include "minimal/mapping.h"
 

+extern "C" {

 #include "sha1.h"
 #include "sha1.h"

+}

 
 #include <cstring>
 #include <string>
 #include <vector>
 
 
 #include <cstring>
 #include <string>
 #include <vector>
 

-#include <sys/wait.h>
-#include <sys/types.h>
-#include <sys/stat.h>
-

 struct fat_header {
     uint32_t magic;
     uint32_t nfat_arch;
 struct fat_header {
     uint32_t magic;
     uint32_t nfat_arch;


@@ -66,6 +65,7 @@ struct mach_header {
 
 #define MH_DYLDLINK   0x4
 
 
 #define MH_DYLDLINK   0x4
 

+#define MH_OBJECT     0x1

 #define MH_EXECUTE    0x2
 #define MH_DYLIB      0x6
 #define MH_BUNDLE     0x8
 #define MH_EXECUTE    0x2
 #define MH_DYLIB      0x6
 #define MH_BUNDLE     0x8


@@ -276,6 +276,30 @@ struct encryption_info_command {
     uint32_t cryptid;
 } _packed;
 
     uint32_t cryptid;
 } _packed;
 

+#define BIND_OPCODE_MASK                             0xf0
+#define BIND_IMMEDIATE_MASK                          0x0f
+#define BIND_OPCODE_DONE                             0x00
+#define BIND_OPCODE_SET_DYLIB_ORDINAL_IMM            0x10
+#define BIND_OPCODE_SET_DYLIB_ORDINAL_ULEB           0x20
+#define BIND_OPCODE_SET_DYLIB_SPECIAL_IMM            0x30
+#define BIND_OPCODE_SET_SYMBOL_TRAILING_FLAGS_IMM    0x40
+#define BIND_OPCODE_SET_TYPE_IMM                     0x50
+#define BIND_OPCODE_SET_ADDEND_SLEB                  0x60
+#define BIND_OPCODE_SET_SEGMENT_AND_OFFSET_ULEB      0x70
+#define BIND_OPCODE_ADD_ADDR_ULEB                    0x80
+#define BIND_OPCODE_DO_BIND                          0x90
+#define BIND_OPCODE_DO_BIND_ADD_ADDR_ULEB            0xa0
+#define BIND_OPCODE_DO_BIND_ADD_ADDR_IMM_SCALED      0xb0
+#define BIND_OPCODE_DO_BIND_ULEB_TIMES_SKIPPING_ULEB 0xc0
+
+template <typename Type_>
+Type_ Align(Type_ value, size_t align) {
+    value += align - 1;
+    value /= align;
+    value *= align;
+    return value;
+}
+

 uint16_t Swap_(uint16_t value) {
     return
         ((value >>  8) & 0x00ff) |
 uint16_t Swap_(uint16_t value) {
     return
         ((value >>  8) & 0x00ff) |


@@ -290,6 +314,13 @@ uint32_t Swap_(uint32_t value) {
     return value;
 }
 
     return value;
 }
 

+uint64_t Swap_(uint64_t value) {
+    value = (value & 0x00000000ffffffff) << 32 | (value & 0xffffffff00000000) >> 32;
+    value = (value & 0x0000ffff0000ffff) << 16 | (value & 0xffff0000ffff0000) >> 16;
+    value = (value & 0x00ff00ff00ff00ff) << 8  | (value & 0xff00ff00ff00ff00) >> 8;
+    return value;
+}
+

 int16_t Swap_(int16_t value) {
     return Swap_(static_cast<uint16_t>(value));
 }
 int16_t Swap_(int16_t value) {
     return Swap_(static_cast<uint16_t>(value));
 }


@@ -298,6 +329,10 @@ int32_t Swap_(int32_t value) {
     return Swap_(static_cast<uint32_t>(value));
 }
 
     return Swap_(static_cast<uint32_t>(value));
 }
 

+int64_t Swap_(int64_t value) {
+    return Swap_(static_cast<uint64_t>(value));
+}
+

 bool little_(true);
 
 uint16_t Swap(uint16_t value) {
 bool little_(true);
 
 uint16_t Swap(uint16_t value) {


@@ -308,6 +343,10 @@ uint32_t Swap(uint32_t value) {
     return little_ ? Swap_(value) : value;
 }
 
     return little_ ? Swap_(value) : value;
 }
 

+uint64_t Swap(uint64_t value) {
+    return little_ ? Swap_(value) : value;
+}
+

 int16_t Swap(int16_t value) {
     return Swap(static_cast<uint16_t>(value));
 }
 int16_t Swap(int16_t value) {
     return Swap(static_cast<uint16_t>(value));
 }


@@ -316,6 +355,10 @@ int32_t Swap(int32_t value) {
     return Swap(static_cast<uint32_t>(value));
 }
 
     return Swap(static_cast<uint32_t>(value));
 }
 

+int64_t Swap(int64_t value) {
+    return Swap(static_cast<uint64_t>(value));
+}
+

 template <typename Target_>
 class Pointer;
 
 template <typename Target_>
 class Pointer;
 


@@ -343,6 +386,10 @@ class Data {
         return swapped_ ? Swap_(value) : value;
     }
 
         return swapped_ ? Swap_(value) : value;
     }
 

+    uint64_t Swap(uint64_t value) const {
+        return swapped_ ? Swap_(value) : value;
+    }
+

     int16_t Swap(int16_t value) const {
         return Swap(static_cast<uint16_t>(value));
     }
     int16_t Swap(int16_t value) const {
         return Swap(static_cast<uint16_t>(value));
     }


@@ -351,6 +398,10 @@ class Data {
         return Swap(static_cast<uint32_t>(value));
     }
 
         return Swap(static_cast<uint32_t>(value));
     }
 

+    int64_t Swap(int64_t value) const {
+        return Swap(static_cast<uint64_t>(value));
+    }
+

     void *GetBase() const {
         return base_;
     }
     void *GetBase() const {
         return base_;
     }


@@ -408,14 +459,22 @@ class MachHeader :
         return mach_header_;
     }
 
         return mach_header_;
     }
 

+    operator struct mach_header *() const {
+        return mach_header_;
+    }
+

     uint32_t GetCPUType() const {
         return Swap(mach_header_->cputype);
     }
 
     uint32_t GetCPUType() const {
         return Swap(mach_header_->cputype);
     }
 

-    uint16_t GetCPUSubtype() const {
+    uint32_t GetCPUSubtype() const {

         return Swap(mach_header_->cpusubtype) & 0xff;
     }
 
         return Swap(mach_header_->cpusubtype) & 0xff;
     }
 

+    struct load_command *GetLoadCommand() const {
+        return load_command_;
+    }
+

     std::vector<struct load_command *> GetLoadCommands() const {
         std::vector<struct load_command *> load_commands;
 
     std::vector<struct load_command *> GetLoadCommands() const {
         std::vector<struct load_command *> load_commands;
 


@@ -442,7 +501,7 @@ class MachHeader :
         return segment_commands;
     }
 
         return segment_commands;
     }
 

-    std::vector<segment_command_64 *> GetSegments64(const char *segment_name) {
+    std::vector<segment_command_64 *> GetSegments64(const char *segment_name) const {

         std::vector<struct segment_command_64 *> segment_commands;
 
         _foreach (load_command, GetLoadCommands()) {
         std::vector<struct segment_command_64 *> segment_commands;
 
         _foreach (load_command, GetLoadCommands()) {


@@ -571,6 +630,10 @@ class FatHeader :
     struct fat_header *operator ->() const {
         return fat_header_;
     }
     struct fat_header *operator ->() const {
         return fat_header_;
     }

+
+    operator struct fat_header *() const {
+        return fat_header_;
+    }

 };
 
 FatHeader Map(const char *path, bool ro = false) {
 };
 
 FatHeader Map(const char *path, bool ro = false) {


@@ -661,14 +724,16 @@ void sha1(uint8_t *hash, uint8_t *data, size_t size) {
 }
 
 struct CodesignAllocation {
 }
 
 struct CodesignAllocation {

-    uint32_t type_;
-    uint16_t subtype_;
-    size_t size_;
-
-    CodesignAllocation(uint32_t type, uint16_t subtype, size_t size) :
-        type_(type),
-        subtype_(subtype),
-        size_(size)
+    FatMachHeader mach_header_;
+    uint32_t offset_;
+    uint32_t size_;
+    uint32_t alloc_;
+
+    CodesignAllocation(FatMachHeader mach_header, size_t offset, size_t size, size_t alloc) :
+        mach_header_(mach_header),
+        offset_(offset),
+        size_(size),
+        alloc_(alloc)

     {
     }
 };
     {
     }
 };


@@ -705,6 +770,8 @@ int main(int argc, const char *argv[]) {
     uint32_t flag_CPUType(_not(uint32_t));
     uint32_t flag_CPUSubtype(_not(uint32_t));
 
     uint32_t flag_CPUType(_not(uint32_t));
     uint32_t flag_CPUSubtype(_not(uint32_t));
 

+    const char *flag_I(NULL);
+

     bool timeh(false);
     uint32_t timev(0);
 
     bool timeh(false);
     uint32_t timev(0);
 


@@ -781,6 +848,10 @@ int main(int argc, const char *argv[]) {
                 }
             } break;
 
                 }
             } break;
 

+            case 'I': {
+                flag_I = argv[argi] + 2;
+            } break;
+

             case 'n': {
                 char *arge;
                 noffset = strtoul(argv[argi] + 2, &arge, 0);
             case 'n': {
                 char *arge;
                 noffset = strtoul(argv[argi] + 2, &arge, 0);


@@ -815,10 +886,19 @@ int main(int argc, const char *argv[]) {
             base = path;
         }
 
             base = path;
         }
 

+        const char *name(flag_I ?: base);
+

         if (flag_r) {
             uint32_t clip(0); {
                 FatHeader fat_header(Map(path));
                 _foreach (mach_header, fat_header.GetMachHeaders()) {
         if (flag_r) {
             uint32_t clip(0); {
                 FatHeader fat_header(Map(path));
                 _foreach (mach_header, fat_header.GetMachHeaders()) {

+                    if (flag_A) {
+                        if (mach_header.GetCPUType() != flag_CPUType)
+                            continue;
+                        if (mach_header.GetCPUSubtype() != flag_CPUSubtype)
+                            continue;
+                    }
+

                     mach_header->flags = mach_header.Swap(mach_header.Swap(mach_header->flags) | MH_DYLDLINK);
 
                     uint32_t size(_not(uint32_t)); {
                     mach_header->flags = mach_header.Swap(mach_header.Swap(mach_header->flags) | MH_DYLDLINK);
 
                     uint32_t size(_not(uint32_t)); {


@@ -843,7 +923,7 @@ int main(int argc, const char *argv[]) {
 
                     _assert(size != _not(uint32_t));
 
 
                     _assert(size != _not(uint32_t));
 

-                    _foreach (segment, const_cast<FatMachHeader &>(mach_header).GetSegments("__LINKEDIT")) {
+                    _foreach (segment, mach_header.GetSegments("__LINKEDIT")) {

                         segment->filesize -= mach_header.GetSize() - size;
 
                         if (fat_arch *fat_arch = mach_header.GetFatArch()) {
                         segment->filesize -= mach_header.GetSize() - size;
 
                         if (fat_arch *fat_arch = mach_header.GetFatArch()) {


@@ -853,7 +933,7 @@ int main(int argc, const char *argv[]) {
                             clip = std::max(clip, size);
                     }
 
                             clip = std::max(clip, size);
                     }
 

-                    _foreach (segment, const_cast<FatMachHeader &>(mach_header).GetSegments64("__LINKEDIT")) {
+                    _foreach (segment, mach_header.GetSegments64("__LINKEDIT")) {

                         segment->filesize -= mach_header.GetSize() - size;
 
                         if (fat_arch *fat_arch = mach_header.GetFatArch()) {
                         segment->filesize -= mach_header.GetSize() - size;
 
                         if (fat_arch *fat_arch = mach_header.GetFatArch()) {


@@ -865,19 +945,27 @@ int main(int argc, const char *argv[]) {
                 }
             }
 
                 }
             }
 

-            _assert(clip != 0);
-            _syscall(truncate(path, clip));
+            if (clip != 0)
+                _syscall(truncate(path, clip));

         }
 
         if (flag_S) {
         }
 
         if (flag_S) {

-            asprintf(&temp, "%s.%s.cs", dir, base);
-            const char *allocate = getenv("CODESIGN_ALLOCATE");
-            if (allocate == NULL)
-                allocate = "codesign_allocate";
+            FatHeader source(Map(path));
+
+            size_t offset(0);
+
+            if (source.IsFat())
+                offset += sizeof(fat_header) + sizeof(fat_arch) * source.Swap(source->nfat_arch);

 
             std::vector<CodesignAllocation> allocations; {
 
             std::vector<CodesignAllocation> allocations; {

-                FatHeader fat_header(Map(path));
-                _foreach (mach_header, fat_header.GetMachHeaders()) {
+                _foreach (mach_header, source.GetMachHeaders()) {
+                    if (flag_A) {
+                        if (mach_header.GetCPUType() != flag_CPUType)
+                            continue;
+                        if (mach_header.GetCPUSubtype() != flag_CPUSubtype)
+                            continue;
+                    }
+

                     mach_header->flags = mach_header.Swap(mach_header.Swap(mach_header->flags) | MH_DYLDLINK);
 
                     size_t size(_not(size_t)); {
                     mach_header->flags = mach_header.Swap(mach_header.Swap(mach_header->flags) | MH_DYLDLINK);
 
                     size_t size(_not(size_t)); {


@@ -895,31 +983,6 @@ int main(int argc, const char *argv[]) {
                             size = mach_header.GetSize();
                     }
 
                             size = mach_header.GetSize();
                     }
 

-                    allocations.push_back(CodesignAllocation(mach_header.GetCPUType(), mach_header.GetCPUSubtype(), size));
-                }
-            }
-
-            pid_t pid = fork();
-            _syscall(pid);
-            if (pid == 0) {
-                // XXX: this leaks memory, but it doesn't really matter
-                std::vector<const char *> args;
-                char *arg;
-
-                args.push_back(allocate);
-
-                args.push_back("-i");
-                args.push_back(path);
-
-                _foreach (allocation, allocations) {
-                    args.push_back("-A");
-
-                    asprintf(&arg, "%u", allocation.type_);
-                    args.push_back(arg);
-
-                    asprintf(&arg, "%u", allocation.subtype_);
-                    args.push_back(arg);
-

                     size_t alloc(0);
                     alloc += sizeof(struct SuperBlob);
                     uint32_t special(0);
                     size_t alloc(0);
                     alloc += sizeof(struct SuperBlob);
                     uint32_t special(0);


@@ -927,7 +990,7 @@ int main(int argc, const char *argv[]) {
                     special = std::max(special, CSSLOT_CODEDIRECTORY);
                     alloc += sizeof(struct BlobIndex);
                     alloc += sizeof(struct CodeDirectory);
                     special = std::max(special, CSSLOT_CODEDIRECTORY);
                     alloc += sizeof(struct BlobIndex);
                     alloc += sizeof(struct CodeDirectory);

-                    alloc += strlen(base) + 1;
+                    alloc += strlen(name) + 1;

 
                     special = std::max(special, CSSLOT_REQUIREMENTS);
                     alloc += sizeof(struct BlobIndex);
 
                     special = std::max(special, CSSLOT_REQUIREMENTS);
                     alloc += sizeof(struct BlobIndex);


@@ -940,43 +1003,82 @@ int main(int argc, const char *argv[]) {
                         alloc += xmls;
                     }
 
                         alloc += xmls;
                     }
 

-                    size_t normal((allocation.size_ + 0x1000 - 1) / 0x1000);
-                    alloc += (special + normal) * 0x14;
+                    size_t normal((size + 0x1000 - 1) / 0x1000);
+                    alloc = Align(alloc + (special + normal) * 0x14, 16);
+
+                    offset = Align(offset, 4096);
+                    allocations.push_back(CodesignAllocation(mach_header, offset, size, alloc));
+                    offset += size + alloc;
+                }
+            }
+
+            asprintf(&temp, "%s.%s.cs", dir, base);
+            fclose(fopen(temp, "w+"));
+            truncate(temp, offset);
+
+            void *file(map(temp, 0, offset, NULL, false));
+            memset(file, 0, offset);
+
+            fat_arch *fat_arch;
+            if (!source.IsFat())
+                fat_arch = NULL;
+            else {
+                auto *fat_header(reinterpret_cast<struct fat_header *>(file));
+                fat_header->magic = Swap(FAT_MAGIC);
+                fat_header->nfat_arch = Swap(source.Swap(source->nfat_arch));
+                fat_arch = reinterpret_cast<struct fat_arch *>(fat_header + 1);
+            }

 
 

-                    alloc += 15;
-                    alloc /= 16;
-                    alloc *= 16;
+            _foreach (allocation, allocations) {
+                auto &source(allocation.mach_header_);

 
 

-                    asprintf(&arg, "%zu", alloc);
-                    args.push_back(arg);
+                uint32_t align(allocation.size_);
+                align = Align(align, 0x10);
+
+                if (fat_arch != NULL) {
+                    fat_arch->cputype = Swap(source->cputype);
+                    fat_arch->cpusubtype = Swap(source->cpusubtype);
+                    fat_arch->offset = Swap(allocation.offset_);
+                    fat_arch->size = Swap(align + allocation.alloc_);
+                    fat_arch->align = Swap(0xc);
+                    ++fat_arch;

                 }
 
                 }
 

-                args.push_back("-o");
-                args.push_back(temp);
+                void *target(reinterpret_cast<uint8_t *>(file) + allocation.offset_);
+                memcpy(target, source, allocation.size_);
+                MachHeader mach_header(target, align + allocation.alloc_);

 
 

-                args.push_back(NULL);
+                struct linkedit_data_command *signature(NULL);
+                _foreach (load_command, mach_header.GetLoadCommands()) {
+                    uint32_t cmd(mach_header.Swap(load_command->cmd));
+                    if (cmd != LC_CODE_SIGNATURE)
+                        continue;
+                    signature = reinterpret_cast<struct linkedit_data_command *>(load_command);
+                    break;
+                }

 
 

-                if (false) {
-                    printf("run:");
-                    _foreach (arg, args)
-                        printf(" %s", arg);
-                    printf("\n");
+                if (signature == NULL) {
+                    mach_header->ncmds = mach_header.Swap(mach_header.Swap(mach_header->ncmds) + 1);
+                    signature = reinterpret_cast<struct linkedit_data_command *>(reinterpret_cast<uint8_t *>(mach_header.GetLoadCommand()) + mach_header.Swap(mach_header->sizeofcmds));
+                    mach_header->sizeofcmds = mach_header.Swap(mach_header.Swap(mach_header->sizeofcmds) + uint32_t(sizeof(*signature)));
+                    signature->cmd = mach_header.Swap(LC_CODE_SIGNATURE);
+                    signature->cmdsize = mach_header.Swap(uint32_t(sizeof(*signature)));

                 }
 
                 }
 

-                execvp(allocate, (char **) &args[0]);
-                _assert(false);
-            }
+                signature->dataoff = mach_header.Swap(align);
+                signature->datasize = mach_header.Swap(allocation.alloc_);

 
 

-            int status;
-            _syscall(waitpid(pid, &status, 0));
-            _assert(WIFEXITED(status));
-            _assert(WEXITSTATUS(status) == 0);
+                _foreach (segment, mach_header.GetSegments("__LINKEDIT"))
+                    segment->filesize = mach_header.Swap(align + allocation.alloc_ - mach_header.Swap(segment->fileoff));
+                _foreach (segment, mach_header.GetSegments64("__LINKEDIT"))
+                    segment->filesize = mach_header.Swap(align + allocation.alloc_ - mach_header.Swap(segment->fileoff));
+            }

         }
 
         if (flag_p)
             printf("path%zu='%s'\n", filei, file.c_str());
 
         }
 
         if (flag_p)
             printf("path%zu='%s'\n", filei, file.c_str());
 

-        FatHeader fat_header(Map(temp == NULL ? path : temp, !(flag_R | flag_T | flag_s | flag_S | flag_O | flag_D)));
+        FatHeader fat_header(Map(temp == NULL ? path : temp, !(flag_R || flag_T || flag_s || flag_S || flag_O || flag_D)));

         struct linkedit_data_command *signature(NULL);
 
         _foreach (mach_header, fat_header.GetMachHeaders()) {
         struct linkedit_data_command *signature(NULL);
 
         _foreach (mach_header, fat_header.GetMachHeaders()) {


@@ -1143,8 +1245,8 @@ int main(int argc, const char *argv[]) {
                 directory->spare2 = Swap(uint32_t(0));
 
                 directory->identOffset = Swap(offset - begin);
                 directory->spare2 = Swap(uint32_t(0));
 
                 directory->identOffset = Swap(offset - begin);

-                strcpy(reinterpret_cast<char *>(blob + offset), base);
-                offset += strlen(base) + 1;
+                strcpy(reinterpret_cast<char *>(blob + offset), name);
+                offset += strlen(name) + 1;

 
                 uint32_t special = xmld == NULL ? CSSLOT_REQUIREMENTS : CSSLOT_ENTITLEMENTS;
                 directory->nSpecialSlots = Swap(special);
 
                 uint32_t special = xmld == NULL ? CSSLOT_REQUIREMENTS : CSSLOT_ENTITLEMENTS;
                 directory->nSpecialSlots = Swap(special);