Return to rdout.c CVS log

Up to [Research Unix] / researchv9 / cmd / strip

Annotation of researchv9/cmd/strip/rdout.c, revision 1.1.1.1

1.1       root        1: #include "strip.h"
                      2: 
                      3: Adotout *
                      4: rdout(name, sflag)
                      5: register char *name;
                      6: {
                      7:        register Adotout *a; Adotout *rderr();
                      8:        if ((a = Calloc(Adotout, 1)) == 0)
                      9:                return rderr(a, name);
                     10:        a->name = name;
                     11:        if ((a->fd = open(a->name, 0)) < 0)
                     12:                return rderr(a, "cannot open file");
                     13:        fstat(a->fd, &a->filstat);
                     14:        if (Read(a->fd, (char *)&a->hd, sizeof(struct exec)))
                     15:                return rderr(a, "cannot read header");
                     16:        if (N_BADMAG(a->hd))
                     17:                return rderr(a, "bad magic number");
                     18: 
                     19:        if (a->nsymbols = a->hd.a_syms/sizeof(struct nlist)) {
                     20:                lseek(a->fd, N_STROFF(a->hd), 0);
                     21:                if (Read(a->fd, (char *)&a->strsize, sizeof(long)) ||
                     22:                    a->strsize < 4)
                     23:                        return rderr(a, "read failed on string table size");
                     24:        }
                     25: 
                     26:        if (sflag && a->nsymbols) {
                     27:                if ((a->symtab = Malloc(struct nlist, a->nsymbols+1)) == 0)
                     28:                        return rderr(a, "cannot malloc symbol table");
                     29:                lseek(a->fd, N_SYMOFF(a->hd), 0);
                     30:                if (Read(a->fd, (char *)a->symtab, a->hd.a_syms))
                     31:                        return rderr(a, "read failed on symbol table");
                     32:                a->symend = (struct nlist *)((char *)a->symtab + a->hd.a_syms);
                     33:                a->symend->n_un.n_name = 0;
                     34:                a->symend->n_type = 0;
                     35:                a->symend->n_other = 0;
                     36:                a->symend->n_desc = 0;
                     37:                a->symend->n_value = 0;
                     38: 
                     39:                if ((a->strtab = Malloc(char, a->strsize)) == 0)
                     40:                        return rderr(a, "cannot malloc string table");
                     41:                lseek(a->fd, N_STROFF(a->hd), 0);
                     42:                if (Read(a->fd, (char *)a->strtab, a->strsize))
                     43:                        return rderr(a, "read failed on string table");
                     44:        }
                     45:        return a;
                     46: }
                     47: 
                     48: freeout(a)
                     49: register Adotout *a;
                     50: {
                     51:        if (a) {
                     52:                if (a->fd)
                     53:                        close(a->fd);
                     54:                Free(a->symtab);
                     55:                Free(a->strtab);
                     56:                free(a);
                     57:        }
                     58: }
                     59: 
                     60: Adotout *
                     61: rderr(a, s)
                     62: register Adotout *a; register char *s;
                     63: {
                     64:        if (a) {
                     65:                fprintf(stderr, "%s: file %s\n", s, a->name);
                     66:                freeout(a);
                     67:        } else {
                     68:                fprintf(stderr, "cannot allocate struct Adotout: file %s\n", s);
                     69:        }
                     70:        return 0;
                     71: }
                     72: 
                     73: prtout(a)
                     74: register Adotout *a;
                     75: {
                     76:        printf("magic number    = 0%o\n", a->hd.a_magic);
                     77:        printf("text size       = %d    = 0x%x\n", a->hd.a_text, a->hd.a_text);
                     78:        printf("data size       = %d    = 0x%x\n", a->hd.a_data, a->hd.a_data);
                     79:        printf("bss size        = %d    = 0x%x\n", a->hd.a_bss, a->hd.a_bss);
                     80:        printf("sym tab size    = %d (%d)\n", a->hd.a_syms, a->nsymbols);
                     81:        printf("entry point     = 0x%x\n", a->hd.a_entry);
                     82:        printf("text rel size   = %d\n", a->hd.a_trsize);
                     83:        printf("data rel size   = %d\n", a->hd.a_drsize);
                     84:        printf("str tab size    = %d\n", a->strsize);
                     85: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.