Blame | Last modification | View Log | Download | RSS feed
Tue Jul 17 11:00:20 2018 Page 12500 A.D. 65816 Macro Assembler #26960 - Version 5.02g-----------------------------------------------------Input Filename : src\F9\sysf9.asmOutput Filename : obj\F9\sysf9.objListing Has Been Relocated2457 .LIST on24582459 ;---------------------------------------------------------------------------2460 ; direct-page working area for filesystem managment2461 ;---------------------------------------------------------------------------24622463 DPFSW: .SECTION page0, ref_only, common ;Direct Page f.s. working area24642465 000000 .ABSOLUTE ;; start always at $002466 000000 .ORG 0x0024672468 ;---------------------------------------------------------------------------2469 ; this section is copied from the PDT of selected drive2470 ; note: in the LBA address we assume that the MSB 4 bit are all '0'2471 000000 00 fdrvfg .DB ; <7>: H.D. (1) / F.D. (0)2472 ; <6>: 1440k (1) / 720k (0) if <7> = 12473 000001 00 ffsfg .DB ; <7>: FAT (1) / CBM (0)2474 000002 00 fclusiz .DB ; cluster size in # sector's (1,2,4,8,10,20,40)2475 000003 00 fclush .DB ; shift cluster (0,1,2,3,4,5,6)2476 000004 00 fatsiz .DB ; FAT table size in # sector's (0 = 256 sect.)2477 000005 00 frootsiz .DB ; root directory size in # sector's2478 000006 0000 frootent .DW ; root directory # entries2479 000008 ffat1lba .DS 3 ; LBA of FAT 1 starting2480 00000B ffat2lba .DS 3 ; LBA of FAT 2 starting2481 00000E frootlba .DS 3 ; LBA of root directory starting2482 000011 fclulba .DS 3 ; LBA of first cluster (cluster #2)2483 000014 0000 fclucnt .DW ; # of cluster's in FAT volume2484 000016 0000 fclufree .DW ; the count of free cluster's2485 000018 0000 fclunxt .DW ; the next free cluster #2486 00001A 0000 fcdclu .DW ; cluster # where starting c.d.2487 00001C 0000 fcdparent .DW ; cluster # parent of the c.d.2488 00001E 0000 fcdparx .DW ; index entry on parent cluster of c.d.2489 000020 00 fcdlen .DB ; lenght of current directory string2490 ; c.d. string start with '/', w/o trailing '/'2491 000021 00 fcdlst .DB ; index of last '/' in c.d. string24922493 ;---------------------------------------------------------------------------24942495 000022 FPathStr .DS 224962497 000024 fpaths .DS 78 ; path string (without starting 'X:')2498 000072 00 fdrive .DB ; the drive used in current operation2499 000073 00 fdefdrv .DB ; default drive (the one currently selected)2500 000074 00 fexpfg .DB ; <7>: fexpand file name (1) / directory (0)2501 ; <6>: local calls to fexpand (1)2502 000075 00 devfg .DB ; <7>: specified a device name in pathTue Jul 17 11:00:20 2018 Page 22503 000076 00 devidx .DB ; index of device2504 000077 00 haswild .DB ; <7>: path contain wildcards2505 000078 00 fdrvlst .DB ; last operative drive ($FF mean invalid)2506 000079 fpdtp LP ; long pointer to PDT of fdrive2507 00007C 00 storfg .DB2508 00007D 00 wildfg .DB2509 00007E 00 dotfg .DB2510 00007F 00 maxcnt .DB2511 000080 00 cnt .DB2512 000081 00 cnt1 .DB2513 000082 00 cntx .DB2514 000083 LPtr1 LP2515 000086 LPtr2 LP2516 000089 00 FDirIdx .DB2517 ;FPathStr .DS 22518 00008A CDLen .DS 62519 000090 00 lstidx .DB2520 000091 00 FEndDir .DB2521 000092 tmpfcb .DS 162522 0000A2 LPtr3 LP25232524 0000A5 .RELATIVE25252526 .ENDS25272528 ;---------------------------------------------------------------------------25292593 .LIST on25942595 F8FFB1 .INCLUDE inc\dirp00.inc2596 ;----------------------------------------------------------2597 ; DIRP00.ASM2598 ; PROGETTO: B16012599 ;2600 ; Variabili in Direct Page $002601 ;----------------------------------------------------------26022603 ; sezione COMMON -- questo permette di includere il file in piu' file26042605 .LIST on26062607 DIRP00: .SECTION page0, ref_only, common ;Direct-Page 0026082609 000000 .ABSOLUTE ;; inizia sempre da $002610 000000 .ORG 0x002611 0000002612 000000 0000 JiffyClk .DW ; contatore 10ms 32 bit2613 000002 0000 .DW2614 000004 SysTmr .DS SYSTMRCNT ; system timer 0 (10ms)2615 000008 SysTMF .DS SYSTMRCNT ; flag timer (80 -> start)2616 00000C 00 Bnk0Flag .DB ; <7>: flag test RAM banco 0 ok2617 ; <6>: flag warm reset2618 00000D 00 RTCFlag .DB26192620 00000E diskstat .DS 2 ; flag device on ata bus #0 & #12621 ; <7>: device ready2622 ; <6>: compact flash device (C.F.)Tue Jul 17 11:00:20 2018 Page 32623 ; <5>: device identification ok2624 ; <4>: MBR loaded2625 ; <3>: valid signature in MBR2626 ; <2>: first partition found&active2627 ; <1>:2628 ; <0>: valid partition flag26292630 ; <7>: device ready2631 ; <6>: USB device2632 ; <5>: compact flash device (C.F.)2633 ; <4>: device identification ok2634 ; <3>: MBR loaded2635 ; <2>: first partition found&active2636 ; <1>: always 12637 ; <0>: valid partition flag2638 00001026392640 00000E atadev .EQU diskstat26412642 000010 usbdev .DS 2 ; flag flash disk on usb bus #02643 ; <7>: device plugged and ready2644 ; <6>: always 12645 ; <5>: device identification ok2646 ; <4>: MBR loaded2647 ; <3>: valid signature in MBR2648 ; <2>: first partition found&active2649 ; <1>:2650 ; <0>: valid partition flag26512652 000012 diskmax .DS 16 ; disk max. sector's2653 000012 atasec .EQU diskmax2654 00001A usbsec .EQU diskmax+8265526562657 000022 atambr .DS 8 ; data for first partition found in mbr2658 ; first 3 bytes for start sector of partition2659 ; last byte for partition type2660 00002A usbmbr .DS 826612662 000032 ataprt .DS 8 ; total sec's of first partition2663 00003A usbprt .DS 8 ; total sec's of first partition266426652666 000042 00 usb0ch .DB ; usb0 (ch375/ch376) flag2667 ; <7>: module on2668 ; <6>: ch376 flag2669 ; <5:0>: chip version26702671 000043 00 usb0st .DB ; usb0 status2672 ; <7>: usb0 host mode ok2673 ; <6>: flash disk attached flag2674 ; <5>: usb device attached26752676 000044 00 fdcdrv .DB ; phisycal drive status (drive #0)2677 ; <7>: disk format established in bit 0&12678 ; <6>: double step seek done2679 ; <5>: trust format bit's (set after ok r/w)Tue Jul 17 11:00:20 2018 Page 42680 ; <4>: write protect bit (if disk in drive)2681 ; <3>: don't care2682 ; <2>: don't care2683 ; <1>: HD disk if set else DD disk2684 ; <0>: CBM format if set else IBM format26852686 000045 00 vdrive .DB ; virtual drive status (ram disk, drive #1)2687 ; <7>: disk format established in bit 0&12688 ; <6>: change disk simulation (after format)2689 ; <5>: don't care2690 ; <4>: write protect bit (under sw control)2691 ; <3>: don't care2692 ; <2>: don't care2693 ; <1>: HD disk if set else DD disk2694 ; <0>: CBM format if set else IBM format26952696 000046 00 fdcctl .DB ; fdc controller status2697 ; <7>: drive is attached2698 ; <6>: drive need recalibration (restore)2699 ; <5>: FDC controller ok2700 ; <4>: motor on2701 ; <3>: dma is active2702 ; <2>: dma chip ok (post routine)2703 ; <1>: clock rate (1=HD,0=DD)2704 ; <0>: disk ready27052706 000047 00 fdctrk .DB ; fd: current seek track2707 000048 00 fdcerr .DB ; fd: last error code2708 000049 00 ataerr .DB ; ata: last error code2709 00004A 00 ataxer .DB ; ata: last extended error code27102711 00004B 00 CtrlBrk .DB ; flag CTRL+BREAK (NMI)27122713 00004C 0000 MemTop .DW ; top memoria RAM2714 00004E 00 .DB ; banco top mem27152716 00004F 00 DflTxtIn .DB ; device di default text input2717 000050 00 DflTxtOut .DB ; device di default text output27182719 000051 COPPtr LP ; long pointer for COP decoding2720 000054 00 COPIdx .DB ; COP signature/index27212722 000055 00 BiosEnt .DB ; flag accesso a bios setup27232724 ; variabili utilizzate da ACIA2725 000056 spwrk .DS $3027262727 ; bios mem2728 000086 0000 nsize .DW ; dimensione blocco da allocare2729 ;bsize .DW ; dimensione vera blocco free2730 000088 0000 splitsz .DW ; dimensione blocco splittato2731 00008A 0000 bfree .DW ; puntatore blocco free2732 00008C 0000 hdrptr .DW ; puntatore header heap27332734 00008E 0000 pbrklv .DW ; current break level of current process2735 000090 0000 pbrkmin .DW ; minimum breal level of current process2736 000092 0000 pbrkmax .DW ; maximum breal level of current processTue Jul 17 11:00:20 2018 Page 52737 0000942738 ; bios temp. work area2739 000094 bwrktmp .DS $2827402741 0000BC 00 coptmp .DB ; temp. used while cop27422743 0000BD 00 tstser .DB ; check ser/usb test board post2744 ; <7>: VIA2 ok2745 ; <6>: PICRAM ok2746 ; <1>: UART 16C550 ok2747 ; <0>: R65C51 ok274827492750 ;crc16 .DW27512752 0000BD .RELATIVE27532754 .ENDS27552756 [01] .IFDEF _ACIA_INC_2757 .INCLUDE INC\SP.INC2758 [00] .ENDIF2759Lines Assembled : 2855 Errors : 0