diff -urN linux/fs/proc/Makefile linux-2.3.3-kcore/fs/proc/Makefile --- linux/fs/proc/Makefile Wed Jun 24 22:30:10 1998 +++ linux-2.3.3-kcore/fs/proc/Makefile Tue May 25 10:02:56 1999 @@ -9,7 +9,7 @@ O_TARGET := proc.o O_OBJS := inode.o root.o base.o generic.o mem.o link.o fd.o array.o \ - kmsg.o scsi.o proc_tty.o + kmsg.o scsi.o proc_tty.o kcore.o ifdef CONFIG_OMIRR O_OBJS := $(O_OBJS) omirr.o endif diff -urN linux/fs/proc/kcore.c linux-2.3.3-kcore/fs/proc/kcore.c --- linux/fs/proc/kcore.c Thu Jan 1 01:00:00 1970 +++ linux-2.3.3-kcore/fs/proc/kcore.c Tue May 25 10:03:21 1999 @@ -0,0 +1,281 @@ +/* + * kernel ELF core dumper + * + * Modelled on fs/exec.c:aout_core_dump() + * Jeremy Fitzhardinge + * Implemented by David Howells + * Minor modifications by Tigran Aivazian + */ + +#include +#include +#include +#include +#include + +#define roundup(x, y) ((((x)+((y)-1))/(y))*(y)) + +/* An ELF note in memory */ +struct memelfnote +{ + const char *name; + int type; + unsigned int datasz; + void *data; +}; + +extern char saved_command_line[]; + +/*****************************************************************************/ +/* + * determine size of ELF note + */ +static int notesize(struct memelfnote *en) +{ + int sz; + + sz = sizeof(struct elf_note); + sz += roundup(strlen(en->name), 4); + sz += roundup(en->datasz, 4); + + return sz; +} /* end notesize() */ + +/*****************************************************************************/ +/* + * store a note in the header buffer + */ +static char *storenote(struct memelfnote *men, char *bufp) +{ + struct elf_note en; + +#define DUMP_WRITE(addr,nr) do { memcpy(bufp,addr,nr); bufp += nr; } while(0) + + en.n_namesz = strlen(men->name); + en.n_descsz = men->datasz; + en.n_type = men->type; + + DUMP_WRITE(&en, sizeof(en)); + DUMP_WRITE(men->name, en.n_namesz); + + /* XXX - cast from long long to long to avoid need for libgcc.a */ + bufp = (char*) roundup((unsigned long)bufp,4); + DUMP_WRITE(men->data, men->datasz); + bufp = (char*) roundup((unsigned long)bufp,4); + +#undef DUMP_WRITE + + return bufp; +} /* end storenote() */ + +/*****************************************************************************/ +/* + * store an ELF coredump header in the supplied buffer + * - assume the memory image is the size specified + */ +static void elf_kcore_store_hdr(char *bufp, size_t size, off_t dataoff) +{ + struct elf_prstatus prstatus; /* NT_PRSTATUS */ + struct elf_prpsinfo psinfo; /* NT_PRPSINFO */ + struct elf_phdr *nhdr, *dhdr; + struct elfhdr *elf; + struct memelfnote notes[3]; + off_t offset = 0; + + /* acquire an ELF header block from the buffer */ + elf = (struct elfhdr *) bufp; + bufp += sizeof(*elf); + offset += sizeof(*elf); + + /* set up header */ + memcpy(elf->e_ident,ELFMAG,SELFMAG); + elf->e_ident[EI_CLASS] = ELF_CLASS; + elf->e_ident[EI_DATA] = ELF_DATA; + elf->e_ident[EI_VERSION]= EV_CURRENT; + memset(elf->e_ident+EI_PAD,0,EI_NIDENT-EI_PAD); + + elf->e_type = ET_CORE; + elf->e_machine = ELF_ARCH; + elf->e_version = EV_CURRENT; + elf->e_entry = 0; + elf->e_phoff = sizeof(*elf); + elf->e_shoff = 0; + elf->e_flags = 0; + elf->e_ehsize = sizeof(*elf); + elf->e_phentsize= sizeof(struct elf_phdr); + elf->e_phnum = 2; /* no. of segments */ + elf->e_shentsize= 0; + elf->e_shnum = 0; + elf->e_shstrndx = 0; + + /* acquire an ELF program header blocks from the buffer for notes */ + nhdr = (struct elf_phdr *) bufp; + bufp += sizeof(*nhdr); + offset += sizeof(*nhdr); + + /* store program headers for notes dump */ + nhdr->p_type = PT_NOTE; + nhdr->p_offset = 0; + nhdr->p_vaddr = 0; + nhdr->p_paddr = 0; + nhdr->p_memsz = 0; + nhdr->p_flags = 0; + nhdr->p_align = 0; + + /* acquire an ELF program header blocks from the buffer for data */ + dhdr = (struct elf_phdr *) bufp; + bufp += sizeof(*dhdr); + offset += sizeof(*dhdr); + + /* store program headers for data dump */ + dhdr->p_type = PT_LOAD; + dhdr->p_flags = PF_R|PF_W|PF_X; + dhdr->p_offset = dataoff; + dhdr->p_vaddr = PAGE_OFFSET; + dhdr->p_paddr = __pa(PAGE_OFFSET); + dhdr->p_filesz = size; + dhdr->p_memsz = size; + dhdr->p_align = PAGE_SIZE; + + /* + * Set up the notes in similar form to SVR4 core dumps made + * with info from their /proc. + */ + nhdr->p_offset = offset; + nhdr->p_filesz = 0; + + /* set up the process status */ + notes[0].name = "CORE"; + notes[0].type = NT_PRSTATUS; + notes[0].datasz = sizeof(prstatus); + notes[0].data = &prstatus; + + memset(&prstatus,0,sizeof(prstatus)); + + nhdr->p_filesz = notesize(¬es[0]); + bufp = storenote(¬es[0],bufp); + + /* set up the process info */ + notes[1].name = "CORE"; + notes[1].type = NT_PRPSINFO; + notes[1].datasz = sizeof(psinfo); + notes[1].data = &psinfo; + + memset(&psinfo,0,sizeof(psinfo)); + psinfo.pr_state = 0; + psinfo.pr_sname = 'R'; + psinfo.pr_zomb = 0; + + strcpy(psinfo.pr_fname,"vmlinux"); + strncpy(psinfo.pr_psargs,saved_command_line,ELF_PRARGSZ); + + nhdr->p_filesz = notesize(¬es[1]); + bufp = storenote(¬es[1],bufp); + + /* set up the task structure */ + notes[2].name = "CORE"; + notes[2].type = NT_TASKSTRUCT; + notes[2].datasz = sizeof(*current); + notes[2].data = current; + + nhdr->p_filesz = notesize(¬es[2]); + bufp = storenote(¬es[2],bufp); + +} /* end elf_kcore_store_hdr() */ + +/*****************************************************************************/ +/* + * read from the ELF header and then kernel memory + */ +static ssize_t elf_kcore_read(struct file *file, char *buffer, size_t buflen, + loff_t *fpos) +{ + ssize_t acc; + size_t size, tsz; + char *page; + + /* work out how much file we allow to be read */ + size = ((size_t)high_memory - PAGE_OFFSET) + PAGE_SIZE; + acc = 0; + + /* see if file pointer already beyond EOF */ + if (buflen==0 || *fpos>=size) + return 0; + + /* trim buflen to not go beyond EOF */ + if (buflen > size-*fpos) + buflen = size - *fpos; + + /* construct an ELF core header if we'll need some of it */ + if (*fpos