Return to nmf.c CVS log

Up to [Research Unix] / researchv10no / cmd / cflow

Annotation of researchv10no/cmd/cflow/nmf.c, revision 1.1.1.1

1.1       root        1: /*     @(#)nmf.c       1.5     83/08/05        */
                      2: #if defined(UNIX5) && !defined(pdp11)
                      3: #include "stdio.h"
                      4: 
                      5: main(argc, argv)
                      6: char   *argv[];
                      7: {
                      8:        char name[BUFSIZ], buf[BUFSIZ], *fname = NULL, *pty, *strncpy();
                      9:        register char *p;
                     10:        int nsize, tysize, lineno;
                     11: 
                     12:        strcpy(name, argc > 1? argv[1] : "???");
                     13:        if (argc > 2)
                     14:                fname = argv[2];
                     15:        else
                     16:                fname = "???";
                     17:        while (gets(buf))
                     18:        {
                     19:                p = buf;
                     20:                while (*p != ' ' && *p != '|')
                     21:                        ++p;
                     22:                nsize = p - buf;
                     23:                do ; while (*p++ != '|');               /* skip rem of name */
                     24:                do ; while (*p++ != '|');               /* skip value */
                     25:                do ; while (*p++ != '|');               /* skip class */
                     26:                while (*p == ' ')
                     27:                        ++p;
                     28:                if (*p != '|')
                     29:                {
                     30:                        pty = p++;
                     31:                        while (*p != '|')
                     32:                                ++p;
                     33:                        tysize = p - pty;
                     34:                }
                     35:                else
                     36:                        pty = (char *) NULL;
                     37:                ++p;
                     38:                do ; while (*p++ != '|');               /* skip size */
                     39:                while (*p == ' ')
                     40:                        ++p;
                     41:                lineno = atoi(p);
                     42:                do ; while (*p++ != '|');               /* and xlated line */
                     43:                while (*p == ' ')
                     44:                        ++p;
                     45:                if (!strncmp(p, ".text", 5) || !strncmp(p, ".data", 5))
                     46:                {                                       /* it's defined */
                     47:                        strncpy(name, buf, nsize);
                     48:                        name[nsize] = '\0';
                     49:                        printf("%s = ", name);
                     50:                        if (pty)
                     51:                                printf("%.*s", tysize, pty);
                     52:                        else
                     53:                        {
                     54:                                fputs("???", stdout);
                     55:                                if (!strncmp(p, ".text", 5))
                     56:                                        fputs("()", stdout);
                     57:                        }
                     58:                        printf(", <%s %d>\n", fname, lineno);
                     59:                }
                     60:                else
                     61:                        printf("%s : %.*s\n", name, nsize, buf);
                     62:        }
                     63:        exit(0);
                     64: }
                     65: #else
                     66: #include "stdio.h"
                     67: 
                     68: #if u3b || u3b5 || vax
                     69: #define SYMSTART 11
                     70: #define SYMCLASS 9
                     71: #endif
                     72: 
                     73: #if pdp11
                     74: #define SYMSTART 9
                     75: #define SYMCLASS 7
                     76: #endif
                     77: 
                     78: main(argc, argv)
                     79: char   *argv[];
                     80: {
                     81:        char    name[15], buf[64];
                     82:        char    *fname = NULL;
                     83:        char    *p;
                     84: 
                     85:        strcpy(name, argc > 1? argv[1] : "");
                     86:        if (argc > 2)
                     87:                fname = argv[2];
                     88:        while (gets(buf)) {
                     89:                p = &buf[SYMSTART];
                     90:                if (*p == '_')
                     91:                        ++p;
                     92:                switch (buf[SYMCLASS]) {
                     93:                case 'U':
                     94:                        printf("%s : %s\n", name, p);
                     95:                        continue;
                     96:                case 'T':
                     97:                        printf("%s = text", p);
                     98:                        strcpy(name, p);
                     99:                        break;
                    100:                case 'D':
                    101:                        printf("%s = data", p);
                    102:                        if (strcmp(name, "") == 0)
                    103:                                strcpy(name, p);
                    104:                        break;
                    105:                case 'B':
                    106:                        printf("%s = bss", p);
                    107:                        break;
                    108:                case 'A':
                    109:                        printf("%s = abs", p);
                    110:                        break;
                    111:                default:
                    112:                        continue;
                    113:                }
                    114:                if (fname != NULL)
                    115:                        printf(", %s", fname);
                    116:                printf("\n");
                    117:        }
                    118:        exit(0);
                    119: }

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