7 http://www.channelu.com/NeXT/NeXTStep/3.3/nd/DevTools/14_MachO/MachO.htmld/
16 if((fd = open(name, OREAD)) < 0)
25 unpackseg(uchar *p, Macho *m, MachoCmd *c, uint type, uint sz)
39 strecpy(c->seg.name, c->seg.name+sizeof c->seg.name, (char*)p+8);
40 c->seg.vmaddr = e4(p+24);
41 c->seg.vmsize = e4(p+28);
42 c->seg.fileoff = e4(p+32);
43 c->seg.filesz = e4(p+36);
44 c->seg.maxprot = e4(p+40);
45 c->seg.initprot = e4(p+44);
46 c->seg.nsect = e4(p+48);
47 c->seg.flags = e4(p+52);
52 c->sym.symoff = e4(p+8);
53 c->sym.nsyms = e4(p+12);
54 c->sym.stroff = e4(p+16);
55 c->sym.strsize = e4(p+20);
66 uchar hdr[7*4], *cmdp;
68 ulong ncmd, cmdsz, ty, sz, off;
71 if(seek(fd, 0, 0) < 0 || readn(fd, hdr, sizeof hdr) != sizeof hdr)
74 if(beload4(hdr) == 0xFEEDFACE)
76 else if(leload4(hdr) == 0xFEEDFACE)
79 werrstr("bad magic - not mach-o file");
85 if(ncmd > 0x10000 || cmdsz >= 0x01000000){
86 werrstr("implausible mach-o header ncmd=%lud cmdsz=%lud", ncmd, cmdsz);
90 m = mallocz(sizeof(*m)+ncmd*sizeof(MachoCmd)+cmdsz, 1);
96 m->cputype = e4(hdr+1*4);
97 m->subcputype = e4(hdr+2*4);
98 m->filetype = e4(hdr+3*4);
100 m->flags = e4(hdr+6*4);
102 m->cmd = (MachoCmd*)(m+1);
104 cmdp = (uchar*)(m->cmd+ncmd);
105 if(readn(fd, cmdp, cmdsz) != cmdsz){
106 werrstr("reading cmds: %r");
111 for(i=0; i<ncmd; i++){
115 unpackseg(cmdp, m, &m->cmd[i], ty, sz);