g_old.asm

操作系统实验教程核心技术与编程实例书中地例子代码

G_VRAM_SEL   =  G_VRAM - GDT  
;G_BUF         GDT_DESC <1024,0,40H,92H,80H,0> ;92H=P ,DPL=0,TYPE=2 ,base=4M
G_BUF         GDT_DESC <0FFFFh,0,40H,92H,0FH,0> ;92H=P ,DPL=0,TYPE=2 ,base=4M
G_BUF_SEL     = G_BUF - GDT
V_G_PT0       GDT_DESC <0FFFFH,3000H,41H,92H,0,0C0H>
V_G_PT0_SEL    = V_G_PT0 - GDT
V_TOS_TSS     GDT_DESC <TOS_TSSLEN,1000H,40H,089H,0,0C0H> ;89H=386TSS DPL=0
V_TOS_TSS_SEL  = V_TOS_TSS - GDT                          
V_TOS_CODE    GDT_DESC <0FFFFH,3000H,42H,9AH,0,0C0H> ;9AH=exec/read ,DPL=0
             ;limit must be 0ffffh for returnning to real_mode
V_TOS_CODE_SEL = V_TOS_CODE - GDT                          ;31
V_TOS_STACK   GDT_DESC <01000H,3000H,43H,92H,0,0C0H>   ;96H=R/W ,DOWN 93
V_TOS_STACK_SEL = V_TOS_STACK - GDT
V_TOS_DATA    GDT_DESC <0FFFFH,4000H,43H,92H,0,0C0H> ;92H=P ,DPL=0,TYPE=2
V_TOS_DATA_SEL = V_TOS_DATA - GDT

ps_to_tos_sel  =$

GDTLEN      = $ - GDT
GDTSEGLEN   = $
GDTSEG      ENDS

DATA_TOS    SEGMENT PARA USE16              ;全局描述符表
IDT_M       SEGMAP_DESC <>
TOS_TSS_M   SEGMAP_DESC <>
GDT_M       SEGMAP_DESC <>
GPDT_M      SEGMAP_DESC <>
GPT0_M      SEGMAP_DESC <>
TOS_CODE_M  SEGMAP_DESC <>
TOS_STACK_M SEGMAP_DESC <>
DATA_TOS_M  SEGMAP_DESC <>
;USER_PSTSS_M SEGMAP_DESC <>
;USER_PSLDT_M SEGMAP_DESC <>
user_p_run  DB 'Sample of changing task : User_p process is running! $'
TEST_MSG    DB 'This is a protect_mode program! $'
TEST1_MSG   DB 'LDT of Dos program: $'
HEAD_DOS    DB 'Head of DOS program: $' 
TEST_CS     DB 'CS: $'
TEST_IP     DB 'IP: $'
COS_FLAG    DB 'C:\>$'
G_WORK      DB 255,18,'RUN C:\TC\G\U1.EXE',0,256 DUP(?),0 
G_WORK_U1   DB 255,14,'C:\TC\G\U1.EXE',0 
G_BUF_SUM   DD 0
IDTSIZE     DW 272                         ;中断表
IDTLOAD     DW 0,0
;********** for v86
V86_IDTSIZE DW 272                         ;中断表
V86_IDTLOAD DW 0,0
V86_ESP     DW 0        
V86_10H02   DB "V86_DEMO: 10H02H(setup cursor:4 row 0 col.) & 21H09H(display this string)",24H
V86_10H09   DB "V86_DEMO: 10H09H:display :",24H
;********** for v86
;********** for FILE
COS_HEAD    DB "Welcome to Use 3G-COS Command Mode   ",24H,0H
PRIBOOT     DB 512 DUP(20) ; main boot sector
DOSBOOTA    DB 1024 DUP(20) ; DOS boot sector  (A OR B:)
DOSBOOT     DB 1024 DUP(20) ; DOS boot sector  (C: AND D:...) 24*512=12288
WORKBOOT    DB 512 DUP(20),0 ; 
OPT         DW 1024 DUP(0)
FILE_INFO   DB 32 DUP(?),0
DAT         DB 112 DUP(?),0
FILE_NAME0  DB "D:\CHIS\TTT\LLL2.TXT",0,103 DUP(?),0,0  ;total is 128 bytes
CURRENT_DIR DB 81 DUP(?)
SYS_CURRENT_DIR   DB 81 DUP(?)
ROOTDIR_FS_NO DD ?
ROOTDIR_LS_NO DD ?
TTSECTOR_NO DD ?
HIDDEN_SECTOR DD ?
TTSECTOR    DB 512 DUP(20),0
TTSECTOR2   DB 512 DUP(20),0
TTSFT       DB 40 DUP(?),0
STR1        DB 1024 DUP(0)
STR2        DB 128 DUP(0)
STR3        DB 128 DUP(0)
TTDB        DB ?
TTDB1       DB ?
TTDB2       DB ?
TTDB3       DB ?
TTDBX       DB 10 DUP(?)
TTDW1       DW ?
TTDW2       DW ?
TTDW3       DW ?
TTDW4       DW ?
TTDW5       DW ?
TTDW6       DW ?
TTDW7       DW ?
TTDD1       DD ?
TTDD2       DD ?
TTDD3       DD ?
TTDD4       DD ?
CMD_WORDS   DB ",EXIT,DIR,TYPE,RUN,",0,0H
CMD_ERROR   DB "Bad Command or File Name ",0H,0H
T_DIR1      DB " Volume Serial Number is ",0H,0H
T_DIR2      DB " Directory of C:\ ",0H,0H
V_DISP_AX   DB 8 DUP(?)
;********** for FILE

;********** for process
CURRENT      DD 0
NEED_RESCHED DB 0       ;0:no  1:need
PCB_TSS      DW 0
PCB_NAME     DB 16 DUP(?)
PCB_PRIORITY DD 100 
CURRENT_PCB  DW 0
CURRENT_SS   DW 1
G_BUF_PTR     DD 400000H    ;  second=10000h (64k)
USER_SEGS_PTR DD 400000H    ;  second=3000h  (3*4096)
TT           DW 0
;********** for process

DATA_TOSLEN = $
DATA_TOS    ENDS

; GTIME MODIFIED
IDTSEG      SEGMENT PARA USE16              ;全局描述符表
IDT0        IDT_DESC 8 DUP (<>)                ;00--0D   
IDT08       IDT_DESC <COS_INT08,V_TOS_CODE_SEL,8E00H,0>
IDT09       IDT_DESC 5 DUP (<>)                ;00--0D
IDT0E       IDT_DESC <0,V_TOS_CODE_SEL,8E00H,0>
            IDT_DESC 18 DUP (<>)                ;0F,10--1F,20
                                                ;10,13,16,21 7 BYTES/ONE
IDT21       IDT_DESC <COS_DOSINT21,V_TOS_CODE_SEL,8E00H,0>
            IDT_DESC 94 DUP (<>)                ;22--7F
IDT80       IDT_DESC <COS_DOSINT10,V_TOS_CODE_SEL,8E00H,0>
            REPT 2                              ;81--82
               IDT_DESC <>
            ENDM
IDT83       IDT_DESC <COS_DOSINT13,V_TOS_CODE_SEL,8E00H,0>
            REPT 2                              ;84--85
               IDT_DESC <>
            ENDM
IDT86       IDT_DESC <COS_DOSINT16,V_TOS_CODE_SEL,8E00H,0>
            REPT 3                              ;87--8F
               IDT_DESC <>
            ENDM
IDT8A       IDT_DESC <COS_DOSINT1A,V_TOS_CODE_SEL,8E00H,0>  ;8A=1A REAL_TIME
            REPT 5                              ;8B--8F
               IDT_DESC <>
            ENDM
IDT90       IDT_DESC <COS_INT09,V_TOS_CODE_SEL,8E00H,0>
;IDT90       IDT_DESC <V86BEGIN,V86TSS_SEL,8500H,0>
            IDT_DESC 111 DUP (<>)                ;91--FF
IDTLEN = $
IDTSEG      ENDS

            include \tc\g\include\DATA_IDT.asm   ;
            include \tc\g\include\v86_seg.asm   ;no_move
include \tc\g\include\tos_seg.asm ; 定义TOS堆栈段TOS_STACKSEG与TOS任务状态段TOS_TSSSEG
                                  ; 清单见程序1-2

;*************************************************next DOS
STACK       SEGMENT STACK     ;实模式用堆栈 
            DB 200 DUP(0)
STACK       ENDS

DATA        SEGMENT PUBLIC 'DATA'      ;各任务公用的数据段
t_string    DB 80 dup(?)
FILE_NAME   DB 80,0,80 DUP(0)
INPUT_MSG   DB 0DH,0AH,'Input file_name:$'
FILE_HANDLE DW 0
FILE_OVER   DW 0
ERR_FILE_NAME    DB 0DH,0AH,'input run file_name error$'
ERR_FILE    DB 0DH,0AH,'Open file error real_mode$'
ERR_EXEFILE DB 'Error: It is not a DOS .exe protect_mode $'
OK_MSG      DB 0DH,0AH,'Have a nice day,Bye!   $'
SAVE_GDT    DW 4 DUP(0)
SAVE_IDT    DW 4 DUP(0)
SAVE_SS     DW 0
SAVE_SP     DW 0
C_BUF_SIZE  DW 0         ;848=350H
C_BUFFER    DB 16000 DUP(?)
tos_sp      dw ?
GDT_ADDR    DW 0
            DW 0,0   ;LIMIT=DW BASE=DW,DW
USER_Ps_LDT_ADDR    DW 0
            DW 0,0   ;LIMIT=DW BASE=DW,DW
USER_P1_LDT_ADDR    DW 0
            DW 0,0   ;LIMIT=DW BASE=DW,DW
DATALEN     = $
DATA        ENDS

CODE        SEGMENT PARA USE16 ;PUBLIC 'CODE'  ;实模式代码段

            ASSUME CS:CODE,DS:DATA,SS:STACK
MAIN        PROC FAR
START:      
            REAL_PAGE_INIT  ;in cos_def.asm 
            CALL V86_IDT_INIT  ;in V86_REAL.ASM
            ;在\tc\g\include\g_def.asm中，见程序1-1
TURN_TO_PROTECT_MODE:
            CALL GDT_INIT       ;初始化GDT表，在\tc\g\include\g_real.asm中，见程序1-2

            MOV AX,V86LDTSEG
            CALL USER_Px_LDT_INIT ;in px_ldt.asm
            cli
            TURN_TO_PROTECT_PAGE  
            ;*****进入TOS任务，在\TC\G\INCLUDE\G_DEF.ASM中，见程序1-1
REAL_MODE:  
            TO_DOS      ;回到DOS 在\TC\G\INCLUDE\G_DEF.ASM中，见程序1-1
MAIN        ENDP
            include \tc\g\include\g_real.asm
            include \tc\g\include\V86_REAL.ASM      ;见程序1-1
            include \tc\g\include\a20.asm      ;见程序1-1
            include \tc\g\include\PX_LDT.ASM      ;见程序1-1
tsrline     label byte
CODE        ENDS
END START

;test
;push ax
;push fs
;push di
;push dx
;MOV aX,V_GDT_ASDATA_SEL
;MOV aX,V_G_PT0_SEL
;mov fs,ax
;mov di,20352
;mov dx,16
;call disp_mem
;pop dx
;pop di
;pop fs
;pop ax
;Jmp  PAGE_END ;ok4

;test
;PUSH ES
;PUSH AX
;MOV AX,G_VRAM_SEL
;MOV ES,AX
;mov ax,DATA_TOSLEN
;call disp_ax
;mov ax,TOS_CODELEN
;call disp_ax
;mov ax,TOS_stackLEN
;call disp_ax
;POP AX
;POP ES
;Jmp  PAGE_END  ;ok5
; test