Doxyfile - numericx-c - A program that converts a number (or text) from one numerical system into another different numerical system.

blob: aed4fe0bf78a185343101bca03ea0ef702e51b8e (plain) (tree)

acc2126 ^

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
generated by cgit-pink 1.4.1-2-gfad0 (git 2.36.2.497.gbbea4dcf42) at 2024-11-22 01:53:18 +0000

"SpecialChar">Entry/disp32 319 320 == data 0x7f00 321 idt_descriptor: 322 ff 03 # final index of idt = size of idt - 1 323 <a href='boot.subx.html#L327'>idt_start</a>/imm32/start 324 325 +-- 55 lines: # interrupt descriptor table ---------------------------------------------------------------------------------------------------------------------------------------------- 380 381 == code 382 383 timer-interrupt-handler: 384 # prologue 385 fa/disable-interrupts 386 60/push-all-registers 387 9c/push-flags 388 # acknowledge interrupt 389 b0/copy-to-al 0x20/imm8 390 e6/write-al-into-port 0x20/imm8 391 31/xor %eax 0/r32/eax 392 # update *Timer-current-color 393 ff 0/subop/increment *<a href='boot.subx.html#L402'>Timer-counter</a> 394 $timer-interrupt-handler:epilogue: 395 # epilogue 396 9d/pop-flags 397 61/pop-all-registers 398 fb/enable-interrupts 399 cf/return-from-interrupt 400 401 == data 402 Timer-counter: 403 0/imm32 404 405 == code 406 keyboard-interrupt-handler: 407 # prologue 408 fa/disable-interrupts 409 60/push-all-registers 410 9c/push-flags 411 # acknowledge interrupt 412 b0/copy-to-al 0x20/imm8 413 e6/write-al-into-port 0x20/imm8 414 31/xor %eax 0/r32/eax 415 # check output buffer of 8042 keyboard controller (<a href="https://web.archive.org/web/20040604041507/http://panda.cs.ndsu.nodak.edu/~achapwes/PICmicro/keyboard/atkeyboard.html)">https://web.archive.org/web/20040604041507/http://panda.cs.ndsu.nodak.edu/~achapwes/PICmicro/keyboard/atkeyboard.html)</a> 416 e4/read-port-into-al 0x64/imm8 417 a8/test-bits-in-al 0x01/imm8 # set zf if bit 0 (least significant) is not set 418 0f 84/jump-if-not-set $keyboard-interrupt-handler:end/disp32 419 # - if keyboard buffer is full, return 420 # var dest-addr/ecx: (addr byte) = (keyboard-buffer + *keyboard-buffer:write) 421 31/xor %ecx 1/r32/ecx 422 8a/byte-> *Keyboard-buffer:<a href='108write.subx.html#L11'>write</a> 1/r32/cl 423 81 0/subop/add %ecx Keyboard-buffer:data/imm32 424 # al = *dest-addr 425 8a/byte-> *ecx 0/r32/al 426 # if (al != 0) return 427 3c/compare-al-and 0/imm8 428 0f 85/jump-if-!= $keyboard-interrupt-handler:end/disp32 429 # - read keycode 430 e4/read-port-into-al 0x60/imm8 431 # - key released 432 # if (al == 0xaa) shift = false # left shift is being lifted 433 { 434 3c/compare-al-and 0xaa/imm8 435 75/jump-if-!= break/disp8 436 # *shift = 0 437 c7 0/subop/copy *Keyboard-shift-pressed? 0/imm32 438 } 439 # if (al == 0xb6) shift = false # right shift is being lifted 440 { 441 3c/compare-al-and 0xb6/imm8 442 75/jump-if-!= break/disp8 443 # *shift = 0 444 c7 0/subop/copy *Keyboard-shift-pressed? 0/imm32 445 } 446 # if (al == 0x9d) ctrl = false # ctrl is being lifted 447 { 448 3c/compare-al-and 0x9d/imm8 449 75/jump-if-!= break/disp8 450 # *ctrl = 0 451 c7 0/subop/copy *Keyboard-ctrl-pressed? 0/imm32 452 } 453 # if (al & 0x80) a key is being lifted; return 454 50/push-eax 455 24/and-al-with 0x80/imm8 456 3c/compare-al-and 0/imm8 457 58/pop-to-eax 458 75/jump-if-!= $keyboard-interrupt-handler:end/disp8 459 # - key pressed 460 # if (al == 0x2a) shift = true, return # left shift pressed 461 { 462 3c/compare-al-and 0x2a/imm8 463 75/jump-if-!= break/disp8 464 # *shift = 1 465 c7 0/subop/copy *Keyboard-shift-pressed? 1/imm32 466 # return 467 eb/jump $keyboard-interrupt-handler:end/disp8 468 } 469 # if (al == 0x36) shift = true, return # right shift pressed 470 { 471 3c/compare-al-and 0x36/imm8 472 75/jump-if-!= break/disp8 473 # *shift = 1 474 c7 0/subop/copy *Keyboard-shift-pressed? 1/imm32 475 # return 476 eb/jump $keyboard-interrupt-handler:end/disp8 477 } 478 # if (al == 0x1d) ctrl = true, return 479 { 480 3c/compare-al-and 0x1d/imm8 481 75/jump-if-!= break/disp8 482 # *ctrl = 1 483 c7 0/subop/copy *Keyboard-ctrl-pressed? 1/imm32 484 # return 485 eb/jump $keyboard-interrupt-handler:end/disp8 486 } 487 # - convert key to character 488 # if (shift) use keyboard shift map 489 { 490 81 7/subop/compare *Keyboard-shift-pressed? 0/imm32 491 74/jump-if-= break/disp8 492 # sigils don't currently support labels inside *(eax+label) 493 05/add-to-eax <a href='boot.subx.html#L580'>Keyboard-shift-map</a>/imm32 494 8a/byte-> *eax 0/r32/al 495 eb/jump $keyboard-interrupt-handler:select-map-done/disp8 496 } 497 # if (ctrl) al = *(ctrl map + al) 498 { 499 81 7/subop/compare *Keyboard-ctrl-pressed? 0/imm32 500 74/jump-if-= break/disp8 501 05/add-to-eax <a href='boot.subx.html#L612'>Keyboard-ctrl-map</a>/imm32 502 8a/byte-> *eax 0/r32/al 503 eb/jump $keyboard-interrupt-handler:select-map-done/disp8 504 } 505 # otherwise al = *(normal map + al) 506 05/add-to-eax <a href='boot.subx.html#L546'>Keyboard-normal-map</a>/imm32 507 8a/byte-> *eax 0/r32/al 508 $keyboard-interrupt-handler:select-map-done: 509 # - if there's no character mapping, return 510 { 511 3c/compare-al-and 0/imm8 512 74/jump-if-= break/disp8 513 # - store al in keyboard buffer 514 88/<- *ecx 0/r32/al 515 # increment index 516 fe/increment-byte *Keyboard-buffer:<a href='108write.subx.html#L11'>write</a> 517 # clear top nibble of index (keyboard buffer is circular) 518 80 4/subop/and-byte *Keyboard-buffer:<a href='108write.subx.html#L11'>write</a> 0x0f/imm8 519 } 520 $keyboard-interrupt-handler:end: 521 # epilogue 522 9d/pop-flags 523 61/pop-all-registers 524 fb/enable-interrupts 525 cf/return-from-interrupt 526 527 == data 528 Keyboard-shift-pressed?: # boolean 529 0/imm32 530 531 Keyboard-ctrl-pressed?: # boolean 532 0/imm32 533 534 # var keyboard circular buffer 535 Keyboard-buffer:<a href='108write.subx.html#L11'>write</a>: # nibble 536 0/imm32 537 Keyboard-buffer:read: # nibble 538 0/imm32 539 Keyboard-buffer:data: # byte[16] 540 00 00 00 00 541 00 00 00 00 542 00 00 00 00 543 00 00 00 00 544 545 +-- 95 lines: # Keyboard maps for translating keys to ASCII ----------------------------------------------------------------------------------------------------------------------------- 640 641 Video-mode-info: 642 +-- 53 lines: # video mode info --------------------------------------------------------------------------------------------------------------------------------------------------------- 695 696 ## Controlling IDE (ATA) hard disks 697 # Uses 28-bit PIO mode. 698 # Inspired by <a href="https://colorforth.github.io/ide.html">https://colorforth.github.io/ide.html</a> 699 # 700 # Resources: 701 # <a href="https://wiki.osdev.org/ATA_PIO_Mode">https://wiki.osdev.org/ATA_PIO_Mode</a> 702 # <a href="https://forum.osdev.org/viewtopic.php?f=1&p=167798">https://forum.osdev.org/viewtopic.php?f=1&p=167798</a> 703 # read-sector, according to <a href="https://www.scs.stanford.edu/11wi-cs140/pintos/specs/ata-3-std.pdf">https://www.scs.stanford.edu/11wi-cs140/pintos/specs/ata-3-std.pdf</a> 704 705 == data 706 707 # code disk 708 # All ports are 8-bit except data-port, which is 16-bit. 709 Primary-bus-primary-drive: 710 # command-port: int (write) 711 0x1f7/imm32 712 # status-port: int (read) 713 0x1f7/imm32 714 # alternative-status-port: int (read) 715 0x3f6/imm32 716 # error-port: int (read) 717 0x1f1/imm32 718 # drive-and-head-port: int 719 0x1f6/imm32 720 # sector-count-port: int 721 0x1f2/imm32 722 # lba-low-port: int 723 0x1f3/imm32 724 # lba-mid-port: int 725 0x1f4/imm32 726 # lba-high-port: int 727 0x1f5/imm32 728 # data-port: int 729 0x1f0/imm32 730 # drive-code: byte # only drive-specific field 731 0xe0/imm32 # LBA mode also enabled 732 733 # data disk 734 # All ports are 8-bit except data-port, which is 16-bit. 735 Primary-bus-secondary-drive: 736 # command-port: int (write) 737 0x1f7/imm32 738 # status-port: int (read) 739 0x1f7/imm32 740 # alternative-status-port: int (read) 741 0x3f6/imm32 742 # error-port: int (read) 743 0x1f1/imm32 744 # drive-and-head-port: int 745 0x1f6/imm32 746 # sector-count-port: int 747 0x1f2/imm32 748 # lba-low-port: int 749 0x1f3/imm32 750 # lba-mid-port: int 751 0x1f4/imm32 752 # lba-high-port: int 753 0x1f5/imm32 754 # data-port: int 755 0x1f0/imm32 756 # drive-code: byte # only drive-specific field 757 0xf0/imm32 # LBA mode also enabled 758 759 == code 760 761 # No more than 0x100 sectors 762 read-ata-disk: # disk: (addr disk), lba: int, n: int, out: (addr stream byte) 763 # . prologue 764 55/push-ebp 765 89/<- %ebp 4/r32/esp 766 # . save registers 767 50/push-eax 768 51/push-ecx 769 52/push-edx 770 # check precondition 771 81 7/subop/compare *(ebp+0x10) 0x100/imm32 772 { 773 7e/jump-if-<= break/disp8 774 (<a href='317abort.subx.html#L5'>abort</a> "read-ata-disk: no more than 0x100 sectors") 775 } 776 # check for drive 777 (<a href='boot.subx.html#L940'>drive-exists?</a> *(ebp+8)) # => eax 778 3d/compare-eax-and 0/imm32/false 779 0f 84/jump-if-= $read-ata-disk:end/disp32 780 # kick off read 781 (<a href='boot.subx.html#L1004'>ata-drive-select</a> *(ebp+8) *(ebp+0xc)) 782 (<a href='boot.subx.html#L1033'>clear-ata-error</a> *(ebp+8)) 783 (<a href='boot.subx.html#L1055'>ata-sector-count</a> *(ebp+8) *(ebp+0x10)) 784 (<a href='boot.subx.html#L1077'>ata-lba</a> *(ebp+8) *(ebp+0xc)) 785 (<a href='boot.subx.html#L1108'>ata-command</a> *(ebp+8) 0x20) # read sectors with retries 786 # for each sector 787 { 788 # poll for results 789 #? (draw-text-wrapping-right-then-down-from-cursor-over-full-screen 0 "waiting for sector.." 7 0) 790 #? (draw-text-wrapping-right-then-down-from-cursor-over-full-screen 0 "." 7 0) 791 (<a href='boot.subx.html#L1130'>while-ata-busy</a> *(ebp+8)) 792 (<a href='boot.subx.html#L1149'>until-ata-data-available</a> *(ebp+8)) 793 #? (draw-text-wrapping-right-then-down-from-cursor-over-full-screen 0 "reading\n" 7 0) 794 # var data-port/edx = disk->data-port 795 8b/-> *(ebp+8) 0/r32/eax 796 8b/-> *(eax+0x24) 2/r32/edx 797 # emit results 798 31/xor %eax 0/r32/eax 799 b9/copy-to-ecx 0x200/imm32 # 512 bytes per sector 800 { 801 81 7/subop/compare %ecx 0/imm32 802 74/jump-if-= break/disp8 803 66 ed/read-port-dx-into-ax 804 # write 2 bytes to stream one at a time 805 (<a href='115write-byte.subx.html#L12'>append-byte</a> *(ebp+0x14) %eax) 806 49/decrement-ecx 807 c1/shift 5/subop/right-padding-zeroes %eax 8/imm8 808 (<a href='115write-byte.subx.html#L12'>append-byte</a> *(ebp+0x14) %eax) 809 49/decrement-ecx 810 eb/jump loop/disp8 811 } 812 # next sector 813 ff 1/subop/decrement *(ebp+0x10) 814 #? (draw-int32-decimal-wrapping-right-then-down-from-cursor-over-full-screen 0 *(ebp+0x10) 0xc 0) 815 81 7/subop/compare *(ebp+0x10) 0/imm32 816 7e/jump-if-<= break/disp8 817 (<a href='boot.subx.html#L1173'>wait-400ns</a> *(ebp+8)) 818 #? (draw-text-wrapping-right-then-down-from-cursor-over-full-screen 0 "next sector\n" 7 0) 819 e9/jump loop/disp32 820 } 821 $read-ata-disk:end: 822 # . restore registers 823 5a/pop-to-edx 824 59/pop-to-ecx 825 58/pop-to-eax 826 # . epilogue 827 89/<- %esp 5/r32/ebp 828 5d/pop-to-ebp 829 c3/return 830 831 write-ata-disk: # disk: (addr disk), lba: int, n: int, in: (addr stream byte) 832 # . prologue 833 55/push-ebp 834 89/<- %ebp 4/r32/esp 835 # . save registers 836 50/push-eax 837 51/push-ecx 838 52/push-edx 839 53/push-ebx 840 # check for drive 841 (<a href='boot.subx.html#L940'>drive-exists?</a> *(ebp+8)) # => eax 842 3d/compare-eax-and 0/imm32/false 843 0f 84/jump-if-= $write-ata-disk:end/disp32 844 # kick off write 845 (<a href='boot.subx.html#L1004'>ata-drive-select</a> *(ebp+8) *(ebp+0xc)) 846 (<a href='boot.subx.html#L1033'>clear-ata-error</a> *(ebp+8)) 847 (<a href='boot.subx.html#L1055'>ata-sector-count</a> *(ebp+8) *(ebp+0x10)) 848 (<a href='boot.subx.html#L1077'>ata-lba</a> *(ebp+8) *(ebp+0xc)) 849 (<a href='boot.subx.html#L1108'>ata-command</a> *(ebp+8) 0x30) # write sectors with retries 850 # for each sector 851 #? (set-cursor-position 0 0 0) 852 #? (draw-text-wrapping-right-then-down-from-cursor-over-full-screen 0 "0" 7 0) 853 { 854 # wait 855 (<a href='boot.subx.html#L1130'>while-ata-busy</a> *(ebp+8)) 856 (<a href='boot.subx.html#L1168'>until-ata-ready-for-data</a> *(ebp+8)) 857 # var data-port/edx = disk->data-port 858 8b/-> *(ebp+8) 0/r32/eax 859 8b/-> *(eax+0x24) 2/r32/edx 860 # send data 861 b9/copy-to-ecx 0x200/imm32 # 512 bytes per sector 862 # . var first-byte/ebx: byte 863 # . when it's more than 0xff, we're at an even-numbered byte 864 bb/copy-to-ebx 0xffff/imm32 865 #? (draw-text-wrapping-right-then-down-from-cursor-over-full-screen 0 "D" 7 0) 866 $write-ata-disk:store-sector: 867 { 868 81 7/subop/compare %ecx 0/imm32 869 74/jump-if-= break/disp8 870 # this loop is slow, but the ATA spec also requires a small delay 871 (<a href='309stream.subx.html#L6'>stream-empty?</a> *(ebp+0x14)) # => eax 872 3d/compare-eax-and 0/imm32/false 873 75/jump-if-!= break/disp8 874 # read byte from stream 875 (<a href='112read-byte.subx.html#L13'>read-byte</a> *(ebp+0x14)) # => eax 876 # if we're at an odd-numbered byte, save it to first-byte 877 81 7/subop/compare %ebx 0xff/imm32 878 { 879 7e/jump-if-<= break/disp8 880 89/<- %ebx 0/r32/eax 881 eb/jump $write-ata-disk:store-sector/disp8 882 } 883 # otherwise OR it with first-byte and write it out 884 c1/shift 4/subop/left %eax 8/imm8 885 09/or %eax 3/r32/ebx 886 66 ef/write-ax-into-port-dx 887 49/decrement-ecx 888 49/decrement-ecx 889 # reset first-byte 890 bb/copy-to-ebx 0xffff/imm32 891 eb/jump loop/disp8 892 } 893 # write out final first-byte if necessary 894 #? (draw-text-wrapping-right-then-down-from-cursor-over-full-screen 0 "I" 7 0) 895 81 7/subop/compare %ebx 0xff/imm32 896 { 897 7f/jump-if-> break/disp8 898 89/<- %eax 3/r32/ebx 899 66 ef/write-ax-into-port-dx 900 49/decrement-ecx 901 49/decrement-ecx 902 } 903 # pad zeroes 904 #? (draw-text-wrapping-right-then-down-from-cursor-over-full-screen 0 "P" 7 0) 905 31/xor %eax 0/r32/eax 906 { 907 81 7/subop/compare %ecx 0/imm32 908 74/jump-if-= break/disp8 909 66 ef/write-ax-into-port-dx 910 49/decrement-ecx 911 49/decrement-ecx 912 eb/jump loop/disp8 913 } 914 # next sector 915 #? (draw-text-wrapping-right-then-down-from-cursor-over-full-screen 0 "N" 7 0) 916 ff 1/subop/decrement *(ebp+0x10) 917 81 7/subop/compare *(ebp+0x10) 0/imm32 918 7e/jump-if-<= break/disp8 919 #? (draw-text-wrapping-right-then-down-from-cursor-over-full-screen 0 "W" 7 0) 920 (<a href='boot.subx.html#L1173'>wait-400ns</a> *(ebp+8)) 921 #? (draw-text-wrapping-right-then-down-from-cursor-over-full-screen 0 "L" 7 0) 922 e9/jump loop/disp32 923 } 924 #? (draw-text-wrapping-right-then-down-from-cursor-over-full-screen 0 "F" 7 0) 925 (<a href='boot.subx.html#L1207'>flush-ata-cache</a> *(ebp+8)) 926 #? (draw-text-wrapping-right-then-down-from-cursor-over-full-screen 0 "Y" 7 0) 927 $write-ata-disk:end: 928 # . restore registers 929 5b/pop-to-ebx 930 5a/pop-to-edx 931 59/pop-to-ecx 932 58/pop-to-eax 933 # . epilogue 934 89/<- %esp 5/r32/ebp 935 5d/pop-to-ebp 936 c3/return 937 938 +--289 lines: # disk helpers ------------------------------------------------------------------------------------------------------------------------------------------------------------ 1227 1228 ## Controlling a PS/2 mouse 1229 # Uses no IRQs, just polling. 1230 # Thanks Dave Long: <a href="https://github.com/jtauber/cleese/blob/master/necco/kernel/bochs/py8042.py">https://github.com/jtauber/cleese/blob/master/necco/kernel/bochs/py8042.py</a> 1231 # 1232 # Resources: 1233 # <a href="https://wiki.osdev.org/Mouse_Input">https://wiki.osdev.org/Mouse_Input</a> 1234 1235 # results x/eax, y/ecx range from -256 to +255 1236 # See <a href="https://wiki.osdev.org/index.php?title=Mouse_Input&oldid=25663#Format_of_First_3_Packet_Bytes">https://wiki.osdev.org/index.php?title=Mouse_Input&oldid=25663#Format_of_First_3_Packet_Bytes</a> 1237 read-mouse-event: # -> _/eax: int, _/ecx: int 1238 # . prologue 1239 55/push-ebp 1240 89/<- %ebp 4/r32/esp 1241 # . save registers 1242 52/push-edx 1243 53/push-ebx 1244 # if no event, return 0, 0 1245 b8/copy-to-eax 0/imm32 1246 b9/copy-to-ecx 0/imm32 1247 (<a href='boot.subx.html#L1304'>any-mouse-event?</a>) # => eax 1248 3d/compare-eax-and 0/imm32/false 1249 74/jump-if-= $read-mouse-event:end/disp8 1250 # var f1/edx: byte = inb(0x60) 1251 31/xor %eax 0/r32/eax 1252 e4/read-port-into-al 0x60/imm8 1253 89/<- %edx 0/r32/eax 1254 (<a href='boot.subx.html#L1289'>wait-for-mouse-event</a>) 1255 # var dx/ebx: byte = inb(0x60) 1256 31/xor %eax 0/r32/eax 1257 e4/read-port-into-al 0x60/imm8 1258 89/<- %ebx 0/r32/eax 1259 (<a href='boot.subx.html#L1289'>wait-for-mouse-event</a>) 1260 # var dy/ecx: byte = inb(0x60) 1261 31/xor %eax 0/r32/eax 1262 e4/read-port-into-al 0x60/imm8 1263 89/<- %ecx 0/r32/eax 1264 # eax = dx 1265 89/<- %eax 3/r32/ebx 1266 # if (f1 & 0x10) dx = -dx 1267 { 1268 f6 0/subop/test-bits %dl 0x10/imm8 1269 74/jump-if-zero break/disp8 1270 0d/or-eax-with 0xffffff00/imm32 1271 } 1272 # if (f1 & 0x20) dy = -dy 1273 { 1274 f6 0/subop/test-bits %dl 0x20/imm8 1275 74/jump-if-zero break/disp8 1276 81 1/subop/or %ecx 0xffffff00/imm32 1277 } 1278 $read-mouse-event:end: 1279 # . restore registers 1280 5b/pop-to-ebx 1281 5a/pop-to-edx 1282 # . epilogue 1283 89/<- %esp 5/r32/ebp 1284 5d/pop-to-ebp 1285 c3/return 1286 1287 +--147 lines: # mouse helpers ----------------------------------------------------------------------------------------------------------------------------------------------------------- 1434 1435 # vim:ft=subx </pre> </body> </html>