![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to hostcall.s CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Tom Morton FrontierVM] / frontvm / hardware|
Return to hostcall.s CVS log | Up to [Tom Morton FrontierVM] / frontvm / hardware |
1.1 ! root 1: .file "hostcall.c" ! 2: .text ! 3: .p2align 4,,15 ! 4: .globl time2dos ! 5: .type time2dos, @function ! 6: time2dos: ! 7: pushl %ebp ! 8: movl %esp, %ebp ! 9: leal 8(%ebp), %eax ! 10: subl $8, %esp ! 11: movl %eax, (%esp) ! 12: call localtime ! 13: movl %eax, %ecx ! 14: movl 4(%ecx), %edx ! 15: movl (%eax), %eax ! 16: sall $5, %edx ! 17: sarl %eax ! 18: orl %edx, %eax ! 19: movl 8(%ecx), %edx ! 20: movl %ebp, %esp ! 21: popl %ebp ! 22: sall $11, %edx ! 23: orl %edx, %eax ! 24: movzwl %ax, %eax ! 25: ret ! 26: .size time2dos, .-time2dos ! 27: .p2align 4,,15 ! 28: .globl date2dos ! 29: .type date2dos, @function ! 30: date2dos: ! 31: pushl %ebp ! 32: movl %esp, %ebp ! 33: leal 8(%ebp), %eax ! 34: subl $8, %esp ! 35: movl %eax, (%esp) ! 36: call localtime ! 37: movl %eax, %ecx ! 38: movl 16(%eax), %eax ! 39: movzwl 12(%ecx), %edx ! 40: movl 20(%ecx), %ecx ! 41: incl %eax ! 42: sall $5, %eax ! 43: movl %ebp, %esp ! 44: subl $80, %ecx ! 45: popl %ebp ! 46: orl %edx, %eax ! 47: movl %ecx, %edx ! 48: shrl $31, %edx ! 49: decl %edx ! 50: andl %edx, %ecx ! 51: sall $9, %ecx ! 52: orl %ecx, %eax ! 53: movzwl %ax, %eax ! 54: ret ! 55: .size date2dos, .-date2dos ! 56: .p2align 4,,15 ! 57: .globl GetFileInformation ! 58: .type GetFileInformation, @function ! 59: GetFileInformation: ! 60: pushl %ebp ! 61: movl %esp, %ebp ! 62: leal -104(%ebp), %eax ! 63: subl $120, %esp ! 64: movl %eax, 8(%esp) ! 65: movl 8(%ebp), %eax ! 66: movl %esi, -4(%ebp) ! 67: movl 12(%ebp), %esi ! 68: movl %ebx, -8(%ebp) ! 69: movl %eax, 4(%esp) ! 70: movl $3, (%esp) ! 71: call __xstat ! 72: xorl %edx, %edx ! 73: testl %eax, %eax ! 74: je .L8 ! 75: .L4: ! 76: movl -8(%ebp), %ebx ! 77: movl %edx, %eax ! 78: movl -4(%ebp), %esi ! 79: movl %ebp, %esp ! 80: popl %ebp ! 81: ret ! 82: .p2align 4,,7 ! 83: .L8: ! 84: leal -40(%ebp), %eax ! 85: movl %eax, (%esp) ! 86: call localtime ! 87: movzwl 12(%eax), %ebx ! 88: movl 16(%eax), %edx ! 89: movl 20(%eax), %ecx ! 90: andl $15, %edx ! 91: andl $31, %ebx ! 92: sall $5, %edx ! 93: subl $80, %ecx ! 94: orl %edx, %ebx ! 95: movl %ecx, %edx ! 96: shrl $31, %edx ! 97: decl %edx ! 98: andl %edx, %ecx ! 99: andl $127, %ecx ! 100: movl 4(%eax), %edx ! 101: sall $9, %ecx ! 102: orl %ecx, %ebx ! 103: andl $63, %edx ! 104: sall $5, %edx ! 105: movzwl (%eax), %ecx ! 106: movl 8(%eax), %eax ! 107: movw %bx, (%esi) ! 108: andl $31, %ecx ! 109: andl $31, %eax ! 110: orl %edx, %ecx ! 111: sall $11, %eax ! 112: orl %eax, %ecx ! 113: movw %cx, 2(%esi) ! 114: movl $1, %edx ! 115: jmp .L4 ! 116: .size GetFileInformation, .-GetFileInformation ! 117: .section .rodata.str1.1,"aMS",@progbits,1 ! 118: .LC0: ! 119: .string "%s/%s" ! 120: .text ! 121: .p2align 4,,15 ! 122: .globl PopulateDTA ! 123: .type PopulateDTA, @function ! 124: PopulateDTA: ! 125: pushl %ebp ! 126: movl %esp, %ebp ! 127: subl $376, %esp ! 128: movl %esi, -4(%ebp) ! 129: movl 8(%ebp), %eax ! 130: movl 12(%ebp), %esi ! 131: movl %ebx, -8(%ebp) ! 132: movl $.LC0, %ebx ! 133: addl $11, %esi ! 134: movl %ebx, 4(%esp) ! 135: leal -264(%ebp), %ebx ! 136: movl %esi, 12(%esp) ! 137: movl %eax, 8(%esp) ! 138: movl %ebx, (%esp) ! 139: call sprintf ! 140: movl %ebx, 4(%esp) ! 141: leal -360(%ebp), %eax ! 142: movl %eax, 8(%esp) ! 143: movl $3, (%esp) ! 144: call __xstat ! 145: xorl %edx, %edx ! 146: testl %eax, %eax ! 147: jne .L9 ! 148: movl pDTA, %ecx ! 149: testl %ecx, %ecx ! 150: jne .L16 ! 151: .L9: ! 152: movl -8(%ebp), %ebx ! 153: movl %edx, %eax ! 154: movl -4(%ebp), %esi ! 155: movl %ebp, %esp ! 156: popl %ebp ! 157: ret ! 158: .p2align 4,,7 ! 159: .L16: ! 160: movl %esi, (%esp) ! 161: call Misc_strupr ! 162: movl %esi, 4(%esp) ! 163: movl $14, %eax ! 164: movl %eax, 8(%esp) ! 165: movl pDTA, %eax ! 166: addl $30, %eax ! 167: movl %eax, (%esp) ! 168: call strncpy ! 169: movl pDTA, %ebx ! 170: movl -316(%ebp), %eax ! 171: #APP ! 172: bswap %eax ! 173: ! 174: #NO_APP ! 175: movl %eax, 26(%ebx) ! 176: movl -296(%ebp), %eax ! 177: movl %eax, (%esp) ! 178: call time2dos ! 179: movzwl %ax, %eax ! 180: #APP ! 181: xchgb %al,%ah ! 182: #NO_APP ! 183: movw %ax, 22(%ebx) ! 184: movl -296(%ebp), %eax ! 185: movl pDTA, %ebx ! 186: movl %eax, (%esp) ! 187: call date2dos ! 188: movzwl %ax, %eax ! 189: #APP ! 190: xchgb %al,%ah ! 191: #NO_APP ! 192: movw %ax, 24(%ebx) ! 193: movl -344(%ebp), %eax ! 194: movl pDTA, %ebx ! 195: movl %eax, (%esp) ! 196: call GemDOS_ConvertAttribute ! 197: movb %al, 21(%ebx) ! 198: movl $1, %edx ! 199: jmp .L9 ! 200: .size PopulateDTA, .-PopulateDTA ! 201: .p2align 4,,15 ! 202: .globl ClearInternalDTA ! 203: .type ClearInternalDTA, @function ! 204: ClearInternalDTA: ! 205: pushl %ebp ! 206: movl %esp, %ebp ! 207: pushl %ebx ! 208: subl $4, %esp ! 209: movl DTAIndex, %edx ! 210: movl %edx, %eax ! 211: movl %edx, %ecx ! 212: sall $4, %eax ! 213: addl %edx, %eax ! 214: sall $4, %eax ! 215: movl InternalDTAs+12(%eax), %ebx ! 216: testl %ebx, %ebx ! 217: je .L18 ! 218: xorl %ebx, %ebx ! 219: cmpl InternalDTAs+4(%eax), %ebx ! 220: jl .L23 ! 221: .L25: ! 222: movl %edx, %eax ! 223: sall $4, %eax ! 224: addl %edx, %eax ! 225: sall $4, %eax ! 226: movl InternalDTAs+12(%eax), %eax ! 227: movl %eax, (%esp) ! 228: call free ! 229: movl DTAIndex, %edx ! 230: .L18: ! 231: movl %edx, %eax ! 232: sall $4, %eax ! 233: addl %edx, %eax ! 234: sall $4, %eax ! 235: xorl %edx, %edx ! 236: movl %edx, InternalDTAs(%eax) ! 237: popl %eax ! 238: popl %ebx ! 239: popl %ebp ! 240: ret ! 241: .p2align 4,,7 ! 242: .L23: ! 243: movl %ecx, %eax ! 244: sall $4, %eax ! 245: addl %ecx, %eax ! 246: sall $4, %eax ! 247: movl InternalDTAs+12(%eax), %eax ! 248: movl (%eax,%ebx,4), %eax ! 249: incl %ebx ! 250: movl %eax, (%esp) ! 251: call free ! 252: movl DTAIndex, %edx ! 253: movl %edx, %eax ! 254: movl %edx, %ecx ! 255: sall $4, %eax ! 256: addl %edx, %eax ! 257: sall $4, %eax ! 258: cmpl InternalDTAs+4(%eax), %ebx ! 259: jl .L23 ! 260: jmp .L25 ! 261: .size ClearInternalDTA, .-ClearInternalDTA ! 262: .p2align 4,,15 ! 263: .type match, @function ! 264: match: ! 265: pushl %ebp ! 266: movl %esp, %ebp ! 267: leal -280(%ebp), %eax ! 268: pushl %edi ! 269: leal -536(%ebp), %edi ! 270: pushl %esi ! 271: pushl %ebx ! 272: subl $540, %esp ! 273: movl 12(%ebp), %esi ! 274: movl %eax, (%esp) ! 275: movl 8(%ebp), %ebx ! 276: movl %ebx, 4(%esp) ! 277: call strcpy ! 278: movl %esi, 4(%esp) ! 279: movl %edi, (%esp) ! 280: call strcpy ! 281: leal -280(%ebp), %eax ! 282: movl %eax, (%esp) ! 283: call Misc_strupr ! 284: movl %edi, (%esp) ! 285: call Misc_strupr ! 286: cmpb $46, (%esi) ! 287: je .L34 ! 288: cmpb $42, (%ebx) ! 289: jne .L28 ! 290: cmpb $46, 1(%ebx) ! 291: jne .L28 ! 292: cmpb $42, 2(%ebx) ! 293: jne .L28 ! 294: cmpb $0, 3(%ebx) ! 295: je .L59 ! 296: .p2align 4,,15 ! 297: .L28: ! 298: movl %esi, 4(%esp) ! 299: movl $1, %esi ! 300: movl %ebx, (%esp) ! 301: call strcasecmp ! 302: testl %eax, %eax ! 303: je .L26 ! 304: movzbl -536(%ebp), %eax ! 305: leal -280(%ebp), %ebx ! 306: movl %edi, %ecx ! 307: testb %al, %al ! 308: je .L54 ! 309: .p2align 4,,15 ! 310: .L51: ! 311: movzbl (%ebx), %edx ! 312: cmpb $42, %dl ! 313: je .L60 ! 314: cmpb $63, %dl ! 315: je .L61 ! 316: .L48: ! 317: incl %ecx ! 318: incl %ebx ! 319: xorl %esi, %esi ! 320: cmpb %al, %dl ! 321: jne .L26 ! 322: .L58: ! 323: movzbl (%ecx), %eax ! 324: .L37: ! 325: testb %al, %al ! 326: jne .L51 ! 327: .L54: ! 328: cmpb $0, (%ebx) ! 329: jne .L34 ! 330: .L59: ! 331: movl $1, %esi ! 332: .p2align 4,,15 ! 333: .L26: ! 334: addl $540, %esp ! 335: movl %esi, %eax ! 336: popl %ebx ! 337: popl %esi ! 338: popl %edi ! 339: popl %ebp ! 340: ret ! 341: .p2align 4,,7 ! 342: .L34: ! 343: xorl %esi, %esi ! 344: jmp .L26 ! 345: .p2align 4,,7 ! 346: .L61: ! 347: testb %al, %al ! 348: je .L48 ! 349: incl %ecx ! 350: incl %ebx ! 351: jmp .L58 ! 352: .p2align 4,,7 ! 353: .L60: ! 354: testb %al, %al ! 355: je .L43 ! 356: cmpb $46, %al ! 357: je .L43 ! 358: .p2align 4,,15 ! 359: .L46: ! 360: incl %ecx ! 361: movzbl (%ecx), %eax ! 362: testb %al, %al ! 363: je .L43 ! 364: cmpb $46, %al ! 365: jne .L46 ! 366: .L43: ! 367: incl %ebx ! 368: jmp .L37 ! 369: .size match, .-match ! 370: .p2align 4,,15 ! 371: .globl fsfirst_dirname ! 372: .type fsfirst_dirname, @function ! 373: fsfirst_dirname: ! 374: pushl %ebp ! 375: movl %esp, %ebp ! 376: pushl %edi ! 377: pushl %esi ! 378: pushl %ebx ! 379: subl $12, %esp ! 380: xorl %ebx, %ebx ! 381: movl 12(%ebp), %esi ! 382: movl 8(%ebp), %edi ! 383: movl %esi, (%esp) ! 384: movl %edi, 4(%esp) ! 385: call sprintf ! 386: movzbl (%esi), %eax ! 387: testb %al, %al ! 388: je .L77 ! 389: .p2align 4,,15 ! 390: .L67: ! 391: cmpb $92, %al ! 392: je .L82 ! 393: .L66: ! 394: incl %ebx ! 395: movzbl (%ebx,%esi), %eax ! 396: testb %al, %al ! 397: jne .L67 ! 398: .L77: ! 399: movzbl (%ebx,%edi), %eax ! 400: testb %al, %al ! 401: je .L79 ! 402: .p2align 4,,15 ! 403: .L71: ! 404: movb %al, (%ebx,%esi) ! 405: incl %ebx ! 406: movzbl (%ebx,%edi), %eax ! 407: testb %al, %al ! 408: jne .L71 ! 409: .L79: ! 410: cmpb $47, (%ebx,%esi) ! 411: je .L81 ! 412: .p2align 4,,15 ! 413: .L75: ! 414: decl %ebx ! 415: cmpb $47, (%ebx,%esi) ! 416: jne .L75 ! 417: .L81: ! 418: movb $0, (%ebx,%esi) ! 419: addl $12, %esp ! 420: popl %ebx ! 421: popl %esi ! 422: popl %edi ! 423: popl %ebp ! 424: ret ! 425: .p2align 4,,7 ! 426: .L82: ! 427: movb $47, (%ebx,%esi) ! 428: jmp .L66 ! 429: .size fsfirst_dirname, .-fsfirst_dirname ! 430: .p2align 4,,15 ! 431: .globl fsfirst_dirmask ! 432: .type fsfirst_dirmask, @function ! 433: fsfirst_dirmask: ! 434: pushl %ebp ! 435: xorl %edx, %edx ! 436: movl %esp, %ebp ! 437: pushl %esi ! 438: movl 8(%ebp), %ecx ! 439: movl 12(%ebp), %esi ! 440: pushl %ebx ! 441: xorl %ebx, %ebx ! 442: cmpb $0, (%ecx) ! 443: je .L102 ! 444: .p2align 4,,15 ! 445: .L87: ! 446: incl %edx ! 447: movzbl (%edx,%ecx), %eax ! 448: testb %al, %al ! 449: jne .L87 ! 450: .L97: ! 451: cmpb $47, %al ! 452: je .L99 ! 453: .p2align 4,,15 ! 454: .L91: ! 455: decl %edx ! 456: cmpb $47, (%edx,%ecx) ! 457: jne .L91 ! 458: .L99: ! 459: incl %edx ! 460: cmpb $0, (%edx,%ecx) ! 461: je .L101 ! 462: .p2align 4,,15 ! 463: .L95: ! 464: movl %edx, %eax ! 465: incl %edx ! 466: movzbl (%eax,%ecx), %eax ! 467: movb %al, (%ebx,%esi) ! 468: incl %ebx ! 469: cmpb $0, (%edx,%ecx) ! 470: jne .L95 ! 471: .L101: ! 472: movb $0, (%ebx,%esi) ! 473: popl %ebx ! 474: popl %esi ! 475: popl %ebp ! 476: ret ! 477: .L102: ! 478: movzbl (%ecx), %eax ! 479: jmp .L97 ! 480: .size fsfirst_dirmask, .-fsfirst_dirmask ! 481: .p2align 4,,15 ! 482: .globl GemDOS_Init ! 483: .type GemDOS_Init, @function ! 484: GemDOS_Init: ! 485: pushl %ebp ! 486: movl $8448, %eax ! 487: movl %esp, %ebp ! 488: subl $8, %esp ! 489: movl %eax, 4(%esp) ! 490: movl $FileHandles, (%esp) ! 491: call Memory_Clear ! 492: xorl %eax, %eax ! 493: movl $255, %edx ! 494: .p2align 4,,15 ! 495: .L108: ! 496: xorl %ecx, %ecx ! 497: movl %ecx, InternalDTAs(%eax) ! 498: xorl %ecx, %ecx ! 499: movl %ecx, InternalDTAs+4(%eax) ! 500: xorl %ecx, %ecx ! 501: movl %ecx, InternalDTAs+12(%eax) ! 502: addl $272, %eax ! 503: decl %edx ! 504: jns .L108 ! 505: xorl %eax, %eax ! 506: movl %eax, DTAIndex ! 507: leave ! 508: ret ! 509: .size GemDOS_Init, .-GemDOS_Init ! 510: .p2align 4,,15 ! 511: .globl GemDOS_Reset ! 512: .type GemDOS_Reset, @function ! 513: GemDOS_Reset: ! 514: pushl %ebp ! 515: movl %esp, %ebp ! 516: pushl %esi ! 517: xorl %esi, %esi ! 518: pushl %ebx ! 519: subl $16, %esp ! 520: movl $31, %ebx ! 521: .p2align 4,,15 ! 522: .L117: ! 523: movl FileHandles(%esi), %eax ! 524: testl %eax, %eax ! 525: jne .L127 ! 526: .L116: ! 527: xorl %eax, %eax ! 528: movl %eax, FileHandles+4(%esi) ! 529: xorl %eax, %eax ! 530: movl %eax, FileHandles(%esi) ! 531: addl $264, %esi ! 532: decl %ebx ! 533: jns .L117 ! 534: xorl %eax, %eax ! 535: movl $255, %ebx ! 536: .p2align 4,,15 ! 537: .L122: ! 538: xorl %esi, %esi ! 539: xorl %ecx, %ecx ! 540: xorl %edx, %edx ! 541: movl %esi, InternalDTAs(%eax) ! 542: movl %ecx, InternalDTAs+4(%eax) ! 543: movl %edx, InternalDTAs+12(%eax) ! 544: addl $272, %eax ! 545: decl %ebx ! 546: jns .L122 ! 547: xorl %eax, %eax ! 548: movl %eax, pDTA ! 549: xorl %eax, %eax ! 550: movl %eax, DTAIndex ! 551: addl $16, %esp ! 552: popl %ebx ! 553: popl %esi ! 554: popl %ebp ! 555: ret ! 556: .L127: ! 557: movl FileHandles+4(%esi), %eax ! 558: movl %eax, (%esp) ! 559: call fclose ! 560: jmp .L116 ! 561: .size GemDOS_Reset, .-GemDOS_Reset ! 562: .p2align 4,,15 ! 563: .globl GemDOS_InitDrives ! 564: .type GemDOS_InitDrives, @function ! 565: GemDOS_InitDrives: ! 566: pushl %ebp ! 567: movl $12078, %eax ! 568: movl %esp, %ebp ! 569: subl $8, %esp ! 570: movl $emudrive, (%esp) ! 571: movw %ax, emudrive ! 572: movb $0, emudrive+2 ! 573: call File_CleanFileName ! 574: movl $2, %eax ! 575: movl %eax, emudrive+512 ! 576: movl %ebp, %esp ! 577: popl %ebp ! 578: ret ! 579: .size GemDOS_InitDrives, .-GemDOS_InitDrives ! 580: .p2align 4,,15 ! 581: .globl GemDOS_UnInitDrives ! 582: .type GemDOS_UnInitDrives, @function ! 583: GemDOS_UnInitDrives: ! 584: pushl %ebp ! 585: movl %esp, %ebp ! 586: popl %ebp ! 587: jmp GemDOS_Reset ! 588: .size GemDOS_UnInitDrives, .-GemDOS_UnInitDrives ! 589: .p2align 4,,15 ! 590: .globl GemDOS_FindFreeFileHandle ! 591: .type GemDOS_FindFreeFileHandle, @function ! 592: GemDOS_FindFreeFileHandle: ! 593: pushl %ebp ! 594: xorl %eax, %eax ! 595: movl %esp, %ebp ! 596: movl $FileHandles, %edx ! 597: .p2align 4,,15 ! 598: .L136: ! 599: movl (%edx), %ecx ! 600: testl %ecx, %ecx ! 601: je .L130 ! 602: incl %eax ! 603: addl $264, %edx ! 604: cmpl $31, %eax ! 605: jle .L136 ! 606: movl $-1, %eax ! 607: .L130: ! 608: popl %ebp ! 609: ret ! 610: .size GemDOS_FindFreeFileHandle, .-GemDOS_FindFreeFileHandle ! 611: .p2align 4,,15 ! 612: .globl GemDOS_IsInvalidFileHandle ! 613: .type GemDOS_IsInvalidFileHandle, @function ! 614: GemDOS_IsInvalidFileHandle: ! 615: pushl %ebp ! 616: xorl %ecx, %ecx ! 617: movl %esp, %ebp ! 618: movl 8(%ebp), %edx ! 619: cmpl $31, %edx ! 620: ja .L143 ! 621: movl %edx, %eax ! 622: sall $5, %eax ! 623: addl %edx, %eax ! 624: movl FileHandles(,%eax,8), %eax ! 625: testl %eax, %eax ! 626: jne .L141 ! 627: .L143: ! 628: movl $1, %ecx ! 629: .L141: ! 630: popl %ebp ! 631: movl %ecx, %eax ! 632: ret ! 633: .size GemDOS_IsInvalidFileHandle, .-GemDOS_IsInvalidFileHandle ! 634: .p2align 4,,15 ! 635: .globl baselen ! 636: .type baselen, @function ! 637: baselen: ! 638: pushl %ebp ! 639: movl $46, %eax ! 640: movl %esp, %ebp ! 641: subl $24, %esp ! 642: movl %ebx, -4(%ebp) ! 643: movl 8(%ebp), %ebx ! 644: movl %eax, 4(%esp) ! 645: movl %ebx, (%esp) ! 646: call strchr ! 647: testl %eax, %eax ! 648: je .L147 ! 649: subl %ebx, %eax ! 650: movl -4(%ebp), %ebx ! 651: movl %ebp, %esp ! 652: popl %ebp ! 653: ret ! 654: .p2align 4,,7 ! 655: .L147: ! 656: movl -4(%ebp), %ebx ! 657: movl %ebp, %esp ! 658: popl %ebp ! 659: jmp strlen ! 660: .size baselen, .-baselen ! 661: .section .rodata.str1.1 ! 662: .LC2: ! 663: .string "%s%s" ! 664: .LC3: ! 665: .string "%s%c%s" ! 666: .LC4: ! 667: .string "no path for %s\n" ! 668: .text ! 669: .p2align 4,,15 ! 670: .globl GemDOS_CreateHardDriveFileName ! 671: .type GemDOS_CreateHardDriveFileName, @function ! 672: GemDOS_CreateHardDriveFileName: ! 673: pushl %ebp ! 674: movl %esp, %ebp ! 675: pushl %edi ! 676: pushl %esi ! 677: pushl %ebx ! 678: subl $444, %esp ! 679: movl 12(%ebp), %edx ! 680: movzbl (%edx), %eax ! 681: testb %al, %al ! 682: je .L148 ! 683: movl 16(%ebp), %ecx ! 684: xorl %edi, %edi ! 685: movl %edi, -384(%ebp) ! 686: movl %ecx, -380(%ebp) ! 687: cmpb $58, 1(%edx) ! 688: je .L200 ! 689: cmpb $92, %al ! 690: je .L201 ! 691: movl %edx, 12(%esp) ! 692: movl 16(%ebp), %ecx ! 693: movl $emudrive+256, %eax ! 694: movl %eax, 8(%esp) ! 695: movl $.LC2, %eax ! 696: movl %ecx, (%esp) ! 697: movl %eax, 4(%esp) ! 698: call sprintf ! 699: movl $emudrive+256, %ecx ! 700: .p2align 4,,15 ! 701: .L154: ! 702: movl (%ecx), %eax ! 703: addl $4, %ecx ! 704: leal -16843009(%eax), %edx ! 705: notl %eax ! 706: andl %eax, %edx ! 707: andl $-2139062144, %edx ! 708: je .L154 ! 709: testl $32896, %edx ! 710: jne .L156 ! 711: shrl $16, %edx ! 712: addl $2, %ecx ! 713: .L156: ! 714: addb %dl, %dl ! 715: movl 16(%ebp), %eax ! 716: sbbl $3, %ecx ! 717: subl $emudrive+256, %ecx ! 718: leal -1(%ecx,%eax), %ecx ! 719: movl %ecx, -384(%ebp) ! 720: .p2align 4,,15 ! 721: .L196: ! 722: movl -380(%ebp), %eax ! 723: movl $92, %esi ! 724: movl %esi, 4(%esp) ! 725: incl %eax ! 726: movl %eax, (%esp) ! 727: call strchr ! 728: movl %eax, -388(%ebp) ! 729: testl %eax, %eax ! 730: movl %eax, -380(%ebp) ! 731: je .L202 ! 732: movl -384(%ebp), %eax ! 733: testl %eax, %eax ! 734: je .L169 ! 735: movl -384(%ebp), %ecx ! 736: xorl %ebx, %ebx ! 737: movb $47, (%ecx) ! 738: incl %ecx ! 739: movl %ecx, -384(%ebp) ! 740: movzbl (%ecx), %eax ! 741: movb %al, -389(%ebp) ! 742: xorl %eax, %eax ! 743: movb $42, (%ecx) ! 744: incl %ecx ! 745: movl %ecx, -384(%ebp) ! 746: movzbl (%ecx), %edx ! 747: movb %dl, -390(%ebp) ! 748: movb $0, (%ecx) ! 749: leal -72(%ebp), %ecx ! 750: movl %eax, 8(%esp) ! 751: movl $8192, %eax ! 752: movl %eax, 4(%esp) ! 753: movl 16(%ebp), %eax ! 754: movl %ecx, 12(%esp) ! 755: movl %eax, (%esp) ! 756: call glob ! 757: movzbl -390(%ebp), %edx ! 758: movl -384(%ebp), %ecx ! 759: movb %dl, (%ecx) ! 760: decl %ecx ! 761: movzbl -389(%ebp), %eax ! 762: movl %ecx, -384(%ebp) ! 763: movb %al, (%ecx) ! 764: movl -388(%ebp), %edx ! 765: movb $0, (%edx) ! 766: movl 16(%ebp), %ecx ! 767: movl %ecx, (%esp) ! 768: call strlen ! 769: movl %eax, -404(%ebp) ! 770: movl -384(%ebp), %eax ! 771: movl %eax, (%esp) ! 772: call baselen ! 773: movl %eax, -400(%ebp) ! 774: movl -72(%ebp), %edi ! 775: xorl %eax, %eax ! 776: movl %eax, -396(%ebp) ! 777: cmpl %edi, %ebx ! 778: jae .L191 ! 779: .p2align 4,,15 ! 780: .L168: ! 781: cmpl $7, -400(%ebp) ! 782: jg .L166 ! 783: movl 16(%ebp), %edx ! 784: movl -68(%ebp), %esi ! 785: movl %edx, 4(%esp) ! 786: movl (%esi,%ebx,4), %eax ! 787: movl %eax, (%esp) ! 788: call strcasecmp ! 789: .L197: ! 790: testl %eax, %eax ! 791: jne .L163 ! 792: movl -388(%ebp), %eax ! 793: movl $47, %edi ! 794: leal -328(%ebp), %edx ! 795: movl %edi, 12(%esp) ! 796: incl %eax ! 797: movl %eax, 16(%esp) ! 798: movl (%esi,%ebx,4), %eax ! 799: movl $.LC3, %ebx ! 800: movl %ebx, 4(%esp) ! 801: movl %edx, (%esp) ! 802: movl %eax, 8(%esp) ! 803: call sprintf ! 804: movl 16(%ebp), %eax ! 805: leal -328(%ebp), %ecx ! 806: movl %ecx, 4(%esp) ! 807: movl %eax, (%esp) ! 808: call strcpy ! 809: movl -72(%ebp), %ebx ! 810: movl $1, %ecx ! 811: movl %ecx, -396(%ebp) ! 812: movl %ebx, %edi ! 813: .L163: ! 814: incl %ebx ! 815: cmpl %edi, %ebx ! 816: jb .L168 ! 817: .L191: ! 818: leal -72(%ebp), %edx ! 819: movl %edx, (%esp) ! 820: call globfree ! 821: movl -396(%ebp), %edx ! 822: testl %edx, %edx ! 823: je .L203 ! 824: .L169: ! 825: movl -388(%ebp), %edx ! 826: movl %edx, -384(%ebp) ! 827: jmp .L196 ! 828: .L203: ! 829: movl -384(%ebp), %ecx ! 830: leal -72(%ebp), %eax ! 831: xorl %ebx, %ebx ! 832: movb $42, (%ecx) ! 833: incl %ecx ! 834: movl %ecx, -384(%ebp) ! 835: movb $0, (%ecx) ! 836: movl 16(%ebp), %edx ! 837: movl %eax, 12(%esp) ! 838: xorl %eax, %eax ! 839: movl %eax, 8(%esp) ! 840: xorl %eax, %eax ! 841: movl %edx, (%esp) ! 842: movl %eax, 4(%esp) ! 843: call glob ! 844: movzbl -390(%ebp), %ecx ! 845: movl -384(%ebp), %eax ! 846: movb %cl, (%eax) ! 847: movzbl -389(%ebp), %edx ! 848: movb %dl, -1(%eax) ! 849: movl -72(%ebp), %edi ! 850: cmpl %edi, -396(%ebp) ! 851: jae .L193 ! 852: .p2align 4,,15 ! 853: .L175: ! 854: movl -404(%ebp), %ecx ! 855: movl 16(%ebp), %eax ! 856: movl -68(%ebp), %esi ! 857: movl %ecx, 8(%esp) ! 858: movl %eax, 4(%esp) ! 859: movl (%esi,%ebx,4), %eax ! 860: movl %eax, (%esp) ! 861: call strncasecmp ! 862: testl %eax, %eax ! 863: je .L204 ! 864: .L172: ! 865: incl %ebx ! 866: cmpl %edi, %ebx ! 867: jb .L175 ! 868: .L193: ! 869: leal -72(%ebp), %edx ! 870: movl %edx, (%esp) ! 871: call globfree ! 872: movl -396(%ebp), %eax ! 873: testl %eax, %eax ! 874: jne .L169 ! 875: movl -388(%ebp), %ecx ! 876: movl $.LC4, %edi ! 877: movb $47, (%ecx) ! 878: movl 16(%ebp), %eax ! 879: movl %edi, 4(%esp) ! 880: movl %eax, 8(%esp) ! 881: movl stderr, %eax ! 882: movl %eax, (%esp) ! 883: call fprintf ! 884: jmp .L169 ! 885: .L204: ! 886: movl -388(%ebp), %eax ! 887: leal -328(%ebp), %edx ! 888: incl %eax ! 889: movl %eax, 16(%esp) ! 890: movl $47, %eax ! 891: movl %eax, 12(%esp) ! 892: movl (%esi,%ebx,4), %eax ! 893: movl %edx, (%esp) ! 894: movl %eax, 8(%esp) ! 895: movl $.LC3, %eax ! 896: movl %eax, 4(%esp) ! 897: call sprintf ! 898: movl 16(%ebp), %eax ! 899: leal -328(%ebp), %ecx ! 900: movl %ecx, 4(%esp) ! 901: movl %eax, (%esp) ! 902: call strcpy ! 903: movl -72(%ebp), %ebx ! 904: movl $1, %eax ! 905: movl %eax, -396(%ebp) ! 906: movl %ebx, %edi ! 907: jmp .L172 ! 908: .p2align 4,,7 ! 909: .L166: ! 910: movl 16(%ebp), %eax ! 911: movl -404(%ebp), %ecx ! 912: movl -68(%ebp), %esi ! 913: movl %eax, 4(%esp) ! 914: movl %ecx, 8(%esp) ! 915: movl (%esi,%ebx,4), %eax ! 916: movl %eax, (%esp) ! 917: call strncasecmp ! 918: jmp .L197 ! 919: .L202: ! 920: movl -384(%ebp), %ebx ! 921: testl %ebx, %ebx ! 922: je .L205 ! 923: .L189: ! 924: movl -384(%ebp), %eax ! 925: movb $47, (%eax) ! 926: incl %eax ! 927: movl %eax, -384(%ebp) ! 928: movzbl (%eax), %edx ! 929: testb %dl, %dl ! 930: movb %dl, -405(%ebp) ! 931: je .L148 ! 932: movl %eax, (%esp) ! 933: movl $63, %edx ! 934: movl %edx, 4(%esp) ! 935: call strchr ! 936: testl %eax, %eax ! 937: je .L206 ! 938: .L148: ! 939: addl $444, %esp ! 940: popl %ebx ! 941: popl %esi ! 942: popl %edi ! 943: popl %ebp ! 944: ret ! 945: .L206: ! 946: movl -384(%ebp), %ecx ! 947: movl $42, %eax ! 948: movl %eax, 4(%esp) ! 949: movl %ecx, (%esp) ! 950: call strchr ! 951: testl %eax, %eax ! 952: jne .L148 ! 953: movl -384(%ebp), %eax ! 954: leal -376(%ebp), %edx ! 955: xorl %esi, %esi ! 956: movb $42, (%eax) ! 957: incl %eax ! 958: movl %eax, -384(%ebp) ! 959: movzbl (%eax), %ebx ! 960: movb $0, (%eax) ! 961: movl 16(%ebp), %ecx ! 962: xorl %eax, %eax ! 963: movl %eax, 8(%esp) ! 964: xorl %eax, %eax ! 965: movl %edx, 12(%esp) ! 966: movl %ecx, (%esp) ! 967: movl %eax, 4(%esp) ! 968: call glob ! 969: movl -384(%ebp), %eax ! 970: movb %bl, (%eax) ! 971: decl %eax ! 972: movzbl -405(%ebp), %edx ! 973: movl %eax, -384(%ebp) ! 974: movb %dl, (%eax) ! 975: movl 16(%ebp), %ecx ! 976: movl %ecx, (%esp) ! 977: call strlen ! 978: movl %eax, -416(%ebp) ! 979: movl -384(%ebp), %eax ! 980: movl %eax, (%esp) ! 981: call baselen ! 982: movl %eax, -412(%ebp) ! 983: movl -376(%ebp), %edi ! 984: cmpl %edi, %esi ! 985: jae .L195 ! 986: .L188: ! 987: cmpl $7, -412(%ebp) ! 988: jg .L186 ! 989: movl 16(%ebp), %edx ! 990: movl -372(%ebp), %ebx ! 991: movl %edx, 4(%esp) ! 992: movl (%ebx,%esi,4), %eax ! 993: movl %eax, (%esp) ! 994: call strcasecmp ! 995: .L199: ! 996: testl %eax, %eax ! 997: jne .L183 ! 998: movl (%ebx,%esi,4), %eax ! 999: movl 16(%ebp), %edx ! 1000: movl %eax, 4(%esp) ! 1001: movl %edx, (%esp) ! 1002: call strcpy ! 1003: movl -376(%ebp), %esi ! 1004: movl %esi, %edi ! 1005: .L183: ! 1006: incl %esi ! 1007: cmpl %edi, %esi ! 1008: jb .L188 ! 1009: .L195: ! 1010: leal -376(%ebp), %ecx ! 1011: movl %ecx, (%esp) ! 1012: call globfree ! 1013: jmp .L148 ! 1014: .L186: ! 1015: movl 16(%ebp), %eax ! 1016: movl -416(%ebp), %ecx ! 1017: movl -372(%ebp), %ebx ! 1018: movl %eax, 4(%esp) ! 1019: movl %ecx, 8(%esp) ! 1020: movl (%ebx,%esi,4), %eax ! 1021: movl %eax, (%esp) ! 1022: call strncasecmp ! 1023: jmp .L199 ! 1024: .L205: ! 1025: movl $47, %ecx ! 1026: movl %ecx, 4(%esp) ! 1027: movl 16(%ebp), %ecx ! 1028: movl %ecx, (%esp) ! 1029: call strrchr ! 1030: movl %eax, -384(%ebp) ! 1031: testl %eax, %eax ! 1032: jne .L189 ! 1033: jmp .L148 ! 1034: .L201: ! 1035: movl %edx, 12(%esp) ! 1036: movl $emudrive, %ecx ! 1037: movl $.LC2, %edx ! 1038: movl %edx, 4(%esp) ! 1039: movl 16(%ebp), %edx ! 1040: movl %ecx, 8(%esp) ! 1041: movl %edx, (%esp) ! 1042: .L198: ! 1043: call sprintf ! 1044: jmp .L196 ! 1045: .L200: ! 1046: movl %edx, (%esp) ! 1047: movl $emudrive, %esi ! 1048: movl $.LC2, %ebx ! 1049: call File_RemoveFileNameDrive ! 1050: movl %eax, 12(%esp) ! 1051: movl 16(%ebp), %eax ! 1052: movl %esi, 8(%esp) ! 1053: movl %ebx, 4(%esp) ! 1054: movl %eax, (%esp) ! 1055: jmp .L198 ! 1056: .size GemDOS_CreateHardDriveFileName, .-GemDOS_CreateHardDriveFileName ! 1057: .p2align 4,,15 ! 1058: .globl GemDOS_ConvertAttribute ! 1059: .type GemDOS_ConvertAttribute, @function ! 1060: GemDOS_ConvertAttribute: ! 1061: pushl %ebp ! 1062: xorl %edx, %edx ! 1063: movl %esp, %ebp ! 1064: movl 8(%ebp), %eax ! 1065: andl $61440, %eax ! 1066: cmpl $16384, %eax ! 1067: je .L209 ! 1068: .L208: ! 1069: popl %ebp ! 1070: movzbl %dl, %eax ! 1071: ret ! 1072: .p2align 4,,7 ! 1073: .L209: ! 1074: movb $16, %dl ! 1075: jmp .L208 ! 1076: .size GemDOS_ConvertAttribute, .-GemDOS_ConvertAttribute ! 1077: .p2align 4,,15 ! 1078: .globl GemDOS_SetDTA ! 1079: .type GemDOS_SetDTA, @function ! 1080: GemDOS_SetDTA: ! 1081: pushl %ebp ! 1082: movl %esp, %ebp ! 1083: subl $8, %esp ! 1084: movl $15, (%esp) ! 1085: call GetReg ! 1086: movl %eax, (%esp) ! 1087: call MemReadLong ! 1088: movl STRam, %edx ! 1089: andl $16777215, %eax ! 1090: addl %edx, %eax ! 1091: movl %eax, pDTA ! 1092: movl %ebp, %esp ! 1093: popl %ebp ! 1094: ret ! 1095: .size GemDOS_SetDTA, .-GemDOS_SetDTA ! 1096: .section .rodata.str1.1 ! 1097: .LC5: ! 1098: .string "w+" ! 1099: .LC6: ! 1100: .string "wb" ! 1101: .text ! 1102: .p2align 4,,15 ! 1103: .globl GemDOS_Create ! 1104: .type GemDOS_Create, @function ! 1105: GemDOS_Create: ! 1106: pushl %ebp ! 1107: movl $.LC5, %eax ! 1108: movl %esp, %ebp ! 1109: pushl %edi ! 1110: pushl %esi ! 1111: pushl %ebx ! 1112: subl $300, %esp ! 1113: movl %eax, -288(%ebp) ! 1114: movl $.LC6, %eax ! 1115: movl %eax, -284(%ebp) ! 1116: movl $15, (%esp) ! 1117: call GetReg ! 1118: movl %eax, %esi ! 1119: subl $2, %esi ! 1120: leal 2(%esi), %eax ! 1121: movl %eax, (%esp) ! 1122: call MemReadLong ! 1123: movl %eax, %ebx ! 1124: movl STRam, %eax ! 1125: andl $16777215, %ebx ! 1126: addl %eax, %ebx ! 1127: leal 6(%esi), %eax ! 1128: movl %eax, (%esp) ! 1129: call MemReadWord ! 1130: movl %ebx, 4(%esp) ! 1131: movswl %ax,%esi ! 1132: leal -280(%ebp), %eax ! 1133: movl %eax, 8(%esp) ! 1134: movl $2, (%esp) ! 1135: call GemDOS_CreateHardDriveFileName ! 1136: call GemDOS_FindFreeFileHandle ! 1137: cmpl $-1, %eax ! 1138: movl %eax, %ebx ! 1139: je .L217 ! 1140: sall $5, %eax ! 1141: andl $1, %esi ! 1142: addl %ebx, %eax ! 1143: leal 0(,%eax,8), %edi ! 1144: leal -288(%ebp), %eax ! 1145: movl (%eax,%esi,4), %eax ! 1146: movl %eax, 4(%esp) ! 1147: leal -280(%ebp), %eax ! 1148: movl %eax, (%esp) ! 1149: call fopen ! 1150: movl %eax, FileHandles+4(%edi) ! 1151: testl %eax, %eax ! 1152: je .L214 ! 1153: movl $1, %esi ! 1154: leal 64(%ebx), %eax ! 1155: movl %esi, FileHandles(%edi) ! 1156: movl %eax, 4(%esp) ! 1157: .L216: ! 1158: movl $0, (%esp) ! 1159: call SetReg ! 1160: addl $300, %esp ! 1161: popl %ebx ! 1162: popl %esi ! 1163: popl %edi ! 1164: popl %ebp ! 1165: ret ! 1166: .p2align 4,,7 ! 1167: .L214: ! 1168: movl $-33, %ecx ! 1169: movl %ecx, 4(%esp) ! 1170: jmp .L216 ! 1171: .p2align 4,,7 ! 1172: .L217: ! 1173: movl $-35, %edi ! 1174: movl %edi, 4(%esp) ! 1175: jmp .L216 ! 1176: .size GemDOS_Create, .-GemDOS_Create ! 1177: .section .rodata.str1.1 ! 1178: .LC7: ! 1179: .string "rb" ! 1180: .LC8: ! 1181: .string "r+" ! 1182: .LC9: ! 1183: .string "%s" ! 1184: .text ! 1185: .p2align 4,,15 ! 1186: .globl GemDOS_Open ! 1187: .type GemDOS_Open, @function ! 1188: GemDOS_Open: ! 1189: pushl %ebp ! 1190: movl $.LC7, %eax ! 1191: movl %esp, %ebp ! 1192: pushl %edi ! 1193: pushl %esi ! 1194: pushl %ebx ! 1195: subl $300, %esp ! 1196: movl %eax, -296(%ebp) ! 1197: movl $.LC6, %eax ! 1198: movl %eax, -292(%ebp) ! 1199: movl $.LC8, %eax ! 1200: movl %eax, -288(%ebp) ! 1201: movl $15, (%esp) ! 1202: call GetReg ! 1203: movl %eax, %esi ! 1204: subl $2, %esi ! 1205: leal 2(%esi), %eax ! 1206: movl %eax, (%esp) ! 1207: call MemReadLong ! 1208: movl STRam, %edi ! 1209: movl %eax, %ebx ! 1210: leal 6(%esi), %eax ! 1211: movl %eax, (%esp) ! 1212: andl $16777215, %ebx ! 1213: addl %edi, %ebx ! 1214: call MemReadWord ! 1215: movl %ebx, 4(%esp) ! 1216: movswl %ax,%edi ! 1217: leal -280(%ebp), %eax ! 1218: movl %eax, 8(%esp) ! 1219: movl $2, (%esp) ! 1220: call GemDOS_CreateHardDriveFileName ! 1221: call GemDOS_FindFreeFileHandle ! 1222: cmpl $-1, %eax ! 1223: movl %eax, %esi ! 1224: je .L223 ! 1225: sall $5, %eax ! 1226: andl $3, %edi ! 1227: addl %esi, %eax ! 1228: leal 0(,%eax,8), %ebx ! 1229: movl -296(%ebp,%edi,4), %eax ! 1230: movl %eax, 4(%esp) ! 1231: leal -280(%ebp), %eax ! 1232: movl %eax, (%esp) ! 1233: call fopen ! 1234: movl %eax, FileHandles+4(%ebx) ! 1235: movl $.LC9, %edx ! 1236: leal -280(%ebp), %eax ! 1237: movl %eax, 8(%esp) ! 1238: leal FileHandles+8(%ebx), %eax ! 1239: movl %edx, 4(%esp) ! 1240: movl %eax, (%esp) ! 1241: call sprintf ! 1242: movl FileHandles+4(%ebx), %eax ! 1243: testl %eax, %eax ! 1244: je .L220 ! 1245: movl $1, %eax ! 1246: movl %eax, FileHandles(%ebx) ! 1247: leal 64(%esi), %eax ! 1248: .L222: ! 1249: movl %eax, 4(%esp) ! 1250: .L221: ! 1251: movl $0, (%esp) ! 1252: call SetReg ! 1253: addl $300, %esp ! 1254: popl %ebx ! 1255: popl %esi ! 1256: popl %edi ! 1257: popl %ebp ! 1258: ret ! 1259: .p2align 4,,7 ! 1260: .L220: ! 1261: movl $-33, %eax ! 1262: jmp .L222 ! 1263: .p2align 4,,7 ! 1264: .L223: ! 1265: movl $-35, %ecx ! 1266: movl %ecx, 4(%esp) ! 1267: jmp .L221 ! 1268: .size GemDOS_Open, .-GemDOS_Open ! 1269: .p2align 4,,15 ! 1270: .globl GemDOS_Close ! 1271: .type GemDOS_Close, @function ! 1272: GemDOS_Close: ! 1273: pushl %ebp ! 1274: movl %esp, %ebp ! 1275: subl $24, %esp ! 1276: movl $15, (%esp) ! 1277: movl %esi, -4(%ebp) ! 1278: movl %ebx, -8(%ebp) ! 1279: call GetReg ! 1280: movl %eax, (%esp) ! 1281: call MemReadWord ! 1282: cwtl ! 1283: leal -64(%eax), %esi ! 1284: movl %esi, (%esp) ! 1285: call GemDOS_IsInvalidFileHandle ! 1286: testl %eax, %eax ! 1287: je .L227 ! 1288: .L224: ! 1289: movl -8(%ebp), %ebx ! 1290: movl -4(%ebp), %esi ! 1291: movl %ebp, %esp ! 1292: popl %ebp ! 1293: ret ! 1294: .p2align 4,,7 ! 1295: .L227: ! 1296: movl %esi, %ebx ! 1297: sall $5, %ebx ! 1298: addl %esi, %ebx ! 1299: sall $3, %ebx ! 1300: movl FileHandles+4(%ebx), %eax ! 1301: movl %eax, (%esp) ! 1302: call fclose ! 1303: movl $0, (%esp) ! 1304: xorl %eax, %eax ! 1305: movl %eax, FileHandles(%ebx) ! 1306: xorl %eax, %eax ! 1307: movl %eax, 4(%esp) ! 1308: call SetReg ! 1309: jmp .L224 ! 1310: .size GemDOS_Close, .-GemDOS_Close ! 1311: .p2align 4,,15 ! 1312: .globl GemDOS_Read ! 1313: .type GemDOS_Read, @function ! 1314: GemDOS_Read: ! 1315: pushl %ebp ! 1316: movl %esp, %ebp ! 1317: pushl %edi ! 1318: pushl %esi ! 1319: pushl %ebx ! 1320: subl $28, %esp ! 1321: movl $15, (%esp) ! 1322: call GetReg ! 1323: movl %eax, %ebx ! 1324: subl $2, %ebx ! 1325: leal 2(%ebx), %eax ! 1326: movl %eax, (%esp) ! 1327: call MemReadWord ! 1328: cwtl ! 1329: leal -64(%eax), %esi ! 1330: leal 4(%ebx), %eax ! 1331: movl %eax, (%esp) ! 1332: call MemReadLong ! 1333: movl %eax, -16(%ebp) ! 1334: leal 8(%ebx), %eax ! 1335: movl %eax, (%esp) ! 1336: call MemReadLong ! 1337: movl %esi, (%esp) ! 1338: movl %eax, %edi ! 1339: movl STRam, %eax ! 1340: andl $16777215, %edi ! 1341: addl %eax, %edi ! 1342: call GemDOS_IsInvalidFileHandle ! 1343: testl %eax, %eax ! 1344: je .L235 ! 1345: .L228: ! 1346: addl $28, %esp ! 1347: popl %ebx ! 1348: popl %esi ! 1349: popl %edi ! 1350: popl %ebp ! 1351: ret ! 1352: .p2align 4,,7 ! 1353: .L235: ! 1354: movl %esi, %eax ! 1355: sall $5, %eax ! 1356: addl %esi, %eax ! 1357: sall $3, %eax ! 1358: xorl %esi, %esi ! 1359: movl %eax, -20(%ebp) ! 1360: movl FileHandles+4(%eax), %eax ! 1361: movl %eax, (%esp) ! 1362: call ftell ! 1363: movl %esi, 4(%esp) ! 1364: movl -20(%ebp), %edx ! 1365: movl %eax, %ebx ! 1366: movl $2, %eax ! 1367: movl %eax, 8(%esp) ! 1368: movl FileHandles+4(%edx), %eax ! 1369: movl %eax, (%esp) ! 1370: call fseek ! 1371: movl -20(%ebp), %edx ! 1372: movl FileHandles+4(%edx), %eax ! 1373: movl %eax, (%esp) ! 1374: call ftell ! 1375: movl %ebx, 4(%esp) ! 1376: movl -20(%ebp), %edx ! 1377: movl %eax, %esi ! 1378: xorl %ecx, %ecx ! 1379: movl %ecx, 8(%esp) ! 1380: movl FileHandles+4(%edx), %eax ! 1381: movl %eax, (%esp) ! 1382: call fseek ! 1383: cmpl %ebx, %esi ! 1384: je .L236 ! 1385: cmpl %esi, -16(%ebp) ! 1386: jbe .L233 ! 1387: movl %esi, -16(%ebp) ! 1388: .L233: ! 1389: movl %edi, (%esp) ! 1390: movl -20(%ebp), %edx ! 1391: movl FileHandles+4(%edx), %eax ! 1392: movl %eax, 12(%esp) ! 1393: movl -16(%ebp), %eax ! 1394: movl %eax, 8(%esp) ! 1395: movl $1, %eax ! 1396: movl %eax, 4(%esp) ! 1397: call fread ! 1398: movl %eax, 4(%esp) ! 1399: .L234: ! 1400: movl $0, (%esp) ! 1401: call SetReg ! 1402: jmp .L228 ! 1403: .L236: ! 1404: xorl %edx, %edx ! 1405: movl %edx, 4(%esp) ! 1406: jmp .L234 ! 1407: .size GemDOS_Read, .-GemDOS_Read ! 1408: .p2align 4,,15 ! 1409: .globl GemDOS_Write ! 1410: .type GemDOS_Write, @function ! 1411: GemDOS_Write: ! 1412: pushl %ebp ! 1413: movl %esp, %ebp ! 1414: subl $40, %esp ! 1415: movl $15, (%esp) ! 1416: movl %ebx, -12(%ebp) ! 1417: movl %esi, -8(%ebp) ! 1418: movl %edi, -4(%ebp) ! 1419: call GetReg ! 1420: movl %eax, %ebx ! 1421: subl $2, %ebx ! 1422: leal 2(%ebx), %eax ! 1423: movl %eax, (%esp) ! 1424: call MemReadWord ! 1425: cwtl ! 1426: leal -64(%eax), %esi ! 1427: leal 4(%ebx), %eax ! 1428: movl %eax, (%esp) ! 1429: call MemReadLong ! 1430: movl %eax, %edi ! 1431: leal 8(%ebx), %eax ! 1432: movl %eax, (%esp) ! 1433: call MemReadLong ! 1434: movl %esi, (%esp) ! 1435: movl %eax, %ebx ! 1436: movl STRam, %eax ! 1437: andl $16777215, %ebx ! 1438: addl %eax, %ebx ! 1439: call GemDOS_IsInvalidFileHandle ! 1440: testl %eax, %eax ! 1441: je .L242 ! 1442: .L237: ! 1443: movl -12(%ebp), %ebx ! 1444: movl -8(%ebp), %esi ! 1445: movl -4(%ebp), %edi ! 1446: movl %ebp, %esp ! 1447: popl %ebp ! 1448: ret ! 1449: .p2align 4,,7 ! 1450: .L242: ! 1451: movl %edi, 8(%esp) ! 1452: movl %esi, %eax ! 1453: sall $5, %eax ! 1454: movl %ebx, (%esp) ! 1455: addl %esi, %eax ! 1456: movl FileHandles+4(,%eax,8), %eax ! 1457: movl %eax, 12(%esp) ! 1458: movl $1, %eax ! 1459: movl %eax, 4(%esp) ! 1460: call fwrite ! 1461: movl %eax, 4(%esp) ! 1462: movl $0, (%esp) ! 1463: call SetReg ! 1464: jmp .L237 ! 1465: .size GemDOS_Write, .-GemDOS_Write ! 1466: .p2align 4,,15 ! 1467: .globl GemDOS_UnLink ! 1468: .type GemDOS_UnLink, @function ! 1469: GemDOS_UnLink: ! 1470: pushl %ebp ! 1471: movl %esp, %ebp ! 1472: subl $280, %esp ! 1473: movl $15, (%esp) ! 1474: movl %ebx, -4(%ebp) ! 1475: leal -264(%ebp), %ebx ! 1476: call GetReg ! 1477: movl %eax, (%esp) ! 1478: call MemReadLong ! 1479: movl %ebx, 8(%esp) ! 1480: movl STRam, %edx ! 1481: andl $16777215, %eax ! 1482: movl $2, (%esp) ! 1483: addl %edx, %eax ! 1484: movl %eax, 4(%esp) ! 1485: call GemDOS_CreateHardDriveFileName ! 1486: movl %ebx, (%esp) ! 1487: call unlink ! 1488: testl %eax, %eax ! 1489: jne .L244 ! 1490: xorl %eax, %eax ! 1491: .L247: ! 1492: movl %eax, 4(%esp) ! 1493: movl $0, (%esp) ! 1494: call SetReg ! 1495: movl -4(%ebp), %ebx ! 1496: movl %ebp, %esp ! 1497: popl %ebp ! 1498: ret ! 1499: .p2align 4,,7 ! 1500: .L244: ! 1501: movl $-33, %eax ! 1502: jmp .L247 ! 1503: .size GemDOS_UnLink, .-GemDOS_UnLink ! 1504: .section .rodata.str1.1 ! 1505: .LC10: ! 1506: .string "\tError setting DTA.\n" ! 1507: .text ! 1508: .p2align 4,,15 ! 1509: .globl GemDOS_SNext ! 1510: .type GemDOS_SNext, @function ! 1511: GemDOS_SNext: ! 1512: pushl %ebp ! 1513: movl %esp, %ebp ! 1514: subl $24, %esp ! 1515: movl $15, (%esp) ! 1516: call GetReg ! 1517: movl pDTA, %edx ! 1518: movl 2(%edx), %eax ! 1519: #APP ! 1520: bswap %eax ! 1521: ! 1522: #NO_APP ! 1523: cmpl $311964790, %eax ! 1524: je .L255 ! 1525: .L248: ! 1526: movl %ebp, %esp ! 1527: popl %ebp ! 1528: ret ! 1529: .p2align 4,,7 ! 1530: .L255: ! 1531: movzwl (%edx), %eax ! 1532: #APP ! 1533: xchgb %al,%ah ! 1534: #NO_APP ! 1535: movzbl %al, %eax ! 1536: movl %eax, %edx ! 1537: sall $4, %edx ! 1538: addl %eax, %edx ! 1539: sall $4, %edx ! 1540: movl InternalDTAs+8(%edx), %ecx ! 1541: cmpl InternalDTAs+4(%edx), %ecx ! 1542: jl .L252 ! 1543: movl $-49, %eax ! 1544: movl %eax, 4(%esp) ! 1545: .L254: ! 1546: movl $0, (%esp) ! 1547: call SetReg ! 1548: jmp .L248 ! 1549: .p2align 4,,7 ! 1550: .L252: ! 1551: movl InternalDTAs+12(%edx), %eax ! 1552: movl (%eax,%ecx,4), %eax ! 1553: movl %eax, 4(%esp) ! 1554: leal 1(%ecx), %eax ! 1555: movl %eax, InternalDTAs+8(%edx) ! 1556: leal InternalDTAs+16(%edx), %eax ! 1557: movl %eax, (%esp) ! 1558: call PopulateDTA ! 1559: testl %eax, %eax ! 1560: jne .L253 ! 1561: movl $.LC10, (%esp) ! 1562: movl stderr, %eax ! 1563: movl %eax, 12(%esp) ! 1564: movl $20, %eax ! 1565: movl %eax, 8(%esp) ! 1566: movl $1, %eax ! 1567: movl %eax, 4(%esp) ! 1568: call fwrite ! 1569: jmp .L248 ! 1570: .L253: ! 1571: xorl %ecx, %ecx ! 1572: movl %ecx, 4(%esp) ! 1573: jmp .L254 ! 1574: .size GemDOS_SNext, .-GemDOS_SNext ! 1575: .p2align 4,,15 ! 1576: .globl GemDOS_SFirst ! 1577: .type GemDOS_SFirst, @function ! 1578: GemDOS_SFirst: ! 1579: pushl %ebp ! 1580: movl %esp, %ebp ! 1581: pushl %edi ! 1582: leal -280(%ebp), %edi ! 1583: pushl %esi ! 1584: pushl %ebx ! 1585: subl $556, %esp ! 1586: movl $15, (%esp) ! 1587: call GetReg ! 1588: movl %eax, %esi ! 1589: subl $2, %esi ! 1590: leal 2(%esi), %eax ! 1591: movl %eax, (%esp) ! 1592: call MemReadLong ! 1593: movl STRam, %ecx ! 1594: movl %eax, %ebx ! 1595: andl $16777215, %ebx ! 1596: leal 6(%esi), %eax ! 1597: addl %ecx, %ebx ! 1598: movl %eax, (%esp) ! 1599: call MemReadWord ! 1600: movl %edi, 8(%esp) ! 1601: movzwl %ax, %esi ! 1602: movl %ebx, 4(%esp) ! 1603: movl $2, (%esp) ! 1604: call GemDOS_CreateHardDriveFileName ! 1605: movzwl DTAIndex, %eax ! 1606: #APP ! 1607: xchgb %al,%ah ! 1608: #NO_APP ! 1609: movl pDTA, %edx ! 1610: movw %ax, (%edx) ! 1611: movl $311964790, %eax ! 1612: #APP ! 1613: bswap %eax ! 1614: ! 1615: #NO_APP ! 1616: movl %eax, 2(%edx) ! 1617: movl DTAIndex, %ecx ! 1618: movl %ecx, %eax ! 1619: sall $4, %eax ! 1620: addl %ecx, %eax ! 1621: sall $4, %eax ! 1622: cmpl $1, InternalDTAs(%eax) ! 1623: je .L286 ! 1624: .L259: ! 1625: movl %ecx, %eax ! 1626: movl $1, %edx ! 1627: sall $4, %eax ! 1628: addl %ecx, %eax ! 1629: sall $4, %eax ! 1630: andl $8, %esi ! 1631: movl %edx, InternalDTAs(%eax) ! 1632: je .L260 ! 1633: movl pDTA, %eax ! 1634: movl $1280658757, 30(%eax) ! 1635: movl $1145394241, 34(%eax) ! 1636: movl $825241646, 38(%eax) ! 1637: movb $0, 42(%eax) ! 1638: xorl %eax, %eax ! 1639: .L285: ! 1640: movl %eax, 4(%esp) ! 1641: movl $0, (%esp) ! 1642: call SetReg ! 1643: .L256: ! 1644: addl $556, %esp ! 1645: popl %ebx ! 1646: popl %esi ! 1647: popl %edi ! 1648: popl %ebp ! 1649: ret ! 1650: .p2align 4,,7 ! 1651: .L260: ! 1652: movl %edi, (%esp) ! 1653: addl $InternalDTAs+16, %eax ! 1654: movl %eax, 4(%esp) ! 1655: call fsfirst_dirname ! 1656: movl DTAIndex, %edx ! 1657: movl %edx, %eax ! 1658: sall $4, %eax ! 1659: addl %edx, %eax ! 1660: sall $4, %eax ! 1661: addl $InternalDTAs+16, %eax ! 1662: movl %eax, (%esp) ! 1663: call opendir ! 1664: testl %eax, %eax ! 1665: je .L287 ! 1666: movl %eax, (%esp) ! 1667: xorl %esi, %esi ! 1668: call closedir ! 1669: movl %esi, 8(%esp) ! 1670: movl DTAIndex, %eax ! 1671: movl %eax, %ebx ! 1672: sall $4, %ebx ! 1673: addl %eax, %ebx ! 1674: movl $alphasort, %eax ! 1675: movl %eax, 12(%esp) ! 1676: sall $4, %ebx ! 1677: leal -540(%ebp), %eax ! 1678: movl %eax, 4(%esp) ! 1679: leal InternalDTAs+16(%ebx), %eax ! 1680: movl %eax, (%esp) ! 1681: call scandir ! 1682: movl %eax, InternalDTAs+4(%ebx) ! 1683: movl DTAIndex, %edx ! 1684: movl %edx, %eax ! 1685: sall $4, %eax ! 1686: addl %edx, %eax ! 1687: sall $4, %eax ! 1688: movl InternalDTAs+4(%eax), %ecx ! 1689: testl %ecx, %ecx ! 1690: js .L283 ! 1691: movl %edi, (%esp) ! 1692: xorl %edx, %edx ! 1693: xorl %esi, %esi ! 1694: movl %edx, InternalDTAs+8(%eax) ! 1695: xorl %edi, %edi ! 1696: leal -536(%ebp), %eax ! 1697: movl %eax, 4(%esp) ! 1698: call fsfirst_dirmask ! 1699: movl DTAIndex, %ecx ! 1700: movl %ecx, %eax ! 1701: sall $4, %eax ! 1702: addl %ecx, %eax ! 1703: sall $4, %eax ! 1704: cmpl InternalDTAs+4(%eax), %edi ! 1705: jge .L256 ! 1706: .p2align 4,,15 ! 1707: .L268: ! 1708: movl -540(%ebp), %eax ! 1709: movl (%eax,%esi,4), %eax ! 1710: addl $11, %eax ! 1711: movl %eax, 4(%esp) ! 1712: leal -536(%ebp), %eax ! 1713: movl %eax, (%esp) ! 1714: call match ! 1715: testl %eax, %eax ! 1716: je .L265 ! 1717: incl %edi ! 1718: .L265: ! 1719: movl DTAIndex, %ecx ! 1720: incl %esi ! 1721: movl %ecx, %eax ! 1722: sall $4, %eax ! 1723: leal (%ecx,%eax), %ebx ! 1724: sall $4, %ebx ! 1725: cmpl InternalDTAs+4(%ebx), %esi ! 1726: jl .L268 ! 1727: testl %edi, %edi ! 1728: je .L256 ! 1729: leal 0(,%edi,4), %eax ! 1730: xorl %esi, %esi ! 1731: movl %eax, (%esp) ! 1732: call malloc ! 1733: movl %eax, InternalDTAs+12(%ebx) ! 1734: movl DTAIndex, %ecx ! 1735: xorl %ebx, %ebx ! 1736: movl %ecx, %eax ! 1737: sall $4, %eax ! 1738: addl %ecx, %eax ! 1739: sall $4, %eax ! 1740: cmpl InternalDTAs+4(%eax), %esi ! 1741: jl .L275 ! 1742: .L280: ! 1743: movl %ecx, %eax ! 1744: sall $4, %eax ! 1745: addl %ecx, %eax ! 1746: sall $4, %eax ! 1747: testl %edi, %edi ! 1748: movl %edi, InternalDTAs+4(%eax) ! 1749: jne .L276 ! 1750: .L283: ! 1751: movl $-33, %eax ! 1752: jmp .L285 ! 1753: .L276: ! 1754: movl $0, (%esp) ! 1755: call GemDOS_SNext ! 1756: movl DTAIndex, %ecx ! 1757: incl %ecx ! 1758: movzbl %cl,%eax ! 1759: movl %eax, DTAIndex ! 1760: jmp .L256 ! 1761: .p2align 4,,7 ! 1762: .L275: ! 1763: movl -540(%ebp), %eax ! 1764: movl (%eax,%esi,4), %eax ! 1765: addl $11, %eax ! 1766: movl %eax, 4(%esp) ! 1767: leal -536(%ebp), %eax ! 1768: movl %eax, (%esp) ! 1769: call match ! 1770: testl %eax, %eax ! 1771: je .L281 ! 1772: movl DTAIndex, %ecx ! 1773: movl %ecx, %eax ! 1774: sall $4, %eax ! 1775: addl %ecx, %eax ! 1776: sall $4, %eax ! 1777: movl InternalDTAs+12(%eax), %edx ! 1778: movl -540(%ebp), %eax ! 1779: movl (%eax,%esi,4), %eax ! 1780: movl %eax, (%edx,%ebx,4) ! 1781: incl %ebx ! 1782: .L272: ! 1783: movl %ecx, %eax ! 1784: incl %esi ! 1785: sall $4, %eax ! 1786: addl %ecx, %eax ! 1787: sall $4, %eax ! 1788: cmpl InternalDTAs+4(%eax), %esi ! 1789: jl .L275 ! 1790: jmp .L280 ! 1791: .L281: ! 1792: movl DTAIndex, %ecx ! 1793: jmp .L272 ! 1794: .L287: ! 1795: movl $-34, %eax ! 1796: jmp .L285 ! 1797: .p2align 4,,7 ! 1798: .L286: ! 1799: call ClearInternalDTA ! 1800: movl DTAIndex, %ecx ! 1801: jmp .L259 ! 1802: .size GemDOS_SFirst, .-GemDOS_SFirst ! 1803: .p2align 4,,15 ! 1804: .globl Call_Memset ! 1805: .type Call_Memset, @function ! 1806: Call_Memset: ! 1807: pushl %ebp ! 1808: movl %esp, %ebp ! 1809: subl $24, %esp ! 1810: movl $15, (%esp) ! 1811: movl %ebx, -8(%ebp) ! 1812: movl %esi, -4(%ebp) ! 1813: call GetReg ! 1814: movl %eax, %esi ! 1815: subl $2, %esi ! 1816: leal 2(%esi), %eax ! 1817: movl %eax, (%esp) ! 1818: call MemReadLong ! 1819: movl %eax, %ebx ! 1820: leal 6(%esi), %eax ! 1821: movl %eax, (%esp) ! 1822: call MemReadLong ! 1823: movl %ebx, 8(%esp) ! 1824: movl STRam, %esi ! 1825: xorl %ebx, %ebx ! 1826: movl %ebx, 4(%esp) ! 1827: addl %esi, %eax ! 1828: movl %eax, (%esp) ! 1829: call memset ! 1830: movl -8(%ebp), %ebx ! 1831: movl -4(%ebp), %esi ! 1832: movl %ebp, %esp ! 1833: popl %ebp ! 1834: ret ! 1835: .size Call_Memset, .-Call_Memset ! 1836: .p2align 4,,15 ! 1837: .globl Call_MemsetBlue ! 1838: .type Call_MemsetBlue, @function ! 1839: Call_MemsetBlue: ! 1840: pushl %ebp ! 1841: movl %esp, %ebp ! 1842: subl $24, %esp ! 1843: movl $15, (%esp) ! 1844: movl %ebx, -8(%ebp) ! 1845: movl %esi, -4(%ebp) ! 1846: call GetReg ! 1847: movl %eax, %esi ! 1848: subl $2, %esi ! 1849: leal 2(%esi), %eax ! 1850: movl %eax, (%esp) ! 1851: call MemReadLong ! 1852: movl %eax, %ebx ! 1853: leal 6(%esi), %eax ! 1854: movl %eax, (%esp) ! 1855: call MemReadLong ! 1856: movl %ebx, 8(%esp) ! 1857: movl STRam, %edx ! 1858: movl $14, %ecx ! 1859: movl %ecx, 4(%esp) ! 1860: addl %edx, %eax ! 1861: movl %eax, (%esp) ! 1862: call memset ! 1863: movl -8(%ebp), %ebx ! 1864: movl -4(%ebp), %esi ! 1865: movl %ebp, %esp ! 1866: popl %ebp ! 1867: ret ! 1868: .size Call_MemsetBlue, .-Call_MemsetBlue ! 1869: .p2align 4,,15 ! 1870: .globl Call_Memcpy ! 1871: .type Call_Memcpy, @function ! 1872: Call_Memcpy: ! 1873: pushl %ebp ! 1874: movl %esp, %ebp ! 1875: subl $24, %esp ! 1876: movl $15, (%esp) ! 1877: movl %ebx, -12(%ebp) ! 1878: movl %esi, -8(%ebp) ! 1879: movl %edi, -4(%ebp) ! 1880: call GetReg ! 1881: movl %eax, %esi ! 1882: subl $2, %esi ! 1883: leal 2(%esi), %eax ! 1884: movl %eax, (%esp) ! 1885: call MemReadLong ! 1886: movl %eax, %edi ! 1887: leal 6(%esi), %eax ! 1888: movl %eax, (%esp) ! 1889: call MemReadLong ! 1890: movl %eax, %ebx ! 1891: leal 10(%esi), %eax ! 1892: movl %eax, (%esp) ! 1893: call MemReadLong ! 1894: movl %eax, 8(%esp) ! 1895: movl STRam, %edx ! 1896: leal (%edi,%edx), %ecx ! 1897: movl %ecx, (%esp) ! 1898: addl %ebx, %edx ! 1899: movl %edx, 4(%esp) ! 1900: call memcpy ! 1901: movl -12(%ebp), %ebx ! 1902: movl -8(%ebp), %esi ! 1903: movl -4(%ebp), %edi ! 1904: movl %ebp, %esp ! 1905: popl %ebp ! 1906: ret ! 1907: .size Call_Memcpy, .-Call_Memcpy ! 1908: .section .rodata ! 1909: .align 32 ! 1910: .type mouse_bmp, @object ! 1911: .size mouse_bmp, 256 ! 1912: mouse_bmp: ! 1913: .byte 0 ! 1914: .byte 0 ! 1915: .byte -1 ! 1916: .byte -1 ! 1917: .byte -1 ! 1918: .byte -1 ! 1919: .byte -1 ! 1920: .byte -1 ! 1921: .byte -1 ! 1922: .byte -1 ! 1923: .byte -1 ! 1924: .byte -1 ! 1925: .byte -1 ! 1926: .byte -1 ! 1927: .byte -1 ! 1928: .byte -1 ! 1929: .byte 0 ! 1930: .byte 15 ! 1931: .byte 0 ! 1932: .byte -1 ! 1933: .byte -1 ! 1934: .byte -1 ! 1935: .byte -1 ! 1936: .byte -1 ! 1937: .byte -1 ! 1938: .byte -1 ! 1939: .byte -1 ! 1940: .byte -1 ! 1941: .byte -1 ! 1942: .byte -1 ! 1943: .byte -1 ! 1944: .byte -1 ! 1945: .byte 0 ! 1946: .byte 15 ! 1947: .byte 15 ! 1948: .byte 0 ! 1949: .byte -1 ! 1950: .byte -1 ! 1951: .byte -1 ! 1952: .byte -1 ! 1953: .byte -1 ! 1954: .byte -1 ! 1955: .byte -1 ! 1956: .byte -1 ! 1957: .byte -1 ! 1958: .byte -1 ! 1959: .byte -1 ! 1960: .byte -1 ! 1961: .byte 0 ! 1962: .byte 15 ! 1963: .byte 15 ! 1964: .byte 15 ! 1965: .byte 0 ! 1966: .byte -1 ! 1967: .byte -1 ! 1968: .byte -1 ! 1969: .byte -1 ! 1970: .byte -1 ! 1971: .byte -1 ! 1972: .byte -1 ! 1973: .byte -1 ! 1974: .byte -1 ! 1975: .byte -1 ! 1976: .byte -1 ! 1977: .byte 0 ! 1978: .byte 15 ! 1979: .byte 15 ! 1980: .byte 15 ! 1981: .byte 15 ! 1982: .byte 0 ! 1983: .byte -1 ! 1984: .byte -1 ! 1985: .byte -1 ! 1986: .byte -1 ! 1987: .byte -1 ! 1988: .byte -1 ! 1989: .byte -1 ! 1990: .byte -1 ! 1991: .byte -1 ! 1992: .byte -1 ! 1993: .byte 0 ! 1994: .byte 15 ! 1995: .byte 15 ! 1996: .byte 15 ! 1997: .byte 15 ! 1998: .byte 15 ! 1999: .byte 0 ! 2000: .byte -1 ! 2001: .byte -1 ! 2002: .byte -1 ! 2003: .byte -1 ! 2004: .byte -1 ! 2005: .byte -1 ! 2006: .byte -1 ! 2007: .byte -1 ! 2008: .byte -1 ! 2009: .byte 0 ! 2010: .byte 15 ! 2011: .byte 15 ! 2012: .byte 15 ! 2013: .byte 15 ! 2014: .byte 0 ! 2015: .byte -1 ! 2016: .byte -1 ! 2017: .byte -1 ! 2018: .byte -1 ! 2019: .byte -1 ! 2020: .byte -1 ! 2021: .byte -1 ! 2022: .byte -1 ! 2023: .byte -1 ! 2024: .byte -1 ! 2025: .byte 0 ! 2026: .byte 15 ! 2027: .byte 15 ! 2028: .byte 15 ! 2029: .byte 15 ! 2030: .byte 0 ! 2031: .byte -1 ! 2032: .byte -1 ! 2033: .byte -1 ! 2034: .byte -1 ! 2035: .byte -1 ! 2036: .byte -1 ! 2037: .byte -1 ! 2038: .byte -1 ! 2039: .byte -1 ! 2040: .byte -1 ! 2041: .byte 0 ! 2042: .byte 15 ! 2043: .byte 0 ! 2044: .byte 15 ! 2045: .byte 15 ! 2046: .byte 15 ! 2047: .byte 0 ! 2048: .byte -1 ! 2049: .byte -1 ! 2050: .byte -1 ! 2051: .byte -1 ! 2052: .byte -1 ! 2053: .byte -1 ! 2054: .byte -1 ! 2055: .byte -1 ! 2056: .byte -1 ! 2057: .byte 0 ! 2058: .byte 0 ! 2059: .byte -1 ! 2060: .byte 0 ! 2061: .byte 15 ! 2062: .byte 15 ! 2063: .byte 0 ! 2064: .byte -1 ! 2065: .byte -1 ! 2066: .byte -1 ! 2067: .byte -1 ! 2068: .byte -1 ! 2069: .byte -1 ! 2070: .byte -1 ! 2071: .byte -1 ! 2072: .byte -1 ! 2073: .byte -1 ! 2074: .byte -1 ! 2075: .byte -1 ! 2076: .byte 0 ! 2077: .byte 15 ! 2078: .byte 15 ! 2079: .byte 15 ! 2080: .byte 0 ! 2081: .byte -1 ! 2082: .byte -1 ! 2083: .byte -1 ! 2084: .byte -1 ! 2085: .byte -1 ! 2086: .byte -1 ! 2087: .byte -1 ! 2088: .byte -1 ! 2089: .byte -1 ! 2090: .byte -1 ! 2091: .byte -1 ! 2092: .byte -1 ! 2093: .byte 0 ! 2094: .byte 15 ! 2095: .byte 15 ! 2096: .byte 0 ! 2097: .byte -1 ! 2098: .byte -1 ! 2099: .byte -1 ! 2100: .byte -1 ! 2101: .byte -1 ! 2102: .byte -1 ! 2103: .byte -1 ! 2104: .byte -1 ! 2105: .byte -1 ! 2106: .byte -1 ! 2107: .byte -1 ! 2108: .byte -1 ! 2109: .byte 0 ! 2110: .byte 15 ! 2111: .byte 15 ! 2112: .byte 15 ! 2113: .byte 0 ! 2114: .byte -1 ! 2115: .byte -1 ! 2116: .byte -1 ! 2117: .byte -1 ! 2118: .byte -1 ! 2119: .byte -1 ! 2120: .byte -1 ! 2121: .byte -1 ! 2122: .byte -1 ! 2123: .byte -1 ! 2124: .byte -1 ! 2125: .byte -1 ! 2126: .byte 0 ! 2127: .byte 15 ! 2128: .byte 0 ! 2129: .byte -1 ! 2130: .byte -1 ! 2131: .byte -1 ! 2132: .byte -1 ! 2133: .byte -1 ! 2134: .byte -1 ! 2135: .byte -1 ! 2136: .byte -1 ! 2137: .byte -1 ! 2138: .byte -1 ! 2139: .byte -1 ! 2140: .byte -1 ! 2141: .byte -1 ! 2142: .byte -1 ! 2143: .byte 0 ! 2144: .byte -1 ! 2145: .byte -1 ! 2146: .byte -1 ! 2147: .byte -1 ! 2148: .byte -1 ! 2149: .byte -1 ! 2150: .byte -1 ! 2151: .byte -1 ! 2152: .byte -1 ! 2153: .byte -1 ! 2154: .byte -1 ! 2155: .byte -1 ! 2156: .byte -1 ! 2157: .byte -1 ! 2158: .byte -1 ! 2159: .byte -1 ! 2160: .byte -1 ! 2161: .byte -1 ! 2162: .byte -1 ! 2163: .byte -1 ! 2164: .byte -1 ! 2165: .byte -1 ! 2166: .byte -1 ! 2167: .byte -1 ! 2168: .byte -1 ! 2169: .text ! 2170: .p2align 4,,15 ! 2171: .globl Call_BlitCursor ! 2172: .type Call_BlitCursor, @function ! 2173: Call_BlitCursor: ! 2174: pushl %ebp ! 2175: movl %esp, %ebp ! 2176: pushl %edi ! 2177: pushl %esi ! 2178: movl $mouse_bmp, %esi ! 2179: pushl %ebx ! 2180: subl $28, %esp ! 2181: movl $15, (%esp) ! 2182: call GetReg ! 2183: movl %eax, %ebx ! 2184: subl $2, %ebx ! 2185: leal 2(%ebx), %eax ! 2186: movl %eax, (%esp) ! 2187: call MemReadLong ! 2188: movl %eax, %edi ! 2189: leal 6(%ebx), %eax ! 2190: movl %eax, (%esp) ! 2191: call MemReadLong ! 2192: movl %eax, -20(%ebp) ! 2193: leal 10(%ebx), %eax ! 2194: movl $under_mouse, %ebx ! 2195: movl %eax, (%esp) ! 2196: call MemReadLong ! 2197: movl $0, -16(%ebp) ! 2198: movl STRam, %ecx ! 2199: addl %ecx, %eax ! 2200: movl -20(%ebp), %ecx ! 2201: leal (%ecx,%ecx,4), %edx ! 2202: sall $6, %edx ! 2203: addl %edx, %eax ! 2204: addl %edi, %eax ! 2205: movl %eax, -24(%ebp) ! 2206: .L304: ! 2207: movl -16(%ebp), %eax ! 2208: movl -20(%ebp), %edx ! 2209: addl %edx, %eax ! 2210: cmpl $200, %eax ! 2211: jg .L293 ! 2212: movl -24(%ebp), %edx ! 2213: xorl %ecx, %ecx ! 2214: leal 320(%edx), %eax ! 2215: movl %eax, -24(%ebp) ! 2216: .p2align 4,,15 ! 2217: .L303: ! 2218: leal (%edi,%ecx), %eax ! 2219: cmpl $319, %eax ! 2220: jle .L308 ! 2221: .L299: ! 2222: incl %ecx ! 2223: incl %edx ! 2224: incl %esi ! 2225: incl %ebx ! 2226: cmpl $15, %ecx ! 2227: jle .L303 ! 2228: incl -16(%ebp) ! 2229: cmpl $15, -16(%ebp) ! 2230: jle .L304 ! 2231: .L293: ! 2232: addl $28, %esp ! 2233: popl %ebx ! 2234: popl %esi ! 2235: popl %edi ! 2236: popl %ebp ! 2237: ret ! 2238: .p2align 4,,7 ! 2239: .L308: ! 2240: movzbl (%edx), %eax ! 2241: movb %al, (%ebx) ! 2242: movzbl (%esi), %eax ! 2243: cmpb $-1, %al ! 2244: je .L299 ! 2245: movb %al, (%edx) ! 2246: jmp .L299 ! 2247: .size Call_BlitCursor, .-Call_BlitCursor ! 2248: .p2align 4,,15 ! 2249: .globl Call_RestoreUnderCursor ! 2250: .type Call_RestoreUnderCursor, @function ! 2251: Call_RestoreUnderCursor: ! 2252: pushl %ebp ! 2253: movl %esp, %ebp ! 2254: pushl %edi ! 2255: xorl %edi, %edi ! 2256: pushl %esi ! 2257: pushl %ebx ! 2258: subl $12, %esp ! 2259: movl $15, (%esp) ! 2260: call GetReg ! 2261: movl %eax, %ebx ! 2262: subl $2, %ebx ! 2263: leal 2(%ebx), %eax ! 2264: movl %eax, (%esp) ! 2265: call MemReadLong ! 2266: movl %eax, %esi ! 2267: leal 6(%ebx), %eax ! 2268: movl %eax, (%esp) ! 2269: call MemReadLong ! 2270: movl %eax, -16(%ebp) ! 2271: leal 10(%ebx), %eax ! 2272: movl %eax, (%esp) ! 2273: call MemReadLong ! 2274: movl -16(%ebp), %ecx ! 2275: movl STRam, %ebx ! 2276: leal (%ecx,%ecx,4), %edx ! 2277: addl %ebx, %eax ! 2278: sall $6, %edx ! 2279: addl %edx, %eax ! 2280: addl %esi, %eax ! 2281: movl $under_mouse, %ebx ! 2282: movl %eax, -20(%ebp) ! 2283: .L322: ! 2284: movl -16(%ebp), %edx ! 2285: leal (%edx,%edi), %eax ! 2286: cmpl $200, %eax ! 2287: jg .L311 ! 2288: movl -20(%ebp), %edx ! 2289: leal 320(%edx), %ecx ! 2290: movl %ecx, -20(%ebp) ! 2291: xorl %ecx, %ecx ! 2292: .p2align 4,,15 ! 2293: .L321: ! 2294: leal (%esi,%ecx), %eax ! 2295: cmpl $319, %eax ! 2296: jle .L326 ! 2297: .L317: ! 2298: incl %ecx ! 2299: incl %edx ! 2300: incl %ebx ! 2301: cmpl $15, %ecx ! 2302: jle .L321 ! 2303: incl %edi ! 2304: cmpl $15, %edi ! 2305: jle .L322 ! 2306: .L311: ! 2307: addl $12, %esp ! 2308: popl %ebx ! 2309: popl %esi ! 2310: popl %edi ! 2311: popl %ebp ! 2312: ret ! 2313: .p2align 4,,7 ! 2314: .L326: ! 2315: movzbl (%ebx), %eax ! 2316: cmpb $-1, %al ! 2317: je .L317 ! 2318: movb %al, (%edx) ! 2319: jmp .L317 ! 2320: .size Call_RestoreUnderCursor, .-Call_RestoreUnderCursor ! 2321: .p2align 4,,15 ! 2322: .globl Call_PutPix ! 2323: .type Call_PutPix, @function ! 2324: Call_PutPix: ! 2325: pushl %ebp ! 2326: movl %esp, %ebp ! 2327: subl $24, %esp ! 2328: movl $15, (%esp) ! 2329: movl %ebx, -8(%ebp) ! 2330: movl %esi, -4(%ebp) ! 2331: call GetReg ! 2332: movl %eax, (%esp) ! 2333: call MemReadWord ! 2334: movl $4, (%esp) ! 2335: movswl %ax,%ebx ! 2336: sarl $2, %ebx ! 2337: call GetReg ! 2338: movl $11, (%esp) ! 2339: movzwl %ax, %esi ! 2340: call GetReg ! 2341: testl $1048576, %eax ! 2342: je .L328 ! 2343: leal -1048576(%eax,%eax), %eax ! 2344: .L329: ! 2345: movl STRam, %edx ! 2346: addl %edx, %eax ! 2347: movb %bl, (%esi,%eax) ! 2348: movl -8(%ebp), %ebx ! 2349: movl -4(%ebp), %esi ! 2350: movl %ebp, %esp ! 2351: popl %ebp ! 2352: ret ! 2353: .p2align 4,,7 ! 2354: .L328: ! 2355: leal -983040(%eax,%eax), %eax ! 2356: jmp .L329 ! 2357: .size Call_PutPix, .-Call_PutPix ! 2358: .p2align 4,,15 ! 2359: .globl Call_FillLine ! 2360: .type Call_FillLine, @function ! 2361: Call_FillLine: ! 2362: pushl %ebp ! 2363: movl %esp, %ebp ! 2364: pushl %ebx ! 2365: subl $4, %esp ! 2366: movl $15, (%esp) ! 2367: call GetReg ! 2368: movl %eax, (%esp) ! 2369: call MemReadWord ! 2370: movl $4, (%esp) ! 2371: movswl %ax,%ebx ! 2372: sarl $2, %ebx ! 2373: call GetReg ! 2374: movl $5, (%esp) ! 2375: call GetReg ! 2376: movl $11, (%esp) ! 2377: call GetReg ! 2378: testl $1048576, %eax ! 2379: je .L331 ! 2380: leal -1048576(%eax,%eax), %eax ! 2381: .L332: ! 2382: movl STRam, %edx ! 2383: addl %edx, %eax ! 2384: movl $319, %edx ! 2385: .p2align 4,,15 ! 2386: .L336: ! 2387: movb %bl, (%eax) ! 2388: decl %edx ! 2389: incl %eax ! 2390: cmpl $-1, %edx ! 2391: jne .L336 ! 2392: popl %ecx ! 2393: popl %ebx ! 2394: popl %ebp ! 2395: ret ! 2396: .L331: ! 2397: leal -983040(%eax,%eax), %eax ! 2398: jmp .L332 ! 2399: .size Call_FillLine, .-Call_FillLine ! 2400: .p2align 4,,15 ! 2401: .globl Call_BackHLine ! 2402: .type Call_BackHLine, @function ! 2403: Call_BackHLine: ! 2404: pushl %ebp ! 2405: movl %esp, %ebp ! 2406: pushl %edi ! 2407: pushl %esi ! 2408: pushl %ebx ! 2409: subl $12, %esp ! 2410: movl $15, (%esp) ! 2411: call GetReg ! 2412: movl %eax, (%esp) ! 2413: call MemReadWord ! 2414: movl $11, (%esp) ! 2415: movswl %ax,%edi ! 2416: sarl $2, %edi ! 2417: call GetReg ! 2418: movl $7, (%esp) ! 2419: movl %eax, %esi ! 2420: call GetReg ! 2421: testl $1048576, %esi ! 2422: movzwl %ax, %ebx ! 2423: je .L340 ! 2424: leal -1048576(%esi,%esi), %esi ! 2425: .L341: ! 2426: movl STRam, %edx ! 2427: movl $15, %ecx ! 2428: addl %esi, %edx ! 2429: .p2align 4,,15 ! 2430: .L347: ! 2431: movl %ebx, %eax ! 2432: sarl %cl, %eax ! 2433: testb $1, %al ! 2434: je .L346 ! 2435: cmpb $0, (%edx) ! 2436: jne .L346 ! 2437: movl %edi, %eax ! 2438: movb %al, (%edx) ! 2439: .p2align 4,,15 ! 2440: .L346: ! 2441: incl %edx ! 2442: decl %ecx ! 2443: jns .L347 ! 2444: addl $12, %esp ! 2445: popl %ebx ! 2446: popl %esi ! 2447: popl %edi ! 2448: popl %ebp ! 2449: ret ! 2450: .L340: ! 2451: leal -983040(%esi,%esi), %esi ! 2452: jmp .L341 ! 2453: .size Call_BackHLine, .-Call_BackHLine ! 2454: .p2align 4,,15 ! 2455: .globl Call_OldHLine ! 2456: .type Call_OldHLine, @function ! 2457: Call_OldHLine: ! 2458: pushl %ebp ! 2459: movl %esp, %ebp ! 2460: pushl %edi ! 2461: pushl %esi ! 2462: pushl %ebx ! 2463: subl $12, %esp ! 2464: movl $15, (%esp) ! 2465: call GetReg ! 2466: movl %eax, (%esp) ! 2467: call MemReadWord ! 2468: movl $4, (%esp) ! 2469: movswl %ax,%esi ! 2470: sarl $2, %esi ! 2471: call GetReg ! 2472: movl $5, (%esp) ! 2473: movzwl %ax, %edi ! 2474: call GetReg ! 2475: movl $11, (%esp) ! 2476: movzwl %ax, %ebx ! 2477: call GetReg ! 2478: testl $1048576, %eax ! 2479: leal -1048576(%eax,%eax), %edx ! 2480: jne .L352 ! 2481: leal -983040(%eax,%eax), %edx ! 2482: .L352: ! 2483: movl %ebx, %eax ! 2484: movl STRam, %ecx ! 2485: shrl $31, %eax ! 2486: addl %eax, %ebx ! 2487: sarl %ebx ! 2488: addl %ecx, %edx ! 2489: decl %ebx ! 2490: leal (%edi,%edx), %eax ! 2491: cmpl $-1, %ebx ! 2492: je .L358 ! 2493: .p2align 4,,15 ! 2494: .L356: ! 2495: movl %esi, %edx ! 2496: decl %ebx ! 2497: movb %dl, (%eax) ! 2498: incl %eax ! 2499: cmpl $-1, %ebx ! 2500: jne .L356 ! 2501: .L358: ! 2502: addl $12, %esp ! 2503: popl %ebx ! 2504: popl %esi ! 2505: popl %edi ! 2506: popl %ebp ! 2507: ret ! 2508: .size Call_OldHLine, .-Call_OldHLine ! 2509: .p2align 4,,15 ! 2510: .globl Call_HLine ! 2511: .type Call_HLine, @function ! 2512: Call_HLine: ! 2513: pushl %ebp ! 2514: movl %esp, %ebp ! 2515: pushl %edi ! 2516: pushl %esi ! 2517: pushl %ebx ! 2518: subl $12, %esp ! 2519: movl $1, (%esp) ! 2520: call GetReg ! 2521: movl $4, (%esp) ! 2522: movzwl %ax,%esi ! 2523: sarl $2, %esi ! 2524: call GetReg ! 2525: movl $5, (%esp) ! 2526: movzwl %ax,%edi ! 2527: call GetReg ! 2528: movl $11, (%esp) ! 2529: movzwl %ax,%ebx ! 2530: decl %ebx ! 2531: call GetReg ! 2532: movl STRam, %edx ! 2533: addl %edx, %eax ! 2534: addl %edi, %eax ! 2535: cmpl $-1, %ebx ! 2536: je .L365 ! 2537: .p2align 4,,15 ! 2538: .L363: ! 2539: movl %esi, %edx ! 2540: decl %ebx ! 2541: movb %dl, (%eax) ! 2542: incl %eax ! 2543: cmpl $-1, %ebx ! 2544: jne .L363 ! 2545: .L365: ! 2546: addl $12, %esp ! 2547: popl %ebx ! 2548: popl %esi ! 2549: popl %edi ! 2550: popl %ebp ! 2551: ret ! 2552: .size Call_HLine, .-Call_HLine ! 2553: .p2align 4,,15 ! 2554: .globl Call_BlitBmp ! 2555: .type Call_BlitBmp, @function ! 2556: Call_BlitBmp: ! 2557: pushl %ebp ! 2558: movl %esp, %ebp ! 2559: pushl %edi ! 2560: pushl %esi ! 2561: pushl %ebx ! 2562: subl $60, %esp ! 2563: movl $15, (%esp) ! 2564: call GetReg ! 2565: movl %eax, %esi ! 2566: subl $2, %esi ! 2567: leal 2(%esi), %eax ! 2568: movl %eax, (%esp) ! 2569: call MemReadWord ! 2570: cwtl ! 2571: movl %eax, -16(%ebp) ! 2572: leal 4(%esi), %eax ! 2573: movl %eax, (%esp) ! 2574: call MemReadWord ! 2575: cwtl ! 2576: movl %eax, -20(%ebp) ! 2577: leal 6(%esi), %eax ! 2578: movl %eax, (%esp) ! 2579: call MemReadWord ! 2580: cwtl ! 2581: movl %eax, -24(%ebp) ! 2582: leal 8(%esi), %eax ! 2583: movl %eax, (%esp) ! 2584: call MemReadWord ! 2585: movswl %ax,%edi ! 2586: leal 10(%esi), %eax ! 2587: movl %eax, (%esp) ! 2588: call MemReadLong ! 2589: movl %eax, %ebx ! 2590: leal 14(%esi), %eax ! 2591: movl %eax, (%esp) ! 2592: call MemReadLong ! 2593: movl STRam, %edx ! 2594: movl -24(%ebp), %esi ! 2595: leal 4(%ebx,%edx), %ebx ! 2596: movl %ebx, -28(%ebp) ! 2597: addl %eax, %edx ! 2598: movl -24(%ebp), %ebx ! 2599: leal (%edi,%edi,4), %eax ! 2600: sall $6, %eax ! 2601: addl %eax, %edx ! 2602: addl %esi, %edx ! 2603: testl %ebx, %ebx ! 2604: movl %edx, -32(%ebp) ! 2605: js .L366 ! 2606: testl %edi, %edi ! 2607: js .L366 ! 2608: cmpl $200, -20(%ebp) ! 2609: jg .L366 ! 2610: cmpl $320, -16(%ebp) ! 2611: jg .L366 ! 2612: movl -20(%ebp), %eax ! 2613: movl -16(%ebp), %ecx ! 2614: imull %ecx, %eax ! 2615: addl %eax, %eax ! 2616: movl %eax, -56(%ebp) ! 2617: movl -20(%ebp), %eax ! 2618: decl %eax ! 2619: movl %eax, -40(%ebp) ! 2620: incl %eax ! 2621: je .L366 ! 2622: .L388: ! 2623: movl -32(%ebp), %esi ! 2624: movl -16(%ebp), %eax ! 2625: leal 320(%esi), %edx ! 2626: movl %edx, -32(%ebp) ! 2627: testl %eax, %eax ! 2628: movl %eax, -36(%ebp) ! 2629: je .L391 ! 2630: movl -56(%ebp), %edx ! 2631: leal (%edx,%edx,2), %edx ! 2632: movl %edx, -60(%ebp) ! 2633: .L387: ! 2634: movl -28(%ebp), %edx ! 2635: xorl %ebx, %ebx ! 2636: movzwl (%edx), %eax ! 2637: #APP ! 2638: xchgb %al,%ah ! 2639: #NO_APP ! 2640: cwtl ! 2641: movl %eax, -44(%ebp) ! 2642: movl -56(%ebp), %eax ! 2643: addl %eax, %edx ! 2644: movzwl (%edx), %eax ! 2645: #APP ! 2646: xchgb %al,%ah ! 2647: #NO_APP ! 2648: movl %edx, -28(%ebp) ! 2649: cwtl ! 2650: movl %eax, -48(%ebp) ! 2651: movl -56(%ebp), %eax ! 2652: addl %eax, %edx ! 2653: movzwl (%edx), %eax ! 2654: #APP ! 2655: xchgb %al,%ah ! 2656: #NO_APP ! 2657: movl %edx, -28(%ebp) ! 2658: cwtl ! 2659: movl %eax, -52(%ebp) ! 2660: movl -56(%ebp), %eax ! 2661: addl %eax, %edx ! 2662: movzwl (%edx), %eax ! 2663: movl %edx, -28(%ebp) ! 2664: #APP ! 2665: xchgb %al,%ah ! 2666: #NO_APP ! 2667: movswl %ax,%edi ! 2668: .p2align 4,,15 ! 2669: .L386: ! 2670: movl -44(%ebp), %eax ! 2671: movl $15, %ecx ! 2672: subl %ebx, %ecx ! 2673: incl %ebx ! 2674: sarl %cl, %eax ! 2675: movb %al, %dl ! 2676: movl -48(%ebp), %eax ! 2677: andb $1, %dl ! 2678: sarl %cl, %eax ! 2679: andl $1, %eax ! 2680: addl %eax, %eax ! 2681: orb %al, %dl ! 2682: movl -52(%ebp), %eax ! 2683: sarl %cl, %eax ! 2684: andl $1, %eax ! 2685: sall $2, %eax ! 2686: orb %al, %dl ! 2687: movl %edi, %eax ! 2688: sarl %cl, %eax ! 2689: andl $1, %eax ! 2690: sall $3, %eax ! 2691: orb %al, %dl ! 2692: movb %dl, (%esi) ! 2693: incl %esi ! 2694: cmpl $15, %ebx ! 2695: jle .L386 ! 2696: movl -60(%ebp), %edx ! 2697: subl %edx, -28(%ebp) ! 2698: addl $2, -28(%ebp) ! 2699: decl -36(%ebp) ! 2700: jne .L387 ! 2701: .L391: ! 2702: decl -40(%ebp) ! 2703: cmpl $-1, -40(%ebp) ! 2704: jne .L388 ! 2705: .L366: ! 2706: addl $60, %esp ! 2707: popl %ebx ! 2708: popl %esi ! 2709: popl %edi ! 2710: popl %ebp ! 2711: ret ! 2712: .size Call_BlitBmp, .-Call_BlitBmp ! 2713: .p2align 4,,15 ! 2714: .globl Call_DrawStrShadowed ! 2715: .type Call_DrawStrShadowed, @function ! 2716: Call_DrawStrShadowed: ! 2717: pushl %ebp ! 2718: movl %esp, %ebp ! 2719: subl $40, %esp ! 2720: movl $8, (%esp) ! 2721: movl %ebx, -12(%ebp) ! 2722: movl %esi, -8(%ebp) ! 2723: movl %edi, -4(%ebp) ! 2724: call GetReg ! 2725: movl $0, (%esp) ! 2726: movl STRam, %ecx ! 2727: movl %eax, %ebx ! 2728: addl %ecx, %ebx ! 2729: call GetReg ! 2730: movl $2, (%esp) ! 2731: movl %eax, %edi ! 2732: call GetReg ! 2733: movl $1, (%esp) ! 2734: movl %eax, %esi ! 2735: call GetReg ! 2736: movl %eax, (%esp) ! 2737: movl $1, %edx ! 2738: movl %edx, 16(%esp) ! 2739: movl %ebx, 12(%esp) ! 2740: movl %edi, 8(%esp) ! 2741: movl %esi, 4(%esp) ! 2742: call DrawStr ! 2743: movl %eax, 4(%esp) ! 2744: movl $1, (%esp) ! 2745: call SetReg ! 2746: movl -12(%ebp), %ebx ! 2747: movl -8(%ebp), %esi ! 2748: movl -4(%ebp), %edi ! 2749: movl %ebp, %esp ! 2750: popl %ebp ! 2751: ret ! 2752: .size Call_DrawStrShadowed, .-Call_DrawStrShadowed ! 2753: .p2align 4,,15 ! 2754: .globl Call_DrawStr ! 2755: .type Call_DrawStr, @function ! 2756: Call_DrawStr: ! 2757: pushl %ebp ! 2758: movl %esp, %ebp ! 2759: subl $40, %esp ! 2760: movl $8, (%esp) ! 2761: movl %ebx, -12(%ebp) ! 2762: movl %esi, -8(%ebp) ! 2763: movl %edi, -4(%ebp) ! 2764: call GetReg ! 2765: movl $0, (%esp) ! 2766: movl STRam, %ecx ! 2767: movl %eax, %ebx ! 2768: addl %ecx, %ebx ! 2769: call GetReg ! 2770: movl $2, (%esp) ! 2771: movl %eax, %edi ! 2772: call GetReg ! 2773: movl $1, (%esp) ! 2774: movl %eax, %esi ! 2775: call GetReg ! 2776: movl %eax, (%esp) ! 2777: xorl %edx, %edx ! 2778: movl %edx, 16(%esp) ! 2779: movl %ebx, 12(%esp) ! 2780: movl %edi, 8(%esp) ! 2781: movl %esi, 4(%esp) ! 2782: call DrawStr ! 2783: movl %eax, 4(%esp) ! 2784: movl $1, (%esp) ! 2785: call SetReg ! 2786: movl -12(%ebp), %ebx ! 2787: movl -8(%ebp), %esi ! 2788: movl -4(%ebp), %edi ! 2789: movl %ebp, %esp ! 2790: popl %ebp ! 2791: ret ! 2792: .size Call_DrawStr, .-Call_DrawStr ! 2793: .p2align 4,,15 ! 2794: .globl Call_SetMainPalette ! 2795: .type Call_SetMainPalette, @function ! 2796: Call_SetMainPalette: ! 2797: pushl %ebp ! 2798: movl %esp, %ebp ! 2799: pushl %esi ! 2800: xorl %esi, %esi ! 2801: pushl %ebx ! 2802: subl $16, %esp ! 2803: movl $15, (%esp) ! 2804: call GetReg ! 2805: movl %eax, (%esp) ! 2806: call MemReadLong ! 2807: movl %eax, %ebx ! 2808: .p2align 4,,15 ! 2809: .L401: ! 2810: movl %ebx, (%esp) ! 2811: addl $2, %ebx ! 2812: call MemReadWord ! 2813: movw %ax, MainPalette(%esi,%esi) ! 2814: incl %esi ! 2815: cmpl $15, %esi ! 2816: jle .L401 ! 2817: addl $16, %esp ! 2818: popl %ebx ! 2819: popl %esi ! 2820: popl %ebp ! 2821: ret ! 2822: .size Call_SetMainPalette, .-Call_SetMainPalette ! 2823: .p2align 4,,15 ! 2824: .globl Call_SetCtrlPalette ! 2825: .type Call_SetCtrlPalette, @function ! 2826: Call_SetCtrlPalette: ! 2827: pushl %ebp ! 2828: movl %esp, %ebp ! 2829: pushl %esi ! 2830: xorl %esi, %esi ! 2831: pushl %ebx ! 2832: subl $16, %esp ! 2833: movl $15, (%esp) ! 2834: call GetReg ! 2835: movl %eax, (%esp) ! 2836: call MemReadLong ! 2837: movl %eax, %ebx ! 2838: .p2align 4,,15 ! 2839: .L409: ! 2840: movl %ebx, (%esp) ! 2841: addl $2, %ebx ! 2842: call MemReadWord ! 2843: movw %ax, CtrlPalette(%esi,%esi) ! 2844: incl %esi ! 2845: cmpl $15, %esi ! 2846: jle .L409 ! 2847: addl $16, %esp ! 2848: popl %ebx ! 2849: popl %esi ! 2850: popl %ebp ! 2851: ret ! 2852: .size Call_SetCtrlPalette, .-Call_SetCtrlPalette ! 2853: .p2align 4,,15 ! 2854: .globl Call_InformScreens ! 2855: .type Call_InformScreens, @function ! 2856: Call_InformScreens: ! 2857: pushl %ebp ! 2858: movl %esp, %ebp ! 2859: subl $8, %esp ! 2860: movl $15, (%esp) ! 2861: movl %ebx, -4(%ebp) ! 2862: call GetReg ! 2863: movl %eax, %ebx ! 2864: subl $2, %ebx ! 2865: leal 2(%ebx), %eax ! 2866: movl %eax, (%esp) ! 2867: call MemReadLong ! 2868: movl %eax, physcreen2 ! 2869: leal 6(%ebx), %eax ! 2870: movl %eax, (%esp) ! 2871: call MemReadLong ! 2872: movl %eax, logscreen2 ! 2873: leal 10(%ebx), %eax ! 2874: movl %eax, (%esp) ! 2875: call MemReadLong ! 2876: movl %eax, physcreen ! 2877: leal 14(%ebx), %eax ! 2878: movl %eax, (%esp) ! 2879: call MemReadLong ! 2880: movl %eax, logscreen ! 2881: movl -4(%ebp), %ebx ! 2882: movl %ebp, %esp ! 2883: popl %ebp ! 2884: ret ! 2885: .size Call_InformScreens, .-Call_InformScreens ! 2886: .p2align 4,,15 ! 2887: .globl Call_SetScreenBase ! 2888: .type Call_SetScreenBase, @function ! 2889: Call_SetScreenBase: ! 2890: pushl %ebp ! 2891: movl %esp, %ebp ! 2892: pushl %ebx ! 2893: subl $4, %esp ! 2894: movl $15, (%esp) ! 2895: call GetReg ! 2896: movl %eax, (%esp) ! 2897: call MemReadLong ! 2898: movl %eax, VideoBase ! 2899: movl STRam, %edx ! 2900: movl len_working_ext_pal, %ecx ! 2901: addl %edx, %eax ! 2902: xorl %edx, %edx ! 2903: cmpl %ecx, %edx ! 2904: movl %eax, VideoRaster ! 2905: jge .L420 ! 2906: movl $MainPalette, %ebx ! 2907: .p2align 4,,15 ! 2908: .L418: ! 2909: movzwl working_ext_pal(%edx,%edx), %eax ! 2910: movw %ax, 32(%ebx,%edx,2) ! 2911: incl %edx ! 2912: cmpl %ecx, %edx ! 2913: jl .L418 ! 2914: .L420: ! 2915: leal 16(%ecx), %eax ! 2916: movl %eax, len_main_palette ! 2917: popl %ebx ! 2918: popl %ebx ! 2919: popl %ebp ! 2920: ret ! 2921: .size Call_SetScreenBase, .-Call_SetScreenBase ! 2922: .p2align 4,,15 ! 2923: .globl Call_MakeExtPalette ! 2924: .type Call_MakeExtPalette, @function ! 2925: Call_MakeExtPalette: ! 2926: pushl %ebp ! 2927: movl %esp, %ebp ! 2928: pushl %edi ! 2929: pushl %esi ! 2930: xorl %esi, %esi ! 2931: pushl %ebx ! 2932: subl $12, %esp ! 2933: movl $15, (%esp) ! 2934: call GetReg ! 2935: movl %eax, (%esp) ! 2936: call MemReadLong ! 2937: movl %eax, (%esp) ! 2938: movl %eax, %ebx ! 2939: addl $2, %ebx ! 2940: call MemReadWord ! 2941: movswl %ax,%edi ! 2942: sarl $2, %edi ! 2943: cmpl %edi, %esi ! 2944: movl %edi, len_working_ext_pal ! 2945: jl .L426 ! 2946: .L428: ! 2947: addl $12, %esp ! 2948: popl %ebx ! 2949: popl %esi ! 2950: popl %edi ! 2951: popl %ebp ! 2952: ret ! 2953: .p2align 4,,7 ! 2954: .L426: ! 2955: movl %ebx, (%esp) ! 2956: addl $2, %ebx ! 2957: call MemReadWord ! 2958: movw %ax, working_ext_pal(%esi,%esi) ! 2959: incl %esi ! 2960: movl %ebx, (%esp) ! 2961: call MemReadWord ! 2962: movl %ebx, (%esp) ! 2963: cwtl ! 2964: addl $64, %eax ! 2965: movl %eax, 4(%esp) ! 2966: addl $2, %ebx ! 2967: call MemWriteWord ! 2968: cmpl %edi, %esi ! 2969: jl .L426 ! 2970: jmp .L428 ! 2971: .size Call_MakeExtPalette, .-Call_MakeExtPalette ! 2972: .section .rodata.str1.1 ! 2973: .LC11: ! 2974: .string "D: " ! 2975: .LC12: ! 2976: .string "$%x " ! 2977: .LC13: ! 2978: .string "A: " ! 2979: .text ! 2980: .p2align 4,,15 ! 2981: .globl Call_DumpRegs ! 2982: .type Call_DumpRegs, @function ! 2983: Call_DumpRegs: ! 2984: pushl %ebp ! 2985: movl %esp, %ebp ! 2986: pushl %ebx ! 2987: subl $20, %esp ! 2988: xorl %ebx, %ebx ! 2989: movl $.LC11, (%esp) ! 2990: call printf ! 2991: .p2align 4,,15 ! 2992: .L434: ! 2993: movl %ebx, (%esp) ! 2994: incl %ebx ! 2995: call GetReg ! 2996: movl %eax, 4(%esp) ! 2997: movl $.LC12, (%esp) ! 2998: call printf ! 2999: cmpl $7, %ebx ! 3000: jle .L434 ! 3001: movl $10, (%esp) ! 3002: xorl %ebx, %ebx ! 3003: call putchar ! 3004: movl $.LC13, (%esp) ! 3005: call printf ! 3006: .p2align 4,,15 ! 3007: .L439: ! 3008: leal 8(%ebx), %eax ! 3009: incl %ebx ! 3010: movl %eax, (%esp) ! 3011: call GetReg ! 3012: movl %eax, 4(%esp) ! 3013: movl $.LC12, (%esp) ! 3014: call printf ! 3015: cmpl $7, %ebx ! 3016: jle .L439 ! 3017: movl $10, (%esp) ! 3018: call putchar ! 3019: addl $20, %esp ! 3020: popl %ebx ! 3021: popl %ebp ! 3022: ret ! 3023: .size Call_DumpRegs, .-Call_DumpRegs ! 3024: .p2align 4,,15 ! 3025: .globl Call_NotifyOfScrFlip ! 3026: .type Call_NotifyOfScrFlip, @function ! 3027: Call_NotifyOfScrFlip: ! 3028: pushl %ebp ! 3029: movl $1, %ecx ! 3030: movl %esp, %ebp ! 3031: popl %ebp ! 3032: movl %ecx, bScreenContentsChanged ! 3033: ret ! 3034: .size Call_NotifyOfScrFlip, .-Call_NotifyOfScrFlip ! 3035: .p2align 4,,15 ! 3036: .globl Call_NotifyMousePos ! 3037: .type Call_NotifyMousePos, @function ! 3038: Call_NotifyMousePos: ! 3039: pushl %ebp ! 3040: movl %esp, %ebp ! 3041: popl %ebp ! 3042: ret ! 3043: .size Call_NotifyMousePos, .-Call_NotifyMousePos ! 3044: .p2align 4,,15 ! 3045: .globl Call_DrawQuad ! 3046: .type Call_DrawQuad, @function ! 3047: Call_DrawQuad: ! 3048: pushl %ebp ! 3049: movl %esp, %ebp ! 3050: pushl %esi ! 3051: pushl %ebx ! 3052: subl $48, %esp ! 3053: movl $0, (%esp) ! 3054: call GetReg ! 3055: pushl %eax ! 3056: fildl (%esp) ! 3057: addl $4, %esp ! 3058: movl $1, (%esp) ! 3059: fstps -40(%ebp) ! 3060: call GetReg ! 3061: pushl %eax ! 3062: fildl (%esp) ! 3063: addl $4, %esp ! 3064: movl $2, (%esp) ! 3065: fstps -36(%ebp) ! 3066: call GetReg ! 3067: pushl %eax ! 3068: fildl (%esp) ! 3069: addl $4, %esp ! 3070: movl $3, (%esp) ! 3071: fstps -32(%ebp) ! 3072: call GetReg ! 3073: pushl %eax ! 3074: fildl (%esp) ! 3075: addl $4, %esp ! 3076: movl $4, (%esp) ! 3077: fstps -28(%ebp) ! 3078: call GetReg ! 3079: pushl %eax ! 3080: fildl (%esp) ! 3081: addl $4, %esp ! 3082: movl $5, (%esp) ! 3083: fstps -24(%ebp) ! 3084: call GetReg ! 3085: pushl %eax ! 3086: fildl (%esp) ! 3087: addl $4, %esp ! 3088: movl $6, (%esp) ! 3089: fstps -20(%ebp) ! 3090: call GetReg ! 3091: pushl %eax ! 3092: fildl (%esp) ! 3093: addl $4, %esp ! 3094: movl $7, (%esp) ! 3095: fstps -16(%ebp) ! 3096: call GetReg ! 3097: pushl %eax ! 3098: xorl %edx, %edx ! 3099: fld1 ! 3100: fildl (%esp) ! 3101: addl $4, %esp ! 3102: fstps -12(%ebp) ! 3103: .p2align 4,,15 ! 3104: .L462: ! 3105: xorl %ecx, %ecx ! 3106: movl $-1, %ebx ! 3107: xorl %esi, %esi ! 3108: .p2align 4,,15 ! 3109: .L460: ! 3110: cmpl %esi, %edx ! 3111: je .L453 ! 3112: flds -36(%ebp,%edx,8) ! 3113: flds -36(%ebp,%esi,8) ! 3114: fxch %st(1) ! 3115: fucom %st(1) ! 3116: fnstsw %ax ! 3117: sahf ! 3118: jbe .L456 ! 3119: incl %ecx ! 3120: .L456: ! 3121: fucompp ! 3122: fnstsw %ax ! 3123: sahf ! 3124: jne .L453 ! 3125: jp .L453 ! 3126: movl %esi, %ebx ! 3127: .p2align 4,,15 ! 3128: .L453: ! 3129: incl %esi ! 3130: cmpl $3, %esi ! 3131: jle .L460 ! 3132: cmpl $2, %ecx ! 3133: je .L467 ! 3134: .L449: ! 3135: incl %edx ! 3136: cmpl $3, %edx ! 3137: jle .L462 ! 3138: fstp %st(0) ! 3139: .L448: ! 3140: movl $8, (%esp) ! 3141: call GetReg ! 3142: testl %eax, %eax ! 3143: js .L468 ! 3144: .L463: ! 3145: sarl $2, %eax ! 3146: movl $4, %ebx ! 3147: movl %eax, 8(%esp) ! 3148: leal -40(%ebp), %eax ! 3149: movl %ebx, 4(%esp) ! 3150: movl %eax, (%esp) ! 3151: call DrawPoly ! 3152: addl $48, %esp ! 3153: popl %ebx ! 3154: popl %esi ! 3155: popl %ebp ! 3156: ret ! 3157: .L468: ! 3158: addl $3, %eax ! 3159: jmp .L463 ! 3160: .L467: ! 3161: cmpl $-1, %ebx ! 3162: je .L449 ! 3163: flds -36(%ebp,%ebx,8) ! 3164: fsub %st(1), %st ! 3165: fstps -36(%ebp,%ebx,8) ! 3166: flds -36(%ebp,%edx,8) ! 3167: fsubp %st, %st(1) ! 3168: fstps -36(%ebp,%edx,8) ! 3169: jmp .L448 ! 3170: .size Call_DrawQuad, .-Call_DrawQuad ! 3171: .p2align 4,,15 ! 3172: .globl Call_DrawTriangle ! 3173: .type Call_DrawTriangle, @function ! 3174: Call_DrawTriangle: ! 3175: pushl %ebp ! 3176: movl %esp, %ebp ! 3177: pushl %edi ! 3178: pushl %esi ! 3179: pushl %ebx ! 3180: subl $44, %esp ! 3181: movl $8, (%esp) ! 3182: call GetReg ! 3183: cwtl ! 3184: testl %eax, %eax ! 3185: js .L471 ! 3186: .L470: ! 3187: movl $5, (%esp) ! 3188: sarl $2, %eax ! 3189: movl %eax, -16(%ebp) ! 3190: call GetReg ! 3191: movl $4, (%esp) ! 3192: cwtl ! 3193: movl %eax, -20(%ebp) ! 3194: call GetReg ! 3195: movl $3, (%esp) ! 3196: cwtl ! 3197: movl %eax, -24(%ebp) ! 3198: call GetReg ! 3199: movl $2, (%esp) ! 3200: movswl %ax,%ebx ! 3201: call GetReg ! 3202: movl $1, (%esp) ! 3203: movswl %ax,%edi ! 3204: call GetReg ! 3205: movl $0, (%esp) ! 3206: movswl %ax,%esi ! 3207: call GetReg ! 3208: movl %ebx, 12(%esp) ! 3209: movl -16(%ebp), %edx ! 3210: cwtl ! 3211: movl %edi, 8(%esp) ! 3212: movl %esi, 4(%esp) ! 3213: movl %edx, 24(%esp) ! 3214: movl -20(%ebp), %edx ! 3215: movl %eax, (%esp) ! 3216: movl %edx, 20(%esp) ! 3217: movl -24(%ebp), %edx ! 3218: movl %edx, 16(%esp) ! 3219: call DrawTriangle ! 3220: addl $44, %esp ! 3221: popl %ebx ! 3222: popl %esi ! 3223: popl %edi ! 3224: popl %ebp ! 3225: ret ! 3226: .p2align 4,,7 ! 3227: .L471: ! 3228: addl $3, %eax ! 3229: jmp .L470 ! 3230: .size Call_DrawTriangle, .-Call_DrawTriangle ! 3231: .p2align 4,,15 ! 3232: .globl Call_HostUpdate ! 3233: .type Call_HostUpdate, @function ! 3234: Call_HostUpdate: ! 3235: pushl %ebp ! 3236: movl %esp, %ebp ! 3237: subl $8, %esp ! 3238: call Keymap_DebounceAllKeys ! 3239: call ShortCut_CheckKeys ! 3240: movl %ebp, %esp ! 3241: popl %ebp ! 3242: jmp Main_EventHandler ! 3243: .size Call_HostUpdate, .-Call_HostUpdate ! 3244: .p2align 4,,15 ! 3245: .type SetExceptionHandler, @function ! 3246: SetExceptionHandler: ! 3247: pushl %ebp ! 3248: movl %esp, %ebp ! 3249: subl $8, %esp ! 3250: movl $0, (%esp) ! 3251: movl %ebx, -4(%ebp) ! 3252: call GetReg ! 3253: movl $8, (%esp) ! 3254: movl %eax, %ebx ! 3255: andl $31, %ebx ! 3256: call GetReg ! 3257: movl %eax, exception_handlers(,%ebx,4) ! 3258: movl -4(%ebp), %ebx ! 3259: movl %ebp, %esp ! 3260: popl %ebp ! 3261: ret ! 3262: .size SetExceptionHandler, .-SetExceptionHandler ! 3263: .section .rodata.str1.32,"aMS",@progbits,1 ! 3264: .align 32 ! 3265: .LC16: ! 3266: .string " $%x $%x $%x $%x $%x $%x $%x $%x*$%x $%x $%x $%x $%x $%x $%x $%x:%d\n" ! 3267: .text ! 3268: .p2align 4,,15 ! 3269: .globl DumpMess ! 3270: .type DumpMess, @function ! 3271: DumpMess: ! 3272: pushl %ebp ! 3273: movl %esp, %ebp ! 3274: pushl %edi ! 3275: pushl %esi ! 3276: pushl %ebx ! 3277: subl $124, %esp ! 3278: cmpb $0, X ! 3279: jne .L485 ! 3280: .L475: ! 3281: cmpb $0, Z ! 3282: jne .L486 ! 3283: .L477: ! 3284: cmpb $0, N ! 3285: jne .L487 ! 3286: .L479: ! 3287: cmpb $0, V ! 3288: jne .L488 ! 3289: .L481: ! 3290: cmpb $0, C ! 3291: jne .L489 ! 3292: .L483: ! 3293: movl $15, (%esp) ! 3294: call GetReg ! 3295: movl %eax, -16(%ebp) ! 3296: movl $14, (%esp) ! 3297: call GetReg ! 3298: movl %eax, -20(%ebp) ! 3299: movl $13, (%esp) ! 3300: call GetReg ! 3301: movl %eax, -24(%ebp) ! 3302: movl $12, (%esp) ! 3303: call GetReg ! 3304: movl %eax, -28(%ebp) ! 3305: movl $11, (%esp) ! 3306: call GetReg ! 3307: movl %eax, -32(%ebp) ! 3308: movl $10, (%esp) ! 3309: call GetReg ! 3310: movl %eax, -36(%ebp) ! 3311: movl $9, (%esp) ! 3312: call GetReg ! 3313: movl %eax, -40(%ebp) ! 3314: movl $8, (%esp) ! 3315: call GetReg ! 3316: movl %eax, -44(%ebp) ! 3317: movl $7, (%esp) ! 3318: call GetReg ! 3319: movl %eax, -48(%ebp) ! 3320: movl $6, (%esp) ! 3321: call GetReg ! 3322: movl %eax, -52(%ebp) ! 3323: movl $5, (%esp) ! 3324: call GetReg ! 3325: movl %eax, -56(%ebp) ! 3326: movl $4, (%esp) ! 3327: call GetReg ! 3328: movl %eax, -60(%ebp) ! 3329: movl $3, (%esp) ! 3330: call GetReg ! 3331: movl $2, (%esp) ! 3332: movl %eax, %edi ! 3333: call GetReg ! 3334: movl $1, (%esp) ! 3335: movl %eax, %esi ! 3336: call GetReg ! 3337: movl $0, (%esp) ! 3338: movl %eax, %ebx ! 3339: call GetReg ! 3340: movl %eax, 4(%esp) ! 3341: movl line_no, %edx ! 3342: movl %edi, 16(%esp) ! 3343: movl %esi, 12(%esp) ! 3344: movl %edx, 68(%esp) ! 3345: movl -16(%ebp), %edx ! 3346: movl %ebx, 8(%esp) ! 3347: movl $.LC16, (%esp) ! 3348: movl %edx, 64(%esp) ! 3349: movl -20(%ebp), %edx ! 3350: movl %edx, 60(%esp) ! 3351: movl -24(%ebp), %edx ! 3352: movl %edx, 56(%esp) ! 3353: movl -28(%ebp), %edx ! 3354: movl %edx, 52(%esp) ! 3355: movl -32(%ebp), %edx ! 3356: movl %edx, 48(%esp) ! 3357: movl -36(%ebp), %edx ! 3358: movl %edx, 44(%esp) ! 3359: movl -40(%ebp), %edx ! 3360: movl %edx, 40(%esp) ! 3361: movl -44(%ebp), %edx ! 3362: movl %edx, 36(%esp) ! 3363: movl -48(%ebp), %edx ! 3364: movl %edx, 32(%esp) ! 3365: movl -52(%ebp), %edx ! 3366: movl %edx, 28(%esp) ! 3367: movl -56(%ebp), %edx ! 3368: movl %edx, 24(%esp) ! 3369: movl -60(%ebp), %edx ! 3370: movl %edx, 20(%esp) ! 3371: call printf ! 3372: addl $124, %esp ! 3373: popl %ebx ! 3374: popl %esi ! 3375: popl %edi ! 3376: popl %ebp ! 3377: ret ! 3378: .p2align 4,,7 ! 3379: .L489: ! 3380: movl $67, (%esp) ! 3381: movl stdout, %eax ! 3382: movl %eax, 4(%esp) ! 3383: call _IO_putc ! 3384: jmp .L483 ! 3385: .p2align 4,,7 ! 3386: .L488: ! 3387: movl $86, (%esp) ! 3388: movl stdout, %eax ! 3389: movl %eax, 4(%esp) ! 3390: call _IO_putc ! 3391: jmp .L481 ! 3392: .p2align 4,,7 ! 3393: .L487: ! 3394: movl $78, (%esp) ! 3395: movl stdout, %eax ! 3396: movl %eax, 4(%esp) ! 3397: call _IO_putc ! 3398: jmp .L479 ! 3399: .p2align 4,,7 ! 3400: .L486: ! 3401: movl $90, (%esp) ! 3402: movl stdout, %eax ! 3403: movl %eax, 4(%esp) ! 3404: call _IO_putc ! 3405: jmp .L477 ! 3406: .p2align 4,,7 ! 3407: .L485: ! 3408: movl $88, (%esp) ! 3409: movl stdout, %eax ! 3410: movl %eax, 4(%esp) ! 3411: call _IO_putc ! 3412: jmp .L475 ! 3413: .size DumpMess, .-DumpMess ! 3414: .local PrevRegs.0 ! 3415: .comm PrevRegs.0,64,32 ! 3416: .section .rodata.str1.1 ! 3417: .LC17: ! 3418: .string " %c%d:%x" ! 3419: .LC18: ! 3420: .string "(%d)\n" ! 3421: .text ! 3422: .p2align 4,,15 ! 3423: .globl DumpRegsChanged ! 3424: .type DumpRegsChanged, @function ! 3425: DumpRegsChanged: ! 3426: pushl %ebp ! 3427: movl %esp, %ebp ! 3428: pushl %esi ! 3429: xorl %esi, %esi ! 3430: pushl %ebx ! 3431: subl $16, %esp ! 3432: xorl %ebx, %ebx ! 3433: .p2align 4,,15 ! 3434: .L510: ! 3435: movl %ebx, (%esp) ! 3436: call GetReg ! 3437: cmpl %eax, PrevRegs.0(,%ebx,4) ! 3438: je .L493 ! 3439: testl %esi, %esi ! 3440: jne .L496 ! 3441: cmpb $0, Z ! 3442: jne .L514 ! 3443: .L497: ! 3444: cmpb $0, V ! 3445: jne .L515 ! 3446: .L499: ! 3447: cmpb $0, C ! 3448: jne .L516 ! 3449: .L501: ! 3450: cmpb $0, N ! 3451: jne .L517 ! 3452: .L503: ! 3453: cmpb $0, X ! 3454: jne .L518 ! 3455: .L505: ! 3456: movl $1, %esi ! 3457: .L496: ! 3458: movl %ebx, (%esp) ! 3459: call GetReg ! 3460: movl %eax, 12(%esp) ! 3461: cmpl $7, %ebx ! 3462: movl %ebx, %eax ! 3463: jle .L507 ! 3464: leal -8(%ebx), %eax ! 3465: .L507: ! 3466: movl %eax, 8(%esp) ! 3467: xorl %eax, %eax ! 3468: cmpl $7, %ebx ! 3469: setle %al ! 3470: movl $.LC17, (%esp) ! 3471: leal 97(%eax,%eax,2), %eax ! 3472: movl %eax, 4(%esp) ! 3473: call printf ! 3474: movl %ebx, (%esp) ! 3475: call GetReg ! 3476: movl %eax, PrevRegs.0(,%ebx,4) ! 3477: .L493: ! 3478: incl %ebx ! 3479: cmpl $15, %ebx ! 3480: jle .L510 ! 3481: testl %esi, %esi ! 3482: jne .L519 ! 3483: .L490: ! 3484: addl $16, %esp ! 3485: popl %ebx ! 3486: popl %esi ! 3487: popl %ebp ! 3488: ret ! 3489: .L519: ! 3490: movl $.LC18, (%esp) ! 3491: movl line_no, %eax ! 3492: movl %eax, 4(%esp) ! 3493: call printf ! 3494: jmp .L490 ! 3495: .p2align 4,,7 ! 3496: .L518: ! 3497: movl $88, (%esp) ! 3498: movl stdout, %eax ! 3499: movl %eax, 4(%esp) ! 3500: call _IO_putc ! 3501: jmp .L505 ! 3502: .p2align 4,,7 ! 3503: .L517: ! 3504: movl $78, (%esp) ! 3505: movl stdout, %eax ! 3506: movl %eax, 4(%esp) ! 3507: call _IO_putc ! 3508: jmp .L503 ! 3509: .p2align 4,,7 ! 3510: .L516: ! 3511: movl $67, (%esp) ! 3512: movl stdout, %eax ! 3513: movl %eax, 4(%esp) ! 3514: call _IO_putc ! 3515: jmp .L501 ! 3516: .p2align 4,,7 ! 3517: .L515: ! 3518: movl $86, (%esp) ! 3519: movl stdout, %eax ! 3520: movl %eax, 4(%esp) ! 3521: call _IO_putc ! 3522: jmp .L499 ! 3523: .p2align 4,,7 ! 3524: .L514: ! 3525: movl $90, (%esp) ! 3526: movl stdout, %eax ! 3527: movl %eax, 4(%esp) ! 3528: call _IO_putc ! 3529: jmp .L497 ! 3530: .size DumpRegsChanged, .-DumpRegsChanged ! 3531: .globl hcalls ! 3532: .data ! 3533: .align 32 ! 3534: .type hcalls, @object ! 3535: .size hcalls, 324 ! 3536: hcalls: ! 3537: .long SetExceptionHandler ! 3538: .long Call_Memset ! 3539: .long Call_MemsetBlue ! 3540: .long Call_BlitCursor ! 3541: .long Call_RestoreUnderCursor ! 3542: .long Call_BlitBmp ! 3543: .long Call_OldHLine ! 3544: .long Call_HostUpdate ! 3545: .long Call_Memcpy ! 3546: .long Call_PutPix ! 3547: .long Call_BackHLine ! 3548: .long Call_FillLine ! 3549: .long Call_SetMainPalette ! 3550: .long Call_SetCtrlPalette ! 3551: .long Call_SetScreenBase ! 3552: .long Screen_Draw ! 3553: .long Call_DumpRegs ! 3554: .long Call_MakeExtPalette ! 3555: .long Call_PlaySFX ! 3556: .long Call_GetMouseInput ! 3557: .long Call_GetKeyboardEvent ! 3558: .long 0 ! 3559: .long Call_HLine ! 3560: .long Call_NotifyOfScrFlip ! 3561: .long Call_NotifyMousePos ! 3562: .long Call_InformScreens ! 3563: .long GemDOS_SetDTA ! 3564: .long Call_DrawStrShadowed ! 3565: .long Call_DrawStr ! 3566: .long Call_DrawTriangle ! 3567: .long Call_DrawQuad ! 3568: .long 0 ! 3569: .long 0 ! 3570: .long 0 ! 3571: .long 0 ! 3572: .long 0 ! 3573: .long 0 ! 3574: .long 0 ! 3575: .long 0 ! 3576: .long 0 ! 3577: .long 0 ! 3578: .long 0 ! 3579: .long 0 ! 3580: .long 0 ! 3581: .long 0 ! 3582: .long 0 ! 3583: .long 0 ! 3584: .long 0 ! 3585: .long 0 ! 3586: .long 0 ! 3587: .long 0 ! 3588: .long 0 ! 3589: .long 0 ! 3590: .long 0 ! 3591: .long 0 ! 3592: .long 0 ! 3593: .long 0 ! 3594: .long 0 ! 3595: .long 0 ! 3596: .long 0 ! 3597: .long GemDOS_Create ! 3598: .long GemDOS_Open ! 3599: .long GemDOS_Close ! 3600: .long GemDOS_Read ! 3601: .long GemDOS_Write ! 3602: .long GemDOS_UnLink ! 3603: .long 0 ! 3604: .long 0 ! 3605: .long 0 ! 3606: .long 0 ! 3607: .long 0 ! 3608: .long 0 ! 3609: .long 0 ! 3610: .long 0 ! 3611: .long 0 ! 3612: .long 0 ! 3613: .long 0 ! 3614: .long 0 ! 3615: .long GemDOS_SFirst ! 3616: .long GemDOS_SNext ! 3617: .long 0 ! 3618: .comm emudrive,516,32 ! 3619: .comm FileHandles,8448,32 ! 3620: .comm InternalDTAs,69632,32 ! 3621: .comm DTAIndex,4,4 ! 3622: .comm pDTA,4,4 ! 3623: .comm under_mouse,256,32 ! 3624: .comm len_working_ext_pal,4,4 ! 3625: .comm working_ext_pal,480,32 ! 3626: .section .note.GNU-stack,"",@progbits ! 3627: .ident "GCC: (GNU) 3.3.5 (Debian 1:3.3.5-8)"
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.