Return to setup.c CVS log

Up to [Research Unix] / researchv10no / cmd / adb / null

Annotation of researchv10no/cmd/adb/null/setup.c, revision 1.1.1.1

1.1       root        1: /*
                      2:  * init routines -- dummy version
                      3:  */
                      4: #include "defs.h"
                      5: #include "space.h"
                      6: #include "map.h"
                      7: 
                      8: char   *symfil = "a.out";
                      9: char   *corfil = "core";
                     10: 
                     11: MAP    symmap[NMAP];
                     12: MAP    cormap[NMAP];
                     13: 
                     14: int fsym, fcor;
                     15: 
                     16: setsym()
                     17: {
                     18: 
                     19:        fsym = getfile(symfil, 1);
                     20:        dumbmap(symmap);
                     21: }
                     22: 
                     23: setcor()
                     24: {
                     25: 
                     26:        fcor = getfile(corfil, 2);
                     27:        dumbmap(cormap);
                     28: }
                     29: 
                     30: static
                     31: dumbmap(mp)
                     32: register MAP *mp;
                     33: {
                     34: 
                     35:        mp->b = mp->f = 0;
                     36:        mp->e = HUGE;
                     37:        mp->sp = DATASP;
                     38:        mp->flag = MPINUSE;
                     39:        mp++;
                     40:        mp->flag = 0;
                     41: }
                     42: 
                     43: cmdmap(itype, star)
                     44: register int star, itype;
                     45: {
                     46:        register MAP *mp;
                     47:        extern char lastc;
                     48: 
                     49:        if (itype & SYMF)
                     50:                mp = symmap;
                     51:        else
                     52:                mp = cormap;
                     53:        if (star)       /* UGH */
                     54:                mp++;
                     55:        if (expr(0))
                     56:                mp->b = expv; 
                     57:        if (expr(0))
                     58:                mp->e = expv; 
                     59:        if (expr(0))
                     60:                mp->f = expv; 
                     61:        mp->flag |= MPINUSE;
                     62:        if (rdc()=='?' && (itype&SYMF) == 0) {
                     63:                if (fcor)
                     64:                        close(fcor);
                     65:                fcor=fsym;
                     66:                corfil=symfil;
                     67:        } else if (lastc == '/' && itype&SYMF) {
                     68:                if (fsym)
                     69:                        close(fsym);
                     70:                fsym=fcor;
                     71:                symfil=corfil;
                     72:        } else
                     73:                reread();
                     74: }
                     75: 
                     76: create(f)
                     77:        char *f;
                     78: {
                     79:        register int fd;
                     80: 
                     81:        fd = creat(f, 0666);
                     82:        if (fd < 0)
                     83:                return (-1);
                     84:        close(fd);
                     85:        return (open(f, wtflag));
                     86: }
                     87: 
                     88: getfile(filnam, cnt)
                     89:        char *filnam;
                     90: {
                     91:        register int fsym;
                     92: 
                     93:        if (strcmp(filnam, "-") == 0)
                     94:                return (-1);
                     95:        fsym = open(filnam, wtflag);
                     96:        if (fsym < 0 && xargc > cnt) {
                     97:                if (wtflag)
                     98:                        fsym = create(filnam);
                     99:                if (fsym < 0)
                    100:                        printf("cannot open `%s'\n", filnam);
                    101:        }
                    102:        return (fsym);
                    103: }
                    104: 
                    105: setvar()
                    106: {
                    107: }

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