[BACK]Return to pctr.c CVS log [TXT][DIR] Up to [local] / src / usr.bin / pctr

Annotation of src/usr.bin/pctr/pctr.c, Revision 1.8

1.8     ! deraadt     1: /*     $OpenBSD: pctr.c,v 1.7 2001/08/19 19:26:03 mickey Exp $ */
1.1       dm          2:
                      3: /*
                      4:  * Pentium performance counter control program for OpenBSD.
                      5:  * Copyright 1996 David Mazieres <dm@lcs.mit.edu>.
                      6:  *
                      7:  * Modification and redistribution in source and binary forms is
                      8:  * permitted provided that due credit is given to the author and the
1.5       pvalchev    9:  * OpenBSD project by leaving this copyright notice intact.
1.1       dm         10:  */
                     11:
                     12: #include <stdio.h>
                     13: #include <stdlib.h>
                     14: #include <string.h>
1.6       pvalchev   15: #include <unistd.h>
1.4       downsj     16: #include <sys/param.h>
1.1       dm         17: #include <sys/types.h>
                     18: #include <sys/stat.h>
1.4       downsj     19: #include <sys/sysctl.h>
1.1       dm         20: #include <sys/ioctl.h>
1.4       downsj     21: #include <err.h>
1.1       dm         22: #include <fcntl.h>
                     23: #include <machine/cpu.h>
                     24: #include <machine/pctr.h>
1.4       downsj     25: #include <machine/specialreg.h>
1.1       dm         26:
                     27: #define CFL_MESI 0x1   /* Unit mask accepts MESI encoding */
                     28: #define CFL_SA   0x2   /* Unit mask accepts Self/Any bit */
                     29: #define CFL_C0   0x4   /* Counter 0 only */
                     30: #define CFL_C1   0x8   /* Counter 1 only */
                     31:
1.4       downsj     32: /* Kernel cpuid values. */
                     33: int cpu_id, cpu_feature;
                     34: char cpu_vendor[16];
                     35:
                     36: int pctr_isintel;
                     37:
                     38: #define usetsc         (cpu_feature & CPUID_TSC)
                     39: #define usep5ctr       (pctr_isintel && (((cpu_id >> 8) & 15) == 5) && \
                     40:                                (((cpu_id >> 4) & 15) > 0))
                     41: #define usep6ctr       (pctr_isintel && ((cpu_id >> 8) & 15) == 6)
                     42: #define cpufamily      ((cpu_id >> 8) & 15)
                     43:
                     44: extern char *__progname;
                     45:
1.1       dm         46: struct ctrfn {
1.7       mickey     47:        u_int fn;
                     48:        int flags;
                     49:        char *name;
                     50:        char *desc;
1.1       dm         51: };
                     52:
                     53: struct ctrfn p5fn[] = {
1.7       mickey     54:        {0x00, 0, "Data read", NULL},
                     55:        {0x01, 0, "Data write", NULL},
                     56:        {0x02, 0, "Data TLB miss", NULL},
                     57:        {0x03, 0, "Data read miss", NULL},
                     58:        {0x04, 0, "Data write miss", NULL},
                     59:        {0x05, 0, "Write (hit) to M or E state lines", NULL},
                     60:        {0x06, 0, "Data cache lines written back", NULL},
                     61:        {0x07, 0, "Data cache snoops", NULL},
                     62:        {0x08, 0, "Data cache snoop hits", NULL},
                     63:        {0x09, 0, "Memory accesses in both pipes", NULL},
                     64:        {0x0a, 0, "Bank conflicts", NULL},
                     65:        {0x0b, 0, "Misaligned data memory references", NULL},
                     66:        {0x0c, 0, "Code read", NULL},
                     67:        {0x0d, 0, "Code TLB miss", NULL},
                     68:        {0x0e, 0, "Code cache miss", NULL},
                     69:        {0x0f, 0, "Any segment register load", NULL},
                     70:        {0x12, 0, "Branches", NULL},
                     71:        {0x13, 0, "BTB hits", NULL},
                     72:        {0x14, 0, "Taken branch or BTB hit", NULL},
                     73:        {0x15, 0, "Pipeline flushes", NULL},
                     74:        {0x16, 0, "Instructions executed", NULL},
                     75:        {0x17, 0, "Instructions executed in the V-pipe", NULL},
                     76:        {0x18, 0, "Bus utilization (clocks)", NULL},
                     77:        {0x19, 0, "Pipeline stalled by write backup", NULL},
                     78:        {0x1a, 0, "Pipeline stalled by data memory read", NULL},
                     79:        {0x1b, 0, "Pipeline stalled by write to E or M line", NULL},
                     80:        {0x1c, 0, "Locked bus cycle", NULL},
                     81:        {0x1d, 0, "I/O read or write cycle", NULL},
                     82:        {0x1e, 0, "Noncacheable memory references", NULL},
                     83:        {0x1f, 0, "AGI (Address Generation Interlock)", NULL},
                     84:        {0x22, 0, "Floating-point operations", NULL},
                     85:        {0x23, 0, "Breakpoint 0 match", NULL},
                     86:        {0x24, 0, "Breakpoint 1 match", NULL},
                     87:        {0x25, 0, "Breakpoint 2 match", NULL},
                     88:        {0x26, 0, "Breakpoint 3 match", NULL},
                     89:        {0x27, 0, "Hardware interupts", NULL},
                     90:        {0x28, 0, "Data read or data write", NULL},
                     91:        {0x29, 0, "Data read miss or data write miss", NULL},
                     92:        {0x0, 0, NULL, NULL},
1.1       dm         93: };
                     94:
                     95: struct ctrfn p6fn[] = {
1.7       mickey     96:        {0x03, 0, "LD_BLOCKS",
                     97:         "Number of store buffer blocks."},
                     98:        {0x04, 0, "SB_DRAINS",
                     99:         "Number of store buffer drain cycles."},
                    100:        {0x05, 0, "MISALIGN_MEM_REF",
                    101:         "Number of misaligned data memory references."},
                    102:        {0x06, 0, "SEGMENT_REG_LOADS",
                    103:         "Number of segment register loads."},
                    104:        {0x10, CFL_C0, "FP_COMP_OPS_EXE",
                    105:         "Number of computational floating-point operations executed."},
                    106:        {0x11, CFL_C1, "FP_ASSIST",
                    107:         "Number of floating-point exception cases handled by microcode."},
                    108:        {0x12, CFL_C1, "MUL",
                    109:         "Number of multiplies."},
                    110:        {0x13, CFL_C1, "DIV",
                    111:         "Number of divides."},
                    112:        {0x14, CFL_C0, "CYCLES_DIV_BUSY",
                    113:         "Number of cycles during which the divider is busy."},
                    114:        {0x21, 0, "L2_ADS",
                    115:         "Number of L2 address strobes."},
                    116:        {0x22, 0, "L2_DBUS_BUSY",
                    117:         "Number of cycles durring which the data bus was busy."},
                    118:        {0x23, 0, "L2_DBUS_BUSY_RD",
                    119:         "Number of cycles during which the data bus was busy transferring "
                    120:         "data from L2 to the processor."},
                    121:        {0x24, 0, "L2_LINES_IN",
                    122:         "Number of lines allocated in the L2."},
                    123:        {0x25, 0, "L2_M_LINES_INM",
                    124:         "Number of modified lines allocated in the L2."},
                    125:        {0x26, 0, "L2_LINES_OUT",
                    126:         "Number of lines removed from the L2 for any reason."},
                    127:        {0x27, 0, "L2_M_LINES_OUTM",
                    128:         "Number of modified lines removed from the L2 for any reason."},
                    129:        {0x28, CFL_MESI, "L2_IFETCH",
                    130:         "Number of L2 instruction fetches."},
                    131:        {0x29, CFL_MESI, "L2_LD",
                    132:         "Number of L2 data loads."},
                    133:        {0x2a, CFL_MESI, "L2_ST",
                    134:         "Number of L2 data stores."},
                    135:        {0x2e, CFL_MESI, "L2_RQSTS",
                    136:         "Number of L2 requests."},
                    137:        {0x43, 0, "DATA_MEM_REFS",
                    138:         "All memory references, both cacheable and non-cacheable."},
                    139:        {0x45, 0, "DCU_LINES_IN",
                    140:         "Total lines allocated in the DCU."},
                    141:        {0x46, 0, "DCU_M_LINES_IN",
                    142:         "Number of M state lines allocated in the DCU."},
                    143:        {0x47, 0, "DCU_M_LINES_OUT",
                    144:         "Number of M state lines evicted from the DCU.  "
                    145:         "This includes evictions via snoop HITM, intervention or replacement"},
                    146:        {0x48, 0, "DCU_MISS_OUTSTANDING",
                    147:         "Weighted number of cycles while a DCU miss is outstanding."},
                    148:        {0x60, 0, "BUS_REQ_OUTSTANDING",
                    149:         "Number of bus requests outstanding."},
                    150:        {0x61, 0, "BUS_BNR_DRV",
                    151:         "Number of bus clock cycles during which the processor is "
                    152:         "driving the BNR pin."},
                    153:        {0x62, CFL_SA, "BUS_DRDY_CLOCKS",
                    154:         "Number of clocks during which DRDY is asserted."},
                    155:        {0x63, CFL_SA, "BUS_LOCK_CLOCKS",
                    156:         "Number of clocks during which LOCK is asserted."},
                    157:        {0x64, 0, "BUS_DATA_RCV",
                    158:         "Number of bus clock cycles during which the processor is "
                    159:         "receiving data."},
                    160:        {0x65, CFL_SA, "BUS_TRAN_BRD",
                    161:         "Number of burst read transactions."},
                    162:        {0x66, CFL_SA, "BUS_TRAN_RFO",
                    163:         "Number of read for ownership transactions."},
                    164:        {0x67, CFL_SA, "BUS_TRANS_WB",
                    165:         "Number of write back transactions."},
                    166:        {0x68, CFL_SA, "BUS_TRAN_IFETCH",
                    167:         "Number of instruction fetch transactions."},
                    168:        {0x69, CFL_SA, "BUS_TRAN_INVAL",
                    169:         "Number of invalidate transactions."},
                    170:        {0x6a, CFL_SA, "BUS_TRAN_PWR",
                    171:         "Number of partial write transactions."},
                    172:        {0x6b, CFL_SA, "BUS_TRANS_P",
                    173:         "Number of partial transactions."},
                    174:        {0x6c, CFL_SA, "BUS_TRANS_IO",
                    175:         "Number of I/O transactions."},
                    176:        {0x6d, CFL_SA, "BUS_TRAN_DEF",
                    177:         "Number of deferred transactions."},
                    178:        {0x6e, CFL_SA, "BUS_TRAN_BURST",
                    179:         "Number of burst transactions."},
                    180:        {0x6f, CFL_SA, "BUS_TRAN_MEM",
                    181:         "Number of memory transactions."},
                    182:        {0x70, CFL_SA, "BUS_TRAN_ANY",
                    183:         "Number of all transactions."},
                    184:        {0x79, 0, "CPU_CLK_UNHALTED",
                    185:         "Number of cycles during which the processor is not halted."},
                    186:        {0x7a, 0, "BUS_HIT_DRV",
                    187:         "Number of bus clock cycles during which the processor is "
                    188:         "driving the HIT pin."},
                    189:        {0x7b, 0, "BUS_HITM_DRV",
                    190:         "Number of bus clock cycles during which the processor is "
                    191:         "driving the HITM pin."},
                    192:        {0x7e, 0, "BUS_SNOOP_STALL",
                    193:         "Number of clock cycles during which the bus is snoop stalled."},
                    194:        {0x80, 0, "IFU_IFETCH",
                    195:         "Number of instruction fetches, both cacheable and non-cacheable."},
                    196:        {0x81, 0, "IFU_IFETCH_MISS",
                    197:         "Number of instruction fetch misses."},
                    198:        {0x85, 0, "ITLB_MISS",
                    199:         "Number of ITLB misses."},
                    200:        {0x86, 0, "IFU_MEM_STALL",
                    201:         "Number of cycles that the instruction fetch pipe stage is stalled, "
                    202:         "including cache mises, ITLB misses, ITLB faults, "
                    203:         "and victim cache evictions"},
                    204:        {0x87, 0, "ILD_STALL",
                    205:         "Number of cycles that the instruction length decoder is stalled"},
                    206:        {0xa2, 0, "RESOURCE_STALLS",
                    207:         "Number of cycles during which there are resource-related stalls."},
                    208:        {0xc0, 0, "INST_RETIRED",
                    209:         "Number of instructions retired."},
                    210:        {0xc1, CFL_C0, "FLOPS",
                    211:         "Number of computational floating-point operations retired."},
                    212:        {0xc2, 0, "UOPS_RETIRED",
                    213:         "Number of UOPs retired."},
                    214:        {0xc4, 0, "BR_INST_RETIRED",
                    215:         "Number of branch instructions retired."},
                    216:        {0xc5, 0, "BR_MISS_PRED_RETIRED",
                    217:         "Number of mispredicted branches retired."},
                    218:        {0xc6, 0, "CYCLES_INT_MASKED",
                    219:         "Number of processor cycles for which interrupts are disabled."},
                    220:        {0xc7, 0, "CYCLES_INT_PENDING_AND_MASKED",
                    221:         "Number of processor cycles for which interrupts are disabled "
                    222:         "and interrupts are pending."},
                    223:        {0xc8, 0, "HW_INT_RX",
                    224:         "Number of hardware interrupts received."},
                    225:        {0xc9, 0, "BR_TAKEN_RETIRED",
                    226:         "Number of taken branches retired."},
                    227:        {0xca, 0, "BR_MISS_PRED_TAKEN_RET",
                    228:         "Number of taken mispredictioned branches retired."},
                    229:        {0xd0, 0, "INST_DECODER",
                    230:         "Number of instructions decoded."},
                    231:        {0xd2, 0, "PARTIAL_RAT_STALLS",
                    232:         "Number of cycles or events for partial stalls."},
                    233:        {0xe0, 0, "BR_INST_DECODED",
                    234:         "Number of branch instructions decoded."},
                    235:        {0xe2, 0, "BTB_MISSES",
                    236:         "Number of branches that miss the BTB."},
                    237:        {0xe4, 0, "BR_BOGUS",
                    238:         "Number of bogus branches."},
                    239:        {0xe6, 0, "BACLEARS",
                    240:         "Number of times BACLEAR is asserted."},
                    241:        {0x0, 0, NULL, NULL},
1.1       dm        242: };
1.3       downsj    243:
1.1       dm        244: static void
                    245: printdesc (char *desc)
                    246: {
1.7       mickey    247:        char *p;
1.1       dm        248:
1.7       mickey    249:        for (;;) {
                    250:                while (*desc == ' ')
                    251:                        desc++;
                    252:                if (strlen(desc) < 70) {
                    253:                        if (*desc)
                    254:                                printf("      %s\n", desc);
                    255:                        return;
                    256:                }
                    257:                p = desc + 72;
                    258:                while (*--p != ' ')
                    259:                        ;
                    260:                while (*--p == ' ')
                    261:                        ;
                    262:                p++;
                    263:                printf("      %.*s\n", p - desc, desc);
                    264:                desc = p;
                    265:        }
1.1       dm        266: }
                    267:
                    268: /* Print all possible counter functions */
                    269: static void
                    270: list (int fam)
                    271: {
1.7       mickey    272:        struct ctrfn *cfnp;
1.1       dm        273:
1.7       mickey    274:        if (fam == 5)
                    275:                cfnp = p5fn;
                    276:        else if (fam == 6)
                    277:                cfnp = p6fn;
                    278:        else {
                    279:                fprintf(stderr, "Unknown CPU family %d\n", fam);
                    280:                exit (1);
                    281:        }
                    282:        printf("Hardware counter functions for the %s:\n\n",
                    283:        fam == 5 ? "Pentium" : "Pentium Pro");
                    284:        for (; cfnp->name; cfnp++) {
                    285:                printf("%02x  %s", cfnp->fn, cfnp->name);
                    286:                if (cfnp->flags & CFL_MESI)
                    287:                        printf("/mesi");
                    288:                else if (cfnp->flags & CFL_SA)
                    289:                        printf("/a");
                    290:                if (cfnp->flags & CFL_C0)
                    291:                        printf("  (ctr0 only)");
                    292:                if (cfnp->flags & CFL_C1)
                    293:                        printf("  (ctr1 only)");
                    294:                printf("\n");
                    295:                if (cfnp->desc)
                    296:                        printdesc(cfnp->desc);
                    297:        }
1.1       dm        298: }
                    299:
                    300: struct ctrfn *
                    301: fn2cfnp (u_int family, u_int sel)
                    302: {
1.7       mickey    303:        struct ctrfn *cfnp;
1.1       dm        304:
1.7       mickey    305:        if (family == 6) {
                    306:                cfnp = p6fn;
                    307:                sel &= 0xff;
                    308:        } else {
                    309:                cfnp = p5fn;
                    310:                sel &= 0x3f;
                    311:        }
                    312:        for (; cfnp->name; cfnp++)
                    313:                if (cfnp->fn == sel)
                    314:                        return (cfnp);
                    315:        return (NULL);
1.1       dm        316: }
                    317:
                    318: static char *
                    319: fn2str (int family, u_int sel)
                    320: {
1.7       mickey    321:        static char buf[128];
                    322:        char um[9] = "";
                    323:        char cm[6] = "";
                    324:        struct ctrfn *cfnp;
                    325:        u_int fn;
                    326:
                    327:        if (family == 5) {
                    328:                fn = sel & 0x3f;
                    329:                cfnp = fn2cfnp (family, fn);
1.8     ! deraadt   330:                snprintf(buf, sizeof buf, "%c%c%c %02x %s",
1.7       mickey    331:                    sel & P5CTR_C ? 'c' : '-',
                    332:                    sel & P5CTR_U ? 'u' : '-',
                    333:                    sel & P5CTR_K ? 'k' : '-',
                    334:                    fn, cfnp ? cfnp->name : "unknown function");
                    335:        }
                    336:        else if (family == 6) {
                    337:                fn = sel & 0xff;
                    338:                cfnp = fn2cfnp (family, fn);
                    339:                if (cfnp && cfnp->flags & CFL_MESI)
1.8     ! deraadt   340:                        snprintf(um, sizeof um, "/%c%c%c%c",
1.7       mickey    341:                            sel & P6CTR_UM_M ? 'm' : '-',
                    342:                            sel & P6CTR_UM_E ? 'e' : '-',
                    343:                            sel & P6CTR_UM_S ? 's' : '-',
                    344:                            sel & P6CTR_UM_I ? 'i' : '-');
                    345:                else if (cfnp && cfnp->flags & CFL_SA)
1.8     ! deraadt   346:                        snprintf(um, sizeof um, "/%c",
        !           347:                            sel & P6CTR_UM_A ? 'a' : '-');
1.7       mickey    348:                if (sel >> 24)
1.8     ! deraadt   349:                        snprintf(cm, sizeof cm, "+%d", sel >> 24);
        !           350:                snprintf(buf, sizeof buf, "%c%c%c%c %02x%s%s%*s %s",
1.7       mickey    351:                    sel & P6CTR_I ? 'i' : '-',
                    352:                    sel & P6CTR_E ? 'e' : '-',
                    353:                    sel & P6CTR_K ? 'k' : '-',
                    354:                    sel & P6CTR_U ? 'u' : '-',
                    355:                    fn, cm, um, 7 - (strlen (cm) + strlen (um)), "",
                    356:                    cfnp ? cfnp->name : "unknown function");
                    357:        }
                    358:        else
                    359:                return (NULL);
                    360:        return (buf);
1.1       dm        361: }
                    362:
                    363: /* Print status of counters */
                    364: static void
                    365: readst (void)
                    366: {
1.7       mickey    367:        int fd, i;
                    368:        struct pctrst st;
1.1       dm        369:
1.7       mickey    370:        fd = open (_PATH_PCTR, O_RDONLY);
                    371:        if (fd < 0)
                    372:                err (1, _PATH_PCTR);
                    373:        if (ioctl (fd, PCIOCRD, &st) < 0)
                    374:                err (1, "PCIOCRD");
                    375:        close (fd);
                    376:
                    377:        if (usep5ctr || usep6ctr) {
                    378:                for (i = 0; i < PCTR_NUM; i++)
                    379:                        printf(" ctr%d = %16qd  [%s]\n", i, st.pctr_hwc[i],
                    380:                            fn2str (cpufamily, st.pctr_fn[i]));
                    381:        }
                    382:        printf("  tsc = %16qd\n  idl = %16qd\n", st.pctr_tsc, st.pctr_idl);
1.1       dm        383: }
                    384:
                    385: static void
                    386: setctr (int ctr, u_int val)
                    387: {
1.7       mickey    388:        int fd;
1.1       dm        389:
1.7       mickey    390:        fd = open (_PATH_PCTR, O_WRONLY);
                    391:        if (fd < 0)
                    392:                err (1, _PATH_PCTR);
                    393:        if (ioctl (fd, PCIOCS0 + ctr, &val) < 0)
                    394:                err (1, "PCIOCSn");
                    395:        close (fd);
1.1       dm        396: }
                    397:
                    398: static void
                    399: usage (void)
                    400: {
1.7       mickey    401:        fprintf(stderr,
1.1       dm        402:           "usage:\n"
                    403:           "  %s\n"
                    404:           "    Read the counters.\n"
                    405:           "  %s -l [5|6]\n"
                    406:           "    List all possible counter functions for P5/P6.\n",
1.4       downsj    407:           __progname, __progname);
1.7       mickey    408:        if (usep5ctr)
                    409:                fprintf(stderr,
1.1       dm        410:             "  %s -s {0|1} [-[c][u][k]] function\n"
                    411:             "    Configure counter.\n"
                    412:             "      0/1 - counter to configure\n"
                    413:             "        c - count cycles not events\n"
                    414:             "        u - count events in user mode (ring 3)\n"
                    415:             "        k - count events in kernel mode (rings 0-2)\n",
1.4       downsj    416:             __progname);
1.7       mickey    417:        else if (usep6ctr)
                    418:                fprintf(stderr,
1.1       dm        419:             "  %s -s {0|1} [-[i][e][k][u]] "
                    420:             "function[+cm][/{[m][e][s][i]|[a]}]\n"
                    421:             "    Configure counter.\n"
                    422:             "       0/1 - counter number to configure\n"
                    423:             "         i - invert cm\n"
                    424:             "         e - edge detect\n"
                    425:             "         k - count events in kernel mode (rings 0-2)\n"
                    426:             "         u - count events in user mode (ring 3)\n"
                    427:             "        cm - # events/cycle required to bump ctr\n"
                    428:             "      mesi - Modified/Exclusive/Shared/Invalid in cache\n"
1.4       downsj    429:             "       s/a - self generated/all events\n", __progname);
1.7       mickey    430:        exit (1);
1.1       dm        431: }
                    432:
                    433: int
                    434: main (int argc, char **argv)
                    435: {
1.7       mickey    436:        u_int ctr;
                    437:        char *cp;
                    438:        u_int fn, fl = 0;
                    439:        char **ap;
                    440:        int ac;
                    441:        struct ctrfn *cfnp;
                    442:        int mib[2];
                    443:        size_t len;
                    444:
                    445:        /* Get the kernel cpuid return values. */
                    446:        mib[0] = CTL_MACHDEP;
                    447:        mib[1] = CPU_CPUVENDOR;
                    448:        if (sysctl(mib, 2, NULL, &len, NULL, 0) == -1)
                    449:                err(1, "sysctl CPU_CPUVENDOR");
                    450:        if (len > sizeof(cpu_vendor))           /* Shouldn't ever happen. */
                    451:                err(1, "sysctl CPU_CPUVENDOR too big");
                    452:        if (sysctl(mib, 2, cpu_vendor, &len, NULL, 0) == -1)
                    453:                err(1, "sysctl CPU_CPUVENDOR");
                    454:
                    455:        mib[1] = CPU_CPUID;
                    456:        len = sizeof(cpu_id);
                    457:        if (sysctl(mib, 2, &cpu_id, &len, NULL, 0) == -1)
                    458:                err(1, "sysctl CPU_CPUID");
                    459:
                    460:        mib[1] = CPU_CPUFEATURE;
                    461:        len = sizeof(cpu_feature);
                    462:        if (sysctl(mib, 2, &cpu_feature, &len, NULL, 0) == -1)
                    463:                err(1, "sysctl CPU_CPUFEATURE");
                    464:
                    465:        pctr_isintel = (strcmp(cpu_vendor, "GenuineIntel") == 0);
                    466:
                    467:        if (argc <= 1)
                    468:                readst ();
                    469:        else if (argc == 2 && !strcmp (argv[1], "-l"))
                    470:                list (cpufamily);
                    471:        else if (argc == 3 && !strcmp (argv[1], "-l"))
                    472:                list (atoi (argv[2]));
                    473:        else if (!strcmp (argv[1], "-s") && argc >= 4) {
                    474:                ctr = atoi (argv[2]);
                    475:                if (ctr >= PCTR_NUM)
                    476:                        usage ();
                    477:                ap = &argv[3];
                    478:                ac = argc - 3;
                    479:
                    480:                if (usep6ctr)
                    481:                fl |= P6CTR_EN;
                    482:                if (**ap == '-') {
                    483:                        cp = *ap;
                    484:                        if (usep6ctr)
                    485:                                while (*++cp)
                    486:                                        switch (*cp) {
                    487:                                        case 'i':
                    488:                                                fl |= P6CTR_I;
                    489:                                                break;
                    490:                                        case 'e':
                    491:                                                fl |= P6CTR_E;
                    492:                                                break;
                    493:                                        case 'k':
                    494:                                                fl |= P6CTR_K;
                    495:                                                break;
                    496:                                        case 'u':
                    497:                                                fl |= P6CTR_U;
                    498:                                                break;
                    499:                                        default:
                    500:                                                usage ();
                    501:                                        }
                    502:                        else if(usep5ctr)
                    503:                                while (*++cp)
                    504:                                        switch (*cp) {
                    505:                                        case 'c':
                    506:                                                fl |= P5CTR_C;
                    507:                                                break;
                    508:                                        case 'k':
                    509:                                                fl |= P5CTR_K;
                    510:                                                break;
                    511:                                        case 'u':
                    512:                                                fl |= P5CTR_U;
                    513:                                                break;
                    514:                                        default:
                    515:                                                usage ();
                    516:                                        }
                    517:                        ap++;
                    518:                        ac--;
                    519:                }
                    520:                else {
                    521:                        if (usep6ctr)
                    522:                                fl |= P6CTR_U|P6CTR_K;
                    523:                        else if (usep5ctr)
                    524:                                fl |= P5CTR_U|P5CTR_K;
                    525:                }
                    526:
                    527:                if (!ac)
                    528:                        usage ();
                    529:
                    530:                fn = strtoul (*ap, NULL, 16);
                    531:                if ((usep6ctr && (fn & ~0xff)) || (!usep6ctr && (fn & ~0x3f)))
                    532:                        usage ();
                    533:                fl |= fn;
                    534:                if (usep6ctr && (cp = strchr (*ap, '+'))) {
                    535:                        cp++;
                    536:                        fn = strtol (cp, NULL, 0);
                    537:                        if (fn & ~0xff)
                    538:                                usage ();
                    539:                        fl |= (fn << 24);
                    540:                }
                    541:                cfnp = fn2cfnp (6, fl);
                    542:                if (usep6ctr && cfnp && (cp = strchr (*ap, '/'))) {
                    543:                        if (cfnp->flags & CFL_MESI)
                    544:                                while (*++cp)
                    545:                                        switch (*cp) {
                    546:                                        case 'm':
                    547:                                                fl |= P6CTR_UM_M;
                    548:                                                break;
                    549:                                        case 'e':
                    550:                                                fl |= P6CTR_UM_E;
                    551:                                                break;
                    552:                                        case 's':
                    553:                                                fl |= P6CTR_UM_S;
                    554:                                                break;
                    555:                                        case 'i':
                    556:                                                fl |= P6CTR_UM_I;
                    557:                                                break;
                    558:                                        default:
                    559:                                                usage ();
                    560:                                        }
                    561:                        else if (cfnp->flags & CFL_SA)
                    562:                                while (*++cp)
                    563:                                        switch (*cp) {
                    564:                                        case 'a':
                    565:                                                fl |= P6CTR_UM_A;
                    566:                                                break;
                    567:                                        default:
                    568:                                                usage ();
                    569:                                        }
                    570:                        else
                    571:                                usage ();
                    572:                }
                    573:                else if (cfnp && (cfnp->flags & CFL_MESI))
                    574:                        fl |= P6CTR_UM_MESI;
                    575:                ap++;
                    576:                ac--;
                    577:
                    578:                if (ac)
                    579:                        usage ();
                    580:
                    581:                if (usep6ctr && ! (fl & 0xff))
                    582:                        fl = 0;
                    583:                setctr (ctr, fl);
                    584:        }
                    585:        else
                    586:                usage ();
1.1       dm        587:
1.7       mickey    588:        return 0;
1.1       dm        589: }