![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to bar CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Research Unix] / researchv10no / cmd / ccom / vax|
Return to bar CVS log | Up to [Research Unix] / researchv10no / cmd / ccom / vax |
1.1 root 1: L11: .stabs "",0x64,0,0,L11
2: .stabs "vaxpcc2",0xf0,0,17665,590758101
3: .data
4: .comm _symseg,800
5: .comm _csymseg,4
6: .comm _cursym,12
7: .comm _lastsym,4
8: .comm _nextsym,4
9: .comm _addsym,4
10: .comm _nsym,4
11: .comm _p_etext,4
12: .comm _p_edata,4
13: .comm _p_end,4
14: .comm _entrypt,4
15: .comm _li_init,1000
16: .data
17: .align 2
18: .globl _libseg
19: _libseg:
20: .long _li_init
21: .long 0
22: .long 0
23: .space 468
24: .data
25: .align 2
26: .globl _clibseg
27: _clibseg:
28: .long _libseg
29: .comm _lochash,124
30: .comm _lhinit,1200
31: .data
32: .align 2
33: .globl _locseg
34: _locseg:
35: .long _lhinit
36: .long 0
37: .space 312
38: .comm _clocseg,4
39: .comm _tnum,4
40: .comm _ssiz,4
41: .comm _tab,4
42: .comm _tabstr,4
43: .comm _page,8224
44: .comm _fpage,16
45: .comm _text,24
46: .comm _reloc,24
47: .comm _filhdr,32
48: .comm _archdr,60
49: .comm _trace,4
50: .comm _xflag,4
51: .comm _Xflag,4
52: .comm _Sflag,4
53: .comm _rflag,4
54: .comm _arflag,4
55: .comm _sflag,4
56: .comm _Mflag,4
57: .comm _nflag,4
58: .comm _dflag,4
59: .comm _zflag,4
60: .comm _hsize,4
61: .comm _Aflag,4
62: .comm _Nflag,4
63: .comm _funding,4
64: .comm _yflag,4
65: .comm _ytab,4
66: .comm _tsize,4
67: .comm _dsize,4
68: .comm _bsize,4
69: .comm _trsize,4
70: .comm _drsize,4
71: .comm _ssize,4
72: .comm _ctrel,4
73: .comm _cdrel,4
74: .comm _cbrel,4
75: .comm _textbase,4
76: .comm _database,4
77: .comm _torigin,4
78: .comm _dorigin,4
79: .comm _borigin,4
80: .comm _errlev,4
81: .data
82: .align 2
83: .globl _delarg
84: _delarg:
85: .long 4
86: .comm _biobufs,4
87: .comm _biofd,4
88: .comm _boffset,4
89: .comm _tout,4
90: .comm _dout,4
91: .comm _trout,4
92: .comm _drout,4
93: .comm _sout,4
94: .comm _strout,4
95: .align 2
96: .globl _offset
97: _offset:
98: .long 4
99: .comm _ofilfnd,4
100: .align 2
101: .globl _ofilename
102: _ofilename:
103: .data 2
104: L96:
105:
106: .byte 0x6c,0x2e,0x6f,0x75,0x74,0x0
107: .data
108: .long L96
109: .comm _ofilemode,4
110: .comm _infil,4
111: .comm _filname,4
112: .comm _curstr,4
113: .text
114: .align 2
115: .globl _main
116: _main:
117: .word L.R1
118: subl2 $L.SO1,sp
119: .stabs "main",0x24,0,323,_main
120: .stabs "argc",0xa0,0,4,4
121: .stabs "argv",0xa0,0,162,8
122: pushl $1
123: pushl $2
124: calls $2,_signal
125: cmpl r0,$1
126: jeql L106
127: pushl $_delexit
128: pushl $2
129: calls $2,_signal
130: pushl $_delexit
131: pushl $15
132: calls $2,_signal
133: L106:
134: cmpl 4(ap),$1
135: jneq L107
136: pushl $4
137: calls $1,_exit
138: L107:
139: addl3 $4,8(ap),r8
140: movl $1,r11
141: jbr L111
142: L112:
143: tstl _trace
144: jeql L113
145: .data 1
146: L115:
147:
148: .byte 0x25,0x73,0x3a,0xa,0x0
149: .text
150: pushl (r8)
151: pushl $L115
152: calls $2,_printf
153: L113:
154: clrl _filname
155: movl (r8)+,r9
156: cmpb (r9),$45
157: jeql L116
158: pushl r9
159: calls $1,_load1arg
160: jbr L109
161: L116:
162: movl $1,r10
163: jbr L120
164: L121:
165: cvtbl (r9)[r10],r0
166: jbr L123
167: L124:
168: incl r11
169: cmpl r11,4(ap)
170: jlss L125
171: .data 1
172: L127:
173:
174: .byte 0x2d,0x6f,0x20,0x77,0x68,0x65,0x72,0x65
175: .byte 0x3f,0x0
176: .text
177: pushl $L127
178: pushl $1
179: calls $2,_error
180: L125:
181: movl (r8)+,_ofilename
182: incl _ofilfnd
183: jbr L118
184: L128:
185: L129:
186: incl r11
187: cmpl r11,4(ap)
188: jlss L130
189: .data 1
190: L131:
191:
192: .byte 0x2d,0x75,0x20,0x6f,0x72,0x20,0x2d,0x63
193: .byte 0x3a,0x20,0x61,0x72,0x67,0x20,0x6d,0x69
194: .byte 0x73,0x73,0x69,0x6e,0x67,0x0
195: .text
196: pushl $L131
197: pushl $1
198: calls $2,_error
199: L130:
200: pushl (r8)+
201: calls $1,_slookup
202: pushl r0
203: calls $1,_enter
204: cmpb (r9)[r10],$101
205: jneq L133
206: movl _lastsym,_entrypt
207: L133:
208: jbr L118
209: L134:
210: incl r11
211: cmpl r11,4(ap)
212: jlss L135
213: .data 1
214: L136:
215:
216: .byte 0x2d,0x48,0x3a,0x20,0x61,0x72,0x67,0x20
217: .byte 0x6d,0x69,0x73,0x73,0x69,0x6e,0x67,0x0
218: .text
219: pushl $L136
220: pushl $1
221: calls $2,_error
222: L135:
223: tstl _tsize
224: jeql L137
225: .data 1
226: L138:
227:
228: .byte 0x2d,0x48,0x3a,0x20,0x74,0x6f,0x6f,0x20
229: .byte 0x6c,0x61,0x74,0x65,0x2c,0x20,0x73,0x6f
230: .byte 0x6d,0x65,0x20,0x74,0x65,0x78,0x74,0x20
231: .byte 0x61,0x6c,0x72,0x65,0x61,0x64,0x79,0x20
232: .byte 0x6c,0x6f,0x61,0x64,0x65,0x64,0x0
233: .text
234: pushl $L138
235: pushl $1
236: calls $2,_error
237: L137:
238: pushl (r8)+
239: calls $1,_atoi
240: movl r0,_hsize
241: jbr L118
242: L140:
243: incl r11
244: cmpl r11,4(ap)
245: jlss L141
246: .data 1
247: L142:
248:
249: .byte 0x2d,0x41,0x3a,0x20,0x61,0x72,0x67,0x20
250: .byte 0x6d,0x69,0x73,0x73,0x69,0x6e,0x67,0x0
251: .text
252: pushl $L142
253: pushl $1
254: calls $2,_error
255: L141:
256: tstl _Aflag
257: jeql L143
258: .data 1
259: L144:
260:
261: .byte 0x2d,0x41,0x3a,0x20,0x6f,0x6e,0x6c,0x79
262: .byte 0x20,0x6f,0x6e,0x65,0x20,0x62,0x61,0x73
263: .byte 0x65,0x20,0x66,0x69,0x6c,0x65,0x20,0x61
264: .byte 0x6c,0x6c,0x6f,0x77,0x65,0x64,0x0
265: .text
266: pushl $L144
267: pushl $1
268: calls $2,_error
269: L143:
270: movl $1,_Aflag
271: clrl _nflag
272: movl $1,_funding
273: pushl (r8)+
274: calls $1,_load1arg
275: clrl _bsize
276: movl _bsize,_dsize
277: movl _dsize,_tsize
278: movl _tsize,_drsize
279: movl _drsize,_trsize
280: clrl _cbrel
281: movl _cbrel,_cdrel
282: movl _cdrel,_ctrel
283: clrl _funding
284: movl _nextsym,_addsym
285: jbr L118
286: L145:
287: incl r11
288: cmpl r11,4(ap)
289: jlss L146
290: .data 1
291: L147:
292:
293: .byte 0x2d,0x44,0x3a,0x20,0x61,0x72,0x67,0x20
294: .byte 0x6d,0x69,0x73,0x73,0x69,0x6e,0x67,0x0
295: .text
296: pushl $L147
297: pushl $1
298: calls $2,_error
299: L146:
300: pushl (r8)+
301: calls $1,_htoi
302: movl r0,-4(fp)
303: cmpl _dsize,-4(fp)
304: jleq L149
305: .data 1
306: L150:
307:
308: .byte 0x2d,0x44,0x3a,0x20,0x74,0x6f,0x6f,0x20
309: .byte 0x73,0x6d,0x61,0x6c,0x6c,0x0
310: .text
311: pushl $L150
312: pushl $1
313: calls $2,_error
314: L149:
315: movl -4(fp),_dsize
316: jbr L118
317: L151:
318: incl r11
319: cmpl r11,4(ap)
320: jlss L152
321: .data 1
322: L153:
323:
324: .byte 0x2d,0x54,0x3a,0x20,0x61,0x72,0x67,0x20
325: .byte 0x6d,0x69,0x73,0x73,0x69,0x6e,0x67,0x0
326: .text
327: pushl $L153
328: pushl $1
329: calls $2,_error
330: L152:
331: tstl _tsize
332: jeql L154
333: .data 1
334: L155:
335:
336: .byte 0x2d,0x54,0x3a,0x20,0x74,0x6f,0x6f,0x20
337: .byte 0x6c,0x61,0x74,0x65,0x2c,0x20,0x73,0x6f
338: .byte 0x6d,0x65,0x20,0x74,0x65,0x78,0x74,0x20
339: .byte 0x61,0x6c,0x72,0x65,0x61,0x64,0x79,0x20
340: .byte 0x6c,0x6f,0x61,0x64,0x65,0x64,0x0
341: .text
342: pushl $L155
343: pushl $1
344: calls $2,_error
345: L154:
346: pushl (r8)+
347: calls $1,_htoi
348: movl r0,_textbase
349: jbr L118
350: L156:
351: decl r10
352: addl3 r9,r10,r0
353: movb (r0),-5(fp)
354: movb $45,(r9)[r10]
355: addl3 r9,r10,-(sp)
356: calls $1,_load1arg
357: movb -5(fp),(r9)[r10]
358: jbr L157
359: L158:
360: incl _Mflag
361: jbr L118
362: L159:
363: incl _xflag
364: jbr L118
365: L160:
366: incl _Xflag
367: jbr L118
368: L161:
369: incl _Sflag
370: jbr L118
371: L162:
372: incl _rflag
373: incl _arflag
374: jbr L118
375: L163:
376: incl _sflag
377: incl _xflag
378: jbr L118
379: L164:
380: incl _nflag
381: clrl _zflag
382: movl _zflag,_Nflag
383: jbr L118
384: L165:
385: incl _Nflag
386: clrl _zflag
387: movl _zflag,_nflag
388: jbr L118
389: L166:
390: incl _dflag
391: jbr L118
392: L167:
393: .data 1
394: L168:
395:
396: .byte 0x6c,0x64,0x3a,0x20,0x2d,0x69,0x20,0x69
397: .byte 0x67,0x6e,0x6f,0x72,0x65,0x64,0xa,0x0
398: .text
399: pushl $L168
400: calls $1,_printf
401: jbr L118
402: L169:
403: incl _trace
404: jbr L118
405: L170:
406: addl3 $1,r10,r0
407: addl2 r9,r0
408: tstb (r0)
409: jneq L171
410: .data 1
411: L172:
412:
413: .byte 0x2d,0x79,0x3a,0x20,0x73,0x79,0x6d,0x62
414: .byte 0x6f,0x6c,0x20,0x6e,0x61,0x6d,0x65,0x20
415: .byte 0x6d,0x69,0x73,0x73,0x69,0x6e,0x67,0x0
416: .text
417: pushl $L172
418: pushl $1
419: calls $2,_error
420: L171:
421: tstl _yflag
422: jneq L173
423: pushl $4
424: pushl 4(ap)
425: calls $2,_calloc
426: movl r0,_ytab
427: tstl _ytab
428: jneq L175
429: .data 1
430: L176:
431:
432: .byte 0x72,0x61,0x6e,0x20,0x6f,0x75,0x74,0x20
433: .byte 0x6f,0x66,0x20,0x6d,0x65,0x6d,0x6f,0x72
434: .byte 0x79,0x20,0x28,0x2d,0x79,0x29,0x0
435: .text
436: pushl $L176
437: pushl $1
438: calls $2,_error
439: L175:
440: L173:
441: movl _yflag,r0
442: incl _yflag
443: addl3 $1,r10,r1
444: addl3 r9,r1,*_ytab[r0]
445: jbr L157
446: L177:
447: incl _zflag
448: clrl _nflag
449: movl _nflag,_Nflag
450: jbr L118
451: L178:
452: .data 1
453: L179:
454:
455: .byte 0x2d,0x78,0x0
456: .text
457: pushl $L179
458: calls $1,_savestr
459: movl r0,_filname
460: movl _filname,r0
461: movb (r9)[r10],1(r0)
462: clrb _archdr
463: .data 1
464: L180:
465:
466: .byte 0x62,0x61,0x64,0x20,0x66,0x6c,0x61,0x67
467: .byte 0x0
468: .text
469: pushl $L180
470: pushl $1
471: calls $2,_error
472: jbr L122
473: L123:
474: casel r0,$65,$57
475: L181:
476: .word L140-L181
477: .word L178-L181
478: .word L178-L181
479: .word L145-L181
480: .word L178-L181
481: .word L178-L181
482: .word L178-L181
483: .word L134-L181
484: .word L178-L181
485: .word L178-L181
486: .word L178-L181
487: .word L178-L181
488: .word L158-L181
489: .word L165-L181
490: .word L178-L181
491: .word L178-L181
492: .word L178-L181
493: .word L178-L181
494: .word L161-L181
495: .word L151-L181
496: .word L178-L181
497: .word L178-L181
498: .word L178-L181
499: .word L160-L181
500: .word L178-L181
501: .word L178-L181
502: .word L178-L181
503: .word L178-L181
504: .word L178-L181
505: .word L178-L181
506: .word L178-L181
507: .word L178-L181
508: .word L178-L181
509: .word L178-L181
510: .word L178-L181
511: .word L166-L181
512: .word L129-L181
513: .word L178-L181
514: .word L178-L181
515: .word L178-L181
516: .word L167-L181
517: .word L178-L181
518: .word L178-L181
519: .word L156-L181
520: .word L178-L181
521: .word L164-L181
522: .word L124-L181
523: .word L178-L181
524: .word L178-L181
525: .word L162-L181
526: .word L163-L181
527: .word L169-L181
528: .word L128-L181
529: .word L178-L181
530: .word L178-L181
531: .word L159-L181
532: .word L170-L181
533: .word L177-L181
534: jbr L178
535: L122:
536: L118:
537: incl r10
538: L120:
539: tstb (r9)[r10]
540: jneq L121
541: L119:
542: L157:
543: L109:
544: incl r11
545: L111:
546: cmpl r11,4(ap)
547: jlss L112
548: L110:
549: tstl _rflag
550: jneq L182
551: tstl _Nflag
552: jneq L182
553: L184:
554: tstl _nflag
555: jneq L182
556: L183:
557: incl _zflag
558: L182:
559: pushl 8(ap)
560: pushl 4(ap)
561: calls $2,_endload
562: pushl $0
563: calls $1,_exit
564: .stabs "save",0x80,0,2,5
565: .stabs "p",0x40,0,162,8
566: .stabs "ap",0x40,0,34,9
567: .stabs "num",0x80,0,4,4
568: .stabs "i",0x40,0,4,10
569: .stabs "c",0x40,0,4,11
570: L105:
571: ret
572: .set L.R1,0xf00
573: .set L.SO1,0x8
574: L186: .data
575: .text
576: .align 2
577: .globl _htoi
578: _htoi:
579: .word L.R2
580: subl2 $L.SO2,sp
581: .stabs "htoi",0x24,0,479,_htoi
582: .stabs "p",0xa0,0,34,4
583: movl 4(ap),r11
584: clrl r9
585: jbr L189
586: L190:
587: addl2 r9,r9
588: addl2 r9,r9
589: addl2 r9,r9
590: addl2 r9,r9
591: bitb $4,__ctype+1(r10)
592: jeql L191
593: subl3 $48,r10,r0
594: addl2 r0,r9
595: jbr L192
596: L191:
597: cmpl r10,$97
598: jlss L193
599: cmpl r10,$102
600: jgtr L193
601: L194:
602: subl3 $87,r10,r0
603: addl2 r0,r9
604: jbr L195
605: L193:
606: cmpl r10,$65
607: jlss L196
608: cmpl r10,$70
609: jgtr L196
610: L197:
611: subl3 $55,r10,r0
612: addl2 r0,r9
613: jbr L198
614: L196:
615: .data 1
616: L199:
617:
618: .byte 0x62,0x61,0x64,0x6c,0x79,0x20,0x66,0x6f
619: .byte 0x72,0x6d,0x65,0x64,0x20,0x68,0x65,0x78
620: .byte 0x20,0x6e,0x75,0x6d,0x62,0x65,0x72,0x0
621: .text
622: pushl $L199
623: pushl $1
624: calls $2,_error
625: L198:
626: L195:
627: L192:
628: L189:
629: cvtbl (r11)+,r10
630: jneq L190
631: L188:
632: movl r9,r0
633: jbr L187
634: .stabs "n",0x40,0,4,9
635: .stabs "c",0x40,0,4,10
636: .stabs "p",0x40,0,34,11
637: L187:
638: ret
639: .set L.R2,0xe00
640: .set L.SO2,0x0
641: L200: .data
642: .text
643: .align 2
644: .globl _delexit
645: _delexit:
646: .word L.R3
647: subl2 $L.SO3,sp
648: .stabs "delexit",0x24,0,498,_delexit
649: calls $0,_bflush
650: .data 1
651: L204:
652:
653: .byte 0x6c,0x2e,0x6f,0x75,0x74,0x0
654: .text
655: pushl $L204
656: calls $1,_unlink
657: tstl _delarg
658: jneq L205
659: tstl _Aflag
660: jneq L205
661: L206:
662: pushl _ofilemode
663: pushl _ofilename
664: calls $2,_chmod
665: L205:
666: pushl _delarg
667: calls $1,_exit
668: L201:
669: ret
670: .set L.R3,0x0
671: .set L.SO3,0x0
672: L208: .data
673: .text
674: .align 2
675: .globl _endload
676: _endload:
677: .word L.R4
678: subl2 $L.SO4,sp
679: .stabs "endload",0x24,0,510,_endload
680: .stabs "argc",0xa0,0,4,4
681: .stabs "argv",0xa0,0,162,8
682: movl $_libseg,_clibseg
683: clrl _filname
684: calls $0,_middle
685: calls $0,_setupout
686: addl3 $4,8(ap),r8
687: movl $1,r11
688: jbr L214
689: L215:
690: movl (r8)+,r9
691: tstl _trace
692: jeql L216
693: .data 1
694: L217:
695:
696: .byte 0x25,0x73,0x3a,0xa,0x0
697: .text
698: pushl r9
699: pushl $L217
700: calls $2,_printf
701: L216:
702: cmpb (r9),$45
703: jeql L218
704: pushl r9
705: calls $1,_load2arg
706: jbr L212
707: L218:
708: movl $1,r10
709: jbr L222
710: L223:
711: cvtbl (r9)[r10],r0
712: jbr L225
713: L226:
714: pushl (r8)
715: calls $1,_htoi
716: movl r0,-4(fp)
717: cmpl _dorigin,-4(fp)
718: jgeq L227
719: jbr L229
720: L230:
721: tstw *_dout
722: jeql L232
723: decw *_dout
724: clrb r0
725: movl _dout,r1
726: movl 4(r1),r2
727: incl 4(r1)
728: movb r0,(r2)
729: jbr L233
730: L232:
731: pushl $0
732: pushl _dout
733: calls $2,_bflushc
734: L233:
735: movl _dorigin,r0
736: incl _dorigin
737: L229:
738: cmpl _dorigin,-4(fp)
739: jlss L230
740: L228:
741: L227:
742: L234:
743: L235:
744: L236:
745: L237:
746: L238:
747: incl r11
748: addl2 $4,r8
749: L239:
750: jbr L220
751: L240:
752: movl $1,_funding
753: pushl (r8)+
754: calls $1,_load2arg
755: clrl _funding
756: incl r11
757: jbr L220
758: L241:
759: jbr L242
760: L243:
761: decl r10
762: addl3 r9,r10,r0
763: movb $45,(r0)
764: addl3 r9,r10,-(sp)
765: calls $1,_load2arg
766: jbr L242
767: L225:
768: casel r0,$65,$56
769: L244:
770: .word L240-L244
771: .word L239-L244
772: .word L239-L244
773: .word L226-L244
774: .word L239-L244
775: .word L239-L244
776: .word L239-L244
777: .word L238-L244
778: .word L239-L244
779: .word L239-L244
780: .word L239-L244
781: .word L239-L244
782: .word L239-L244
783: .word L239-L244
784: .word L239-L244
785: .word L239-L244
786: .word L239-L244
787: .word L239-L244
788: .word L239-L244
789: .word L234-L244
790: .word L239-L244
791: .word L239-L244
792: .word L239-L244
793: .word L239-L244
794: .word L239-L244
795: .word L239-L244
796: .word L239-L244
797: .word L239-L244
798: .word L239-L244
799: .word L239-L244
800: .word L239-L244
801: .word L239-L244
802: .word L239-L244
803: .word L239-L244
804: .word L239-L244
805: .word L239-L244
806: .word L236-L244
807: .word L239-L244
808: .word L239-L244
809: .word L239-L244
810: .word L239-L244
811: .word L239-L244
812: .word L239-L244
813: .word L243-L244
814: .word L239-L244
815: .word L239-L244
816: .word L237-L244
817: .word L239-L244
818: .word L239-L244
819: .word L239-L244
820: .word L239-L244
821: .word L239-L244
822: .word L235-L244
823: .word L239-L244
824: .word L239-L244
825: .word L239-L244
826: .word L241-L244
827: jbr L239
828: L224:
829: L220:
830: incl r10
831: L222:
832: tstb (r9)[r10]
833: jneq L223
834: L221:
835: L242:
836: L212:
837: incl r11
838: L214:
839: cmpl r11,4(ap)
840: jlss L215
841: L213:
842: calls $0,_finishout
843: .stabs "p",0x40,0,162,8
844: .stabs "ap",0x40,0,34,9
845: .stabs "dnum",0x80,0,4,4
846: .stabs "i",0x40,0,4,10
847: .stabs "c",0x40,0,4,11
848: L209:
849: ret
850: .set L.R4,0xf00
851: .set L.SO4,0x4
852: L246: .data
853: .text
854: .align 2
855: .globl _load1arg
856: _load1arg:
857: .word L.R5
858: subl2 $L.SO5,sp
859: .stabs "load1arg",0x24,0,570,_load1arg
860: .stabs "cp",0xa0,0,34,4
861: movl 4(ap),r11
862: pushl r11
863: calls $1,_getfile
864: movl r0,-8(fp)
865: tstl _Mflag
866: jeql L249
867: .data 1
868: L250:
869:
870: .byte 0x25,0x73,0xa,0x0
871: .text
872: pushl _filname
873: pushl $L250
874: calls $2,_printf
875: L249:
876: movl -8(fp),r0
877: jbr L252
878: L253:
879: pushl $0
880: pushl $0
881: calls $2,_load1
882: jbr L251
883: L255:
884: .data 1
885: L256:
886:
887: .byte 0x77,0x61,0x72,0x6e,0x69,0x6e,0x67,0x3a
888: .byte 0x20,0x61,0x72,0x63,0x68,0x69,0x76,0x65
889: .byte 0x20,0x68,0x61,0x73,0x20,0x6e,0x6f,0x20
890: .byte 0x74,0x61,0x62,0x6c,0x65,0x20,0x6f,0x66
891: .byte 0x20,0x63,0x6f,0x6e,0x74,0x65,0x6e,0x74
892: .byte 0x73,0x3b,0x20,0x61,0x64,0x64,0x20,0x6f
893: .byte 0x6e,0x65,0x20,0x75,0x73,0x69,0x6e,0x67
894: .byte 0x20,0x72,0x61,0x6e,0x6c,0x69,0x62,0x28
895: .byte 0x31,0x29,0x0
896: .text
897: pushl $L256
898: pushl $-1
899: calls $2,_error
900: movl $8,-4(fp)
901: jbr L259
902: L260:
903: pushl $2
904: pushl $_archdr+48
905: calls $1,_atol
906: pushl r0
907: calls $2,_round
908: addl2 $60,r0
909: addl2 r0,-4(fp)
910: L259:
911: pushl -4(fp)
912: calls $1,_step
913: tstl r0
914: jneq L260
915: L258:
916: jbr L251
917: L263:
918: movl $68,-4(fp)
919: pushl $4
920: pushl -4(fp)
921: pushl $_text
922: calls $3,_dseek
923: pushl $_text
924: pushl $4
925: pushl $_tnum
926: calls $3,_mget
927: addl2 $4,-4(fp)
928: pushl _tnum
929: calls $1,_malloc
930: movl r0,_tab
931: tstl _tab
932: jneq L267
933: .data 1
934: L268:
935:
936: .byte 0x72,0x61,0x6e,0x20,0x6f,0x75,0x74,0x20
937: .byte 0x6f,0x66,0x20,0x6d,0x65,0x6d,0x6f,0x72
938: .byte 0x79,0x20,0x28,0x74,0x6f,0x63,0x29,0x0
939: .text
940: pushl $L268
941: pushl $1
942: calls $2,_error
943: L267:
944: pushl _tnum
945: pushl -4(fp)
946: pushl $_text
947: calls $3,_dseek
948: pushl $_text
949: pushl _tnum
950: pushl _tab
951: calls $3,_mget
952: addl2 _tnum,-4(fp)
953: pushl $8
954: pushl _tnum
955: calls $2,udiv
956: movl r0,_tnum
957: pushl $4
958: pushl -4(fp)
959: pushl $_text
960: calls $3,_dseek
961: pushl $_text
962: pushl $4
963: pushl $_ssiz
964: calls $3,_mget
965: addl2 $4,-4(fp)
966: pushl _ssiz
967: calls $1,_malloc
968: movl r0,_tabstr
969: tstl _tabstr
970: jneq L269
971: .data 1
972: L270:
973:
974: .byte 0x72,0x61,0x6e,0x20,0x6f,0x75,0x74,0x20
975: .byte 0x6f,0x66,0x20,0x6d,0x65,0x6d,0x6f,0x72
976: .byte 0x79,0x20,0x28,0x74,0x6f,0x63,0x73,0x74
977: .byte 0x72,0x29,0x0
978: .text
979: pushl $L270
980: pushl $1
981: calls $2,_error
982: L269:
983: pushl _ssiz
984: pushl -4(fp)
985: pushl $_text
986: calls $3,_dseek
987: pushl $_text
988: pushl _ssiz
989: pushl _tabstr
990: calls $3,_mget
991: addl3 _tnum,_tnum,r0
992: addl2 r0,r0
993: addl2 r0,r0
994: addl3 _tab,r0,r10
995: jbr L273
996: L274:
997: tstl (r10)
998: jlss L276
999: cmpl (r10),_ssiz
1000: jlss L275
1001: L276:
1002: .data 1
1003: L277:
1004:
1005: .byte 0x6d,0x61,0x6e,0x67,0x6c,0x65,0x64,0x20
1006: .byte 0x61,0x72,0x63,0x68,0x69,0x76,0x65,0x20
1007: .byte 0x74,0x61,0x62,0x6c,0x65,0x20,0x6f,0x66
1008: .byte 0x20,0x63,0x6f,0x6e,0x74,0x65,0x6e,0x74
1009: .byte 0x73,0x0
1010: .text
1011: pushl $L277
1012: pushl $1
1013: calls $2,_error
1014: L275:
1015: addl2 _tabstr,(r10)
1016: L273:
1017: subl2 $8,r10
1018: cmpl r10,_tab
1019: jgequ L274
1020: L272:
1021: jbr L280
1022: L281:
1023: jbr L280
1024: L280:
1025: calls $0,_ldrand
1026: tstl r0
1027: jneq L281
1028: L279:
1029: pushl _tab
1030: calls $1,_cfree
1031: pushl _tabstr
1032: calls $1,_cfree
1033: pushl $-1
1034: calls $1,_nextlibp
1035: jbr L251
1036: L284:
1037: .data 1
1038: L285:
1039:
1040: .byte 0x77,0x61,0x72,0x6e,0x69,0x6e,0x67,0x3a
1041: .byte 0x20,0x74,0x61,0x62,0x6c,0x65,0x20,0x6f
1042: .byte 0x66,0x20,0x63,0x6f,0x6e,0x74,0x65,0x6e
1043: .byte 0x74,0x73,0x20,0x66,0x6f,0x72,0x20,0x61
1044: .byte 0x72,0x63,0x68,0x69,0x76,0x65,0x20,0x69
1045: .byte 0x73,0x20,0x6f,0x75,0x74,0x20,0x6f,0x66
1046: .byte 0x20,0x64,0x61,0x74,0x65,0x3b,0x20,0x72
1047: .byte 0x65,0x72,0x75,0x6e,0x20,0x72,0x61,0x6e
1048: .byte 0x6c,0x69,0x62,0x28,0x31,0x29,0x0
1049: .text
1050: pushl $L285
1051: pushl $-1
1052: calls $2,_error
1053: movl $8,-4(fp)
1054: L288:
1055: pushl $2
1056: pushl $_archdr+48
1057: calls $1,_atol
1058: pushl r0
1059: calls $2,_round
1060: addl2 $60,r0
1061: addl2 r0,-4(fp)
1062: L287:
1063: pushl -4(fp)
1064: calls $1,_step
1065: tstl r0
1066: jneq L288
1067: L286:
1068: jbr L251
1069: L252:
1070: casel r0,$0,$3
1071: L289:
1072: .word L253-L289
1073: .word L255-L289
1074: .word L263-L289
1075: .word L284-L289
1076: L290:
1077: L251:
1078: pushl _infil
1079: calls $1,_close
1080: .stabs "kind",0x80,0,4,8
1081: .stabs "nloc",0x80,0,4,4
1082: .stabs "tp",0x40,0,40,10
1083: .stabs "cp",0x40,0,34,11
1084: L247:
1085: ret
1086: .set L.R5,0xc00
1087: .set L.SO5,0x8
1088: L292: .data
1089: .text
1090: .align 2
1091: .globl _step
1092: _step:
1093: .word L.R6
1094: subl2 $L.SO6,sp
1095: .stabs "step",0x24,0,665,_step
1096: .stabs "nloc",0xa0,0,4,4
1097: pushl $60
1098: pushl 4(ap)
1099: pushl $_text
1100: calls $3,_dseek
1101: tstl _text+12
1102: jgtr L294
1103: pushl $-1
1104: calls $1,_nextlibp
1105: clrl r0
1106: jbr L293
1107: L294:
1108: calls $0,_getarhdr
1109: addl3 $60,4(ap),-(sp)
1110: pushl $1
1111: calls $2,_load1
1112: tstl r0
1113: jeql L296
1114: pushl 4(ap)
1115: calls $1,_nextlibp
1116: L296:
1117: movl $1,r0
1118: jbr L293
1119: L293:
1120: ret
1121: .set L.R6,0x0
1122: .set L.SO6,0x0
1123: L297: .data
1124: .text
1125: .align 2
1126: .globl _nextlibp
1127: _nextlibp:
1128: .word L.R7
1129: subl2 $L.SO7,sp
1130: .stabs "nextlibp",0x24,0,685,_nextlibp
1131: .stabs "val",0xa0,0,4,4
1132: movl _clibseg,r0
1133: cmpl 4(r0),$250
1134: jneq L299
1135: addl2 $12,_clibseg
1136: cmpl _clibseg,$_libseg+480
1137: jneq L300
1138: .data 1
1139: L301:
1140:
1141: .byte 0x74,0x6f,0x6f,0x20,0x6d,0x61,0x6e,0x79
1142: .byte 0x20,0x66,0x69,0x6c,0x65,0x73,0x20,0x6c
1143: .byte 0x6f,0x61,0x64,0x65,0x64,0x20,0x66,0x72
1144: .byte 0x6f,0x6d,0x20,0x6c,0x69,0x62,0x72,0x61
1145: .byte 0x72,0x69,0x65,0x73,0x0
1146: .text
1147: pushl $L301
1148: pushl $1
1149: calls $2,_error
1150: L300:
1151: pushl $1000
1152: calls $1,_malloc
1153: movl r0,*_clibseg
1154: tstl *_clibseg
1155: jneq L302
1156: .data 1
1157: L303:
1158:
1159: .byte 0x72,0x61,0x6e,0x20,0x6f,0x75,0x74,0x20
1160: .byte 0x6f,0x66,0x20,0x6d,0x65,0x6d,0x6f,0x72
1161: .byte 0x79,0x20,0x28,0x6e,0x65,0x78,0x74,0x6c
1162: .byte 0x69,0x62,0x70,0x29,0x0
1163: .text
1164: pushl $L303
1165: pushl $1
1166: calls $2,_error
1167: L302:
1168: L299:
1169: movl _clibseg,r0
1170: movl 4(r0),r1
1171: incl 4(r0)
1172: movl *_clibseg,r0
1173: movl 4(ap),(r0)[r1]
1174: cmpl 4(ap),$-1
1175: jeql L304
1176: tstl _Mflag
1177: jeql L304
1178: L305:
1179: .data 1
1180: L306:
1181:
1182: .byte 0x9,0x25,0x73,0xa,0x0
1183: .text
1184: pushl $_archdr
1185: pushl $L306
1186: calls $2,_printf
1187: L304:
1188: L298:
1189: ret
1190: .set L.R7,0x0
1191: .set L.SO7,0x0
1192: L307: .data
1193: .text
1194: .align 2
1195: .globl _ldrand
1196: _ldrand:
1197: .word L.R8
1198: subl2 $L.SO8,sp
1199: .stabs "ldrand",0x24,0,707,_ldrand
1200: pushl _nextsym
1201: calls $1,_symx
1202: movl r0,-8(fp)
1203: subl3 $1,_tnum,r0
1204: addl2 r0,r0
1205: addl2 r0,r0
1206: addl2 r0,r0
1207: addl3 _tab,r0,r8
1208: movl _tab,r9
1209: jbr L312
1210: L313:
1211: pushl (r9)
1212: calls $1,_slookup
1213: movl r0,r10
1214: jneq L314
1215: jbr L310
1216: L314:
1217: movl (r10),r11
1218: tstl r11
1219: jneq L315
1220: jbr L310
1221: L315:
1222: cmpb 4(r11),$1
1223: jeql L316
1224: jbr L310
1225: L316:
1226: pushl 4(r9)
1227: calls $1,_step
1228: movl 4(r9),-4(fp)
1229: jbr L318
1230: L319:
1231: addl2 $8,r9
1232: L318:
1233: cmpl r9,r8
1234: jgequ L320
1235: cmpl 12(r9),-4(fp)
1236: jeql L319
1237: L320:
1238: L317:
1239: L310:
1240: addl2 $8,r9
1241: L312:
1242: cmpl r9,r8
1243: jlequ L313
1244: L311:
1245: pushl _nextsym
1246: calls $1,_symx
1247: cmpl r0,-8(fp)
1248: jeql L321
1249: movl $1,r0
1250: jbr L322
1251: L321:
1252: clrl r0
1253: L322:
1254: jbr L308
1255: .stabs "nsymt",0x80,0,4,8
1256: .stabs "loc",0x80,0,4,4
1257: .stabs "tplast",0x40,0,40,8
1258: .stabs "tp",0x40,0,40,9
1259: .stabs "hp",0x40,0,168,10
1260: .stabs "sp",0x40,0,40,11
1261: L308:
1262: ret
1263: .set L.R8,0xf00
1264: .set L.SO8,0x8
1265: L323: .data
1266: .text
1267: .align 2
1268: .globl _load1
1269: _load1:
1270: .word L.R9
1271: subl2 $L.SO9,sp
1272: .stabs "load1",0x24,0,735,_load1
1273: .stabs "libflg",0xa0,0,4,4
1274: .stabs "loc",0xa0,0,4,8
1275: pushl 8(ap)
1276: calls $1,_readhdr
1277: tstl _filhdr+16
1278: jneq L326
1279: addl3 _filhdr+8,_filhdr+4,r0
1280: jneq L327
1281: clrl r0
1282: jbr L324
1283: L327:
1284: .data 1
1285: L328:
1286:
1287: .byte 0x6e,0x6f,0x20,0x6e,0x61,0x6d,0x65,0x6c
1288: .byte 0x69,0x73,0x74,0x0
1289: .text
1290: pushl $L328
1291: pushl $1
1292: calls $2,_error
1293: L326:
1294: tstl 4(ap)
1295: jeql L329
1296: pushl $_archdr+48
1297: calls $1,_atol
1298: movl r0,-28(fp)
1299: jbr L330
1300: L329:
1301: pushal -60(fp)
1302: pushl _infil
1303: calls $2,_fstat
1304: movl -44(fp),-28(fp)
1305: L330:
1306: cmpl _filhdr,$267
1307: jneq L333
1308: movl $1024,r0
1309: jbr L334
1310: L333:
1311: movl $32,r0
1312: L334:
1313: addl2 _filhdr+4,r0
1314: addl2 _filhdr+8,r0
1315: addl2 _filhdr+24,r0
1316: addl2 _filhdr+28,r0
1317: addl2 _filhdr+16,r0
1318: addl2 $4,r0
1319: cmpl r0,-28(fp)
1320: jlssu L332
1321: .data 1
1322: L335:
1323:
1324: .byte 0x74,0x6f,0x6f,0x20,0x73,0x6d,0x61,0x6c
1325: .byte 0x6c,0x20,0x28,0x6f,0x6c,0x64,0x20,0x66
1326: .byte 0x6f,0x72,0x6d,0x61,0x74,0x20,0x2e,0x6f
1327: .byte 0x3f,0x29,0x0
1328: .text
1329: pushl $L335
1330: pushl $1
1331: calls $2,_error
1332: L332:
1333: movl _tsize,_ctrel
1334: addl2 _dsize,_cdrel
1335: addl2 _bsize,_cbrel
1336: clrl -8(fp)
1337: movl $12,-12(fp)
1338: movl _nextsym,-4(fp)
1339: cmpl _filhdr,$267
1340: jneq L336
1341: movl $1024,r0
1342: jbr L337
1343: L336:
1344: movl $32,r0
1345: L337:
1346: addl2 _filhdr+4,r0
1347: addl2 _filhdr+8,r0
1348: addl2 _filhdr+24,r0
1349: addl2 _filhdr+28,r0
1350: addl2 r0,8(ap)
1351: pushl _filhdr+16
1352: pushl 8(ap)
1353: pushl $_text
1354: calls $3,_dseek
1355: pushl $4
1356: addl3 _filhdr+16,8(ap),-(sp)
1357: pushl $_reloc
1358: calls $3,_dseek
1359: pushl $_reloc
1360: pushl $4
1361: pushal -20(fp)
1362: calls $3,_mget
1363: subl3 $4,-20(fp),-(sp)
1364: addl3 _filhdr+16,8(ap),r0
1365: addl3 $4,r0,-(sp)
1366: pushl $_reloc
1367: calls $3,_dseek
1368: pushl -20(fp)
1369: calls $1,_malloc
1370: movl r0,_curstr
1371: tstl _curstr
1372: jneq L338
1373: .data 1
1374: L339:
1375:
1376: .byte 0x6e,0x6f,0x20,0x73,0x70,0x61,0x63,0x65
1377: .byte 0x20,0x66,0x6f,0x72,0x20,0x73,0x74,0x72
1378: .byte 0x69,0x6e,0x67,0x20,0x74,0x61,0x62,0x6c
1379: .byte 0x65,0x0
1380: .text
1381: pushl $L339
1382: pushl $1
1383: calls $2,_error
1384: L338:
1385: pushl $_reloc
1386: subl3 $4,-20(fp),-(sp)
1387: addl3 $4,_curstr,-(sp)
1388: calls $3,_mget
1389: jbr L341
1390: L342:
1391: pushl $_text
1392: pushl $12
1393: pushl $_cursym
1394: calls $3,_mget
1395: tstl _cursym
1396: jeql L343
1397: cmpl _cursym,$4
1398: jlssu L345
1399: cmpl _cursym,-20(fp)
1400: jlss L344
1401: L345:
1402: .data 1
1403: L346:
1404:
1405: .byte 0x62,0x61,0x64,0x20,0x73,0x74,0x72,0x69
1406: .byte 0x6e,0x67,0x20,0x74,0x61,0x62,0x6c,0x65
1407: .byte 0x20,0x69,0x6e,0x64,0x65,0x78,0x20,0x28
1408: .byte 0x70,0x61,0x73,0x73,0x20,0x31,0x29,0x0
1409: .text
1410: pushl $L346
1411: pushl $1
1412: calls $2,_error
1413: L344:
1414: addl2 _curstr,_cursym
1415: L343:
1416: movzbl _cursym+4,-16(fp)
1417: bitl $1,-16(fp)
1418: jneq L347
1419: tstl _Xflag
1420: jeql L349
1421: cmpb *_cursym,$76
1422: jneq L349
1423: L350:
1424: bitl $224,-16(fp)
1425: jeql L348
1426: L349:
1427: addl2 $12,-12(fp)
1428: L348:
1429: jbr L341
1430: L347:
1431: calls $0,_symreloc
1432: calls $0,_lookup
1433: pushl r0
1434: calls $1,_enter
1435: tstl r0
1436: jeql L352
1437: jbr L341
1438: L352:
1439: movl _lastsym,r11
1440: cmpb 4(r11),$1
1441: jeql L353
1442: jbr L341
1443: L353:
1444: cmpb _cursym+4,$1
1445: jneq L354
1446: cmpl _cursym+8,8(r11)
1447: jlequ L355
1448: movl _cursym+8,8(r11)
1449: L355:
1450: jbr L341
1451: L354:
1452: tstl 8(r11)
1453: jeql L356
1454: cmpb _cursym+4,$5
1455: jneq L356
1456: L357:
1457: jbr L341
1458: L356:
1459: incl -8(fp)
1460: movb _cursym+4,4(r11)
1461: movl _cursym+8,8(r11)
1462: L341:
1463: tstl _text+12
1464: jgtr L342
1465: L340:
1466: tstl 4(ap)
1467: jeql L359
1468: tstl -8(fp)
1469: jeql L358
1470: L359:
1471: addl2 _filhdr+4,_tsize
1472: pushl $4
1473: pushl _filhdr+8
1474: calls $2,_round
1475: addl2 r0,_dsize
1476: pushl $4
1477: pushl _filhdr+12
1478: calls $2,_round
1479: addl2 r0,_bsize
1480: addl2 -12(fp),_ssize
1481: addl2 _filhdr+24,_trsize
1482: addl2 _filhdr+28,_drsize
1483: tstl _funding
1484: jeql L360
1485: .data 1
1486: L361:
1487:
1488: .byte 0x5f,0x65,0x6e,0x64,0x0
1489: .text
1490: pushl $L361
1491: calls $1,_slookup
1492: movl (r0),r0
1493: movl 8(r0),_textbase
1494: L360:
1495: pushl _nextsym
1496: calls $1,_symx
1497: movl r0,-24(fp)
1498: pushl -4(fp)
1499: calls $1,_symx
1500: movl r0,r10
1501: jbr L364
1502: L365:
1503: divl3 $1103,r10,r0
1504: mull2 $20,r0
1505: divl3 $1103,r10,r1
1506: mull2 $1103,r1
1507: subl3 r1,r10,r1
1508: mull2 $12,r1
1509: addl3 r1,_symseg(r0),r11
1510: pushl (r11)
1511: calls $1,_savestr
1512: movl r0,(r11)
1513: incl r10
1514: L364:
1515: cmpl r10,-24(fp)
1516: jlss L365
1517: L363:
1518: pushl _curstr
1519: calls $1,_free
1520: movl $1,r0
1521: jbr L324
1522: L358:
1523: pushl -4(fp)
1524: calls $1,_symfree
1525: pushl _curstr
1526: calls $1,_free
1527: clrl r0
1528: jbr L324
1529: .stabs "stb",0x80,0,8,60
1530: .stabs "maxoff",0x80,0,4,28
1531: .stabs "i",0x40,0,4,10
1532: .stabs "nsymt",0x80,0,4,24
1533: .stabs "size",0x80,0,4,20
1534: .stabs "type",0x80,0,4,16
1535: .stabs "nlocal",0x80,0,4,12
1536: .stabs "ndef",0x80,0,4,8
1537: .stabs "savnext",0x80,0,40,4
1538: .stabs "sp",0x40,0,40,11
1539: L324:
1540: ret
1541: .set L.R9,0xc00
1542: .set L.SO9,0x3c
1543: L368: .data
1544: .text
1545: .align 2
1546: .globl _middle
1547: _middle:
1548: .word L.R10
1549: subl2 $L.SO10,sp
1550: .stabs "middle",0x24,0,828,_middle
1551: clrl _torigin
1552: clrl _dorigin
1553: clrl _borigin
1554: .data 1
1555: L370:
1556:
1557: .byte 0x5f,0x65,0x74,0x65,0x78,0x74,0x0
1558: .text
1559: pushl $L370
1560: calls $1,_slookup
1561: movl (r0),_p_etext
1562: .data 1
1563: L371:
1564:
1565: .byte 0x5f,0x65,0x64,0x61,0x74,0x61,0x0
1566: .text
1567: pushl $L371
1568: calls $1,_slookup
1569: movl (r0),_p_edata
1570: .data 1
1571: L372:
1572:
1573: .byte 0x5f,0x65,0x6e,0x64,0x0
1574: .text
1575: pushl $L372
1576: calls $1,_slookup
1577: movl (r0),_p_end
1578: pushl _nextsym
1579: calls $1,_symx
1580: movl r0,-32(fp)
1581: tstl _rflag
1582: jneq L373
1583: clrl r10
1584: jbr L376
1585: L377:
1586: divl3 $1103,r10,r0
1587: mull2 $20,r0
1588: divl3 $1103,r10,r1
1589: mull2 $1103,r1
1590: subl3 r1,r10,r1
1591: mull2 $12,r1
1592: addl3 r1,_symseg(r0),r11
1593: cmpb 4(r11),$1
1594: jneq L378
1595: tstl 8(r11)
1596: jneq L378
1597: L382:
1598: cmpl r11,_p_end
1599: jeql L378
1600: L381:
1601: cmpl r11,_p_edata
1602: jeql L378
1603: L380:
1604: cmpl r11,_p_etext
1605: jeql L378
1606: L379:
1607: incl _rflag
1608: clrl _dflag
1609: jbr L375
1610: L378:
1611: incl r10
1612: L376:
1613: cmpl r10,-32(fp)
1614: jlss L377
1615: L375:
1616: L373:
1617: tstl _rflag
1618: jeql L383
1619: clrl _zflag
1620: movl _zflag,_sflag
1621: L383:
1622: clrl -4(fp)
1623: tstl _Aflag
1624: jneq L384
1625: movl _symseg,_addsym
1626: L384:
1627: tstl _nflag
1628: jneq L387
1629: tstl _zflag
1630: jeql L385
1631: L387:
1632: movl $1024,-(sp)
1633: jbr L386
1634: L385:
1635: movl $4,-(sp)
1636: L386:
1637: addl3 _textbase,_tsize,-(sp)
1638: calls $2,_round
1639: movl r0,_database
1640: addl2 _hsize,_database
1641: tstl _dflag
1642: jneq L389
1643: tstl _rflag
1644: jneq L388
1645: L389:
1646: pushl $5
1647: pushl _tsize
1648: pushl _p_etext
1649: calls $3,_ldrsym
1650: pushl $7
1651: pushl _dsize
1652: pushl _p_edata
1653: calls $3,_ldrsym
1654: pushl $9
1655: pushl _bsize
1656: pushl _p_end
1657: calls $3,_ldrsym
1658: pushl _addsym
1659: calls $1,_symx
1660: movl r0,r10
1661: jbr L393
1662: L394:
1663: divl3 $1103,r10,r0
1664: mull2 $20,r0
1665: divl3 $1103,r10,r1
1666: mull2 $1103,r1
1667: subl3 r1,r10,r1
1668: mull2 $12,r1
1669: addl3 r1,_symseg(r0),r11
1670: movb 4(r11),-25(fp)
1671: cmpb -25(fp),$1
1672: jneq L395
1673: movl 8(r11),-8(fp)
1674: jeql L395
1675: L396:
1676: cmpl -8(fp),$8
1677: jlssu L397
1678: movl $8,-24(fp)
1679: jbr L398
1680: L397:
1681: cmpl -8(fp),$4
1682: jlssu L399
1683: movl $4,-24(fp)
1684: jbr L400
1685: L399:
1686: movl $2,-24(fp)
1687: L400:
1688: L398:
1689: pushl -24(fp)
1690: pushl -4(fp)
1691: calls $2,_round
1692: movl r0,-4(fp)
1693: movl -4(fp),8(r11)
1694: movb $19,4(r11)
1695: movl -4(fp),-16(fp)
1696: addl2 -8(fp),-4(fp)
1697: L395:
1698: bitb $1,-25(fp)
1699: jeql L401
1700: bitb $30,-25(fp)
1701: jneq L401
1702: L403:
1703: bitb $224,-25(fp)
1704: jeql L401
1705: L402:
1706: movl -16(fp),8(r11)
1707: bicb3 $-225,-25(fp),r0
1708: bisb3 $19,r0,4(r11)
1709: L401:
1710: incl r10
1711: L393:
1712: cmpl r10,-32(fp)
1713: jlss L394
1714: L392:
1715: L388:
1716: pushl $4
1717: pushl -4(fp)
1718: calls $2,_round
1719: movl r0,-4(fp)
1720: movl _textbase,_torigin
1721: movl _database,_dorigin
1722: addl3 _dsize,_dorigin,-12(fp)
1723: addl3 -4(fp),-12(fp),_borigin
1724: clrl -20(fp)
1725: pushl _nextsym
1726: calls $1,_symx
1727: movl r0,-32(fp)
1728: pushl _addsym
1729: calls $1,_symx
1730: movl r0,r10
1731: jbr L406
1732: L407:
1733: divl3 $1103,r10,r0
1734: mull2 $20,r0
1735: divl3 $1103,r10,r1
1736: mull2 $1103,r1
1737: subl3 r1,r10,r1
1738: mull2 $12,r1
1739: addl3 r1,_symseg(r0),r11
1740: movzbl 4(r11),r0
1741: bicl2 $-32,r0
1742: jbr L409
1743: L410:
1744: tstl _arflag
1745: jneq L411
1746: bisl2 $1,_errlev
1747: L411:
1748: tstl _arflag
1749: jeql L414
1750: tstl _dflag
1751: jeql L412
1752: L414:
1753: tstl 8(r11)
1754: jneq L412
1755: L413:
1756: cmpl r11,_p_end
1757: jeql L416
1758: cmpl r11,_p_etext
1759: jeql L416
1760: L417:
1761: cmpl r11,_p_edata
1762: jneq L415
1763: L416:
1764: jbr L404
1765: L415:
1766: tstl -20(fp)
1767: jneq L418
1768: .data 1
1769: L419:
1770:
1771: .byte 0x55,0x6e,0x64,0x65,0x66,0x69,0x6e,0x65
1772: .byte 0x64,0x3a,0xa,0x0
1773: .text
1774: pushl $L419
1775: calls $1,_printf
1776: L418:
1777: incl -20(fp)
1778: .data 1
1779: L420:
1780:
1781: .byte 0x25,0x73,0xa,0x0
1782: .text
1783: pushl (r11)
1784: pushl $L420
1785: calls $2,_printf
1786: L412:
1787: jbr L404
1788: L421:
1789: L422:
1790: jbr L404
1791: L423:
1792: addl2 _torigin,8(r11)
1793: jbr L404
1794: L424:
1795: addl2 _dorigin,8(r11)
1796: jbr L404
1797: L425:
1798: addl2 _borigin,8(r11)
1799: jbr L404
1800: L426:
1801: bicb3 $-225,4(r11),r0
1802: bisb3 $9,r0,4(r11)
1803: addl2 -12(fp),8(r11)
1804: jbr L404
1805: L409:
1806: casel r0,$1,$18
1807: L427:
1808: .word L410-L427
1809: .word L422-L427
1810: .word L421-L427
1811: .word L422-L427
1812: .word L423-L427
1813: .word L422-L427
1814: .word L424-L427
1815: .word L422-L427
1816: .word L425-L427
1817: .word L422-L427
1818: .word L422-L427
1819: .word L422-L427
1820: .word L422-L427
1821: .word L422-L427
1822: .word L422-L427
1823: .word L422-L427
1824: .word L422-L427
1825: .word L422-L427
1826: .word L426-L427
1827: jbr L422
1828: L408:
1829: L404:
1830: incl r10
1831: L406:
1832: cmpl r10,-32(fp)
1833: jlss L407
1834: L405:
1835: tstl _sflag
1836: jneq L429
1837: tstl _xflag
1838: jeql L428
1839: L429:
1840: clrl _ssize
1841: L428:
1842: addl2 -4(fp),_bsize
1843: pushl $12
1844: pushl _ssize
1845: calls $2,udiv
1846: movl r0,_nsym
1847: tstl _Aflag
1848: jeql L430
1849: pushl _torigin
1850: pushl _p_etext
1851: calls $2,_fixspec
1852: pushl _dorigin
1853: pushl _p_edata
1854: calls $2,_fixspec
1855: pushl _borigin
1856: pushl _p_end
1857: calls $2,_fixspec
1858: L430:
1859: .stabs "nsymt",0x80,0,4,32
1860: .stabs "i",0x40,0,4,10
1861: .stabs "s",0x80,0,2,25
1862: .stabs "rnd",0x80,0,4,24
1863: .stabs "nund",0x80,0,4,20
1864: .stabs "ocsize",0x80,0,4,16
1865: .stabs "corigin",0x80,0,4,12
1866: .stabs "t",0x80,0,4,8
1867: .stabs "csize",0x80,0,4,4
1868: .stabs "sp",0x40,0,40,11
1869: L369:
1870: ret
1871: .set L.R10,0xc00
1872: .set L.SO10,0x20
1873: L432: .data
1874: .text
1875: .align 2
1876: .globl _fixspec
1877: _fixspec:
1878: .word L.R11
1879: subl2 $L.SO11,sp
1880: .stabs "fixspec",0x24,0,953,_fixspec
1881: .stabs "sym",0xa0,0,40,4
1882: .stabs "offset",0xa0,0,4,8
1883: pushl 4(ap)
1884: calls $1,_symx
1885: movl r0,r11
1886: pushl _addsym
1887: calls $1,_symx
1888: cmpl r11,r0
1889: jgeq L434
1890: tstl 4(ap)
1891: jeql L434
1892: L435:
1893: movl 4(ap),r0
1894: addl2 8(ap),8(r0)
1895: L434:
1896: L433:
1897: ret
1898: .set L.R11,0x800
1899: .set L.SO11,0x0
1900: L436: .data
1901: .text
1902: .align 2
1903: .globl _ldrsym
1904: _ldrsym:
1905: .word L.R12
1906: subl2 $L.SO12,sp
1907: .stabs "ldrsym",0x24,0,962,_ldrsym
1908: .stabs "sp",0xa0,0,40,4
1909: .stabs "val",0xa0,0,4,8
1910: .stabs "type",0xa0,0,4,12
1911: movl 4(ap),r11
1912: tstl r11
1913: jneq L438
1914: jbr L437
1915: L438:
1916: cmpb 4(r11),$1
1917: jneq L441
1918: tstl 8(r11)
1919: jeql L439
1920: L441:
1921: tstl _Aflag
1922: jneq L439
1923: L440:
1924: .data 1
1925: L442:
1926:
1927: .byte 0x25,0x73,0x3a,0x20,0x0
1928: .text
1929: pushl (r11)
1930: pushl $L442
1931: calls $2,_printf
1932: .data 1
1933: L443:
1934:
1935: .byte 0x75,0x73,0x65,0x72,0x20,0x61,0x74,0x74
1936: .byte 0x65,0x6d,0x70,0x74,0x20,0x74,0x6f,0x20
1937: .byte 0x72,0x65,0x64,0x65,0x66,0x69,0x6e,0x65
1938: .byte 0x20,0x6c,0x6f,0x61,0x64,0x65,0x72,0x2d
1939: .byte 0x64,0x65,0x66,0x69,0x6e,0x65,0x64,0x20
1940: .byte 0x73,0x79,0x6d,0x62,0x6f,0x6c,0x0
1941: .text
1942: pushl $L443
1943: pushl $0
1944: calls $2,_error
1945: jbr L437
1946: L439:
1947: movb 12(ap),4(r11)
1948: movl 8(ap),8(r11)
1949: .stabs "sp",0x40,0,40,11
1950: L437:
1951: ret
1952: .set L.R12,0x800
1953: .set L.SO12,0x0
1954: L444: .data
1955: .comm _wroff,4
1956: .comm _toutb,4112
1957: .text
1958: .align 2
1959: .globl _setupout
1960: _setupout:
1961: .word L.R13
1962: subl2 $L.SO13,sp
1963: .stabs "setupout",0x24,0,979,_setupout
1964: pushl $0
1965: calls $1,_umask
1966: mcoml r0,r0
1967: bicl3 $-512,r0,_ofilemode
1968: bicl3 $-439,_ofilemode,-(sp)
1969: pushl _ofilename
1970: calls $2,_creat
1971: movl r0,_biofd
1972: tstl _biofd
1973: jgeq L452
1974: movl _ofilename,_filname
1975: clrb _archdr
1976: movl _errno,r0
1977: pushl _sys_errlist[r0]
1978: pushl $1
1979: calls $2,_error
1980: jbr L453
1981: L452:
1982: pushal -36(fp)
1983: pushl _biofd
1984: calls $2,_fstat
1985: bitw $73,-32(fp)
1986: jeql L454
1987: movzwl -32(fp),r0
1988: bicl3 $-439,r0,-(sp)
1989: pushl _ofilename
1990: calls $2,_chmod
1991: movzwl -32(fp),_ofilemode
1992: L454:
1993: .stabs "mybuf",0x80,0,8,36
1994: L453:
1995: movl $_toutb,_tout
1996: pushl $0
1997: pushl _tout
1998: calls $2,_bopen
1999: tstl _nflag
2000: jeql L456
2001: movl $264,r0
2002: jbr L457
2003: L456:
2004: tstl _zflag
2005: jeql L458
2006: movl $267,r0
2007: jbr L459
2008: L458:
2009: movl $263,r0
2010: L459:
2011: L457:
2012: movl r0,_filhdr
2013: tstl _nflag
2014: jeql L460
2015: movl _tsize,r0
2016: jbr L461
2017: L460:
2018: tstl _zflag
2019: jeql L462
2020: movl $1024,-(sp)
2021: jbr L463
2022: L462:
2023: movl $4,-(sp)
2024: L463:
2025: pushl _tsize
2026: calls $2,_round
2027: L461:
2028: movl r0,_filhdr+4
2029: tstl _zflag
2030: jeql L464
2031: pushl $1024
2032: pushl _dsize
2033: calls $2,_round
2034: jbr L465
2035: L464:
2036: movl _dsize,r0
2037: L465:
2038: movl r0,_filhdr+8
2039: subl3 _dsize,_filhdr+8,r0
2040: subl3 r0,_bsize,-4(fp)
2041: tstl -4(fp)
2042: jgeq L466
2043: clrl -4(fp)
2044: L466:
2045: movl -4(fp),_filhdr+12
2046: movl _trsize,_filhdr+24
2047: movl _drsize,_filhdr+28
2048: tstl _sflag
2049: jeql L467
2050: clrl r0
2051: jbr L468
2052: L467:
2053: pushl _nextsym
2054: calls $1,_symx
2055: mull2 $12,r0
2056: addl2 _ssize,r0
2057: L468:
2058: movl r0,_filhdr+16
2059: tstl _entrypt
2060: jeql L469
2061: movl _entrypt,r0
2062: cmpb 4(r0),$5
2063: jeql L470
2064: .data 1
2065: L471:
2066:
2067: .byte 0x65,0x6e,0x74,0x72,0x79,0x20,0x70,0x6f
2068: .byte 0x69,0x6e,0x74,0x20,0x6e,0x6f,0x74,0x20
2069: .byte 0x69,0x6e,0x20,0x74,0x65,0x78,0x74,0x0
2070: .text
2071: pushl $L471
2072: pushl $0
2073: calls $2,_error
2074: jbr L472
2075: L470:
2076: movl _entrypt,r0
2077: movl 8(r0),_filhdr+20
2078: L472:
2079: jbr L473
2080: L469:
2081: clrl _filhdr+20
2082: L473:
2083: tstl _rflag
2084: jeql L474
2085: movl _trsize,r0
2086: jbr L475
2087: L474:
2088: clrl r0
2089: L475:
2090: movl r0,_filhdr+24
2091: tstl _rflag
2092: jeql L476
2093: movl _drsize,r0
2094: jbr L477
2095: L476:
2096: clrl r0
2097: L477:
2098: movl r0,_filhdr+28
2099: pushl _tout
2100: pushl $32
2101: pushl $_filhdr
2102: calls $3,_bwrite
2103: tstl _zflag
2104: jeql L479
2105: pushl _tout
2106: calls $1,_bflush1
2107: clrl _biobufs
2108: pushl $1024
2109: pushl _tout
2110: calls $2,_bopen
2111: L479:
2112: cmpl _filhdr,$267
2113: jneq L481
2114: movl $1024,r0
2115: jbr L482
2116: L481:
2117: movl $32,r0
2118: L482:
2119: addl3 _filhdr+4,r0,_wroff
2120: pushl _filhdr+8
2121: pushl $_dout
2122: calls $2,_outb
2123: tstl _rflag
2124: jeql L484
2125: pushl _filhdr+24
2126: pushl $_trout
2127: calls $2,_outb
2128: pushl _filhdr+28
2129: pushl $_drout
2130: calls $2,_outb
2131: L484:
2132: tstl _sflag
2133: jeql L486
2134: tstl _xflag
2135: jneq L485
2136: L486:
2137: pushl _filhdr+16
2138: pushl $_sout
2139: calls $2,_outb
2140: addl2 $4,_wroff
2141: pushl $0
2142: pushl $_strout
2143: calls $2,_outb
2144: L485:
2145: .stabs "bss",0x80,0,4,4
2146: L447:
2147: ret
2148: .set L.R13,0x0
2149: .set L.SO13,0x24
2150: L487: .data
2151: .text
2152: .align 2
2153: .globl _outb
2154: _outb:
2155: .word L.R14
2156: subl2 $L.SO14,sp
2157: .stabs "outb",0x24,0,1041,_outb
2158: .stabs "bp",0xa0,0,168,4
2159: .stabs "inc",0xa0,0,4,8
2160: movl 4(ap),r11
2161: pushl $4112
2162: calls $1,_malloc
2163: movl r0,(r11)
2164: tstl (r11)
2165: jneq L489
2166: .data 1
2167: L490:
2168:
2169: .byte 0x72,0x61,0x6e,0x20,0x6f,0x75,0x74,0x20
2170: .byte 0x6f,0x66,0x20,0x6d,0x65,0x6d,0x6f,0x72
2171: .byte 0x79,0x20,0x28,0x6f,0x75,0x74,0x62,0x29
2172: .byte 0x0
2173: .text
2174: pushl $L490
2175: pushl $1
2176: calls $2,_error
2177: L489:
2178: pushl _wroff
2179: pushl (r11)
2180: calls $2,_bopen
2181: addl2 8(ap),_wroff
2182: .stabs "bp",0x40,0,168,11
2183: L488:
2184: ret
2185: .set L.R14,0x800
2186: .set L.SO14,0x0
2187: L491: .data
2188: .text
2189: .align 2
2190: .globl _load2arg
2191: _load2arg:
2192: .word L.R15
2193: subl2 $L.SO15,sp
2194: .stabs "load2arg",0x24,0,1052,_load2arg
2195: .stabs "acp",0xa0,0,34,4
2196: movl 4(ap),r11
2197: pushl r11
2198: calls $1,_getfile
2199: tstl r0
2200: jneq L493
2201: jbr L495
2202: L496:
2203: incl r11
2204: L495:
2205: tstb (r11)
2206: jneq L496
2207: L494:
2208: jbr L498
2209: L499:
2210: L498:
2211: cmpl r11,4(ap)
2212: jlssu L500
2213: decl r11
2214: cmpb (r11),$47
2215: jneq L499
2216: L500:
2217: L497:
2218: addl2 $1,r11
2219: pushl r11
2220: calls $1,_mkfsym
2221: pushl $0
2222: calls $1,_load2
2223: jbr L503
2224: L493:
2225: L506:
2226: movl _clibseg,r0
2227: movl _clibseg,r1
2228: cmpl 8(r0),4(r1)
2229: jneq L507
2230: movl _clibseg,r0
2231: cmpl 4(r0),$250
2232: jgeq L508
2233: .data 1
2234: L509:
2235:
2236: .byte 0x6c,0x69,0x62,0x73,0x65,0x67,0x20,0x62
2237: .byte 0x6f,0x74,0x63,0x68,0x0
2238: .text
2239: pushl $L509
2240: pushl $1
2241: calls $2,_error
2242: L508:
2243: addl2 $12,_clibseg
2244: L507:
2245: movl _clibseg,r0
2246: movl 8(r0),r1
2247: incl 8(r0)
2248: movl *_clibseg,r0
2249: movl (r0)[r1],-4(fp)
2250: cmpl -4(fp),$-1
2251: jneq L510
2252: jbr L505
2253: L510:
2254: pushl $60
2255: pushl -4(fp)
2256: pushl $_text
2257: calls $3,_dseek
2258: calls $0,_getarhdr
2259: pushl $_archdr
2260: calls $1,_mkfsym
2261: addl3 $60,-4(fp),-(sp)
2262: calls $1,_load2
2263: jbr L506
2264: L505:
2265: L503:
2266: pushl _infil
2267: calls $1,_close
2268: .stabs "loc",0x80,0,4,4
2269: .stabs "cp",0x40,0,34,11
2270: L492:
2271: ret
2272: .set L.R15,0x800
2273: .set L.SO15,0x4
2274: L511: .data
2275: .text
2276: .align 2
2277: .globl _load2
2278: _load2:
2279: .word L.R16
2280: subl2 $L.SO16,sp
2281: .stabs "load2",0x24,0,1084,_load2
2282: .stabs "loc",0xa0,0,4,4
2283: pushl 4(ap)
2284: calls $1,_readhdr
2285: tstl _funding
2286: jneq L513
2287: movl _torigin,_ctrel
2288: addl2 _dorigin,_cdrel
2289: addl2 _borigin,_cbrel
2290: L513:
2291: clrl r8
2292: jbr L516
2293: L517:
2294: clrl _lochash[r8]
2295: incl r8
2296: L516:
2297: cmpl r8,$31
2298: jlss L517
2299: L515:
2300: movl $_locseg,_clocseg
2301: movl _clocseg,r0
2302: clrl 4(r0)
2303: movl $-1,r9
2304: cmpl _filhdr,$267
2305: jneq L518
2306: movl $1024,r0
2307: jbr L519
2308: L518:
2309: movl $32,r0
2310: L519:
2311: addl2 r0,4(ap)
2312: pushl $4
2313: addl3 _filhdr+4,4(ap),r0
2314: addl2 _filhdr+8,r0
2315: addl2 _filhdr+24,r0
2316: addl2 _filhdr+28,r0
2317: addl3 _filhdr+16,r0,-(sp)
2318: pushl $_text
2319: calls $3,_dseek
2320: pushl $_text
2321: pushl $4
2322: pushal -4(fp)
2323: calls $3,_mget
2324: subl3 $4,-4(fp),-(sp)
2325: addl3 _filhdr+4,4(ap),r0
2326: addl2 _filhdr+8,r0
2327: addl2 _filhdr+24,r0
2328: addl2 _filhdr+28,r0
2329: addl2 _filhdr+16,r0
2330: addl3 $4,r0,-(sp)
2331: pushl $_text
2332: calls $3,_dseek
2333: pushl -4(fp)
2334: calls $1,_malloc
2335: movl r0,_curstr
2336: tstl _curstr
2337: jneq L520
2338: .data 1
2339: L521:
2340:
2341: .byte 0x6f,0x75,0x74,0x20,0x6f,0x66,0x20,0x73
2342: .byte 0x70,0x61,0x63,0x65,0x20,0x72,0x65,0x61
2343: .byte 0x64,0x69,0x6e,0x67,0x20,0x73,0x74,0x72
2344: .byte 0x69,0x6e,0x67,0x20,0x74,0x61,0x62,0x6c
2345: .byte 0x65,0x20,0x28,0x70,0x61,0x73,0x73,0x20
2346: .byte 0x32,0x29,0x0
2347: .text
2348: pushl $L521
2349: pushl $1
2350: calls $2,_error
2351: L520:
2352: pushl $_text
2353: subl3 $4,-4(fp),-(sp)
2354: addl3 $4,_curstr,-(sp)
2355: calls $3,_mget
2356: pushl _filhdr+16
2357: addl3 _filhdr+4,4(ap),r0
2358: addl2 _filhdr+8,r0
2359: addl2 _filhdr+24,r0
2360: addl3 _filhdr+28,r0,-(sp)
2361: pushl $_text
2362: calls $3,_dseek
2363: jbr L523
2364: L524:
2365: incl r9
2366: pushl $_text
2367: pushl $12
2368: pushl $_cursym
2369: calls $3,_mget
2370: tstl _cursym
2371: jeql L525
2372: cmpl _cursym,$4
2373: jlssu L527
2374: cmpl _cursym,-4(fp)
2375: jlss L526
2376: L527:
2377: .data 1
2378: L528:
2379:
2380: .byte 0x62,0x61,0x64,0x20,0x73,0x74,0x72,0x69
2381: .byte 0x6e,0x67,0x20,0x74,0x61,0x62,0x6c,0x65
2382: .byte 0x20,0x69,0x6e,0x64,0x65,0x78,0x20,0x28
2383: .byte 0x70,0x61,0x73,0x73,0x20,0x32,0x29,0x0
2384: .text
2385: pushl $L528
2386: pushl $1
2387: calls $2,_error
2388: L526:
2389: addl2 _curstr,_cursym
2390: L525:
2391: movzbl _cursym+4,r0
2392: bicl2 $-16,r0
2393: jbr L530
2394: L531:
2395: L532:
2396: addl2 _ctrel,_cursym+8
2397: jbr L529
2398: L533:
2399: L534:
2400: addl2 _cdrel,_cursym+8
2401: jbr L529
2402: L535:
2403: L536:
2404: addl2 _cbrel,_cursym+8
2405: jbr L529
2406: L537:
2407: jbr L529
2408: L538:
2409: bitb $1,_cursym+4
2410: jeql L539
2411: movb $3,_cursym+4
2412: L539:
2413: jbr L529
2414: L530:
2415: casel r0,$1,$8
2416: L540:
2417: .word L537-L540
2418: .word L538-L540
2419: .word L538-L540
2420: .word L531-L540
2421: .word L532-L540
2422: .word L533-L540
2423: .word L534-L540
2424: .word L535-L540
2425: .word L536-L540
2426: jbr L538
2427: L529:
2428: movzbl _cursym+4,-8(fp)
2429: tstl _yflag
2430: jeql L541
2431: tstl _cursym
2432: jeql L541
2433: L542:
2434: clrl r8
2435: jbr L545
2436: L546:
2437: movl *_ytab[r8],r0
2438: movl _cursym,r1
2439: cmpb 1(r0),1(r1)
2440: jneq L548
2441: pushl _cursym
2442: pushl *_ytab[r8]
2443: calls $2,_strcmp
2444: tstl r0
2445: jneq L548
2446: L549:
2447: calls $0,_tracesym
2448: jbr L544
2449: L548:
2450: incl r8
2451: L545:
2452: cmpl r8,_yflag
2453: jlss L546
2454: L544:
2455: L541:
2456: bitl $1,-8(fp)
2457: jneq L551
2458: tstl _sflag
2459: jneq L552
2460: tstl _xflag
2461: jneq L552
2462: L554:
2463: tstl _Xflag
2464: jeql L555
2465: cmpb *_cursym,$76
2466: jneq L555
2467: L556:
2468: bitl $224,-8(fp)
2469: jeql L552
2470: L555:
2471: L553:
2472: pushl _sout
2473: pushl $_cursym
2474: calls $2,_symwrite
2475: L552:
2476: jbr L523
2477: L551:
2478: tstl _funding
2479: jeql L558
2480: jbr L523
2481: L558:
2482: calls $0,_lookup
2483: movl (r0),r11
2484: jneq L559
2485: .data 1
2486: L560:
2487:
2488: .byte 0x69,0x6e,0x74,0x65,0x72,0x6e,0x61,0x6c
2489: .byte 0x20,0x65,0x72,0x72,0x6f,0x72,0x3a,0x20
2490: .byte 0x73,0x79,0x6d,0x62,0x6f,0x6c,0x20,0x6e
2491: .byte 0x6f,0x74,0x20,0x66,0x6f,0x75,0x6e,0x64
2492: .byte 0x0
2493: .text
2494: pushl $L560
2495: pushl $1
2496: calls $2,_error
2497: L559:
2498: cmpb _cursym+4,$1
2499: jneq L561
2500: movl _clocseg,r0
2501: cmpl 4(r0),$100
2502: jneq L562
2503: addl2 $8,_clocseg
2504: cmpl _clocseg,$_locseg+320
2505: jneq L563
2506: .data 1
2507: L564:
2508:
2509: .byte 0x6c,0x6f,0x63,0x61,0x6c,0x20,0x73,0x79
2510: .byte 0x6d,0x62,0x6f,0x6c,0x20,0x6f,0x76,0x65
2511: .byte 0x72,0x66,0x6c,0x6f,0x77,0x0
2512: .text
2513: pushl $L564
2514: pushl $1
2515: calls $2,_error
2516: L563:
2517: movl _clocseg,r0
2518: clrl 4(r0)
2519: L562:
2520: tstl *_clocseg
2521: jneq L565
2522: pushl $1200
2523: calls $1,_malloc
2524: movl r0,*_clocseg
2525: tstl *_clocseg
2526: jneq L566
2527: .data 1
2528: L567:
2529:
2530: .byte 0x6f,0x75,0x74,0x20,0x6f,0x66,0x20,0x6d
2531: .byte 0x65,0x6d,0x6f,0x72,0x79,0x20,0x28,0x63
2532: .byte 0x6c,0x6f,0x63,0x73,0x65,0x67,0x29,0x0
2533: .text
2534: pushl $L567
2535: pushl $1
2536: calls $2,_error
2537: L566:
2538: L565:
2539: movl _clocseg,r0
2540: movl 4(r0),r1
2541: incl 4(r0)
2542: mull2 $12,r1
2543: addl3 *_clocseg,r1,r10
2544: movl r9,(r10)
2545: movl r11,4(r10)
2546: divl3 $31,r9,r0
2547: mull2 $31,r0
2548: subl3 r0,r9,r0
2549: movl _lochash[r0],8(r10)
2550: divl3 $31,r9,r0
2551: mull2 $31,r0
2552: subl3 r0,r9,r0
2553: movl r10,_lochash[r0]
2554: jbr L523
2555: L561:
2556: bitb $224,_cursym+4
2557: jeql L568
2558: jbr L523
2559: L568:
2560: cmpb _cursym+4,4(r11)
2561: jneq L570
2562: cmpl _cursym+8,8(r11)
2563: jeql L569
2564: L570:
2565: .data 1
2566: L571:
2567:
2568: .byte 0x25,0x73,0x3a,0x20,0x0
2569: .text
2570: pushl _cursym
2571: pushl $L571
2572: calls $2,_printf
2573: .data 1
2574: L572:
2575:
2576: .byte 0x6d,0x75,0x6c,0x74,0x69,0x70,0x6c,0x79
2577: .byte 0x20,0x64,0x65,0x66,0x69,0x6e,0x65,0x64
2578: .byte 0x0
2579: .text
2580: pushl $L572
2581: pushl $0
2582: calls $2,_error
2583: L569:
2584: L523:
2585: tstl _text+12
2586: jgtr L524
2587: L522:
2588: tstl _funding
2589: jeql L573
2590: jbr L512
2591: L573:
2592: pushl _filhdr+4
2593: pushl 4(ap)
2594: pushl $_text
2595: calls $3,_dseek
2596: pushl _filhdr+24
2597: addl3 _filhdr+4,4(ap),r0
2598: addl3 _filhdr+8,r0,-(sp)
2599: pushl $_reloc
2600: calls $3,_dseek
2601: pushl _trout
2602: pushl _tout
2603: subl3 _textbase,_torigin,-(sp)
2604: pushl _ctrel
2605: calls $4,_load2td
2606: pushl _filhdr+8
2607: addl3 _filhdr+4,4(ap),-(sp)
2608: pushl $_text
2609: calls $3,_dseek
2610: pushl _filhdr+28
2611: addl3 _filhdr+4,4(ap),r0
2612: addl2 _filhdr+8,r0
2613: addl3 _filhdr+24,r0,-(sp)
2614: pushl $_reloc
2615: calls $3,_dseek
2616: pushl _drout
2617: pushl _dout
2618: subl3 _database,_dorigin,-(sp)
2619: pushl _cdrel
2620: calls $4,_load2td
2621: jbr L576
2622: L577:
2623: tstw *_dout
2624: jeql L578
2625: decw *_dout
2626: clrb r0
2627: movl _dout,r1
2628: movl 4(r1),r2
2629: incl 4(r1)
2630: movb r0,(r2)
2631: jbr L579
2632: L578:
2633: pushl $0
2634: pushl _dout
2635: calls $2,_bflushc
2636: L579:
2637: incl _filhdr+8
2638: L576:
2639: bitl $3,_filhdr+8
2640: jneq L577
2641: L575:
2642: addl2 _filhdr+4,_torigin
2643: pushl $4
2644: pushl _filhdr+8
2645: calls $2,_round
2646: addl2 r0,_dorigin
2647: pushl $4
2648: pushl _filhdr+12
2649: calls $2,_round
2650: addl2 r0,_borigin
2651: pushl _curstr
2652: calls $1,_free
2653: .stabs "type",0x80,0,4,8
2654: .stabs "i",0x40,0,4,8
2655: .stabs "symno",0x40,0,4,9
2656: .stabs "lp",0x40,0,40,10
2657: .stabs "sp",0x40,0,40,11
2658: .stabs "size",0x80,0,4,4
2659: L512:
2660: ret
2661: .set L.R16,0xf00
2662: .set L.SO16,0x8
2663: L580: .data
2664: .data
2665: .align 2
2666: .globl _tynames
2667: _tynames:
2668: .long 0
2669: .data 2
2670: L582:
2671:
2672: .byte 0x75,0x6e,0x64,0x65,0x66,0x69,0x6e,0x65
2673: .byte 0x64,0x0
2674: .data
2675: .long L582
2676: .long 2
2677: .data 2
2678: L583:
2679:
2680: .byte 0x61,0x62,0x73,0x6f,0x6c,0x75,0x74,0x65
2681: .byte 0x0
2682: .data
2683: .long L583
2684: .long 4
2685: .data 2
2686: L584:
2687:
2688: .byte 0x74,0x65,0x78,0x74,0x0
2689: .data
2690: .long L584
2691: .long 6
2692: .data 2
2693: L585:
2694:
2695: .byte 0x64,0x61,0x74,0x61,0x0
2696: .data
2697: .long L585
2698: .long 8
2699: .data 2
2700: L586:
2701:
2702: .byte 0x62,0x73,0x73,0x0
2703: .data
2704: .long L586
2705: .long 18
2706: .data 2
2707: L587:
2708:
2709: .byte 0x63,0x6f,0x6d,0x6d,0x6f,0x6e,0x0
2710: .data
2711: .long L587
2712: .long 0
2713: .long 0
2714: .text
2715: .align 2
2716: .globl _tracesym
2717: _tracesym:
2718: .word L.R17
2719: subl2 $L.SO17,sp
2720: .stabs "tracesym",0x24,0,1228,_tracesym
2721: bitb $224,_cursym+4
2722: jeql L589
2723: jbr L588
2724: L589:
2725: .data 1
2726: L590:
2727:
2728: .byte 0x25,0x73,0x0
2729: .text
2730: pushl _filname
2731: pushl $L590
2732: calls $2,_printf
2733: tstb _archdr
2734: jeql L591
2735: .data 1
2736: L592:
2737:
2738: .byte 0x28,0x25,0x73,0x29,0x0
2739: .text
2740: pushl $_archdr
2741: pushl $L592
2742: calls $2,_printf
2743: L591:
2744: .data 1
2745: L593:
2746:
2747: .byte 0x3a,0x20,0x0
2748: .text
2749: pushl $L593
2750: calls $1,_printf
2751: bitb $30,_cursym+4
2752: jneq L594
2753: tstl _cursym+8
2754: jeql L594
2755: L595:
2756: .data 1
2757: L596:
2758:
2759: .byte 0x64,0x65,0x66,0x69,0x6e,0x69,0x74,0x69
2760: .byte 0x6f,0x6e,0x20,0x6f,0x66,0x20,0x63,0x6f
2761: .byte 0x6d,0x6d,0x6f,0x6e,0x20,0x25,0x73,0x20
2762: .byte 0x73,0x69,0x7a,0x65,0x20,0x25,0x64,0xa
2763: .byte 0x0
2764: .text
2765: pushl _cursym+8
2766: pushl _cursym
2767: pushl $L596
2768: calls $3,_printf
2769: jbr L588
2770: L594:
2771: movl $_tynames,r11
2772: jbr L599
2773: L600:
2774: movzbl _cursym+4,r0
2775: bicl2 $-31,r0
2776: cmpl (r11),r0
2777: jneq L601
2778: jbr L598
2779: L601:
2780: addl2 $8,r11
2781: L599:
2782: tstl 4(r11)
2783: jneq L600
2784: L598:
2785: .data 1
2786: L602:
2787:
2788: .byte 0x64,0x65,0x66,0x69,0x6e,0x69,0x74,0x69
2789: .byte 0x6f,0x6e,0x20,0x6f,0x66,0x0
2790: .text
2791: .data 1
2792: L603:
2793:
2794: .byte 0x72,0x65,0x66,0x65,0x72,0x65,0x6e,0x63
2795: .byte 0x65,0x20,0x74,0x6f,0x0
2796: .text
2797: bitb $30,_cursym+4
2798: jeql L604
2799: movl $L602,-(sp)
2800: jbr L605
2801: L604:
2802: movl $L603,-(sp)
2803: L605:
2804: calls $1,_printf
2805: bitb $1,_cursym+4
2806: jeql L606
2807: .data 1
2808: L607:
2809:
2810: .byte 0x20,0x65,0x78,0x74,0x65,0x72,0x6e,0x61
2811: .byte 0x6c,0x0
2812: .text
2813: pushl $L607
2814: calls $1,_printf
2815: L606:
2816: tstl 4(r11)
2817: jeql L608
2818: .data 1
2819: L609:
2820:
2821: .byte 0x20,0x25,0x73,0x0
2822: .text
2823: pushl 4(r11)
2824: pushl $L609
2825: calls $2,_printf
2826: L608:
2827: .data 1
2828: L610:
2829:
2830: .byte 0x20,0x25,0x73,0xa,0x0
2831: .text
2832: pushl _cursym
2833: pushl $L610
2834: calls $2,_printf
2835: .stabs "tp",0x40,0,40,11
2836: L588:
2837: ret
2838: .set L.R17,0x800
2839: .set L.SO17,0x0
2840: L611: .data
2841: .text
2842: .align 2
2843: .globl _load2td
2844: _load2td:
2845: .word L.R18
2846: subl2 $L.SO18,sp
2847: .stabs "load2td",0x24,0,1269,_load2td
2848: .stabs "creloc",0xa0,0,4,4
2849: .stabs "position",0xa0,0,4,8
2850: .stabs "b1",0xa0,0,40,12
2851: .stabs "b2",0xa0,0,40,16
2852: movl _reloc+12,-16(fp)
2853: pushl -16(fp)
2854: calls $1,_malloc
2855: movl r0,-8(fp)
2856: movl _text+12,-20(fp)
2857: pushl -20(fp)
2858: calls $1,_malloc
2859: movl r0,-12(fp)
2860: tstl -8(fp)
2861: jeql L614
2862: tstl -12(fp)
2863: jneq L613
2864: L614:
2865: .data 1
2866: L615:
2867:
2868: .byte 0x6f,0x75,0x74,0x20,0x6f,0x66,0x20,0x6d
2869: .byte 0x65,0x6d,0x6f,0x72,0x79,0x20,0x28,0x6c
2870: .byte 0x6f,0x61,0x64,0x32,0x74,0x64,0x29,0x0
2871: .text
2872: pushl $L615
2873: pushl $1
2874: calls $2,_error
2875: L613:
2876: pushl $_reloc
2877: pushl -16(fp)
2878: pushl -8(fp)
2879: calls $3,_mget
2880: pushl $8
2881: pushl -16(fp)
2882: calls $2,udiv
2883: addl2 r0,r0
2884: addl2 r0,r0
2885: addl2 r0,r0
2886: addl3 -8(fp),r0,r8
2887: pushl $_text
2888: pushl -20(fp)
2889: pushl -12(fp)
2890: calls $3,_mget
2891: movl -8(fp),r9
2892: jbr L618
2893: L619:
2894: addl3 (r9),-12(fp),r7
2895: extzv $25,$2,4(r9),r0
2896: jbr L621
2897: L622:
2898: cvtbl (r7),-4(fp)
2899: jbr L620
2900: L623:
2901: cvtwl (r7),-4(fp)
2902: jbr L620
2903: L624:
2904: movl (r7),-4(fp)
2905: jbr L620
2906: L625:
2907: .data 1
2908: L626:
2909:
2910: .byte 0x6c,0x6f,0x61,0x64,0x32,0x74,0x64,0x20
2911: .byte 0x62,0x6f,0x74,0x63,0x68,0x3a,0x20,0x62
2912: .byte 0x61,0x64,0x20,0x6c,0x65,0x6e,0x67,0x74
2913: .byte 0x68,0x0
2914: .text
2915: pushl $L626
2916: pushl $1
2917: calls $2,_error
2918: jbr L620
2919: L621:
2920: casel r0,$0,$2
2921: L627:
2922: .word L622-L627
2923: .word L623-L627
2924: .word L624-L627
2925: jbr L625
2926: L620:
2927: extzv $27,$1,4(r9),r0
2928: jeql L628
2929: pushl $31
2930: extzv $0,$24,4(r9),-(sp)
2931: calls $2,urem
2932: movl _lochash[r0],r10
2933: jbr L630
2934: L631:
2935: movl 8(r10),r10
2936: tstl r10
2937: jneq L632
2938: .data 1
2939: L633:
2940:
2941: .byte 0x6c,0x6f,0x63,0x61,0x6c,0x20,0x73,0x79
2942: .byte 0x6d,0x62,0x6f,0x6c,0x20,0x62,0x6f,0x74
2943: .byte 0x63,0x68,0x0
2944: .text
2945: pushl $L633
2946: pushl $1
2947: calls $2,_error
2948: L632:
2949: L630:
2950: extzv $0,$24,4(r9),r0
2951: cmpl (r10),r0
2952: jneq L631
2953: L629:
2954: movl 4(r10),r11
2955: cmpb 4(r11),$1
2956: jneq L634
2957: pushl r11
2958: calls $1,_symx
2959: addl2 _nsym,r0
2960: insv r0,$0,$24,4(r9)
2961: jbr L635
2962: L634:
2963: movzbl 4(r11),r0
2964: bicl2 $-31,r0
2965: insv r0,$0,$24,4(r9)
2966: addl2 8(r11),-4(fp)
2967: insv $0,$27,$1,4(r9)
2968: L635:
2969: jbr L636
2970: L628:
2971: extzv $0,$24,4(r9),r0
2972: bicl2 $-31,r0
2973: jbr L638
2974: L639:
2975: addl2 _ctrel,-4(fp)
2976: jbr L637
2977: L640:
2978: addl2 _cdrel,-4(fp)
2979: jbr L637
2980: L641:
2981: addl2 _cbrel,-4(fp)
2982: jbr L637
2983: L642:
2984: jbr L637
2985: L643:
2986: .data 1
2987: L644:
2988:
2989: .byte 0x72,0x65,0x6c,0x6f,0x63,0x61,0x74,0x69
2990: .byte 0x6f,0x6e,0x20,0x66,0x6f,0x72,0x6d,0x61
2991: .byte 0x74,0x20,0x62,0x6f,0x74,0x63,0x68,0x20
2992: .byte 0x28,0x73,0x79,0x6d,0x62,0x6f,0x6c,0x20
2993: .byte 0x74,0x79,0x70,0x65,0x29,0x29,0x0
2994: .text
2995: pushl $L644
2996: pushl $1
2997: calls $2,_error
2998: jbr L637
2999: L638:
3000: casel r0,$2,$6
3001: L645:
3002: .word L642-L645
3003: .word L643-L645
3004: .word L639-L645
3005: .word L643-L645
3006: .word L640-L645
3007: .word L643-L645
3008: .word L641-L645
3009: jbr L643
3010: L637:
3011: L636:
3012: extzv $24,$1,4(r9),r0
3013: jeql L646
3014: subl2 4(ap),-4(fp)
3015: L646:
3016: extzv $25,$2,4(r9),r0
3017: jbr L648
3018: L649:
3019: cmpl -4(fp),$-128
3020: jlss L651
3021: cmpl -4(fp),$127
3022: jleq L650
3023: L651:
3024: .data 1
3025: L652:
3026:
3027: .byte 0x62,0x79,0x74,0x65,0x20,0x64,0x69,0x73
3028: .byte 0x70,0x6c,0x61,0x63,0x65,0x6d,0x65,0x6e
3029: .byte 0x74,0x20,0x6f,0x76,0x65,0x72,0x66,0x6c
3030: .byte 0x6f,0x77,0x0
3031: .text
3032: pushl $L652
3033: pushl $0
3034: calls $2,_error
3035: L650:
3036: movb -4(fp),(r7)
3037: jbr L647
3038: L653:
3039: cmpl -4(fp),$-32768
3040: jlss L655
3041: cmpl -4(fp),$32767
3042: jleq L654
3043: L655:
3044: .data 1
3045: L656:
3046:
3047: .byte 0x77,0x6f,0x72,0x64,0x20,0x64,0x69,0x73
3048: .byte 0x70,0x6c,0x61,0x63,0x65,0x6d,0x65,0x6e
3049: .byte 0x74,0x20,0x6f,0x76,0x65,0x72,0x66,0x6c
3050: .byte 0x6f,0x77,0x0
3051: .text
3052: pushl $L656
3053: pushl $0
3054: calls $2,_error
3055: L654:
3056: movw -4(fp),(r7)
3057: jbr L647
3058: L657:
3059: movl -4(fp),(r7)
3060: jbr L647
3061: L648:
3062: casel r0,$0,$2
3063: L658:
3064: .word L649-L658
3065: .word L653-L658
3066: .word L657-L658
3067: L659:
3068: L647:
3069: tstl _rflag
3070: jeql L660
3071: addl2 8(ap),(r9)
3072: L660:
3073: addl2 $8,r9
3074: L618:
3075: cmpl r9,r8
3076: jlssu L619
3077: L617:
3078: pushl 12(ap)
3079: pushl -20(fp)
3080: pushl -12(fp)
3081: calls $3,_bwrite
3082: tstl _rflag
3083: jeql L661
3084: pushl 16(ap)
3085: pushl -16(fp)
3086: pushl -8(fp)
3087: calls $3,_bwrite
3088: L661:
3089: pushl -8(fp)
3090: calls $1,_cfree
3091: pushl -12(fp)
3092: calls $1,_cfree
3093: .stabs "codesz",0x80,0,4,20
3094: .stabs "relsz",0x80,0,4,16
3095: .stabs "cp",0x40,0,34,7
3096: .stabs "codep",0x80,0,34,12
3097: .stabs "relp",0x80,0,40,8
3098: .stabs "rpend",0x40,0,40,8
3099: .stabs "rp",0x40,0,40,9
3100: .stabs "tw",0x80,0,4,4
3101: .stabs "lp",0x40,0,40,10
3102: .stabs "sp",0x40,0,40,11
3103: L612:
3104: ret
3105: .set L.R18,0xf80
3106: .set L.SO18,0x14
3107: L662: .data
3108: .text
3109: .align 2
3110: .globl _finishout
3111: _finishout:
3112: .word L.R19
3113: subl2 $L.SO19,sp
3114: .stabs "finishout",0x24,0,1406,_finishout
3115: tstl _sflag
3116: jneq L664
3117: pushl _nextsym
3118: calls $1,_symx
3119: movl r0,-4(fp)
3120: clrl r11
3121: jbr L667
3122: L668:
3123: pushl _sout
3124: divl3 $1103,r11,r0
3125: mull2 $20,r0
3126: divl3 $1103,r11,r1
3127: mull2 $1103,r1
3128: subl3 r1,r11,r1
3129: mull2 $12,r1
3130: addl3 r1,_symseg(r0),-(sp)
3131: calls $2,_symwrite
3132: incl r11
3133: L667:
3134: cmpl r11,-4(fp)
3135: jlss L668
3136: L666:
3137: pushl _sout
3138: pushl $4
3139: pushl $_offset
3140: calls $3,_bwrite
3141: L664:
3142: tstl _ofilfnd
3143: jneq L669
3144: .data 1
3145: L670:
3146:
3147: .byte 0x61,0x2e,0x6f,0x75,0x74,0x0
3148: .text
3149: pushl $L670
3150: calls $1,_unlink
3151: .data 1
3152: L672:
3153:
3154: .byte 0x6c,0x2e,0x6f,0x75,0x74,0x0
3155: .text
3156: .data 1
3157: L673:
3158:
3159: .byte 0x61,0x2e,0x6f,0x75,0x74,0x0
3160: .text
3161: pushl $L673
3162: pushl $L672
3163: calls $2,_link
3164: tstl r0
3165: jgeq L674
3166: .data 1
3167: L675:
3168:
3169: .byte 0x63,0x61,0x6e,0x6e,0x6f,0x74,0x20,0x6d
3170: .byte 0x6f,0x76,0x65,0x20,0x6c,0x2e,0x6f,0x75
3171: .byte 0x74,0x20,0x74,0x6f,0x20,0x61,0x2e,0x6f
3172: .byte 0x75,0x74,0x0
3173: .text
3174: pushl $L675
3175: pushl $1
3176: calls $2,_error
3177: L674:
3178: .data 1
3179: L676:
3180:
3181: .byte 0x61,0x2e,0x6f,0x75,0x74,0x0
3182: .text
3183: movl $L676,_ofilename
3184: L669:
3185: movl _errlev,_delarg
3186: calls $0,_delexit
3187: .stabs "nsymt",0x80,0,4,4
3188: .stabs "i",0x40,0,4,11
3189: L663:
3190: ret
3191: .set L.R19,0x800
3192: .set L.SO19,0x4
3193: L677: .data
3194: .text
3195: .align 2
3196: .globl _mkfsym
3197: _mkfsym:
3198: .word L.R20
3199: subl2 $L.SO20,sp
3200: .stabs "mkfsym",0x24,0,1428,_mkfsym
3201: .stabs "s",0xa0,0,34,4
3202: tstl _sflag
3203: jneq L680
3204: tstl _xflag
3205: jeql L679
3206: L680:
3207: jbr L678
3208: L679:
3209: movl 4(ap),_cursym
3210: movb $4,_cursym+4
3211: movl _torigin,_cursym+8
3212: pushl _sout
3213: pushl $_cursym
3214: calls $2,_symwrite
3215: L678:
3216: ret
3217: .set L.R20,0x0
3218: .set L.SO20,0x0
3219: L681: .data
3220: .text
3221: .align 2
3222: .globl _getarhdr
3223: _getarhdr:
3224: .word L.R21
3225: subl2 $L.SO21,sp
3226: .stabs "getarhdr",0x24,0,1439,_getarhdr
3227: pushl $_text
3228: pushl $60
3229: pushl $_archdr
3230: calls $3,_mget
3231: movl $_archdr,r11
3232: jbr L685
3233: L686:
3234: cmpb (r11)+,$32
3235: jneq L687
3236: clrb -1(r11)
3237: jbr L682
3238: L687:
3239: L685:
3240: cmpl r11,$_archdr+16
3241: jlssu L686
3242: L684:
3243: .stabs "cp",0x40,0,34,11
3244: L682:
3245: ret
3246: .set L.R21,0x800
3247: .set L.SO21,0x0
3248: L688: .data
3249: .text
3250: .align 2
3251: .globl _mget
3252: _mget:
3253: .word L.R22
3254: subl2 $L.SO22,sp
3255: .stabs "mget",0x24,0,1453,_mget
3256: .stabs "loc",0xa0,0,34,4
3257: .stabs "n",0xa0,0,4,8
3258: .stabs "sp",0xa0,0,40,12
3259: movl 4(ap),r10
3260: movl 12(ap),r11
3261: L690:
3262: tstl 8(ap)
3263: jneq L691
3264: jbr L689
3265: L691:
3266: tstl 12(r11)
3267: jeql L692
3268: tstl 8(r11)
3269: jeql L692
3270: L693:
3271: movl (r11),r9
3272: movl 12(r11),r8
3273: cmpl r8,8(r11)
3274: jleq L694
3275: movl 8(r11),r8
3276: L694:
3277: cmpl r8,8(ap)
3278: jleq L695
3279: movl 8(ap),r8
3280: L695:
3281: subl2 r8,8(ap)
3282: subl2 r8,12(r11)
3283: subl2 r8,8(r11)
3284: addl2 r8,16(r11)
3285: L698:
3286: movb (r9)+,(r10)+
3287: L697:
3288: decl r8
3289: jgtr L698
3290: L696:
3291: movl r9,(r11)
3292: jbr L690
3293: L692:
3294: cmpl 8(ap),$4096
3295: jleq L699
3296: divl3 $4096,8(ap),r0
3297: mull2 $4096,r0
3298: subl3 r0,8(ap),r0
3299: subl3 r0,8(ap),r8
3300: pushl $0
3301: addl3 $1,4(r11),r0
3302: ashl $12,r0,-(sp)
3303: pushl _infil
3304: calls $3,_lseek
3305: cmpl r8,12(r11)
3306: jgtr L703
3307: pushl r8
3308: pushl r10
3309: pushl _infil
3310: calls $3,_read
3311: cmpl r0,r8
3312: jeql L702
3313: L703:
3314: .data 1
3315: L704:
3316:
3317: .byte 0x70,0x72,0x65,0x6d,0x61,0x74,0x75,0x72
3318: .byte 0x65,0x20,0x45,0x4f,0x46,0x0
3319: .text
3320: pushl $L704
3321: pushl $1
3322: calls $2,_error
3323: L702:
3324: addl2 r8,r10
3325: subl2 r8,8(ap)
3326: subl2 r8,12(r11)
3327: addl2 r8,16(r11)
3328: pushl $-1
3329: addl3 $1,4(r11),r0
3330: divl3 $4096,r8,r1
3331: addl2 r1,r0
3332: ashl $12,r0,-(sp)
3333: pushl r11
3334: calls $3,_dseek
3335: jbr L690
3336: L699:
3337: pushl r11
3338: calls $1,_get
3339: movb r0,(r10)+
3340: decl 8(ap)
3341: jbr L690
3342: .stabs "take",0x40,0,4,8
3343: .stabs "p",0x40,0,34,9
3344: .stabs "loc",0x40,0,34,10
3345: .stabs "sp",0x40,0,40,11
3346: L689:
3347: ret
3348: .set L.R22,0xf00
3349: .set L.SO22,0x0
3350: L705: .data
3351: .text
3352: .align 2
3353: .globl _symwrite
3354: _symwrite:
3355: .word L.R23
3356: subl2 $L.SO23,sp
3357: .stabs "symwrite",0x24,0,1497,_symwrite
3358: .stabs "sp",0xa0,0,40,4
3359: .stabs "bp",0xa0,0,40,8
3360: movl *4(ap),r10
3361: tstl r10
3362: jeql L707
3363: movl _offset,*4(ap)
3364: pushl r10
3365: calls $1,_strlen
3366: addl3 $1,r0,r11
3367: pushl _strout
3368: pushl r11
3369: pushl r10
3370: calls $3,_bwrite
3371: addl2 r11,_offset
3372: L707:
3373: pushl 8(ap)
3374: pushl $12
3375: pushl 4(ap)
3376: calls $3,_bwrite
3377: movl r10,*4(ap)
3378: .stabs "str",0x40,0,34,10
3379: .stabs "len",0x40,0,4,11
3380: L706:
3381: ret
3382: .set L.R23,0xc00
3383: .set L.SO23,0x0
3384: L709: .data
3385: .text
3386: .align 2
3387: .globl _dseek
3388: _dseek:
3389: .word L.R24
3390: subl2 $L.SO24,sp
3391: .stabs "dseek",0x24,0,1515,_dseek
3392: .stabs "sp",0xa0,0,40,4
3393: .stabs "loc",0xa0,0,4,8
3394: .stabs "s",0xa0,0,4,12
3395: movl 4(ap),r11
3396: extzv $12,$20,8(ap),r9
3397: bicl3 $-4096,8(ap),r8
3398: bitl $1,r8
3399: jeql L711
3400: .data 1
3401: L712:
3402:
3403: .byte 0x6c,0x6f,0x61,0x64,0x65,0x72,0x20,0x65
3404: .byte 0x72,0x72,0x6f,0x72,0x3b,0x20,0x6f,0x64
3405: .byte 0x64,0x20,0x6f,0x66,0x66,0x73,0x65,0x74
3406: .byte 0x0
3407: .text
3408: pushl $L712
3409: pushl $1
3410: calls $2,_error
3411: L711:
3412: movl 20(r11),r0
3413: decl 12(r0)
3414: movl $_page,r10
3415: cmpl 4(r10),r9
3416: jeql L713
3417: movl $_page+4112,r10
3418: cmpl 4(r10),r9
3419: jeql L713
3420: L714:
3421: tstl 12(r10)
3422: jeql L716
3423: movl $_page,r10
3424: tstl 12(r10)
3425: jneq L715
3426: L716:
3427: tstl _page+12
3428: jneq L717
3429: tstl _page+4124
3430: jneq L717
3431: L718:
3432: cmpl _page+4,_page+4116
3433: jgeq L719
3434: movl $_page,r10
3435: L719:
3436: L717:
3437: movl r9,4(r10)
3438: pushl $0
3439: bicl3 $4095,8(ap),-(sp)
3440: pushl _infil
3441: calls $3,_lseek
3442: pushl $4096
3443: addl3 $16,r10,-(sp)
3444: pushl _infil
3445: calls $3,_read
3446: movl r0,-4(fp)
3447: jgeq L720
3448: clrl -4(fp)
3449: L720:
3450: movl -4(fp),8(r10)
3451: jbr L721
3452: L715:
3453: .data 1
3454: L722:
3455:
3456: .byte 0x62,0x6f,0x74,0x63,0x68,0x3a,0x20,0x6e
3457: .byte 0x6f,0x20,0x70,0x61,0x67,0x65,0x73,0x0
3458: .text
3459: pushl $L722
3460: pushl $1
3461: calls $2,_error
3462: L721:
3463: L713:
3464: incl 12(r10)
3465: movl r9,4(r11)
3466: movl r10,20(r11)
3467: cmpl 12(ap),$-1
3468: jeql L723
3469: movl 12(ap),12(r11)
3470: clrl 16(r11)
3471: L723:
3472: addl3 $16,r10,r0
3473: addl3 r8,r0,(r11)
3474: subl3 r8,8(r10),8(r11)
3475: jgtr L724
3476: clrl 12(r11)
3477: L724:
3478: .stabs "n",0x80,0,4,4
3479: .stabs "o",0x40,0,4,8
3480: .stabs "b",0x40,0,4,9
3481: .stabs "p",0x40,0,40,10
3482: .stabs "sp",0x40,0,40,11
3483: L710:
3484: ret
3485: .set L.R24,0xf00
3486: .set L.SO24,0x4
3487: L725: .data
3488: .text
3489: .align 2
3490: .globl _get
3491: _get:
3492: .word L.R25
3493: subl2 $L.SO25,sp
3494: .stabs "get",0x24,0,1549,_get
3495: .stabs "asp",0xa0,0,40,4
3496: movl 4(ap),r11
3497: decl 8(r11)
3498: jgeq L727
3499: pushl $-1
3500: addl3 $1,4(r11),r0
3501: ashl $12,r0,-(sp)
3502: pushl r11
3503: calls $3,_dseek
3504: decl 8(r11)
3505: L727:
3506: decl 12(r11)
3507: jgtr L728
3508: tstl 12(r11)
3509: jgeq L729
3510: .data 1
3511: L730:
3512:
3513: .byte 0x70,0x72,0x65,0x6d,0x61,0x74,0x75,0x72
3514: .byte 0x65,0x20,0x45,0x4f,0x46,0x0
3515: .text
3516: pushl $L730
3517: pushl $1
3518: calls $2,_error
3519: L729:
3520: incl _fpage+12
3521: movl 20(r11),r0
3522: decl 12(r0)
3523: movl $_fpage,20(r11)
3524: L728:
3525: incl 16(r11)
3526: movl (r11),r0
3527: incl (r11)
3528: cvtbl (r0),r0
3529: jbr L726
3530: .stabs "sp",0x40,0,40,11
3531: L726:
3532: ret
3533: .set L.R25,0x800
3534: .set L.SO25,0x0
3535: L731: .data
3536: .text
3537: .align 2
3538: .globl _getfile
3539: _getfile:
3540: .word L.R26
3541: subl2 $L.SO26,sp
3542: .stabs "getfile",0x24,0,1570,_getfile
3543: .stabs "acp",0xa0,0,34,4
3544: movl 4(ap),r11
3545: movl $-1,_infil
3546: clrb _archdr
3547: movl r11,_filname
3548: cmpb (r11),$45
3549: jneq L733
3550: cmpb 1(r11),$108
3551: jneq L733
3552: L734:
3553: .data 1
3554: L735:
3555:
3556: .byte 0x2f,0x75,0x73,0x72,0x2f,0x6c,0x6f,0x63
3557: .byte 0x61,0x6c,0x2f,0x6c,0x69,0x62,0x2f,0x6c
3558: .byte 0x69,0x62,0x78,0x78,0x78,0x78,0x78,0x78
3559: .byte 0x78,0x78,0x78,0x78,0x78,0x78,0x78,0x78
3560: .byte 0x78,0x0
3561: .text
3562: movl $L735,-48(fp)
3563: tstb 2(r11)
3564: jneq L736
3565: .data 1
3566: L737:
3567:
3568: .byte 0x2d,0x6c,0x61,0x0
3569: .text
3570: movl $L737,r11
3571: L736:
3572: .data 1
3573: L738:
3574:
3575: .byte 0x2f,0x75,0x73,0x72,0x2f,0x6c,0x69,0x62
3576: .byte 0x2f,0x6c,0x69,0x62,0x78,0x78,0x78,0x78
3577: .byte 0x78,0x78,0x78,0x78,0x78,0x78,0x78,0x78
3578: .byte 0x78,0x78,0x78,0x0
3579: .text
3580: movl $L738,_filname
3581: clrl r10
3582: jbr L741
3583: L742:
3584: addl3 $12,r10,r0
3585: addl2 _filname,r0
3586: addl3 $2,r10,r1
3587: addl2 r11,r1
3588: movb (r1),(r0)
3589: addl3 $18,r10,r0
3590: addl2 -48(fp),r0
3591: addl3 $2,r10,r1
3592: addl2 r11,r1
3593: movb (r1),(r0)
3594: incl r10
3595: L741:
3596: addl3 $2,r10,r0
3597: addl2 r11,r0
3598: tstb (r0)
3599: jneq L742
3600: L740:
3601: addl3 $12,r10,r0
3602: addl2 _filname,r0
3603: movb $46,r1
3604: addl3 $18,r10,r2
3605: addl2 -48(fp),r2
3606: movb r1,(r2)
3607: movb r1,(r0)
3608: addl3 $13,r10,r0
3609: addl2 _filname,r0
3610: movb $97,r1
3611: addl3 $19,r10,r2
3612: addl2 -48(fp),r2
3613: movb r1,(r2)
3614: movb r1,(r0)
3615: addl3 $14,r10,r0
3616: addl2 _filname,r0
3617: clrb r1
3618: addl3 $20,r10,r2
3619: addl2 -48(fp),r2
3620: movb r1,(r2)
3621: movb r1,(r0)
3622: pushl $0
3623: addl3 $4,_filname,-(sp)
3624: calls $2,_open
3625: movl r0,_infil
3626: jlss L744
3627: addl2 $4,_filname
3628: jbr L745
3629: L744:
3630: pushl $0
3631: pushl _filname
3632: calls $2,_open
3633: movl r0,_infil
3634: jgeq L746
3635: movl -48(fp),_filname
3636: L746:
3637: L745:
3638: .stabs "locfilname",0x80,0,34,48
3639: L733:
3640: cmpl _infil,$-1
3641: jneq L747
3642: pushl $0
3643: pushl _filname
3644: calls $2,_open
3645: movl r0,_infil
3646: jgeq L747
3647: L748:
3648: .data 1
3649: L749:
3650:
3651: .byte 0x63,0x61,0x6e,0x6e,0x6f,0x74,0x20,0x6f
3652: .byte 0x70,0x65,0x6e,0x0
3653: .text
3654: pushl $L749
3655: pushl $1
3656: calls $2,_error
3657: L747:
3658: movl $-1,_page+4116
3659: movl _page+4116,_page+4
3660: clrl _page+4124
3661: movl _page+4124,_page+12
3662: movl $_fpage,_reloc+20
3663: movl _reloc+20,_text+20
3664: movl $2,_fpage+12
3665: pushl $8
3666: pushl $0
3667: pushl $_text
3668: calls $3,_dseek
3669: tstl _text+12
3670: jgtr L750
3671: .data 1
3672: L751:
3673:
3674: .byte 0x70,0x72,0x65,0x6d,0x61,0x74,0x75,0x72
3675: .byte 0x65,0x20,0x45,0x4f,0x46,0x0
3676: .text
3677: pushl $L751
3678: pushl $1
3679: calls $2,_error
3680: L750:
3681: pushl $_text
3682: pushl $8
3683: pushal -9(fp)
3684: calls $3,_mget
3685: clrb -1(fp)
3686: .data 1
3687: L752:
3688:
3689: .byte 0x21,0x3c,0x61,0x72,0x63,0x68,0x3e,0xa
3690: .byte 0x0
3691: .text
3692: pushl $L752
3693: pushal -9(fp)
3694: calls $2,_strcmp
3695: tstl r0
3696: jeql L753
3697: clrl r0
3698: jbr L732
3699: L753:
3700: pushl $60
3701: pushl $8
3702: pushl $_text
3703: calls $3,_dseek
3704: tstl _text+12
3705: jgtr L754
3706: movl $1,r0
3707: jbr L732
3708: L754:
3709: calls $0,_getarhdr
3710: .data 1
3711: L756:
3712:
3713: .byte 0x5f,0x5f,0x2e,0x53,0x59,0x4d,0x44,0x45
3714: .byte 0x46,0x0
3715: .text
3716: pushl $16
3717: pushl $L756
3718: pushl $_archdr
3719: calls $3,_strncmp
3720: tstl r0
3721: jeql L757
3722: movl $1,r0
3723: jbr L732
3724: L757:
3725: pushal -44(fp)
3726: pushl _infil
3727: calls $2,_fstat
3728: pushl $_archdr+16
3729: calls $1,_atol
3730: cmpl -20(fp),r0
3731: jleq L758
3732: movl $3,r0
3733: jbr L759
3734: L758:
3735: movl $2,r0
3736: L759:
3737: jbr L732
3738: .stabs "stb",0x80,0,8,44
3739: .stabs "arcmag",0x80,0,98,9
3740: .stabs "c",0x40,0,4,10
3741: .stabs "cp",0x40,0,34,11
3742: L732:
3743: ret
3744: .set L.R26,0xc00
3745: .set L.SO26,0x30
3746: L760: .data
3747: .text
3748: .align 2
3749: .globl _lookup
3750: _lookup:
3751: .word L.R27
3752: subl2 $L.SO27,sp
3753: .stabs "lookup",0x24,0,1623,_lookup
3754: clrl r11
3755: movl _cursym,r9
3756: jbr L764
3757: L765:
3758: addl3 r11,r11,r0
3759: cvtbl (r9)+,r1
3760: addl3 r1,r0,r11
3761: L764:
3762: tstb (r9)
3763: jneq L765
3764: L763:
3765: bicl3 $-2147483648,r11,r0
3766: divl3 $2206,r0,r1
3767: mull2 $2206,r1
3768: subl3 r1,r0,r1
3769: movl r1,r11
3770: movl $_symseg,r7
3771: jbr L768
3772: L769:
3773: tstl (r7)
3774: jneq L770
3775: pushl $12
3776: pushl $1103
3777: calls $2,_calloc
3778: movl r0,(r7)
3779: pushl $4
3780: pushl $2206
3781: calls $2,_calloc
3782: movl r0,12(r7)
3783: tstl (r7)
3784: jeql L772
3785: tstl 12(r7)
3786: jneq L771
3787: L772:
3788: .data 1
3789: L773:
3790:
3791: .byte 0x72,0x61,0x6e,0x20,0x6f,0x75,0x74,0x20
3792: .byte 0x6f,0x66,0x20,0x73,0x70,0x61,0x63,0x65
3793: .byte 0x20,0x66,0x6f,0x72,0x20,0x73,0x79,0x6d
3794: .byte 0x62,0x6f,0x6c,0x20,0x74,0x61,0x62,0x6c
3795: .byte 0x65,0x0
3796: .text
3797: pushl $L773
3798: pushl $1
3799: calls $2,_error
3800: L771:
3801: addl3 $13236,(r7),4(r7)
3802: addl3 $8824,12(r7),16(r7)
3803: L770:
3804: cmpl r7,_csymseg
3805: jlequ L774
3806: movl r7,_csymseg
3807: L774:
3808: addl3 r11,r11,r0
3809: addl2 r0,r0
3810: addl3 r0,12(r7),r10
3811: movl $1,r6
3812: L777:
3813: tstl (r10)
3814: jneq L778
3815: cmpl 8(r7),$1103
3816: jneq L779
3817: jbr L775
3818: L779:
3819: movl r10,r0
3820: jbr L761
3821: L778:
3822: movl *(r10),r8
3823: movl _cursym,r9
3824: jbr L782
3825: L783:
3826: tstb (r9)+
3827: jneq L784
3828: movl r10,r0
3829: jbr L761
3830: L784:
3831: L782:
3832: cmpb (r9),(r8)+
3833: jeql L783
3834: L781:
3835: addl3 r6,r6,r0
3836: addl2 r0,r0
3837: addl2 r0,r10
3838: addl2 $2,r6
3839: cmpl r10,16(r7)
3840: jlssu L785
3841: subl2 $8824,r10
3842: L785:
3843: L776:
3844: cmpl r6,$2206
3845: jlss L777
3846: L775:
3847: cmpl r6,$2206
3848: jleq L786
3849: .data 1
3850: L787:
3851:
3852: .byte 0x68,0x61,0x73,0x68,0x20,0x74,0x61,0x62
3853: .byte 0x6c,0x65,0x20,0x62,0x6f,0x74,0x63,0x68
3854: .byte 0x0
3855: .text
3856: pushl $L787
3857: pushl $1
3858: calls $2,_error
3859: L786:
3860: addl2 $20,r7
3861: L768:
3862: cmpl r7,$_symseg+800
3863: jlssu L769
3864: L767:
3865: .data 1
3866: L788:
3867:
3868: .byte 0x73,0x79,0x6d,0x62,0x6f,0x6c,0x20,0x74
3869: .byte 0x61,0x62,0x6c,0x65,0x20,0x6f,0x76,0x65
3870: .byte 0x72,0x66,0x6c,0x6f,0x77,0x0
3871: .text
3872: pushl $L788
3873: pushl $1
3874: calls $2,_error
3875: .stabs "i",0x40,0,4,6
3876: .stabs "gp",0x40,0,40,7
3877: .stabs "cp1",0x40,0,34,8
3878: .stabs "cp",0x40,0,34,9
3879: .stabs "hp",0x40,0,168,10
3880: .stabs "sh",0x40,0,4,11
3881: L761:
3882: ret
3883: .set L.R27,0xfc0
3884: .set L.SO27,0x0
3885: L789: .data
3886: .text
3887: .align 2
3888: .globl _symfree
3889: _symfree:
3890: .word L.R28
3891: subl2 $L.SO28,sp
3892: .stabs "symfree",0x24,0,1673,_symfree
3893: .stabs "saved",0xa0,0,40,4
3894: movl _csymseg,r11
3895: jbr L793
3896: L794:
3897: mull3 $12,8(r11),r0
3898: addl3 r0,(r11),r10
3899: cmpl r10,4(ap)
3900: jneq L795
3901: movl r10,_nextsym
3902: jbr L790
3903: L795:
3904: subl2 $12,r10
3905: jbr L798
3906: L799:
3907: cvtwl 6(r10),r0
3908: clrl *12(r11)[r0]
3909: decl 8(r11)
3910: cmpl r10,4(ap)
3911: jneq L800
3912: movl r10,_nextsym
3913: jbr L790
3914: L800:
3915: subl2 $12,r10
3916: L798:
3917: cmpl r10,(r11)
3918: jgequ L799
3919: L797:
3920: subl2 $20,r11
3921: movl _csymseg,r0
3922: subl2 $20,_csymseg
3923: L793:
3924: cmpl r11,$_symseg
3925: jgequ L794
3926: L792:
3927: tstl 4(ap)
3928: jneq L801
3929: jbr L790
3930: L801:
3931: .data 1
3932: L802:
3933:
3934: .byte 0x73,0x79,0x6d,0x66,0x72,0x65,0x65,0x20
3935: .byte 0x62,0x6f,0x74,0x63,0x68,0x0
3936: .text
3937: pushl $L802
3938: pushl $1
3939: calls $2,_error
3940: .stabs "sp",0x40,0,40,10
3941: .stabs "gp",0x40,0,40,11
3942: L790:
3943: ret
3944: .set L.R28,0xc00
3945: .set L.SO28,0x0
3946: L803: .data
3947: .text
3948: .align 2
3949: .globl _slookup
3950: _slookup:
3951: .word L.R29
3952: subl2 $L.SO29,sp
3953: .stabs "slookup",0x24,0,1700,_slookup
3954: .stabs "s",0xa0,0,34,4
3955: movl 4(ap),_cursym
3956: movb $1,_cursym+4
3957: clrl _cursym+8
3958: calls $0,_lookup
3959: jbr L804
3960: L804:
3961: ret
3962: .set L.R29,0x0
3963: .set L.SO29,0x0
3964: L805: .data
3965: .text
3966: .align 2
3967: .globl _enter
3968: _enter:
3969: .word L.R30
3970: subl2 $L.SO30,sp
3971: .stabs "enter",0x24,0,1710,_enter
3972: .stabs "hp",0xa0,0,168,4
3973: movl 4(ap),r11
3974: tstl (r11)
3975: jneq L807
3976: movl _csymseg,r0
3977: cmpl r11,12(r0)
3978: jlssu L809
3979: movl _csymseg,r0
3980: cmpl r11,16(r0)
3981: jlssu L808
3982: L809:
3983: .data 1
3984: L810:
3985:
3986: .byte 0x65,0x6e,0x74,0x65,0x72,0x20,0x62,0x6f
3987: .byte 0x74,0x63,0x68,0x0
3988: .text
3989: pushl $L810
3990: pushl $1
3991: calls $2,_error
3992: L808:
3993: movl _csymseg,r0
3994: mull3 $12,8(r0),r1
3995: addl3 r1,*_csymseg,r10
3996: movl r10,_lastsym
3997: movl r10,(r11)
3998: movl _csymseg,r0
3999: incl 8(r0)
4000: movl _cursym,(r10)
4001: movb _cursym+4,4(r10)
4002: movl _csymseg,r0
4003: subl3 12(r0),r11,r0
4004: divl3 $4,r0,r1
4005: movw r1,6(r10)
4006: movl _cursym+8,8(r10)
4007: addl3 $12,_lastsym,_nextsym
4008: movl $1,r0
4009: jbr L806
4010: L807:
4011: movl (r11),_lastsym
4012: clrl r0
4013: jbr L806
4014: .stabs "sp",0x40,0,40,10
4015: .stabs "hp",0x40,0,168,11
4016: L806:
4017: ret
4018: .set L.R30,0xc00
4019: .set L.SO30,0x0
4020: L811: .data
4021: .text
4022: .align 2
4023: .globl _symx
4024: _symx:
4025: .word L.R31
4026: subl2 $L.SO31,sp
4027: .stabs "symx",0x24,0,1732,_symx
4028: .stabs "sp",0xa0,0,40,4
4029: tstl 4(ap)
4030: jneq L813
4031: clrl r0
4032: jbr L812
4033: L813:
4034: movl _csymseg,r11
4035: jbr L816
4036: L817:
4037: cmpl 4(ap),(r11)
4038: jlssu L818
4039: cmpl 4(ap),4(r11)
4040: jgtru L818
4041: L819:
4042: subl3 $_symseg,r11,r0
4043: divl2 $20,r0
4044: mull2 $1103,r0
4045: mull2 $12,r0
4046: addl2 4(ap),r0
4047: subl2 (r11),r0
4048: divl2 $12,r0
4049: jbr L812
4050: L818:
4051: subl2 $20,r11
4052: L816:
4053: cmpl r11,$_symseg
4054: jgequ L817
4055: L815:
4056: .data 1
4057: L820:
4058:
4059: .byte 0x73,0x79,0x6d,0x78,0x20,0x62,0x6f,0x74
4060: .byte 0x63,0x68,0x0
4061: .text
4062: pushl $L820
4063: pushl $1
4064: calls $2,_error
4065: .stabs "gp",0x40,0,40,11
4066: L812:
4067: ret
4068: .set L.R31,0x800
4069: .set L.SO31,0x0
4070: L821: .data
4071: .text
4072: .align 2
4073: .globl _symreloc
4074: _symreloc:
4075: .word L.R32
4076: subl2 $L.SO32,sp
4077: .stabs "symreloc",0x24,0,1746,_symreloc
4078: tstl _funding
4079: jeql L823
4080: jbr L822
4081: L823:
4082: movzbl _cursym+4,r0
4083: bicl2 $-16,r0
4084: jbr L825
4085: L826:
4086: L827:
4087: addl2 _ctrel,_cursym+8
4088: jbr L822
4089: L828:
4090: L829:
4091: addl2 _cdrel,_cursym+8
4092: jbr L822
4093: L830:
4094: L831:
4095: addl2 _cbrel,_cursym+8
4096: jbr L822
4097: L832:
4098: jbr L822
4099: L833:
4100: bitb $1,_cursym+4
4101: jeql L834
4102: movb $3,_cursym+4
4103: L834:
4104: jbr L822
4105: L825:
4106: casel r0,$1,$8
4107: L835:
4108: .word L832-L835
4109: .word L833-L835
4110: .word L833-L835
4111: .word L826-L835
4112: .word L827-L835
4113: .word L828-L835
4114: .word L829-L835
4115: .word L830-L835
4116: .word L831-L835
4117: jbr L833
4118: L824:
4119: L822:
4120: ret
4121: .set L.R32,0x0
4122: .set L.SO32,0x0
4123: L836: .data
4124: .text
4125: .align 2
4126: .globl _error
4127: _error:
4128: .word L.R33
4129: subl2 $L.SO33,sp
4130: .stabs "error",0x24,0,1777,_error
4131: .stabs "n",0xa0,0,4,4
4132: .stabs "s",0xa0,0,34,8
4133: tstl _errlev
4134: jneq L838
4135: .data 1
4136: L839:
4137:
4138: .byte 0x6c,0x64,0x3a,0x0
4139: .text
4140: pushl $L839
4141: calls $1,_printf
4142: L838:
4143: tstl _filname
4144: jeql L840
4145: .data 1
4146: L841:
4147:
4148: .byte 0x25,0x73,0x0
4149: .text
4150: pushl _filname
4151: pushl $L841
4152: calls $2,_printf
4153: cmpl 4(ap),$-1
4154: jeql L842
4155: tstb _archdr
4156: jeql L842
4157: L843:
4158: .data 1
4159: L844:
4160:
4161: .byte 0x28,0x25,0x73,0x29,0x0
4162: .text
4163: pushl $_archdr
4164: pushl $L844
4165: calls $2,_printf
4166: L842:
4167: .data 1
4168: L845:
4169:
4170: .byte 0x3a,0x20,0x0
4171: .text
4172: pushl $L845
4173: calls $1,_printf
4174: L840:
4175: .data 1
4176: L846:
4177:
4178: .byte 0x25,0x73,0xa,0x0
4179: .text
4180: pushl 8(ap)
4181: pushl $L846
4182: calls $2,_printf
4183: cmpl 4(ap),$-1
4184: jneq L847
4185: jbr L837
4186: L847:
4187: tstl 4(ap)
4188: jeql L848
4189: calls $0,_delexit
4190: L848:
4191: movl $2,_errlev
4192: L837:
4193: ret
4194: .set L.R33,0x0
4195: .set L.SO33,0x0
4196: L849: .data
4197: .text
4198: .align 2
4199: .globl _readhdr
4200: _readhdr:
4201: .word L.R34
4202: subl2 $L.SO34,sp
4203: .stabs "readhdr",0x24,0,1797,_readhdr
4204: .stabs "loc",0xa0,0,4,4
4205: pushl $32
4206: pushl 4(ap)
4207: pushl $_text
4208: calls $3,_dseek
4209: pushl $_text
4210: pushl $32
4211: pushl $_filhdr
4212: calls $3,_mget
4213: cmpl _filhdr,$263
4214: jeql L851
4215: cmpl _filhdr,$264
4216: jeql L851
4217: L853:
4218: cmpl _filhdr,$267
4219: jeql L851
4220: L852:
4221: cmpl _filhdr,$65381
4222: jneq L854
4223: .data 1
4224: L855:
4225:
4226: .byte 0x6f,0x6c,0x64,0x20,0x61,0x72,0x63,0x68
4227: .byte 0x69,0x76,0x65,0x0
4228: .text
4229: pushl $L855
4230: pushl $1
4231: calls $2,_error
4232: L854:
4233: .data 1
4234: L856:
4235:
4236: .byte 0x62,0x61,0x64,0x20,0x6d,0x61,0x67,0x69
4237: .byte 0x63,0x20,0x6e,0x75,0x6d,0x62,0x65,0x72
4238: .byte 0x0
4239: .text
4240: pushl $L856
4241: pushl $1
4242: calls $2,_error
4243: L851:
4244: bitl $1,_filhdr+4
4245: jneq L858
4246: bitl $1,_filhdr+8
4247: jeql L857
4248: L858:
4249: .data 1
4250: L859:
4251:
4252: .byte 0x74,0x65,0x78,0x74,0x2f,0x64,0x61,0x74
4253: .byte 0x61,0x20,0x73,0x69,0x7a,0x65,0x20,0x6f
4254: .byte 0x64,0x64,0x0
4255: .text
4256: pushl $L859
4257: pushl $1
4258: calls $2,_error
4259: L857:
4260: cmpl _filhdr,$264
4261: jeql L861
4262: cmpl _filhdr,$267
4263: jneq L860
4264: L861:
4265: pushl $1024
4266: pushl _filhdr+4
4267: calls $2,_round
4268: mnegl r0,_cdrel
4269: subl3 _filhdr+8,_cdrel,_cbrel
4270: jbr L862
4271: L860:
4272: cmpl _filhdr,$263
4273: jneq L863
4274: mnegl _filhdr+4,_cdrel
4275: subl3 _filhdr+8,_cdrel,_cbrel
4276: jbr L864
4277: L863:
4278: .data 1
4279: L865:
4280:
4281: .byte 0x62,0x61,0x64,0x20,0x66,0x6f,0x72,0x6d
4282: .byte 0x61,0x74,0x0
4283: .text
4284: pushl $L865
4285: pushl $1
4286: calls $2,_error
4287: L864:
4288: L862:
4289: L850:
4290: ret
4291: .set L.R34,0x0
4292: .set L.SO34,0x0
4293: L866: .data
4294: .text
4295: .align 2
4296: .globl _round
4297: _round:
4298: .word L.R35
4299: subl2 $L.SO35,sp
4300: .stabs "round",0x24,0,1821,_round
4301: .stabs "v",0xa0,0,4,4
4302: .stabs "r",0xa0,0,14,8
4303: decl 8(ap)
4304: addl2 8(ap),4(ap)
4305: mcoml 8(ap),r0
4306: mcoml r0,r1
4307: bicl2 r1,4(ap)
4308: movl 4(ap),r0
4309: jbr L867
4310: L867:
4311: ret
4312: .set L.R35,0x0
4313: .set L.SO35,0x0
4314: L868: .data
4315: .comm _savetab,4
4316: .comm _saveleft,4
4317: .text
4318: .align 2
4319: .globl _savestr
4320: _savestr:
4321: .word L.R36
4322: subl2 $L.SO36,sp
4323: .stabs "savestr",0x24,0,1836,_savestr
4324: .stabs "cp",0xa0,0,34,4
4325: movl 4(ap),r11
4326: pushl r11
4327: calls $1,_strlen
4328: addl3 $1,r0,r10
4329: cmpl r10,_saveleft
4330: jleq L872
4331: movl $8192,_saveleft
4332: cmpl r10,_saveleft
4333: jleq L873
4334: movl r10,_saveleft
4335: L873:
4336: pushl _saveleft
4337: calls $1,_malloc
4338: movl r0,_savetab
4339: tstl _savetab
4340: jneq L874
4341: .data 1
4342: L875:
4343:
4344: .byte 0x72,0x61,0x6e,0x20,0x6f,0x75,0x74,0x20
4345: .byte 0x6f,0x66,0x20,0x6d,0x65,0x6d,0x6f,0x72
4346: .byte 0x79,0x20,0x28,0x73,0x61,0x76,0x65,0x73
4347: .byte 0x74,0x72,0x29,0x0
4348: .text
4349: pushl $L875
4350: pushl $1
4351: calls $2,_error
4352: L874:
4353: L872:
4354: pushl r10
4355: pushl r11
4356: pushl _savetab
4357: calls $3,_strncpy
4358: movl _savetab,r11
4359: addl2 r10,_savetab
4360: subl2 r10,_saveleft
4361: movl r11,r0
4362: jbr L871
4363: .stabs "len",0x40,0,4,10
4364: .stabs "cp",0x40,0,34,11
4365: L871:
4366: ret
4367: .set L.R36,0xc00
4368: .set L.SO36,0x0
4369: L877: .data
4370: .text
4371: .align 2
4372: .globl _bopen
4373: _bopen:
4374: .word L.R37
4375: subl2 $L.SO37,sp
4376: .stabs "bopen",0x24,0,1857,_bopen
4377: .stabs "bp",0xa0,0,40,4
4378: .stabs "off",0xa0,0,4,8
4379: movl 4(ap),r0
4380: addl3 $8,4(ap),4(r0)
4381: divl3 $4096,8(ap),r0
4382: mull2 $4096,r0
4383: subl3 r0,8(ap),r0
4384: subw3 r0,$4096,*4(ap)
4385: movl 4(ap),r0
4386: movl 8(ap),4104(r0)
4387: movl 4(ap),r0
4388: movl _biobufs,4108(r0)
4389: movl 4(ap),_biobufs
4390: L878:
4391: ret
4392: .set L.R37,0x0
4393: .set L.SO37,0x0
4394: L879: .data
4395: .comm _bwrerror,4
4396: .text
4397: .align 2
4398: .globl _bwrite
4399: _bwrite:
4400: .word L.R38
4401: subl2 $L.SO38,sp
4402: .stabs "bwrite",0x24,0,1872,_bwrite
4403: .stabs "p",0xa0,0,34,4
4404: .stabs "cnt",0xa0,0,4,8
4405: .stabs "bp",0xa0,0,40,12
4406: movl 4(ap),r11
4407: movl 8(ap),r10
4408: movl 12(ap),r9
4409: L882:
4410: tstl r10
4411: jneq L883
4412: jbr L881
4413: L883:
4414: tstw (r9)
4415: jeql L884
4416: cvtwl (r9),r8
4417: cmpl r8,r10
4418: jleq L885
4419: movl r10,r8
4420: L885:
4421: movw r8,r0
4422: subw2 r0,(r9)
4423: movl 4(r9),r7
4424: #ASM
4425: movc3 r8,(r11),(r7)
4426: #ASMEND
4427: addl2 r8,4(r9)
4428: addl2 r8,r11
4429: subl2 r8,r10
4430: jbr L882
4431: L884:
4432: cmpl r10,$4096
4433: jlss L886
4434: addl3 $8,r9,r0
4435: cmpl 4(r9),r0
4436: jeql L887
4437: pushl r9
4438: calls $1,_bflush1
4439: L887:
4440: divl3 $4096,r10,r0
4441: mull2 $4096,r0
4442: subl3 r0,r10,r0
4443: subl3 r0,r10,r8
4444: cmpl _boffset,4104(r9)
4445: jeql L888
4446: pushl $0
4447: pushl 4104(r9)
4448: pushl _biofd
4449: calls $3,_lseek
4450: L888:
4451: pushl r8
4452: pushl r11
4453: pushl _biofd
4454: calls $3,_write
4455: cmpl r0,r8
4456: jeql L890
4457: movl $1,_bwrerror
4458: .data 1
4459: L891:
4460:
4461: .byte 0x6f,0x75,0x74,0x70,0x75,0x74,0x20,0x77
4462: .byte 0x72,0x69,0x74,0x65,0x20,0x65,0x72,0x72
4463: .byte 0x6f,0x72,0x0
4464: .text
4465: pushl $L891
4466: pushl $1
4467: calls $2,_error
4468: L890:
4469: addl2 r8,4104(r9)
4470: movl 4104(r9),_boffset
4471: addl2 r8,r11
4472: subl2 r8,r10
4473: jbr L882
4474: L886:
4475: pushl r9
4476: calls $1,_bflush1
4477: jbr L882
4478: .stabs "to",0x40,0,34,7
4479: .stabs "put",0x40,0,4,8
4480: .stabs "bp",0x40,0,40,9
4481: .stabs "cnt",0x40,0,4,10
4482: .stabs "p",0x40,0,34,11
4483: L881:
4484: ret
4485: .set L.R38,0xf80
4486: .set L.SO38,0x0
4487: L892: .data
4488: .text
4489: .align 2
4490: .globl _bflush
4491: _bflush:
4492: .word L.R39
4493: subl2 $L.SO39,sp
4494: .stabs "bflush",0x24,0,1912,_bflush
4495: tstl _bwrerror
4496: jeql L894
4497: jbr L893
4498: L894:
4499: movl _biobufs,r11
4500: jbr L897
4501: L898:
4502: pushl r11
4503: calls $1,_bflush1
4504: movl 4108(r11),r11
4505: L897:
4506: tstl r11
4507: jneq L898
4508: L896:
4509: .stabs "bp",0x40,0,40,11
4510: L893:
4511: ret
4512: .set L.R39,0x800
4513: .set L.SO39,0x0
4514: L899: .data
4515: .text
4516: .align 2
4517: .globl _bflush1
4518: _bflush1:
4519: .word L.R40
4520: subl2 $L.SO40,sp
4521: .stabs "bflush1",0x24,0,1923,_bflush1
4522: .stabs "bp",0xa0,0,40,4
4523: movl 4(ap),r11
4524: addl3 $8,r11,r0
4525: subl3 r0,4(r11),r10
4526: tstl r10
4527: jneq L901
4528: jbr L900
4529: L901:
4530: cmpl _boffset,4104(r11)
4531: jeql L902
4532: pushl $0
4533: pushl 4104(r11)
4534: pushl _biofd
4535: calls $3,_lseek
4536: L902:
4537: pushl r10
4538: addl3 $8,r11,-(sp)
4539: pushl _biofd
4540: calls $3,_write
4541: cmpl r0,r10
4542: jeql L903
4543: movl $1,_bwrerror
4544: .data 1
4545: L904:
4546:
4547: .byte 0x6f,0x75,0x74,0x70,0x75,0x74,0x20,0x77
4548: .byte 0x72,0x69,0x74,0x65,0x20,0x65,0x72,0x72
4549: .byte 0x6f,0x72,0x0
4550: .text
4551: pushl $L904
4552: pushl $1
4553: calls $2,_error
4554: L903:
4555: addl2 r10,4104(r11)
4556: movl 4104(r11),_boffset
4557: addl3 $8,r11,4(r11)
4558: movw $4096,(r11)
4559: .stabs "cnt",0x40,0,4,10
4560: .stabs "bp",0x40,0,40,11
4561: L900:
4562: ret
4563: .set L.R40,0xc00
4564: .set L.SO40,0x0
4565: L905: .data
4566: .text
4567: .align 2
4568: .globl _bflushc
4569: _bflushc:
4570: .word L.R41
4571: subl2 $L.SO41,sp
4572: .stabs "bflushc",0x24,0,1942,_bflushc
4573: .stabs "bp",0xa0,0,40,4
4574: .stabs "c",0xa0,0,4,8
4575: movl 4(ap),r11
4576: pushl r11
4577: calls $1,_bflush1
4578: tstw (r11)
4579: jeql L907
4580: decw (r11)
4581: movb 8(ap),r0
4582: movl 4(r11),r1
4583: incl 4(r11)
4584: movb r0,(r1)
4585: jbr L908
4586: L907:
4587: pushl 8(ap)
4588: pushl r11
4589: calls $2,_bflushc
4590: L908:
4591: .stabs "bp",0x40,0,40,11
4592: L906:
4593: ret
4594: .set L.R41,0x800
4595: .set L.SO41,0x0
4596: L909: .data
4597: .text
4598: L910: .stabs "",0x94,0,1947,L910
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.