|
|
1.1 root 1: static char ID[] = "@(#) instr.c: 1.1 1/6/82";
2:
3: /*
4: * Define various statistic-collection variables used to monitor the
5: * internal workings of ld
6: *
7: *
8: * Collection of statistics is automatic. Output of these variables
9: * is controlled by the presence of the UN*X file "instr.data". If
10: * this file exists and can be opened for "append", these variables
11: * are output. Output occurs only on complete, successful of ld.
12: *
13: *
14: * In addition, there is the standard debug flag, "-dn", which
15: * controls the output of intermediate information to stderr during
16: * the ld run.
17: *
18: * A SDP profile is generated by using the dflag values of:
19: *
20: * >10 : output to stderr information on calls to the SDP
21: * function repartition()
22: *
23: * >12 : output to stderr additional information on calls
24: * to the SDP function repartition()
25: *
26: * >15 : output to stderr information on calls to the SDP
27: * functions allocate, lock, and unlock. In addition,
28: * indicate when all SDP I/O occurres
29: */
30:
31: long SDP_read = 0L, /* calls to read() from within SDP */
32: SDP_write = 0L, /* calls to write() from within SDP */
33: LD_lock = 0L, /* calls to lock() from within LD */
34: LD_unlock = 0L; /* calls to unlock() from within LD */
35:
36: long noutsyms = 0L, /* total size of output symbol table*/
37: maxrelocsms = 0L; /* size of largest input symbol tble*/
38:
39: long numldsyms = 0L, /* number of global symbols */
40: numldaux = 0L, /* number of aux entreis */
41: nwalks = 0L, /* number of collision chain walks */
42: nfwalks = 0L, /* number of unsuccessful walks */
43: ncolisns = 0L, /* number of hashtab[] collisions */
44: maxchain = 0L; /* max length of a collision chain */
45:
46: extern long allocspc, /* amount of space myalloc() used */
47: maxalloc; /* max amount allocated */
48:
49: long ttime; /* total elapsed time */
50: struct tbuffer { /* process and child execution */
51: long proc_user_time; /* times, as returned by the */
52: long proc_system_time; /* times() function */
53: long child_user_time;
54: long child_system_time;
55: } ptimes;
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.