-static int
-output_kernel_symbols(struct proc *p)
-{
- struct vnode *vp;
- kauth_cred_t cred = p->p_ucred; /* XXX */
- struct vnode_attr va;
- struct vfs_context context;
- struct load_command *cmd;
- struct mach_header *orig_mh, *mh;
- struct segment_command *orig_ds, *orig_ts, *orig_le, *sg;
- struct section *se, *const_text;
- struct symtab_command *st, *orig_st;
- struct nlist *sym;
- vm_size_t orig_mhsize, orig_st_size;
- vm_offset_t header;
- vm_size_t header_size = 0; /* out: protected by header */
- int error, error1;
- unsigned int i, j;
- caddr_t addr;
- vm_offset_t offset;
- int rc_mh, rc_sc;
-
- error = EFAULT;
-
- vp = NULL;
- header = NULL;
- orig_mh = NULL;
- orig_st = NULL;
-
- // Dispose of unnecessary gumf, the booter doesn't need to load these
- rc_mh = IODTGetLoaderInfo("Kernel-__HEADER",
- (void **)&orig_mh, &orig_mhsize);
- if (rc_mh == 0 && orig_mh)
- IODTFreeLoaderInfo("Kernel-__HEADER",
- (void *)orig_mh, round_page_32(orig_mhsize));
-
- rc_sc = IODTGetLoaderInfo("Kernel-__SYMTAB",
- (void **) &orig_st, &orig_st_size);
- if (rc_sc == 0 && orig_st)
- IODTFreeLoaderInfo("Kernel-__SYMTAB",
- (void *)orig_st, round_page_32(orig_st_size));
-
- if (cred->cr_svuid != cred->cr_ruid || cred->cr_svgid != cred->cr_rgid)
- goto out;
-
- // Check to see if the root is 'e' or 'n', is this a test for network?
- if (rootdevice[0] == 'e' && rootdevice[1] == 'n')
- goto out;
-
- context.vc_proc = p;
- context.vc_ucred = cred;
-
- if ((error = vnode_open("mach.sym", (O_CREAT | FWRITE), (S_IRUSR | S_IRGRP | S_IROTH), 0, &vp, &context)))
- goto out;
-
- /* Don't dump to non-regular files or files with links. */
- error = EFAULT;
- VATTR_INIT(&va);
- VATTR_WANTED(&va, va_nlink);
- if ((vp->v_type != VREG) || vnode_getattr(vp, &va, &context) || (va.va_nlink != 1))
- goto out;
-
- VATTR_INIT(&va); /* better to do it here than waste more stack in vnode_getsize */
- VATTR_SET(&va, va_data_size, 0);
- vnode_setattr(vp, &va, &context);
- p->p_acflag |= ACORE;
-
- // If the file type is MH_EXECUTE then this must be a kernel
- // as all Kernel extensions must be of type MH_OBJECT
- orig_ds = orig_ts = orig_le = NULL;
- orig_st = NULL;
- orig_mh = &_mh_execute_header;
- cmd = (struct load_command *) &orig_mh[1];
- for (i = 0; i < orig_mh->ncmds; i++) {
- if (cmd->cmd == LC_SEGMENT) {
- struct segment_command *orig_sg = (struct segment_command *) cmd;
-
- if (!strcmp(SEG_TEXT, orig_sg->segname))
- orig_ts = orig_sg;
- else if (!strcmp(SEG_DATA, orig_sg->segname))
- orig_ds = orig_sg;
- else if (!strcmp(SEG_LINKEDIT, orig_sg->segname))
- orig_le = orig_sg;
- }
- else if (cmd->cmd == LC_SYMTAB)
- orig_st = (struct symtab_command *) cmd;
-
- cmd = (struct load_command *) ((caddr_t) cmd + cmd->cmdsize);
- }
-
- if (!orig_ts || !orig_ds || !orig_le || !orig_st)
- goto out;
-
- const_text = NULL;
- se = (struct section *) &orig_ts[1];
- for (i = 0; i < orig_ts->nsects; i++, se++) {
- if (!strcmp("__const", se->sectname)) {
- const_text = se;
- break;
- }
- }
- if (!const_text)
- goto out;
-
- header_size = sizeof(struct mach_header)
- + orig_ts->cmdsize
- + orig_ds->cmdsize
- + sizeof(struct symtab_command);
-
- (void) kmem_alloc(kernel_map,
- (vm_offset_t *) &header,
- (vm_size_t) header_size);
- if (header)
- bzero((void *) header, header_size);
- else
- goto out;
-
- /*
- * Set up Mach-O header.
- */
- mh = (struct mach_header *) header;
- mh->magic = orig_mh->magic;
- mh->cputype = orig_mh->cputype;
- mh->cpusubtype = orig_mh->cpusubtype;
- mh->filetype = orig_mh->filetype;
- mh->ncmds = 3;
- mh->sizeofcmds = header_size - sizeof(struct mach_header);
- mh->flags = orig_mh->flags;
-
- // Initialise the current file offset and addr
- offset = round_page(header_size);
- addr = (caddr_t) const_text->addr; // Load address of __TEXT,__const
-
- /*
- * Construct a TEXT segment load command
- * the only part of the TEXT segment we keep is the __TEXT,__const
- * which contains the kernel vtables.
- */
- sg = (struct segment_command *) &mh[1];
- bcopy(orig_ts, sg, orig_ts->cmdsize);
- sg->vmaddr = (unsigned long) addr;
- sg->vmsize = const_text->size;
- sg->fileoff = 0;
- sg->filesize = const_text->size + round_page(header_size);
- sg->maxprot = 0;
- sg->initprot = 0;
- sg->flags = 0;
- se = (struct section *)(sg+1);
- for ( j = 0; j < sg->nsects; j++, se++ ) {
- se->addr = (unsigned long) addr;
- se->size = 0;
- se->offset = offset;
- se->nreloc = 0;
- if (!strcmp("__const", se->sectname)) {
- se->size = const_text->size;
- addr += const_text->size;
- offset += const_text->size;
- const_text = se;
- }
- }
- offset = round_page(offset);
-
- // Now copy of the __DATA segment load command, the image need
- // not be stored to disk nobody needs it, yet!
- sg = (struct segment_command *)((int)sg + sg->cmdsize);
- bcopy(orig_ds, sg, orig_ds->cmdsize);
-
- sg->vmaddr = (unsigned long) addr;
- sg->vmsize = 0x1000; // One page for some reason?
- sg->fileoff = offset;
- sg->filesize = 0;
- sg->maxprot = 0;
- sg->initprot = 0;
- sg->flags = 0;
- se = (struct section *)(sg+1);
- for ( j = 0; j < sg->nsects; j++, se++ ) {
- se->addr = (unsigned long) addr;
- se->size = 0;
- se->offset = offset;
- se->nreloc = 0;
- }
- offset = round_page(offset);
-
-
- /*
- * Set up LC_SYMTAB command
- */
- st = (struct symtab_command *)((int)sg + sg->cmdsize);
- st->cmd = LC_SYMTAB;
- st->cmdsize = sizeof(struct symtab_command);
- st->symoff = offset;
- st->nsyms = orig_st->nsyms;
- st->strsize = orig_st->strsize;
- st->stroff = offset + st->nsyms * sizeof(struct nlist);
-
- /*
- * Convert the symbol table in place from section references
- * to absolute references.
- */
- sym = (struct nlist *) orig_le->vmaddr;
- for (i = 0; i < st->nsyms; i++, sym++ ) {
- if ( (sym->n_type & N_TYPE) == N_SECT) {
- sym->n_sect = NO_SECT;
- sym->n_type = (sym->n_type & ~N_TYPE) | N_ABS;
- }
- }
-
- /*
- * Write out the load commands at the beginning of the file.
- */
- error = vn_rdwr(UIO_WRITE, vp, (caddr_t) mh, header_size, (off_t) 0,
- UIO_SYSSPACE32, IO_NODELOCKED|IO_UNIT, cred, (int *) 0, p);
- if (error)
- goto out;
-
- /*
- * Write out the __TEXT,__const data segment.
- */
- error = vn_rdwr(UIO_WRITE, vp, (caddr_t) const_text->addr,
- const_text->size, const_text->offset,
- UIO_SYSSPACE32, IO_NODELOCKED|IO_UNIT, cred, (int *) 0, p);
- if (error)
- goto out;
-
- /*
- * Write out kernel symbols
- */
- offset = st->nsyms * sizeof(struct nlist) + st->strsize; // symtab size
- error = vn_rdwr(UIO_WRITE, vp,
- (caddr_t) orig_le->vmaddr, offset, st->symoff,
- UIO_SYSSPACE32, IO_NODELOCKED|IO_UNIT, cred, (int *) 0, p);
-out:
- if (header)
- kmem_free(kernel_map, header, header_size);
-
- if (vp) {
- error1 = vnode_close(vp, FWRITE, &context);
- if (!error) error = error1;
- }
-
- return(error);
-}
-/*
- *
- */
-int get_kernel_symfile(struct proc *p, char **symfile)
projects / apple / xnu.git / blobdiff