file_id.diz0100664000076500007650000000015306674025274012425 0ustar prool2prool2OS Proolix by Serge Pustovoitoff 2:461/35@Fidonet http://prool.kharkov.org/proolix/ files.bbs0100664000076500007650000000042007007553102012074 0ustar prool2prool2FILE_ID.DIZ description INSTALLD.BAT install Proolix to HDD (D:) INSTALLF.BAT install Proolix to FDD (A:) INSTALLH.BAT install Proolix to HDD (C:) MKBOOT.BAT make proolix boot sector README.1ST read me SUPPORT.TXT proolix support VERSION Proolix SlimeWare version installd.bat0100664000076500007650000000335706474646144012640 0ustar prool2prool2@echo off cls echo 旼컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴커 echo � 댂飡젷ワ與� 럱 Proolix 췅 �젳ㄵ� d: FAT-12 � echo � � echo � Installator (install.bat) version D-0.0.3.1 24-Feb-98 � echo � � echo � 뒥�젷��, � ぎ獸昔� �졹캙ぎ쥯� �젵� slime?.arj � echo � ㄾウ�� 〓筍 收ゃ蟯�. � echo � � echo � 볡殊收, ▲�-醒も�� ㄸ稅� � Master Boot Record, � �젶┘ ㏇� � echo � Þ兒席졿⑨, 貰ㄵ逝좈좑碎 췅 ㄸ稅�, Мｃ� 〓筍 쭬��暹��� ! � echo � 뜝━ⓥ� CTRL BREAK, αエ 귣 ��誓ㅳ쵟エ. � echo � � �昔殊˛�� 笹晨젰 췅━ⓥ� ANY KEY � echo 읕컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴켸 pause>nul cls src\boot\bp -d@ boot.mbr src\boot\bp -d3 -i -a0 boot.mbr src\boot\bp -d4 -i src\boot\booth12.bin copy src\bm\boot d:\boot > nul echo Kernel to disk d: copy src\kernel\kernel d:\kernel > nul echo on REM REM Doc to disk d: copy *.doc d:\ REM REM Files description to disk d: copy files.bbs d:\ REM REM Utilities to disk d: mkdir d:\bin copy src\command\kernel.ovl d:\ > nul REM a: REM cd \bin REM c: copy src\command\*. d:\bin REM Fonts to disk d: copy src\command\*.fnt d:\bin REM REM Man mkdir d:\usr mkdir d:\usr\man copy man\*.* d:\usr\man REM REM Installation done. REM Reboot, please, from diskette a: REM Press, please, Ctrl Alt Del REM goto End :Error echo ! echo ! Installation error echo ! :End installf.bat0100664000076500007650000000337506501351132012617 0ustar prool2prool2@echo off cls echo 旼컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴커 echo � 댂飡젷ワ與� 럱 Proolix 췅 ㄸ稅β� a: � echo � � echo � Installator (install.bat) version F-0.0.1.4 10-Mar-98 � echo � � echo � 뒥�젷��, � ぎ獸昔� �졹캙ぎ쥯� �젵� slime?.arj � echo � ㄾウ�� 〓筍 收ゃ蟯�. � echo � � echo � 볡殊收, ▲�-醒も�� ㄸ稅β� � ㏇� � echo � Þ兒席졿⑨, 貰ㄵ逝좈좑碎 췅 ㄸ稅β�, Мｃ� 〓筍 쭬��暹��� !!! � echo � 뜝━ⓥ� CTRL BREAK, αエ 귣 ��誓ㅳ쵟エ 聲筌猶졻藺� � Proolix'��. � echo � � �昔殊˛�� 笹晨젰 췅━ⓥ� ANY KEY � echo 읕컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴켸 pause>nul cls src\boot\bp -d0 -i -y src\boot\boots.bin if errorlevel 1 goto Error echo Boot manager to diskette a: copy src\bm\bootf a:\boot > nul echo Kernel to diskette a: copy src\kernel\kernel a:\kernel > nul echo on REM REM Files description to diskette a: copy files.bbs a:\ REM REM Utilities to diskette a: mkdir a:\bin copy src\command\kernel.ovl a:\ > nul REM a: REM cd \bin REM c: copy src\command\*. a:\bin REM Fonts to diskette a: copy src\command\*.fnt a:\bin del a:\bin\makefile > nul REM Man to diskette mkdir a:\usr mkdir a:\usr\man copy man\*.* a:\usr\man REM REM Installation done. REM Reboot, please, from diskette a: REM Press, please, Ctrl Alt Del REM goto End :Error echo ! echo ! Installation error echo ! :End installh.bat0100664000076500007650000000350106604515346012625 0ustar prool2prool2@echo off cls echo 旼컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴커 echo � 댂飡젷ワ與� 럱 Proolix 췅 a: � c: (boot manager 췅 a:, 甸昔 췅 c: )� echo � � echo � Installator (install.bat) version H-0.0.2.1 30-Sep-98 � echo � � echo � 뒥�젷��, � ぎ獸昔� �졹캙ぎ쥯� �젵� slime?.arj � echo � ㄾウ�� 〓筍 收ゃ蟯�. � echo � � 信循�⒰手� a: ㄾウ췅 〓筍 葉飡좑 ㄸ稅β�! � echo � � echo � 볡殊收, ▲�-醒も�贍 ㄸ稅� � ㄸ稅β�, � �젶┘ ㏇� � echo � Þ兒席졿⑨, 貰ㄵ逝좈좑碎 췅 ㄸ稅� � ㄸ稅β�, Мｃ� 〓筍 쭬��暹��� !� echo � 뜝━ⓥ� CTRL BREAK, αエ 귣 ��誓ㅳ쵟エ. � echo � � �昔殊˛�� 笹晨젰 췅━ⓥ� ANY KEY � echo 읕컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴켸 pause>nul cls src\boot\bp -d0 -i -y src\boot\boots.bin if errorlevel 1 goto Error echo Boot manager to diskette a: copy src\bm\booth a:\boot > nul echo Kernel to disk c: copy src\kernel\kernel c:\kernel > nul echo on REM REM Doc to disk c: copy *.doc c:\ REM REM Files description to disk c: copy files.bbs c:\ REM REM Utilities to disk c: mkdir c:\bin copy src\command\kernel.ovl c:\ > nul REM a: REM cd \bin REM c: copy src\command\*. c:\bin REM Fonts to disk c: copy src\command\*.fnt c:\bin REM REM Man mkdir c:\usr mkdir c:\usr\man copy man\*.* c:\usr\man REM REM Installation done. REM Reboot, please, from diskette a: REM Press, please, Ctrl Alt Del REM goto End :Error echo ! echo ! Installation error echo ! :End man/0040775000076500007650000000000007725636715011107 5ustar prool2prool2man/help.doc0100664000076500007650000000276506674024326012524 0ustar prool2prool2Proolix commands (internal & external): ScrollLock - rus/lat shutdown - shutdown & reboot ver - version clear, cls - clear screen l - list files (internal command). Use l -? for help ls - list files (external). Use ls -? for help mount [digit|dos_drive_letter] - mount new device (new disk) E [arg...] - show arguments (internal) e - show arguments (external) mem - memory map memd - memory dump (use /? subcommand for memd help) fcb - show FCB list alloc - allocate memory block garbage - garbage collection (memory blocks optimize - squeeze) free - free memory block open - open file Cat - copy file (files) to stdout (CATenate files) (internal) cat - (external) vec - show interrupt vectors Xonix - running one xonix on screen (save screen surf) (internal) xonix - (external) int0 - simulate interrupt 0 de - disk editor echo - echo arguments env, set - show environment date - show current date & time timer [-y] [-n] - set time on/off setmore [-y] [-n] - set more on/off buf - show cache buffers' status rm [files...] - delete (ReMove) file (files) mv file1 file2 - rename files: file1 to file2 (MoVe file link) cp file1 file2 - CoPy files: file1 to file2 (external) Cp - (internal cp) cd dir - change directory md dir - make directory pwd - print work directory touch - touch file (external) more file - show file start - start scheduler (with bugs!) Files: files.bbs - all files description (ASCII text) memmap.doc - memory map man/help.src0100664000076500007650000000241306337417724012540 0ustar prool2prool2; 꽙쭬遜�Аエ昔쥯��硫 �젵� bin/help �� 캙ぅ�� Proolix ; ぎК���졷Ł (c) G.Shepelev ; #include ; void main(void) a0100: jmp a0104 ; �▼�� 歲－졻侁� a0102 DB 0DEh,0ADh ; 歲－졻侁� Proolix'� a0104: push cs ; �Ø�с �� �拾��� ℓα� a0105: pop ax ; 貰魚젺���� ㎛좂��⑨ 醒，���� a0106: mov [a0110],ax ; � 캙э殊 �昔｀젹щ a0109: call a0112 ; �留�� 收쳽 �昔｀젹щ help a010C: jmp dword ptr [000C] ; �音�� �� �昔｀젹щ - Д╇ⅲД�狩硫 ; ��誓若� 췅 ´も�� 쭬´殲��⑨ �� PSP ; ( � きIJぅ �.뜮設�췅 젮誓� ㅰ膝��! ) a0110 DW ? ; �∥졹筍 魚젺��⑨ (cs) ; { ; 收ギ �昔｀젹щ... ; printf("Usage `more /usr/man/help.doc' for help\n"); a0112: push ds ; 1-� 캙�젹β� 醒，��� 收め獸¡� 飡昔え a0113: mov ax,a0124 ; 細ι���� 收め獸¡� 飡昔え a0116: push ax ; 2-� 캙�젹β� a0117: call a011E ; �留�� printf a011A: add sp,4 ; �㎖ゥ曄��� 캙�젹β昔� �� 飡ⅹ� ; } a011D: ret ; ¡㎖�졻 � main ; =printf a011E: mov ax,10h ; ��Д� 押�ゆĿ printf �誓贍쥯�⑨ INT_NO a0121: int 84h ; int INT_NO a0123: ret ; 收め�, �琉젪젰щ� 췅 ㄸ召ゥ� a0124 DB "Usage `more /usr/man/help.doc' for help",0Ah,0 ; � 첓曄飡´ 歲Б�쳽 ��誓¡쩆 飡昔え ⓤ��レ㎯β碎 ぎ� 0Ah, � �� ��笹ⅳ�쥯- ; 收レ��飡� 0Dh 0Ah 첓� � MS-DOS! man/key.src0100664000076500007650000000613406337425140012373 0ustar prool2prool2; 꽙쭬遜�Аエ昔쥯��硫 �젵� bin/key �� 캙ぅ�� Proolix ; ぎК���졷Ł (c) G.Shepelev ; #include ; #include ; #include ; void main() a0100: jmp a0104 ; �▼�� 歲－졻侁� a0102 DB 0DEh,0ADh ; 歲－졻侁� Proolix'� a0104: push cs ; �Ø�с �� �拾��� ℓα� a0105: pop ax ; 貰魚젺���� ㎛좂��⑨ 醒，���� a0106: mov [a0110],ax ; � 캙э殊 �昔｀젹щ a0109: call a0112 ; �留�� 收쳽 �昔｀젹щ key a010C: jmp dword ptr [000C] ; �音�� �� �昔｀젹щ - Д╇ⅲД�狩硫 ; ��誓若� 췅 ´も�� 쭬´殲��⑨ �� PSP ; ( � きIJぅ �.뜮設�췅 젮誓� ㅰ膝��! ) a0110 DW ? ; �∥졹筍 魚젺��⑨ (cs) ; { ; 收ギ �昔｀젹щ... ; int i; ; ��誓Д�췅� 璵ギ． 殊캙, ▲ㄵ� ⓤ��レ㎜쥯筍碎 si a0112: push si ; 貰魚젺畑� si ; printf("View Key Codes\n\nPress Ctrl-D for exit\n\n"); a0113: push ds ; 1-� 캙�젹β� 醒，��� 收め獸¡� 飡昔え a0114: mov ax,a0166 ; 細ι���� 收め獸¡� 飡昔え a0117: push ax ; 2-� 캙�젹β� a0118: call a0160 ; �留�� printf a011B: add sp,4 ; �㎖ゥ曄��� 캙�젹β昔� �� 飡ⅹ� ; while(1) ; ´嶺硫 與か ;) ; { ; i=getch(); a011E: call a015A ; �留�� getch a0121: mov si,ax ; ㎛좂���� i ; printf("%i\n",i); 飡�젺���履�� �‘㎛좂��⑨... a0123: push si ; 葉笹���硫 캙�젹β� a0124: push ds ; 1-� 캙�젹β� 醒，��� 收め獸¡� 飡昔え a0125: mov ax,a018E ; 細ι���� 收め獸¡� 飡昔え a0128: push ax ; 2-� 캙�젹β� a0129: call a0160 ; �留�� printf("%i\n",i) a012C: add sp,6 ; �㎖ゥ曄��� 캙�젹β昔� �� 飡ⅹ� ; switch(i) ; { ; case 4: printf("\n"); exit(0); a012F: mov ax,si ; 葉笹���硫 캙�젹β� a0131: cmp ax,4 ; case 4 a0134: jz a0138 ; 貰¿젷� - ��誓¡� 飡昔え � �音�� a0136: jmp a011E ; ¡㎖�졻 췅 while a0138: push ds ; 1-� 캙�젹β� 醒，��� 收め獸¡� 飡昔え a0139: mov ax,a018C ; 細ι���� 收め獸¡� 飡昔え a013C: push ax ; 2-� 캙�젹β� a013D: call a0160 ; �留�� printf("\n") a0140: add sp,4 ; �㎖ゥ曄��� 캙�젹β昔� �� 飡ⅹ� a0143: xor ax,ax ; 0 a0145: push ax ; 캙�젹β� 췅 飡ⅹ a0146: call a014F ; exit(int) a0149: inc sp ; �㎖ゥ曄��� 캙�젹β昔� �� 飡ⅹ� :) a014A: inc sp a014B: jmp a011E ; ¡㎖�졻 췅 while ; /* case 0: i=getch(); printf("%i\n",i); */ ; } 貰■手���� 灑쩆 щ �Ø�＄� �� ��캙ㆁ�... ; } ; } a014D: pop si ; ¡遜�젺젪エ쥯�� si a014E: ret ; ¡㎖�졻 � main - ⅲ� �� ▲ㄵ�... ; =exit a014F: add sp,2 ; 젮誓� ¡㎖�졻� 췅� �� ��췅ㄾ〃恂�... a0152: mov ax,word ptr [bp+4] ; 캙�젹β� � 飡ⅹ� ; (¡� 獸レぎ 誓（飡� bp �Ø獸 �� 췅飡昔Œ!) a0155: jmp dword ptr [000C] ; �音�� �� �昔｀젹щ - Д╇ⅲД�狩硫 ; ��誓若� 췅 ´も�� 쭬´殲��⑨ �� PSP ; ( � きIJぅ �.뜮設�췅 젮誓� ㅰ膝��! ) a0159 DB 0 ; �ぅ쳽 �昔쵟耶乘碎! ;) ; =getch a015A: mov ax,0 ; ��Д� 押�ゆĿ getch �誓贍쥯�⑨ INT_NO a015D: int 84h ; int INT_NO a015F: ret ; =printf a0160: mov ax,10h ; ��Д� 押�ゆĿ printf �誓贍쥯�⑨ INT_NO a0163: int 84 ; int INT_NO a0165: ret a0166 DB "View Key Codes",0Ah,0Ah ; "\n" - ぎ� 0Ah DB "Press Ctrl-D for exit",0Ah,0Ah,0 a018E DB "%i",0Ah,0 ; "%i\n" man/memmap.doc0100664000076500007650000000145706331121214013025 0ustar prool2prool2Memory map for Proolix (80x86 real mode) 00000 Vectors 00400 ROM BIOS data 00500 Kernel PSP 00600 Kernel Begin (see KERNEL_BEGIN in boot.c) 07C00 =0:7C00 (=0070:7500) Boot sector 07E00 Boot sector end xxxxx Kernel end xxxxx+1 Begin of dynamic memory allocate area 30500 (=3050:0000) /boot (boot manager) (see boots.asm, PSPSeg constant) MemTop (f.e. 9FFFF) End of dynamic memory allocate area A0000 EGA (in graph modes) B0000 MDA, Hercules 1st videopage B8000 CGA, EGA, VGA 1st videopage (mode=3, symbol mode) C8000 Additional ROM modules (2K blocks) E0000 End of addtn ROM E0000 Bg AT ROM BIOS EFFFF End AT ROM BIOS F6000 ROM Basic FE000 ROM BIOS, POST FFFF0 JMP - COLD REBOOT FFFF5 BIOS version/date (ASCII) FFFFE PC/XT/AT identefication byte man/cp.src0100664000076500007650000003125406340612670012206 0ustar prool2prool2; 꽙쭬遜�Аエ昔쥯��硫 �젵� cp �� 캙ぅ�� Proolix ; ぎК���졷Ł (c) G.Shepelev ; #include ; #include ; #include ; #include ; #include ; #include ; #include ; 묅젺쩆設��� 췅�젷� �昔｀젹щ. ; 뜝 飡ⅹ� ��誓쩆�� 캙�젹β贍 쵟遜Ð� 歲Б�レ�音 飡昔�! a0100: jmp a0104 ; �▼�� 歲－졻侁� a0102 DB 0DEh,0ADh ; 歲－졻侁� Proolix'� a0104: push cs ; �Ø�с �� �拾��� ℓα� a0105: pop ax ; 貰魚젺���� ㎛좂��⑨ 醒，���� a0106: mov [a0110],ax ; � 캙э殊 �昔｀젹щ a0109: call a0242 ; �留�� main ; � ax ¡㎖�좈젰恂� ぎ� 쭬´殲��⑨... a010C: jmp dword ptr [000Ch] ; �音�� �� �昔｀젹щ - Д╇ⅲД�狩硫 ; ��誓若� 췅 ´も�� 쭬´殲��⑨ �� PSP ; ( � きIJぅ �.뜮設�췅 젮誓� ㅰ膝��! ) a0110 DW ? ; �∥졹筍 魚젺��⑨ (cs) ; void cp_help(void) ; { ; puts("Uses: cp [file1] [file2]"); �琉졻� ��ㅱ첓㎦�... a0112: push ds ; 1-� 캙�젹β� 醒，��� 收め獸¡� 飡昔え a0113: mov ax,a034C ; 細ι���� 收め獸¡� 飡昔え ; "Uses: cp [file1] [file2]",0 a0116: push ax ; 2-� 캙�젹β� a0117: call a031C ; �留�� puts a011A: add sp,4 ; } a011D: ret ; int copy(char *path1, char *path2) ; ��ㄿ昔｀젹쵟 ▲芯黍㎜쥯���． ぎ�ⓣ�쥯�⑨ �� �ㄽ�． �젵쳽 � ㅰ膝�� ; {int h1, h2, i1, i2; long n, m; ; char buf [SECTOR_SIZE]; a011E: push bp ; 貰魚젺���� 貰ㄵ逝º�． 誓（飡�� bp a011F: mov bp,sp ; bp - 丞젳졻�レ � 飡ⅹ�; ; "聲�齧�" - ��誓쩆��瑜 押�ゆĿ 캙�젹β贍, ; "說�㎯" - №�Д��瑜 ▲芯� � ��誓Д��瑜. a0121: sub sp,210h ; 誓㎘舒ⓣ�쥯��� ▲芯�� � 200h 줎⒱, ; �� 4 줎⒱� ㄻ� n � m, ; �� 2 줎⒱� ㄻ� h1, h2, i1 � i2 ; if((h1=open(path1,O_RDONLY))==-1) return -1; ; �洙贍筍 �젵�1 ㄻ� 譽��⑨ a0125: mov ax,1 ; O_RDONLY a0128: push ax ; ��舒硫 캙�젹β� 췅 飡ⅹ - 졻黍▲� ㄾ飡承� a0129: push ds ; ™�昔� 캙�젹β� 췅 飡ⅹ - seg path1 a012A: push [bp+4] ; ™�昔� 캙�젹β� 췅 飡ⅹ - offset path1 a012D: call a0328 ; open a0130: add sp,6 ; ぎ薛ⅹ與� 丞젳졻�ワ 飡ⅹ� a0133: mov [bp-210h],ax ; h1 = ��Д� �젵쳽1 a0137: cmp ax,-1 ; == -1 a013A: jnz a013F ; �β, �昔ㄾウº... a013C: jmp a0235 ; �音�� � �黍㎛젶�� 쭬´殲. -1 ; if((h2=open(path2,O_WRONLY|O_CREAT|O_TRUNC))==-1) ; �洙贍筍 � 信η� ㄾ 0-� ㄻÞ� (� αエ �� 率耀飡㏂β - 貰ℓ졻�) ; �젵�, �洙贍瞬� ㄻ� 쭬�ⓤ� a013F: mov ax,0302h ; O_WRONLY or O_CREAT or O_TRUNC a0142: push ax ; ��舒硫 캙�젹β� 췅 飡ⅹ - 졻黍▲� ㄾ飡承� a0143: push ds ; ™�昔� 캙�젹β� 췅 飡ⅹ - seg path2 a0144: push [bp+6] ; ™�昔� 캙�젹β� 췅 飡ⅹ - offset path2 a0147: call a0328 ; open a014A: add sp,6 ; ぎ薛ⅹ與� 丞젳졻�ワ 飡ⅹ� a014D: mov [bp-20Eh],ax ; h2 = ��Д� �젵쳽2 a0151: cmp ax,-1 ; == -1 a0154: jnz a0162 ; �β, �昔ㄾウº... ; {close(h1); return -1;} a0156: push [bp-210h] ; h1 = ��Д� �젵쳽1 a015A: call a033A ; close a015D: inc sp ; ぎ薛ⅹ與� 丞젳졻�ワ 飡ⅹ� a015E: inc sp a015F: jmp a0235 ; �音�� � �黍㎛젶�� 쭬´殲. -1 ; while(1) ; ��譽� ‥稅��η�硫 與か 譽��⑨-쭬�ⓤ� 醒も�昔� ; { ; if((n=read(h1,buf,SECTOR_SIZE))==-1) break; ; 譽���� � ▲芯� �曄誓ㄽ�． 醒も��� a0162: xor dx,dx a0164: mov ax,a0200 ; dx ax = ㄻÞ� ▲芯�� (= ㄻÞ� 醒も.) a0167: push dx ; ��舒硫 캙�젹β� 췅 飡ⅹ - 飡졷蜈� 笹�¡ ㄻÞ� a0168: push ax ; ��舒硫 캙�젹β� 췅 飡ⅹ - Й젮蜈� 笹�¡ ㄻÞ� ; 晨ⓥ猶좑, 譽� 젮誓�졿⑨ � 캙э殊 � 쩆���� Мㄵエ 16-〃狩좑, ; �曄�� 貰Лⓥ�レ��, 譽�〓 飡졷蜈� 笹�¡ ㄻÞ� º�ギ 細吟�... a0169: push ss ; ™�昔� 캙�젹β� 췅 飡ⅹ - seg buf a016A: lea ax,[bp-200h] a016E: push ax ; ™�昔� 캙�젹β� 췅 飡ⅹ - offset buf a016F: push [bp-210h] ; 循βŁ 캙�젹β� 췅 飡ⅹ - h1 a0173: call a032E ; read a0176: add sp,10 ; ぎ薛ⅹ與� 丞젳졻�ワ 飡ⅹ� a0179: mov [bp-206h],dx ; n = 葉笹� �昔葉�젺�音 줎⒱�� a017D: mov [bp-208h],ax a0181: cmp dx,-1 ; == -1 a0184: jnz a018B a0186: cmp ax,-1 a0189: jz a01E4 ; break �鼇―� 譽��⑨ ; if(n==0) {m=0; break;} �昔´夕� ぎ��� �젵쳽 a018B: mov ax,[bp-208h] a018F: or ax,[bp-206h] ; n == 0 ? a0193: jnz a01A3 a0195: mov word ptr [bp-202h],0 ; m = 0 a019B: mov word ptr [bp-204h],0 ; �①ⅲ� �� 쭬�ⓤ젺� a01A1: jmp a01E4 ; break ぎ�ζ �젵쳽1 ; if((m=write(h2,buf,n))==-1) break; ; 쭬�ⓤ� �� ▲芯�� �曄誓ㄽ�． 醒も��� a01A3: push [bp-206h] ; ��舒硫 캙�젹β� 췅 飡ⅹ - n a01A7: push [bp-208h] ; (葉笹� ㎛좂좈ⓨ 줎⒱ � ▲芯誓) ; 晨ⓥ猶좑, 譽� 젮誓�졿⑨ � 캙э殊 � 쩆���� Мㄵエ 16-〃狩좑, ; �曄�� 貰Лⓥ�レ��, 譽�〓 飡졷蜈� 笹�¡ ㄻÞ� º�ギ 細吟�... a01AB: push ss ; ™�昔� 캙�젹β� 췅 飡ⅹ - seg buf a01AC: lea ax,[bp-200h] a01B0: push ax ; ™�昔� 캙�젹β� 췅 飡ⅹ - offset buf a01B1: push [bp-20Eh] ; 循βŁ 캙�젹β� 췅 飡ⅹ - h2 a01B5: call a0334 ; write a01B8: add sp,10 ; ぎ薛ⅹ與� 丞젳졻�ワ 飡ⅹ� a01BB: mov [bp-202h],dx ; m = 葉笹� 쭬�ⓤ젺�音 줎⒱�� a01BF: mov [bp-204h],ax a01C3: cmp dx,-1 ; == -1 a01C6: jnz a01CD a01C8: cmp ax,-1 a01CB: jz a01E4 ; break �鼇―� 쭬�ⓤ� ; if (m!=n) break; �昔´夕� ��젪Œ彛�飡� ㄻÞ� 쭬�ⓤ� a01CD: mov dx,[bp-202h] ; m a01D1: mov ax,[bp-204h] ; 葉笹� 쭬�ⓤ젺�音 줎⒱ a01D5: cmp dx,[bp-206h] ; == n 葉笹� �昔葉�젺�音 줎⒱ a01D9: jnz a01E4 a01DB: cmp ax,[bp-208h] a01DF: jnz a01E4 ; break �� 蝨젷�刷 쭬�ⓤ졻� ; } a01E1: jmp a0162 ; 笹ⅳ莘蟯� 醒も��... ; 灑쩆 ��캙쩆�� ぎ＄� �젵� 稅��ⓣ�쥯� Œ� � 笹晨젰 �鼇―� ; ．�젳ㄾ �昔耀 〓ギ 〓 ºβ� �젳�瑜 獸囹� �音�쩆 Œ� ; 兒席ⓣ�쥯筍 �搜�レ�硫 �黍㎛젶 �鼇―�... ; i1=close(h1); a01E4: push [bp-210h] ; h1 (��Д� �젵쳽1) a01E8: call a033A ; close a01EB: inc sp ; ぎ薛ⅹ與� 丞젳졻�ワ 飡ⅹ� a01EC: inc sp a01ED: mov [bp-20Ch],ax ; i1 - �黍㎛젶 信�θ��飡� 쭬む淫⑨ �젵쳽1 ; i2=close(h2); a01F1: push [bp-20Eh] ; h2 (��Д� �젵쳽2) a01F5: call a033A ; close a01F8: inc sp ; ぎ薛ⅹ與� 丞젳졻�ワ 飡ⅹ� a01F9: inc sp a01FA: mov [bp-20Ah],ax ; i2 - �黍㎛젶 信�θ��飡� 쭬む淫⑨ �젵쳽2 ; if (n==-1) return -1; a01FE: cmp word ptr [bp-206h],-1 ; n == -1 a0203: jnz a020C a0205: cmp word ptr [bp-208h],-1 a020A: jz a0235 ; �音�� � �黍㎛젶�� 쭬´殲. -1 ; if (m==-1) return -1; a020C: cmp word ptr [bp-202h],-1 ; m == -1 a0211: jnz a021A a0213: cmp word ptr [bp-204h],-1 a0218: jz a0235 ; �音�� � �黍㎛젶�� 쭬´殲. -1 ; if (m!=n) return -1; a021A: mov dx,[bp-202h] ; m (葉笹� 쭬�ⓤ젺�音 줎⒱��) a021E: mov ax,[bp-204h] a0222: cmp dx,[bp-206h] ; n (葉笹� �昔葉�젺�音 줎⒱��) a0226: jnz a0235 a0228: cmp ax,[bp-208h] a022C: jnz a0235 ; �音�� � �黍㎛젶�� 쭬´殲. -1 ; if (i1==-1) return -1; a022E: cmp word ptr [bp-20Ch],-1 ; i1 (�黍㎛젶 信�θ��飡� 쭬む淫⑨ �젵쳽1) a0233: jnz a023A ; =return -1 a0235: mov ax,-1 ; -1 a0238: jmp a023E ; return (i2); a023A: mov ax,[bp-20Ah] ; i2 (�黍㎛젶 信�θ��飡� 쭬む淫⑨ �젵쳽2) ; ．�젳ㄾ ぎН젶狩ⅴ 〓ギ 〓, αエ 〓 ㏇� �昔´夕� �誘�キ纏ⓤ� 췅 ギ（曄稅ⓨ ; ����졿⑨� � �ㄽ�� ぎ쵟�ㄵ if... ; } ; �音�� �� ��ㄿ昔｀젹щ copy a023E: mov sp,bp ; ⓤ若ㄽ�� 貰飡�輾�� 飡ⅹ� a0240: pop bp ; ¡遜�젺�˙���� 貰ㄵ逝º�． bp a0241: ret ; main(int argc, char *argv[] ) �說�˛좑 �昔璵ㅳ�� ; argc - 葉笹� ��誓쩆쥯�щ� 飡昔� 歲Б�ギ� ; *argv - 丞젳졻�レ 췅 쵟遜Ð 歲Б�ギ� ; { ; int ii, j, n, Files=0; ; char path[2][PATH_MAX]; a0242: push bp ; 貰魚젺���� 貰ㄵ逝º�． 誓（飡�� bp a0243: mov bp,sp ; bp - 丞젳졻�レ � 飡ⅹ�; ; "聲�齧�" - ��誓쩆��瑜 �昔｀젹Д 캙�젹β贍, ; "說�㎯" - №�Д��瑜 ▲芯� � ��誓Д��瑜. a0245: sub sp,206h ; 誓㎘舒ⓣ�쥯��� ㄲ�þ�． ▲芯�� � 2*FFh 줎⒱, ; �� 2 줎⒱� ㄻ� ii, j, n � Files a0249: mov word ptr [bp-200h],0 ; Files=0 ; ��Д� ��ギ˘�え ▲芯�� ㄻ� º��� �젵쳽 ; М┃� 〓ギ 〓 �‘⒱ⓤ� �ㄽº Þㄵめ�� ii... ; argc--; a024F: dec word ptr [bp+4] ; argc=argc-1 ; (�乘ⅱ莘 飡昔ゃ ª��黍說��) ; ii=1; a0252: mov word ptr [bp-206h],1 ; ii=1 ; ��Д� 飡昔え 쵟遜Ð� (췅�젷� � ��舒�� 飡昔え) ; do ; ぎ�ⓣ�쥯��� 收め獸�音 飡昔� �� 쵟遜Ð� ¡ №�Д��硫 ▲芯� ; (若收� 〓 � ㎛졻� 쭬曄�...) � ºⓥ졿⑨ �□젩�洙� ��與� ; { ; if (argc) a0258: cmp word ptr [bp+4],0 ; argc == 0 a025C: jz a02C8 ; �β 飡昔� ㄻ� ぎ�ⓣ�쥯�⑨ � ▲芯�... ; { ; if (argv[ii][0]=='-') М┘� �黍㎛젶 ��與�? a025E: mov bx,[bp-206h] ; ii a0262: shl bx,1 ; ii*2 a0264: add bx,[bp+6] ; offset argv + ii*2 ; (젮�. 丞젳졻�ワ 췅 ii-� 飡昔ゃ 歲Б�ギ�) a0267: mov bx,[bx] ; 丞젳졻�レ 췅 0-� 歲Б�� ii-� 飡昔え a0269: cmp byte ptr [bx],2Dh ; == "-" a026C: jnz a029A ; else ; { ; 誓젶與� 췅 ��與� ; n=(int)strlen(argv[ii]); a026E: push ds ; ��舒硫 캙�젹β� 췅 飡ⅹ - seg argv[ii] a026F: mov bx,[bp-206h] ; ii a0273: shl bx,1 ; ii*2 a0275: add bx,[bp+6] ; offset argv + ii*2 a0278: push [bx] ; ��舒硫 캙�젹β� 췅 飡ⅹ - offset argv[ii] a027A: call a0346 ; strlen a027D: add sp,4 ; ぎ薛ⅹ與� 丞젳졻�ワ 飡ⅹ� a0280: mov [bp-202h],ax ; n=ㄻÞ� 飡昔え ; for (j=1;j= ; switch (argv[ii][j]) ; { ; case 'N': �Ø젶ⓨ ��與� ;) ; default : cp_help(); return 1; a0294: call a0112 ; �琉졻� ��ㅱ첓㎦�... a0297: jmp a0311 ; return 1 ; } ; } ; else ; { ; strcpy(path[Files++],argv[ii]); ; ぎ�ⓣ�쥯��� ii-� 飡昔え �� 쵟遜Ð� � �ㄽ� �� ��ギ˘��� ▲芯��, ; 淞竣葉� Files ぎ薛ⅹ殊說β碎 ㄻ� 丞젳젺⑨ 췅 笹ⅳ莘芋� ��ギ˘�ゃ a029A: push ds ; ��舒硫 캙�젹β� seg arg[ii] a029B: mov bx,[bp-206h] ; ii a029F: shl bx,1 ; ii*2 a02A1: add bx,[bp+6] ; offset argv + ii*2 ; (젮�. 丞젳졻�ワ 췅 ii-� 飡昔ゃ 歲Б�ギ�) a02A4: push [bx] ; ��舒硫 캙�젹β� offset argv[ii] a02A6: push ds ; ™�昔� 캙�젹β� seg path[Files] a02A7: mov ax,[bp-200h] ; Files 0...1 a02AB: inc word ptr [bp-200h] ; Files=Files+1 a02AF: mov dx,0FFh ; ㄻÞ� ��ギ˘�え ▲芯�� path a02B2: mul dx ; ax=收ゃ�좑 췅�젷彛좑 ��㎤與� � ▲芯誓 a02B4: lea dx,[bp-1FEh] ; 젮誓� 췅�젷� path a02B8: add ax,dx ; 細ι���� 收ゃ耀� ��㎤與� ㄻ� 쭬�ⓤ� � 캙э筍 a02BA: push ax ; ™�昔� 캙�젹β� offset path[Files] a02BB: call a0340 ; strcpy ぎ�ⓣ�쥯��� 飡昔え ASCIIZ a02BE: add sp,8 ; ぎ薛ⅹ與� 丞젳졻�ワ 飡ⅹ� ; if (Files>2) {cp_help(); return 3;} a02C1: cmp word ptr [bp-200h],2 a02C6: jg a02DF ; Files>2 ; } ; } ; } ; while (ii++= a02D5: jmp a0258 ; ¡㎖�졻 췅 DO ; if (Files<2) {cp_help(); return 3;} ; �昔´夕� 獸．, 譽� 〓エ ��誓쩆�� �줎 º��� �젵쳽 (エ鈺�� ª��黍�.) a02D8: cmp word ptr [bp-200h],2 a02DD: jge a02E7 ; Files>=2 篆�〓 OK ; =cp_help();return 3 a02DF: call a0112 ; �琉졻� ��ㅱ첓㎦�... a02E2: mov ax,3 a02E5: jmp a0318 ; if ((copy(path[0],path[1]))==-1) ; ぎ�ⓣ�쥯��� �젵쳽 � �昔´夕�� 信�θ��飡� a02E7: lea ax,[bp-0FFh] a02EB: push ax ; ��舒硫 캙�젹β� path[1] a02EC: lea ax,[bp-1FEh] a02F0: push ax ; ™�昔� 캙�젹β� path[0] a02F1: call a011E ; ��ㄿ昔｀젹쵟 copy a02F4: add sp,4 ; ぎ薛ⅹ與� 丞젳졻�ワ 飡ⅹ� a02F7: cmp ax,-1 ; == -1 a02FA: jnz a0316 ; �β, 췅´惜�� �젵� 稅��ⓣ�쥯� 承θ��... ; { ; printf("Can't copy %s to %s\n",path[0],path[1]); a02FC: lea ax,[bp-0FFh] a0300: push ax ; ��舒硫 캙�젹β� - 젮誓� path[1] a0301: lea ax,[bp-1FEh] a0305: push ax ; ™�昔� 캙�젹β� - 젮誓� path[0] a0306: push ds ; 캙�젹β� seg 飡昔え a0307: mov ax,a0365 ; 細ι���� 收め獸¡� 飡昔え ; "Can't copy %s to %s",0Ah,0 a030A: push ax ; 캙�젹β� offset 飡昔え ; ´刷쵟 쭬�汀�硫 젷．黍燧 ��誓쩆葉 젮誓貰� 收め獸�音 飡昔�, ; �ⅹ�獸贍� ㄾ��キ禎恂� ㎛좂����� 醒，����, � ㅰ膝�� �β... ; � �� 쳽쬊 エ 將�??? a030B: call a0322 ; printf a030E: add sp,8 ; ぎ薛ⅹ與� 丞젳졻�ワ 飡ⅹ� ; return 1; a0311: mov ax,1 a0314: jmp a0318 ; } ; return 0; a0316: xor ax,ax ; } ; �音�� �� ��ㄿ昔｀젹щ main a0318: mov sp,bp ; ⓤ若ㄽ�� 貰飡�輾�� 飡ⅹ� a031A: pop bp ; ¡遜�젺�˙���� 貰ㄵ逝º�． bp a031B: ret ; =puts a031C: mov ax,7 a031F: int 84h a0321: ret ; =printf a0322: mov ax,10h a0325: int 84h a0327: ret ; =open a0328: mov ax,24h a032B: int 84h a032D: ret ; =read a032E: mov ax,26h a0331: int 84h a0333: ret ; =write a0334: mov ax,27h a0337: int 84h a0339: ret ; =close a033A: mov ax,28h a033D: int 84h a033F: ret ; =strcpy a0340: mov ax,3Ch a0343: int 84h a0345: ret ; =strlen a0346: mov ax,40h a0349: int 84h a034B: ret a034C DB "Uses: cp [file1] [file2]",0 a0365 DB "Can't copy %s to %s",0Ah,0 man/files.bbs0100664000076500007650000000005606704425530012662 0ustar prool2prool2HELP.DOC help MEMMAP.DOC proolix memory map mkboot.bat0100664000076500007650000000203506050135426012273 0ustar prool2prool2@echo off cls echo 旼컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴커 echo � 뫌ℓ젺�� 쭬｀習�嶺�． 醒も��� 럱 Proolix 췅 ㄸ稅β� a: � echo � � echo � Boot maker (mkboot.bat) version 0.0.0.24 8-Nov-95 � echo � � echo � 뒥�젷��, � ぎ獸昔� �졹캙ぎ쥯� �젵� proolix.arj � echo � ㄾウ�� 〓筍 收ゃ蟯�. � echo � � echo � 볡殊收, ▲�-醒も�� ㄸ稅β� � ㏇� � echo � Þ兒席졿⑨, 貰ㄵ逝좈좑碎 췅 ㄸ稅β�, Мｃ� 〓筍 쭬��暹��� !!! � echo � 뜝━ⓥ� CTRL BREAK, αエ 귣 ��誓ㅳ쵟エ 聲筌猶졻藺� � Proolix'��. � echo � � �昔殊˛�� 笹晨젰 췅━ⓥ� ANY KEY � echo 읕컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴켸 pause>nul cls bp -i -y boots.bin readme.1st0100664000076500007650000002756307010271632012210 0ustar prool2prool2 렞��졿Ŧ�췅� 歲飡�쵟 Proolix - �젵� readme Copyright (C) 1993-1999 Serge Pustovoitoff, prool@itl.net.ua, 2:461/35@FidoNet Portions copyright: PKLITE (tm) Executable File Compressor Version 1.15 7-30-92 (C) 1990-1992 PKWARE Inc. All Rights Reserved. Patent No. 5,051,745 PKWARE, Inc. 9025 N. Deerwood Drive Brown Deer, WI 53223 Content 1. PROOLIX not UNIX 2. Warranties & license 3. [skipped] 4. Install (볚�젺�˚� 뤲乘Ø��) 5. RTFM - Read The F$%& Manual 6. VIRUS! 7. History 8. Trademarks 9. Credits 10. Contact & e-mail support 11. 떒收�졻侁� 1. PROOLIX not UNIX 룼聲玎젰恂� Мⅸ ┘�� � ㄾ曄黍 궇� �誓ㄻ젫젰恂� 췅若ㅿ�좑碎 � �昔璵遜� �젳�젩�洙� POSIX-貰¸α殊쵟� ����졿Ŧ�췅� 歲飡�쵟 Proolix. H� �呻� � POSIX� 醒⑴졹 щ 췅若ㄸп� �黍Д惜� 췅 侁�˛� MSDOS 3.0 (‥� Л�．쭬쩆嶺�飡�). ;) 2. Warranties & license � 쭬�信殊� Proolix � DOS-醒遜Ŀ ��� OS/2 � �� 蓀젳� ��˘�. �.뇿쥯エ鼇� 맆쬹θ젰恂� p졹��飡p젺���� � ⓤ��レ㎜쥯��� ⓤ若ㄽ音 收め獸� � �젹ⓨ 칛�즤젹�, � 獸� 葉笹� Мㄸ十與p�쥯��音, 칛� �誘�キ��Ŀ 笹ⅳy迹ⓨ y笹�˘�: 댾若ㄽ硫 收め� p졹��飡p젺畑恂� � 貰�p젺����� �泣���ⓤ젺��． ぎ�쮘젵��, 쩆���． 召ⓤ첓 y笹�˘� � 칛Œ젫좐耀⒰� ㄵか쟰졿Ŀ �� �手β飡´���飡�. 귗� �昔｀젹щ,쵟收p쯄ル Œ� Þ瑜 �昔ㅳも� � y��Ж췅���� ¡㎚�┃�飡ⅸ Œ� ⓤ��レ㎜쥯�⑨ 將�． 칛�즤젹Л�． 칛�쨤も�, ㄾウ�� �猶�ㄸ筍 笹ⅳy迹ⅴ 貰�↓���� 췅 說遜ぎ�, 丞�젴�稅�� �/Œ� 젺＋Ł稅�� 筌紐졾: > 앪�� 칛�쨤も ˚ヮ�젰� 칛�즤젹щ, p젳p젩��젺�瑜 뫁薯ⅴ� 뤵飡�¡⒱��臾 > 롟� 璵� �昔ㅳも � 聲��с 稅쳽쨒 쵟� �昔｀젹�, 饒 췅줶饒刷 昔㏅�〃� > 캙� 뫁薯iø� 뤵飡�줶⒱i� > This product includes software developed by the Serge Pustovoitoff 귣 �� ��ャ�젰收 �涉М� Œ� ぎ聲����� �黍〓エ �黍 �졹�昔飡�젺��Ŀ 쩆���． �昔ㅳも�. 뙫� º� �� М┘� ⓤ��レ㎜쥯筍碎 � 召�貰■手�쥯筍 p졹��飡p젺��⑧ 칛�쨤も��, 貰ℓ젺�音 췅 줎㎘ 쩆���． 칛�즤젹Л�． 칛�쨤も�, ‥� 召ζ쯄レ��． �ⓤ弛����． p젳pθ��⑨. 앪�� 칛�즤젹Л硫 칛�쨤も p졹��飡p젺畑恂� Л�� Œ� 췅㎛좂���臾� Л�� エ�젹� �� �黍�汀�с � ぎН溢收惜�� ��젶殊ぅ �黍�與�� "AS IS" ("��� (뿋�) 뀘뮏" - �젶(獸) � �誓ㄻ젫젰�). 뗯〓� 짛p젺殊�, ��쨛젳yД쥯迹�α� Œ� 琠�� ��p젲���瑜, ˚ヮ�좑 (�� �� �즤젺①Ð좑刷) ��쨛젳yД쥯迹�α� 짛p젺殊� 獸쥯p��． ˘쩆 � 칛ª�ㄽ�飡� ㄻ� �칛ⅳ�ゥ��音 칛º����Ł, �� ㄵ⒰手ⓥ�レ��. �™�� �� 쩆β �Ø젶ⓨ 짛�젺殊�, �� 琠�音, �� ��ㅰ젳僧ⅱ젰щ�, 譽� 쩆��硫 ぎНゥめ �昔｀젹� �� �猶ⅳβ �� 飡昔� 궇蜈 젽캙�졻��� Œ� �昔｀젹Л�� �‥召η���� � �� �黍葉�ⓥ �涉щ� Œ� ぎ聲���音 嵩淫ぎ� 궇蜈с ∥젫�貰飡�輾⑧ Œ� ℓ�昔�溢. H� � ぎ�� 笹y�젰 젪獸� �� М┘� �α殊 �手β飡´���飡� 쭬 ヮ〓� 칛詮�, ぎ聲����, 笹y�젵��, �貰‘, 殊�①�� Œ� ギ（曄稅� ¡㎛Ø鼇� ��줽ⅵㄵ�⑨ (˚ヮ�좑, �� �� �즤젺①Ð좑刷, ��飡젪챱 貰칪恂手y迹ⓨ 獸쥯p�� � y笹y�, ��收p� p젩�獸召�貰∼�飡�, 쩆��音, 칛Æ維� Œ� 칛Ŧ飡젺�˚y ㄵ汀�レ��飡�) � ヮ‘� �p젶獸˚� �手β飡´���飡�, ぎ��p젶��, 飡p�．� �手β飡´���飡� Œ� 칛젪�췅py蜈�⑨ (˚ヮ�좑 �ⅰpⅵ��飡� Œ� 譽�-エ‘), �淫ⅹ좐蟯� �� ⓤ��レ㎜쥯�⑨ 쩆���． 칛�쨤も� ヮ〓� �죖젳��, 쩆┘ αエ 쭬p젺ⅴ �㎖α狩� � ¡㎚�┃�飡� ��ㄾ∼�． ��줽ⅵㄵ�⑨. � 笹晨젰 ��№ⅵㄵ�Ł �誓收�㎤� �� �黍�º좐恂�, �ㄽ젶�, αエ 귣 貰�↓ⓥ� Л� 信ギ˘�, �黍 ぎ獸贍� �昔�㎜獄� 젪졷⑨, �, ¡㎚�┃�, 細�ｃ ��М傲: 췅�黍Д�, 貰´獸�, 첓� ¡遜�젺�˘筍 貰壓, 쭬��暹���硫 Мⅸ 럱 Œ� ぎ�率レ�졿�ⅸ �� �黍Д���⑧ 뤲乘Ø�� Œ� �吟維ぎ� 궇� ��¡� ´褻Ŀ Œ� ⓤ��젪ゥ���� 쭬Д曄��音 궇Ж �鼇‘� � 뤲乘Ø醒. 뮔う� � ��飡졷좐刷 ⓤ��젪ⓥ� 쭬Д曄��瑜 줎（ � 럱, 譽�〓 ¿誓ㅼ ��ㄾ∼音 젪졷Ł �� ��™�涉ギ刷. 4. Install "Make Proolix not war" 럱 � Ж�º젷彛�� ぎНゥも� (‥� ⓤ若ㄽØ�� � 〃∥Ŧ收�) ��飡젪ワβ碎 � ˘ㄵ �ㄽ�． 졷夜쥯 (收ゃ耀� ��飡젪ぎ� 琠ワβ碎 Proolix SlimeWare � 졷夜´ slime?.arj), 쭬캙ぎ쥯���． 졷夜쥯獸昔� arj. 꽞� 信�젺�˚� 럱 ���▼�ㄸМ �졹캙ぎ쥯筍 졷夜� � 첓�젷�� c:\proolix 췅 궇蜈� ┘飡ぎ� ㄸ稅� � 쭬�信殊筍 �ㄽ� �� �昔｀젹� install?.bat. (installb.bat Þ飡젷エ說β 뤲乘Ø� 췅 ㄸ稅β� A:, �洙蝨� �� � ▲ㄵ� ��獸� ｀習ⓥ藺�. installh.bat Þ飡젷エ說β 뤲乘Ø� 췅 ˘�曄飡��, ㄸ稅 C: (master boot record � boot-sector ˘�曄飡��� �� Д�畑恂�, 쭬｀習첓 ㏇� �젪�� ▲ㄵ� � ㄸ稅β�, � �ⅴ 쭬｀習ⓥ碎 boot-manager � ��誓쩆飡 承�젪ゥ��� 췅若ㅿ耀с碎 췅 ˘�曄飡�誓 甸說)). 꽞� 쵟鼇� ‥� ˘�曄飡��� 뤲乘Ø� М┃� �졹캙ぎ쥯筍 췅 ㄸ稅� B: � 쭬�信첓筍 installb �旬蝨�. 꽞� 쵟鼇� ‥� ™�昔． ㄸ稅�¡쩆, 譽�〓 誠�쳽筍 쭬｀拾젰с� 뤲乘Ø�-ㄸ稅β�, ���▼�ㄸМ 貰ℓ졻� 췅 ㄸ稅β� ▲�-醒も�� 뤲乘Ø��, 쭬�信殊� mkboot.bat � 稅��ⓣ�쥯筍 � ぎ惜ⅱ�� 첓�젷�� ㄸ稅β� �젵� kernel.bin, ��誓º���쥯� ⅲ� � kernel. (궘º젺��: � �젵ゥ install.bat 〓쳽 �鼇―� � �� ��席젷彛� �젩��젰� 獸レぎ, 췅葉췅� � ´褻Ŀ 0.0.0.8 5-Jan-94, (´褻⑨ ��Д曄췅 � �젹�� �젵ゥ install.bat)). 룼笹� 曄． М┃� 쭬｀拾졻藺� � ㄸ稅β� A: � �淫졻藺� �젩��졻� � 럱 Proolix. 5. RTFM - Read The F$%& Manual 쀢� 僧ⅴ� ㄵ쳽筍 將� ´褻⑨ Proolix'�: - MSDOS-�昔｀젹쵟 Boot Processor (bp.com) 僧ⅴ� ぎ�ⓣ�쥯筍 ▲� � �젵�, �젵� � ▲� � Þ飡젷エ昔쥯筍 ぎ쵟�ㄽ硫 (com) �젵� � ▲� 醒も�� ㄸ稅β�, �� Д�程 캙�젹β昔� ㄸ稅β�, ぎ獸贍�, 첓� �㎖α狩�, 췅若ㅿ恂� � ▲收. 뮔え� �□젳��, �黍 ��М蟯 將�� �昔｀젹щ 귣 細�┘收 ㄵ쳽筍 聲�� ▲瞬. (뮢レぎ ¡� 쭬曄�? 궚昔曄�, Þ�＄� 將� ��ゥ㎛�. 닱´飡�� 젺殊˘說說硫 ▲� VITAMINB 뫁遜�. 닱´飡�� ▲� (＄�-獸 � 뫌壓캙���젹� 〓�), ぎ獸贍� �黍 ���淫ぅ 쭬｀習え � ㄸ稅β� �昔�㎖�ㄸ� 쭬｀習ゃ � ˘��� - �� 獸┘ М┘� ºβ� 젺殊˘說說�� 췅㎛좂���� Œ� �昔飡� ㄻ� 蝨�■手� 笹拾ⓥ�). - �昔｀젹쵟 boot.asm - 將� М� エ嶺硫 ▲�-쭬｀習葉�, �졹��ギ┘��硫 � ��舒�� 醒も�誓 ㄸ稅β�. 렚 쭬｀拾젰� � 쭬�信첓β �〓嶺硫 꼶뫌㏇え� �젵� /BOOT (boot manager). 뤲� 將�� �젵� М┘� 〓筍 � ぎ惜ⅱ�� 첓�젷�％ �� ��舒臾 � 쭬�º졻� 췅 ㄸ稅� 稅�レぎ 膝�ㄽ� �αД┃音 か졹收昔�. 뙫� ▲� 笹ⅳⓥ �� FAT�. - /BOOT - 젪獸��Л좑 �昔｀젹쵟, 쭬｀拾젰쵟� ▲�-쭬｀習葉ぎ�. 앪� - boot manager 럱 Proolix. H젽ⓤ젺 췅 �. Boot manager М┘� 쭬｀拾졻� 甸昔 뤲乘Ø�� � ㄸ稅β� A:, �젳ㄵ쳽 ˘�曄飡��� C:, М┘� �黍�蝨ⓥ�レ�� 쭬｀拾졻� MSDOS (Œ� ㅰ膝莘 럱) � ˘�曄飡��� �黍 췅エ葉� ㄸ稅β� � A: � �.�. - KERNEL - 젪獸��Л좑 �昔｀젹쵟, 쭬｀拾젰쵟� ▲�-Д�ⅳ┘昔�. 앪� - 甸昔 럱 Proolix. H젽ⓤ젺� 췅 �. 뒥� ぎНŒⓣ�쥯筍, 細. ˛º졻�レ�� �젵� makefile � ⓤ若ㄽØ 甸�� - �젵� kernel.c. 뮔� 첓� 甸昔 �젩��젰� 젪獸��Л�, ‥� 뙌 꼶�, 獸レぎ � �黍率飡˘� ROM BIOS, 獸 ‘レ鼇�飡¡ 押�ゆŁ 筌紐� �, ⓤ��レ㎯迹ⓨ 쭬�昔頌 � 꼶�, �� �젩��젰�. � 췅�ⓤ젷 췅 졹醒Аゥ誓 � 췅 � �ⅹ�獸贍� Ж�º僧 押�ゆŁ. H젩�� ���誓贍˛� �졹鼇涉β碎 � ��譽� ⅵⅳ�ⅱ�� �誘信첓荻碎 ���瑜 ´褻Ŀ � ���臾� 押�ゆ⑨Ж � ⓤ��젪ゥ���� 쭬Д曄��音 줎．� � ＋渽��. - ��ⓤ젺⑨ ㅰ膝ⓨ �젵ギ� 럱 М┃� 췅⒱� � �젵쳽� dir Œ� files.bbs, � �젶┘ � ㅰ膝ⓨ �젵쳽� ㄾゃД��졿Ŀ. 듺졻え� 聲�� ˛呻誓��ⓨ � ˛θ�ⓨ ぎ쵟�� 뤲乘Ø�� М┃� ��ャ葉筍, ⓤ��レ㎯� ぎ쵟�ㅳ help. (뫉�¡ "˛呻誓��Ł" ���º젰恂� � 獸� ┘ 細吟ゥ, � ぎ獸昔� ぎ쵟�ㅻ cd/chdir MSDOS � UNIX'� 琠ワ荻碎 ˛呻誓��º�). 6. ��殊˘說說좑 쭬蟯�� 뵠œ��瑜 ˘說頌, �黍��殊昔쥯��瑜 췅 MSDOS ����졿Ŧ���� 歲飡�Д Proolix �� 飡�좄�� �� ��誓ㄵゥ�⑧, � �昔殊� ▲獸�音 ˘說貰� ºⅴ恂� �昔´夕� � ▲恂ⅹ獸誓 � � 췅�젷� 甸��. (뤲�´夕� 誠�쳽췅 �� Ħⅴ, �誓ㄻ�┘���� 왽��� 겈ギ殊茹º, bela@padco.kharkov.ua). 곥�-醒も�� 뤲乘Ø��, �∼졷拾Ð 췅 ㄸ稅�, � ぎ獸昔． 쭬｀拾젰恂� 뤲乘Ø�, ▲獸�硫 ˘說�, �猶�ㄸ� 歲Б�� V 췅 咨�젺 � ┐β 췅쬊殊� ヮ‘� か젪②�. 뱼Ħⅱ 歲Б�� V � 誓ぎД�ㅳ� ㏇�젪ⓥ� � ㄸ稅�¡� A: 쭬かⅴ��莘 쭬´ㄾМ 飡�黍レ�莘 ㄸ稅β� � MSDOS � 젺殊˘說說臾� 蓀ⅳ飡쥯Ж, � 쭬收� ��誓쭬｀習ⓥ藺� � ㄸ稅� A: (�� �� �� Ctrl-Alt-Del, � �� reset!) � �昔�㎖α殊 ゥ曄��� ºξ蟯Ж碎 蓀ⅳ飡쥯Ж (Aidstest, ADinf Cure Module, Dr.Web, format c: etc). 맓ぎД�ㅳ� �젶┘ ㄻ� �昔十쳽もØ� �� ▲獸�音 ˘說貰� ⓤ��レ㎜쥯筍 쥯ゆÞ� VitaminB 뫁遜�. 7. 댾獸黍� 댾獸黍� ´ㄵ恂� � �젵ゥ history.doc 8. Trademarks 뤲乘�, Prool, PROOL, prool, �說レ, Proolix, PROOLIX, 뤲乘Ø�, 룓뱥닁�, 뤲乘ⓨ, 룓뱥닏, XProolix, XPROOLIX, xproolix, 븦說エ�, 븦릵땲�, 븦說エめ, 븦릵땲뒔, 野說エ�, 野說エめ - 獸薯��瑜 쵟夕� 뤲乘� JNP, jnp, 꽗ⅸ-씘-룳 - - 獸薯��瑜 쵟夕� ぎН溢收惜�． か嵩� JNP (븷閃ぎ�) 롟�젷彛瑜 承�э�呻瑜 � 收め收 獸薯��瑜 쵟夕� imho ぎс-�Æ乘� 쩆 �黍췅ㄻⅵ졻 9. Credits 겓젫�쩆攝 エ�, � 獸� Œ� Þ�� 飡����� 쭬Þ收誓貰쥯�鼇齬� 뤲乘Ø貰� �/Œ� �涉М Œ� ぎ聲���� ��М짛�鼇� Л�. 궙� ⓨ ����キ硫 召ⓤ��: 궇ゥ黍� 맆〃��˘�, 벊Ð�褻ⓥβ º.궏⒵쵟췅 (닱�젴レ), 닧�閃 쀣�ⓨÞ, Sprint, igor@ktts.kharkov.ua, 궇ㄸ� 깲胥習, vega@itl.net.ua, 뫉젪� 눆Й輾稅Ł, 젫��恂手� "댂收雪젶�", zema@interfax.kiev.ua, 꽟ⓥ黍� 꺇昔ㅷ젺Þ, Linux Team, 꽙쵟 롞ギ�, 2:461/27@Fidonet ��ㅰⅸ 꺇ギ®��ぎ, ��ㅰⅸ 룯循��, 2:461/35.444@Fidonet, ��꼫, 몺�� 뫁ャ輾��, 2:461/144@Fidonet, 뙣�젴� �. 뫅�餘�, 왽Ł 겈ギ殊茹Ł, 몡 "PADCO", 닧�閃 C젳���� (2:461/61.99@Fido), 깷췅 떊�Þ, 꺺②� 겗�졷��, �ゥめ 뫁Д�篆�, 벊Ð�褻ⓥβ 뵭�黍ㅻ, 뙣�젴� 솯胥젶, Mike Aizatsky, 2:461/21.100@Fidonet, 븿薯Ł H.�., 븷閃ぎ㏇え� ．率쩆褻手���硫 勝Ð�褻ⓥβ, Sergey Goudzenko, 2:461/416, 맆レ� 곟졼� (Ralf Brown) - ⅲ� Interrupt List - ��キⅸ鼇� � ��ㅰ�∼ⅸ鼇� 召�젪�嶺Ø �� 졷夜收も侁� PC! 뫁薯ⅸ 닣좄Þ�Ø��, 궖젮Ð�飡��, Tony Perminov, 2:461/200.12@Fidonet PKWARE, Inc 쭬 free ´褻⑧ 承젶��蟯첓 PKLITE 뀭�� 뀭�昔�, Linux Team, Soft-ICE by Nu-Mega Technologies, MARQUIS DE SOIREE, PartitionMagic by PowerQuest 10. Contact & e-mail support 뒥� 聲筌졻藺� � 젪獸昔�, 細�循� � �젵ゥ support.txt �™�� 럱 Proolix - 뫁薯ⅸ 뤵飡�¡⒱��, �젶┘ �㎖α狩硫 첓� Serge Pustovoitoff � 뤲乘� (Prool). 뀭� 젮誓��: Internet prool@infocom.kharkov.ua FidoNet 2:461/35 WWW http://www.infocom.kharkov.ua/~prool Voice phone +380(572)235102, 123445 11. 떒收�졻侁� [걽�] "�릷닋뀏뮄�� 럮뀗�뻽럪뜋� 몚몤뀒� UNIX" 뙫黍� 꽗. 걽� (룯誓¡� � 젺＋Ł稅�． �.�.�. 듺渽�쥯 �.�.) ("THE DESIGN OF THE UNIX OPERATING SYSTEM" by Maurice J. Bach) Copyright c 1986 뒶晳��졿⑨ Bell Telephone Laboratories. 닱쩆�� ぎ晳��졿�ⅸ Prentice-Hall. 롡ㄵゥ��� Simon & Schuster 씘＋㏂� 뒲ⓧ闇, 띿�-꽗�褻� 07632 뫁黍� きª �� �昔｀젹Л�с �‥召η��⑧ �ℓ졻�レ飡쥯 Prentice Hall. 뒶�率レ�젺� 곟젵젺 �. 뒫惜ª젺 ISBN 0-13-201757-1 025 [꺇筍�] 꺇筍� �. 먦ぎ¡ㅱ手� �� ����졿Ŧ���� 歲飡�Д UNIX / 룯�. � 젺＋. - �.: 뵪췅�頌 � 飡졻ⓤ殊첓, 1985. - 232 �. [뙉�] 뙫〃レ췅� ����졿Ŧ�췅� 歲飡�쵟: 뫍�젪�嶺Ø. - �.: 맆ㄸ� � 聲筌�, 1991. - 208 �. ISBN 5-256-00581-2 [뒫惜ª젺 � 룧ø] 뒫惜ª젺 �.�., 룧ø �. UNIX - 勝Ð�褻젷彛좑 蓀ⅳ� �昔｀젹Ж昔쥯�⑨. - �.: 뵪췅�頌 � 飡졻ⓤ殊첓, 1992 [HØⓥ��ぎ] HØⓥ��ぎ �ゥめ젺ㅰ, "PTS-DOS Œ� MS-DOS?". - "Computer World 뒯ⅱ", 28 ㄵ첓□� 1994, No 23(23), �.6. [Amstrad] Amstrad personal computer PC 1640. User instructions. Second edition, 1987 [Interrupt List] Interrupt List, Release 48, Last change 10/29/95 This compilation is Copyright (c) 1989,1990,1991,1992,1993,1994,1995 Ralf Brown [TECH Help!] TECH Help! ver 1.2 Copyright (c) 1985,1986,1987 by Dan Rollins and Flambeaux Software 룯誓¡� 췅 說遜え� �.�.�‥レ [PC Help] [Help PC] HelpPC 2.10 Quick Reference Utility Copyright (c) 1991, David Jurgens readme.2nd0100664000076500007650000001513106474633266012172 0ustar prool2prool2 뒥� Þ飡젷エ昔쥯筍 뤲乘Ø� 췅 ˘�� (ㄻ� 쭬｀習え � ˘���) ver.2 24.Feb.98 --------------------------------------------------------- 댂飡젷エ昔쥯筍 М� ▲恂ⅹ獸� � ▲恂ⅹ獸� ˘���, �� ��№ⅳÐ �젩エ軟 캙�젹β昔�, М┃� �黍 ��М蟯 BP.C (Boot Processor). 뤲젪쩆, � ⓤ��レ㎜쥯�Ŀ 呻Œⓥ� BP 魚�� �젳‥誓夭碎. 룼첓 �β ��ㅰ�∼�． ��ⓤ젺⑨, ぎ獸昔� 蝨�˙β¡黍ギ 〓 ˇ吟첓收レ�硫 ˚信 깷�薯⑨ 삦��ゥ쥯, 쩆� 涉� 夜�獸�: 1. BP 췅�ⓤ젺� 曄誓� ┏�� 2. BP ‥� 캙�젹β昔� ㄵ쳽β ˘�, 譽� �琉젰� 也ク 3. 꺂젪�硫 캙�젹β� ぎ쵟�ㄽ�� 飡昔え -d<與菴�> 將� ��Д� 信循�⒰手�, � º����: 0 - 氏�� A: 1 - 氏�� B: 2 - ˘�� (�젳ㄵ� C:) 3 - ... 귣 ㅳ쵟β�, 譽� 3 - 將� �젳ㄵ� D: ? 뺖�� �젹! � �� ㎛좐, も� �黍ㅳ쵟� Extended Partition, �� ��若┘, 將� Microsoft � �с ���� 쭬 將� �‘舒졻�... 燼�. 닩ο №�ㄵ ���ギ�좑 ㄻ� 聲�ⅲ� №�Д��, �� 稅�レぎ �췅 ％М薛좑 �黍�α쳽 (� Дオ�э＊�� ⓤ��キ��Ŀ). 댿젶, �졹細�循º 殊�①�莘 ぎ�十ｃ�졿⑧ 쳽Д褻ぎ． ぎН溢收��: � 궇� 飡�ⓥ 췅 C: Windows 95, ι� 췅 ˘�收 α筍 Extended partition, 貰飡�玎Ł �� �ㄽ�． ギ（曄稅�． ㄸ稅� - D: (췅�黍Д�, �琉�ゥ���． ㄻ� 뤲乘Ø��). 뮔� ¡�, �昔｀젹쵟 BP 淞ⓥ젰� extended partition �搜�レ�臾 �젳ㄵギ� (�乘ⅱ�� ㄻÞ�), � 첓┐硫 ギ（曄稅Ł ㄸ稅 - ι� �ㄽº �젳ㄵギ� (‘ゥ�-Д�ⅴ �〓嶺臾). 룼將�с � 궇� ▲ㄵ�: 2 - �젳ㄵ� C: (Primary partition) 3 - Extended partition 4 - logical disk D: (쭬Д殊� � 稅�―졾, 譽� 飡說も侁� Extended partition �曄�� ��若쬊 췅 飡說も侁� ＋젪��� Partition Table �� MBR (Master Boot Record)) H� 將� ι� �� ㏇�. 묅젺쩆設�臾� 蓀ⅳ飡쥯Ж Windows 95 誠�쳽筍 ㄸ稅 D: 쭬｀拾젰щ� ��レ㏆! 뙫┃� 誠�쳽筍 sys d:, М┃� ��獸� ぎ쵟�ㄾ� fdisk 誠�쳽筍 젶殊˛臾 �젳ㄵ� D:, �� ｀習ⓥ藺� � �ⅲ� ▲ㄵ� ��レ㏆! 룼曄с? 맆遜М循º �昔璵遜 쭬｀習え ��ㅰ�∼ⅴ. � 췅�젷� 쭬｀習え � 캙э筍 쭬｀拾젰恂� Master Boot Record, 貰ㄵ逝좈좑 ＋젪�莘 Partition Table � ⅸ ��誓쩆β碎 承�젪ゥ���. 뫌ㄵ逝좈졹� � MBR �昔｀젹쵟 ��誓ㄵワβ 젶殊˛硫 �젳ㄵ�, 쭬｀拾젰� � 캙э筍 ⅲ� ▲恂ⅹ獸� � ��誓쩆β �с 承�젪ゥ���, � ▲恂ⅹ獸� � 聲�� �曄誓ㅼ 쭬｀拾젰� 聲�� ����졿Ŧ��莘 歲飡�с. 뒶＄� � 궇� Windows 95 췅 C: (� �췅 ¡�↓� 췅 D: 僧ⅴ� 飡젪ⓥ藺�?), 獸 ㏇� �젩��젰� ��席젷彛�, 첓� � 〓ギ 쭬ㅳ쵟��. H� 귣 若殊收 貰ℓ졻� ι� �ㄸ� �젳ㄵ�, ��ЖМ C: 렊揖�硫 FAT-�젳ㄵ� Windows 95 貰ℓ졻� �� 쩆飡, �췅 М┘� 貰ℓ졻� 獸オ� extended �젳ㄵ�, � 췅 ��� - �ㄸ� Œ� �αぎレぎ ギ（曄稅ⓨ ㄸ稅��. 궙� 栒-獸 � 췅葉췅β碎 �젹�� Þ收誓說��. �もÐ�臾 (쭬｀拾젰щ�) 궓�ㄾ㏇ М┘� 誠�쳽筍 獸レぎ extended �젳ㄵ� (º���� �� 承�э�呻 � Master Partition Table). H� ｀習ⓥ藺� � 將�． �젳ㄵ쳽 ��レ㏆, �젶 첓� ⅲ� ▲恂ⅹ獸� 쭬��キ�� �乘詮� (� �� �昔｀젹М� 쭬｀習え) � 飡젺쩆設�臾� 蓀ⅳ飡쥯Ж Windows �①�� ㅰ膝º �� 쭬��キ畑恂�). 룼將�с 췅ㄾ �� 獸レぎ 誠�쳽筍 extended partition 젶殊˛臾 ぎ쵟�ㄾ� fdisk, �� � ��誓�ⓤ졻� 栒쩆 ぎ�⑧ �昔｀젹щ 쭬｀習え �� MBR (誠�쳽筍 將� М┃� 獸レぎ Мⅸ �昔｀젹М� BP Œ� ��設���㏇え� ㄸ稅-仍ⓥ�昔�, �� BP 將� ㄵ쳽β 蝨�∼ⅴ ;) bp -d@ mbr bp -d3 -i -a0 mbr 뮙��閃 М┃� ｀習ⓥ藺� � 獸� ����졿Ŧ���� 歲飡�щ, 譽� 信�젺�˙�췅 췅 ギ（曄稅�� ㄸ稅� D: 믡쩆 М┃� 信�젺�˘筍 MSDOS/MS Windows ぎ쵟�ㄾ� sys d: Œ� format d: /s Œ� 뤲乘Ø� ぎ쵟�쩆Ж bp -d4 -i booth16 copy a:*.* d: (αエ �졹캙ぎ쥯��硫 ㄸ飡黍▲殊� 뤲乘Ø�� � 궇� 췅 a:) 뤲Œ�┘���. 룧�젹β贍 �昔｀젹щ BP. 몺щ� �昔飡�� �留�� BP �黍Д惜� �젶��: bp -d0 file 뤲� 將�� ▲恂ⅹ獸� 信循�⒰手� 0 ぎ�ⓣ濕恂� � �젵� file � 쭬�ㄽ� �獸□젲젰恂� 췅 咨�젺� � 兒席� �젩エ劣. � 貰�手β飡˘� 與菴 誓젷彛臾 ㄸ稅젹 拾� ．¡黍ギ刷 �泣�, 쭬Д豫 獸レぎ, 譽� �醒∃�信循�⒰手� @ - 將� Master Boot Record. 렊�졻�硫 �昔璵遜 (ぎ�ⓣ�쥯��� �� �젵쳽 � ▲恂ⅹ獸�) �率耀飡˙畑恂� ㄾ줎˙����� 氏젫� -r ("誓´褻"). 뮔�, 稅��ⓣ�쥯筍 �η獸 � MBR М┃� ぎ쵟�ㄾ� bp -d@ -r nechto 괝닃�H늼! � �曄�� �� 誓ぎД�ㅳ� ぎ�ⓣ�쥯筍 譽�-エ‘ � MBR 聲�ⅲ� ˘�曄飡���, αエ 귣 �� 瑟�誓�� � ぎ薛ⅹ狩�飡� � ���▼�ㄸМ飡� 將ⓨ ㄵ⒰手Ł. 뙫┃� ゥ＊� � 蓀젳� ��收涉筍 ㏇� Þ兒席졿⑧, 貰ㄵ逝좈莘碎 췅 ˘�收 (ㄸ稅β�). (궚昔曄�, Windows М┘� � �� �젳誓鼇筍 궇� 將� 誠�쳽筍...) 낂� � �� 誓ぎД�ㅳ� ¡�↓� ⓤ��レ㎜쥯筍 か蹟 -r , �젶 첓� �� ��誓쭬�ⓤ猶젰� _´刷_ ▲恂ⅹ獸�, � 獸� 葉笹� �젩エ軟 캙�젹β昔� � �黍 將�� 獸┘ ¡㎚�┃� ㄾ飡졻�嶺� ���黍汀�瑜 ＋渽� (獸┘ М┃� ��收涉筍 ㏇� Þ兒席졿⑧ � ㄸ稅�) 꽞� Þ飡젷ワ與� 聲�ⅸ �昔｀젹щ 쭬｀習え � ▲恂ⅹ獸� 誓ぎД�ㅳβ碎 か蹟 -i ("Þ飡젷ワ與�"), ぎ獸贍� ぎ�ⓣ濕� � ▲恂ⅹ獸� 獸レぎ �昔｀젹Л硫 ぎ�, �飡젪ワ� �젩エ軟 캙�젹β昔� Œ� �젩エ軟 �젳ㄵギ� �� �㎚��Ð蜈⒰�. 궙� �젶 М┃� �昔Þ飡젷エ昔쥯筍 �說エめ�硫 ▲恂ⅹ獸� 췅 ㄸ稅β� A: bp -d0 -i boots.bin �, 췅ぎ�ζ, 캙�젹β� -a<與菴�> ⓤ��レ㎯β碎 �黍 Þ飡젷ワ與� �昔｀젹щ 쭬｀習え 췅 MBR-��ㄾ∼�� �醒∃�信循�⒰手� (MBR (-d@) Œ� extended partition). 댾��レ㎯� 將�� 캙�젹β�, М┃� 丞젳졻� 젶殊˛硫 (쭬｀拾젰щ�) �젳ㄵ� - 췅�黍Д�, 젶殊˛硫 ギ（曄稅Ł ㄸ稅 췅 Extended 캙設ⓩĿ. (닧�졻藺� 캙�젹β昔� -a � MBR � 췅飡�汀�レ�� �� 誓ぎД�ㅳ�, ㄻ� 將�． α筍 歲飡�Л좑 �昔｀젹쵟 fdisk. 궚昔曄�, ��-М�с, � ぎㄵ �昔｀젹щ BP � Д�� α筍 쭬蟯�� �� 貰曄�젺⑨ 氏젫�� -d@ -a � -i Œ� -r . � М┘� � �β �젶�� 쭬蟯瞬...) � ι�, �昔｀젹쵟 BP � �昔璵遜� �젩�瞬 �琉젰� �젩エ軟 ㏇ε �젳ㄵギ� 췅 쥯蜈� ˘�收. 뫌´栒� 細�循β� 췅 將� �젩エ軟. 궙� �黍Д� �젶�� �젩エ劣 ㄻ� ˘���, ºξ耀． �젳ㄵル c:, d:, e: Boot Processor 0.1.4 24-Feb-98 (C) 1993-1998, S.Pustovoitoff Dev Head Sec Trk/cyl Partition ------------------------------- 0 floppy drive 1 floppy drive 2 1 1 0 LARGE (06) 3 0 193 15 EXTENDL (0F) 4 1 193 15 FAT-12 (01) 5 0 193 18 EXTEND (05) 6 1 193 18 FAT-12 (01) 뒥� ˘ㄸ收, 2 - 將� �젳ㄵ� c: (primary partition), 3 - ��舒좑 extended partition, 4 - �젳ㄵ� (ギ（曄稅Ł ㄸ稅) d:, 5 - ™��좑 extended partition, 6 - �젳ㄵ� (ギ（曄稅Ł ㄸ稅) e: 뒥� ˘ㄸ收, 첓┐�с ギ（曄稅�с ㄸ稅� �誓ㅸα手濕� extended partition 뤲�刷줎 ぎ ㏇��, も� 將� 葉�젰�: 끷エ 쥯� �� �∥��, ��收飡ⓣ襲收 М� ▲恂ⅹ獸�. 꽞� 將�． 쩆┘ �� 췅ㄾ Þ飡젷エ昔쥯筍 췅 ˘�� ��キ硫 뤲乘Ø�. 댂飡젷エ說⒱�, 稅젲�� 췅 D:, ▲恂ⅹ獸� (�젵� src/boot/booth16.bin �� ㄸ飡黍▲殊쥯, αエ � 궇� FAT-16 � booth12.bin, αエ FAT-12) � 稅��ⓣ襲收 췅 D: � ぎ誓�� ▲燧��ⅵ�� (�젵� src/bm/boot) (�黍 ���▼�ㄸМ飡� Þ飡젷エ說⒱� � Extended partition �昔｀젹с 쭬｀習え �� MBR, 첓� ㏇� 將� ㄵ쳽筍, ��ⓤ젺� �泣�). 뫀�쳽� D: (Extended partition) 젶殊˛臾 ���昔▲⒱� ��誓｀習ⓥ藺� (쭬�젺ⅴ �黍．獸˘� 쭬｀習�嶺莘 rescue ㄸ稅β�!). � 誓㎯レ�졻졾 췅�②ⓥ�: E-mail prool@prool.kharkov.ua Fido 2:461/35 src/0040775000076500007650000000000007725636627011125 5ustar prool2prool2src/gist.doc0100664000076500007650000000257206445007324012545 0ustar prool2prool2 19쿛rool's activity for Proolix development 18� 栢栢栢 17� 栢栢栢 16� 栢栢栢 15� 栢栢栢 14� 栢栢栢 13� 栢栢栢 12� 栢栢栢栢栢栢 栢� 11� 栢栢栢栢栢栢 栢� 栢� 10� 栢栢栢栢栢栢栢栢栢 栢� 栢� 9� 栢� 栢栢栢栢栢栢栢栢栢 栢� 栢� 8� 栢� 栢栢栢栢栢栢栢栢栢栢� 栢� 栢� 7� 栢� 栢� 栢栢栢栢栢栢栢栢栢栢� 栢栢栢栢� 6� 栢� 栢栢栢 栢栢栢栢栢栢栢栢栢栢� 栢栢栢栢� 5� 栢� 栢栢栢 栢栢栢栢栢栢栢栢栢栢栢栢 栢栢栢栢� 4� 栢� 栢栢栢 栢栢栢栢栢栢栢栢栢栢栢栢 栢栢栢栢� 3� 栢栢栢栢� 栢栢栢栢� 栢栢栢栢栢栢栢栢栢栢栢栢栢� 栢栢栢栢� 2� 栢栢栢栢� 栢栢栢栢� 栢栢栢栢栢栢栢栢栢栢栢栢栢� 栢栢栢栢� 1넴栢栢栢栢栢� 栢栢栢栢� 栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢 栢栢栢栢� 1993컴�1994컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴1995컴컴컴컴컴컴컴컴컴컴컴컴컴컴� DecJanFebMarAprMayJunJulAugSepOctNovDecJanFebMarAprMayJunJulAugSepOctNov src/kernel/0040775000076500007650000000000007725636544012403 5ustar prool2prool2src/kernel/fprintf.c0100664000076500007650000000137106100170276014173 0ustar prool2prool2#include #include #include #include "kernel.h" /****************************************************************************/ int fprintf(FILE far *stream, const char far *format, ...) { va_list v; int counter; char buf [MAX_LEN_STR]; va_start(v,0); counter=vsprintf(buf,format,v); if(fputs(buf, stream)==EOF) return EOF; return counter; } /****************************************************************************/ int vfprintf(FILE *stream, const char *format, va_list v) { int counter; char buf [MAX_LEN_STR]; va_start(v,0); counter=vsprintf(buf,format,v); if(fputs(buf,stream)==EOF)return EOF; return counter; } /****************************************************************************/ src/kernel/kernel.h0100664000076500007650000000403607007576356014031 0ustar prool2prool2/* Include file for external c-functions for kernel (as memd.c) */ #include /* structures */ #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include /******************************** External variables ************************/ #ifdef MOUSE extern unsigned int PORT; #endif /* 뫊. ��ⓤ젺�� 將ⓨ ��誓Д��音 � �젵ゥ kernel.c */ extern int Mode, User; extern int HeadCnt, TrkSecs; extern unsigned long MaxSectors; extern unsigned int ProcessPar; extern struct {unsigned int ParNo; void (*Entry)(void);} SysTable []; extern unsigned long RootBeg, RootEnd, ResSecs; extern unsigned int CluSize; extern unsigned long DataStart; extern unsigned int MaxClusters; extern char Russian []; extern struct BufPool far *Cache; extern struct DevRecord Dev []; extern FILE FCBS [OPEN_MAX]; extern unsigned int CurDirClu; extern int Trace; extern int _argc; extern char far *_argv []; extern char far * far *pEnv; extern char far *hEnv; extern int curX, curY, maxX, maxY; extern char far *curAddr; extern char VideoAttrib; extern int CurrentDevice; extern int ReadOnly; extern int FATMode; extern int msdos_verbose; extern int SectorsOnCyl, FatSize, FatCnt; extern char MasterBootRecord [SECTOR_SIZE]; extern unsigned int CluSizeBytes; extern char far *OldInt; extern char far *KbdStatus; extern unsigned int MemTop; extern char Russian [256]; extern void interrupt (*OldTimerVec) (void); extern void far * Fin; extern struct DeviceStruct Devices []; extern int NextDOSDrive; extern struct processes process_table [PROC_MAX]; extern user_ss; extern user_sp; extern int emulation_mode; /* 꺂�줎レ�瑜 ��誓Д��瑜, ㄾ飡承�瑜 �� 材�褻え� �昔璵遜�� */ extern int errno; extern int More; extern int NLine; #define _HDD_ 0x80 #define EXTEND 5src/kernel/syscall.tbl0100664000076500007650000000605006667335156014555 0ustar prool2prool2; OS Proolix. System Calls Table ; 닾�귣㎜쥯 뿨笹츕졷젹β昔� [뮢囹쟼若쩆궆ㅰ� [ 뒶К���졷Ł]] _getch 0 _getchar 0 _getche 0 _kbhit 0 _kbhit0 _gets 2 __gets _putch 1 _putchar 1 _puts 2 _htoi 2 _htol 2 _atoi 2 _atol 2 _itoa 4 _ltoa 5 _ultoa 5 _ohs 2 _printf 50 _sprintf 50 _fprintf 50 _vsprintf 6 _vprintf 4 _clrscr 0 _inport 1 _inportb 1 _outport 2 _outportb 2 _textattr 1 _gotoxy 2 _inicom_ 0 _getcom_ 1 _putcom_ 2 _getcomstat_ 1 _getvect 1 _setvect 3 _geninterrupt 1 _end 0 _open 5 _creat 3 _read 5 _write 5 _close 1 _lseek 4 _filelength 1 _tell 1 _unlink 2 _rename 4 _dup 1 _minus dup _shutdown 0 _perror 2 _memccpy 7 _memchr 5 _memcmp 6 _memcpy 6 _memicmp 6 _memmove 6 _memset 5 _stpcpy 5 _strcat 5 _strchr 4 _strcmp 5 _strcpy 5 _strcspn 5 _strdup 3 ;_strerror 1 _stricmp 5 _strlen 2 _strlwr 2 _strncat 6 _strncmp 6 _strncpy 6 _strnicmp 6 _strnset 5 _strpbrk 5 _strrchr 4 _strrev 2 _strset 3 _strspn 5 _strstr 5 _strtok 5 _strupr 2 _tolower 1 _toupper 1 _isgraph 1 _isprint 1 _isalnum 1 _isalpha 1 _iscntrl 1 _isdigit 1 _islower 1 _ispunct 1 _isspace 1 _isupper 1 _isxdigit 1 _malloc 2 _calloc 4 _realloc 4 _free 2 _div 2 _ldiv 4 _chmod 4 __chmod 4 _access 3 _fopen 4 _freopen 6 _fdopen 3 _fileno 2 _fgetc 2 _fgets 6 __fgets _fputc 3 _fputs 4 _fread 8 _fwrite 8 _vfprintf 50 _fclose 2 _fflush 2 _ftell 2 _fseek 5 _fgetpos 4 _fsetpos 4 _rewind 2 _int86 5 _getcwd 3 _chdir 2 _opendir 2 _readdir 2 _telldir 2 _seekdir 5 _rewinddir 2 _closedir 2 _mkdir 4 _rmdir 2 _getenv 2 _stat 4 _fstat 3 _isatty 1 _qsort 8 _getftime 3 _setftime 3 _gettime 2 _getdate 2 _time 2 _ctime 2 _rand 0 _srand 1 _getcolor 0 _wherex 0 _wherey 0 _absread 7 _abswrite 7 _exit 1 _strtoul 6 _fork 0 _service 1 _exec 2 _wait 1 src/kernel/time.c0100664000076500007650000000423705733067274013503 0ustar prool2prool2#include #include #include "kernel.h" #include /*==========================================================================*/ #ifdef CMOS extern unsigned char hour, min, secund; #else extern unsigned long Tick; unsigned long trash; #endif extern unsigned char century, year, month, day, flag; /*==========================================================================*/ unsigned char unpack(unsigned char c) { return (c>>4)*10 + (c & 0xf); } /*==========================================================================*/ #ifdef CMOS void gettime (struct time far * timep) { readRTC (&hour, &min, &secund, &flag); (*timep).ti_min=unpack(min); (*timep).ti_hour=unpack(hour); (*timep).ti_sec=unpack(secund); (*timep).ti_hund=0; } /*==========================================================================*/ void getdate (struct date far * datep) { readRTCdate (¢ury, &year, &month, &day); (*datep).da_year=unpack(century)*100+unpack(year)-1980; (*datep).da_day=unpack(day); (*datep).da_mon=unpack(month); } /*==========================================================================*/ #else /*==========================================================================*/ void gettime (struct time far * timep) { ReadTick(&Tick,&flag); trash=(Tick*1000)/182; (*timep).ti_hund=trash%100; trash/=100; (*timep).ti_sec=trash%60; trash/=60; (*timep).ti_min=trash%60; (*timep).ti_hour=trash/60; } /*==========================================================================*/ void getdate (struct date far * datep) { ReadTick(&Tick,&flag); (*datep).da_year=century*100+year-1980; (*datep).da_day=day+flag; (*datep).da_mon=month; } #endif /*==========================================================================*/ time_t time (time_t far *tloc) {struct time timep; struct date datep; time_t l; gettime (&timep); getdate (&datep); l=dostounix(&datep, &timep); if (tloc!=NULL) *tloc=l; return l; } /*==========================================================================*/ #pragma warn -par char far *ctime (time_t timer) { return"Day Jan 00 99:99:99 1900\n"; } #pragma warn +par src/kernel/gets.c0100664000076500007650000000044606664343142013500 0ustar prool2prool2#include #include #include "kernel.h" /* #define DEBUG */ /****************************************************************************/ char *gets (char *s) { #include "gets.inc" } /****************************************************************************/ src/kernel/mem.c0100664000076500007650000000421006076527574013317 0ustar prool2prool2#include #include #include "kernel.h" /****************************************************************************/ void far *memcpy(void far *dest, const void far *src, size_t n) {size_t i; void far *ret; /* if (dest==NULL) return NULL; */ /* if (src==NULL) return NULL; */ ret=dest; for (i=0;ic2) return 1; else if (c1c2) return 1; else if (c12) if (path[1]==':') path+=2; #endif if (path[0]==SLASH) path++; cc=path; while(*path++); while(--path>cc) if (*path==SLASH) break; if(path==cc) c1=cc; else c1=path+1; #ifdef MSDOS if ((cc=strchr(c1,'.'))!=NULL)*cc=0; #endif return c1; } src/kernel/strlen.c0100664000076500007650000000053206075157640014043 0ustar prool2prool2#include #include #include "kernel.h" /****************************************************************************/ size_t strlen (const char far *s) { size_t i; /* if (s==NULL) return NULL; */ i=0; while (*s++)i++; return i; } /****************************************************************************/ src/kernel/memd.c0100664000076500007650000000340106157115430013444 0ustar prool2prool2#include #include #include "kernel.h" char cmd [MAX_LEN_STR]; void memd(void) { char far * Adr0; char far * Adr; char c; int i; char Option = 'H'; int segm, off; /* Adr0 = (char far *) 0; */ segm = 0; off = 0; Adr0 = MK_FP (segm, off); printf("End=%x:%x\nUse /? command for help\n",FP_SEG(end()),FP_OFF(end())); while (1) { printf("%4x:%4x ",FP_SEG(Adr0),FP_OFF(Adr0)); switch (Option) { case 'A': case 'M': for(i=0,Adr=Adr0;i<16;i++,Adr++) { if (*Adr>=' ') putch(*Adr); else putch('.'); printf(" "); } if (Option=='A')break; else puts(""); printf(" "); case 'H': for(i=0,Adr=Adr0;i<16;i++,Adr++){printf("%2X ",*Adr);} break; } puts(""); putch(':'); gets(cmd); i=0; while (cmd[i]) if (cmd[i]=='\r') {cmd[i]=0; break;} else i++; if (cmd[0]=='/') { switch (c=toupper(cmd[1])) { case 'R': saycsip(); break; case 'Q': puts(""); return; case 'A': case 'H': case 'M': Option=c; break; case 'S': segm=htoi(cmd+2); Adr0=MK_FP(segm, off); break; case 'O': off=htoi(cmd+2); Adr0=MK_FP(segm, off); break; case '?':puts( "Commands:\n\ /Q - Quit\n\ /A - Ascii mode\n\ /H - Hex mode\n\ /M - Mix (hex & ascii) mode\n\ /S - set Segment\n\ /O - set Offset\n\ /R - registers dump\n\ Enter - next string"); break; default: puts("Invalid command"); } printf("\n "); } else if (!cmd[0]) {off+=16; Adr0 = MK_FP(segm, off);} else ; } } src/kernel/tr.c0100664000076500007650000000017006330443226013147 0ustar prool2prool2#include "kernel.h" int TR (int curdev) { if (curdev>1) return _HDD_; /* HDD */ else return curdev; /* FDD */ } src/kernel/mv.c0100664000076500007650000000200105741033740013140 0ustar prool2prool2/*-------------------------------------------------------------------------*/ /* internal mv */ /*-------------------------------------------------------------------------*/ #include #include #include "kernel.h" void mv_help(void) { puts("Uses: mv [file1] [file2]"); } void mv(int argc, char far *argv[] ) { int ii, j, n, Files=0; char path[2][PATH_MAX]; argc--; ii=1; do { if (argc) { if (argv[ii][0]=='-') { n=(int)strlen(argv[ii]); for (j=1;j2) {mv_help(); return;} } } } while (ii++ #include #include "kernel.h" /****************************************************************************/ /* 뼢ギ葉笹��췅� 졷ⓧД殊첓 */ /****************************************************************************/ div_t div(int number, int denom) {div_t R; R.quot=number / denom; R.rem=number % denom; return R; } /****************************************************************************/ ldiv_t ldiv(long number, long denom) {ldiv_t R; R.quot=number / denom; R.rem=number % denom; return R; } /****************************************************************************/ int system (const char far *command) { if (command==NULL) return 0; else return 1; } /****************************************************************************/ char far *getenv (const char far *name) {int i, lname; lname=(int)strlen(name); for (i=0;i #include #include "kernel.h" int CatLine; void cat (int argc, char far *argv[] ) { int h; unsigned char c, far *cc; int i, Files=0; #ifdef DEBUG printf("Cat: %s\n",argv[1]); #endif CatLine=0; cc=&c; argc--; More=1; NLine=1; i=1; do { if (argc) { Files++; if ((h=open(argv[i],O_RDONLY))==-1) { printf("Can't open %s\n",argv[i]); } while (1) { if(read(h,cc,1)<=0) break; putch(c); } close(h); } } while (i++ #include #include "kernel.h" int putch3 (int ch) { int LastRowOffset, i; switch(ch) { case 0: break; case '\n': curX=1; curY++; curAddr=MK_FP(VIDEO_SEG,maxX*(curY-1)*2); if (curY>maxY) goto scroll; break; default: *curAddr++=ch; *curAddr++=VideoAttrib; if (++curX>maxX) { curX=1; if (++curY>maxY) {scroll: curY=maxY; curAddr-=maxX*2; LastRowOffset=(maxY-1)*maxX*2; memcpy(MK_FP(VIDEO_SEG,0),MK_FP(VIDEO_SEG,maxX*2),LastRowOffset); for (i=0;i #include #include "kernel.h" void qsort (void far *base, size_t nmemb, size_t size, int (far *compar)(void far *, void far *)) {int i, Permute; void far *b1, far *b2; char far *Bolvan; if (base==NULL) return; if ((Bolvan=malloc(size))==NULL) return; do { Permute=0; for (i=0; i<(nmemb-1); i++) { if (compar(b1=(char far *)base+(int)( i *size), b2=(char far *)base+(int)((i+1)*size) )>0) { /* swap */ Permute=1; memcmp(Bolvan,b1,size); memcmp(b1,b2,size); memcmp(b2,Bolvan,size); } } } while (Permute); free(Bolvan); } src/kernel/rand.c0100664000076500007650000000400506070344604013450 0ustar prool2prool2/* rand.c - pseudorandom numbers generation */ /* rand() srand() */ /* � NICE.SOURCES (2:461/35.301) Msg : 34 of 167 From : Al xCruel 2:4653/1.8 Fri 07 Apr 95 12:00 To : Jura Lobunets Subj : H젮�! 깷���졻�� 笹晨젵�音 葉醒�! 컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴 .MSGID: 2:4653/1.8 f85748e0 .REPLY: 2:463/212.5 2f71f91a .PID: timEd-g2+ .TID: FastEcho 1.41/g 1995 Jura Lobunets wrote in a message to All: JL> 롧��� 췅ㄾ subj! � む졻璵, 젷．黍燧 ％���졿Ŀ �醒∃�笹晨젵�音 葉醒� � Þ收舒젷� む졻��� 2 �젶��: - ‥誓� 誠˘．�硫 誓（飡�, - 쭬�ⓤ猶젰� � �ⅲ� 飡졷獸¡� ㎛좂����, | (쩆レ蜈 與か①��) | | - ��ャ�젰� �醒∃�笹晨젵��� 葉笹� �� 誓（飡�� (!), | - ‥誓� 〃� 2 誓（飡�� � Þ´設ⓣ濕� ⅲ�, | - ‥誓� 〃� 1 誓（飡�� � XOR'º ⅲ� � Þ´設�呻臾 2 〃獸�, | - ‥誓� 〃� 0 誓（飡�� � XOR'º ⅲ� � �誓ㅻㅳ蟯� 誓㎯レ�졻��, | - ��ャ葉�鼇⒰� � ⓥ�％ 〃� 쭬�ⓨÐ젰� � 飡졷鼇� �젳�젮 誓（飡��, | - 誠˘짛�� 誓（飡�, | | (與か 췅 ぎエ曄飡¡ ⓥ收�졿Ł) 뀮Þ飡´��硫 �ⅳ�飡졻�� - �昔�信첓荻碎 ぎАÞ졿Ŀ 殊캙 1010 � 0101 � �.�. � 貰�手β飡˘� � �젳涉ㄽ�飡溢. 꽑! 귣葉�젷 ㏇� 將� � �ㄽ�� 僧��� ▲ぅ, �젹 ι� 첓設Þ첓 〓쳽: ----- - - - - - - - - - ------------- | N | | 2 | 1 | 0 | Shift register ----- - - - - - - - - - ------------- ^ | | | | | | | | ------- | | | ---| XOR O<-------------- | | | |<------------------ | | |<---------------------- ------- bk00l! Al XCRUEl. --- * Origin: la sagrada familia (2:4653/1.8) .PATH: 4653/1 51/2 5100/8 5020/251 144 400 461/21 35 */ static unsigned int RandomSave; int rand (void) {unsigned int reg, bit; reg=RandomSave; bit=((!(reg&4))^(reg&2))^(reg&1); reg>>=1; reg|=(bit<<15); RandomSave=reg; if (reg<0) reg=-reg; return reg; } void srand (unsigned seed) { RandomSave=seed; } src/kernel/gets.inc0100664000076500007650000000246606664341336014036 0ustar prool2prool2int i; char buf[MAX_LEN_STR]; int c; if (s==NULL) {errno=EINVAL; return NULL;} for(i=0;i'); #endif switch (c) { case '\b' : /* ERASE=8 */ if (i) { if (wherex()==0) {int y; y=wherey(); if (y!=0) y--; buf[--i]=0; gotoxy(79,y); putch(' '); gotoxy(79,y); } else { buf[--i]=0; putch('\b'); putch(' '); putch('\b'); } } else buf[i]=0; break; case EOF : case 4 : /* CTRL D */ case '\r' : /* CR */ case '\n' : /* LF */ buf[i]=0; i=MAX_LEN_STR; break; default: buf[i++]=c; } } buf[MAX_LEN_STR-1]=0; #ifdef DEBUG printf(" gets:buf=",buf); puts(buf); #endif #if 1 for (i=0;i #include #include "kernel.h" #include "signal.h" /****************************************************************************/ void null_command(void); void run_boot(int dev,int head,int sec,int trk); void start(char *cmd); /****************************************************************************/ struct internal_commands { char far *command_name; void (*command_entry) (void); } InternalCommand [] = { {"cls", clrscr}, {"clear", clrscr}, {"dev", out_devices}, {"exitw", exitw}, {"", null_command} }; /****************************************************************************/ void null_command (void) { /* null action */ return; } /****************************************************************************/ int print_exec_message(int e) { switch(e) { case 1 : printf("%Fs: not found\n",_argv[0]); break; case 2 : printf("%Fs: not executable\n",_argv[0]); break; case 3 : printf("%Fs: read error\n",_argv[0]); break; case 4 : printf("%Fs: memory fault\n",_argv[0]); break; case 5 : printf("%Fs: no mem\n",_argv[0]); default: ; case 0 : ; } return e; } /****************************************************************************/ void garbage_collection(void) { if (!garbage()) puts("\nGarbage collected"); else puts("\nNo fragmentation"); } /****************************************************************************/ static void fcbs(void) {int i, j; char c; printf( "No ---name---- flag T Beg Size D ino Seek ACl RCl ASc RSc ofset\n"); for (i=0;i1) print_exec_message(i); else printf("%s: not found or not executable\n",_argv[0]); return ; } void boot(char far *argv[]) {int d; if (shutdown()) { printf("Shutdown error!\n"); return; } d=toupper(argv[1][0])-'A'; printf("boot from %c:\n",dos_letter(d)); switch(d) { case 0: case 1: run_boot(d,0,1,0); default: if (Devices[d].sec==0) {printf("Device %c: not present\n",dos_letter(d));return;} run_boot(0x80,Devices[d].head,Devices[d].sec,Devices[d].trk); } } /***************************************************************************** sh() *****************************************************************************/ char sh_str_orig [MAX_LEN_STR]; char sh_str [MAX_LEN_STR]; void interrupt far sh (void) { int i; puts(IDENT); while(1) { /* 귣¡� 歲Б�쳽-�黍＋좄��⑨ shell'� � ⇔�� ぎ쵟�ㄽ�� 飡昔え */ #ifndef DOSKEY for (i=0;i "); gets(sh_str_orig); #ifdef DEBUG printf("sh:"); printf(sh_str_orig); #endif #else printf("% "); doskey(sh_str_orig); #endif #if 0 if (!str[0]) goto shut; #endif strncpy(sh_str,sh_str_orig,MAX_LEN_STR); /* 맆㎕�� ぎ쵟�ㄽ�� 飡昔え */ i=0; while (sh_str[i]) if (sh_str[i]=='\r') {sh_str[i]=0; break;} else i++; _argc=0; i=0; /* 뤲��信� �昔‥ギ� � 췅�젷� ぎ쵟�ㄽ�� 飡昔え */ for(;(iMAX_ARG) {printf("Too many arguments"); goto l2;} for(;(i #include #include #include "kernel.h" /****************************************************************************/ /* #define DEBUG */ /****************************************************************************/ unsigned long SecForClu (unsigned int CluNo) {unsigned long l; /* Sector=ResSecs + FatCnt*FatSize + (RootSiz*32)/SectSiz + ((CluNo-2)*ClustSiz) ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ DataStart */ if ((CluNo>MaxClusters)||(CluNo<2)) { printf("SecForClu: Invalid cluster number. CluNo=%u, MaxClusters=%u", CluNo,MaxClusters); return -1; } l=DataStart + ( ((unsigned long)CluNo-2) * CluSize ); #ifdef DEBUG printf("sec4clu: return %li ",l); #endif return l; } src/kernel/string.c0100664000076500007650000001525006312077430014035 0ustar prool2prool2#include #include #include "kernel.h" /****************************************************************************/ char far *strcpy (char far *dest, const char far *src) {char far *cc; /* if (dest==NULL) return NULL; */ /* if (src==NULL) return NULL; */ cc=dest; do *dest++ = *src; while (*src++); return cc; } /****************************************************************************/ char far *stpcpy (char far *dest, const char far *src) { /* if (dest==NULL) return NULL; */ /* if (src==NULL) return NULL; */ do *dest++ = *src; while (*src++); return dest-1; } /****************************************************************************/ size_t strcspn(const char far *s1, const char far *s2) { size_t i; /* if (s1==NULL) return NULL; */ /* if (s2==NULL) return NULL; */ i=0; while(*s1) { if (strchr(s2,*s1)!=NULL)break; i++; s1++; } return i; } /****************************************************************************/ char far *strcat (char far *dest, const char far *src) { char far *cc; /* if (dest==NULL) return NULL; */ /* if (src==NULL) return NULL; */ cc=dest; while(*dest++); strcpy(--dest,src); return cc; } /****************************************************************************/ int strcmp (const char far *s1, const char far *s2) {char c1,c2; /* if (s1==NULL) return 0; */ /* if (s2==NULL) return 0; */ do {c1=*s1++; c2=*s2++; if (c1>c2) return 1; else if (c1c2) return 1; else if (c1c2) return 1; else if (c1c2) return 1; else if (c1 #include #include #define MAX_STR_LEN 256 int main(int argc, char *argv[]) {FILE *fi, *fo; char s [MAX_STR_LEN]; int Status; char *cc; printf("APP - Assembler PreProcessor Version 0.0.0.0 9-Feb-95\n\ Copyright (C) by Serge Pustovoitoff, 1995. prool@infocom.kharkov.ua, 2:461/35\n\ \n"); if (argc!=3) {printf("Syntax: app input_file output_file\n"); exit(0);} fi=fopen(argv[1],"r"); if (fi==NULL) {printf("Can't open input file %s\n",argv[1]); exit(1);} fo=fopen(argv[2],"w"); if (fo==NULL) {printf("Can't open output file %s\n",argv[2]); exit(1);} Status=0; if (fputs("\tinclude\tdebug.mac\n", fo)==EOF) {printf("Can't write output file %s\n",argv[1]); goto Ex; } while(1) { s[0]=0; if (fgets(s, MAX_STR_LEN, fi)==NULL) break; switch (Status) { case 0: /* 췅�젷彛�� 貰飡�輾�� 젪獸쵟�� */ if (!strcmp(s,"\tifndef\t??version\n")) {Status=1; continue; } break; case 1: /* 췅獄� ifndef ?? version */ if (!strcmp(s,"\tendif\n")) Status=0; continue; default: ; } /* filtr */ cc=s; if (memcmp(s,"\t?debug\t",7)==0) { switch (s[8]) { case 'S': case 'C': case 'E': case 'B': continue; case 'L': default : s[1]='\t'; cc=s+1; } } else if (memcmp(s+5,"short",5)==0) { strcpy(s+5,s+11); } if (fputs(cc, fo)==EOF) {printf("Can't write output file %s\n",argv[1]); break; } } Ex: fclose(fi); if (fclose(fo)==EOF) {printf("Can't close output file %s\n",argv[1]); exit(1);} exit(0); } src/kernel/k2.c0100664000076500007650000004364407007564464013065 0ustar prool2prool2#include #include #include "kernel.h" /* #define DEBUG */ /* #define PRINTF_DEBUG */ int NextDrive=2; /* disk C: */ void out_boot(void far *buf); /****************************************************************************/ #ifdef PRINTF_DEBUG char far *far_global_init = "far_global_init"; char far *far_global_uninit; char *near_global_init = "near_global_init"; char *near_global_uninit; char global_array_init [] = "global_array_init"; char global_array_uninit [100]; #endif #define EXTEND 5 #define EXTEND2 0xF #include "ppt.c" /****************************************************************************/ int shutdown(void) {int i; if ((i=FlushAll())!=0) puts("flush error"); return i; } /****************************************************************************/ int LinkClu (unsigned int CluNo, unsigned int NeXT) { int nsect, offset; long fat_byte_no; int b1, b2, b_next; unsigned char far *cc; unsigned int far *ii; if (CluNo>MaxClusters) {puts("LinkClu: Invalid cluster number"); return -1;} if (FATMode==FAT12) { /* FAT 12 */ /* ��誓ㄵワ�� ��Д� 줎⒱� � FAT */ fat_byte_no=(CluNo*3)/2; /* ��誓ㄵワ�� ��Д� 醒も��� FAT */ nsect=(int)(fat_byte_no/SECTOR_SIZE); /* nsect-�狩�歲收レ�硫 ��Д� 醒も��� FAT. 0 - ��舒硫 醒も�� FAT */ if (nsect>=FatSize) {puts("LinkClu: Invalid FAT's computing"); return -1;} if ( (b1=LoadCache(ResSecs+nsect)) == - 1 ) {puts("\nLinkClu: FAT read error"); return -1;} if (FatCnt==2) if ( (b2=LoadCache(ResSecs+nsect+FatSize)) == - 1 ) {puts("\nLinkClu: FAT read error"); return -1;} offset=(int)(fat_byte_no%SECTOR_SIZE); if (offset==(SECTOR_SIZE-1)) { (*(Cache+b1)).Status=2; cc=(unsigned char far *)((*(Cache+b1)).M+(SECTOR_SIZE-1)); if (CluNo&1) *cc=(unsigned char)(NeXT>>4); else {*cc&=0xf0; *cc|=(unsigned char)(NeXT>>8);} if ( (b_next=LoadCache(ResSecs+nsect+1)) == - 1 ) {puts("\nLinkClu: FAT read error"); return -1;} (*(Cache+b_next)).Status=2; cc=(unsigned char far *)((*(Cache+b_next)).M); if (CluNo&1) {*cc&=0x0f; *cc|=((unsigned char)(NeXT>>8))<<4;} else *cc=(unsigned char)(NeXT&0xff); if (FatCnt==2) { (*(Cache+b2)).Status=2; cc=(unsigned char far *)((*(Cache+b2)).M+(SECTOR_SIZE-1)); if (CluNo&1) *cc=(unsigned char)(NeXT>>4); else {*cc&=0xf0; *cc|=(unsigned char)(NeXT>>8);} if ( (b_next=LoadCache(ResSecs+nsect+1+FatSize)) == - 1 ) {puts("\nLinkClu: FAT read error"); return -1;} (*(Cache+b_next)).Status=2; cc=(unsigned char far *)((*(Cache+b_next)).M); if (CluNo&1) {*cc&=0x0f; *cc|=((unsigned char)(NeXT>>8))<<4;} else *cc=(unsigned char)(NeXT&0xff); } } else { (*(Cache+b1)).Status=2; ii=(unsigned int far *)((*(Cache+b1)).M+offset); if (CluNo&1) {*ii&=0xf; *ii|=NeXT<<4;} else {*ii&=0xf000; *ii|=NeXT&0xfff;} if (FatCnt==2) { (*(Cache+b2)).Status=2; ii=(unsigned int far *)((*(Cache+b2)).M+offset); if (CluNo&1) {*ii&=0xf; *ii|=NeXT<<4;} else {*ii&=0xf000; *ii|=NeXT&0xfff;} } } } else { /* FAT 16 */ /* ��誓ㄵワ�� ��Д� 줎⒱� � �젩エ璵 FAT-16 */ fat_byte_no=((long)CluNo)*2; /* ��誓ㄵワ�� ��Д� 醒も��� FAT */ nsect=(int)(fat_byte_no/SECTOR_SIZE); /* nsect-�狩�歲收レ�硫 ��Д� 醒も��� FAT. 0 - ��舒硫 醒も�� FAT */ if (nsect>=FatSize) {puts("LinkClu: Invalid FAT's computing"); return -1;} if ( (b1=LoadCache(ResSecs+nsect)) == - 1 ) {puts("\nLinkClu: FAT read error"); return -1;} if (FatCnt==2) if ( (b2=LoadCache(ResSecs+nsect+FatSize)) == - 1 ) {puts("\nLinkClu: FAT read error"); return -1;} offset=(int)(fat_byte_no%SECTOR_SIZE); (*(Cache+b1)).Status=2; *(int far *)((*(Cache+b1)).M+offset)=NeXT; if (FatCnt==2) { (*(Cache+b2)).Status=2; *(int far *)((*(Cache+b2)).M+offset)=NeXT; } } return 0; } /****************************************************************************/ unsigned int GetFreeClu(void) {int i; /* ��ⓤ� �� FAT */ for(i=2;i<=MaxClusters;i++) { if (NextClu(i)==0) {/* 췅獄� �信獸� か졹收� */ /* 쭬�º젰� ⅲ� � ¡㎖�좈젰� ⅲ� ��Д� */ if (LinkClu(i,0xffff)!=-1) return i; else return -1; } } /* �β �信瞬� か졹收昔� */ return -1; } /****************************************************************************/ unsigned int AppendClu(unsigned int CluNo) {unsigned int i; if (CluNo>MaxClusters) {puts("AppendClu: Invalid cluster number"); return -1;} if ((i=GetFreeClu())==0xFFFF) return 0xFFFF; /* 췅獄� �信獸� か졹收� */ /* 兒席ⓣ濕� ��笹ⅳ�ⅴ ㎖��� 璵��囹� か졹收昔� */ if (LinkClu(CluNo,i)==-1) return 0xFFFF; else return i; } /*--------------------------------------------------------------------------*/ char dos_letter(int dev) { if (dev<2) { return dev+'A'; } else { return (dev-2)/2+'C'; } } /*--------------------------------------------------------------------------*/ void print_mount(void) { if (CurrentDevice==-1) puts("No device mount"); else { printf("Mount at %i (DOS %c:)",CurrentDevice,dos_letter(CurrentDevice)); printf(" mode read"); if (ReadOnly) printf(" only"); else printf("/write"); if (emulation_mode==1) printf("\n(running under MSDOS or MSDOS-emulator (f.e. Windows 95))"); printf("\n"); } return; } /*--------------------------------------------------------------------------*/ void mount(int NewDevice) { int i; unsigned char sec, head, trk; struct MBRstru *MBR; struct BootStru far *B; char Buf [SECTOR_SIZE]; if (NewDevice==-1) { print_mount(); return; } if (CurrentDevice!=-1) #if 0 { printf("Already "); print_mount(); return; } #else { umount(); } #endif if(Cache==NULL) {puts("mount: No memory for disk cache"); return;} for(i=0;i1) { /* HDD */ if ((Devices[NewDevice].sec==0)||((FATMode=Devices[NewDevice].FileSystem)==NO_FAT)) { printf("mount: invalid device\n"); CurrentDevice=-1; return; } head=Devices[NewDevice].head; sec=Devices[NewDevice].sec; trk=Devices[NewDevice].trk; if (ReadPhysSec2 (_HDD_, sec, head, trk, Buf)) printf ("boot: partition boot sector read error\n"); #ifdef DEBUG printf("partition boot sector loaded OK\n"); #endif B = (void far *) Buf; HeadCnt=B->HeadCnt; TrkSecs=B->TrkSecs; SectorsOnCyl=HeadCnt*TrkSecs; #if 0 ResSecs=(unsigned long)Devices[NewDevice].sec+ (unsigned long)Devices[NewDevice].head*(unsigned long)TrkSecs+ (unsigned long)Devices[NewDevice].trk*SectorsOnCyl; #else ResSecs=(unsigned long)(Devices[NewDevice].sec & 0x3F)+ (unsigned long)Devices[NewDevice].head*(unsigned long)TrkSecs+ (unsigned long)(Devices[NewDevice].trk|((int)(Devices[NewDevice].sec & 0xC0)<<2))* SectorsOnCyl; #endif #ifdef DEBUG printf("ResSecs=%lu\n",ResSecs); #endif MaxSectors=Devices[NewDevice].MaxSectors+ResSecs; } else { /* FDD */ FATMode=FAT12; if (NewDevice==1) if (Devices[NewDevice].sec==0) { printf("mount: invalid device b:\n"); CurrentDevice=-1; return; } if (bootread(CurrentDevice,Buf)) { puts("mount: Boot read error"); CurrentDevice=-1; } B = (void *) Buf; if ((i=B->ResSecs)!=0) ResSecs=i; ResSecs=B->HidnSec+1; if ((i=B->TotSecs)!=0) MaxSectors=i; else MaxSectors=B->BigSect+B->HidnSec; #if 0 out_boot((void far *) Buf); #endif HeadCnt=B->HeadCnt; TrkSecs=B->TrkSecs; SectorsOnCyl=HeadCnt*TrkSecs; } if (CurrentDevice!=-1) { CluSize=B->ClustSiz; CluSizeBytes=CluSize * SECTOR_SIZE; FatSize=B->FatSize; FatCnt=B->FatCnt; #ifdef DEBUG printf("\nQ4 "); #endif RootBeg = ResSecs + B->FatCnt * B->FatSize; #ifdef DEBUG printf("\nB->SectSiz=%i ",B->SectSiz); #endif RootEnd = RootBeg + ( ( B->RootSiz * 32 ) / B->SectSiz ) - 1; #ifdef DEBUG printf(" Q4.2 "); #endif DataStart = RootEnd+1; #ifdef DEBUG printf(" Q4.3 "); #endif MaxClusters=(unsigned int)((MaxSectors-DataStart)/CluSize+1); #ifdef DEBUG printf(" Q5 "); #endif #if defined (DEBUG) /***/ printf("\nHeadCnt =%2i TrkSecs =%2i CluSize =%2i FatSize =%2i FatCnt =%1i\ RootBeg =%lu\nRootEnd =%lu ResSecs =%lu MaxSectors =%lu MaxClusters =%u", HeadCnt,TrkSecs,CluSize,FatSize,FatCnt,RootBeg,RootEnd,ResSecs, MaxSectors,MaxClusters); printf("\nboot: Cluster size = %u\n",CluSizeBytes); #endif /***/ CurDirClu=0; puts(""); } #endif /* NODISK */ #ifdef DEBUG printf(" Q6 "); #endif } /*--------------------------------------------------------------------------*/ void umount (void) {int i; shutdown(); CurrentDevice=-1; if(Cache==NULL) {puts("umount: No memory for disk cache"); return;} for(i=0;i>4); (*MB).SizePar=MemTop-CurPar; /* 쭬��Ж췅��� ㏇ε ´も�昔� �誓贍쥯�Ł */ if ((OldInt=malloc(256*4))==NULL) puts("No mem for old interrupt table"); if (OldInt!=NULL) { __cli__(); memcpy(OldInt,MK_FP(0,0),256*4); __sti__(); #ifdef DEBUG puts("\nInterrupt vectors saved"); #endif /* printf("Orig Int5=%04X:%04X\n", *(int far *)5*4,*(int far *)(5*4+2)); */ } else puts("init(): No mem"); setvect(0x0,Int0); setvect(0x3,Int3); #ifdef CHANGE_INTS initv(); setvect(0x18,done); setvect(0x19,CtrlAltDel); setvect(0x1,Int1); setvect(0x2,Int2); setvect(0x4,Int4); setvect(0x6,Int6); setvect(0x7,Int7); setvect(0x75,Int75); #endif /* #ifdef CHANGE_INT5 */ /* setvect(0x5,Int5); */ /* setvect(5, (void interrupt(*)(void))MK_FP(_Begin,FP_OFF(Int5dump))); */ /* puts("Int 5 hooked"); */ /* #endif */ curAddr=MK_FP(VIDEO_SEG,0); /* 뫊�循� ぎК���졷Ł � ��ⓤ젺⑨ �昔獸殊캙 押�ゆĿ SysCall1 (將� �泣�) */ /* setvect(INT_NO, (void interrupt(*)(void))MK_FP(_Begin,FP_OFF(SysCall1))); */ setvect(INT_NO, SysCall2); #ifdef DEBUG printf("before MSHerc\n"); #endif #if defined(_HERCULES_) && defined(_MSHERC_) if(!mshercinit()) printf("\nHercules Resident Video Support Routines. Version 1.10+Proolix"); else printf("\nHercules Video Card not present."); #endif OldTimerVec=getvect(0x8); /* setvect(0x8,Int8); */ /* setvect(0x85,Int8); */ #if CODETABLE==_RUSSIAN_ /* russification module initialization */ for (i=0;i<256;i++) Russian[i]=i; for (i='A';i<='Z';i++) Russian[i]=RussianUpper[i-'A']; for (i='a';i<='z';i++) Russian[i]=RussianLower[i-'a']; Russian['[']='�'; Russian['{']='�'; Russian[']']='�'; Russian['}']='�'; Russian[';']='�'; Russian[':']='�'; Russian['\'']='�'; Russian['"']='�'; Russian[',']='�'; Russian['<']='�'; Russian['.']='�'; Russian['>']='�'; #endif if ((hEnv=malloc(ARG_MAX))==NULL) puts("init: No mem for argv"); if ((pEnv=malloc(MAX_ENV*4))==NULL) puts("init: No mem for main env."); for (i=0; i1) ReadOnly = HDD_READ_ONLY; else ReadOnly = 0; {unsigned int seg; seg=FP_SEG((unsigned long)getvect(0x21)); printf("int 21h seg=%04X\n",seg); if (seg!=0xF000) {emulation_mode=1; i=2; /* ReadOnly=1; */ } else {emulation_mode=0;} } CurrentDevice=-1; mount(i); } /****************************************************************************/ void test_devices(void) {unsigned int i; struct MBRstru *MBR; char MBRBuf [SECTOR_SIZE]; for (i=0;i>6)+1; #ifdef DEBUG printf("disk drives number = %i\n\n",i); #endif if (i) Devices[0].sec=-1; if (i>1) Devices[1].sec=-1; if (bootread0 (_HDD_, MBRBuf)) printf ("test_devices: MBR read error\n"); #ifdef DEBUG outMBR(MBRBuf); #endif #ifdef DEBUG printf("# head sec trk ResSecs MaxSectors\n"); #endif process_partition_table (MBRBuf); }src/kernel/sayr.asm0100664000076500007650000000136206046773230014047 0ustar prool2prool2; say string locals _TEXT segment byte public 'CODE' assume cs:_TEXT sayr_proc proc ; 뤲�璵ㅳ�� �猶�쩆 飡昔え �黍 ��М蟯 押�ゆŁ BIOS ; 귛��: DS:SI - ASCIIZ 飡昔첓. ; All registers saved ; � ｀졽①αえ� 誓┬쵟� �� �젩��젰� ; ALL REGS SAVED! push ax push si PUSHF cld sayr_l1: lodsb or al,al jz sayr_ret mov ah,0eh int 10h jmp short sayr_l1 sayr_ret: POPF pop si pop ax ret sayr_proc endp public sayr_proc _TEXT ends end src/kernel/vec.c0100664000076500007650000000050106076535430013303 0ustar prool2prool2#include #include #include "kernel.h" void vec (int argc,char far *argv[]) {int i; if (argc==2) { i=htoi(argv[1]); OutIntVector(i); return; } else { More=2; NLine=1; for (i=0;i<256;i++) if (OutIntVector(i)==EOF) break; puts(""); More=0; NLine=1; } } src/kernel/syserr.c0100664000076500007650000000422606330442766014067 0ustar prool2prool2char *sys_errlist[] = { /* EZERO 0 */ "Error 0 - no error", /* EINVFNC 1 */ "Invalid function number", /* ENOENT 2 */ "No such file or directory", /* ENOPATH 3 */ "Path not found", /* EMFILE 4 */ "Too many open files", /* EACCES 5 */ "Permission denied", /* EBADF 6 */ "Bad file number", /* ECONTR 7 */ "Memory blocks destroyed", /* ENOMEM 8 */ "Not enough core", /* EINVMEM 9 */ "Invalid memory block address", /* EINVENV 10 */ "Invalid environment", /* EINVFMT 11 */ "Invalid format", /* EINVACC 12 */ "Invalid access code", /* EINVDAT 13 */ "Invalid data", /* 14 */ "Unknown error", /* ENODEV 15 */ "No such device", /* ECURDIR 16 */ "Attempt to remove CurDir", /* ENOTSAM 17 */ "Not same device", /* ENMFILE 18 */ "No more files", /* EINVAL 19 */ "Invalid argument", /* E2BIG 20 */ "Arg list too long", /* ENOEXEC 21 */ "Exec format error", /* EXDEV 22 */ "Cross-device link", /* 23 */ "Unknown error", /* 24 */ "Unknown error", /* 25 */ "Unknown error", /* 26 */ "Unknown error", /* 27 */ "Unknown error", /* 28 */ "Unknown error", /* 29 */ "Unknown error", /* 30 */ "Unknown error", /* 31 */ "Unknown error", /* 32 */ "Unknown error", /* EDOM 33 */ "Math argument", /* ERANGE 34 */ "Result too large", /* EEXIST 35 */ "File already exists", /* EFAULT 36 */ "Unknown error", /* EPERM 37 */ "Unknown error", /* ESRCH 38 */ "Unknown error", /* EINTR 39 */ "Unknown error", /* EIO 40 */ "Unknown error", /* ENXIO 41 */ "Unknown error", /* ECHILD 42 */ "Unknown error", /* EAGAIN 43 */ "Unknown error", /* ENOTBLK 44 */ "Unknown error", /* EBUSY 45 */ "Unknown error", /* ENOTDIR 46 */ "Unknown error", /* EISDIR 47 */ "Unknown error", /* ENFILE 48 */ "Unknown error", /* ENOTTY 49 */ "Unknown error", /* ETXTBSY 50 */ "Unknown error", /* EFBIG 51 */ "Unknown error", /* ENOSPC 52 */ "Unknown error", /* ESPIPE 53 */ "Unknown error", /* EROFS 54 */ "Unknown error", /* EMLINK 55 */ "Unknown error", /* EPIPE 56 */ "Unknown error", /* EUCLEAN 57 */ "Unknown error" }; int sys_nerr = 57; src/kernel/putch2.asm0100664000076500007650000000665206047243372014305 0ustar prool2prool2; int putch3 (int ch) .8086 jumps _TEXT segment byte public 'CODE' assume cs:_TEXT VIDEO_SEG equ 0B800H _curX dw 1 _curY dw 1 _maxX dw 80 _maxY dw 25 _curAddr dd 0 _VideoAttrib db 7 _LastRowOffset dw 0 _putch2 proc near push bp mov bp,sp ; SAVE ALL REGS push ax push bx push cx push dx push si push di PUSHF ; byte ptr [bp+4] - argument # 1 ;int LastRowOffset, i; cld ;switch(ch) ; { ; case 0 : break; mov ax,word ptr [bp+4] or ax,ax jz l_break ; case '\r': break; cmp ax,13 je l_break ; case '\n': curX=1; cmp ax,10 ; '\n' jne l_default mov _curX,1 ; curY++; inc _curY ; curAddr=MK_FP(VIDEO_SEG,maxX*(curY-1)*2); mov word ptr _curAddr+2,VIDEO_SEG mov ax,_curY dec ax shl ax,1 mul _maxX mov word ptr _curAddr,ax ; if (curY>maxY) goto scroll; mov ax,_curY cmp ax,_maxY ; jg l_scroll ; break; jmp l_break ; default : *curAddr++=ch; l_default: les di,_curAddr stosb ; *curAddr++=VideoAttrib; mov al,_VideoAttrib stosb add word ptr _curAddr,2 ; if (++curX>maxX) mov ax,_curX inc ax mov _curX,ax cmp ax,_maxX jle l_1 ; { ; curX=1; mov _curX,1 ; if (++curY>maxY) mov ax,_curY inc ax mov _curY,ax cmp ax,_maxY JMP l_2 ;;;;;;;;;;;;;;;;;;;; jle l_2 ; {scroll: l_scroll: ; curY=maxY; mov ax,_maxY mov _curY,ax ; curAddr-=maxX*2; mov ax,word ptr _curAddr mov bx,_maxX shl bx,1 sub ax,bx mov word ptr _curAddr,ax ; LastRowOffset=(maxY-1)*maxX*2; mov ax,_maxY dec ax mul _maxX shl ax,1 mov cx,ax mov _LastRowOffset,ax ; memcpy(MK_FP(VIDEO_SEG,0),MK_FP(VIDEO_SEG,maxX*2),LastRowOffset); push DS mov ax,VIDEO_SEG mov DS,ax mov ES,ax mov si,_maxX shl si,1 xor di,di rep movsb ; DS:SI -> ES:DI pop DS ; for (i=0;i #include #include "kernel.h" /****************************************************************************/ char far *strchr (const char far *str, int c) { /* if (str==NULL) return NULL; */ while (*str) if (*str==c) return (char far *) str; else str++; return NULL; } /****************************************************************************/ src/kernel/dos.c0100664000076500007650000000161105710520052013302 0ustar prool2prool2#include #include #include #include "kernel.h" /****************************************************************************/ int int86 (int intno, union REGS far *inregs, union REGS far *outregs) {int i; i=(*inregs).x.ax; /* mov bx,word ptr [bp+6] mov ax,word ptr [bx] mov word ptr [bp-2],ax */ i=(*inregs).x.bx; /* mov bx,word ptr [bp+6] mov ax,word ptr [bx+2] mov word ptr [bp-2],ax */ i=(*inregs).h.al; /* mov bx,word ptr [bp+6] mov al,byte ptr [bx] mov ah,0 mov word ptr [bp-2],ax */ } /****************************************************************************/ /* int int86x (int intno, union REGS *inregs, union REGS *outregs, struct SREGS *segregs) { } */ src/kernel/de.c0100664000076500007650000000264106272502154013120 0ustar prool2prool2/*-------------------------------------------------------------------------*/ /* internal disk edit */ /*-------------------------------------------------------------------------*/ #include #include #include "kernel.h" void de (void) { unsigned int n; char str[MAX_LEN_STR]; puts("Proolix Disk Editor by Serge Pustovoitoff\n\n\ The Disk Editor is currently in Read-Only mode"); printf("0 - boot sector\n1 -%i - FAT\n%i-%i - root dir\n%i-%i - data area\n", RootBeg-1,RootBeg,DataStart-1,DataStart,MaxSectors-1); while(1) {int line, adr, b; More=1; NLine=1; printf("Sector no > "); gets(str); *strchr(str,'\r')=0; if (!str[0]) break; n=atoi(str); printf("Sector no %i",n); if (n==0) puts(", boot sector"); else if (n=' ') putch(c); else putch (' '); } puts(""); adr+=16; } More=0; NLine=1; } /* */ } puts(""); ret:return; } src/kernel/pklite.exe0100664000076500007650000003676604547516600014402 0ustar prool2prool2MZ�� ��n��RPKLITE Copr. 1990-91 PKWARE Inc. All Rights Reserved퇥빔=;r� ��!� Not enough memory$뗽곻JWWR묶풙뗿�It춶짬毅�_w�仙휝� 鏑뢍�%눁�hE> 큾Nw�&시6邃�1롾r�"栓�꼻MZ�ł� $봬8;솚OU�|#G둕(쩠곌鍔+#J흷:�=_��퀜8昇�O댘(F��@袗� ]훦$G�딐]웩00P�럼붆}',�F��?�a`!`뎸�&{냷B��²�49�\$퀿W^�d�m�U��車�뻵繒��"學Q�4(쓃\�뙶a��_9�*w[d쫏�0椽!с�/燼\�u� " U�*調�'� 컨�*e\z줞 =�쌥n뀖�[�0�|�1C]�1卨게� �?ｔ奢 A可=티4�쎴� ⅓0\}�J�^}�B텞�2텩�J땅�R�셤 @�;챛� :$��X��+눰짰�;f .%-�兀t���&�� &�&�&W뒓��0也r� )���$뛱 Q3~륰�랔��컔D歆5gHB�1�8 說귎(LwR�Fp�뉱4랎<�6� 4P4�G)vO' 얽'�(�^唵쒳�^3쑺CD��取wV`�"��5$@h � -�[ }c퇥��A�ZFo)� "��� 坐�멖��숿揄쟕�1Ny"��@;A床�$�9/儲桀�.끀됨.K .�.켧�d�� �뛒���(핰|�*i뱬tP@N�뛏驩�5-숫R�+騏T I롉～\_�>Yp짨ip狐� �Y�4 T��zr�{�]烈d"za�4yXn瑕�&3舛 � rjM��P��P8� ��/ �43�.椰(곔�n%� -V�릪T꽶o��8켥�븡PxN찉��`⁴�쨐 l�?�쨓�#댵9x{/� N�P.�$C4컿벸 � �孼b갢R���% �q&?멦|.<�Fpx �� 謚?G�採�쥘K ���낷 쯱 쟟N�o� Q�0�PX�-츢%�x�d;쪤f먛�^퀽W�`�,|/뛳쪫Rd멉'貝�ㅼ쫭��}�� m츈@���'L�x+�5� s@Dx� F\枰챟嗅H率� I;�꾔녿 �拇利��<�榧'�!��L]졍갳츑J��Xf�5控? O죕D� {펉� {#�?� ��� � ~�� 麗H 鴛�h뗤챢��z[�졲�|. �d)�퉓詰Ｕe��揚껅+뉺Fw�|れ �V켨}說�낦異��(棕�-瑪N��*�B��/�#B��v"�c�0�el&�S�]� O쯣0��5던�w >냥뛢�$t� <�z�easM9;Y꺨�X巧����?�w �@뭔s걌B%�oV�^|�:^�<�쮤�/��f�to'�'嚼}w갿c좜�4瑃N횳v男o앇皇�5� 쇛�做륬�$�Ty�g�)2簡24뤳 ]_�[����*�5ycs���E'�Q숡;쉅콠��8|_ �ㅣ줭� ��)�� ��"P 貰�Nq壘' g�38燔�\�P$��8�\黜}i{븠�뫬�쪒4%}/>w 풁�F �뜳'㎀�k/�얔\(廬쌠귯�,뷧(쉦/�< 벡�q�6� �~ 쑘� ��� �5�q*뙗 �[酎hP뚞�_�邪A�1O�댉 걱쒇��썕�i � 克딧�5�� \�(�� �~7�Z퐅,�n�{�쇹�_�5[�%!혛�흨咫뛈꽈� �~붕8곟愕A랣�*kÐ?-(k.B)� 퐗+�蹂��娠�筋�b級�銷=0�C��@븊2益ij@�/섗�D�) 꿗)�}�@퇘火�U�뢛z <.)�gF"1I�aT"x춽fAp�^`a�a�D��T!�0Rx� &K��쾁�.�?�`X�z폨��_닄��(K�KFE I�,c� Ju/M�t)��#M�,鈺눭괔 -N�`���!� ?'췿 槐z(잠�� �� 本�뿈8댤�8J�6��*'�D"&K9]맃옫I"�z@V��봋Nh k%�bq稙흃& +졻��윒�茴�=  {,��叉z)�땮�/넲%雀臧��&$쳹ca8$|,�(陪*�*@�一p�^椽,�랓눝 띛A� �v�뛸U�c�8⒲죢沃Jo|���1西갢害$�� 햢#y��H폶슐�~  �%GB<듿$귶�bNy�2쎍첗k6�dC w5�3y-띬�N胄N출4措yOL� �[�솁pボ!F펴F0�왆�?��&A몣�.y쒼 V5憚(�B 體�뤲뿈�/�#c+[r�7�&�J�2푪�쯬g㎈�)U`�`U� ㅷ7뾚�D츋껷�c��ы�*�끫s5�v-)h):d)�7�뢶於�쌼킄y!� �!a*f-跣N�J懶�"裂� cu퐷3m운쒻e01�+ �*$�J`;�NF�W렺뮌� 꾍&數航{쟓 R��+���r$� �"�\�H"c�W�6Q�뷽/�T@��a귗.#걖]�B洸$p9�`꺎(꼃녰�죟됷*숇 H�25�몏뾿섳�Y�e� �쐺H+Iu�x�4X냠'�믜c�_6�|�ab뵒���& ��Pe&�<5x�|�G�+>�w�e�}쫣륻�갦�� 0웸琫 �=혇R��뙼뇋照|� 뉶�@&��Z�番竗 5�껪瑤�� � �;�2홻묵p �G+� �섪쉶v��#L픕���^�<E�@�^J�1�)衡 Q�2�ル�]1�]뽕R:삳'";"��隕쾖 )� �뛘��떮�#꿑�갮Z �KK뙠똜vE�*�W?G8G�@嚥臆M鬪�v�뭲�[3�脆∵�c(쮎-0d뺣B IUF�6�,<:딞A긗 ���.Q��9햺`豫*Rp첎줽T*HB征A$틴� 탶^[넉瘍� +諶_凉z 쬳휅m� :g왏��!�벶�꼧�錮�,뢙P턶緯< <#�<劉<컿�9�y�@5ｐ>�%� ��DE�붘L �kF�)vR얬"I�/- S�힓셱�]�=�h�딥�z� 엲�n뭖�먶�7쏻壎`됃呂?;�-�j��#玉倡鑽�낆�4��/� �g�:�/촚�, (3買��jzo�"�@$쫒�뮉쟭ez5>�;�r��C��붧~9Qd9쐬�L��騫�w� �#� +� I�X{�,냔 깔�H�쑔� �h륯澔▧㏘쪹�`� ���$�*%[�'�0} �NA穿�떧� �넱�y�벧b 柳� $�r件��M듿�琡���v3<^^荀"HU� �믛��B�H��―녊&8홽n@톗�s�몔2Wqo륭"Y�Y몆Z巢�쐁��c ��)s=)��핞Q,굓낛q� g L #힕�c ���k喩x基��p�\U뉯#퐻럛症(愕n�25 �}(zT솘;굴�:s6x 6� 'S�?ㅆ0��笏�ct�%�"%P!딹{ｇ$叉O�$'� �~��,9�%8@앚�} 냱�$�� ��9 w t wr� y u<0꾇>O3햝跨<k;�3 �8� � p�虐 3D唯�� KGH�~��!&�%�]]몵�뜝깠�U랊!>%<�(��め � &I�  *,�4�Z� 30B_�;6"�Q齟m쀈{ 警�7��l멃�Z�:� Y[;흟� �t�x 0�>�겇���M#����F �V�Z�=P"3D썠A�%G&휄�총�|뽸�7%vp蘿�"hzz�꾝죪&x;�#"宜 z#訟 q꼮:�몿:�&�x/녑���a��f�  �)�J�((;片v\�L��$�H�뀒��괽� t�낛u6�L轄�흆��;a굮z�\픨e� �`慝눍d�}v놰I�r틡;�L녟�[o罹 7��1k솚��뫠廠�->+7Y�X� C#�h�.�3� z ��졕綬夙(0sr"쟵�{�c��G갧럣D�Q pJd�뗷yY놛y�yp�1�eDmV�/o(픅�,m請A 24Fm<�dh�m-靖 3�m涉 m�m暎�來n묝�|�J�n粗4n[tB8�@n �n� n��n�n�D쮨탠�{A:0쥉\蠢U뻰벺L쏕 ��}:뙴P�3d@뫩 �뢵�덐$�%g�'[G�`F}�� 款�뫯壻랐��<쉱N}��=��6' wq;!+j� 봁�M�$q<:�슀  lc�F �(v� 후�x�?p��녺^6r�Z6~hn纂퇰$��⇒索 �GB�7 秧5 �&��0q��� x/�aR)` �I U^뢹�pK� �E!O틍%�+iS�m�Mr�3*8\�꼙�B<휜]띊\ 뺲N^F詩��'w끣sOBb枉]� � 2� gR츔좇�t��U�듘�냬Y$}犁ぁ$ l�poN何3懲옑 랮�K:�믍Z쵟낁'u瀋h^돈텴7^�+젱힞7�x$쑀��~r�@�(�!�{��2��r��2 JmvBg귨V쒑悖US�� =k�殃엻#읙速�)稱⑬턵逍�|嶸�땦돞 束哄씖G3�[e낞��vY� >�낉쿙�{�릫�뎲耘@:�\w률k�のm 쟅u컵�뫴k牽�/��Ng��軸p樞쾵左졿���0d�됦� ｆ뚕뀆�_�"�댛di웡�d詢b8놲춎�"� ���rM凰�" (80z~뜴G�rB�a�RU럪�%軾�댨 Y�w 럩�%�> 씃�嗽LX뉍理)쾲狡왢� 놳x0>꼻5統�닁f8��� �B쳨뒒� l�lqlE깛� �윚f)쯍D�Y� �.Z7軌럳F�|� � 沿 �� �劃#^챺꼕 �(8S�`�7>�]�㎦�革��q�#췡�[S"淀�앮汐�}z 00p�짢� 苡1�폏/뿰(�&.r43���%��fY@Zv�F\�괈[�< .�1 E꼣��0D擇;b:[k�ё �3 ham�/ ~t/隸��O 봾� *��pt}�5쯕 �^�+  :c� )� #�i 8!7굓끛3��4�]松c뷃yXmJ�T�s� ��:흧諫��V?�pz�先 N�_�Y汾A @.0킸� .R4�v2y5�^�2絿턭녑 �4��]�!D�@��,�롈冀꾔|�4�뚠둫v쐀�2�쒙m윕� �휼N唄)���1덨�쎪庶긑頁,灰,zG쎰�d�$K�1� 歇�%딨��@걦緬!걼뤮댻`:�꼯�(뜎��궥包?�(럪���DA:덳�T痂�㉠H嫁�.�맖륚큿 嚥�p)솮,&3(=�Q}긊瑨�:*쭎*�U蔗U寶��푇☜*� 9mS�륽4BNz6 (Q�4� �]�o (� 椀_� �댻W �{ �;諾뤢댵땮!� �tf�.뙔o%;0�cYX켘.(�0`졋炫�/}GFG쌝J$:?�tc.�\�22Y�}�>q�EF>��% 녤녏띞彈u"$�&�I놢�<�r�덅*쀪'�H/괉�앭텳P�꾓l셯놁耕샊^$�K?!#B ��.꼛�y�\@�O  R�헁?慊!A@)쩼슁�?b�$휙�擲�L�m�?M1-�63�S�#�%�!넙븥G�(호 力$d張!/폚밀�+ �鎖���덠�뉈!�Da�@O퍁찋��藝�猛*3-��?K5e찜�C`n뱏~G컫�쩬_겊披맦�@]윢윞0膏TQ卵�F춥 �躁��%�1v暉u� TQ@y�W꺯5下盖�<�!J際�P� #걡���2�"댠3빈P渽Y뱤� 풔풧咀]참~�]�탖%�%�"� 뉇쳣O�껺�]�7q n묽8홺H R�Z＞뼒�*羔�*D�럫 %x跋}')a蔘랯뎈�Q�2$y�椽�U �9�D緯�@m�-懊 (�q9�貸悸賃ヱ��걐��6퍶�턤튡��S_qTaX�曷b d9陞�J꽇_즄�K�43뜙쯠Qg끡b눷�:푄]�U�낈꺥-�#�몟撚�쎺�_�gxL�;>;v`컿_킨MW�崎륉�u�� 왲뤚"∵z�^(眸&*N�s58��곋U�G c쾏0�����G&냝 더�Y僉� %f<���_끡,覓芟HcD�쵿杏�1,揷$�_ >�澣入昻Cs率Z��&핍=1�&個閃� �-ｉp=곓�칍��!^#��잍.툋��� 0<寺s�R�,�5�� +�_3~��햩� � 쓱/ g�4Mv0L�HG��$� 쬚�K�]<�P!걼c 첚"뵀�~) �[)�3궹9��F?�퐜��襲z딜u不쳏"藕쿌 蕣뺙�;�'K{廬쀀d 坵雪겱봣맖킇C릕�`�뢽똾GM|弑R#u�惡�J � 콭�5逕I<� �W텿G등  �$�V �q$�[F���~�� wFf:�/t�%3K�\^Sw�5S�Xr u�`y6&=,t輦� ��Y��@� 맜 �뢘icnd�4�~DE�崖�"火뗨�G�Rd希�d궐}끟�G(�\�SN캡낞�tk� *;u�D姙鎚@꺠 D0겆 署%P�@�^^/d ~�}��옯��}8>綏]淞�� i�^GD�-紵2)敗쎭yДN[_[쏽@用����SRRRQ6 j츻첢拓\X[_�OR ,�誥2�,M�\__ ;�W 杉]�A�o쮯#^]�d'nsp넚 퉌@���콲�"욃 "퇗��0 D �+.륵퍴�a�>H롢��눱눽뚒뇦穗 쐜:cS�VW얭�픰�C�p 舒否�VFR���(!i��X> 2Z^틼�垣���,좔私3갘Xc놮匕褙�3훬�犧껞M�孑�{<#ts냂4'} GD밵F_`곽�{����=r긔�먃^���渙벧>�0d&u �<��$N�톲4tC쟸�LM�6��%Q곖C뭼츓��m�2-x�6|�:pl�aNF�{�T[>#�d+2QxH筍4�D펡 � 쏘�캸���s眷싶{1!1"킮�1�1�?1番�빬` �J斐E녺�(�듃萄�飯�q9�2OH�?땐췑|驪<�덱衷 蔑턼杆rw-뷩{��j]E-v)돚��6쟔���3쩭. 枯/�j4&!�4���4�4쀨4�됁r$�!녲g��퉋 쿟�2�sE뭮뼄겿롷僥쀂C콰�\C�N○腫&뿈� .쌛"t;Qj�5�;b>�#�}� 죜U>� �珪q2� 情�\꽧�|&�<㈛ Zy틌"s� � 7 �엎���T날�녟愁쮁n_0췦4P yCL�  �&y �WT�[le綠/r 31�몣� 뼚�) x퍇 J��� K됮�U�뢶 �O=陳(곅S�CsC �9�<d9E삃R�?�q�0�|.�!|�랚L8홸�3곘�홥d볁 E갅斃�쎨U3둉 藕V꿆�}�.휣��*;� 괨�C쑽則]\�N :g慄O� E)��uYNO|�ZoC �Q먣存=�4.�9 .y콉?�p�쥔{竺)됹u讀댝I*�曲� ��,�_�%_�*��芋&� "_��zA�J踐羲늏 RU��v@Z}E1�~?R�p4냁]눿�!)2�x��$���)�*�6�XТK}�X뛨8� 製贓T2[7@J죭�v�2�4�0術��L�Rz뚔녒$귙�9J襤����콽쁃-1�p�1��녰5�"뉷 툶�dj"뺜믥ge�8셋x �T盼�H� �} �,퍊튫鄒�q�?木�0��솉� 7:� ���9�dcf끟!O �-板�\þ쇂y� ���뚭쑾 �_8�Z� UOOKU0U/Mb|y$)9>?7$ GN\CgkEon!`Bfiexxbu`vuge�^`z-iee|%ifon �bv*s쿶�$�#믽e퇷沅��F��릔쀸HK�쮴�:��蔚R+5C쯙h`*Eh`Xbぼ�A~�{�5膈D4 넬���뺅z � 껠�8b  5v>뀅 뗴|=5솃J~/(봯쮄쒪몝�=u2�<쥎�]괓#逮죁�뒴H@�롔;�p멱1;�[.u�h�|�뉑樊z댯玲Zs ヶ_+�듵렳꾣₁� 픋�  � i잵渴��7?"(!���k�$=/뉃* ��곊]둑6�T퍮 察뽼댵Q�2임"n�꾁띏꾤 �륋儷뤞貸8^A낐'�!�녌댻梳칯�L%�8� Q�$�1jD;�_⒣U[뉺 ぬ4줮�ぜ� 챜쭰챯�(DT(몑)�+A�햰px췴>문h避Y�꿃#┪機�┯'장�]롳��@O쨼� ��.B쑆�/ x�闖슞�뗕댿鄕� �_쫅+�R#�)�7檗�$��.��3�=4衾戌�r �v톩h꾫�{��:뫦�괗J�GERR�mk��e 湲JT㈍"*�# 텱� �E  � xs#넄 뤰Q됺잩밵#K�Nh��)�諜|�hD皺崔#�忖녷N;&�젳�U�낣F:�R浿�%���^�묉녴 꺠쨮+�I�-됝댹굈� ��턌3�y%髓�hQ��釘奚By{Tyx哉x )WT a  �@ 즤랥넰a�셛�?�aF里萸9�尿쉌l-1�n�.췶途]"J� 텶/� a 뇾핍I숧밳�*@�[8� `4[�쓵�[<�恨 y�9DO�며큯끯쒺]_Z[[�뇞㎫9닆�ZyG�6i[:}G&i[:}嗾 1�Sq襲r�&s�D� #C]_}CEgmkeOMCe"M~uW:1:}6-#0 -.62-e*009o/&e i$;ztt?nIPdSPU^_RUB)oZQ@_FB.xOGBsty>|czsTqj:xymf.gkixsMkdhi롖쓳�쉪뱣됟삌뼋�깂쉧�뱬븦냸財깼틀옜봇몸씐₄さ딥뺀ㅇ哉�＋믐�↔�쓰휩扮��沒�싕拮同뽂훿횻零�挺保�듡횐亢瘡彪彦�向�顥�듘率�嵬蟲侁謠霓�Z�V ZJ @c.Af7<�21:}6 $1{30){&(+?,&#kbm rk"=ml9qVO^�M\UCXN.iUSJN @A^ IVt>xsfs,:Xwv,6 *cos:eid~ogd*ip웼뮓�`쇭露퉹�뇭넊膏��뗈密孱뙁뾺꽴���낵ㄱ⑬��뵣꺌셀┨`얍竊瀋콴훶ド禽뚗邦붱槐鳧�붢탔�0냴ㅱ�A쳬俓혲퐶俱逋悟佃招止탶��`쟎把㎯溜쥉�請��W" KSqWQ6  C2_SmOM::%!8,.61w*':gcEge,;$,gE(.?ATYRZSXAP[Z@\KTLKABYN EJUQH[Yvg7v|poovfd|lsHmjwqj`na#wbi�|nny슊쇪뿙떆�몤� 닕�후뻾뜛엯뒅 뫬뒅욙��ゼ⁴ㅆ땐�섀ぎ┘遇겻�8�楕�쩠팅酒悧죗�쑺邦붧�뚌譚棟중床혹蓮�쒈�햻緊�쑓相�뵼喇��廂퍍즛퀗駒츇�$V|�TT@ @ @$p31>>?$p25p3?=02%33%$@)3`./4`#?]@BUCCUT0S_E\TNOTBECOMPRESSETyc07Buqt=_~|i7, skipping files웷쐱�옝꾉뮆����럢꾝돀픸윷뎻꼷뿎極��웵�荀젪옆∮�胥�ㅰ！���닮´薯왹읓拉촹蹈輻騈d곓窘�눲覺���矛徙뚹協��憙執石殮��猖遞���郵꾦�姿淀�\ �[II 2=[0,y:525<#z59'�((6"!K..#%*3eYXXtSEV[_X[=XTY@[]NCG@CSwd`q}ddwqj>dw�hpoQLUNQ+%'/#%' Jm�y�;粧3�!?籠&c흶i�� ╁q=倨y%�G�宣m欄�6┃�{�뜌�i뾟.R/~V4徹�꺡"�pfD�<+<\닍&� 븀ぇ�>�t�3T��q�<����떠�h틞q@�{�W�o1}쐜]慟^<}�Mt^믯d랺��맖됟�.�붱�8뙁�엸澧됁�&훓笏p�b勻뮬E젮藝춭뎴�뛑댕탽멂��랱퇾벶�d�$}俎뫹V�r뉍Kd㏜�E휾J}#�쯽|9瓜$�+��{1L0놮�a,�翩I��@쏑*� 澮撓#틄�*=�킔멿��또�sソ,�F껱F琿됵땙귁�귻�o붸a��Q�$벧팟��#\껪��}50꽆Y1쟃MF�7u;�Ro�=L參�z|�.G析�\틑o�3�K과�B-�6#!�D�� あ㈂�2g뮄@��##uPi鉥庭�옕�zUyつ�C�퓄�%,Yd춣t烙v�2軻L킋RL뭌J즆쐥덏@�ラ倫솽Mm꺇퍀x뒙zψOM�C춃옂튨逕뫅�[쿑yA^*瓜�惶뿽�숍�v�|輹헔hH;N 쩡械[�/뫍쭘�s켩h僚&맗T���_즍�fM�2듰Bn@㎮� �C�3UR�핟퇀3S�#웈 p⑻�2��?h #�껉퉽� n~�톰�H:|H�뾤Y0 숽츲ㅺ�=g9퐚�M�!N~3�c� ;Y�剃재Q뤀���>촖s돲l�륾씓'N*빐}#�rH쯭FK�6~�FpWAcT避�뒫��T수�\팩폭 쐷�EV겈꼶8l�/c텅큶�'촸w웮쑵dV�B?�9阮9?쓔� 樓,뿧逞焙첂�Uz�9뗓�Kb諫�;�+fn2���&;>�8cZ� ^n樸�9d$�X寄ac�@:力돔n�걼�目{旨�^먝�%�p�\;@�b%�頹 �+Q�/�>宋�|'�avB@R'�겗U씶]>gc팶�줃퍞쎝c픘 �.퀦��&�뮄횐2�&ぱ�PjU�3@㎪�3털 잴�3r뭭S� �dX%y鷹� 뼯N��&긿�퉊峯_絿텯n 答�_p섣n %5볒&O줯�p7n��1ㅸ�璹~廊쓋w^뮘K殃J퍫�W�+慢�j례p��#�9�a앓{<+濫�dM)愁��}뒴 H�,쪯y=樟r�m��>�.ャl넔�/휭���[p슏\r��,昰�h3"4銖心(� *K�A>ilZ�/�(쨐�|柑껉io�:k/¤u5i)[��|H塡#�y�賜8*!峯�륷x� ��1'�CSyZO�G"T/g=챷�뱚�@^��g났? 뵬# Dx搏뎸+�K�0?/Z뉿붲/�뺆儷�� 7��|Þ��*� $9꽧q�lN��).D얣h츣dDi�M:-�넻網A�1뽌�|94`쓬3\n앷뛦㈓� 밆O\�걈캁뇢걐蛛{0��x��>땔�얷��랲$鰕죅���q 츈%�>$�윹똽뙻sC윰~�]I{ㄱ� 8�쵕Oæ뽔L[Su+�Fh悽a욍.Ld�M製�賂).eY�e꾖�.�B귔�3쇾�!索�e뤧#瑜?S2襤Y`茴瀚87bS{Y롹� E�쇀샒m-↗�z;9 sm�i윟-5w6卵}Y↓%48쯸�/�瑤�/뛿煉똬헤怜}O�珽EZ*�6꺂t玗*�|�no�껇Q��u抑9퉡욋� 善!nĦ n�w[�&�]X5�^햑�]룳繩A긖��d햃�@풵튮늩홊Tqs-A�)흫�r~ � C�Y�/X柰9퐔0F�?cz�2D# J뮷칈륲�륡�b�:T�d鼈凜1�E뽤絡r*�2ㄸ|$쉄뗗.���*궮:p�쫲��(�x�롙�;�J聆��qㆆ�260�,q~A�R풀M�?�쾇/of�廈�옣윯劣\t�c�즳E첌�/o톋迂떣 끕M�4\�)去`帽UH�:Fj옳좮섑 뮊2bb15Q �&� ^ZG\DH��\JQDBME4븣��� �I#0�  ��  �!k��&�0뗑�+`U65FJUB:=X ]8= )#qu�qle-c}o{nkirGX;ko dji*maqoaa#`x윍03줲!6!gec({H#bl�..{gikv;�.�s�敲|xb&~`pv]$<�E>Exc핊`j!{eqIwqQ� x\�5xjA�#�raL;�����WF- �췍HGDG@G<�!CzTfTnTr--�-�CT�����,src/kernel/e.c0100664000076500007650000000106005741035064012747 0ustar prool2prool2#include #include #include "kernel.h" #define Prec 2 #define Zero 0 /*----------------------------------------------------------------------------*/ /* E M A I N */ /*----------------------------------------------------------------------------*/ void e(int argc, char far*argv[]) { int i; printf("argc = %i\nProg name = %s\n",argc,argv[0]); argc += 1; for (i=0; i #include #include "kernel.h" #include #include /****************************************************************************/ #define CheckUserWriteDir /* #define DEBUG */ /****************************************************************************/ int FlushBuf(unsigned int i) { if ((*(Cache+i)).Status==2) { #if 0 printf(" w"); #endif if (abswrite(TR(CurrentDevice),1,(*(Cache+i)).Sec,(*(Cache+i)).M)) { printf("\nFlushBuf: abswrite error on sector %i\n",(*(Cache+i)).Sec); return -1; } else { (*(Cache+i)).Status=1; } } return 0; } /****************************************************************************/ int FlushAll(void) {int i, err; err=0; for (i=0;imax) { max=(*(Cache+i)).Counter; maxbuf=i; } /* 췅獄� 첓�ㄸ쩆�� */ i=maxbuf; if (FlushBuf(i)) return -1; Fill: /* ⓤ�ⓤ猶젰� 醒も�� �乘詮� */ (*(Cache+i)).Status=2; for (j=0;jmax) { max=(*(Cache+i)).Counter; maxbuf=i; } /* 췅獄� 첓�ㄸ쩆�� */ i=maxbuf; if (FlushBuf(i)) return -1; Load: if (absread(TR(CurrentDevice), 1, sec, (*(Cache+i)).M )) { printf("\nLoadCache: absread error on sector %i\n",sec); (*(Cache+i)).Status=0; return -1; } (*(Cache+i)).Status=1; (*(Cache+i)).Sec=sec; TouchCache(i); return i; } struct dirent Bolvan; /****************************************************************************/ int open2 (int h, const char far *path, int flag) {int i, j, Search, File, DevNo, SaveCur; struct dirent far *D; struct time timep; struct date datep; DIR far *dir; char far *cc; char far *cc0; const char far *name; char path0 [PATH_MAX+1]; struct dirent *pBolvan; pBolvan=&Bolvan; /* 召ζ쯄レ�硫 �젵� ? */ i=0; File=1; if (!memcmp(path,"/dev/",5)) { do { if (!strcmp(path+5,Dev[i++].Name)) {File=0; DevNo=i; break;} } while (Dev[i].Name[0]); } if (!File) FCBS[h].File=0; else FCBS[h].File=1; /* 맆㎕�� º��� path 췅 貰■手����-path (path0) � name */ strncpy(path0,path,PATH_MAX); path0[PATH_MAX]=0; #if 0 /* 끷エ � path0 ��笹ⅳ�Ł 歲Б�� '/', � �� �� �ㄸ�, 獸 쭬짛歲� ⅲ� */ i=strlen(path0); if (i-->1) if (path0[i]=='/') path0[i]=0; #endif cc=path0; cc0=NULL; while ((cc=strchr(cc,'/'))!=NULL) cc0=cc++; if (cc0==NULL) { /* � �呻� path �β �� �ㄽ�． 歲Б�쳽 '/', 譽� �㎛좂젰�, 譽� 將� ギ첓レ��� º� (‥� �呻�) */ path0[0]=0; name=path; } else { /* 닾� path 貰ㄵ逝ⓥ �� む젵�ⅸ Д誓 �ㄸ� 歲Б�� '/', ㎛좂ⓥ 將� º� � �呻��. ("귗� �呻��" ;) */ /* 뇿��Ж췅�� 收ゃ蟯� 첓�젷�� */ SaveCur=CurDirClu; if (cc0==path0) {/* 歲Б�� '/' ��舒硫 � ⅳÞ飡´��硫 (º� ˘쩆 "/file") */ name=path0+1; /* 꽖쳽�� 收ゃ蟯� 첓�젷�� "/" */ if (chdir("/")==-1) { #ifdef DEBUG printf("L1"); #endif errno=ENOENT; goto ret_err; } } else { *cc0++=0; name=cc0; /* 꽖쳽�� 收ゃ蟯� 첓�젷�� path0 */ if (chdir(path0)==-1) { #ifdef DEBUG printf("L2"); #endif errno=ENOENT; goto ret_err; } } } /* 끷エ �洙贍쥯�� �젵� "/" Œ� �黍 收ゃ耀� ぎ惜ⅱ�� 첓�젷�％ �洙贍쥯�� "." Œ� "..", 獸 ㎛좂ⓥ, �洙贍쥯�� root dir */ if ( ( strcmp(path,"/")==0 ) || ( (CurDirClu==0) && ( (!strcmp(name,"."))||(!strcmp(name,"..")) ) ) ) {/* open (rootdir) */ FCBS[h].File=3; #ifdef CheckUserWriteDir if (((flag&O_WRONLY)||(flag&O_RDWR)) && Mode) {errno=EACCES; goto ret_err;} #endif strcpy(FCBS[h].Name,"/"); FCBS[h].BegClu=0; FCBS[h].Attr.B.Dir=1; FCBS[h].flag=flag; FCBS[h].Size=-1; FCBS[h].AbsOffset=0l; FCBS[h].AbsSec=RootBeg; goto ret_norm; } if (!strcmp(name,".")) /* �젵� "." (收ゃ蟯� 첓�젷��) ㄾウ�� �洙贍쥯筍碎 召ζ쯄レ�臾 召�貰‘�, � ⓤ��レ㎜쥯���� 魚젺玎ⅸ碎 � 歲飡�Д Þ兒席졿Ŀ � 收ゃ耀� 첓�젷�％ (��誓Д�췅� CurDirClu) */ {/* open (curdir) */ FCBS[h].File=2; #ifdef CheckUserWriteDir if (((flag&O_WRONLY)||(flag&O_RDWR)) && Mode) { errno=EACCES; return -1; } #endif strcpy(FCBS[h].Name,name); FCBS[h].BegClu=CurDirClu; FCBS[h].Attr.B.Dir=1; FCBS[h].DirInode=-1; FCBS[h].flag=flag; FCBS[h].Size=-1; FCBS[h].AbsOffset=0l; FCBS[h].AbsSec=SecForClu(CurDirClu); FCBS[h].AbsClu=CurDirClu; goto ret_norm; } if (File!=0) {/* file or dir */ /* 덆�� �젵� (or dir) � 첓�젷�％ */ PathToDir(name, pBolvan); #ifdef DEBUG printf("open2: `%Fs'->",name); printf("`%s' ",Bolvan.d_name); #endif if ((dir=opendir("."))==NULL) {puts("open: can't search in current dir"); errno=EFAULT; goto ret_err;} while(1) { if ((D=readdir(dir))==NULL) break; if ( (*D).d_name[0]==0 ) continue; if ( (*D).d_name[0]==0xe5 ) continue; if ( (*D).Attr.B.Label ) continue; #ifdef DEBUG /* printf("open2: d1=`%s' d2=`%s' ",(*D).d_name,Bolvan.d_name); */ #endif if (dircmp((*D),Bolvan)==0) {Search=1; FCBS[h].DirInode=CurDirClu; FCBS[h].DirSeekPos=telldir(dir)-32; goto l_cont; } } Search=0; l_cont: if (closedir(dir)==-1) goto ret_err; if (Search) { if ((flag&O_EXCL)&&(flag&O_CREAT)) {errno=EEXIST; goto ret_err;} FCBS[h].Attr.U=(*D).Attr.U; if ((*D).Attr.B.Dir) {/* found dir */ #ifdef CheckUserWriteDir if (((flag&O_WRONLY)||(flag&O_RDWR)) && User) {errno=EACCES; goto ret_err;} #endif FCBS[h].File=2; FCBS[h].Size=-1; } else {/* found ordinary (regular) file (not directory) */ if (flag&O_TRUNC) { /* truncate */ if ((i=(*D).d_fileno)!=0) while(1) { j=NextClu(i); if(LinkClu(i,0)==-1) {errno=EFAULT; goto ret_err;}; if (j==-1) break; else i=j; } (*D).Size=0; (*D).d_fileno=0; #if 0 if ((dir=openwdir("."))==NULL) {puts("open: can't search in current dir"); errno=EFAULT; goto ret_err;} if (seekdir(dir,FCBS[h].DirSeekPos,SEEK_SET)==-1) goto ret_err; if (writedir(dir,D)==-1) goto ret_err; if (closedir(dir)==-1) goto ret_err; #endif } FCBS[h].Size=(*D).Size; } FCBS[h].flag=flag; FCBS[h].FileDateTime.ft_hour =(*D).FileDateTime.ft_hour; FCBS[h].FileDateTime.ft_min =(*D).FileDateTime.ft_min ; FCBS[h].FileDateTime.ft_tsec =(*D).FileDateTime.ft_tsec ; FCBS[h].FileDateTime.ft_day =(*D).FileDateTime.ft_day ; FCBS[h].FileDateTime.ft_month=(*D).FileDateTime.ft_month; FCBS[h].FileDateTime.ft_year =(*D).FileDateTime.ft_year ; if ((FCBS[h].BegClu=(*D).d_fileno)==0) { FCBS[h].AbsSec=RootBeg; FCBS[h].File=3; } else { FCBS[h].AbsClu=FCBS[h].BegClu; FCBS[h].AbsSec=SecForClu(FCBS[h].AbsClu); } FCBS[h].AbsOffset=0l; } else { /* File not exist*/ if (flag&O_RDONLY) { #ifdef DEBUG printf("L3"); #endif errno=ENOENT; goto ret_err; } /* Creating */ /* 덆�� 聲�‘ㄽ硫 ℡�� � 첓�젷�％ */ if ((dir=openwdir("."))==NULL) {puts("open: can't search in current dir"); errno=EFAULT; goto ret_err;} while(1) { if ((D=(void far *)readdir(dir))==NULL) break; if (!(*D).d_name[0] || ((*D).d_name[0]==0xe5)) {/* 췅獄� 聲. ℡�� � 첓�젷�� */ /* 貰ℓ젰� 쭬�ⓤ� � �젵ゥ */ /* 쭬��キ畑� ��ワ FCB */ FCBS[h].DirInode=CurDirClu; if ((FCBS[h].DirSeekPos=seekdir(dir,-32l,SEEK_CUR))==-1) printf("open: can't seek cur dir"); (*D).Attr.U=FA_ARCH; PathToDir(name,D); gettime (&timep); (*D).FileDateTime.ft_tsec=timep.ti_sec*2; (*D).FileDateTime.ft_min =timep.ti_min; (*D).FileDateTime.ft_hour=timep.ti_hour; getdate(&datep); (*D).FileDateTime.ft_day =datep.da_day; (*D).FileDateTime.ft_month=datep.da_mon; (*D).FileDateTime.ft_year =datep.da_year; (*D).d_fileno=0; (*D).Size=0; /* 쭬��キ畑� ��ワ FCB */ FCBS[h].Attr.U =(*D).Attr.U; FCBS[h].flag=flag; FCBS[h].FileDateTime.ft_hour =(*D).FileDateTime.ft_hour; FCBS[h].FileDateTime.ft_min =(*D).FileDateTime.ft_min ; FCBS[h].FileDateTime.ft_tsec =(*D).FileDateTime.ft_tsec ; FCBS[h].FileDateTime.ft_day =(*D).FileDateTime.ft_day ; FCBS[h].FileDateTime.ft_month=(*D).FileDateTime.ft_month; FCBS[h].FileDateTime.ft_year =(*D).FileDateTime.ft_year ; FCBS[h].BegClu=(*D).d_fileno; FCBS[h].Size=(*D).Size; FCBS[h].AbsOffset=0l; FCBS[h].AbsClu=FCBS[h].BegClu; FCBS[h].AbsSec=0; if (writedir(dir, D)==0) { closedir(dir); goto ret_norm; } else goto L1; } } L1: /* 聲. ℡�쩆 �β :( */ closedir(dir); errno=ENOSPC; goto ret_err; } /* file not exist. creating */ } /* file */ else { /* dev */ /* DRIVER /dev/?????????? */ /* FCBS[h].Major=Dev[DevNo].Major; FCBS[h].Minor=Dev[DevNo].Minor; */ FCBS[h].Size=-1; if (!Dev[DevNo].Byte) { FCBS[h].AbsOffset=0l; FCBS[h].AbsSec=0; } } /* dev */ ret_norm: errno=0; /* 끷エ 將� ���▼�ㄸМ, ¡遜�젺젪エ쥯�� �誓┃Ł 收ゃ蟯� 첓�젷�� */ if (path0[0]) CurDirClu=SaveCur; return h; ret_err: FCBS[h].Name[0]=0; /* 끷エ 將� ���▼�ㄸМ, ¡遜�젺젪エ쥯�� �誓┃Ł 收ゃ蟯� 첓�젷�� */ if (path0[0]) CurDirClu=SaveCur; return -1; } /****************************************************************************/ int open (const char far *path, int flag,...) {int h, k; /* 앪� 氏젫� 誓젷�㎜쥯�� O_RDONLY O_WRONLY O_RDWR O_CREAT /* create and open file */ O_TRUNC /* open with truncation */ O_EXCL /* exclusive open */ O_APPEND /* to end of file */ 앪� 氏젫� ▲ㅳ� 誓젷�㎜쥯��? O_NOINHERIT O_DENYALL O_DENYWRITE O_DENYREAD O_DENYNONE */ /* 뤲�´涉�� 氏젫� 췅 ぎ薛ⅹ狩�飡� */ /* 뤲�´涉�� �∽쭬收レ�瑜 氏젫� 췅 �黍率飡˘� */ if (!((O_RDONLY|O_WRONLY|O_RDWR) & flag)) goto L_INVAL; /* 뤲�´涉�� 氏젫� 췅 �α�¸α殊щ� 貰曄�젺⑨ */ if ((flag&O_RDONLY)&&((flag&O_WRONLY)||(flag&O_RDWR))) goto L_INVAL; if ((flag&O_RDWR)&&((flag&O_WRONLY))) goto L_INVAL; if ((flag&O_TRUNC)&&((flag&O_RDONLY))) goto L_INVAL; h=-1; if (path==NULL) { goto L_INVAL; } if (*path==0) { L_INVAL: #ifdef DEBUG printf("L4"); #endif errno=ENOENT; return -1; } /* 눃α� (Œ� 쩆ゥ�) 誠�쳽筍 蓀젪����� �洙贍쥯�М． �젵쳽 � 拾� �洙贍瞬Ж �� ��Д說 췅�. か졹收�� � ��Д說 �젵ギ¡� 歲飡�щ */ /* for(k=0;kOPEN_MAX)) {errno=EBADF; return -1;} if (ftimep==NULL) {errno=EINVAL; return -1;} if (!FCBS[h].Name[0]) {errno=EBADF; return -1;} (*ftimep).ft_hour = FCBS[h].FileDateTime.ft_hour ; (*ftimep).ft_min = FCBS[h].FileDateTime.ft_min ; (*ftimep).ft_tsec = FCBS[h].FileDateTime.ft_tsec ; (*ftimep).ft_day = FCBS[h].FileDateTime.ft_day ; (*ftimep).ft_month= FCBS[h].FileDateTime.ft_month ; (*ftimep).ft_year = FCBS[h].FileDateTime.ft_year ; return 0; } /****************************************************************************/ int setftime (int h, struct ftime far *ftimep) {DIR far *fp; struct dirent far *D; if ((h<0)||(h>OPEN_MAX)) {errno=EBADF; return -1;} if (ftimep==NULL) {errno=EINVAL; return -1;} if (!FCBS[h].Name[0]) {errno=EBADF; return -1;} if ( (FCBS[h].flag & O_WRONLY) || (FCBS[h].flag & O_RDWR) ) { if ((fp=openidir(FCBS[h].DirInode))==NULL) return -1; if (seekdir(fp,FCBS[h].DirSeekPos,SEEK_SET)==-1) return -1; if ((D=readdir(fp))==NULL) return -1; if (seekdir(fp,FCBS[h].DirSeekPos,SEEK_SET)==-1) return -1; (*D).FileDateTime.ft_hour = (*ftimep).ft_hour ; (*D).FileDateTime.ft_min = (*ftimep).ft_min ; (*D).FileDateTime.ft_tsec = (*ftimep).ft_tsec ; (*D).FileDateTime.ft_day = (*ftimep).ft_day ; (*D).FileDateTime.ft_month = (*ftimep).ft_month ; (*D).FileDateTime.ft_year = (*ftimep).ft_year ; FCBS[h].FileDateTime.ft_hour = (*ftimep).ft_hour ; FCBS[h].FileDateTime.ft_min = (*ftimep).ft_min ; FCBS[h].FileDateTime.ft_tsec = (*ftimep).ft_tsec ; FCBS[h].FileDateTime.ft_day = (*ftimep).ft_day ; FCBS[h].FileDateTime.ft_month = (*ftimep).ft_month; FCBS[h].FileDateTime.ft_year = (*ftimep).ft_year ; if (writedir(fp,D)==-1) return -1; return closedir(fp); } else { errno=EPERM; } return -1; } /****************************************************************************/ int chmod(const char far *filename, int amode) {int h; h=amode; if ((h=open(filename,O_RDONLY))==-1) return -1; else close(h); return 0; } /****************************************************************************/ int _chmod(const char far *filename, int func, ...) {int h; int attribute; va_list v; /* func: 0 - read attr, 1 - set attr. attr see in */ if ((h=open(filename,func?O_WRONLY:O_RDONLY))==-1) return -1; if (func==1) { /* 붵�ゆ⑨ 1 - 信�젺�˘筍 졻黍▲瞬 �젵쳽 */ int Label; int Dir; int Attr1; va_start(v,0); attribute = va_arg(v,int); /* 뫌魚젺畑� �ⅷ㎚��畑щ� 졻黍▲瞬 */ Label=FCBS[h].Attr.B.Label; Dir =FCBS[h].Attr.B.Dir ; Attr1=FCBS[h].Attr.B.Attr1; /* 볚�젺젪エ쥯�� 졻黍▲瞬 */ FCBS[h].Attr.U = attribute; /* 궙遜�젺젪エ쥯�� �ⅷ㎚��畑щ� 졻黍▲瞬 */ FCBS[h].Attr.B.Label=Label; FCBS[h].Attr.B.Dir =Dir ; FCBS[h].Attr.B.Attr1=Attr1; } else {/* 붵�ゆ⑨ 0 - ˇ汀� 졻黍▲瞬 �젵쳽 */ attribute=FCBS[h].Attr.U; } if (close(h)==-1) return -1; return attribute; } /****************************************************************************/ int access(const char far *filename, int amode) {int flag, h; if (amode==2) flag=O_WRONLY; else flag=O_RDONLY; if((h=open(filename,flag))==-1) return -1; else if(close(h)==-1) return -1; return 0; } /****************************************************************************/ long int read(int h, void far *buf, unsigned long len) { int i, b; long l; char c; if ((h<0)||(h>OPEN_MAX)) {errno=EBADF; return -1;} if (buf==NULL) {errno=EINVAL; return -1;} if (len==0) {errno=0; return 0;} if (!FCBS[h].Name[0]) {errno=EBADF; return -1;} if (FCBS[h].flag & O_WRONLY) {errno=EACCES; return -1;} if (h==0) if (FCBS[h].File==0) { for(i=0;i FCBS[h].Size) if ((len=FCBS[h].Size-FCBS[h].AbsOffset)==0) {errno=0; return 0; } if ((b=LoadCache(FCBS[h].AbsSec))==-1) {errno=EFAULT; return -1; } SecOffset=(int)(FCBS[h].AbsOffset % SECTOR_SIZE); for (i=0;iOPEN_MAX)) {errno=EBADF; return -1;} if (buf==NULL) {errno=EINVAL; return -1;} if (!FCBS[h].Name[0]) {errno=EBADF; return -1;} if (FCBS[h].flag & O_RDONLY) {errno=EACCES; return -1;} if (len==0) {errno=0; return 0;} if((h>=0)&&(h<=2)) if (FCBS[h].File==0) { for(l=0;lOPEN_MAX)) {errno=EBADF; return -1;} else { if (FCBS[h].Name[0]) { if ( (FCBS[h].File==1) || (FCBS[h].File==2) ) { if ((FCBS[h].flag&O_WRONLY)||(FCBS[h].flag&O_RDWR)) { if ((i=FCBS[h].DirInode)!=-1) { if ((fp=openidir(i))==NULL) return -1; if (seekdir(fp,FCBS[h].DirSeekPos,SEEK_SET)==-1) return -1; if ((D=readdir(fp))==NULL) return -1; if ((*D).d_fileno!=FCBS[h].BegClu) {Update=1; (*D).d_fileno=FCBS[h].BegClu;} if (FCBS[h].File==1) if ((*D).SizeOPEN_MAX)) {errno=EBADF; return -1;} if(FCBS[h].Name[0]) return FCBS[h].Size; else return -1; } /****************************************************************************/ long tell(int h) { if ((h<0)||(h>OPEN_MAX)) {errno=EBADF; return -1L;} if (!FCBS[h].Name[0]) {errno=EBADF; return -1L;} return FCBS[h].AbsOffset; } /****************************************************************************/ long lseek(int h, long offset, int fromwhere) {int i; long j, n; if ((h<0)||(h>OPEN_MAX)) {errno=EBADF; return -1L;} if (!FCBS[h].Name[0]) {errno=EBADF; return -1L;} switch (fromwhere) { case SEEK_SET: if (offset<0) {errno=EINVAL; return -1L;} /* offset>=0 */ /* 信�젺�˚� �젵쳽 � 췅�젷� (rewind) */ FCBS[h].AbsOffset=0l; if ((FCBS[h].File==1)||(FCBS[h].File==2)) /* file or directory */ { FCBS[h].AbsClu=FCBS[h].BegClu; FCBS[h].AbsSec=SecForClu(FCBS[h].AbsClu); } else if (FCBS[h].File==3) /* root dir */ FCBS[h].AbsSec=RootBeg; /* ��笹� 將�． щ ��誓稅젶Ð젰� 췅 笹ⅳ莘蟯� �勝も case � ⅲ� �誘�キ���� ㄵ쳽β º���� 獸, 譽� 췅ㄾ */ case SEEK_CUR: if (offset==0) return FCBS[h].AbsOffset; if (offset>0) {char buf[SECTOR_SIZE]; for (i=0; i int service(int fn) { switch (fn) { case 1: ps_(); } return 0; } src/kernel/msh.h0100664000076500007650000000120305535646522013326 0ustar prool2prool2#define MenuColumn 68 struct DeskTop { int x; int y; char Name [13]; }; struct DeskTop Folder [MAX_LINE]; struct DeskTop Desk [ ] = { {MenuColumn, 4," [Click] "}, {MenuColumn, 5," [Exec] "}, {MenuColumn, 6," [Attr] "}, {MenuColumn, 7," [Cls] "}, {MenuColumn, 8," [Mem] "}, {MenuColumn, 9," [Ls -l] "}, {MenuColumn,10," [Help] "}, {MenuColumn,11," [Echo] "}, {MenuColumn,12," [Vectors] "}, {MenuColumn,13," [Ladder] "}, {MenuColumn,14," [Reboot] "}, {MenuColumn,15," [Int 0] "}, {MenuColumn,16," [Int 18h] "}, {MenuColumn,17," [Int 19h] "}, {MenuColumn,18," [Com Addr] "}, {-1,-1,""} }; int DeskNo; src/kernel/vexe.c0100664000076500007650000000117706120312376013477 0ustar prool2prool2#include #include #include #include "viewexe.c" #define BUFLEN 512 void ident (void) { printf("View EXE ver. 0.0.0.1 9-Mar-96 (c) by Prool\n\n"); } void main (int argc, char *argv[]) {char buf [BUFLEN]; int h, i; if (argc!=2) { ident(); printf("usage: vexe filename"); } else { if ((h=open(argv[1],O_RDONLY | O_BINARY))==-1) printf("Can't open %s\n",argv[1]); if ((i=read(h,buf,BUFLEN))!=BUFLEN) printf("Can't read %s. read()=%i\n",argv[1],i); close(h); printf("File %s\n\n",argv[1]); ViewEXE((void *)buf); printf("\n\n"); ident(); } } src/kernel/ls.c0100664000076500007650000000750406231010314013134 0ustar prool2prool2#include #include #include "kernel.h" /****************************************************************************/ /* #define DEBUG */ /****************************************************************************/ void l_help(void) { puts("Uses: l [-l] [-L] [-U] [-H] [-F] [-T] [-M]\n\n\ Switches:\n\n\ -l - long info\n\ -L - very long info\n\ -U - list unused dir records\n\ -H - hex output (default - dec output)\n\ -F - free space\n\ -T - title\n\ -M - more"); } /****************************************************************************/ void OutAttr(struct AttrField far *Attr) { if ((*Attr).Attr1) putch('*'); else putch('.'); if ((*Attr).Attr2) putch('*'); else putch('.'); if ((*Attr).Archive) putch('A'); else putch('.'); if ((*Attr).Dir) putch('D'); else putch('.'); if ((*Attr).Label) putch('L'); else putch('.'); if ((*Attr).System) putch('S'); else putch('.'); if ((*Attr).Hidden) putch('H'); else putch('.'); if ((*Attr).ReadOnly) putch('R'); else putch('.'); } /****************************************************************************/ void OutTimeDate(struct ftime far *t) { printf("%2i:%02i:%02i %2i-%02i-%02i", (*t).ft_hour, (*t).ft_min, (*t).ft_tsec*2, (*t).ft_day, (*t).ft_month,1980+(*t).ft_year); } /****************************************************************************/ int l (int argc, char far *argv[]) {int i, j, k, n; struct dirent far *D; char Path [NAME_MAX+1]; int FlagL=0; int FlagU=0; int FlagLL=0; int FlagH=0; int FlagF=0; int FlagT=0; unsigned long size; unsigned long SumSize=0; unsigned long Total; DIR far *dir; argc--; i=1; do { if (argc) { if (argv[i][0]=='-') { n=(int)strlen(argv[i]); for (j=1;j\n")==EOF) goto l_ret; continue; } printf("%-13s",DirToPath(D,Path)); SumSize+=(size=(*D).Size); if (!FlagL) {if (puts("")==EOF) goto l_ret; continue; } else { OutAttr(&((*D).Attr.B)); if (FlagLL) {putch(' '); for (k=0;k<10;k++)printf("%2X",(*D).Reserv[k]); } putch(' '); OutTimeDate(&((*D).FileDateTime)); printf(FlagH?" %4X":" %5u",(*D).d_fileno); if (printf(FlagH?" %8lX\n":" %8lu\n",size)==EOF) goto l_ret; } } l_ret: if (closedir(dir)==EOF) perror("l: closedir"); if (FlagF) { Total=(MaxSectors - (unsigned long)DataStart) * (unsigned long)SECTOR_SIZE; printf("Total drive size %li\n",Total); printf("Total allocated %li\n",SumSize); printf("Free %li\n",Total-SumSize); } More=0; NLine=1; return 0; } src/kernel/minus.c0100664000076500007650000000014506304067562013665 0ustar prool2prool2#include #include #include "kernel.h" int minus(void) { return -1; } src/kernel/ctype.c0100664000076500007650000000274306075156024013661 0ustar prool2prool2#include #include #include "kernel.h" /****************************************************************************/ int isgraph(int c) { return ((c) >= 0x21 && (c) <= 0x7e); } /****************************************************************************/ int isprint(int c) { return ((c) >= 0x20 && (c) <= 0x7e); } /****************************************************************************/ int isalnum (int c) {return isdigit(c)||isalpha(c);} int isalpha (int c) {return islower(c)||isupper(c);} int iscntrl (int c) {return c<' ';} int isdigit (int c) {return (c>='0')&&(c<='9');} int islower (int c) {return (c>='a')&&(c<='z');} int ispunct (int c) { switch(c) { /* (C) 뫍ⓤ�� 歲Б�ギ� �勝も�졿Ŀ ˇ汀 �� �昔｀젹щ Connect �.롞ギ쥯 � ㅰ. Copyright by KHEMZ, Inc. 1991, 1994 */ case '.': case ',': case '!': case '"': case '\'': case '(': case ')': case '*': case '+': case '-': case '/': case ':': case ';': case '<': case '=': case '>': case '?': case '[': case '\\': case ']': case '^': case '{': case '|': case '}': case '~': return 1; default: return 0; } } /****************************************************************************/ int isspace (int c) {if ((c==' ')||(c=='\t')) return 1; else return 0;} int isupper (int c) {return (c>='A')&&(c<='Z');} int isxdigit(int c) {return ((c>='0')&&(c<='9'))||((c>='a')&&(c<='f'))||((c>='A')&&(c<='F'));} src/kernel/tlib.cmd0100664000076500007650000000140007007553004013770 0ustar prool2prool2kernel/C/E-+stdlib-+ctype-+strchr-+strdup-+string-+strlen-+tolower-+cluread-+nextclu-+sec4clu-+readsec2-+out_mbr-+out_dev-+k2-+int8-+ints-+int0-+ints5-+minus-+nulldev-+setjmp-+out_os-+tr-+videopag-+strtoul-+service-+int1b-+exitw & -+memd-+absread-+abswrite-+cmos-+nocmos-+time-+regdump -+sayr-+port-+ohb-+vector-+clrscr-+cursor-+reboot-+cold-+hdd2-+genint-+msdos-+loop-+comport -+stdio-+initv-+kbhit-+end-+getch0-+putch0-+putch1-+putch2-+putch3-+int13err-+bootread-+bootred0-+readsec & -+txtattr-+intercept-+vec-+out_iv-+out_boot-+mem-+memmove-+ls-+rm-+mv-+cp-+cat-+de-+e-+int86-+stream-+gets-+mouse-+printf-+fprintf-+run_boot & -+char_in-+char_out-+ohw-+msherc-+msherc1-+io-+dir-+debug-+p2d-+d2p-+sh-+stat-+syserr-+viewexe-+rand-+int5dump-+qsort-+conv,kernel.dic src/kernel/vexe.com0100664000076500007650000001647606471563736014064 0ustar prool2prool2뚇.���0�!�.�,롖즜�g�c�.��m����>a떿뗗��&�=87u&딼��=u�練�m��Yu�m池�aC&8u����槌�a�戴꺝껁��e뚗+��>��s��>곀�r(>r"�刀G;�r�>t�>u�;�w뗾��뗟��{�죊+�렳퀺W�!_袋�롌뗧�3�.���>퉬+蹶��0臥沃���o�q�4�6_�6]�6[��P�g.���[�2뗭퀽둊�!�맳���5�!�K�M�5�!�O�Q�5�!�S�U�5�!�W�Y�%뚇롖�6�!��%�K�!�%�O�!�%�S�!�%�W�!쳬m塏�@��!첫맳-.��僥��P�J�U뗭9&ur燿�^&�w퇷P�< 뗥�^&�w툍P�, 뗥�^&�w툢P� 뗥�^&�w릊P� 뗥�^&�w 맥P燿 뗥�^&�w 멂P夭 뗥�^&�w&�w멱P曰 뗥�^&�w몽P宛 뗥�^&�w&�w�P兀 뗥�^&�w�P筽 뗥]�9&ur�H�5P�� DD홛뗭곸VW;�r9&ur�'땦�~t梡�퇮P�b DD�t��P�t�0꺞뗹떿=��u �t툅P�> 꺞�P뜂��PW�+꺞덯�=tP�t툑P� 꺞W��DD�t륭P� 꺞뜂��P熬�꺞퇫P寥 DD�J�_^뗥]홛뗭V땦 �|껥Xv푐�6�뒆�삏� 偸껥#w鉞���떾즟����^]�홛뗭� �洛��>�� 픲��� � �v�m�Y]�.��.����g��2�&�@뚂뉁뱥6a꺠��>ir�c뗿�2쟌��v��껋���%��뗽+�r`뗧뙽롔뚍렳QI懲2윌롙뉟뉄떸뗊C�wr@�w�< t< t< u�2잼� 픱B� 픲C녱2쟬�촇,"t"<\u�<"u촇 稚�P�Y�.���[C�뗵뗭+�r�뗥�.]�뎧꺟6� 잚�t�3핃F.�&��aQ�GY뗹 픱$�c3琢懲뗹�6e�)꺞뗗�_ 픲芋�3윽���?꺝池&8u��홛뗭�> u��딣�洛뎴>�3잼]홛뗭VW�~딢��;�u���땥��뎩��덬_^]홛뗭VW�~딣)�5�딣@��|�~;�u�6~�뗿~뎦떾�_^]홛뗭V딣3�%��곣RP搖YY뗱껥�u3잼�~덬딣@��6~�~�^]홛뗭V딣3�%��곣RP瓮YY뗱껥�u3잼�6��6~딣@�떾�^]홛뗭VW�~ �u3잼Z떿 %��뗹�>�uW烏�Y�B�6�떾 픱1�뗖꺜(;혇 WV� �YY�$�;�rV翫�Y�떾�땤;6�u�W�"�Y�_^]홛뗭딣뗓곴;혉즩3잼 �k����]홛뗭딣딽u꺬뗁겵꺬 �u ;�s�u� �k����]홛뗭�v���Y�]홛뗭딣셊P縕�뗥�]홛뗭딳�<딽�!r�P�Z繪]�U뗭�^+�+年@�!�]�U뗭껋VW�~颱픲�|%� 漂�u���~!F딣��u�P� �3픐�v�(YY덯�=��u�F�t3잼�덯繪颱t 퇠P阮渾���>颱�t�v3픐�Q�뗱떾 �}떾傭V�KY� ��v�v澮2�뗱떾 �}떾���p먉F�W�v��YY뗱떾 �|Y3픐V緩YY덯���t!곋 颱�t딣�%� P�PV沃꺞� 颱tV堯��~�t颱�t�P�P�v�M꺞 �|颱t��3핆�곣�� 혢寺�뎴T떾�_^뗥]홛뗭V�딳泰u �泰u�딽깎"N 졍=�!r뗱딣%�� �뗞洛뎴T떾�P蘊穴^]홛뗭껋VW�^�7떾덯��^�G@t떾��^� � 뗟G�? u�F�떾N 픲�딣��_^뗥]�U뗭V땦V臥Y 픱����L�~ u�<~ V����)FV갺_��딡덬 �v �v�v둈쁏�.꺞껡�u =��u����3잼^]홛뗭껋V땦V�[Y 픱�������?�P3픐P둈쁏凹꺞뎈�덯��<~딽�딣�RPV��솇�뗃XZ+�卵딽�딣繪^뗥]홛뗭퀱둊�^딳 딽�!r �~u떷��P�哈]홛뗭�D�^�!�r樂桔�]홛뗭VW�~ 땦딡;�u �~���v���謠�>�u�$;�u����>�u �;�u���<t�P3픐PV�얔꺞�Dt�t�Q Y갺���D떾덬덬 �~t? �v;� �~uW�o�Y덯 픱갟�����딣덬 덬�|�~u갟3잼_^]홛뗭V땦 �|껥| �P�z幅뗞洛�놲��V�Y�^]홛뗭V땦�>뗞�!r 洛�놲��3잼P�E幅^]홝W����DtV��YO꺠 �u�_^홛뗭껋VW딣@=r �^洛�놲t3잰��v�v�v��꺞덯�딣�@=r �^洛�놲�t딣繪f릩N�땦뗿뗞確<t-< tも請荀S�P뛈�P�v�>꺞[�둊��;�u�뺣 S�P槌픐Q�v��꺞�^洛걦T[떿+취_^뗥]홛뗭�?�^딳딽�!r�P�K播]홛뗭곸�VW딣@=s3잰��^洛�놲�t�v�v�v嵬꺞愚�^洛겎T��딣뎳|�딣뎳x�뜺~��m�럛�떈|���|��늽{�< u� F뒉{��F뜂~�뗕+�괋�|>뜂~�뗿+�W뜂~�P�v�{꺞뎳v�;�t꺘v�s���� 딣+냮�냬�+헝O뜺~�꺘x�t���뜂~�뗿+�떿 픳.W뜂~�P�v�-꺞뎳v�;�t꺘v�s���� 딣냬�+헝딣�_^뗥]홛뗭�^洛�놲t�P3픐P�v�(뗥�@�^딳딽�!rP�^洛걦TX�P嶢蓄]홛뗭�^洛겎T�塤B둊 �^딳딽�!r�P宛�숇]홛뗭껋"VW�~ �^껢$wX��rS딣 딳 �}�~t �-G槌堆꺳뛵砂�+菱�묟��F� 宜+菱��F 픲�뛐邪�俱N�, s:�Fも銓�딣 �_^뗥]� U뗭�~ u딣숇딣3�RP�v�v�P캻P�\��]홛뗭�v�v�v�v �P캻P�@��]홛뗭�v�v�v�v �~ u��3픐캻P���]홛뗭퀰둊딳딽�!r묐P瓦請]첬��틝�맭@��!�'맳��@�!��U뗭VW땦딡;�t����f�<|-�Du 딡 뗕꺜;혋�딡 뗕꺜;혋딡덬 3잼4�|�u9�$;�u2둈쁏蛙�Y 픲갺�燻P�Dt��3픐3픐V瓮�꺞����~� u�D@u�P마P둈쁏蛙�꺞=u�P뛈P둈쁏獄�꺞=t�Du 갟����둊���^뗥]홛뗭V땦�$PV窪�YY�^]홛뗭껋VW땦�~G�Dt#��O떿 픱V�^�F�쁏�뗿YY=��u珣u�D@t7�|t1딡;�s*�<t V兀�Y 픱3잼SOW�v둈쁏��꺞덯�+~��7��O떿 픱,�}�^�F��D �\ 뉷���V�^�F�7橈�YY=��u�떿�_^뗥]��&6U뗭딽�뼁�듔漏瘻듔"테챽쫘頑챽�"테る]�U뗭곸�VW�F�힓쵵�8W���2쟌�慟I_횊G�N�~"SQR뛈�+�뛈췗W�v�V 힓쵵~첀~�ZY[���~츎푡�떮l�땦� 픱<%t�G�N�炡��凝�u돳x��<%t�돻l�3�뎻v�뎻j�닅u��냦����냨�����2�뗊뗗�� ��`sG뒣�떸=v�뗗洛.�쬣����Q[k��{�%�x�;hhh��紆��w�깕j�����w�깕j�����w��푫�+t닑u��|�깺j�森�r�깕j� ��h���wD�냞�u!깕j���Q����~�긃��s 뎳p���7���u�뎳r��톱)���s撻���,0���w�뇛p� �|綠�뗊邏邏�냦�熉���u쪍냨� �|닌�뗊邏邏�냨�盂�깕j��右�걥j�깺j�顫瑢�깺j��걥j���褥��� � � �녜泯냫��냤�닑n��~�3陋� �냤�닑n��~�섻G뎧�냞�t�GG�~띃{� 픲3 �u/꺘r�u-떮l�땸p��껠�t땰j�%t�0�� 듏擁欠鹹芸깕j�RPW듖쁏뒉o�PS�s�떀r� ���!닑n�뎧띃z��^�7CC�^�냞� t�7CC�^�珝:��揮�냤�깺j��뜋z�+�눹떀r�;�뗋榕뎧닑n��~�긃띃{�2���憂뎧닑n��~�냞� u �=긃 �� �=긃뙽 �u옇旺�;럕�v땸r���뎧닑n��~땸r� �}�WQ뜛{�SR�#냞�P땰j���t ��F���t ��F� ��F��P�7�딣�F띃{��냞�t떀p� �~ �[�+�~돃v�뒉u� 픱&�=-t꺇v�깣v�O&��4�뗸떮l�떈p��#냞�=u뒭n���ou꺘v��냬�����xt��Xu깕j�@KK꺇v�}�냬�럙��냞�u �� 矮�K;�擢냞�@t �0碗�뒉n�宛�떀v� �~'+�+�&�<-t< t<+u&ц⅛IK눳��0�얐戌눳�+�&쵆G�N��멃蓴 �~ 뗅� �{顥鹹��뎧�~�냞� u �=긃��=긃퇠*F�F�&��}�떢x�떮l��%�<衡 픲��~쵵}�6�딣る_^뗥]�U뗭VW땦�>�t�����뎩뎦�|��덬� �6�뎥뎥_^]홛뗭껋VW땦�~��~;�u�>~� ��덯��^��V��Y_^뗥]홝죧;~u�6�沃�Y3웰~즰�;�~땧�u"V僥�Y;6�u 3웰~즰�딡�~V�s�Y� �6~�i�Y�6~^홛뗭껋VW땦� ��덯��|�u;6�t��^��뗸�V��Y�^��u �v�V�*�YY_^뗥]홛뗭V땦 �u�떾��뗱;6~u�<��V���Y^]홙tack overflow! $뚅롔북� �!�1�Turbo-C - Copyright (c) 1988 Borland Intl.Divide error Abnormal program termination ���Bytes on last page %04X Pages in file %04X Relocations %04X Paragraphe in header %04X MinMem %04X par MaxMem %04X par SS:SP %04X:%04X CheckSum %04X CS:IP %04X:%04X Relocation table addr %04X View EXE ver. 0.0.0.1 9-Mar-96 (c) by Prool usage: vexe filenameCan't open %s Can't read %s. read()=%i File %s �������������������������������#������������������#����#�����  $4CDBT�d�t�������������������$�4�D   ��������������������������������@��print scanf : floating point formats not linked (null)0123456789ABCDEF       �������src/kernel/stdio.c0100664000076500007650000000454606047675442013673 0ustar prool2prool2#include #include #include #include "kernel.h" /****************************************************************************/ #if 0 /* 앪� 貰魚젺��� ㄻ� ⓤ獸黍� */ char Hex [] = "0123456789ABCDEF"; void ohb (char c) { putch(Hex[c>>4]); putch(Hex[c&0xf]); } void ohw (int w) { ohb(w>>8); ohb(w&0xff); } void ohd (unsigned long int ll) { ohw(ll>>16); ohw(ll&0xffff); } #endif /****************************************************************************/ void perror(const char far *str) { printf("%s: ",str); puts(sys_errlist[errno]); return; /* ��獸� �拾�� ▲ㄵ� 쭬Д�ⓥ� printf 췅 fprintf(stderr, ... */ } /****************************************************************************/ void ohs(const char far *s) { do printf("%2X ",*s); while (*s++); } /****************************************************************************/ int unlink(const char far *path) {int h; /* 뤲�´夕� 率耀飡¡쥯�⑨ �젵쳽 � �昔´夕�, 譽� 將� �� 첓�젷�� */ if ((h=open(path,O_RDONLY))==-1) {errno=ENOENT; return -1;} else { if (FCBS[h].Attr.B.Dir) {close(h); errno=EPERM; return -1;} if (close(h)==-1) return -1; } /* 뫌■手���� 蝨젷���� */ return delete(path); } /****************************************************************************/ int delete (const char far *path) {int h, Inode; DIR far *fp; struct dirent far *D; long Pos; if ((h=open(path,O_WRONLY|O_TRUNC))==-1) return -1; Inode=FCBS[h].DirInode; Pos=FCBS[h].DirSeekPos; if (close(h)==-1) return -1; if ((fp=openidir(Inode))==NULL) return -1; if (seekdir(fp,Pos,SEEK_SET)==-1) return -1; if ((D=readdir(fp))==NULL) return -1; (*D).d_name[0]=0xE5; if (seekdir(fp,Pos,SEEK_SET)==-1) return -1; if (writedir(fp,D)==-1) return -1; if (closedir(fp)==-1) return -1; return 0; } /****************************************************************************/ int rename(const char far *old, const char far *new) {int h; struct dirent far *D; DIR far *fp; if((h=open(old,O_WRONLY))==-1) return -1; if ((fp=openidir(FCBS[h].DirInode))==NULL) return -1; if (seekdir(fp,FCBS[h].DirSeekPos,SEEK_SET)==-1) return -1; if ((D=readdir(fp))==NULL) return -1; PathToDir(new,D); if (seekdir(fp,FCBS[h].DirSeekPos,SEEK_SET)==-1) return -1; if (writedir(fp,D)==-1) return -1; FCBS[h].Name[0]=0; if (closedir(fp)==-1) return -1; return 0; } src/kernel/abswrite.c0100664000076500007650000000510206144710170014340 0ustar prool2prool2#include #include #include "kernel.h" extern unsigned char NearBuffer []; int Int13perror(unsigned err); /****************************************************************************/ /* #define DEBUG */ /****************************************************************************/ extern unsigned char NearBuffer [SECTOR_SIZE]; /* defined in kernel.c */ /****************************************************************************/ int secwrite (int drive, unsigned long AbsSec, char *Buffer) {/* Write absolute sectors Input: drive (for int 13h Fn=2) abs sec number buffer Output: return!=0 if error */ int Track, SecNoOnCyl, i; char Head, SecOnTrk; Track=(int)(AbsSec/SectorsOnCyl); /* SectorsOnCyl=HeadCnt*TrkSecs, Track == Cyl */ SecNoOnCyl=(int)(AbsSec%SectorsOnCyl); Head=SecNoOnCyl/TrkSecs; SecOnTrk=SecNoOnCyl%TrkSecs+1; /* 2 bytes are combined to a word similar to INT 13: �7�6�5�4�3�2�1�0� 1st byte (sector) � � 읕좔좔좔좔좔� Sector offset within cylinder 읕좔컴컴컴컴컴컴 High order bits of cylinder # �7�6�5�4�3�2�1�0� 2nd byte (cylinder) 읕좔좔좔좔좔좔컴컴 Low order bits of cylinder # */ if ((i=Track &0x0300)!=0) { SecOnTrk = (SecOnTrk & 0x3F) | (int)(i>>2); } return WritePhysSec(drive, SecOnTrk, Head, Track, Buffer); } /****************************************************************************/ int abswrite (int drive, int nsects, unsigned long lsect, void far *FarBuffer) { int i, j, k; unsigned err; if (ReadOnly) { puts("Drive has mounted read only. Write not allowed!"); return -1; } for (i=0;i=MaxSectors) { puts("absread: lsect >=MaxSectors"); return -1; } #if 1 for (k=0;k>=8; printf("absread: error %2X in sec %i: ",err,lsect); Int13perror(err); printf(" Ignore (i), retry (r) or abort (a) ? "); j=getchar(); puts(""); if (j=='r') continue; else if (j=='a') return -1; else /* ignore */ break; } else break; } /* FarBuffer = (char far *) FarBuffer + SECTOR_SIZE; */ } return 0; } /****************************************************************************/ src/kernel/bios.c0100664000076500007650000000704705703620300013461 0ustar prool2prool2#include #ifndef EXE #include "kernel.h" #include #else #include #endif #include /*---------------------------------------------------------------------------*/ /* 닱 きª� 붲�ギ� �.�.,붲�ギ� �.�. 뤲�｀젹Ж昔쥯��� МㄵМ�.-�.:"꼫�땸�-뙂뵂", 1993.-240�.-(겏∥Ŧ收첓 歲飡�Л�． �昔｀젹Ж飡�; �.4) Portions Copyright by �.�.붲�ギ�, �.�.붲�ギ�, 1993. */ unsigned com_address ( int portid ) { unsigned base_address; if(( portid > 4) || ( portid < 0 )) return( -1 ); base_address = *(( unsigned far * ) MK_FP( 0x40, portid * 2 )); return( base_address ); } /* 닱 きª� OFF */ /*---------------------------------------------------------------------------*/ #ifndef EXE int inicom (unsigned int portid, unsigned char Par) {int i; int ComBase; i=inicom_(portid,Par); if((ComBase=com_address(portid))==0)return -1; outp (ComBase+LCR, inp((ComBase+LCR) | 0x80) ); outp (ComBase+ICR,0); return i; } #endif /*---------------------------------------------------------------------------*/ int getcom(int portid) {int ComBase; if((ComBase=com_address(portid))==0) return -1; if ( inp(ComBase+LSR) & 1 ) return inp(ComBase); else return -2; } /*---------------------------------------------------------------------------*/ int putcom(int portid, unsigned char byte) {int ComBase; if((ComBase=com_address(portid))==0) return -1; while (( inp(ComBase+LSR) & 0x20 )==0); outp(ComBase,byte); return 0; } /*---------------------------------------------------------------------------*/ int getcomstat(int portid) {int ComBase; if((ComBase=com_address(portid))==0) return -1; return inp(ComBase+LSR); } /*---------------------------------------------------------------------------*/ int is_UART_8250 (int port ) { int save_scr, in_scr; int addr; int ComBase; ComBase=com_address(port); #ifdef EXE if (ComBase) printf("%4X",ComBase); #endif if(ComBase==0)return -1; addr=ComBase+(0x3ff-0x3f8); save_scr=inp(addr); outp(addr,0x5a); in_scr=inp(addr); if(in_scr!=0x5a){ outp(addr,save_scr); return UART_8250; } outp(addr,0xa5); in_scr=inp(addr); outp(addr,save_scr); if(in_scr!=0xa5) return UART_8250; return 0; } /*---------------------------------------------------------------------------*/ int is_UART_FIFO(int port) { /*int save_iir;*/ int in_iir; int addr; int ComBase; if((ComBase=com_address(port))==0) return -1; addr=ComBase+(0x3fa-0x3f8); /*save_iir=inp(addr);*/ outp(addr,1); in_iir=inp(addr); outp(addr,0); if((in_iir & 0x40) == 1) return UART_16550A; if((in_iir&0x80)==1) return UART_16550; return UART_16450; } /*---------------------------------------------------------------------------*/ int uart_type (int port) {int test; if( (test=is_UART_8250(port)) == UART_8250 ) return UART_8250; else if (test==-1) return -1; if(( test = is_UART_FIFO(port) ) == UART_16550A ) return UART_16550A; if(test == UART_16550) return UART_16550; return UART_16450; } #ifdef EXE main() {int i; char * UARTname [] = { "8250 without FIFO", "16450 without FIFO", "16550 with FIFO", "16550A with FIFO"}; clrscr(); puts("Port Base addr UART type"); printf( "COM1 ");if((i=uart_type(0))!=-1)printf(UARTname[i-1]);else printf("Not found"); printf("\nCOM2 ");if((i=uart_type(1))!=-1)printf(UARTname[i-1]);else printf("Not found"); printf("\nCOM3 ");if((i=uart_type(2))!=-1)printf(UARTname[i-1]);else printf("Not found"); printf("\nCOM4 ");if((i=uart_type(3))!=-1)printf(UARTname[i-1]);else printf("Not found"); puts(""); } #endif src/kernel/msherc.asm0100664000076500007650000025265306375646612014375 0ustar prool2prool2; MSHerc.com ; Disassembled by Sourcer V 5.04 (C) V COMMUNICATIONS, INC. 1988-1993 ; Copyright (C) Comments for Serge Pustovoitoff, 1995 ;PAGE ,78 ;栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢 ;栢 栢 ;栢 MSHERC 栢 ;栢 栢 ;栢 Created: 7-Mar-88 栢 ;栢 Passes: 9 Analysis Options on: none 栢 ;栢 栢 ;栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢栢 ; The following equates show data references outside the range of the program. Vec10h equ 10h*4 equip_bits_ equ 410h video_mode_ equ 449h video_columns_ equ 44Ah video_buf_siz_ equ 44Ch video_segment_ equ 44Eh vid_curs_pos0_ equ 450h vid_curs_pos1_ equ 452h vid_curs_mode_ equ 460h video_page_ equ 462h data_3e equ 81h data_143e equ 9C38h ;* data_144e equ 0AA39h ;* data_145e equ 0B053h ;* data_146e equ 0B83Ah ;* data_147e equ 2000h data_148e equ 7FA6h data_149e equ 2000h seg_a segment byte public assume cs:seg_a org 100h msherc proc far start: jmp StayResident Trap10h: push bp push es push ds push di push si push dx push cx push bx push ax mov bp,sp push cs pop ds mov es,data_25 cld cmp ah,0EFh je l_Fn_EF ; Fn = EF ; From [Interrupt List]: ;INT 10 - VIDEO - MSHERC.COM - GET VIDEO ADAPTER TYPE AND MODE ; AH = EFh ;Return: DL = video adapter type ; 00h original Hercules ; 01h Hercules Plus ; 02h Hercules InColor??? ; DH = memory mode byte ; 01h "half" mode ; 03h "full" mode or ah,ah jz l_Fn_0 ; Fn = 00 set video mode cmp byte ptr Flag,0 jnz ToOld cmp ah,0Fh ja l_Fn_GT_0F ; Fn > 0F l_Fn: ; Fn <= 0F mov di,[bp+1] and di,0FFh ; di = ah (from stack) shl di,1 ; di *= 2 call word ptr FunTab[di] l_iret: ; �音�� �� �誓贍쥯�⑨ pop ax pop bx pop cx pop dx pop si pop di pop ds pop es pop bp iret l_Fn_GT_0F: cmp ah,0F0h jb l_iret ; Fn > F0 - exit jmp short ToOld l_Fn_EF: call sub_4 jmp short l_iret l_Fn_0: cmp al,8 je l_Fn cmp al,88h je l_Fn mov byte ptr Flag,1 ToOld: ; 룯誓쩆�� 承�. 飡졷�с ´も�說 pop ax pop bx pop cx pop dx pop si pop di pop ds pop es pop bp jmp dword ptr cs:OldVec10h msherc endp public msherc ;賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽 ; SUBROUTINE ;複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複 Null proc near retn Null endp ;複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複 db 7 dup (0) ; Data table (indexed access) FunTab dw offset SetVideoMode ; 0 set video mode data_6 dw offset SetCur ; 1 set cursor data_7 dw offset SetCurPos ; 2 set cur pos data_8 dw offset GetCurPos ; 3 get cur pos data_9 dw offset Null ; 4 get pen data_10 dw offset SetPage ; 5 set page data_11 dw offset ScrollUp ; 6 scroll up data_12 dw offset ScrollDn ; 7 scroll down data_13 dw offset GetSymAttr ; 8 get sym/attr data_14 dw offset WriteSymAttr ; 9 write sym/attr data_15 dw offset WriteSym ; A write sym data_16 dw offset Null ; B set palette/border data_17 dw offset Dot ; C dot data_18 dw offset GetPoint ; D get point data_19 dw offset tty ; E tty data_20 dw offset GetVideoMode ; F get video mode OldVec10h dd 0 public OldVec10h Flag db 1 FlagH db 3 ; or 1 if Flag data_25 dw 0 data_26 db 0 data_27 db 35h db 2Dh, 2Eh, 07h, 5Bh, 02h, 57h db 57h, 02h, 03h db 0, 0, 0, 0 data_29 dw 0 data_30 dw 0 data_32 dw 0 data_33 db 1 ; Data table (indexed access) db 02h, 04h, 08h, 10h, 20h, 40h db 80h data_34 db 0FEh ; Data table (indexed access) db 0FCh,0F8h,0F0h,0E0h,0C0h, 80h db 00h data_35 db 0 ; Data table (indexed access) db 01h, 03h, 07h, 0Fh, 1Fh, 3Fh db 7Fh data_36 dw 0 ; Data table (indexed access) db 00h, 20h, 00h, 40h, 00h, 60h db 5Ah, 00h, 5Ah, 20h, 5Ah, 40h db 5Ah, 60h,0B4h, 00h,0B4h, 20h db 0B4h, 40h,0B4h, 60h, 0Eh, 01h db 0Eh, 21h, 0Eh, 41h, 0Eh, 61h db 68h, 01h, 68h, 21h, 68h, 41h db 68h, 61h,0C2h, 01h,0C2h, 21h db 0C2h, 41h,0C2h, 61h, 1Ch, 02h db 1Ch, 22h, 1Ch, 42h, 1Ch, 62h db 76h, 02h, 76h, 22h, 76h, 42h db 76h, 62h,0D0h, 02h,0D0h, 22h db 0D0h, 42h,0D0h, 62h, 2Ah, 03h db 2Ah, 23h, 2Ah, 43h, 2Ah, 63h db 84h, 03h, 84h, 23h, 84h, 43h db 84h, 63h,0DEh, 03h,0DEh, 23h db 0DEh, 43h,0DEh, 63h, 38h, 04h db 38h, 24h, 38h, 44h, 38h, 64h db 92h, 04h, 92h, 24h, 92h, 44h db 92h, 64h,0ECh, 04h,0ECh, 24h db 0ECh, 44h,0ECh, 64h, 46h, 05h db 46h, 25h, 46h, 45h, 46h, 65h db 0A0h, 05h,0A0h, 25h,0A0h, 45h db 0A0h, 65h,0FAh, 05h,0FAh, 25h db 0FAh, 45h,0FAh, 65h, 54h, 06h db 54h, 26h, 54h, 46h, 54h, 66h db 0AEh, 06h,0AEh, 26h,0AEh, 46h db 0AEh, 66h, 08h, 07h, 08h, 27h db 08h, 47h, 08h, 67h, 62h, 07h db 62h, 27h, 62h, 47h, 62h, 67h db 0BCh, 07h,0BCh, 27h,0BCh, 47h db 0BCh, 67h, 16h, 08h, 16h, 28h db 16h, 48h, 16h db 'hp', 8, 'p(pHph' db 0CAh, 08h,0CAh, 28h,0CAh, 48h db 0CAh db 'h$' db 9, '$' db ')$' db 'I$' db 'i~', 9, '~)~I~i' db 0D8h, 09h,0D8h, 29h,0D8h, 49h db 0D8h db 'i2', 0Ah, '2*2J2j' db 8Ch, 0Ah, 8Ch, 2Ah, 8Ch, 4Ah db 8Ch, 6Ah,0E6h, 0Ah,0E6h, 2Ah db 0E6h, 4Ah,0E6h, 6Ah, 40h, 0Bh db 40h, 2Bh, 40h, 4Bh, 40h, 6Bh db 9Ah, 0Bh, 9Ah, 2Bh, 9Ah, 4Bh db 9Ah, 6Bh,0F4h, 0Bh,0F4h, 2Bh db 0F4h, 4Bh,0F4h db 'kN', 0Ch, 'N,NLNl' db 0A8h, 0Ch,0A8h, 2Ch,0A8h, 4Ch db 0A8h, 6Ch, 02h, 0Dh, 02h, 2Dh db 02h, 4Dh, 02h db 'm\', 0Dh, '\-\M\m' db 0B6h, 0Dh,0B6h, 2Dh,0B6h, 4Dh db 0B6h, 6Dh, 10h, 0Eh, 10h, 2Eh db 10h, 4Eh, 10h, 6Eh, 6Ah, 0Eh db 6Ah, 2Eh, 6Ah, 4Eh, 6Ah, 6Eh db 0C4h, 0Eh,0C4h, 2Eh,0C4h, 4Eh db 0C4h, 6Eh, 1Eh, 0Fh, 1Eh, 2Fh db 1Eh, 4Fh, 1Eh, 6Fh, 78h, 0Fh db 78h, 2Fh, 78h, 4Fh, 78h, 6Fh db 0D2h, 0Fh,0D2h, 2Fh,0D2h, 4Fh db 0D2h, 6Fh, 2Ch, 10h, 2Ch, 30h db 2Ch, 50h, 2Ch, 70h, 86h, 10h db 86h, 30h, 86h, 50h, 86h, 70h db 0E0h, 10h,0E0h, 30h,0E0h, 50h db 0E0h, 70h, 3Ah, 11h, 3Ah, 31h db 3Ah, 51h, 3Ah, 71h, 94h, 11h db 94h, 31h, 94h, 51h, 94h, 71h db 0EEh, 11h,0EEh, 31h,0EEh, 51h db 0EEh, 71h, 48h, 12h, 48h, 32h db 48h, 52h, 48h, 72h,0A2h, 12h db 0A2h, 32h,0A2h, 52h,0A2h, 72h db 0FCh, 12h,0FCh, 32h,0FCh, 52h db 0FCh, 72h, 56h, 13h, 56h, 33h db 56h, 53h, 56h, 73h,0B0h, 13h db 0B0h loc_7: xor si,ds:data_145e[bx+si] jnc $+0Ch ; Jump if carry=0 adc al,0Ah xor al,0Ah loc_8: push sp or dh,[si+64h] adc al,64h ; 'd' xor al,64h ; 'd' push sp db 64h, 74h,0BEh, 14h,0BEh, 34h db 0BEh, 54h,0BEh, 74h, 18h, 15h db 18h, 35h, 18h, 55h, 18h db 75h, 72h loc_9: adc ax,3572h ;* jc loc_16 ;*Jump if carry Set db 72h, 55h ; Fixup - byte match jc $+77h ; Jump if carry Set int 3 ; Debug breakpoint adc ax,35CCh int 3 ; Debug breakpoint push bp int 3 ; Debug breakpoint jnz loc_14 ; Jump if not zero push ss db 26h, 36h, 26h, 56h, 26h, 76h db 80h, 16h, 80h, 36h, 80h, 56h db 80h, 76h,0DAh loc_12: push ss db 0DAh, 36h,0DAh, 56h,0DAh, 76h db 34h, 17h, 34h, 37h, 34h, 57h db 34h, 77h, 8Eh loc_13: pop ss db 8Eh, 37h, 8Eh, 57h, 8Eh loc_14: ja loc_12 ; Jump if above pop ss call $-17C6h push di call $+427Ah sbb [bp+si+38h],al inc dx pop ax inc dx loc_15: js loc_8 ; Jump if sign=1 sbb ds:data_143e[si],bl pop ax pushf ; Push flags js loc_15 ; Jump if sign=1 ;* sbb dh,dh db 18h,0F6h ; Fixup - byte match ;* cmp dh,dh db 38h,0F6h ; Fixup - byte match pop ax idiv byte ptr [bx+si+50h] ; al,ah rem = ax/data sbb [bx+si+39h],dx push ax pop cx push ax ;* jns loc_10 ;*Jump if not sign db 79h,0AAh ; Fixup - byte match sbb ss:data_144e[bp+si],bp pop cx stosb ; Store al to es:[di] jns loc_17 ; Jump if not sign sbb al,[si] cmp al,[si] loc_17: pop dx add al,7Ah ; 'z' pop si sbb bl,[bp+3Ah] pop si pop dx pop si jp loc_13 ; Jump if parity=1 sbb bh,ds:data_146e[bx+si] pop dx mov ax,127Ah sbb dx,[bp+si] cmp dx,[bp+si] pop bx adc bh,[bp+di+6Ch] sbb bp,[si+3Bh] db 6Ch, 5Bh, 6Ch, 7Bh,0C6h, 1Bh db 0C6h, 3Bh,0C6h, 5Bh,0C6h, 7Bh db 20h, 1Ch db 20h, 3Ch, 20h data_37 dw 205Ch db 7Ch, 7Ah data_38 dw 7A1Ch data_39 dw 7A3Ch ; Data table (indexed access) db 5Ch, 7Ah, 7Ch,0D4h, 1Ch,0D4h db 3Ch,0D4h, 5Ch,0D4h, 7Ch, 2Eh db 1Dh db 2Eh, 3Dh, 2Eh data_40 db 5Dh db 2Eh, 7Dh, 88h, 1Dh, 88h, 3Dh db 88h, 5Dh, 88h, 7Dh,0E2h, 1Dh db 0E2h, 3Dh,0E2h, 5Dh,0E2h, 7Dh db 3Ch, 1Eh, 3Ch, 3Eh, 3Ch, 5Eh db 3Ch, 7Eh, 96h, 1Eh, 96h db 3Eh data_41 dw 0 data_43 db 0 data_44 db 0Eh data_45 db 0 db 0 db 25 dup (0) data_47 db 0 db 15 dup (0) db 7Eh, 81h,0A5h, 81h, 81h,0BDh db 99h, 81h, 7Eh, 00h, 00h, 00h db 00h, 00h, 7Eh,0FFh,0DBh,0FFh db 0FFh,0C3h,0E7h,0FFh, 7Eh, 00h db 00h, 00h, 00h, 00h, 00h, 36h db 7Fh, 7Fh, 7Fh, 7Fh, 3Eh, 1Ch db 08h, 00h, 00h, 00h, 00h, 00h db 00h, 08h, 1Ch, 3Eh, 7Fh, 3Eh db 1Ch, 08h, 00h, 00h, 00h, 00h db 00h, 18h, 3Ch, 3Ch,0E7h,0E7h db 0E7h, 3Ch, 18h, 18h, 3Ch, 00h db 00h, 00h, 00h, 00h, 18h, 3Ch db 7Eh,0FFh,0FFh, 7Eh, 18h, 18h db 3Ch db 8 dup (0) db 18h, 3Ch, 3Ch, 18h, 00h, 00h db 00h, 00h, 00h,0FFh,0FFh,0FFh db 0FFh,0FFh,0E7h,0C3h, 81h,0E7h db 0FFh,0FFh,0FFh,0FFh,0FFh, 00h db 00h, 00h, 00h, 3Ch, 66h, 42h db 42h, 66h, 3Ch, 00h, 00h, 00h db 00h,0FFh,0FFh,0FFh,0FFh,0C3h db 99h,0BDh,0BDh, 99h,0C3h,0FFh db 0FFh,0FFh,0FFh, 00h, 00h, 0Fh db 07h, 0Dh, 19h, 3Ch, 66h, 66h db 66h, 3Ch, 00h, 00h, 00h, 00h db 00h, 3Ch, 66h, 66h, 66h, 3Ch db 18h, 7Eh, 18h, 18h, 00h, 00h db 00h, 00h, 00h, 3Fh, 33h, 3Fh db 30h, 30h, 30h, 70h,0F0h,0E0h db 00h, 00h, 00h, 00h, 00h, 7Fh db 63h, 7Fh, 63h, 63h, 63h, 67h db 0E7h,0E6h, 60h, 00h, 00h, 00h db 00h, 18h, 18h,0DBh, 3Ch,0E7h db 3Ch,0DBh, 18h, 18h, 00h, 00h db 00h, 00h, 00h, 40h, 60h, 70h db 7Ch, 7Fh, 7Ch, 70h, 60h, 40h db 00h, 00h, 00h, 00h, 00h, 01h db 03h, 07h, 1Fh, 7Fh, 1Fh, 07h db 03h, 01h, 00h, 00h, 00h, 00h db 00h, 18h, 3Ch, 7Eh, 18h, 18h db 18h, 7Eh, 3Ch, 18h, 00h, 00h db 00h, 00h, 00h, 33h, 33h, 33h db 33h, 33h, 33h, 00h, 33h, 33h db 00h, 00h, 00h, 00h, 00h, 7Fh db 0DBh,0DBh,0DBh, 7Bh, 1Bh, 1Bh db 1Bh, 1Bh, 00h, 00h, 00h, 00h db 3Eh, 63h, 30h, 1Ch, 36h, 63h db 63h, 36h, 1Ch, 06h db 63h, 3Eh db 9 dup (0) db 7Fh, 7Fh, 7Fh, 00h, 00h, 00h db 00h, 00h, 18h, 3Ch, 7Eh, 18h db 18h, 18h, 7Eh, 3Ch, 18h, 00h db 00h, 00h, 00h, 18h, 3Ch, 7Eh db 18h, 18h, 18h, 18h, 18h, 18h db 00h, 00h, 00h, 00h, 00h, 00h db 18h, 18h, 18h, 18h, 18h, 18h db 7Eh, 3Ch, 18h, 00h, 00h, 00h db 00h, 00h, 00h, 00h, 0Ch, 06h db 0FFh, 06h, 0Ch, 00h db 8 dup (0) db 18h, 30h, 7Fh, 30h, 18h, 00h db 9 dup (0) db 60h, 60h, 60h, 7Fh, 00h db 8 dup (0) db 24h, 66h,0FFh, 66h, 24h db 8 dup (0) db 08h, 1Ch, 1Ch, 3Eh, 3Eh, 7Fh db 7Fh db 7 dup (0) db 7Fh, 7Fh, 3Eh, 3Eh, 1Ch, 1Ch db 08h, 00h db 19 dup (0) db 18h, 3Ch, 3Ch, 3Ch, 18h, 18h db 00h, 18h, 18h, 00h, 00h, 00h db 00h, 63h, 63h, 63h, 22h, 00h db 10 dup (0) db 36h, 36h, 7Fh, 36h, 36h, 36h db 7Fh, 36h, 36h, 00h, 00h, 00h db 0Ch, 0Ch, 3Eh, 63h, 61h, 60h db 3Eh, 03h, 43h, 63h, 3Eh, 0Ch db 0Ch, 00h, 00h, 00h, 00h, 00h db 61h, 63h, 06h, 0Ch, 18h, 33h db 63h, 00h, 00h, 00h, 00h, 00h db 1Ch, 36h, 36h, 1Ch, 3Bh, 6Eh db 66h, 66h, 3Bh, 00h, 00h, 00h db 00h db 30h, 30h, 30h, 60h db 11 dup (0) db 0Ch, 18h, 30h, 30h, 30h, 30h db 30h, 18h, 0Ch, 00h, 00h, 00h db 00h, 00h, 18h, 0Ch, 06h, 06h db 06h, 06h, 06h, 0Ch, 18h db 7 dup (0) db 66h, 3Ch,0FFh, 3Ch, 66h db 8 dup (0) db 18h, 18h, 18h,0FFh, 18h, 18h db 18h, 00h db 11 dup (0) db 18h, 18h, 18h, 30h db 9 dup (0) db 0FFh, 00h db 14 dup (0) db 18h, 18h, 00h, 00h, 00h, 00h db 00h, 01h, 03h, 06h, 0Ch, 18h db 30h, 60h,0C0h, 80h, 00h, 00h db 00h, 00h, 00h db '>cgo{scc>' db 00h, 00h, 00h, 00h, 00h, 0Ch db 1Ch, 3Ch, 0Ch, 0Ch, 0Ch, 0Ch db 0Ch, 3Fh, 00h, 00h, 00h, 00h db 00h, 3Eh, 63h, 03h, 06h, 0Ch db 18h, 30h, 63h, 7Fh, 00h, 00h db 00h, 00h, 00h, 3Eh, 63h, 03h db 03h, 1Eh, 03h, 03h, 63h, 3Eh db 00h, 00h, 00h, 00h, 00h, 06h db 0Eh, 1Eh, 36h, 66h, 7Fh, 06h db 06h, 0Fh, 00h, 00h, 00h, 00h db 00h, 7Fh, 60h, 60h, 60h, 7Eh db 03h, 03h, 63h, 3Eh, 00h, 00h db 00h, 00h, 00h, 1Ch db '0``~ccc>' db 00h, 00h, 00h, 00h, 00h, 7Fh db 63h, 03h, 06h, 0Ch, 18h, 18h db 18h, 18h, 00h, 00h, 00h, 00h db 00h db '>ccc>ccc>' db 00h, 00h, 00h, 00h, 00h, 3Eh db 63h, 63h, 63h, 3Fh, 03h, 03h db 06h, 3Ch, 00h, 00h, 00h, 00h db 00h, 00h, 18h, 18h, 00h, 00h db 18h, 18h, 00h db 7 dup (0) db 18h, 18h, 00h, 00h, 00h, 18h db 18h, 30h, 00h, 00h, 00h, 00h db 00h, 06h, 0Ch, 18h, 30h, 60h db 30h, 18h, 0Ch, 06h db 8 dup (0) db 7Eh, 00h, 00h, 7Eh, 00h, 00h db 00h, 00h, 00h, 00h, 00h, 60h db 30h, 18h, 0Ch, 06h, 0Ch, 18h db 30h, 60h, 00h, 00h, 00h, 00h db 00h, 3Eh, 63h, 63h, 06h, 0Ch db 0Ch, 00h, 0Ch, 0Ch, 00h, 00h db 00h, 00h, 00h db '>ccooon`>' db 00h, 00h, 00h, 00h, 00h, 08h db 1Ch, 36h, 63h, 63h, 7Fh, 63h db 63h, 63h, 00h, 00h, 00h, 00h db 00h db '~333>333~' db 00h, 00h, 00h, 00h, 00h, 1Eh db 33h, 61h, 60h, 60h, 60h, 61h db 33h, 1Eh, 00h, 00h, 00h, 00h db 00h db '|6333336|' db 00h, 00h, 00h, 00h, 00h, 7Fh db 33h, 31h, 34h, 3Ch, 34h, 31h db 33h, 7Fh, 00h, 00h, 00h, 00h db 00h, 7Fh db '314<400x' db 00h, 00h, 00h, 00h, 00h, 1Eh db 33h, 61h, 60h, 60h, 6Fh, 63h db 33h, 1Dh, 00h, 00h, 00h, 00h db 00h, 63h, 63h, 63h, 63h, 7Fh db 63h, 63h, 63h, 63h, 00h, 00h db 00h, 00h, 00h db 3Ch db 7 dup (18h) db 3Ch, 00h, 00h, 00h, 00h, 00h db 0Fh, 06h, 06h, 06h, 06h, 06h db 66h, 66h, 3Ch, 00h, 00h, 00h db 00h, 00h db 's366<663s' db 0, 0, 0, 0, 0 db 'x0000013' db 7Fh, 00h, 00h, 00h, 00h, 00h db 0C3h,0E7h,0FFh,0DBh,0C3h,0C3h db 0C3h,0C3h,0C3h, 00h, 00h, 00h db 00h, 00h, 63h, 73h, 7Bh, 7Fh db 6Fh, 67h, 63h, 63h, 63h, 00h db 00h, 00h, 00h, 00h, 1Ch, 36h db 63h, 63h, 63h, 63h, 63h, 36h db 1Ch, 00h, 00h, 00h, 00h, 00h db '~333>000x' db 0, 0, 0, 0, 0 db '>ccccko>' db 6, 7, 0, 0, 0, 0 db '~333>633{' db 00h, 00h, 00h, 00h, 00h, 3Eh db 63h, 63h, 30h, 1Ch, 06h, 63h db 63h, 3Eh, 00h, 00h, 00h, 00h db 00h,0FFh,0DBh, 99h, 18h, 18h db 18h, 18h, 18h, 3Ch, 00h, 00h db 00h, 00h, 00h db 'cccccccc>' db 00h, 00h, 00h, 00h, 00h,0C3h db 0C3h,0C3h,0C3h,0C3h,0C3h, 66h db 3Ch, 18h, 00h, 00h, 00h, 00h db 00h,0C3h,0C3h,0C3h,0C3h,0C3h db 0DBh,0FFh, 66h, 66h, 00h, 00h db 00h, 00h, 00h,0C3h,0C3h, 66h db 3Ch, 18h, 3Ch, 66h,0C3h,0C3h db 00h, 00h, 00h, 00h, 00h,0C3h db 0C3h,0C3h, 66h, 3Ch, 18h, 18h db 18h, 3Ch, 00h, 00h, 00h, 00h db 00h,0FFh,0C3h, 86h, 0Ch, 18h db 30h, 61h,0C3h,0FFh, 00h, 00h db 00h, 00h, 00h db 3Ch db 7 dup (30h) db 3Ch, 00h, 00h, 00h, 00h, 00h db 40h, 60h, 70h, 38h, 1Ch, 0Eh db 07h, 03h, 01h, 00h, 00h, 00h db 00h, 00h db 3Ch db 7 dup (0Ch) db 3Ch, 00h, 00h, 00h, 08h, 1Ch db 36h, 63h db 21 dup (0) db 0FFh, 00h, 00h, 18h, 18h, 0Ch db 16 dup (0) db 3Ch, 06h, 3Eh, 66h, 66h, 3Bh db 00h, 00h, 00h, 00h, 00h db 'p00<6333n' db 0 db 7 dup (0) db 3Eh, 63h, 60h, 60h, 63h, 3Eh db 00h, 00h, 00h, 00h, 00h, 0Eh db 06h, 06h, 1Eh, 36h, 66h, 66h db 66h, 3Bh, 00h db 7 dup (0) db 3Eh, 63h, 7Fh, 60h, 63h, 3Eh db 00h, 00h, 00h, 00h, 00h, 1Ch db '620|000x' db 0 db 7 dup (0) db 3Bh, 66h, 66h, 66h, 3Eh, 06h db 66h, 3Ch, 00h, 00h, 00h db 'p006;333s' db 00h, 00h, 00h, 00h, 00h, 0Ch db 0Ch, 00h, 1Ch, 0Ch, 0Ch, 0Ch db 0Ch, 1Eh, 00h, 00h, 00h, 00h db 00h, 06h, 06h, 00h, 0Eh, 06h db 06h, 06h, 66h, 66h, 3Ch, 00h db 00h, 00h, 00h db 'p0036<63s' db 00h, 00h, 00h, 00h, 00h, 1Ch db 7 dup (0Ch) db 1Eh db 8 dup (0) db 0E6h,0DBh,0DBh,0DBh,0DBh,0DBh db 8 dup (0) db 6Eh, 33h, 33h, 33h, 33h, 33h db 00h db 7 dup (0) db 3Eh, 63h, 63h, 63h, 63h, 3Eh db 8 dup (0) db 'n333>00x' db 00h, 00h, 00h, 00h, 00h, 00h db 3Bh, 66h, 66h, 66h, 3Eh, 06h db 06h, 0Fh, 00h, 00h, 00h, 00h db 00h, 00h, 6Eh, 33h, 33h, 30h db 30h, 78h, 00h db 7 dup (0) db 3Eh, 63h, 38h, 0Eh, 63h, 3Eh db 00h, 00h, 00h, 00h, 00h, 08h db 18h, 18h, 7Eh, 18h, 18h, 18h db 1Bh, 0Eh, 00h, 00h, 00h, 00h db 00h, 00h, 00h, 00h, 66h, 66h db 66h, 66h, 66h, 3Bh, 00h db 7 dup (0) db 0C3h,0C3h,0C3h, 66h, 3Ch, 18h db 8 dup (0) db 0C3h,0C3h,0DBh,0DBh, 7Eh, 66h db 8 dup (0) db 63h, 36h, 1Ch, 1Ch, 36h, 63h db 8 dup (0) db 63h, 63h, 63h, 63h, 3Fh, 03h db 06h, 3Ch, 00h, 00h, 00h, 00h db 00h, 00h, 7Fh, 66h, 0Ch, 18h db 33h, 7Fh, 00h, 00h, 00h, 00h db 00h, 0Eh, 18h, 18h, 18h, 70h db 18h, 18h, 18h, 0Eh, 00h, 00h db 00h, 00h, 00h, 18h, 18h, 18h db 18h, 00h, 18h, 18h, 18h, 18h db 00h, 00h, 00h, 00h, 00h, 70h db 18h, 18h, 18h, 1Ch, 18h, 18h db 18h, 70h, 00h, 00h, 00h, 00h db 00h db 3Bh, 6Eh db 15 dup (0) db 08h, 1Ch, 36h, 63h, 63h, 63h db 7Fh, 00h, 00h, 00h, 00h, 1Eh db 33h, 61h, 60h, 60h, 61h, 63h db 3Eh, 06h, 03h, 3Eh, 00h, 00h db 00h, 66h, 66h, 00h, 66h, 66h db 66h, 66h, 66h, 3Bh, 00h, 00h db 00h, 00h, 06h, 0Ch, 18h, 00h db 3Eh, 63h, 7Fh, 60h, 63h, 3Eh db 00h, 00h, 00h, 00h, 08h, 1Ch db 36h, 00h, 3Ch, 06h, 3Eh, 66h db 66h, 3Bh, 00h, 00h, 00h, 00h db 00h, 66h, 66h, 00h, 3Ch, 06h db 3Eh, 66h, 66h, 3Bh, 00h, 00h db 00h, 00h, 30h, 18h, 0Ch, 00h db 3Ch, 06h, 3Eh, 66h, 66h, 3Bh db 00h, 00h, 00h, 00h, 1Ch, 36h db 1Ch, 00h, 3Ch, 06h, 3Eh, 66h db 66h, 3Bh, 00h db 7 dup (0) db 3Ch, 66h, 60h, 66h, 3Ch, 06h db 3Ch, 00h, 00h, 00h, 08h, 1Ch db 36h, 00h, 3Eh, 63h, 7Fh, 60h db 63h, 3Eh, 00h, 00h, 00h, 00h db 00h, 66h, 66h, 00h, 3Eh, 63h db 7Fh, 60h, 63h, 3Eh, 00h, 00h db 00h, 00h, 30h, 18h, 0Ch, 00h db 3Eh, 63h, 7Fh, 60h, 63h, 3Eh db 00h, 00h, 00h, 00h, 00h, 36h db 36h, 00h, 1Ch, 0Ch, 0Ch, 0Ch db 0Ch, 1Eh, 00h, 00h, 00h, 00h db 18h, 3Ch, 66h, 00h, 38h, 18h db 18h, 18h, 18h, 3Ch, 00h, 00h db 00h, 00h, 60h, 30h, 18h, 00h db 38h, 18h, 18h, 18h, 18h, 3Ch db 00h, 00h, 00h, 00h, 63h, 63h db 08h, 1Ch, 36h, 63h, 63h, 7Fh db 63h, 63h, 00h, 00h, 00h, 1Ch db 36h, 1Ch, 00h, 1Ch, 36h, 63h db 63h, 7Fh, 63h, 63h, 00h, 00h db 00h, 0Ch, 18h, 30h, 00h, 7Fh db 33h, 30h, 3Eh, 30h, 33h, 7Fh db 00h db 7 dup (0) db 6Eh, 3Bh, 1Bh, 7Eh,0D8h,0DCh db 77h, 00h, 00h, 00h, 00h, 1Fh db 36h, 66h, 66h, 7Fh, 66h, 66h db 66h, 67h, 00h, 00h, 00h, 00h db 08h, 1Ch, 36h, 00h, 3Eh, 63h db 63h, 63h, 63h, 3Eh, 00h, 00h db 00h, 00h, 00h, 63h, 63h, 00h db 3Eh, 63h, 63h, 63h, 63h, 3Eh db 00h, 00h, 00h, 00h, 30h, 18h db 0Ch, 00h, 3Eh, 63h, 63h, 63h db 63h, 3Eh, 00h, 00h, 00h, 00h db 18h, 3Ch, 66h, 00h, 66h, 66h db 66h, 66h, 66h, 3Bh, 00h, 00h db 00h, 00h, 30h, 18h, 0Ch, 00h db 66h, 66h, 66h, 66h, 66h, 3Bh db 00h, 00h, 00h, 00h, 00h, 63h db 63h, 00h, 63h, 63h, 63h, 63h db 3Fh, 03h, 06h, 3Ch, 00h, 00h db 63h, 63h, 1Ch, 36h, 63h, 63h db 63h, 63h, 36h, 1Ch, 00h, 00h db 00h, 00h, 63h, 63h, 00h, 63h db 63h, 63h, 63h, 63h, 63h, 3Eh db 00h, 00h, 00h, 00h, 18h, 18h db 7Eh,0C3h,0C0h,0C0h,0C3h, 7Eh db 18h, 18h, 00h, 00h, 00h, 00h db 1Ch db '600x000s~' db 00h, 00h, 00h, 00h, 00h,0C3h db 66h, 3Ch, 18h,0FFh, 18h,0FFh db 18h, 18h, 00h, 00h, 00h, 00h db 0FCh db 'ff|bfoff' db 0F3h, 00h, 00h, 00h, 00h, 0Eh db 1Bh, 18h, 18h, 18h, 7Eh, 18h db 18h, 18h, 18h,0D8h, 70h, 00h db 00h, 0Ch, 18h, 30h, 00h, 3Ch db 06h, 3Eh, 66h, 66h, 3Bh, 00h db 00h, 00h, 00h, 0Ch, 18h, 30h db 00h, 38h, 18h, 18h, 18h, 18h db 3Ch, 00h, 00h, 00h, 00h, 0Ch db 18h, 30h, 00h, 3Eh, 63h, 63h db 63h, 63h, 3Eh, 00h, 00h, 00h db 00h, 0Ch, 18h, 30h, 00h, 66h db 66h, 66h, 66h, 66h, 3Bh, 00h db 00h, 00h, 00h, 00h, 3Bh, 6Eh db 00h, 6Eh, 33h, 33h, 3Bh, 33h db 33h, 33h, 00h, 00h, 3Bh, 6Eh db 00h, 63h, 73h, 7Bh, 7Fh, 6Fh db 67h, 63h, 63h, 00h, 00h, 00h db 00h, 3Ch, 6Ch, 6Ch, 3Eh, 00h db 7Eh, 00h db 7 dup (0) db 38h, 6Ch, 6Ch, 38h, 00h, 7Ch db 00h db 8 dup (0) db 18h, 18h, 00h, 18h, 18h, 33h db 33h, 1Eh, 00h, 00h db 8 dup (0) db 7Fh, 60h, 60h db 11 dup (0) db 7Fh, 03h, 03h, 00h, 00h, 00h db 00h, 00h, 00h, 60h,0E0h, 63h db 66h, 6Ch, 18h, 30h, 6Eh,0C3h db 06h, 0Ch, 1Fh, 00h, 00h, 60h db 0E0h, 63h, 66h, 6Ch, 18h, 30h db 67h,0CFh, 1Fh, 03h, 03h, 00h db 00h, 00h, 18h, 18h, 00h, 18h db 18h, 3Ch, 3Ch, 3Ch, 18h, 00h db 00h, 00h, 00h, 00h, 00h, 00h db 1Bh, 36h, 6Ch, 36h, 1Bh, 00h db 8 dup (0) db 6Ch, 36h, 1Bh, 36h, 6Ch, 00h db 00h, 00h, 00h, 00h, 11h, 44h db 11h, 44h, 11h, 44h, 11h, 44h db 11h, 44h, 11h, 44h, 11h, 44h db 55h,0AAh, 55h,0AAh, 55h,0AAh db 55h,0AAh, 55h,0AAh, 55h,0AAh db 55h,0AAh,0DDh, 77h,0DDh, 77h db 0DDh, 77h,0DDh, 77h,0DDh, 77h db 0DDh, 77h,0DDh, 77h, 18h db 20 dup (18h) db 0F8h db 11 dup (18h) db 0F8h, 18h,0F8h, 18h, 18h, 18h db 18h, 18h, 18h db 7 dup (36h) db 0F6h, 36h, 36h, 36h, 36h, 36h db 36h, 00h, 00h, 00h, 00h, 00h db 00h,0FEh db 7 dup (36h) db 00h, 00h, 00h, 00h, 00h,0F8h db 18h,0F8h, 18h, 18h, 18h, 18h db 18h, 18h, 36h, 36h, 36h, 36h db 36h,0F6h, 06h,0F6h db 36h, 36h db 18 dup (36h) db 00h, 00h, 00h, 00h, 00h,0FEh db 06h,0F6h db 36h, 36h, 36h db 8 dup (36h) db 0F6h, 06h,0FEh, 00h, 00h, 00h db 00h, 00h, 00h, 36h, 36h, 36h db 36h, 36h, 36h, 36h,0FEh, 00h db 00h, 00h, 00h, 00h, 00h, 18h db 18h, 18h, 18h, 18h,0F8h, 18h db 0F8h db 13 dup (0) db 0F8h db 13 dup (18h) db 1Fh, 00h, 00h, 00h, 00h, 00h db 00h, 18h, 18h, 18h, 18h, 18h db 18h, 18h,0FFh, 00h db 12 dup (0) db 0FFh, 18h db 12 dup (18h) db 1Fh, 18h, 18h, 18h, 18h, 18h db 18h db 7 dup (0) db 0FFh, 00h, 00h, 00h, 00h, 00h db 00h, 18h, 18h, 18h, 18h, 18h db 18h, 18h,0FFh, 18h db 10 dup (18h) db 1Fh, 18h, 1Fh, 18h, 18h, 18h db 18h, 18h, 18h db 7 dup (36h) db 37h db 11 dup (36h) db 37h, 30h, 3Fh db 11 dup (0) db 3Fh, 30h, 37h db 11 dup (36h) db 0F7h, 00h,0FFh, 00h db 10 dup (0) db 0FFh, 00h,0F7h, 36h, 36h, 36h db 8 dup (36h) db '707666666' db 00h, 00h, 00h, 00h, 00h,0FFh db 00h,0FFh, 00h, 00h, 00h, 00h db 00h, 00h, 36h, 36h, 36h, 36h db 36h,0F7h, 00h,0F7h, 36h, 36h db 36h, 36h, 36h, 36h, 18h, 18h db 18h, 18h, 18h,0FFh, 00h,0FFh db 00h, 00h, 00h, 00h, 00h, 00h db 36h, 36h, 36h, 36h, 36h, 36h db 36h,0FFh, 00h db 10 dup (0) db 0FFh, 00h,0FFh, 18h, 18h, 18h db 18h, 18h, 18h, 00h, 00h, 00h db 00h, 00h, 00h, 00h,0FFh db 13 dup (36h) db 3Fh, 00h, 00h, 00h, 00h, 00h db 00h, 18h, 18h, 18h, 18h, 18h db 1Fh, 18h, 1Fh db 11 dup (0) db 1Fh, 18h, 1Fh, 18h, 18h, 18h db 18h, 18h, 18h db 7 dup (0) db 3Fh db 13 dup (36h) db 0FFh, 36h, 36h, 36h, 36h, 36h db 36h, 18h, 18h, 18h, 18h, 18h db 0FFh, 18h,0FFh db 13 dup (18h) db 0F8h db 13 dup (0) db 1Fh, 18h, 18h, 18h, 18h, 18h db 18h db 14 dup (0FFh) db 7 dup (0) db 7 dup (0FFh) db 14 dup (0F0h) db 14 dup (0Fh) db 7 dup (0FFh) db 12 dup (0) db 3Bh, 6Eh, 6Ch, 6Ch, 6Eh, 3Bh db 00h, 00h, 00h, 00h, 00h, 00h db 00h db '>c~cc~`` ' db 00h, 00h, 00h, 7Fh db 'cc``````' db 7 dup (0) db 7Fh, 36h, 36h, 36h, 36h, 36h db 36h, 00h, 00h, 00h, 00h, 00h db 7Fh, 63h, 30h, 18h, 0Ch, 18h db 30h, 63h, 7Fh db 8 dup (0) db 3Eh, 6Ch, 6Ch, 6Ch, 6Ch, 38h db 00h, 00h, 00h, 00h, 00h, 00h db 00h db '3333>00`' db 00h, 00h, 00h, 00h, 00h, 00h db 3Bh, 6Eh, 0Ch, 0Ch, 0Ch, 0Ch db 0Ch, 00h, 00h, 00h, 00h, 00h db 7Eh, 18h, 3Ch, 66h, 66h, 66h db 3Ch, 18h, 7Eh, 00h, 00h, 00h db 00h, 00h, 1Ch, 36h, 63h, 63h db 7Fh, 63h, 63h, 36h, 1Ch, 00h db 00h, 00h, 00h, 00h, 1Ch, 36h db 63h, 63h, 63h, 36h, 1Ch, 36h db 36h, 77h, 00h, 00h, 00h, 00h db 1Eh, 30h, 18h, 0Ch, 3Eh, 66h db 66h, 66h, 3Ch, 00h db 7 dup (0) db 7Eh,0DBh,0DBh, 7Eh, 00h, 00h db 00h, 00h, 00h, 00h, 00h, 03h db 06h, 7Eh,0DBh,0DBh,0F3h, 7Eh db 60h,0C0h, 00h, 00h, 00h, 00h db 00h, 1Ch, 30h, 60h, 60h, 7Ch db 60h, 60h, 30h, 1Ch db 7 dup (0) db 3Eh db 7 dup (63h) db 00h, 00h, 00h, 00h, 00h, 00h db 7Fh, 00h, 7Fh, 7Fh, 00h, 7Fh db 00h, 00h, 00h, 00h, 00h, 00h db 18h, 18h, 18h,0FFh, 18h, 18h db 18h, 00h,0FFh, 00h, 00h, 00h db 00h, 00h, 30h, 18h, 0Ch, 06h db 0Ch, 18h, 30h, 00h,0FFh, 00h db 00h, 00h, 00h, 00h, 0Ch, 18h db 30h, 60h, 30h, 18h, 0Ch, 00h db 0FFh, 00h, 00h, 00h, 00h, 00h db 0Eh db 1Bh, 1Bh db 17 dup (18h) db 0D8h,0D8h, 70h, 00h, 00h, 00h db 00h, 00h, 18h, 18h, 00h, 00h db 0FFh, 00h, 00h, 18h, 18h db 7 dup (0) db 3Bh, 6Eh, 00h, 3Bh, 6Eh, 00h db 00h, 00h, 00h, 00h, 00h, 38h db 6Ch, 6Ch, 38h, 00h db 14 dup (0) db 18h, 18h db 13 dup (0) db 30h, 00h, 00h, 00h, 00h, 00h db 00h, 00h, 0Fh, 0Ch, 0Ch, 0Ch db 0Ch, 0Ch,0ECh, 6Ch, 3Ch, 1Ch db 00h, 00h, 00h, 00h,0D8h db 6Ch, 6Ch, 6Ch, 6Ch, 6Ch db 8 dup (0) db 70h,0D8h, 30h, 60h,0C8h,0F8h db 11 dup (0) db 3Ch, 3Ch, 3Ch, 3Ch, 3Ch, 3Ch db 18 dup (0) ;賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽 ; SUBROUTINE ;複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複 GetVideoMode proc near mov ah,es:video_columns_ mov al,8 mov [bp],ax mov al,es:video_page_ mov [bp+3],al retn GetVideoMode endp ;賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽 ; SUBROUTINE ;複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複 SetVideoMode proc near mov ah,es:equip_bits_ and ah,30h cmp ah,30h je loc_20 retn loc_20: mov data_26,2 push ax xor ax,ax mov byte ptr es:video_mode_,8 mov word ptr es:video_columns_,50h mov es:video_page_,al mov es:vid_curs_pos0_,ax cmp FlagH,3 jne loc_21 ; Jump if not equal mov es:vid_curs_pos1_,ax loc_21: mov es:video_segment_,ax mov word ptr es:video_buf_siz_,8000h mov Flag,al mov si,offset data_27 mov cx,0Eh mov ah,0 cli ; Disable interrupts mov dx,3B8h mov al,data_26 out dx,al ; port 3B8h, MDA video control call sub_6 mov dx,3BFh mov al,FlagH out dx,al ; port 3BFh, Hercules config mov cx,14h call sub_19 pop ax test al,80h jnz loc_23 ; Jump if not zero mov ax,0B000h push es mov es,ax xor di,di ; Zero register xor ax,ax ; Zero register mov cx,8000h cmp FlagH,3 je loc_22 ; Jump if equal shr cx,1 ; Shift w/zeros fill loc_22: rep stosw ; Rep when cx >0 Store ax to es:[di] pop es loc_23: mov dx,3B8h mov al,data_26 or al,8 mov data_26,al out dx,al ; port 3B8h, MDA video control retn SetVideoMode endp ;賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽 ; SUBROUTINE ;複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複 sub_4 proc near call TestHerc mov [bp+6],dx retn sub_4 endp ;賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽 ; SUBROUTINE ;複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複 TestHerc proc near ; �昔´夕� 췅 췅エ葉� 깷夕乘α� ; 귣若�: dl = ff - �� 깷夕乘α ; dl = 02 - Hercules in Color ; dl = 01 - Hercules+ ; dl = 00 - Hercules mov dx,3BAh in al,dx ; port 3BAh, MDA/EGA vid status, 6845 chip and al,70h ; 0111 0000 �琉�ゥ��� 〃獸� 殊캙 깷夕乘α� ; (see [Interrupt List]) ; 000 = adapter is Hercules or compatible ; 001 = adapter is Hercules+ ; 101 = adapter is Hercules InColor ; else: adapter is unknown cmp al,50h ; 0101 0000 (Hercules InColor) jne @@24 mov dl,2 jmp short @@ret db 90h @@24: cmp al,10h jne @@25 mov dl,1 jmp short @@ret db 90h @@25: ; 뤲�´夕� 췅 Ж짛��� 飡졷蜈． 〃�� ��設� 3BA mov dx,3BAh mov cx,0FFFFh in al,dx ; port 3BAh, MDA/EGA vid status mov bl,al @@loop: in al,dx ; port 3BAh, MDA/EGA vid status xor al,bl test al,80h jnz @@27 ; 〃� Ж짛β loop @@loop ; 쩆 №�ㄵ �� Ж짛β ; ergo - 將� �� 깷夕乘α mov dl,0FFh jmp short @@ret @@27: ; 눑좂ⓥ, �昔飡� 깷ゃゥ� Œ� 譽�-獸 貰¸α殊М� xor dl,dl @@ret: mov dh,FlagH shr dh,1 retn TestHerc endp public TestHerc ;賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽 ; SUBROUTINE ;複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複 sub_6 proc near cli ; Disable interrupts locloop_29: mov dx,3B4h mov al,ah out dx,al ; port 3B4h, MDA/EGA reg index ; al = 0, horiz char total inc dx lodsb ; String [si] to al out dx,al ; port 3B5h, MDA/EGA indxd data inc ah loop locloop_29 ; Loop if cx > 0 sti ; Enable interrupts retn sub_6 endp db 0 ;賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽 ; SUBROUTINE ;複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複 SetPage proc near mov ah,data_26 and ah,7Fh xor cx,cx ; Zero register and al,1 jz loc_30 ; Jump if zero dec al cmp FlagH,3 jne loc_30 ; Jump if not equal inc al mov cx,8000h or ah,80h loc_30: mov data_26,ah mov es:video_page_,al mov es:video_segment_,cx push ax mov dx,3B8h mov al,ah out dx,al ; port 3B8h, MDA video control pop ax xor ah,ah ; Zero register shl ax,1 ; Shift w/zeros fill mov di,ax mov bx,es:vid_curs_pos0_[di] retn SetPage endp ;賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽 ; SUBROUTINE ;複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複 SetCurPos proc near xor ax,ax ; Zero register mov al,bh and ax,1 shl ax,1 ; Shift w/zeros fill mov di,ax mov es:vid_curs_pos0_[di],dx retn SetCurPos endp ;賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽 ; SUBROUTINE ;複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複 GetCurPos proc near xor ax,ax ; Zero register mov al,bh shl ax,1 ; Shift w/zeros fill mov di,ax mov dx,es:vid_curs_pos0_[di] mov [bp+6],dx mov cx,es:vid_curs_mode_ mov [bp+4],cx retn GetCurPos endp ;賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽 ; SUBROUTINE ;複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複 SetCur proc near mov es:vid_curs_mode_,cx retn SetCur endp db 0 ;賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽 ; SUBROUTINE ;複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複 WriteSym proc near mov bh,1 jmp loc_44 ;賽賽 External Entry into Subroutine 賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽 GetSymAttr: mov bl,bh xor bh,bh ; Zero register mov cx,0B800h or bl,bl ; Zero ? jnz loc_31 ; Jump if not zero mov cx,0B000h push cx loc_31: shl bx,1 ; Shift w/zeros fill mov bx,es:vid_curs_pos0_[bx] mov al,bh xor ah,ah ; Zero register mul data_44 ; ax = data * al push ax xor bh,bh ; Zero register mov cx,bx shl bx,1 ; Shift w/zeros fill shl bx,1 ; Shift w/zeros fill shl bx,1 ; Shift w/zeros fill add cx,bx pop dx call sub_20 mov di,cx mov bl,dl neg bl add bl,7 pop es xor cx,cx ; Zero register mov cl,0Eh mov si,offset data_45 mov dx,1 locloop_32: mov ah,es:[di] mov al,es:[di+1] xchg cx,bx shl ax,cl ; Shift w/zeros fill xchg cx,bx mov [si],ah inc si rol al,1 ; Rotate or dh,al xor al,ah not al and dl,al add di,2000h jns loc_33 ; Jump if not sign sub di,7FA6h loc_33: loop locloop_32 ; Loop if cx > 0 push dx xor cx,cx ; Zero register mov cl,0Eh mov dx,cx push ds pop es mov di,offset data_47 add di,cx mov ax,1 loc_34: push di mov si,offset data_45 repe cmpsb ; Rep zf=1+cx >0 Cmp [si] to es:[di] pop di jz loc_35 ; Jump if zero inc ax mov cx,dx add di,cx cmp ax,0FFh jbe loc_34 ; Jump if below or = xor ax,ax ; Zero register loc_35: pop dx cmp al,0B3h jbe loc_37 ; Jump if below or = cmp al,0DFh ja loc_37 ; Jump if above or dl,dl ; Zero ? jnz loc_38 ; Jump if not zero loc_36: xor ax,ax ; Zero register jmp short loc_38 loc_37: and dh,1 jnz loc_36 ; Jump if not zero loc_38: mov [bp],ax mov es,data_25 retn db 14 dup (0) ;賽賽 External Entry into Subroutine 賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽 Dot: mov di,0B000h test bh,1 jz loc_39 ; Jump if zero mov di,0B800h loc_39: mov es,di call sub_20 mov di,cx mov bx,dx mov bl,data_33[bx] or al,al ; Zero ? jnz loc_40 ; Jump if not zero not bl and es:[di],bl jmp short loc_ret_42 db 90h loc_40: test al,80h jz loc_41 ; Jump if zero xor es:[di],bl jmp short loc_ret_42 db 90h loc_41: or es:[di],bl loc_ret_42: retn ;賽賽 External Entry into Subroutine 賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽 GetPoint: mov di,0B000h test bh,1 jz loc_43 ; Jump if zero mov di,0B800h loc_43: mov es,di call sub_20 mov di,cx mov bx,dx mov bl,data_33[bx] mov al,es:[di] and al,bl neg al sbb al,al neg al mov [bp],al retn db 7 dup (0) WriteSym endp ;賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽 ; SUBROUTINE ;複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複 WriteSymAttr proc near loc_44: or cx,cx ; Zero ? jnz loc_45 ; Jump if not zero jmp loc_ret_61 loc_45: mov ah,bl push ax mov dx,0B000h test bh,1 jz loc_46 ; Jump if zero mov dx,0B800h loc_46: mov bl,bh xor bh,bh ; Zero register shl bx,1 ; Shift w/zeros fill mov bx,es:vid_curs_pos0_[bx] mov al,bh xor ah,ah ; Zero register mul data_44 ; ax = data * al push ax mov es,dx xor bh,bh ; Zero register mov ax,bx shl bx,1 ; Shift w/zeros fill shl bx,1 ; Shift w/zeros fill shl bx,1 ; Shift w/zeros fill add bx,ax mov dx,cx shl cx,1 ; Shift w/zeros fill shl cx,1 ; Shift w/zeros fill shl cx,1 ; Shift w/zeros fill add dx,cx mov cx,dx add cx,bx dec cx mov ax,bx shr ax,1 ; Shift w/zeros fill shr ax,1 ; Shift w/zeros fill shr ax,1 ; Shift w/zeros fill mov dx,cx shr dx,1 ; Shift w/zeros fill shr dx,1 ; Shift w/zeros fill shr dx,1 ; Shift w/zeros fill sub dx,ax inc dx mov data_29,dx xchg bx,cx ;* and bx,7 db 83h,0E3h, 07h ; Fixup - byte match neg bx ;* add bx,7 db 83h,0C3h, 07h ; Fixup - byte match mov al,data_35[bx] mov byte ptr data_41+1,al pop dx call sub_20 mov di,cx mov bx,dx mov data_43,bl mov al,data_34[bx] mov byte ptr data_41,al mov bx,data_41 or bl,bl ; Zero ? jz loc_47 ; Jump if zero dec data_29 loc_47: or bh,bh ; Zero ? jz loc_48 ; Jump if zero dec data_29 loc_48: pop ax push ax xor ch,ch ; Zero register mov cl,0Eh push cx push di test ah,80h jnz loc_53 ; Jump if not zero xor al,al ; Zero register locloop_49: push cx mov cx,data_29 mov dx,di or bl,bl ; Zero ? jz loc_50 ; Jump if zero and es:[di],bl inc di loc_50: rep stosb ; Rep when cx >0 Store al to es:[di] or bh,bh ; Zero ? jz loc_51 ; Jump if zero and es:[di],bh loc_51: mov di,dx add di,data_149e jns loc_52 ; Jump if not sign sub di,7FA6h loc_52: pop cx loop locloop_49 ; Loop if cx > 0 loc_53: mov dx,data_41 or dl,dl ; Zero ? jz loc_54 ; Jump if zero inc data_29 loc_54: or dh,dh ; Zero ? jz loc_55 ; Jump if zero not dh loc_55: pop di pop cx mov bl,data_43 inc bl pop ax xor dl,dl ; Zero register cmp al,0B3h jbe loc_56 ; Jump if below or = cmp al,0DFh ja loc_56 ; Jump if above inc dl loc_56: mul cl ; ax = reg * al mov si,offset data_47 add si,ax locloop_57: push cx lodsb ; String [si] to al or al,al ; Zero ? jz loc_59 ; Jump if zero mov ah,dl and ah,al ror ah,1 ; Rotate mov cl,bl rol ax,cl ; Rotate push di mov cx,data_29 locloop_58: xor es:[di],ah mov bh,al shr ax,1 ; Shift w/zeros fill or ah,bh inc di loop locloop_58 ; Loop if cx > 0 and ah,dh xor es:[di],ah pop di loc_59: add di,2000h jns loc_60 ; Jump if not sign sub di,7FA6h loc_60: pop cx loop locloop_57 ; Loop if cx > 0 push cs pop ds mov es,data_25 loc_ret_61: retn WriteSymAttr endp db 12 dup (0) ;賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽 ; SUBROUTINE ;複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複 ScrollUp proc near mov bl,bh push bx sub dh,ch inc dh sub dh,al mov byte ptr data_30,dh xor ah,ah ; Zero register mul data_44 ; ax = data * al mov data_32,ax sub dl,cl inc dl xor dh,dh ; Zero register mov byte ptr data_30+1,dh mov ax,0Eh mov bx,ax mul byte ptr data_30 ; ax = data * al mov data_30,ax mov ax,bx mul ch ; ax = reg * al push ax mov ax,dx shl dx,1 ; Shift w/zeros fill shl dx,1 ; Shift w/zeros fill shl dx,1 ; Shift w/zeros fill add dx,ax mov data_29,dx xor ch,ch ; Zero register mov ax,cx shl cx,1 ; Shift w/zeros fill shl cx,1 ; Shift w/zeros fill shl cx,1 ; Shift w/zeros fill add cx,ax mov ax,cx pop dx mov bx,dx call sub_20 mov di,cx mov dx,bx add dx,data_32 mov cx,ax call sub_20 mov si,cx push ax xor bh,bh ; Zero register mov bl,dl mov cl,data_34[bx] add ax,data_29 dec ax mov dx,ax and ax,7 neg ax add ax,7 mov bx,ax mov ch,data_35[bx] mov data_41,cx shr dx,1 ; Shift w/zeros fill shr dx,1 ; Shift w/zeros fill shr dx,1 ; Shift w/zeros fill pop ax shr ax,1 ; Shift w/zeros fill shr ax,1 ; Shift w/zeros fill shr ax,1 ; Shift w/zeros fill sub dx,ax inc dx or cl,cl ; Zero ? jz loc_62 ; Jump if zero dec dx loc_62: or ch,ch ; Zero ? jz loc_63 ; Jump if zero dec dx loc_63: mov data_29,dx mov bx,data_41 mov cx,0B800h test byte ptr es:video_page_,1 jnz loc_64 ; Jump if not zero mov cx,0B000h loc_64: mov es,cx mov ds,cx xor cx,cx ; Zero register add cx,cs:data_32 jnz loc_65 ; Jump if not zero mov cx,cs:data_30 jmp short loc_71 db 90h loc_65: mov cx,cs:data_30 locloop_66: push cx push si push di or bl,bl ; Zero ? jz loc_67 ; Jump if zero mov ah,es:[di] and ah,bl lodsb ; String [si] to al not bl and al,bl not bl or al,ah stosb ; Store al to es:[di] loc_67: mov cx,cs:data_29 rep movsb ; Rep when cx >0 Mov [si] to es:[di] or bh,bh ; Zero ? jz loc_68 ; Jump if zero mov ah,es:[di] and ah,bh lodsb ; String [si] to al not bh and al,bh not bh or al,ah stosb ; Store al to es:[di] loc_68: pop di pop si add si,2000h jns loc_69 ; Jump if not sign sub si,7FA6h loc_69: add di,data_147e jns loc_70 ; Jump if not sign sub di,7FA6h loc_70: pop cx loop locloop_66 ; Loop if cx > 0 mov cx,cs:data_32 loc_71: pop si locloop_72: push cx push di or bl,bl ; Zero ? jz loc_73 ; Jump if zero mov ah,es:[di] and ah,bl mov dx,si not bl and dl,bl not bl or ah,dl xchg ah,al stosb ; Store al to es:[di] loc_73: mov cx,cs:data_29 mov ax,si rep stosb ; Rep when cx >0 Store al to es:[di] or bh,bh ; Zero ? jz loc_74 ; Jump if zero mov ah,es:[di] and ah,bh mov dx,si not bh and dl,bh not bh or ah,dl xchg ah,al stosb ; Store al to es:[di] loc_74: pop di add di,2000h jns loc_75 ; Jump if not sign sub di,7FA6h loc_75: pop cx loop locloop_72 ; Loop if cx > 0 push cs pop ds mov es,data_25 retn ScrollUp endp ;賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽 ; SUBROUTINE ;複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複 ScrollDn proc near mov bl,bh push bx sub dh,ch inc dh add ch,dh dec ch sub dh,al mov byte ptr data_30,dh xor ah,ah ; Zero register mul data_44 ; ax = data * al mov data_32,ax sub dl,cl inc dl xor dh,dh ; Zero register mov byte ptr data_30+1,dh mov ax,0Eh mov bx,ax mul byte ptr data_30 ; ax = data * al mov data_30,ax mov ax,bx mul ch ; ax = reg * al add ax,0Dh push ax mov ax,dx shl dx,1 ; Shift w/zeros fill shl dx,1 ; Shift w/zeros fill shl dx,1 ; Shift w/zeros fill add dx,ax mov data_29,dx xor ch,ch ; Zero register mov ax,cx shl cx,1 ; Shift w/zeros fill shl cx,1 ; Shift w/zeros fill shl cx,1 ; Shift w/zeros fill add cx,ax mov ax,cx pop dx mov bx,dx call sub_20 mov di,cx mov dx,bx sub dx,data_32 mov cx,ax call sub_20 mov si,cx push ax xor bh,bh ; Zero register mov bl,dl mov cl,data_34[bx] add ax,data_29 dec ax mov dx,ax and ax,7 neg ax add ax,7 mov bx,ax mov ch,data_35[bx] mov data_41,cx shr dx,1 ; Shift w/zeros fill shr dx,1 ; Shift w/zeros fill shr dx,1 ; Shift w/zeros fill pop ax shr ax,1 ; Shift w/zeros fill shr ax,1 ; Shift w/zeros fill shr ax,1 ; Shift w/zeros fill sub dx,ax inc dx or cl,cl ; Zero ? jz loc_76 ; Jump if zero dec dx loc_76: or ch,ch ; Zero ? jz loc_77 ; Jump if zero dec dx loc_77: mov data_29,dx mov bx,data_41 mov cx,0B800h test byte ptr es:video_page_,1 jnz loc_78 ; Jump if not zero mov cx,0B000h loc_78: mov es,cx mov ds,cx xor cx,cx ; Zero register add cx,cs:data_32 jnz loc_79 ; Jump if not zero mov cx,cs:data_30 jmp short loc_85 db 90h loc_79: mov cx,cs:data_30 locloop_80: push cx push si push di or bl,bl ; Zero ? jz loc_81 ; Jump if zero mov ah,es:[di] and ah,bl lodsb ; String [si] to al not bl and al,bl not bl or al,ah stosb ; Store al to es:[di] loc_81: mov cx,cs:data_29 rep movsb ; Rep when cx >0 Mov [si] to es:[di] or bh,bh ; Zero ? jz loc_82 ; Jump if zero mov ah,es:[di] and ah,bh lodsb ; String [si] to al not bh and al,bh not bh or al,ah stosb ; Store al to es:[di] loc_82: pop di sub di,2000h jns loc_83 ; Jump if not sign add di,data_148e loc_83: pop si sub si,2000h jns loc_84 ; Jump if not sign add si,7FA6h loc_84: pop cx loop locloop_80 ; Loop if cx > 0 mov cx,cs:data_32 loc_85: pop si locloop_86: push cx push di or bl,bl ; Zero ? jz loc_87 ; Jump if zero mov ah,es:[di] and ah,bl mov dx,si not bl and dl,bl not bl or ah,dl xchg ah,al stosb ; Store al to es:[di] loc_87: mov cx,cs:data_29 mov ax,si rep stosb ; Rep when cx >0 Store al to es:[di] or bh,bh ; Zero ? jz loc_88 ; Jump if zero mov ah,es:[di] and ah,bh mov dx,si not bh and dl,bh not bh or ah,dl xchg ah,al stosb ; Store al to es:[di] loc_88: pop di sub di,2000h jns loc_89 ; Jump if not sign add di,7FA6h loc_89: pop cx loop locloop_86 ; Loop if cx > 0 push cs pop ds mov es,data_25 retn ScrollDn endp db 7 dup (0) ;賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽 ; SUBROUTINE ;複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複 tty proc near mov cl,bl xor bx,bx ; Zero register mov bl,es:video_page_ shl bx,1 ; Shift w/zeros fill mov dx,es:vid_curs_pos0_[bx] cmp al,7 je loc_91 ; Jump if equal cmp al,8 je loc_92 ; Jump if equal cmp al,0Ah je loc_94 ; Jump if equal cmp al,0Dh je loc_93 ; Jump if equal mov bl,cl mov cx,1 mov bh,es:video_page_ call WriteSymAttr xor bx,bx ; Zero register mov bl,es:video_page_ shl bx,1 ; Shift w/zeros fill mov dx,es:vid_curs_pos0_[bx] inc dl cmp dl,50h ; 'P' jge loc_95 ; Jump if > or = loc_90: mov bh,es:data_40 call SetCurPos jmp short loc_ret_97 db 90h loc_91: mov ah,0Eh pushf ; Push flags call OldVec10h jmp short loc_ret_97 db 90h loc_92: cmp dl,0 je loc_ret_97 ; Jump if equal dec dl jmp short loc_90 loc_93: xor dl,dl ; Zero register jmp short loc_90 loc_94: mov cx,19h dec cl cmp dh,cl je loc_96 ; Jump if equal inc dh jmp short loc_90 loc_95: xor dl,dl ; Zero register mov cx,19h dec cl cmp dh,cl jge loc_96 ; Jump if > or = inc dh jmp short loc_90 loc_96: mov bh,es:data_40 call SetCurPos mov ax,1 xor cx,cx ; Zero register xor bh,bh ; Zero register mov dx,184Fh call ScrollUp loc_ret_97: retn tty endp db 10 dup (0) ;賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽 ; SUBROUTINE ;複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複 sub_19 proc near mov dx,3BAh locloop_98: in al,dx ; port 3BAh, MDA/EGA vid status or al,al ; Zero ? js loc_99 ; Jump if sign=1 jmp short locloop_98 loc_99: in al,dx ; port 3BAh, MDA/EGA vid status or al,al ; Zero ? jns loc_100 ; Jump if not sign jmp short loc_99 loc_100: loop locloop_98 ; Loop if cx > 0 retn sub_19 endp ;賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽 ; SUBROUTINE ;複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複 sub_20 proc near push si mov si,dx shl si,1 ; Shift w/zeros fill mov dx,data_36[si] push cx shr cx,1 ; Shift w/zeros fill shr cx,1 ; Shift w/zeros fill shr cx,1 ; Shift w/zeros fill add cx,dx pop dx ;* and dx,7 db 83h,0E2h, 07h ; Fixup - byte match neg dx ;* add dx,7 db 83h,0C2h, 07h ; Fixup - byte match pop si retn sub_20 endp db 15 dup (0) ;賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽 ; MAIN ;複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複複 StayResident: ; 뤲�´夕�, М┘� щ 拾� 誓㎤ㄵ�狩�? mov dl,0FFh mov ah,0EFh int 10h cmp dl,0FFh mov dx,offset s_already jne AlreadyStayResident call TestHerc ; �昔´夕� 췅 췅エ葉� 깷夕乘α� cmp dl,0FFh jne HercPresent mov dx,offset s_not_herc AlreadyStayResident: mov ah,9 int 21h ; DOS Services display char string at ds:dx xor ax,ax int 20h ; DOS program terminate HercPresent: ; 뫇젺ⓣ濕� ぎ쵟�ㄽ莘 飡昔ゃ 췅 氏젫� cld xor cx,cx mov cl,80h jcxz loc_105 mov di,data_3e ; = 81H - 젮誓� ぎ� 飡昔え � PSP loc_104: mov al,2Fh ; '/' repne scasb ; Rep zf=0+cx >0 Scan es:[di] for al jcxz loc_105 mov al,[di] ; 氏젫 and al,0DFh ; uppercase cmp al,48h ; 'H' jne loc_104 mov FlagH,1 ; H젵ㄵ� 氏젫 /H loc_105: ; save old vector of int 10h push es xor ax,ax mov es,ax ; ES:=0 mov bx,es:Vec10h ; bx := 0:40 mov word ptr OldVec10h,bx mov bx,es:Vec10h+2 mov word ptr OldVec10h+2,bx ; set new vector of unt 10h cli mov word ptr es:Vec10h,offset Trap10h mov es:Vec10h+2,cs sti pop es mov ah,9 mov dx,offset s_OK int 21h ; ; calculate resident memory mov dx,offset StayResident ; 1A20h mov cl,4 shr dx,cl ; Shift w/zeros fill inc dx mov ax,3100h int 21h ; TSR al=return code,dx=paragraphs s_OK db 'Hercules Resident Video Support Routines. Version 1.10',0Dh,0Ah db '$' s_already db 'Hercules Video Support Routines are already installed.',0Dh,0Ah db '$' s_not_herc db 'Hercules Video Card not present.',0Dh,0Ah db 'Hercules Video Support Routines not installed.', 0Dh, 0Ah, '$' seg_a ends end start src/kernel/debug.mac0100664000076500007650000000062405717143710014135 0ustar prool2prool2 extrn debugl:near extrn debuge:near debug macro P1,P2 ifidn , push ax mov ax,P2 call debugl pop ax else ifidn , mov al,'E' else mov al,'B' endif call debuge endif endm src/kernel/app.com0100664000076500007650000002234206761267572013663 0ustar prool2prool2뚇.���0�!�.�,롖ｉ �� �� �.!�� ����>� 떿뗗��&�=87u&딼��=u�練�� ��Yu�� 池�aC&8u����槌�� �戴꺝껁��� 뚗+��>�#��s��>�#곀8&r(>�#r"�刀G;�r�>�#t�>�#u�;�w뗾��뗟��� �� ← +�렳퀺W�!_袋�롌뗧�3�.��욋%�8&+蹶���%�5����� �� ��%�6� �6� �6� 雍P旺.���[��%뗭퀽둊�!�맳� ���5�!�� �� �5�!�� �� �5�!�� �� �5�!�� �� �%뚇롖�6�!��%�� �!�%�� �!�%�� �!�%�� �!쳬� 塏�@��!첫맳� .��僥��P�J�U뗭곸VW;�r9&� r�M몄!P嵬DD�~t퇿"P莞DD3픐妖DD툠"P�^�w矮꺞뎳淆 픲�^�w툢"P蜈꺞�P雍DD립"P�^�w瘟꺞뎳�� 픲�^�w링"P�t꺞�P��DD3��랗�먁"P�P꺞=��u遇����랒��P뜂�P蝸꺞 픲憂떾 픱=t�/�#P뜂�P��꺞 픲�堉�#P뜂�P��꺞 픲�3楕쪓���P�#P뜂�P�꺞 픲7뒉��=Eu�|�=Bu�r�=Cu�j�� =Su�`����� 띃��'�P�$#P뜂�P瓮꺞 픲뜂 �P뜂�P�1꺞�랗�W�i꺞=��t���^�w멧"P�\꺞�랒��S DD�랗��J DD=��u�^�w�*#P�5꺞�P�LDD3픐�DDD_^뗥]홛뗭V땦 �|껥Xv푐�6F#뒆H#삏� 偸껥#w鉞F#��떾ｋ ����^]�홛뗭� ��#洛�쀢%＼#��# 픲���#��#��#�v橈�Y]�.�).�+��� ��2�&�@뚂뉁뱥6� 꺠��>� r�� 뗿�2쟌��v��껋���%��뗽+�r`뗧뙽롔뚍렳QI懲2윌롙뉟뉄떸뗊C�wr@�w�< t< t< u�2잼� 픱B� 픲C녱2쟬�촇,"t"<\u�<"u촇 稚盂�Y�.�+�� C�뗵뗭+�r�뗥�.� �뎧꺟6� 잚�t�3핃F.�&)�� Q�GY뗹 픱$�� 3琢懲뗹�6� �)꺞뗗＿ 픲�p�3윽���?꺝池&8u��홛뗭�>�# u��딣��#洛뎴�%��#3잼]홛뗭VW�~딢�$&;�u�$&�땥�$&뎩�$&덬_^]홛뗭VW�~딣)�5�딣@��|�"&;�u�6"&�뗿~뎦떾�_^]홛뗭V딣3�%��곣RP樂YY뗱껥�u3잼�"&덬딣@��6"&�"&�^]홛뗭V딣3�%��곣RP雍YY뗱껥�u3잼�6&&�6"&딣@�떾�^]홛뗭VW�~ �t���v3잼Z떿 %��뗹�>&&uW���Y�B�6$&떾 픱1�뗖꺜(;혇 WV��YY�$�;�rV玩�Y�떾�땤;6$&u�W��Y�_^]홛뗭딣뗓곴;혉ｕ 3잼 �� ����]홛뗭딣딽� 꺬뗁겵꺬 �u ;�s�� � �� ����]홛뗭�v���Y�]홛뗭딣셊P縕�뗥�]홛뗭껋VW땦3��F��F�뗞F�뉶�颱�t�v3픐�Q�뗱떾 �}떾傭V�RY� ��v�v澮2�뗱떾 �}떾���p먉F�W�v��YY뗱떾 �|Y3픐V�]YY덯���t!곋 颱�t딣�%� P�PV�7꺞� 颱tV堯��~�t颱�t�P�P�v寮 꺞 �|颱t��3핆�곣�� 혢寺�뎴�$떾�_^뗥]홛뗭V�딳泰u �泰u�딽깎"N 졍=�!r뗱딣%�� �뗞洛뎴�$떾�P�랓�^]홛뗭껋VW�^�7떾덯��^�G@t떾��^� � 뗟G�? u�F�떾N 픲�딣��_^뗥]�U뗭V땦V腕 Y 픱����L�~ u�<~ V����)FV갺_��딡덬 �v �v�v둈쁏��꺞껡�u =��u����3잼^]홛뗭껋V땦V�l Y 픱�������5둈쁏�FY뎈�덯��<~딽�딣�RPV��솇�뗃XZ+�卵딽�딣繪^뗥]홝W�쒜#�딡%=uV� Y꺠떿O 픲�_^홛뗭V땦�Dt宛��t딡덬 P둈쁏�k꺞� �~ 갺��3잼#��<u딡%� 덬� �갟����^]�U뗭V땦�V�Y�^]홛뗭껋V땦� |�D �\ 둋��宇�|�Dt 갟���榕갟��|tV�O� 픱���耀戮���>%u8리#;�u1둈쁏蛙Y 픲갺�燻P�Dt��3픐3픐V穩꺞猷�Dt緩��P뛈�P둈쁏�1꺞=t&둈쁏�gY=t갟� 딡%� 덬�����~� u�D@t쳛d��둊���^뗥]첩�#P��Y�홛뗭퀱둊�^딳 딽�!r �~u떷��P玩蓄]홛뗭�D�^�!떷%�]홛뗭VW�~ 땦딡;�u �~���v���謠�>%u맘#;�u�%��>%u 리#;�u�%�<t�P3픐PV��꺞�Dt�t蝸Y갺���D떾덬덬 �~t? �v;��#��~uW臥�Y덯 픱갟�����딣덬 덬�|�~u갟3잼_^]홛뗭VW땦���딡;�t떿�f�|t �<} V�\Y 픱떿�N�Dt�t�&Y�|| 둈쁏�6Y뗹�D�D�힑��| t3픐�t �#P��Y�D 떿�_^]홛뗭V땦 �|껥| �P�M請뗞洛�뉚$��V�Y�^]홛뗭V땦�>뗞�!r 洛�뉚$��3잼P�請^]홝W�엎#��DtV��Y꺠Ou�_^홝W�쒜#��DtV�|YO꺠 �u�_^홛뗭껋VW딣@=r �^洛�뉚$t3잰��v�v�v��꺞덯�딣�@=r �^洛�뉚$�t딣繪f릩N�땦뗿뗞確<t-< tも請荀S�P뛈�P�v�>꺞[�둊��;�u�뺣 S�P槌픐Q�v梡꺞�^洛걦�$[떿+취_^뗥]홛뗭�?�^딳딽�!r�P��姪]홛뗭곸�VW딣@=s3잰��^洛�뉚$�t�v�v�v嵬꺞愚�^洛겎�$��딣뎳|�딣뎳x�뜺~��m�럛�떈|���|��늽{�< u� F뒉{��F뜂~�뗕+�괋�|>뜂~�뗿+�W뜂~�P�v�{꺞뎳v�;�t꺘v�s���� 딣+냮�냬�+헝O뜺~�꺘x�t���뜂~�뗿+�떿 픳.W뜂~�P�v�-꺞뎳v�;�t꺘v�s���� 딣냬�+헝딣�_^뗥]홛뗭�^洛�뉚$t�P3픐P�v�a뗥�@�^딳딽�!rP�^洛걦�$X�P誤衆]홛뗭V3픐�v��YY뗱껥�u떾��Ft邰u3잼 �� ����^]홛뗭�^洛겎�$�塤B둊 �^딳딽�!r�P�C�숇]홛뗭껋"VW�~ �^껢$wX��rS딣 딳 �}�~t �-G槌堆꺳뛵砂�+菱�묟��F� 宜+菱��F 픲�뛐邪�俱N�, s:�Fも銓�딣 �_^뗥]� U뗭�~ u딣숇딣3�RP�v�v�P캻P�\��]홛뗭�v�v�v�v �P캻P�@��]홛뗭�v�v�v�v �~ u��3픐캻P���]홛뗭V땦 �u�*&��%PV�}YY� P떾P딣3�RP���꺞�"%PV�\YY떾�^]�U뗭V땦V�>(&�u���(&�(&P���뗱3픐V�A�YY=��u�떾�^]홛뗭퀮딽�!r3잼P窪町]홛뗭VW��~뗖2윽��池뛳��~���池慟+�뉥邰t짪駱澄s쨱쯤_^]홛뗭VW��~2윽��池떶討H�_^]홛뗭VW뚕렳�3핆��~뗸2윽��池慟뗿땦且둈��]�+취_^]홛뗭VW��~뗸2윽��池慟�~懲딣�_^]홛뗭퀰둊딳딽�!r묐P擾鏑]첬(%��-%�맭@��!�'맳2%�@�!右�U뗭껋�^洛�뉚$t��R맱D�^�!rA癡�u8�B3�3魯!r1RP�B3�3魯!덯�뎈�ZYr�B�!r;V�r w;F�r�� 3잼P�i鏑뗥]홛뗭VW땦딡;�t����f�<|-�Du 딡 뗕꺜;혋�딡 뗕꺜;혋딡덬 3잼4�|$&t�$&��$&뎩뎦�|�$&덬� �6$&뎥뎥_^]홛뗭껋VW땦�~��"&;�u�>"&� ��덯��^��V瑤�Y_^뗥]홝�&&;"&u�6&&�뤻Y3웰"&�&&�;�"&땧�u"V梡�Y;6&&u 3웰"&�&&�딡�"&V�X�Y� �6"&�N�Y�6"&^홛뗭껋VW땦� ��덯��|�u;6&&t��^��뗸�V��Y�^��u �v�V�*�YY_^뗥]홛뗭V땦 �u�떾��뗱;6"&u�<��V���Y^]홛뗭VW3��~�떾�G껥 t.�N~)�^�|�^�G �_ 둋��뗱� �v��Y뗱떾=��u�껥�u ;~u3잼��^�Gt3잼딣�_^]홛뗭VW�~W�c�Y뗱WV�v�*� 픱 뗟�둋�������_^]홛뗭VW딳�땦�~뚕렳宖쫲D�2�둓�2�+쥰3잼�_^]홙tack overflow! $뚅롔�* � �!尤�U뗭�P3픐P�v橈�뗥�]�Turbo-C - Copyright (c) 1988 Borland Intl.Divide error Abnormal program termination 8&8&8&APP - Assembler PreProcessor Version 0.0.0.0 9-Feb-95 Copyright (C) by Serge Pustovoitoff, 1995. prool@infocom.kharkov.ua, 2:461/35 Syntax: app input_file output_file rCan't open input file %s wCan't open output file %s include debug.mac Can't write output file %s ifndef ??version endif ?debug shortCan't close output file %s �������������������������������#������������������#����#����� �# �#�#C�#B�#��#�$�$�.$�>$�N$�^$�n$�~$��$��$��$��$��$��$   ��������������������������������@��TMP.$$$print scanf : floating point formats not linked (null)0123456789ABCDEF       �������src/kernel/dev_con.c0100664000076500007650000000027606423501204014140 0ustar prool2prool2#include #include #include "kernel.h" int console_read (int minor) { return getch(); } int console_write (int minor, int byte) { return putch (byte); } src/kernel/int0.c0100664000076500007650000000027706330460500013376 0ustar prool2prool2#include #include #include "kernel.h" void interrupt Int0(void) { puts("\nInterrupt 0 - IMHO, divide by zero\n"); #if 0 loop(); #else getch(); #endif } src/kernel/d2p.c0100664000076500007650000000176505745245044013231 0ustar prool2prool2#include #include #include "kernel.h" /****************************************************************************/ /* #define DEBUG */ /****************************************************************************/ char *DirToPath(struct dirent far *Dir, char *path) {char c, far *cc, *ret; int i; unsigned len; #ifdef DEBUG printf("D2P: dir=%s ",(*Dir).d_name); #endif if (Dir==NULL) return NULL; if (path==NULL) return NULL; ret=path; if ((*Dir).Attr.B.Attr1) { cc=memchr((*Dir).d_name,' ',11); if (cc==NULL) len=11; else len=(int)(cc-(*Dir).d_name); memcpy(path,(*Dir).d_name,(len>11)?11:len); path[len]=0; } else { for(i=0;i<8;i++) if ((c=(*Dir).d_name[i])!=' ') *path++=c; else break; if ((*Dir).d_name[8]!=' ') { *path++='.'; for (i=8;i<11;i++) if ((c=(*Dir).d_name[i])!=' ') *path++=c; else break; } *path=0; strlwr(ret); } #ifdef DEBUG printf(" path=%s ",ret); #endif return ret; } src/kernel/int8.c0100664000076500007650000004473006704463010013414 0ustar prool2prool2/*************************BEGIN**********************************************/ /* #define DEBUG */ #include #include #include "kernel.h" void start(char *cmd); unsigned char c=0; unsigned int unique_pid=1; jmp_buf int8_point; int current_pid=0; int sema_ps=0; /****************************************************************************/ int sema_lock (int far *sema) { __cli__(); if (*sema==0) { *sema=1; __sti__(); return 0; /* locked OK */ } __sti__(); return 1; /* no locked */ } /****************************************************************************/ void sema_unlock (int far *sema) { __cli__(); if (*sema==1) *sema=0; __sti__(); } /****************************************************************************/ int generate_pid (void) { return unique_pid++; } /****************************************************************************/ int load_file(char far *name, char huge *adr) {int h, i; #ifdef DEBUG printf("load_file: `%Fs'\n",name); #endif if ((h=open(name,O_RDONLY))==-1) { printf("load_file: Can't open `%Fs'\n",name); return 1; } while (1) { i=(int)read(h, (void far *)adr, SECTOR_SIZE); if (i!=SECTOR_SIZE) break; adr+=SECTOR_SIZE; } close(h); return 0; } /****************************************************************************/ void ps_ (void) {int i; printf("current_pid=%i\n",current_pid); printf( "# PID status mem0 cs ip ds es ax ss sp flag cmd stacktop\n" ); for (i=0;i or s \n"); return; } chdir("/bin"); printf("command=%s\n",cmd); create_process(cmd); /* create_process("sh"); */ /* create_process("p1"); */ /* create_process("p2"); */ /* create_process("p3"); */ for (i=0;i #include #include #include #include /* #define DEBUG */ extern int CluSize; int CluRead (int drive, unsigned int CluNo, void far * buffer) {int i; #ifdef DEBUG printf("\nCluRead=%u ",CluNo); #endif i=absread (TR(drive), CluSize,SecForClu(CluNo), buffer); return i; }src/kernel/ohw.asm0100664000076500007650000000074205706254176013674 0ustar prool2prool2; ohw locals _TEXT segment byte public 'CODE' assume cs:_TEXT extrn ohb:near ohw proc ; 귣¡� 笹�쥯 � HEX-˘ㄵ. 귛��: 笹�¡ � ax. ; 귗� 誓（飡贍 貰魚젺禎恂�. ; 귣㏓쥯β ��ㄿ昔｀젹с ohb push ax ; 뫌魚. �젮� al. mov al,ah call ohb pop ax ; 궙遜�. al. call ohb ret ohw endp public ohw _TEXT ends end src/kernel/out_iv.c0100664000076500007650000000025306076535416014043 0ustar prool2prool2#include #include #include "kernel.h" int OutIntVector (int i) { return printf("%2x %4x:%4x\n",i,FP_SEG(getvect(i)),FP_OFF(getvect(i))); } src/kernel/c0.asm0100664000076500007650000001363707007576360013406 0ustar prool2prool2; Startup module for Proolix kernel (similar to Turbo C 2.0's c0t.obj and ; similar to UNIX's crt.o) ; History ; 0.0.2.15 2-Nov-99 add BeforeSS, BeforeSP ; 0.0.2.14 17-May-97 ; 0.0.2.13 28-Apr-97 �漱�˙�� ‘レ溫� ＋渽 � 聲筌� � 收�, 譽� 甸昔 ; �洙�НŒⓣ�쥯�� Turbo C 2.0 � Мㄵエ 캙э殊 small, ; ＄� ㄾウ�� 〓筍 DS=SS, � � Д�� 〓ギ DS!=SS ; 0.0.2.12 28-Apr-97 ; 0.0.2.11 21-Apr-97 ; 0.0.2.10 20-Apr-97 �漱�˙�� ‘レ溫� ＋渽 � mov SP, ... ; 0.0.2.9 22-Mar-97 ; 0.0.2.8 8-Mar-97 ; 0.0.2.7 3-Mar-97 ; 0.0.2.6 2-Mar-96 ; 0.0.2.5 2-Feb-96 ; 0.0.2.4 14-Oct-96 ; 0.0.2.3 29-Sep-96 ; 0.0.2.2 16-May-96 ; 0.0.2.1 11-May-96 췅�젷 ㄵ쳽筍 control-break ; 0.0.2.0 21-Apr-96 _execexe ; 0.0.1.5 3-Apr-96 ; 0.0.1.4 31-Mar-96 ; 0.0.1.3 24-Mar-96 ; 0.0.1.2 18-Mar-96 ; 0.0.1.1 17-Mar-96 ; 0.0.1.0 14-Mar-96 for EXE kernel ; 0.0.0.15 5-Nov-95 for com kernel ; 0.0.0.15 4-Nov-95 ; 0.0.0.14 15-Jan-95 ; 뙛む��. 귣¡� �ㄽ�． 歲Б�쳽 曄誓� ROM BIOS. chr1 macro sym ; Not worked in graph mode (registr bl - background color!) ; NO SAVE REGS !!! mov ax,0e00h+sym int 10h endm chr1 sayr macro str ; NO SAVE REGS !!! ; 뙛む�ぎ쵟�쩆, 젺젷�（嶺좑 쵟む�ぎ쵟�ㄵ say. 뮢レぎ say ⓤ��レ㎯β 押�ゆ⑧ 9h ; 꼶�, � sayr - 押�ゆ⑧ ROM BIOS (押�ゆ⑨ 0eh �誓贍쥯�⑨ 10h) ; � ｀졽①αえ� 誓┬쵟� �� �젩��젰� mov si,offset str call sayr_proc endm sayr extrn _errno:word extrn _More:word extrn _NLine:word extrn _HeadCnt:word extrn _TrkSecs:word extrn _CurrentDevice:word StackTopPar equ 0fffh _TEXT segment byte public 'CODE' DGROUP group _DATA,_BSS assume cs:_TEXT,ds:DGROUP ; ,ss:DGROUP .8086 _Begin: ; mov DX,DGROUP mov dx,_DATA mov DGROUP@,dx mov DS,dx cli mov SS,dx mov SP,StackTopPar shl 4 sti mov ax,ES:[4] mov _CurrentDevice,ax extrn _saycsip:near call _saycsip extrn _main:near jmp _main DGROUP@ dw 0 public DGROUP@ KernelSS dw 0 KernelSP dw 0 _UserSS dw 0 _UserDS dw 0 UserSP dw 0 SaveAX dw 0 _Trace dw 0 _Succ dw 0 public _UserSS public _UserDS public _Trace public _Succ _stackend proc near mov ax,DGROUP@ add ax,StackTopPar ret _stackend endp public _stackend _kernel_begin proc near mov ax,seg _Begin ret _kernel_begin endp public _kernel_begin extrn _Mode:word extrn _User:word _execpix proc near push bp mov bp,sp push ax push bx push cx push dx push si push di push DS push ES mov ax,word ptr [bp+6] ; segm ; exec(), �琉젺�硫 �� 誓┬쵟 甸�� (_Mode=0, SS=70h) �昔�㎖�ㄸ� ��誓若� � ; 誓┬� ��レ㎜쥯收ワ (_Mode=1, SS=User's SS) ; exec(), �琉젺�硫 �� 誓┬쵟 ��レ㎜쥯收ワ, �� �昔�㎖�ㄸ� �㎚����⑨ 誓┬쵟 ; (將� ι� �拾�� �昔ㅳ쵟筍 若昔溫, � ��첓 exec � Д�� �昔ⓤ若ㄸ� 獸レぎ �� ; 誓┬쵟 甸�� � ‥㎯笹�˛臾 ��誓若ㄾ� � 誓┬� ��レ㎜쥯收ワ) ; SAVE SS SP CLI mov CS:KernelSS,SS mov CS:KernelSP,SP mov CS:_Mode,1 STI mov DS,ax mov ES,ax mov word ptr CS:@@seg,ax mov bx,0fffeh sub bx,word ptr [bp+8] ; 0fffeh - len ; save Return address in PSP mov cx,offset Return mov ES:[12],cx mov cx,CS mov ES:[14],cx CLI mov SS,ax mov SP,bx STI ; EXEC! JMP dword ptr StartAddr ; 〓ギ CALL Return: public Return ; RESTORE SS SP CLI mov SS,CS:KernelSS mov SP,CS:KernelSP mov CS:_Mode,0 STI pop ES pop DS pop di pop si pop dx pop cx pop bx pop ax pop bp ret StartAddr dw 102h @@seg dw 0 ; seg _execpix endp public _execpix _WritePhysSec proc ; int WritePhysSec (unsigned char drive, unsigned char sec, unsigned char head, ; unsigned char trk, char *Buffer); ; ALL REGS SAVED push bp mov bp,sp push bx push cx push dx push ES push DS pop ES mov dl,byte ptr [bp+ 4] ; drive mov cl,byte ptr [bp+ 6] ; sec mov dh,byte ptr [bp+ 8] ; head mov ch,byte ptr [bp+10] ; trk mov bx,word ptr [bp+12] ; Buffer mov ax,0301h; Fn=03, Write 1 sector int 13h jc @@err xor ax,ax jmp @@ret @@err: ; mov ax,-1 @@ret: pop ES pop dx pop cx pop bx ; mov sp,bp pop bp ret _WritePhysSec endp public _WritePhysSec _TEXT ends _DATA segment word public 'DATA' ; System call table _SysTable label word public _SysTable include syskern.asm _DATA ends _BSS segment word public 'BSS' _NearBuffer db 512 dup ('.') ; for absread.c. public _NearBuffer ; �拾�� �� ��誓醒첓筍 ｀젺ⓩ� 64k _BSS ends public _Begin end _Beginsrc/kernel/msdos.asm0100664000076500007650000000143606100463636014215 0ustar prool2prool2_TEXT segment byte public 'CODE' assume cs:_TEXT _msdos proc extrn _RestoreVec:near ; ´惜呻� 飡졷瑜 �誓贍쥯�⑨ cli call _RestoreVec sti xor ax,ax mov ES,ax ; Read MBR mov dl,80h ; drive mov dh,0 ; head mov cl,1 ; sec mov ch,0 ; trk mov al,1 ; sec count mov ah,2 ; Fn read mov bx,7c00h int 13h nop jc @@reboot ;jmp 0:7c00 db 0eah dw 7c00h dw 0 @@reboot:; jmp ffff:0 db 0eah dw 0 dw 0ffffh _msdos endp public _msdos _TEXT ends end src/kernel/msh.c0100664000076500007650000001232606272502000013306 0ustar prool2prool2/* Mouse shell for Proolix (aka Desktop for Proolix) */ #include #include "kernel.h" #include #include #include "msh.h" void help(void); void ladder(void); /*---------------------------------------------------------------------------*/ void msh_pause(long int L) {long int k; for ( k=0 ; k < L ; k++); } /*---------------------------------------------------------------------------*/ void drebezg(void) { /* while (kbhit())getch();*/ } /*---------------------------------------------------------------------------*/ void msh_ident(void) { gotoxy(20,0); printf("\007XProolix for BK-0010 ;) Ver. 0.0.0.6 4-Mar-94"); /* History 0.0.0.6 4-Mar-94 - 誠�쳽� ��젪Œ彛莘 �젩�栒 � com-��設젹� 0.0.0.5 2-Mar-94 - ㄵ쳽� ��젪Œ彛莘 �젩�栒 � com-��設젹� �� きª� 붲�ギ�音 (細. ぎК��� � bios.c) 0.0.0.4 1-Mar-94 0.0.0.3 27-Feb-94 - 細. ぎК���졷Ł � kernel.c 췅 쩆��莘 쩆栒 0.0.0.2 25-Feb-94 0.0.0.1 25-Feb-94 - 將� ´褻⑨ �� º�쳽 � 醒‥ ��Д�� ´褻Ŀ, �� 〓쳽 拾� 젺��歲昔쥯췅 � kharkov.friends */ } /*---------------------------------------------------------------------------*/ void atsay(int x, int y, char * str) { gotoxy(x,y); printf(str); } /*---------------------------------------------------------------------------*/ void attr(void) {unsigned int i,j; for (i=0;i<16;i++) for (j=0;j<16;j++) { gotoxy(i,j); textattr(j+(i<<4)); putch('*'); } } /*---------------------------------------------------------------------------*/ void icon(struct DeskTop Desk [], int i) { gotoxy(Desk[i].x,Desk[i].y); printf(Desk[i].Name); } /*---------------------------------------------------------------------------*/ int execm(void) { int i; int k, b, MaxFolder; long ii; unsigned int j; char far *rec; int Chars; int Files; struct dirent far *D; if (CurrentDevice==-1) {puts("No mount"); return -1;} for(i=0;i"); } else goto br; */ } else if (Files #include #include "kernel.h" void nulldev (void) { } /****************************************************************************/ void FDDstrategy (void) { } /****************************************************************************/ void HDDstrategy (void) { } src/kernel/cold.asm0100664000076500007650000000050706402353232014002 0ustar prool2prool2_TEXT segment byte public 'CODE' assume cs:_TEXT _cold proc near mov ax,40h mov ds,ax mov bx,72h mov [bx],4321h db 0eah ; JMP F000:FFF0 dw 0fff0h,0f000h _cold endp public _cold _TEXT ends end src/kernel/conv.c0100664000076500007650000001406006134544354013500 0ustar prool2prool2#include #include #include "kernel.h" /****************************************************************************/ /* #define DEBUG */ /****************************************************************************/ char HexDigit [] = "0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ"; int Divisor8 [] = {0100000, 010000, 01000, 0100, 010, 1}; int Divisor10 [] = {10000, 1000, 100, 10, 1}; long Divisor10L [] = {1000000000L, 100000000L, 10000000L, 1000000L, 100000L, 10000L, 1000L, 100L, 10L, 1L}; long Divisor8L [] = {010000000000L, 01000000000L, 0100000000L, 010000000L, 01000000L, 0100000L, 010000L, 01000L, 0100L, 010L, 01L}; int htoi(const char far *s) { int i; char c; i=0; while (*s) { i<<=4; c=toupper(*s++); if ((c>='0')&&(c<='9')) i+=c-'0'; else if ((c>='A')&&(c<='F')) i+=c+10-'A'; else return 0; } return i; } /****************************************************************************/ long htol(const char far *s) { long i; char c; i=0; while (*s) { i<<=4; c=toupper(*s++); if ((c>='0')&&(c<='9')) i+=c-'0'; else if ((c>='A')&&(c<='F')) i+=c+10-'A'; else return 0; } return i; } /****************************************************************************/ int atoi(const char far *s) { int i; char c; i=0; if (*s=='+') s++; else if(*s=='-')return-atoi(++s); while (*s) { c=*s++; if (isdigit(c)) {i=i*10; i+=c-'0';} else break; } return i; } /****************************************************************************/ long atol(const char far *s) { long i; char c; i=0; if (*s=='+') s++; else if(*s=='-')return-atol(++s); while (*s) { c=*s++; if (isdigit(c)) {i=i*10; i+=c-'0';} else break; } return i; } /****************************************************************************/ #if 0 void fuck1(void) { int Divisor [] = {10000, 1000, 100, 10, 1}; printf("fuck1 = %04X\n",Divisor[0]); } #endif /****************************************************************************/ char far *itoa (int w, char far *str, int radix) { char far *ret; int i, r, pow, n; /* printf("itoa = %04X\n",Divisor10[0]); */ if (radix>34) radix=34; ret=str; if (w<0) if (radix==10) {*str++='-'; itoa(-w,str,-10); return ret;} switch(radix) { case 2: for (i=0;i<16;i++) {*str++='0'+ w & 0x8000; w<<=1;} break; case 8: for (i=0;i<6;i++) {r=w/Divisor8[i]; w%=Divisor8[i]; *str++='0'+r;} break; case 16: for (i=0;i<4;i++) {*str++=HexDigit[(w&0xF000)>>12];w<<=4;} break; case 10: *str++='0'; for (i=0;i<5;i++) {r=w/Divisor10[i]; w%=Divisor10[i]; *str++='0'+r; #ifdef DEBUG printf("itoa: Divisor10[i]=%04X r=%04X w=%04X\n", Divisor10[i],r,w); #endif } break; case -10: for (i=0;i<5;i++) {r=w/Divisor10[i]; w%=Divisor10[i]; *str++='0'+r; } break; default: pow=UINT_MAX; for (i=1;i<16;i++) {pow/=radix; if (pow>0) break;} n=i; pow=1; for (i=1;i34) radix=34; ret=str; if (w<0) if (radix==10) {*str++='-'; ltoa(-w,str,-10); return ret;} switch(radix) { case 2: for (i=0;i<32;i++) {*str++='0'+ w & 0x8000; w<<=1;} break; case 8: for (i=0;i<11;i++) {r=w/Divisor8L[i]; w%=Divisor8L[i]; *str++='0'+r;} break; case 16: for (i=0;i<8;i++) {*str++=HexDigit[(int)((w&0xF0000000L)>>28)];w<<=4;} break; case 10: *str++='0'; for (i=0;i<10;i++) {r=w/Divisor10L[i]; w%=Divisor10L[i]; *str++='0'+r; } break; case -10: for (i=0;i<10;i++) {r=w/Divisor10L[i]; w%=Divisor10L[i]; *str++='0'+r; } break; default: pow=ULONG_MAX; for (i=1;i<32;i++) {pow/=radix; if (pow>0) break;} n=i; pow=1; for (i=1;i34) radix=34; ret=str; switch(radix) { case 2: for (i=0;i<32;i++) {*str++='0'+ w & 0x8000; w<<=1;} break; case 8: for (i=0;i<11;i++) {r=w/Divisor8L[i]; w%=Divisor8L[i]; *str++='0'+r;} break; case 16: for (i=0;i<8;i++) {*str++=HexDigit[(int)((w&0xF0000000L)>>28)];w<<=4;} break; case 10: *str++='0'; for (i=0;i<10;i++) {r=w/Divisor10L[i]; w%=Divisor10L[i]; *str++='0'+r; } break; case -10: for (i=0;i<10;i++) {r=w/Divisor10L[i]; w%=Divisor10L[i]; *str++='0'+r; } break; default: pow=ULONG_MAX; for (i=1;i<32;i++) {pow/=radix; if (pow>0) break;} n=i; pow=1; for (i=1;i #include #include "../include/conf.c" #define BUFSIZE 160 int main(int argc, char *argv[]) { int i, j ,k, FlagN; FILE *table, *kernel, *util, *make; char Table [] = "syscall.tbl"; char KLib [] = "syskern.asm"; char buf [BUFSIZE]; char s1 [BUFSIZE]; char s2 [BUFSIZE]; char s3 [BUFSIZE]; char Module [BUFSIZE]; char Proc [] = "\ ; Do not edit this file.\n\ ; This file is automatically generated\n\n\ \tmodel tiny\n\ \t.code\n\ %s:\tmov\tax,%i\n\ \tint\t0%02Xh\n\ \tret\n\ \tpublic\t%s\n\ \tend\n"; char do_not_edit [] = "\ %s Do not edit this file.\n\ %s This file is automatically generated\n\n"; if (argc<2) { puts("usage: gentbl CommandSourcePath [-n]\n\ -n - no overwrite existing modules *.asm"); return 1; } if (argc==3) if (!strcmp(argv[2],"-n")) FlagN=1; else FlagN=0; puts("\n\tGenTbl v. 0.0.0.3 24-Mar-96 Generate System Calls\n"); /* History 0.0.0.3 24-Mar-96 0.0.0.2 13-Dec-95 */ buf[0]=0; if((table=fopen(Table,"rt"))==NULL) {printf("Can't open %s\n",Table);return 2;} if((kernel=fopen(KLib,"wt"))==NULL) {printf("Can't open %s\n",KLib);return 2;} sprintf(Module,"%s\\syscall.h",argv[1]); if((make=fopen(Module,"wt"))==NULL) {printf("Can't open %s\n",Module);return 2;} if(fprintf(make,do_not_edit,";",";")==EOF) {printf("Can't write %s\n",Module);return 2;} if(fprintf(make,"INT_NO\tequ\t0%02Xh\n",INT_NO)==EOF) {printf("Can't write %s\n",Module);return 2;} if(fprintf(kernel,do_not_edit,";",";")==EOF) {printf("Can't write %s\n",KLib);return 2;} for(i=0;;) { if(fgets(buf,BUFSIZE,table)==NULL) break; switch (buf[0]) { case '\n': case ' ' : case ';' : case 0 : continue; } s3[0]=0; sscanf(buf,"%s %s %s",s1,s2,s3); if (!s3[0]) strcpy(s3,s1); if(fprintf(kernel,"extrn\t%s:near\ndw\t%s,_TEXT:%s\n",s3,s2,s3)==EOF) {printf("Can't write %s\n",KLib);return 2;} if(fprintf(make,"%s\tequ\t%03i\n",s1+1,i)==EOF) {printf("Can't write %s\n",Module);return 2;} sprintf(Module,"%s\\%03i.ASM",argv[1],i); if (FlagN) if((util=fopen(Module,"rt"))!=NULL) { fclose(util); printf("System Call %03i %013s existing. Not rewrited.\n",i,s1); goto LL; } if((util=fopen(Module,"wt"))==NULL) {printf("Can't open %s\n",Module);return 2;} if(fprintf(util,Proc,s1,i,INT_NO,s1)==EOF) {printf("Can't write %s\n",Module);return 2;} if(fclose(util)) {printf("Can't close %s\n",Module);} if (strcmp(s1,s3)) printf("System Call %03i %s %s\n",i,s1,s3); else printf("System Call %03i %s\n",i,s1); LL: i++; } if(fclose(table)) {printf("Can't close %s\n",Table); } if(fclose(kernel)) {printf("Can't close %s\n",KLib); } if(fclose(make)) {printf("Can't close %s\n",Module); } puts(""); sprintf(Module,"%s\\tlib.cmd",argv[1]); printf("Generate %s\n",Module); if((make=fopen(Module,"wt"))==NULL) {printf("Can't open %s\n",Module);return 2;} for (j=0;j #include #include "kernel.h" void interrupt Int5(void) { /* puts("\nInterrupt 5 - U pressed PrintScreen key\n"); */ } src/kernel/ppt.c0100664000076500007650000000311506501347644013336 0ustar prool2prool2void process_partition_table (char far *MBRBuf) { struct MBRstru far *MBR; char ExtBuf [SECTOR_SIZE]; int i; MBR=(void far *)MBRBuf; for (i=0; i<4; i++) { if (MBR->Partition[i].system_indicator) { if (NextDrivePartition[i].begin_head; Devices[NextDrive].sec=MBR->Partition[i].begin_sec; Devices[NextDrive].trk=MBR->Partition[i].begin_cyl; Devices[NextDrive].system_indicator=MBR->Partition[i].system_indicator; switch(MBR->Partition[i].system_indicator) { case 1 : Devices[NextDrive].FileSystem=FAT12; break; case 4 : case 6 : Devices[NextDrive].FileSystem=FAT16; break; default: Devices[NextDrive].FileSystem=NO_FAT; } switch(MBR->Partition[i].system_indicator) { case EXTEND: case EXTEND2: Devices[NextDrive].dos_disk=' '; break; default: Devices[NextDrive].dos_disk=NextDOSDrive++; } Devices[NextDrive].ResSecs=MBR->Partition[i].preceding_sec + 1; Devices[NextDrive].MaxSectors=MBR->Partition[i].total_sec +Devices[NextDrive].ResSecs; NextDrive++; if((MBR->Partition[i].system_indicator==EXTEND)||(MBR->Partition[i].system_indicator==EXTEND2)) { /* extended partition */ if (ReadPhysSec2 (_HDD_,MBR->Partition[i].begin_sec, MBR->Partition[i].begin_head,MBR->Partition[i].begin_cyl,ExtBuf)) printf ("boot: extend boot sector read error\n"); process_partition_table(ExtBuf); } } } } } src/kernel/regdump.asm0100664000076500007650000000430006611216522014521 0ustar prool2prool2; Register dump _TEXT segment byte public 'CODE' assume cs:_TEXT sayr macro str ; � ｀졽①αえ� 誓┬쵟� �� �젩��젰� push si lea si,str ; 곷ギ mov si,offset str call sayr_proc pop si endm sayr chr1 macro sym ; via BIOS ; Not worked in graph mode (bl - bg color!) ; NO SAVE REG mov al,sym mov ah,0eh int 10h endm chr1 extrn sayr_proc:near extrn ohw:near _saycsip proc near ; REG SAVED push ax push DS chr1 'i' chr1 'p' chr1 '=' push CS pop ax call ohw chr1 ':' call ll ll: pop ax call ohw chr1 ' ' chr1 'd' chr1 's' chr1 '=' push DS pop ax call ohw push CS pop DS sayr s_ax pop ax push ax call ohw sayr s_bx mov ax,bx call ohw sayr s_cx mov ax,cx call ohw sayr s_dx mov ax,dx call ohw sayr s_si mov ax,si call ohw sayr s_di mov ax,di call ohw sayr s_ss mov ax,SS call ohw sayr s_sp mov ax,SP add ax,6 ; ⓤ��젪ゥ��� SP (� 晨β�� call saycsip � ㄲ愼 push) call ohw sayr s_es mov ax,ES call ohw sayr s_bp mov ax,BP call ohw pop DS pop ax ret ;s0 db 13,10,"CS:IP=",0 s_ax db ' ax=',0 s_bx db ' bx=',0 s_cx db ' cx=',0 s_dx db ' dx=',0 s_si db ' si=',0 s_di db ' di=',0 s_ss db ' SS=',0 s_sp db ' SP=',0 s_ds db ' DS=',0 s_es db ' ES=',0 s_bp db ' BP=',0 _saycsip endp public _saycsip _TEXT ends end src/kernel/videopag.c0100664000076500007650000000031506375636646014344 0ustar prool2prool2#include #include #include "kernel.h" void new_video_page (char page) { union REGS regs; regs.h.ah=5; regs.h.al=page; regs.x.flags=0; int86(0x10,®s,®s); } src/kernel/kernel0100664000076500007650000007204307010271762013571 0ustar prool2prool2MZ#;���C��R!PKLITE Copr. 1990-92 PKWARE Inc. All Rights Reserved�q{@%��"� rj��;;r� ��!� Not enough memory$- 롊-%릮픐�#3�W퐻宖Λ멅뚘S겷9�뚊떷���뗳臺黛��뗈駱NN뗿+�+�렽롗澄�����u贓롙�3醉빜�8맠빍�A춹��B춹��H춹��M춹��S춹��g춹��h춹��i춹�rㅡ�Jt�s�3�3裵�Jt밂堂�Jt먈���s(欄Jt꽹�끱t欄Jt�儺��r 欄Jt㎽��� w}.뒣 뉄3�껠t*欄Jt뱑#欄Jt믍堂�Jt뫱堂�Ju춹�儺��s.듌/쵈�V뗸+�懲^�u�欄Ju춹�儺��r歿�Ju춹�儺��r�欄Ju춹�儺곥�녰六��欄Ju춹�儺��r欄Ju춹�儺�� wE.뒒��t�Z�����<�s�M�P뜚�껆곀 �宅뙽횓핇�뗞껅宅횓�X<�t)牛���欄Ju춹�儺��r 欄Ju춹�儺.뒒耘�[뗫꺝3윕묆�횓윗�&戌膺�횘��롌뗠逈�S쵵렽롙3핆�뗁뗊뗨뗱뗹�   붇 .�롖�롌숀���&�즩�H���.�,�첩 홛뗭PSQRV W딣�.� �&"�™�롔렳.＄샤�+^퉭&� �뚆[p�뗣0��.�.� .�;뗪;\�_^Z`�Y[X]�Iji둞둕둽둵� �^ ��r3잼1.]뱜��3��6�%죳%�貸足�(�^�&�Ku&딦늿;�vH� ��?Mu*뗕0M뎈�덯繪�떿�:�뗥U&븚U UON�S�A>S�O�3�S촗�:띌�']V��`퇦P�U늵k꺞��w&�뉶�< s� �긻� �PV,m,쫉^`, 컏 ^$@� 馳핃` �j 욆V�R~^ 5�lK�VW딣� Fu用�~�u f ��O�_O�#�Y$g裟F%�4.� �t>a2懊�s릵�H�pYp�rQT否P��1&됷￡(GH`�v+&�M떿��패폭 ��#1r9�u)F# 뗗"e��7淺 >�푎 �Ul� 젉�t�c�횬\!딳)�'�s�콡;햱TH�w볐6 2U|0�]Uv'쁪썥�bLlFl�찛3픐�흎9%K�겏껡�ufp��鍊순9������%壻O�]nㅴQ�%=�w겒힝tあ<�<[<10<�劍�%� �끖�?&���^�HA�G�;�w숔Y==押�%bP��젤�F�XG쳰�2훼��^�w�7堯 ��*@"� j Gu��珹y�?�?3 �)�캡d^ ��S�F쩎�>�F&G�쌺@@ �Ag�D�`#�꺝�+^�똅��^儒$F�q�iF��V� �S�|뺢 Lj,�,� vp8쎿v�c{�7#7�뮋좔+�+� 핯洸�쏧\敵�T攝l뉉��?u�G;(_~�|�*녾H�1P뎳 휇 �窕챱Cy핵됽|�|맬H��뮛�%s� 繇�(퇺 뗹�`g�(P�4; Hx?>�(�AAn�=�J�n뫰Xs�&짒% 짗�E짉핂�%쏼짎%a�%>zm�g��K� （ ぅR���#�멈W�U��퇢몥�0���튟透뗗�퓶 tW��}쵨��쾌|鮟G얹%�싾辣땓廉N�QP VWU�싼 롙4뗭＞(퀗叫�(떺５�땱邏］ �%+&��%�&�%좳� 횏,�!�* �.A��>���-9�8긩s� A�;Y>꺝始r;{� 行Ｇ펠U롊f0� 뗠�]��촞�멍'�퍾摸-P�! �{��t 홝뒊�6$�q^6緩� 擁�寮0���잙%F 볫 �%Q�z=��6�%�f�%�#P,8 �eJ 뗱땛股 픱 S{UZLyN/�nD�D��D!D�1�$C쳉�k:B쐸踵�^�"d숗~/9� V�m뵶�,g&1��$uM,}�}팿,S�^� �S��V턇�MT%R둏VW�l* 7뗹 �3楕8떿�8o훼卿�抉?� 픲�9v9=u�����@� 딣껥|�9x竝~!| 뭕~�U}y 룼놯�(�g 攬 t$EV�$똺$`}뺢0r9]챽az��*=;P�H-!0�=v ��솅�.���읮��읈=]핗tE$=?>-펭0=[&=\!�쑦$|� =^0&={�0}$�{~�w㏉t�U� uA�;�Z�V�a땦껥0|9~"�a f~ /WWF.^�/��^�"w�� 취�F~��2�^�얪�xJP5 眺S�*��쏻v� �랎떛杻T$6��cR뱢l蝟o�4�(헔챸[�X�궭��$あ�Pq��솾]H� Z�)相N��(*D%�륬1<샙-}���-Oy�?Ы� �쾴: v�} ����g~� ��|e�3� J�pb脘�DD+�\�����;봨{��.��/� 꾊� ���5 ��-U� Q�젗#�WH�� N굓}}�B�hF���&�許縞5�f �(幾濾� �m��b;V꼳r�� r쮄⑺끓i欒�y#종궺�V�V�Z�蝎��@^版aF放僚�)��J串�6��h�;.&� 칢�O�r�u� h�o� 팜픊,��{M#f ��V�뾬V%�V旣� r�輟�"쐲�9k輔�P힑��zy�엹-*�o븵<瞬o^}o� �� 깅;뵳B泥DuBthI B4��8�'쎏��,羸�(냫�6u糾YuR��/�|,죥,lz&륊�0��(l꺁X妨H W�Y�밳?殞+� ?t3c�꼮7|� H�# C���9� �B9|8�묙 2S�fI�J쇝�>B솉��~=� � 쥋K� �c'�8긘Aa�*82�n�^貝�걎�;Lr룩젻�r� Z�T栗�0,`wA| 뚘Z녒M쳎^a(�z��9�j 3;�(w�#�6 �0�P瓮H귦�~>�%��*H튩�F酪�7�&3^ω7푐!4�f4;>�%r0�0�(�(쯽P삭렞�/�<�"O��%�즬�=F=�~c0�uo��k���%쾴�h�뉶�Q팼�W7襤W�v�a욓S�S�G�뷨LG) 뗱�臺+ t足#6츘w0��D츯探혔퇺nKsQDD銓鏑 퇭d 곫�괓�w��憊w탏]걉/H'p�鑿'�"Rz��L%iT�{�)�)��Q)#�i/춢� ~vSV�'�빎FD](트즃;긊�wx�s駿/�-�-붰퍌헽�?��꺬�%뭢3��얥�벤�(쳗WT벚楕9�~,P(죂s22톤� �(�$쭊�3W]- 햮�|쨌蔯�뎈�?�돿w 4뇫 `�(뮱t픺퓭' �@/샏y$$ � 1i/�Y=��| &秩!�!뮸V궘�즍뎴�'엧#잉�#�#줏�#뼷v#�!뉉늂o;!33 ���=皎"t�3�=�; 틎�C)U4� �=.좠몃쟷샫�wG떁w▥눯˛�`�1Z돆�'�쁎ㅞ2�2�샌,(퐖0B얙엶쐘�F�t�u`�' �P雌zCP彬���P$酪�-t몈i"욪�멪T筽恤몍u괄D�V�%N泗1G밐19M�18�쬹tvw'^v줤#큻#�E눝l^稿l\醱L2��dv캰t나伸�#E$O1섷�{�W�%u*�d%�:�HQS拗N�t1�1��6l� 쏆o뻮m몫챀�GR��겷J涓�8 Y�H��8쏝'!뤨�븱喀d淹륍�[U+o�o꺴시n`|<`v腦d�#^ $�z x� �}긟添�Y�)�녋]�꺫걐c륪�:����&頭�旅@� �^�RV�롂V&갫H柚& 戀=��%�:-V槻 -_迪_�빒`芸蠻+�딳 s�*�I�T⑽4L몞�t.:H�7�L껅�V붎V뻍��>p뫄 \G��|)�긚-0摸]V�꾡V�h��7ru딶>仇뽘o x몭툂�^�B�얚�촨H蘊��~6D) �덭uI= }� rA� �~�퍎숗�C"$��u곋K1[x[b�6,逗��∏욹 x\��=8 忠 � U>�(�et:+E�=�rx fp*u/� T E땂M�T�밐t�,�pＭ%=^h5^�<^E�5%�'늽刑n�F�=��火쿺 �� 0 N#J餃枯J`U�`뚐렻뜛-�쉩�！(＋(cÆ �&ｐ(虎c땯�쁆�擡;슊CK�%?햹�QS툧셿 '�뗊D�X 헠�P��(뎍/쭃똃|9�'`pW���쀎(祐赴넻�bu$�<_u鰲�m�;�&���Y$tM�&Y遲t(�.澔(Iw8쿟��{솕슔꽺W꺦+��;-i`-zc��1/"/ &3V�&;�@&x먥 ��&둋 '�%� 岱ｒ溯/Ｋ%�j &�g:�~d�%ｅ쀻G풧�� 뛒�gTf#�#�%鷄탉x틓 �y�%�U⇒�+}?N쉌혬@ｎ(��(�D�F>澧낂"CK�|�DEN,D뚕^�$:�+^� 죰&5�&t荇� �6mpRR�a 댅 狐馮PbD�W껋>VW뛈�@v��P�쑨�><쀄(@혷�(y퍧敭��7읝w뇾��0~~�|�>C뿙E�b#g��:� ;P-�.�2�c:崙��參(�켚&g� 꼒爛0�6 林룓곅(Ｈ(� ��^혞뇧z 겷;~|�A픫��^��* �R�Z~�a}�z���&� '��&�a '��&��냓&��&��&���&��&��&�!��&� �8鐥 �8�%Ｏ%8{� 잸윇_#P倻t�#�#誣b#�#}#�샻��dD�rL6젊�|왻&�_�猥XXeF.X큍�%I9PB�&�_�뉢(�SO�렓)냷)Gg |점uq8�핗!p퐜Q�<럴a6F��t� #l深d] �4�릵圃F5p챳�V牢�t,(�:r殷�#�7곫�攝�쒯 �tR#�}웨v � f<美�밠�!�<뛉�뷾5&\4pUa툅�q퀖꺯 쵱5��H��-멌u응h�↓�뀜y�'M婉a@N<�떿덏�yNz�z�4뮗n쥤쬘�쬦�Uw�*u3茉�뚏뛈싐 B-� r]DD�\잮r�6�몣� U�4뙙t �4l�FE�&逝]�(헗P�蕓놴�륩( 雜� �i� ) �] 퍃 ╃)�-롐��M h긍싰|쵞!G%욲럲-�[3Y<燾1��X3삲�1퉳�1�1�?-��-�- �z w3龍 崧_1_1:褘k\0;�u읤#h� |�B勺�e財蕎7A7꺙 � -I쎩� 쯔_뗊3�9 밦��_xW_潛 �_�/t�\3Ic�9�m�o0꺓^O�|^�6 6봒SQRg뿞xU싼 롙꿽j��/0o�&~.���.딣즰즽��즴즶蜃즸즺x<즼즾룭�짅 짉 짌.���(� �LH �>IH��떶 dP晞x��v.뭜� �皓�LMj죸P�避��삯�굈��껩w)죫坮�t7��M�럚� 먠t �7�봎w���) 잼3�뗸�u�� �A쥯1_B졇�&쪧r$;歎\櫻'�<'�_^Z쮌Y[X闕 죰v5R�뗊�5�E&셳肺L�t+$,����늚J썾沾�;�!騏^D�뭩H0�W뱍솴J 얆|`E칩��껥뚲�}�췴佈寓Rg�M �%d�듾 d 聿bV W 뽄(` �쪇W^�#�#NO#�#�2'E#� ��#㎓;�;쇛t^ #vz�#?#S^�#s#0#��# #巍/쇱&柴���1��^���똚퐁��G�nsV:삱 � �7 뎩�_쇝c� �덼뎉d6b�3�]�^U���뗠딦롊��w儆  儆�D=�^_].�=�v煜뚕洛.�㎬;�=�=>>>)>6>�?C>P>]>j>w>�@퓙>�>�>�?� 8|�>�前� �>�饌 � ��y >%�>9�??�? 퐾:�C:?-?qG?Tズ&a ′On?{{命�?���� �?�> �|�珀?�?��덢?�U� �:�$1�#>@K뛅X@欺Teqk�}��芒�둀�@졊@�@퇖멋�o$뗥w^� � b�^ � � U�^ � � H�^ � � ;堞 �  퐶 � � ! � �  � "�  � *營 �# t 2� � g :� � Z B� � M J� � @ R� � 3 b� � & j� �  r� � z] � �踵�� x 迭� � k 円� � ^ 沔� � Q 乞� � D 업� � 7 깠� � * ㆇ� �  쀷� �  딑� �  }太 � �" p呑 � � cg�  � V呑 � I呑  � <呑  � /呑 " � "呑 콾� 呑 Z � 呑 *'� �s/�2 tz/ � 'gz/ � :Zz/ � B Mz/ � J @z/ � R 3z/ � Z &z/ � b z/ � j z� � r �!{� y z �� �m �곫^ a�靡� 둉� � I��� =八�0� 1�$ � %�E�$� �� �%� nぇ��!�[x~~8+ �:`�힓�둌�뉶�t�"�P\&����븩꺒VWE| 핼t$Qp7 붾�긃�뉓V級E1��<� ;�-us�&制 際 +u �>헝EDu0u둈@�璞@=X<FF덶nu* �喧 y弊ｋ %�]퓝됎틻:���떷q�솄V穿�닋/p힆h�����渾�"qk널�@)��n�0�"h}U�}'垢+��:�;g}c딽�7�;xw u叱�(늌� �혞V��~�곭떿�뛂楠����? F�d뱾�td �%'- �'�~띾븅�幷 �;�&r.u;�&l쎼쾀w聃�[l퍗6范P\:�m�흈툣 j!�쀔얊�U�{|�둨F�刀}�9DD��D W玩DD>胸�?�&之O�D(�a長rt쁭a뽁��9��^�`뒊v�^ &��F 1�갧|� 넃�꺧긘齬6 ;F;B��^)]�Z�7괁틄쭅�>�t�=�f�V� '迹��젚핕�{�*�*),*�� 큄策� � � �$윸f� 핢-읪��?%纖윎�& ��m~58~벖�췴r,�/�0���7捧 ����(부,,s��漏��Hz透둞��혖�맏%P멈퍏1��w���6>\婉 G� C6瓮��G?Q�1鰲&펀무N쟤얞���(K�괤漂 �x �d�����g��Z�늢겶D�I��m?�OX4 K�?h:7 稜[뭼A��F��1 � %<웢�z~ � Ft )뱋cWM녊s못뚗�T컄��컋=DX�%�: 劫� RMds*�$V��H甕^�X$ I��7� 떸翫 �7� 쥡�  �7� 쮜�  �7� 펨�  �7w 험�  �7j 뚍�� " �]���,y�M잭s 1y @톰f$X� 둧x= bc"1dsi �SSPD(z EB�PV쒧� 澎宅�씺!@UR딽�Z] 壬T ,幀<��PQR듢m� 둷�$�낹Pb< w0�7^ 8ZSQ3핉�B窩�戴��W�Y[S\��s�`꺝鹽�셾-홛*��픑듹딙+�튟����+�I]��U��@렳갫M&쟑QIR嵬$쳖:a4Z3�"�(滿r�4�����,뒒.�@팫J��[患i� uAIw���JP鰲뗥�y洛�톒(�b"��2�$P((쬡�F�+錨[^�쵢(1W6吝�R>7�/*&lOL픂� �貸�@4V凹?DD$%$讖 �~� � 쪸銶硫 푎Qi꿯�0l蓉&쉍옐 � 뿿 눦 L9뾤ug2`3�W�H�w롹/�쎋Qm�淸Ag|Io껡뿸뺲d$�H盂�tN�^�&�z��<U�<(L�3:B�쟪�Sb��\ 橒t�d�/匏d덙�륑�JG�5�꺄�#�("� � 6J�dH�9%L�0藉G�p틄|よL�'�SH�)�6�F�:G�>�T�뇸 u얟� 9��t� �ZB顆^< t< t蝸患 �N �(.�z����꽫�2� 엹寺�떉�>�쌪s�@&缺� �#�?�Fnw鈗m풺Om際^Bp�3�(�P�5N錚u� RP隘$�.H  귚湺o}A��^랥3맞���r-}�쭀0L,둕둜둵 1 �)�.줣Vz� .� �5�|2uf뜲��`]r�륆V핪D%N�{F�}뛆� (�+tF괓|�rp�EET;-f-群�3∪3앥쥨R]�뙍0J*� �4�?;Q膏F�4�5��g쒃�F`�휿�"�;Vr� ] r�BHDS눕x 갞t〓.�욷R(d�;�u�淄允-둲`��`r�`g픧C쓴zz[:U{�툹댘X�5 �&∪:v�)\B s캭Ng`퍗~풔3윌놼Jd��DD４lS�t쳓�5@t7ブx"x�]( =壁X픁+I�Pt� r�+VSO�廊R�A�\�A�f휔B�v � 콞NG�(�툩G嶠H�r�B^)'돷;<좬5 냐껂�-�$쀘쏻sW�+WwW숇��是� �*ld뛷 �. 끕Y �5##A5U#6#쉐#A#┴##D쬛�#�븯#酪{M%L�%]s�%#ahSlj�#�#쉐!H�!뇭�!�Rk�ti1딦E핆%�P H됢% %%邏P�%��'�H濯Pㅹ�먗��?'�$'嗜-4�^�z (<o�/��1s�u� 빈S�W� �x@殘쪣뛈都���莞E憺뿼�&�&�f^Wbv���v�F�V沈u-Oㅢ&缶N윫읎렄떈 R]쀽쎝�*� e\�DD3�@뭌�&둋 �j틁nG��ㅬ |�*�쓫�JN횶e��;�퇡原맘轎{�=� 3U=쟌��S��� 횿꽏빤��F%?녀I댳$宬띾㏃9S�烏�(+�(�(� 싆:X믵Rрb�/iS延��X�겫+F�V致I*l �4;�O�$��$��죱鰥�낛t]뗟�3�u#믌�쑣潗@�;�}.屋��7끄ㅹ(J剃8�w茁떿G묰�|뷙�휉<モU뻶�쥕蔥]皺쁞ぇ�!p9쁿���2빈�?!떈�S����8뜓�혍#�0�,꺘R삚�}�e�,K�]�큳c/蛭 ㅦu庸푎앍쌭`=u�l��� 絿�t*^$)꼂疾s�u*텷�� .x＄�놑0Ol`遇.뱐.H��H V甕�3DDK�`PT 돃刑뎳飄+�떰?W脘M�-?#?�볗?�C梟;Y|;M3����o�2bR놎�:v �l�5푋u3�$9)�┼<G �WG>[�@-w퐧楮�A �h��*��샤領�윺��� _m� ��.뚐렻�^��>괯^��(|�ㅺ겪n堧�:옿�"POD�^<만{={., <蕭��V�TV�P �|BXv 둊喊딂�뺆q��0���I��d0�[���'P�~�t0링i0�]=⒱�[�땲<�G�돱uGJR�쌯材�듈�F;闖i|��PT&�SQQ⒧e0[�7)�PG�"뗗XS O[_I ) wI~  ?펪�[� 썞[떸.] D@틊>蓉<:쏼Y�%%� 쮎뷯[蘊쨠uR��H2+t�= at =w픐�2��0 �+"�b�=r#�毋# #�#蔚땕Ζ^=�� 듅茶�� �I���^�+*쐝쳩I㈈졜�.쀱�몁)S7uKaR[�5P���3Z0H�: 멻F螺iDw�P�죮눑슈 D� ?'�@�獵3R; +6O@� 쉇麻x�$8V醯�(J껥�t#xポ�S�x%r�u u熱�퀾-�_>� 웯 � 誦言�꾦��@;�@=v���{網�.�쬱]�]厠� �>�  �t[�[3�1�덉=봳ON�귷�칆瑯�륛J�\Y�DDm$��<'�}*e%\FO S �J "���'�滅� � '쪰=�힓�D_���J���0/첤�z��_ ~�n�갥��~몸{ �p��&U5$ *{�뮒靖�= �S볳u\$�W�)���|�|힀D@� PW窪낳㎸꺵k툋稜깈�*쾯�;曜�엤��깙 讚�]��1돽퀬덪44A�킕륥뷦EO'q먤&蕪 V 0Q�튟瀆R�+�,?m輛x푢&F� <┯ �YT�"딳벜^E:�<玩��깱"�궊�|g큨팿u�벘衙좏봂'tX�Yt�%t:��A�u], @�,瓣a�C� N 6g� 뙆픐�SY#7�]5��d릖*0랲�H�P똶I$@r瀅�)端僚"7玉 I�( P/잰�J_- �-뷲b#U� 쿪K� -T�D�- ]-E�-T (�-@�(�-8 R(-/ -&* -h�-{SS,��)Y�V��쁀돒淆��S !F쎇"�|"P�n뗱Y e=Z��MT뭼쌘�郵��?%tm3B�^H$G�B= P�*��싢2넩T���*�L�뒉� �X+�( � = C=#`�끲�-p=0�@脛s먮v맻�K켶w� Na풏�Tt_@P9G{�b�J똎j"pt=w�"沁"(웺"똳�R"�"q��"��馝�$�6Q(冠츆慄?��푷�p�<$)e륭寧DD�+0�I�;幅N�)G�)u瓔U"�I� .2qu:�@앬학@_H녭�뷫C{C?鉥U�+憑�t�=X���e=d;=i�뗩X-p=A(팋팒eKg봧U#뭜oe 펒�@\%�6�꺘huu펲ltr���3����긃 R訥u撻�!龕쬲O�4� Vt9�B+| s퉥"z-zN�5"�"p₄腿堆�"=�� �Itz릫�鈺;�7 �5�]�!껴h,���,�2탐쾭R,�y'$ �tAj8�뙀�%i驃�i�� � �훦�  덐0t� .��1.腫�뙙 �� 맶:� �'T����"뀘+翕J稍!'엏'#U끁�;�~f렠�+�G�~�� �{껥|Q큃_좫/�_;脆쫉q빟~�� �[潑~�:껓��㎌QP듦Q쩛D돾Q庸5듓#E]窯�E >�G�k> �f�o� �r몢TFu&u�j�U떸 SuP풔dD�D�뎳渚S�A춑 &�>�7� ￡( �\뚕떀�2돃\��*���I�8�;���=즬�t1Z�+z찎�뵈+�셊P��);했�Q午Y뾹s솁�� � 衛뫦0�>�^x��B�댄伊ュApY퓀([v삛#뛴�,D 볡�푣5�‰�말�원뽍�:i �딆 被뗊2옴�b 罹ГK^S��0홇���^�/ /% �@럵�[젍�#h�v J콛�|?Gw쩗a�섩�{S쓽J�:RM抗NL� 락L鉉� <쐐3핉�#<껦둕`꽣��|�릖褘��7쵁�>�凡I�F���C�0�=� �K�/�度���~.hr$늛ow5삉2뜞�DD8獄뙒R!;J��(&�t�^�뒊R��&�y2챭窩疎V�p���t 뎩� 嶺胄Zz/�^#ME4# } (��f�G^�몫=�*+햡�먨~� �X1쀫I�틧���犁_Kx쉓)<�4� 픲�곾[�=* �= 썗�� G~G亮듣u �>�q�$v�즯嵩=~jl쒙륊�뢻�(�'^D犀f�l��(�DQ7$�2 �*hh '� �\녞���V料�2�G�2� u�1治1� �&:O!�P�큈a���R !-!뱏P듒��X��9�透��%�&�S��y���%�꺝T�QS*兼� 맨�6u�#�'삭弦뾲�$券V,�0뎵y!�#�$�G��"�[VW3�播뫼[�W� |�+뷯�_^�|�z�+;�uwML�嘔�4쪱�_둓�j@6',귝;Vu[�6u � ㅒ^~K털W�!쯺`�노�퉟쨿��.틁f�v!G\4뎧�� H�� V�O�) =�X;��3R�힔G갩��1쎳�)�#XZo疋_�_���Mz3.wB�_�꾆#�T冠h4T54�1*��1�v0U 0-�I-"恤/�XfR�&#겭h�d뵽앙�)�H퇨�頃z�@"m響�9��f� �fG�꼎곸(I扁v!癩�.3�죬pE琉Q��Iq별�쓚B�故퍕��p몚 /��1Р�.�돯믵�/.떉] .탒쑴�u乙T�눏 ┏an����2G� �j�n項꼗,�d똄I�뎿t�옐���m.�q `�/g락I��좄묬�0돽� 鷺+ 추�.u�ef��<�<� 4펔°( "�뚏�;�%);밪/u#���흟+툌촞"�/禹�Q~��(_� -U+�,!-,辱?@i�잾Xt;�>~喩$��草PG)M짧!닽r�t1�K쒦�F u�� W�%I뷭�v,� 븄웧�m=�눛 쌠걦� FPz�5��0� �|����E�K�%h▼%RAZ돆�� F� �a⑷盈읩若バ�\� 졮 �OA�?�뼖MtΞ뺙 屢昞쀼��"��6@?m�&쬎D{5�듎�2b�헢�{l2 ��e4꼱뽴�z�,섾16��^�=��$�휒崧�)�g�t☞딦 酪⒪湛퍧.뚗뙖떸뭅쉣"M2뙿�t�!@"L�쀫�e1튡(겵걻���꺬��0叢村 꽚（�!1n�|껒@�졶t��#ㅦ�[�듉 �[늾� �#錄�堂tD �풊n�J뫰�u|tM�`s�떿^뻎�e�|n滅 �u漏��={�t^�)枕7�G�R館Z��� |됵긼9o3G� �% 겎�< �邏 �육 ��t�-?-� �놵��,��u,Ub��U#^U#균S#�#r쏠'�e�r,�롂*� -챁킨�!'G챴,�M?₁姪C�=Rlg��� �겂륊쩉驀벧쟏S� ��.噴�<��冕iz$+뾄/춴BM��dB�춙�m�2쑼멘c뭬M^esv겺W=짮춲a됮l8셡힔 ��S쉾h 띘2�y\� �(뒉�#E�邏0갾棉& G$竟T�Z�쇶�V�V}쯛�%T*[Tb긶肌6�:�/"�.O�a勺:D숄M땱��#t안� S+휖81��`崧�꺽 튖k�g쒫[�_/4�i所n�"�Q�퓚Lg�*�{�몥�.��7쌝筬Ｆ(hQ+=z^� �Vha핒�~��끜t@颱㈌ �4�%�.믘t"�_C p%e]콴O쬃 켗dJ�B�a�{꺯�.쳕$�=]F"W�i삷 l�XL|��~\>TL|�Wtx�� 쇴X�^�뚇k�L鉀$�鮎 �|%X콴B�巴Z7) � �6뉔�R�� a+'K벱� V ,� �^�*'ŧN�'A#嵋0켔Egu-O ㅼQ$��`$�)� Nk�'qdH���"&"!d@" "繇�#���芭쮬�5�_%�렌 �CAlV�덯苞nF芹uP"� 뙾�v�鋪]y0�Y��$x)g�EqF�F�= F�@ 햲G闡藍R�&��#왰"얖J�7a�,Pv��\#궪�!�{&恣�專�쳖益X�瑋첬�vX��k뉏꿏�/v�2퐈�$�tXBd뛃Z%����)��w�셭�q6꺜� /Ч쬩쑘i�<術<云wM'분�벆^ 奬�0Z�F+F�Dw연 爛닻곭HB��%饒2�d��둒]置0�%��+�寤�!�I!�o�� � *o  ¾���랐V嵬�LDDh軒h��0�0�KV �0끎0�뮜hO W烏B뼒_�TqWr1P=r,�썄꼖  껥s/)=}`닛}퇖 FE��7� 냫5�溫A잭?�3�팶딸w�0`坍G콡;V r�F�;yr�hP�W��\� 땫%�갞~�둴6�� ┗�췪zu �E휛� ;�%u*;�$�N∫(3�m튣풦 �Q쉚탂븀�=꺫쵧�eps粒뷼�퍩Kx Q/k췄� �NG>V��+'?��굫=�zF� ���"F V 多�6曾z 엢/(u };춓E\쥄;v=u[22W�,+C�K덬�3�u �3�떷�M}��}�TT� 잖��'G혚0퓌.��+�^�2��B�"~QE�FvE횏 佚트�^�邀�x�+��� Z O�'V梡�숡�誅D `_q�|o�q�)V�mj�{眸Q��[헁V�6超 9�a [Y+�姦u�_j�_ 폁떷� /嵐V쭴� �?"1껤뉴늞�냁큁詞�Xb�CX]�e횺�덊n뷚� &�3��~�슧�$렺N鋸�G��%6뇘V.抄�쀏B쀈��Wt]tu�薯n웵퓓P2�完쒑k奭뜍�9돽y@v � W�봆곑썂-�*��뎅筽�@숶G;>�%r�픑t툸홓�B PV癰1K鄧議�廐∈��P畦*R됍4j�.~:T��_无#��쑮먞 ��R뤁J=튷�Ｑf4B�됮1k믚�빣j�#��곅�봺c歆DEc�)筽V窈롙뫣�y콸�aVtN T똶�v�>5Nvk�N�v��]}�삢臭0`��P�2^�X&뉷챙�3b2훼a녋�M>fK~of졣�R6sF>�$Q�k壺!悴껺'��*� F�t겖怠겍禹�r;�|TE�~窈긷鬼�友t49� m혒o� !#WYbZP�$�牢_�� ��9 UJ�2뭋$k췭�1坂�5;�t틡�頻�(�(볰�uE?et];�탗'r계Z� sM0��:�:됞U &쀖:퍐q��깂�(>씃A봊�<�먘8뮖q*�0!�꼗푪쥷依6�$�0 몁 �#lA �%.섽죞t^C!� AyE SF숱!�.A곸J�fg꿅�쨡;픱 ]=X�/T�翹0}~!빿s뿋�1eR�띙-ΟIc�r�?J皎,�E켩�1껷갿&�} �� ��w ◈D)FP�놕�R�ンp듌 �u`�u[G2�$��쉇s@�;�퓎;�w퉥�#k#IS0ZQ�괳;"�<�t 0 z�[m용Hld김麵VY럗A�섎#群%B�k%羲%\A�,2Xu,맥�m��|��몔-�|Q#�x햇 芋퐊g홅�$��벥����n��쀭��꼌��츮�訛劉n�뇮н�톥;�u�뛈��� S�E U5���롨쥏D대�#칳]Z칣�y/�"yH�%�8y��.<�+��+& ▦5X붛S+|件\玘7�訂:괓}�UMC"!卓�7�3��W�5�s뛢:밅R"폼�.@겱�1�9ゆ諱w�r%-�z 뀡� 딽�$�곸�U9켿ß~0(N�?�Y5S� 2쐵�a�<�)玉h &턵쀋 J썘N�q�]=��& '뙘J�l8l綽+l#l9 f㎧W�fB횞��PPT峠킠儁�=e�훌cm+�S퍃"쪻S"]8 ^��놳'X~ �瓊�7�� / 庫頓h� 끌�$�FU�DVWTi�풃沇''逗꿝맥⑮� 굟 w힎� � � |唇F�.�=����F��普��꺬*F�"-旼갽�6Z+F�k�'였l%�tM%F�$ekE聊W���R��b�뼪kq$Le�"名� F暮鴛苔湯v퀀�}*穉托ł穉哺o評藏評覇렼蝦霞F8㏓���^퍭��뛈��抹� |���"�~�|�2:K@K��굦걚1X=uSG쀚쓴됭덯�뙝*혁Wｒ �C�JL@LQ� LL�3�滯�L�댚댚CZ갟m>�V油+�^톪+v�-졮N꾺ⅷ��6y쾅풫��R㎐夾�RN82t%.괄t訟GI�t�'�L�#�I�亨찑^� �`쾜b�VW�件哺T륫��긦똅�b�^�:�W!�멸 �r�z^沙4욋맃볨�.u3� 5�5�넷� �}QxDDl뛗�Dr��.u�3這�3�.�3�+걙蟠ル6╆?rt侄��Xq� �H � ?� 老p+ �瑀�~Q8%쒯 G� 황꽳/�(���uM^�쇁p��듈꿕딽/D�x@Ο?�隻E솆E�/�늀� P幽"t] 뀄 z�J3X�>K3#Z��떿堆p쀀@�^� �q~藺帶험5�~�읾3픛H蓉됳V1�.v�y\kG㉭킣(C벬�읺�쮑융�X�겒� v짓0븵q헪料낍^��뱜 V픭�뉶�< t 둷@�G|���"@��.G�m�, ,"롞}엤�숢F獪[H=v�v릩網�.�㎣쎉쎞쎲쏇����6�%�%�P뙡?�7�N05�:쉔Ev&�EVbM�iN8걡�h�� v � � �|� 飭 붘��썑��p脆yTV���귣��둶4U� Wa 뫄E록DD�U�R챳� G�� |�뽢�.�]o^C�칄W 뭘� �+뒷��@쫲^�邦\� < 壟�0텅�:D|��~u≠(�^�w呻�!)둀�뛃A粘��6u"㎕Zr�4疏t/C8dO�_F1㏓倉T4T�'e'9왘�JO�j1쪃d0���*7'�*?謳R훧1턹享稶뼑��9N"�翌UI�Wx膿곕�뻕=숲a� � E顫tF'�tM�簾;�w&x�%s!OTL!喪!,%'!�(!�(z !R!씹z�zX � � ��U�!^씫x!b � A댏용a�끴 #f#m# �@W���(�겞�滑�&낪D0k0=�`=��闊\|9b0s �옡�-�끞�z`씜�邏@@ �O�]�Q�9뗞틥洛�L-퐡8둋1D?=n�=y栒�u{0 �F;v~�6��6쒤쑁징他�; a�챬븓�!��긍y푏�Fぢ�*솁#F�뚩먍D픍�}릡�Otw�뀑/�넇��������뎧��~��v�~穉쿜炭O\�S �O`艅��`�蛔f�퍀�mg]|�u�~덟�_r釪z��롃흯=틸낖?腰I �C俓 tR�A놛�'�뾸 ���)0쀁0@PVa떾F컌:��*ⓠ룀O�2&q&0o땱 �u�^햚촹 �,� �.7�^W �낲븢& Gu�^8.�<�^�뻹�S헚째믆�?:t h ��社�)#&p)u�6�6StQ툍P1�曰eA�@足d�C쌋숶BN&.搢p�Nh춳��." 둤P'�Kq5�)敢f8i.�rfA>6Ð  Chx�렜B�~q�xu瀚t�S[@1픨괪2��}즭J|뢲�윶^Z� w혍낊꺠풶,� 췖쮰-涌^&羚>괝��츗�+E��"�7b�'u蓮갃쏝㎥CB�1&�퇅'쳖 � x��'��랂퓰�팒SQRVWU싼 롙쾅�T퀹쏷珏� /]10 0�|� 璉1 3t��! (�<�{7�0햝�!%�� uEB�F쯔믁�%�덅 t  (덃F.O| +�遐 뚗� 5칹쀭%G�돰�E�>0O(~u5븵�퉦H�T\$T Q}뿋N�t2�K��*� u*�# /�|�냹ih溜첆눰2곶�� �H�Y걇 �t릋%M�n爺t\�U��E魔��4�.`� �Z�/i�\4uEj!arX@쁌�/�$� B酌�: t 寥zK/�/�)ct�� p�p*�;�=ι�켝�\4S쳒�R s;t�v욇�彙�%&�c탵�[.�m p.L �LU���i梧DD�믾-�U-�-T�h^ラu����R휸퐫T!秩g0�싮FZ��/v2/c}熬�9�((쯹(N(줤0�(�n춟(&뾸(�(�(��(�l*4(똩옦腰(%(碌�(�^�(~( P�x(�[�a�� 묖ZP築D郞tS'k�W퍝├��i�((/;�(f�(�kU(!(뉂m}鹹�&J��kZiJ*�k�Z4�4.量�剖�i뎁3솠�L9�|#拖캊/=_k^됎�^バ(C(7:쁄;�隅�JV�K폜 E�(RV�(�j�ZEa築�V���jE搖壅E}(YR�(춋=\V�뻂�?v?>?bV%(n( �8먁ｔ뚵4w#濫#K#�#��#票3�놟B휓�$�(6최�뤘`�D #쀲欲�F酉� h� 쿴��渦巴묢� �]尸즸埰둵�쟯_^ZY[X�x�@[v 肌p�G� 냱i��鼎3�뾵漏�덲뭼b�릮�G R� ^U �* �^r\)�`W征(d&튀��4~꾊v�u )똂*�蚩:�( . Y�b헌 ^6냗�23%툁QF7 73Zx煖(�岱 ��(\\ �s�)ㅸe_^쵶v�� K 迂6�s퀾�(W瀟�-d巴볙@솇oN� �띰Np[^�덻��^�QS찣헶H���^�M;~K陂\j(l遞)イV��i��E�*잱％Ft i꺝���꺫�;�s캷�u;춰� N�^Q�@�c0-E��(�Lp껅��빫F�;m��F��~�0r룮9w \깴足뿪AF듮��\뤿 �뵶쳵gLs��n죊딽�혩t�:띕쫗蝗�4}푡ⅹ}}�H}�,2�#＊�F�zv㉹�뎽삥p菜�+uv�暴-uC푃솈�8!H堆�9洶��}�|c��@|� � T�燭v��オzczZv쯼�z�]�|�O���br,.�3�퍎a냦L�,�걨�d푗퇈 "~,Ł5�[�f^� �}%�E u�꺿-w몸�� 쭐a　��껹 =t@=�켬=�꼕= M꼩�W栯 � <0$�꽋�U諾�]|釪B*�춽殆뮗�곡�뗋�:� 86|駱 6�곥薺 宅듩룈�$ㅠ^|笙涯]r�0u�h�h�wOhh�'6�o�B'����e�~ JJ� 靑$}뎧�7��! F"�f�k!;|�o,宰4k �q�t o�^�*勘F5柩s�|�}뗈�� ��"�~욋6@컘~9|1s1�5 u,븕 ��2�}<뭻:�솶� �s���R�G����痛��X�뀰!둉i�큮=Xj��� � �|槃�M쵅���%�9#&�홣뒷�O�i쐊Kk��2럌Y�墉�W�7v9"�곣3쉄� ↖]kM셗슌|쾡w�!�G����]�;=� �씲>Y틽���럶�!L￡h[^�s uBuw�4�뎧快�8F9딳��^꿅�o7辰;'|繹Q뺘V톅]캬穎펤갮�뛈(긜챮麟�` �YuP쌸썂um쌸PBp ;;�%Y�_m쌸�A썂�V3�� ��궧^�U#.㏃뗺�v*'�� �u�ti �즨e颱-uy 0�f꺩 � 鵡�꺳�{埇�@ W3���娜懦;�r w;�r+����@洵[胎�e섆뗖卵 )� N�=-�罷g! 떷3陋�V뼊끐 鬪 �闖�� �뮻^���@闊~ 滉稶��懲C��s뗗岱待浸��宅 沓���&3��朴腕9縷� ��r�[+�@^롖뗱뙿�~뚍렳WdeRS鉅6+�提�죭쫨鷺Y��췒�7겿D0演�쇆���d茁-�� c��쫉3邰�t � �Q��`�G둋��뉿�N뒆R�� ��{쁇 p�~T胎�?uGBl�^둟�헓,�>�[�d'�PW퉮�N���삠{��\b*솭룡봮9�3�2"<l�_.톎떸�[Y`d��^*N�됄대q볼��{�Q��$)FV힒k�恬V혖�^t�뉳엀W喜i�Izj+-�$*��喜�(�U젆"1c|�>P"v�5걆껆�i�18"1劍W�짐D^b<+z뱽�P���|y�py�=�AO*g�뉳�묳n3�긖�.��갶h堡^렺뱼`S �} 討慟 "꺫%B��sy�듻�壘2��딅宅n�듓%[&�ㅋ��B V줒�+A鬱~A+쫮Ax�6꺝hJ6-x홾飽7��딂貸|�5- ��-�+홤��},�2�+�.�&뗊r黛 kg>&뇎뇎룺f勸/�쪑쫠�1�1섡k�뗌RM-]�4l�c�l *m�us쵣���孜풋�0J2_b홬:j�1촢 �iH�I@究ITI$_m�� 갢PJiJ1� zJ �쇐{쥺� V�`MX|�|둩똼I�딻츒y�*m�8�JcQL -;0��쬖lO,즂�虔얨/ 8Q綢�P<�4Oo�3�d1�@티 0[쓌� g1�l8� �<�0� U�1�Y껲臼g>�n偸���{����쿙SiF�@| Dev HsG� Trk/cyl 띺�on!-!%1�� floppy driv위B%3�3$(� "2X)%c:�-J126~쐟 O훷몔��룓삇땮쐮솂뎷썒깒뼏뜜十�㏂젽殲�イ蚓蓼ø�誓，鉛��boot: 웬Ken� Z긫r0칁^f�ht_Link졣7 �P뱄"�|�App�\ 8devicbSountMB �i (DOS析%+�&Y only�1/wriFy(r/on� !UMQ S3o -emD픲la�(f.e. W0,)dow�95)Smo� f(disk줭chUee i량�� ]p ;饉`?찇.:B-�9+u)u몎es뛂!8s d�"n'>=tLC"M?Top+$n�f� �-I� m�jold��쉜upatab6찱�()i5� �>4argv�ma轢.P�?ATH=:/b�[ �21h+g쬭쌄t_0ts@MBRA�@�8Qlo_f� #Can'EoR `%Fs'%c�8u-Fpi= l# PIAD�tus%b�0qc�E ipd �eaxsE sflag(m[d4�8s'��=<�s1 �f INTERRUPTS>� UnCont&l A챔ldDel> I�_1놲rAZaQ�2�n-ps �k1 (NMI)�^$4$O쥹 `apク6(굀opco5(186,23翡K7-�Κ�b쨃aPS50+�A@A� 갏MHO,�v�`id�z~o&�ne�| �RXENIX /u>6�E^DLARGE0HPF이S/NTOS5A*'h'%�h832�XLBV 봿AHL(PUS�0/2"7{aq旋inSwapPhott뤾h칗95�l}0癰vH粟ECpTheod픒0QMagicR햔� 쯰?uxR�hn�k8ODB"LpP/�,|륽8� G땓BKxiam픭SpeedStysV�묃e咽�D헔�(C/�쓍QN�M�뎿pEx�N쏛moebaq� �_"�~LBSD픛/ IT ODR �GNx뎝x�#�-�rvv/o깚얡�륬+0�p�0�unknCS맗:IP =:L� FL=S DS S&S)P :abs녱: l�(\ >=캳s�.�z)lu�乭 8hg�%}1鮟엻 �eIgn羨9 (i),pt9괾(r)lc�:i(a� ?'�! � has'돆�꿶�|!껰|L/㎡ !개��밆a켽Ja8채�99:�;樂%�V<G_p�����.KTjO헴뀞B客�c즠휖:� �z케rk壑適F��� \@hb�7f�D%<Rt{MV갵)DMA(aulbRD 굢j�(p� 64K;�D:i e. 놞2t'O줈CCRC�(.EC�! ix윮X!t��{k@칎k\�),P!��Timeri9팙>h텵ned��<+蔗eIZgal�_p뜠%2xx:?=튑Q퉙o찔Us嗇E4[-l]LQUHFE�TM] Swit뗛�0 罐.)lo늰�뿮L�(y떥U#ist$8�urd!퉕꼊j~sH澔K싟��╂�읬 c)|�'F쓱sp룎요�l�� M �+쑧2i봆�픟*i- Q㉢Namet� Attr )hA�k@s�1 DaW��Le扉nd7� V�s 톃 - g=젉ov뒏vr� u.N.f]$�>MAX_LEN쁲_STRp솹tfv*#'%c' i�� z�& w :( �~-+N00I'즓+F쮦NhlL+Modif�z�_Q7��쟯uxXfeEgGcspn%^�3,%�ty�7(뚭�)�!걌u�!ppo�8�thc믲뱒ai"xH �. P뺼SI폚g뫤Ct,!k'nyke�./{쮩�er$t|F�y�Bux됑7J�픬n끠�< L쇣뛅�Fj)樟�(/ぃ�/�.T�8"ar<�횛당�"椧��B@�c�wd:EINVAL �RANGE�" �� �Ix<툮렟�쌵lszW�뺩�wU :� � URu羌�뻍o�`x�x(90'Geb뇋 barcC �R�f`넫�? �L4��맲 셗 Beg�Pl�8#'뺸x�Cl RASc낋o��1x2H쇋n153�r6li� �4�\�6i5륧�p2[mak섧PHOMEch雋븮 4y]|n C]�Lqzon|�00;尤N羞� 툙� 뽹=�뭈�/Ic%:텘�7Sh�( Bn즠6! Q톗?쬼챌 �;; �- �@��'s68in� �sh� A=T` pi,'� �>s쀏��/�\W�"�!q흺z浙x�1W^}->w$� ny 돯ID\s.伎D뀾cg�혹=f[t�� s�t島 눵쾣rnVU連o됆 'B즹쓑 ^5�hh X�Y(gh[E벦<��mso4\�r꼝셺nc塋l�mv<�gd2펓�#럑cb�t磅/g9�K n(d*Xo�b꺽uf|쁞k$b`Ypwdc^�mk�h�� #2FXh��������'7��EVhz ���ベ�$9㎖((n*쉥�fI域cs팃:suYs뭑� +rb삧yP�h�\�C�뮯}#A퍪missO�ili�(iqK)�_M d澤s츀%sYy(A힟]ugTcc>�^웟0MjAB紇땓J`�zs4�/maI�ac*짽U�푔U�힔~z��.-k�x�[�q(@x CurDi<�(jX냊)4���ubtV&KIo)쐁E뵦捌{CM��-!^艾w�~i_ D�% aB��FOhhyd_z0123456789ABCDEFGHIJKLMNOPQRSTUVWXY퇪&�@�'��n��; 嗽�뼐@B젂n "뛢6/�렪�R끋TV�kY�;! ;�@�K㈍�R }�t� g嶺 ;Zx����0Nm�2�2 PFATES#훂DT겄俱��X9����+*q���# I � � � 0 U � � i G\������� F �#,#�(�(@(�&N&�*�*�*�- 0�2�4�6B6]6�8�:�:�:�:m:J:'::�9;똁�A�A.C�C�CjEVE�U�\�`E` `�_�bu�t`끀�깗댻놙끢뒂�%�륔�� ���n첧マ춶�勳풍コv쿥퀢�쾙콽�꾹굳콅켦�,�글갸�1��듣눙큨큋��src/kernel/proolix.doc0100664000076500007650000001061006312103204014526 0ustar prool2prool2 렞��졿Ŧ�췅� 歲飡�쵟 Proolix - 꽡ゃД��졿⑨ 1. 댾獸黍� 뤲乘Ø�� 럱 뤲乘Ø� 췅葉췅쳽刷 첓� �黍ぎ� � 璵レ� �黍ぎギ筍 닧�涉 쀣�ⓨÞ� (igor@ktts.kharkov.ua). 뇿收� � Д�� ¡㎛Ø쳽 ĦŦ恂첓� щ笹�, � �� 췅�ⓤ졻� エ 쭬 캙說 Д碎璵� 췅飡�玎莘 �ⅰ�レ嵬� UNIX-��ㄾ∼莘 ����졿Ŧ��莘 歲飡�с? 뮔え� �□젳��, �� ºο ��淫� � 췅�ⓤ젺Ŀ 럱, � 誓鼇� ˇ汀藺� 쭬 쓵�. H젽ⓤ젷� ┘ T&K ��舒硫 UNIX 쭬 �αぎレぎ Д碎璵�! 룼飡������, �� Д誓 췅�ⓤ젺⑨, ��誓ㄾ Л�� ㏇�젪젷� ㏇� ���瑜 � ���瑜 循蝨��飡�, � � ���纏, 譽� 將� �젩��� 췅 ．ㅻ (收� ‘ゥ�, 譽� � 쭬�º젷碎 �說エめ�� � 聲�‘ㄽ�� №�э � �曄�� ��誓ｃワ惜�), �� 쭬쩆�� Д�� 瑟ゥか� � � □��졻� 將� �� 貰〃�좐刷. 2. 닩��ギ（� 뤲乘Ø�� � 瑟Ħ�� ⓤ若ㄽØ� 甸�� 뤲乘Ø�� � 豫筍 �� ∥ⅱ젺乘. 뤲Ŋⓤ猶젰恂� �.꽖Д�麟Þ� 룯誓� 췅�ⓤ젺��� 뤲乘Ø�� � �黍�纏 涉� 飡�졻ⅲ①αえ� Ħ��ギ（曄稅ⓨ �鼇‘�... 獸 α筍 誓蜈�Ł. 렚� 쭬か蹟좐恂� � 笹ⅳ莘耀�: POSIX. 룼 ¡㎚�┃�飡� 뤲乘Ø� ▲ㄵ� POSIX-貰¸α殊щ�. � 첓曄飡´ ��ⓤ젺⑨ 飡젺쩆設� POSIX � ⓤ��レ㎜쥯� ヮ‥㎛� ��쩆誓��莘 Л� �.겗�졷��臾 きª� 겈ワぎ� �.�., 맆‘´� �.�., 붲Ħ쵟� �.�. 뙫〃レ췅� ����졿Ŧ�췅� 歲飡�쵟: 뫍�젪�嶺Ø - �.: 맆ㄸ� � 聲筌�, 19916 208 �. (� 쩆レ�ⅸ蜈� 췅 將� きª� � 遜維좐刷 ¡� �젶 - [뙉�]) 뙫〃レ��飡�. 뤲� 췅�ⓤ젺Ŀ 뤲乘Ø�� � 飡졷좐刷 �� ⓤ��レ㎜쥯筍 쵟鼇���-쭬˘歲щ� ぎ�飡說ゆŁ � ��Д�麟� �ⓤ졻� 췅 졹醒Аゥ誓 (獸レぎ �젹, ＄� ‥� 將�． �� �‘⒱ⓤ�). � ▲ㅳ耀�, ¡㎚�┃�, � ��誓�α� 뤲乘Ø� 췅 첓ゃ� �Æ蝨� ㅰ膝莘 쵟鼇�� �� ㄾ飡承�音 Л� (췅�黍Д�, 췅 ㄾ쵟鈺傳 걡 Œ� 뫍ⅹ循僧). 몾筌젺� 將� � 收�, 譽�〓 誠�쳽筍 醒‥ ´ℓ� �ㄸ췅ぎ㏂� 蓀ⅳ� ㄻ� �昔｀젹Ж昔쥯�⑨ � �젩�瞬 - ▲ㅳ エ � 췅 �젩�收 歲ㄵ筍 쭬 ぎ�貰レ� 486 Œ� 쭬 IP-收席Þ젷��, ▲ㅳ エ ㄾ쵟 쭬 걡, 뫍ⅹ循僧��, 룼ⓤぎ� Œ� AT. 룼將�с Л�．쭬쩆嶺瑜 ¡㎚�┃�飡� 386 �昔璵遜��� � �� ⓤ��レ㎯� (쩆 � �� ㎛좐 ⓨ ;) � 뤲乘Ø� ▲ㄵ� ºβ� 獸レぎ �昔｀젹Л莘 誓젷�쭬與� Л�．쭬쩆嶺�飡�, ˘設�젷彛�� 캙э殊 � 쭬蟯瞬 (㏇ゥㅱ手�� ▲ㄵ� ゥ＊� ギ쵟筍碎 췅 侁�˛� ぎ쵟�� 졹醒Аゥ��) Turbo C 2.0. � 첓曄飡´ Þ飡說Д��젷彛�� �쳽楯�席� (� 召�젪�嶺�． 蓀ⅳ飡쥯 �� 筌紐� � ;) � ⓤ��レ㎯� TC 2.0. � 쩆˛� 췅 ��� �젩��좐 � 拾� �黍�紐 � ��с, 췅 Borland C++ ��誓晨Ð졻藺� ���若��, 收� ‘ゥ�, 譽� � �� ㎛좐 �≪ⅹ狩� �黍��殊昔쥯���． �昔｀젹Ж昔쥯�⑨. � ���音 ´褻⑨� ‘奭젺ㄾ㏇え� �昔ㅳも�� Л�． 줎．� � ＋渽��, � �昔 뮂 ㏇� ．¡涉�, 譽� �젹 Д�ⅴ ㏇ⅲ� �鼇‘� � �� �젹硫 UNIX- � ANSI-貰¸α殊щ� 蓀ⅳ� ㏇ε. � ⓤ��レ㎜쥯筍 譽�- �Æ蝨� む呻�� (Watcom 췅�黍Д�), 說え �� ㄾ若ㅿ�. 곷쳽, �舒쩆, щ笹� む�遜- ぎНŒ汀� ��� UNIX�� 췅 gcc Œ� ˇ汀� gcc for DOS... 곷쳽 ι� щ笹� �㎯�졻� �++ � 췅�졻� �ⓤ졻� �≪ⅹ狩�-�黍��殊昔쥯��莘 럱... 듺�遜-ぎНŒ湞⑨. 뫌■手���硫 ぎНŒ汀�� cc Œ� gcc � 뤲乘Ø醒 ▲ㄵ� �曄�� �αぎ昔, ��將�с �昔｀젹щ ㄻ� 뤲乘Ø�� � ▲ㅳ ぎНŒⓣ�쥯筍 ��� MSDOS'�� 췅 뮂 2.0. (� 뤲乘Ø醒 ▲ㄵ� 聲�� 졹醒Аゥ� ��� 췅㎖젺��� pas (Proolix ASsembler)). 뫌¸α殊М飡� � MS DOS. 꽞� �漱젮え 뤲乘Ø�� 貰ℓ젪졻� 貰■手���硫 �젳ㄵ� 췅 ˘�曄飡�誓 imho �ζ�ゥ貰�□젳��, ��將�с ㄻ� 췅�젷� � ▲ㅳ ⓤ��レ㎜쥯筍 �젵ギ㏂� 飡說も侁� MS DOS, ��Л�． �졹鼇黍� ⅴ ���汀��� 聲筌� ln (chkdsk � ndd 췅 ™�贍� 遜維え � �젵쳽� ▲ㅳ� 說짛筍碎, �� αエ �젵ル � �αぎレえЖ 聲筌詮� ��� MSDOS'�� 獸レぎ 葉�졻�, � 貰ℓ젪졻� � 蝨젷汀� ��� 뤲乘Ø貰�, 獸 imho ＋渽�� �� ▲ㄵ�, � chkdsk (fchk) � 뤲乘Ø醒 � 췅�②� 聲��) � ⓤ��レ㎯� �ⅷ召�レ㎯�щ� ��ワ 쭬�ⓤ� � 첓�젷�％ ㄻ� 魚젺��⑨ UNIX��音 캙�젹β昔� �젵쳽 (ぎ� ˙젮�レ��, ��젪� ㄾ飡承�, �昔ㄾウ���� º��� - �黍Д惜� �젶 �젵ギ쥯� 歲飡�쵟 OS/2 �졹鼇涉β �젵ギ㏂� 歲飡�с 뙌 꼶몺). BIOS. 롟�㎛젪좑 循蝨��飡� � ｀�Мℓぎ飡� 쭬쩆葉 췅�ⓤ젺⑨ 럱, � 誓鼇� 쵟めº젷彛� ¡召�レ㎜쥯筍碎 ．獸�臾� �젳�젩�洙젹�. 뮔�, ㅰ젵´贍 信循�⒰手 ⇔�쩆-�猶�쩆 (か젪쯄栒��, ㄸ召ゥ�, 氏��, ˘��) � �� ▲ㅳ �ⓤ졻�, � ▲ㅳ ⓤ��レ㎜쥯筍 �留��� ROM BIOS. 믡� ��琠汀碎 �昔∥�щ � ��誓��收�젩�レ��飡溢 � "�ㄽ�쭬쩆嶺�飡溢" BIOS, �� ⓨ imho М┃� 誓鼇筍, �薯젺�㎜쥯� ぎカⅹ殊˛硫 ㄾ飡承 � �젶�с 誓率褻� 첓� BIOS �젶, 譽�〓 췅�黍Д�, �� 〓ギ �ㄽ�№��Д��� � ㄲ愼 �昔璵遜졾 �洙贍獸． int 13h. src/kernel/loop.asm0100664000076500007650000000027206330460434014034 0ustar prool2prool2_TEXT segment byte public 'CODE' assume cs:_TEXT _loop proc ; hlt ; cli @@l: jmp @@l _loop endp public _loop _TEXT ends end src/kernel/char_out.c0100664000076500007650000000420006664342742014337 0ustar prool2prool2#include #include #include #include "kernel.h" #define NormalColor 14 #define Inverse 0x70 /*==========================================================================*/ /* #define DEBUG */ /*==========================================================================*/ int sema_putch=0; /*==========================================================================*/ #if 1 int mputch(int c) { while (sema_lock(&sema_putch)==1); PutchBIOS(c); sema_unlock(&sema_putch); return c; } #endif /****************************************************************************/ int Puts1 (const char far *str) {int i; char c; while((c=*str++)!=0) if ((i=mputch(c))==EOF) return EOF; return i; } /****************************************************************************/ int putch(int c) { switch (c) { case '\n': mputch('\r'); mputch('\n'); #if 1 if (More) if (++NLine>MAX_LINE) { NLine=1; Puts1("more"); if (More==2) Puts1(". Press ESC for quit, or anykey for continue"); if ((c=getch())==ESC) {errno=EFAULT; return EOF; } else { errno=0; mputch('\r'); mputch('\n'); return '\n'; } } else ; else ; #endif break; case 9: /* TAB */ mputch(' '); break; default: return mputch(c); } return c; } /****************************************************************************/ int putchar (int c) { return putch(c); } /****************************************************************************/ int Puts0 (const char far *str) {int i; char c; while((c=*str++)!=0) if ((i=putch(c))==EOF) return EOF; return i; } /****************************************************************************/ int puts (const char far *str) { if (str==NULL) return puts("(null)"); if(Puts0(str)==EOF)return EOF; return Puts0("\n"); } src/kernel/clrscr.asm0100664000076500007650000000143206125260764014360 0ustar prool2prool2 include macros.asm _TEXT segment byte public 'CODE' assume cs:_TEXT _clrscr proc near push ax push bx push cx push dx push BP ; 뫌魚젺���� BP, ぎ獸贍� Д�畑恂� �ㄽº �� ; �留�¡� int 10h sub bh,bh mov ah,08h int 10h mov bl,bh mov bh,ah sub cx,cx mov dx,184Fh mov ax,0600h int 10h mov bh,bl sub dx,dx mov ah,02h int 10h pop BP pop dx pop cx pop bx pop ax ret _clrscr endp public _clrscr _TEXT ends end src/kernel/stream.c0100664000076500007650000001107306335413206014021 0ustar prool2prool2#include #include #include "kernel.h" /****************************************************************************/ /* #define DEBUG */ /****************************************************************************/ int mflag(const char far *mode) {int flag; if (mode==NULL) return O_RDONLY; if (*(mode+1)!='+') { switch (*mode) { case 'w': flag=O_WRONLY|O_CREAT|O_TRUNC; break; case 'a': flag=O_WRONLY|O_CREAT|O_TRUNC|O_APPEND; break; case 'r': default : flag=O_RDONLY; } } else { switch (*mode) { case 'w': flag=O_RDWR|O_CREAT|O_TRUNC; break; case 'a': flag=O_RDWR|O_CREAT|O_TRUNC|O_APPEND; break; case 'r': flag=O_RDWR; break; default : flag=O_RDONLY; } } return flag; } /****************************************************************************/ FILE far *fopen (const char far *path, const char far *mode) {int h; FILE far *fp; if((h=open(path, mflag(mode)))==-1)return NULL; fp=FCBS; fp+=h; return fp; } /****************************************************************************/ FILE far *freopen (const char far *path, const char far *mode, FILE far *stream) { fclose(stream); if(open2 (fileno(stream), path, mflag(mode))==-1)return NULL; return stream; } /****************************************************************************/ FILE far* fdopen (int h, char far *type) {FILE far *fp; fp=FCBS; fp+=h; FCBS[h].flag=mflag(type); return fp; } /****************************************************************************/ int fileno (const FILE far *stream) {FILE far *fp; fp=FCBS; if (stream==NULL) return -1; return (int)(stream-fp); } /****************************************************************************/ int fgetc (FILE far *stream) {int h; char c; h=fileno(stream); if (h==-1) return EOF; if (read(h,&c,1)==1) return c; return EOF; } /****************************************************************************/ char far *_gets (char far *s) { #include "gets.inc" } /****************************************************************************/ char *fgets (char *s, int n, FILE far *stream) { #include "fgets.inc" } /****************************************************************************/ char far *_fgets (char far *s, int n, FILE far *stream) { #include "fgets.inc" } /****************************************************************************/ int fputc (int c, FILE far *stream) { switch((int)write(fileno(stream),&c,1)) { case 1: return c; case 0: /* eof */ case -1: default: return EOF; } } /****************************************************************************/ int fputs (const char far *s, FILE far *stream) { return (int)fwrite(s,1,strlen(s),stream); } /****************************************************************************/ size_t fread (void far *ptr, size_t size, size_t n, FILE far *stream) { long int i; if ((size==0)||(n==0))return 0; i=read(fileno(stream),ptr,size*n); if (i>=0) return i/size; return -1; } /****************************************************************************/ size_t fwrite (const void far *ptr, size_t size, size_t n, FILE far *stream) { long int i; if ((size==0)||(n==0))return 0; i=write(fileno(stream),ptr,size*n); if (i>=0) return i/size; return -1; } /****************************************************************************/ long ftell (FILE far *stream) { return tell(fileno(stream)); } /****************************************************************************/ int fseek (FILE far *stream, long offset, int wh) { if (lseek(fileno(stream),offset,wh)==-1) return -1; return 0; } /****************************************************************************/ int fsetpos (FILE far *stream, const fpos_t far *pos) { return fseek(stream, *pos, SEEK_SET); } /****************************************************************************/ int fgetpos (FILE far *stream, fpos_t far *pos) { if((*pos=ftell(stream))==-1)return -1; return 0; } /****************************************************************************/ void rewind (FILE far *stream) { (void)fseek(stream,0L,SEEK_SET); } /****************************************************************************/ int fclose (FILE far *stream) { if (close(fileno(stream))==-1) return EOF; else return 0; } /****************************************************************************/ #pragma warn -par int fflush (FILE far *stream) { return FlushAll(); } #pragma warn +par /****************************************************************************/ src/kernel/strdup.c0100664000076500007650000000060006075154006014042 0ustar prool2prool2#include #include #include "kernel.h" /****************************************************************************/ char far *strdup(const char far *s) {char far *new; /* if (s==NULL) return NULL; */ if ( (new=malloc(strlen(s))) != NULL ) strcpy(new,s); return new; } /****************************************************************************/ src/kernel/dir.c0100664000076500007650000002111106657325064013311 0ustar prool2prool2#include #include #include "kernel.h" /****************************************************************************/ /* #define DEBUG */ /****************************************************************************/ char far *GetUpDir(unsigned int dir_inode, char far *tail) { char b1 [PATH_MAX+1]; char b2 [NAME_MAX+1]; if (dir_inode==0) { strcpy(b1,"/"); strcat(b1,tail); return b1; } else {struct dirent far *D; DIR far *dir; if (chdir("..")==-1) return NULL; if ((dir=opendir("."))==NULL) return NULL; for(;;) { if ((D=readdir(dir))==NULL) break; if ((*D).d_fileno==dir_inode) { strcpy(b1,DirToPath(D,b2)); if (strlen(tail)!=0) { strcat(b1,"/"); strcat(b1,tail); } return (closedir(dir)==EOF)?NULL:GetUpDir(CurDirClu,b1); } } closedir(dir); return NULL; } } /****************************************************************************/ char Buf2 [PATH_MAX+1]; /****************************************************************************/ char far *getcwd (char far *buf, int buflen) { char far *cc; int SaveDir; if (buf==NULL) goto L_INVAL; else if (buflen<=0) {L_INVAL: printf("getcwd:EINVAL\n"); errno=EINVAL; return NULL;} else if (buflen<(PATH_MAX+1)) {printf("getcwd:ERANGE\n"); errno=ERANGE; return NULL;} #ifdef DEBUG printf("getcwd: CurDirClu=%i\n", CurDirClu); #endif if (CurDirClu!=0) { SaveDir=CurDirClu; if ((cc=GetUpDir(CurDirClu,""))==NULL) return NULL; strcpy(Buf2,cc); #ifdef DEBUG printf("getcwd: Buf2=%s\n",Buf2); printf("getcwd: cc=%Fs\n",cc); #endif CurDirClu=SaveDir; } else { strcpy(Buf2,"/"); } #ifdef DEBUG printf("pwd=%s\n",Buf2); #endif strncpy(buf,Buf2,buflen); #ifdef DEBUG printf("pwd=%Fs\n",buf); #endif return buf; } /****************************************************************************/ int chdir (const char far *path) {int i, h, SaveDir; char far *cc; char LocalDir0 [PATH_MAX+1]; char LocalDir [PATH_MAX+1]; #ifdef DEBUG printf("chdir to `%Fs'\n",path); #endif if (path==NULL) {errno=ENOENT; return -1;} if (*path==0) return 0; strncpy(LocalDir0, path, PATH_MAX+1); #ifdef DEBUG printf("LocalDir0="); printf(LocalDir0); printf("\n"); #endif /* Transform: "/usr/bin/" -> "/usr/bin" "/" -> "/" "/usr/bin" -> "/usr/bin" */ i=(int)strlen(LocalDir0)-1; if (i!=0) if (LocalDir0[i]=='/') LocalDir0[i]=0; #ifdef DEBUG printf("LocalDir0=`%s'\n",LocalDir0); #endif SaveDir=CurDirClu; if ((cc=strchr(LocalDir0,'/'))!=NULL) { /* full pathname (with '/' separator[s] ) */ if (cc==LocalDir0) { CurDirClu=0; /* cd 1 */ } else { for (i=0; i<=PATH_MAX; i++) LocalDir[i]=0; memcpy(LocalDir,LocalDir0, ((i=(int)(cc-(char far *)LocalDir0))>PATH_MAX)?PATH_MAX:i); if (chdir(LocalDir)==-1) {CurDirClu=SaveDir; return -1; } } return chdir(cc+1); } else { /* short pathname (dirname only, without '/' separators) */ h=open(LocalDir0,O_RDONLY); if (h==-1) return -1; if (!FCBS[h].Attr.B.Dir) {close(h); errno=ENOTDIR; return -1;} CurDirClu=FCBS[h].BegClu; } close(h); return 0; } /****************************************************************************/ DIR far *opendir (const char far *dirname) {int h; DIR far *fp; if ((h=open(dirname,O_RDONLY))==-1) return NULL; if (!FCBS[h].Attr.B.Dir) {close(h); errno=ENOTDIR; return NULL;} fp=FCBS; fp+=h; return fp; } /****************************************************************************/ DIR far *openwdir (const char far *dirname) {int h; DIR far *fp; if ((h=open(dirname,O_RDWR))==-1) return NULL; if (!FCBS[h].Attr.B.Dir) {close(h); errno=ENOTDIR; return NULL;} fp=FCBS; fp+=h; return fp; } /****************************************************************************/ DIR far *openidir (int inode) {int OldCurDir; DIR far *fp; OldCurDir=CurDirClu; CurDirClu=inode; fp=openwdir("."); CurDirClu=OldCurDir; return fp; } /****************************************************************************/ struct dirent far *readdir (const DIR far *dirp) { long int i; int h; if (dirp==NULL) {errno=EBADF; return NULL;} if((h=fileno(dirp))==-1) return NULL; i=read(h,FCBS[h].Buf,32); if (i!=32) return NULL; return (struct dirent far *)(FCBS[h].Buf); } /****************************************************************************/ int writedir (const DIR far *dirp, struct dirent far *D) { long int i; int h; if (dirp==NULL) {errno=EBADF; return -1;} if((h=fileno(dirp))==-1) return -1; i=write(h,D,32); if (i!=32) return -1; return 0; } /****************************************************************************/ void rewinddir (const DIR far *dirp) { lseek(fileno(dirp),0,SEEK_SET); } /****************************************************************************/ int closedir (const DIR far *dirp) { if (close(fileno(dirp))==-1) return EOF; else return 0; } /****************************************************************************/ long telldir (const DIR far *dirp) { return tell(fileno(dirp)); } /****************************************************************************/ long seekdir (const DIR far *dirp, long offset, int wh) { return lseek(fileno(dirp),offset,wh); } /****************************************************************************/ int dircmp (struct dirent d1, struct dirent d2) { #ifdef DEBUG {int i; printf("dircmp: d1=<"); for (i=0;i<11;i++) printf("%c",d1.d_name[i]); printf(">_d2=<"); for (i=0;i<11;i++) printf("%c",d2.d_name[i]); printf("> "); } #endif if (d1.Attr.B.Attr1) { if (d2.Attr.B.Attr1) { return memcmp(d1.d_name,d2.d_name,11); } else { return -1; } } else { if (d2.Attr.B.Attr1) { return -1; } else { return memcmp(d1.d_name,d2.d_name,11); } } } /****************************************************************************/ #pragma warn -par int mkdir (const char far *path, mode_t mode) {int i, j, h, err; struct dirent Pattern [2]; if ((h=open(path,O_CREAT|O_EXCL|O_WRONLY))==-1) return -1 ; FCBS[h].Attr.U=FA_DIREC; FCBS[h].File=2; for (i=0; i<11; i++) {Pattern[0].d_name[i]=' '; Pattern[1].d_name[i]=' '; } Pattern[0].d_name[0]='.'; Pattern[1].d_name[0]='.'; Pattern[1].d_name[1]='.'; Pattern[0].Attr.U=FA_DIREC; Pattern[1].Attr.U=FA_DIREC; Pattern[0].Size=0L; Pattern[1].Size=0L; Pattern[1].d_fileno=CurDirClu; Pattern[0].FileDateTime.ft_hour = FCBS[h].FileDateTime.ft_hour ; Pattern[0].FileDateTime.ft_min = FCBS[h].FileDateTime.ft_min ; Pattern[0].FileDateTime.ft_tsec = FCBS[h].FileDateTime.ft_tsec ; Pattern[0].FileDateTime.ft_day = FCBS[h].FileDateTime.ft_day ; Pattern[0].FileDateTime.ft_month = FCBS[h].FileDateTime.ft_month ; Pattern[0].FileDateTime.ft_year = FCBS[h].FileDateTime.ft_year ; Pattern[1].FileDateTime.ft_hour = FCBS[h].FileDateTime.ft_hour ; Pattern[1].FileDateTime.ft_min = FCBS[h].FileDateTime.ft_min ; Pattern[1].FileDateTime.ft_tsec = FCBS[h].FileDateTime.ft_tsec ; Pattern[1].FileDateTime.ft_day = FCBS[h].FileDateTime.ft_day ; Pattern[1].FileDateTime.ft_month = FCBS[h].FileDateTime.ft_month ; Pattern[1].FileDateTime.ft_year = FCBS[h].FileDateTime.ft_year ; for (j=0; j<2; j++) for (i=0;i<10;i++) Pattern[j].Reserv[i]=0; if (write(h, Pattern, 2*32)==2*32) err=0; else {err=1; goto l_cl; } Pattern[0].d_fileno=FCBS[h].BegClu; if (lseek(h,0,SEEK_SET)==-1L) return -1; if (write(h, Pattern, 2*32)==2*32) err=0; else {err=1; goto l_cl; } /* Pattern[0].d_name[0]=0xE5; for(i=2;i<(CluSize*SECTOR_SIZE/32);i++) { if (write(h, Pattern, 32)==32) err=0; else {err=1; goto l_cl; } } */ l_cl: if (close(h)==-1) err++; return err?-1:0; } #pragma warn +par /****************************************************************************/ int rmdir (const char far *path) {int i; DIR far *dir; struct dirent far *D; /* 뤲�´夕�, ���信獸� エ 첓�젷�� */ if ((dir=opendir(path))==NULL) {errno=ENOENT; return -1;} else { for(i=0;i<2;i++) { if ((D=readdir(dir))==NULL) {i=errno; closedir(dir); errno=i; return -1; } } for(;;) { if ((D=readdir(dir))==NULL) break; if ((*D).d_name[0]== 0) continue; if ((*D).d_name[0]==0xE5) continue; /* H젵ㄵ� ���乘ⅱ�� ℡�� - 笹ⅳ�쥯收レ��, 첓�젷�� �� �信�, 笹ⅳ�쥯收レ�� ⅲ� ��レ㏆ 蝨젷汀� */ closedir(dir); errno=EEXIST; return -1; } if (closedir(dir)==-1) return -1; } /* 뱾젷���� 첓�젷�짛 */ return delete(path); } src/kernel/cp.c0100664000076500007650000000315506617052416013137 0ustar prool2prool2/*-------------------------------------------------------------------------*/ /* internal cp */ /*-------------------------------------------------------------------------*/ #include #include #include "kernel.h" void cp_help(void) { puts("usage: cp [file1] [file2]"); } int copy(char *path1, char *path2) {int h1, h2, i1, i2; long n, m; char buf [SECTOR_SIZE]; if((h1=open(path1,O_RDONLY))==-1) return -1; if (access(path2,2)==0) if (unlink(path2)) {printf("Cp: can't unlink target\n"); return -1; } if((h2=open(path2,O_WRONLY|O_CREAT|O_EXCL))==-1) {close(h1); return -1;} while(1) { if((n=read(h1,buf,SECTOR_SIZE))==-1) break; if(n==0) {m=0; break;} if((m=write(h2,buf,n))==-1) break; if (m!=n) break; } i1=close(h1); i2=close(h2); if (n==-1) return -1; if (m==-1) return -1; if (m!=n) return -1; if (i1==-1) return -1; return (i2); } void cp(int argc, char far *argv[] ) { int ii, j, n, Files=0; char path[2][PATH_MAX]; argc--; ii=1; do { if (argc) { if (argv[ii][0]=='-') { n=(int)strlen(argv[ii]); for (j=1;j2) {cp_help(); return; } } } } while (ii++ #include #include "kernel.h" /* strtol,strtoul,strtoll,strtoull convert string to long, unsigned long, long long or unsigned long long. strtoxx(char *src,char **ptr,int base) converts the string pointed to by src to an long of appropriate long and returnes it. It skips leading spaces and tabs (but not newlines, formfeeds, backspaces), then it accepts an optional sign and a sequence of digits in the specified radix. If the value of ptr is not (char **)NULL, a pointer to the character terminating the scan is returned in the location pointed to by ptr. Trailing spaces will NOT be skipped. If an error is detected, the result will be LONG_MIN, 0 or LONG_MAX, (or LONGLONG..) and errno will be set to EDOM if there are no digits ERANGE if the result would overflow. the ptr will be set to src. This file is based on the strtol from the the GNU C Library. it can be compiled with the UNSIGNED and/or LONGLONG flag set */ #include #define UNSIGNED #ifdef LONGLONG #define UTYPE_MAX (~(ulonglong) 0) #define TYPE_MIN LONGLONG_MIN #define TYPE_MAX LONGLONG_MAX #define longtype long #define ulongtype unsigned long #ifdef UNSIGNED #define function ulongtype strtoull #else #define function longtype strtoll #endif #else #define UTYPE_MAX (unsigned long) ~0L #define TYPE_MIN LONG_MIN #define TYPE_MAX LONG_MAX #define longtype long int #define ulongtype unsigned long int #ifdef UNSIGNED #define function ulongtype strtoul #else #define function longtype strtol #endif #endif #include int my_errno; /* Convert NPTR to an `unsigned long int' or `long int' in base BASE. If BASE is 0 the base is determined by the presence of a leading zero, indicating octal or a leading "0x" or "0X", indicating hexadecimal. If BASE is < 2 or > 36, it is reset to 10. If ENDPTR is not NULL, a pointer to the character after the last one converted is stored in *ENDPTR. */ function (const char *nptr,char **endptr,int base) { int negative; register ulongtype cutoff; register unsigned int cutlim; register ulongtype i; register const char *s; register unsigned char c; const char *save; int overflow; if (base < 0 || base == 1 || base > 36) base = 10; s = nptr; /* Skip white space. */ while (isspace (*s)) ++s; if (*s == '\0') { goto noconv; } /* Check for a sign. */ if (*s == '-') { negative = 1; ++s; } else if (*s == '+') { negative = 0; ++s; } else negative = 0; if (base == 16 && s[0] == '0' && toupper (s[1]) == 'X') s += 2; /* If BASE is zero, figure it out ourselves. */ if (base == 0) if (*s == '0') { if (toupper (s[1]) == 'X') { s += 2; base = 16; } else base = 8; } else base = 10; /* Save the pointer so we can check later if anything happened. */ save = s; cutoff = UTYPE_MAX / (unsigned long int) base; cutlim = (unsigned int) (UTYPE_MAX % (unsigned long int) base); overflow = 0; i = 0; for (c = *s; c != '\0'; c = *++s) { if (isdigit (c)) c -= '0'; else if (isalpha (c)) c = toupper (c) - 'A' + 10; else break; if (c >= base) break; /* Check for overflow. */ if (i > cutoff || (i == cutoff && c > cutlim)) overflow = 1; else { i *= (ulongtype) base; i += c; } } /* Check if anything actually happened. */ if (s == save) goto noconv; /* Store in ENDPTR the address of one character past the last character we converted. */ if (endptr != NULL) *endptr = (char *) s; #ifndef UNSIGNED /* Check for a value that is within the range of `unsigned long int', but outside the range of `long int'. */ if (negative) { if (i > (ulongtype) TYPE_MIN) overflow = 1; } else if (i > (ulongtype) TYPE_MAX) overflow = 1; #endif if (overflow) { my_errno=ERANGE; #ifdef UNSIGNED return UTYPE_MAX; #else return negative ? TYPE_MIN : TYPE_MAX; #endif } /* Return the result of the appropriate sign. */ return (negative ? -((longtype) i) : i); noconv: /* There was no number to convert. */ my_errno=EDOM; if (endptr != NULL) *endptr = (char *) nptr; return 0L; } src/kernel/txtattr.asm0100664000076500007650000000116106123033334014566 0ustar prool2prool2_TEXT segment byte public 'CODE' assume cs:_TEXT extrn _TextAttr:byte _textattr proc near push bp mov bp,sp ; word ptr [bp+4] - argument 1 mov al,byte ptr [bp+4] mov _TextAttr,al ; mov sp,bp pop bp ret _textattr endp public _textattr _getcolor proc near push bp mov bp,sp mov al,_TextAttr xor ah,ah ; mov sp,bp pop bp ret _getcolor endp public _getcolor _TEXT ends end src/kernel/genint.asm0100664000076500007650000000070005670566550014357 0ustar prool2prool2_TEXT segment byte public 'CODE' assume cs:_TEXT _geninterrupt proc near push bp mov bp,sp push bx mov bl,byte ptr [bp+4] ; interrupt no mov byte ptr CS:@@cmd+1,bl jmp @@cmd @@cmd: int 0 pop bx ; mov sp,bp pop bp ret _geninterrupt endp public _geninterrupt _TEXT ends end src/kernel/mouse.asm0100664000076500007650000000034705700642002014207 0ustar prool2prool2Titlo equ ' Mouse Package for XProolix' ; _TEXT segment byte public 'CODE' assume cs:_TEXT db ' Mouse port=' _PORT dw 1 ; 1 == COM2 public _PORT _TEXT ends end src/kernel/int1b.c0100664000076500007650000000265406667570232013563 0ustar prool2prool2#include #include #include "kernel.h" void interrupt int1b (void) /* Interrupt 1B - ctrl-break pressed */ {int i; /* pushf */ /* old fl = [BP+22] */ /* push cs */ /* old cs = [BP+20] */ /* push ip */ /* old ip = [BP+18] */ /* push ax */ /* old ax = [BP+16] */ /* push bx */ /* old bx = [BP+14] */ /* push cx */ /* old cx = [BP+12] */ /* push dx */ /* old dx = [BP+10] */ /* push es */ /* old es = [BP+ 8] */ /* push ds */ /* old ds = [BP+ 6] */ /* push si */ /* old si = [BP+ 4] */ /* push di */ /* old di = [BP+ 2] */ /* push bp */ /* old BP = [BP] */ /* mov bp,DGROUP */ /* mov ds,bp */ /* mov bp,sp */ /* sub sp,2 */ asm mov ax,[BP+20]; asm mov i,ax; printf("CS:IP = %04X",i); asm mov ax,[BP+18]; asm mov i,ax; printf(":%04X",i); asm mov ax,[BP+22]; asm mov i,ax; printf(" FL=%04X",i); asm mov ax,[BP+6]; asm mov i,ax; printf(" DS=%04X",i); asm mov ax,SS; asm mov i,ax; printf(" SS:SP=%04X:",i); asm mov ax,SP; asm mov i,ax; printf("%04X",i); } src/kernel/alloc.c0100664000076500007650000001762206605261250013626 0ustar prool2prool2/* #define DEBUG_ALLOC */ /*****************************************************************************/ static unsigned int parleft(void) {int CurPar, ret; struct MemBlk far * MB; ret=0; CurPar = FP_SEG(Fin) + (FP_OFF(Fin) >> 4); MB = MK_FP(CurPar,0); while (1) { if (!((*MB).OwnerPar)) if ((*MB).SizePar>ret)ret+=(*MB).SizePar-1; if ((*MB).Type != 'M') break; CurPar+=(*MB).SizePar; MB = MK_FP (CurPar,0); } return ret; } /*****************************************************************************/ static unsigned int parxtent(void) {int CurPar, ret; struct MemBlk far * MB; ret=0; CurPar = FP_SEG(Fin) + (FP_OFF(Fin) >> 4); MB = MK_FP(CurPar,0); while (1) { if (!((*MB).OwnerPar)) if ((*MB).SizePar>ret)ret=(*MB).SizePar-1; if ((*MB).Type != 'M') break; CurPar+=(*MB).SizePar; MB = MK_FP (CurPar,0); } return ret; } /*****************************************************************************/ static unsigned long coreleft(void) {unsigned long l; l=parleft(); return l<<4; } /*****************************************************************************/ static unsigned long int corextent(void) {unsigned long l; l=parxtent(); return l<<4; } /*****************************************************************************/ void mem(void) {int CurPar; char c; struct MemBlk far * MB; CurPar = FP_SEG(Fin) + (FP_OFF(Fin) >> 4); MB = MK_FP(CurPar,0); puts("\nRAM OwnPar Size"); while (1) { printf("%4X:0000 %c %4X %4X",CurPar,(c=(*MB).Type)<' '?' ':c, (*MB).OwnerPar,(*MB).SizePar); if ((*MB).Type != 'M') {puts(""); break;} CurPar+=(*MB).SizePar; MB = MK_FP (CurPar,0); puts(""); } printf("Free memory %li\nMaximum free block %li\n",coreleft(), corextent()); } /****************************************************************************/ void far *malloc (size_t size) { unsigned int CurPar, NeedPar, RestosPar; struct MemBlk far * MB; struct MemBlk far * Rest; struct MemBlk MB2; if (size==0) return NULL; if (size==-1L) { size=corextent(); } NeedPar=(int)(size>>4)+1; if (size & 0xF) NeedPar++; #ifdef DEBUG_ALLOC printf("A1\n"); #endif CurPar = FP_SEG(Fin) + (FP_OFF(Fin) >> 4); MB = MK_FP(CurPar,0); #ifdef DEBUG_ALLOC printf("A2\n"); #endif while (1) { #ifdef DEBUG_ALLOC printf("A3\n"); #endif if(!(*MB).OwnerPar) /* block is free */ if ((*MB).SizePar>=NeedPar) { /* memory yes */ #ifdef DEBUG_ALLOC printf("A11\n"); #endif MB2.Type=(*MB).Type; MB2.SizePar=(*MB).SizePar; (*MB).SizePar=NeedPar; (*MB).OwnerPar=ProcessPar; #ifdef DEBUG_ALLOC printf("malloc: ProcessPar=%04X\n",ProcessPar); #endif if (MB2.SizePar>NeedPar) {/* restos of blk */ #ifdef DEBUG_ALLOC printf("A10\n"); #endif (*MB).Type='M'; RestosPar=CurPar+NeedPar; Rest=MK_FP(RestosPar,0); (*Rest).OwnerPar=0; (*Rest).SizePar=MB2.SizePar-NeedPar; (*Rest).Type=MB2.Type; } #ifdef DEBUG_ALLOC printf("A13\n"); #endif return MK_FP(CurPar+1,0); } else ; /* no memory in this blk */ else ; /* blk is busy */ if ((*MB).Type != 'M') break; CurPar+=(*MB).SizePar; MB = MK_FP (CurPar,0); } #ifdef DEBUG_ALLOC printf("alloc\n"); #endif return NULL; } /*****************************************************************************/ void free ( void far * block) { size_t CurPar; struct MemBlk far * MB; if (block==0) return; block=MK_FP(FP_SEG(block) + (FP_OFF(block)>>4) -1,0); /* normalization */ CurPar = FP_SEG(Fin) + (FP_OFF(Fin) >> 4); MB = MK_FP(CurPar,0); while (1) { if (MB==block) {(*MB).OwnerPar=0;return;} if ((*MB).Type != 'M') break; CurPar+=(*MB).SizePar; MB = MK_FP (CurPar,0); } } /*****************************************************************************/ unsigned int par_size_of_block ( void far * block) { size_t CurPar; struct MemBlk far * MB; if (block==0) return 0; block=MK_FP(FP_SEG(block) + (FP_OFF(block)>>4) -1,0); /* normalization */ CurPar = FP_SEG(Fin) + (FP_OFF(Fin) >> 4); MB = MK_FP(CurPar,0); while (1) { if (MB==block) {return (*MB).SizePar;} if ((*MB).Type != 'M') break; CurPar+=(*MB).SizePar; MB = MK_FP (CurPar,0); } return 0xFFFF; } /*****************************************************************************/ int garbage (void) {int ret=1; size_t CurPar; int opt=1; struct MemBlk far * MB; struct MemBlk far * MB0; while(opt) { opt=0; CurPar = FP_SEG(Fin) + (FP_OFF(Fin) >> 4); MB = MK_FP(CurPar,0); if (((*MB).Type) != 'M') return 1; MB0=MB; while (1) { CurPar+=(*MB).SizePar; MB = MK_FP (CurPar,0); if ( (((*MB0).OwnerPar)==0) && (((*MB).OwnerPar)==0) ) { (*MB0).Type=(*MB).Type; (*MB0).SizePar+=(*MB).SizePar; ret=0; opt=1; } else MB0=MB; if ((*MB).Type != 'M') break; } } return ret; } /*****************************************************************************/ void far *calloc (size_t nitems, size_t size) {size_t m, i; void far *Pointer; char huge *Setter; /* 栒� ＋渽�. ´ℓ� 췅ㄾ huge ? */ if ((Pointer=malloc(m=nitems*size))!=NULL) { Setter=Pointer; for(i=0;i>4) -1,0); /* normalization */ CurPar = FP_SEG(Fin) + (FP_OFF(Fin) >> 4); MB = MK_FP(CurPar,0); while (1) { if (MB==block) {/* 췅獄� ∥�� 캙э殊 */ goto l_found; } if ((*MB).Type != 'M') break; CurPar+=(*MB).SizePar; MB = MK_FP (CurPar,0); } /* �젶�． ∥�첓 캙э殊 �β */ return NULL; } l_found: /* αエ ���淫첓 �㎚��ⓥ� �젳Д� 聲�‘ㄽ�． ∥�첓 캙э殊 - 獸 �� ⅲ� 췅十� */ if (!MB->OwnerPar) return NULL; /* ③�� 笹ⅳ莘蟯� ∥�� */ if ((*MB).Type != 'M') MB_next=NULL; CurPar+=(*MB).SizePar; MB_next = MK_FP (CurPar,0); /* ��誓ㄵワ�� ���硫 �젳Д� � 캙�젫�졽졾 */ NeedPar=(int)(size>>4)+1; if (size & 0xF) NeedPar++; if (MB->SizePar==NeedPar) return block; /* �Ø젶�． �㎚����⑨ �� 췅ㄾ */ if (MB->SizePar>NeedPar) {/* 僧��麟젰� �젳Д� ∥�첓 */ Delta=MB->SizePar-NeedPar; MB->SizePar=NeedPar; /* 貰ℓ젰� ∥��-ゃ貰曄� */ CurPar = FP_SEG(MB) + (FP_OFF(MB) >> 4); CurPar+=MB->SizePar; MB_kusochek= MK_FP(CurPar,0); MB_kusochek->Type='M'; MB_kusochek->OwnerPar=0; MB_kusochek->SizePar=MB->SizePar-NeedPar-1; /* αエ 笹ⅳ莘蟯� ∥�� 獸┘ �信獸�, 獸 ∥��-ゃ貰曄� ��＋��젰� ⅲ� */ if (!MB_next->OwnerPar) { MB_kusochek->SizePar+=(MB_next->SizePar+1); } } else {/* 瑟�エ葉쥯�� �젳Д� ∥�첓 */ /* αエ 笹ⅳ莘蟯� ∥�� �α¡‘ㄵ� - �音�� */ if (MB_next->OwnerPar) return NULL; /* αエ 췅� ∥�� ��笹ⅳ�Ł - �音�� */ if (MB->Type=='Z') return NULL; /* �揖ⓤワ�� �黍�좈���� �젳Д�� 췅蜈． ∥�첓 */ Delta=NeedPar-MB->SizePar; /* αエ 笹ⅳ莘蟯� ∥�� Д�麟� ���▼�ㄸМ． �黍�좈��⑨ - �音�� */ if (MB_next->SizeParSizePar==Delta) { MB->SizePar=NeedPar; return block; } /* 췅� ∥�� �筍α� ゃ貰曄� �� 笹ⅳ莘耀． ∥�첓 */ MB->SizePar=NeedPar; /* */ CurPar = FP_SEG(MB) + (FP_OFF(MB) >> 4); CurPar+=MB->SizePar; MB_kusochek= MK_FP(CurPar,0); MB_kusochek->Type=MB_next->Type; MB_kusochek->OwnerPar=0; MB_kusochek->SizePar=MB_next->SizePar-Delta; } return NULL; }src/kernel/bootred0.asm0100664000076500007650000000162306127462410014602 0ustar prool2prool2; read boot sector _TEXT segment byte public 'CODE' assume cs:_TEXT ; bootread0 (int dev, void far * buf) return 0 or ErrorCode _bootread0 proc near push bp mov bp,sp ; word ptr [bp+4] - argument 1 ; word ptr [bp+6] - argument 2 ... push bx push cx push dx push ES mov dx,word ptr [bp+4] mov bx,word ptr [bp+6] mov ES,word ptr [bp+8] mov cx,1 mov dh,0 mov ax,0201h ; Fn=02, Read 1 sector int 13h jc @@err xor ax,ax jmp @@ret @@err: @@ret: pop ES pop dx pop cx pop bx ; mov sp,bp pop bp ret _bootread0 endp public _bootread0 _TEXT ends end src/kernel/reboot.asm0100664000076500007650000000051506402353240014351 0ustar prool2prool2_TEXT segment byte public 'CODE' assume cs:_TEXT _reboot proc near mov ax,40h mov ds,ax mov bx,72h mov [bx],1234h db 0eah ; JMP F000:FFF0 dw 0fff0h,0f000h _reboot endp public _reboot _TEXT ends end src/kernel/char_in.c0100664000076500007650000000475506664343110014143 0ustar prool2prool2#include #include #include #include #include #include "kernel.h" #define Norm 2 #define Inverse 0x70 /*==========================================================================*/ /* #define DEBUG */ /*==========================================================================*/ #ifdef MOUSE /*--------------------------------------------------------------------------*/ int getch(void) {int j; while ((j=getcom(PORT))==-2); /* Wait a click or move mouse (wait a byte from com port */ while (getcom(PORT)!=2); /* 앪� �昔殊� ㅰⅰⅶ짛 щ鼇 */ return j; } /*--------------------------------------------------------------------------*/ int kbhit(void) {int j; j=getcomstat(PORT); if (j==-1) return 0; else return (j & 1); } /*--------------------------------------------------------------------------*/ #else /* no MOUSE */ /*--------------------------------------------------------------------------*/ char extended_kbd_code=0; /*--------------------------------------------------------------------------*/ int getch(void) {int c; if (extended_kbd_code) {c=extended_kbd_code; extended_kbd_code=0; } else { c=getch0(); if ((char)c==0) { extended_kbd_code=c>>8; c=0; if ((extended_kbd_code>='h')&&(extended_kbd_code<='o')) {/* Alt-F1 .. Alt-F8 */ new_video_page(extended_kbd_code-'h'); extended_kbd_code=0; return getch(); } } else c=(char)c; } #if CODETABLE==_RUSSIAN_ if (*KbdStatus & SCROLL_LOCK) c=Russian[c]; #endif return c; } /*--------------------------------------------------------------------------*/ int kbhit(void) { if (extended_kbd_code) return 1; else return kbhit0(); } #endif /*--------------------------------------------------------------------------*/ /****************************************************************************/ int getchar(void) {int c; /* 묆ㅿ �� ⓤ若ㄽØ젹� GNU file 呻Œⓥ (押�ゆ⑨ yesno()) �黍 췅쬊殊� か젪②� Enter ㄾウ�� ¡㎖�좈졻藺� ぎ� '\n', � �� '\r' 첓� � MSDOS. � �젶┘ getchar ㄾウ췅 〓筍 � 張��. */ c=getch(); #ifdef DEBUG putch('['); putch(c); putch(']'); #endif if (c!='\b') c=putchar (c=='\r'?'\n':c); /* '\b' - BREAK */ return c; } /****************************************************************************/ int getche (void) {int c; c=getch(); if (c<' ') if (c=='\b') return putch(c); else return c; else return putch(c); } src/kernel/ints.c0100664000076500007650000000145706501601640013504 0ustar prool2prool2#include #include #include "kernel.h" void interrupt done(void) { puts("\n INTERRUPT "); } void interrupt CtrlAltDel(void) { puts("\nU pressed Control Alt Del\n"); } void interrupt Int1(void) { puts("\nInterrupt 1 - Trace\n"); } void interrupt Int2(void) { puts("\nInterrupt 2 - Non-maskable (NMI)\n"); } void interrupt Int3(void) { /* puts("\nInterrupt 3 - Breakpoint\n"); */ } void interrupt Int4(void) { puts("\nInterrupt 4 - Overflow trap\n"); } void interrupt Int6(void) { puts("\nInterrupt 6 - Invalid opcode (186,286,386)\n"); } void interrupt Int7(void) { puts("\nInterrupt 7 - Coprocessor not available (286,386)\n"); } void interrupt Int75(void) { puts("\nInterrupt 75 - numeric coprocessor NMI error (AT,XT286,PS50+)\n"); } src/kernel/files.bbs0100664000076500007650000000334207007552516014161 0ustar prool2prool2ALLOC.C Allocate memory subprograms APP.C Assembler preprocessor APP.COM Assembler preprocessor BIOS.C bios programs C0.ASM Kernel startup code CAT.C cat - int. command CMOS.ASM CMOS timer support CONV.C see stdlib.h CS0.LIB obj modules from Turbo C 2.0 library cs.lib (long int support etc) CTYPE.C see stdlib.h DE.C Disk edit for Proolix E.C e - debug int command GENTBL.C Generate system call table - syskern.asm INT5DUMP.ASM Register dump IO.C I/O procedures KEY.ASM gets() by Igor Sazonov (for "%"-shell like c-shell ;) LS.C ls - internal command MAKEFILE Makefile ;) MEM.C See mem.h MEMD.C memd - memory dump, internal command MSH.C msh (mouse shell ;) - XProolix for mouse without keyboard NOCMOS.ASM Real clock timer without CMOS (on XT only) support OHB.ASM Output Hex Byte OHW.ASM Output Hex Word PROCESS.C Process' procedures REGDUMP.ASM Register dump SAYR.ASM Output ASCIIZ string via BIOS SH.C sh - shell (prompt "$") STDIO.C see stdio.h STDLIB.C see stdlib.h STRCHR.C string support procedures STRDUP.C string support procedures STRING.C string support procedures STRLEN.C string support procedures SYSCALL.C system call SYSCALL.TBL Source General Main Table of System Calls TIME.C Dostime package. For compatible with MSDOS VEC.C vec - int.command (show interrupt vectors) absread.c absread() abswrite.c abswrite() bootread.c bootread() bootred0.asm bootread0() char_in.c character input routines char_out.c character output routines clrscr.asm clrscr() - clear screen cluread.c CluRead() - cluster read cold.asm cold() - cold reboot reboot.asm reboot() - hot reboot comport.asm serial port routines exitw.asm Assembler utility for Proolix src/kernel/cs0.lib0100664000076500007650000001300006136524252013532 0ustar prool2prool2� �LDIVG�h� _TEXTCODE뼐(�릱 LUMOD@뜍 LDIV@�� LMOD@ �� LUDIV@뵠�3�� �����UVW뗭뗺딣 딽 �^딳 �u �ti �te颱u �y 腿堆꺴꺩 �y 槌褪꺳껞뗩� W3�3親蟬綠潞�;�r w;�r+��@洵[胎t떾뗖卵胎t腿堆꺴_^]�罷颱t떷3陋�D�t�LXMUL��h� _TEXTCODE뼐(� LXMUL@뒥V뼊끐t鬪몗픱闖�뽻��^盖�t�SCOPY��h� _TEXTCODE뼐(� SCOPY@렆 U뗭VW흚�~ 滉稶��懲_^]�O�t�LLSHC�h� _TEXTCODE뼐(� LXLSH@몺#��s뗗岱待浸��宅 沓��뗊3임隨뿂t�LURSH��h� _TEXTCODE뼐(�LXURSH@4�#��s뗚貸黛浸��戴 촉��떷3錄浣뱤t�SPUSH��h� _TEXTCODE뼐(' � SPUSH@돖+[+�U뗭VW롖뗱뙿�~뚍렳滉稶��懲_^]RS巨�t�CTYPE��/_TEXTCODE_DATADATA_BSSBSSDGROUPDGROUP��(3�H �H ���U�__ctypeu� !!!!! @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ &�t� TIMECVTT�/_TEXTCODE_DATADATA_BSSBSSDGROUPDGROUP��(�6�H �H ���U�> _daylight _timezone_tzset__ISDSTLXMUL@LDIV@LMOD@�� _dostounix� _unixtodos!�����U뗭껋VW���쫨鷺뎈�덯��^�7겿D�떾楠楠쇆����F�V�떾%쇆���3�F�V嚆�t 갌��Q긘�3��^둋삄�N�N뒆�� ���^둋쁇��^�~ �^�uG떿�透�^둟�혟F��>t �^둋�PW3픐�^�N�P� 픱�N�딣��3���F�V��^���3��<��^�_�RP떸�[Y��^�N�딽�딣穴_^뗥]홛뗭VW�~ 땦���쫨鷺)FV힒3恬<RP�v�v�뉳3恬<RP�v�v�뎈덯3恬<RP�v�v��3恬<RP�v�v�뎈덯3恬�늃P�v�v�邏邏��3恬�늃P�v�v�뎈덯�~|>�~P"v5걆P"�^�3恬8"RP�v�v�3恬8"RP�v�v�뎈덯�>t<3恬RP�v�v�P3恬RP�v�v�P3픐�N�P� 픱긃긘3恬RP�v�v�뉳3恬RP�v�v�뎈덯긃긘�u.�~|�~ #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include /******************************** External variables ***********************/ #ifdef MOUSE extern unsigned int PORT; #endif /* Mode: 0 - αエ �젩��젰� ぎ� 甸��, Œ� 歲飡�Л硫 �留�� �� 材�褻ぎ． �昔璵遜�, 1 - αエ �젩��젰� ぎ� 材�褻ぎ． �昔璵遜�. User: 0 - αエ �젩��젰� ぎ� 甸��, 1 - αエ �젩��젰� 材�褻え� �昔璵遜 Œ� 歲飡�Л硫 �留�� �� 材�褻ぎ． �昔璵遜� */ int Mode, User; int HeadCnt, TrkSecs; int SectorsOnCyl, FatSize, FatCnt; unsigned int MaxClusters; unsigned long MaxSectors; /* extern unsigned int _Begin; */ extern struct {unsigned int ParNo; void (*Entry)(void);} SysTable []; extern int Trace; unsigned int MemTop; void far * Fin; int emulation_mode; /* 0 - boot from disk/diskette; */ /* 1 - boot from file under MSDOS-session Windows 95 */ /******************************** Public variables *************************/ /* char NearBuffer [512]; */ #if defined (_HERCULES_) && defined (_MON_MONO_) int TextAttr=7; #else int TextAttr=0x70; #endif int _argc; char far *_argv [MAX_ARG]; char far * far *pEnv; char far *hEnv; unsigned int Global; unsigned int Counter; char far *KbdStatus; int curX=1, curY=1, maxX=80, maxY=25; char far *curAddr; char VideoAttrib=7; /* long int Secund=0; */ #ifdef CMOS unsigned char hour, min, secund; #else unsigned long Tick; #endif unsigned char century, year, month, day, flag; #if CODETABLE==_RUSSIAN_ char Russian [256]; #endif void interrupt (*OldTimerVec) (void); unsigned long RootBeg, RootEnd, ResSecs; unsigned int CluSizeBytes; struct BufPool far *Cache; int CurrentDevice=-1; int ReadOnly; int NextDOSDrive='C'; /* 꺂�줎レ�瑜 ��誓Д��瑜, ㄾ飡承�瑜 �� 材�褻え� �昔璵遜�� */ int errno=0; int More=0; int NLine=1; /* */ unsigned int ProcessPar; unsigned int CluSize; unsigned long DataStart; int x, y; struct MemBlk *MB; int FATMode; FILE FCBS [OPEN_MAX]; char MasterBootRecord [SECTOR_SIZE]; char far *OldInt; FILE far *stdin ; FILE far *stdout; FILE far *stderr; /* �젩エ�� 召ζ쯄レ�音 �젵ギ� (�젵ギ� 殊캙 Device) */ struct DevRecord Dev [] = { /* name, major, minor, byte (1 - byte-oriented device, 0 - block-oriented) */ /* 렎Þ � 獸� ┘ major ��Д� 信循�⒰手� ㄻ� 줎⒱�黍��殊昔쥯��音 � ㄻ� ∥�ぎ黍��殊昔쥯��音 �‘㎛좂젰� ��놥썒 信循�⒰手�. 앪� 誠�쳽�� ㄻ� 咨���Ж� Д飡� � �젩エ�졾 */ {"null", 0,0,1}, {"console", 1,0,1}, {"fd0", 0,0,0}, {"fd1", 0,1,0}, {"hd0", 1,0,0}, {"hd1", 1,1,0}, {"ttyS00", 2,0,1}, /* COM */ {"ttyS01", 2,1,1}, {"lp00", 3,0,1}, /* LPT */ {"lp01", 3,1,1}, {"mem", 4,0,1}, {"kmem", 5,0,1}, {"",-1,-1,-1} }; /* �젩エ�� 召ζ쯄レ�音 �젵ギ� 줎⒱�黍��殊昔쥯��音 */ struct DevByte TableByte [5] = { {nulldev,nulldev,nulldev,nulldev,nulldev}, {nulldev,nulldev,nulldev,nulldev,nulldev}, {nulldev,nulldev,nulldev,nulldev,nulldev}, {nulldev,nulldev,nulldev,nulldev,nulldev}, {nulldev,nulldev,nulldev,nulldev,nulldev}, }; /* �젩エ�� 召ζ쯄レ�音 �젵ギ� ∥�ぎ黍��殊昔쥯��音 */ struct DevBlock TableBlock [2] = { /* open, close, strategy */ {nulldev,nulldev,FDDstrategy}, /* FDD */ {nulldev,nulldev,HDDstrategy}, /* HDD */ }; unsigned int CurDirClu; struct DeviceStruct Devices [LASTDRIVE]; /* Devices [0] - disk A: sec=0 if not present Devices [1] - disk B: sec=0 if not present Devices [2] - disk C: sec=0 if not present Devices [3] - disk D: sec=0 if not present ... */ /* 뮔∥ⓩ� �昔璵遜�� */ struct processes process_table [PROC_MAX]; /************************** include functions ******************************/ #include "alloc.c" #include "process.c" #include "syscall.c" void test_devices(void); void interrupt int1b(void); /**************************** Functions ************************************/ #if 0 void fuck(void) { int Divisor [] = {10000, 1000, 100, 10, 1}; printf("fuck = %04X\n",Divisor[0]); } #endif void ident(void) { printf("Proolix "); printf("%s\nCompile by Turbo C 2.01 at %s %s\n",VER,__DATE__,__TIME__); } /*---------------------------------------------------------------------------- �袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴� � �袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴� � � � � � � � Main function � � � � � � � 훤袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴暠 � 훤袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴暠 ----------------------------------------------------------------------------*/ void main (void) {int i; /* int OldSegment, OldOffset; */ Mode=0; /* kernel mode */ User=0; ProcessPar=kernel_begin(); puts("\nKernel started"); test_devices(); init(); ident(); print_mount(); #ifndef NODISK #if 1 _argv[0]="kernel.ovl"; _argv[1]="\r"; _argv[2]=NULL; if ((i=execve(_argv[0],_argv,pEnv))!=0) printf("kernel: no overlay. rc=%i ",i); #endif #ifdef _RC_ _argv[0]=_RC_; _argv[1]=NULL; execve(_argv[0],_argv,pEnv); #endif /* _RC_ */ #endif /* NODISK */ #ifdef CHANGE_INT_1B #if 0 setvect(0x1B,(void interrupt(*)(void)) sh ); #else setvect(0x1B,(void interrupt(*)(void)) int1b ); #endif #endif sh(); }src/kernel/comport.asm0100664000076500007650000000274105670566770014571 0ustar prool2prool2_TEXT segment byte public 'CODE' assume cs:_TEXT _inicom_ proc near push bp mov bp,sp PUSH dx mov dx,word ptr [bp+4] mov al,byte ptr [bp+6] mov ah,0 int 14h POP dx ; mov sp,bp pop bp ret _inicom_ endp public _inicom_ _getcom_ proc near push bp mov bp,sp ; word ptr [bp+4] - argument 1 PUSH dx mov dx,word ptr [bp+4] mov ah,2 int 14h POP dx ; mov sp,bp pop bp ret _getcom_ endp public _getcom_ _putcom_ proc near push bp mov bp,sp ; word ptr [bp+4] - argument 1 ; 6 2 PUSH dx mov dx,word ptr [bp+4] mov al,byte ptr [bp+6] mov ah,2 int 14h POP dx ; mov sp,bp pop bp ret _putcom_ endp public _putcom_ _getcomstat_ proc near push bp mov bp,sp ; word ptr [bp+4] - argument 1 PUSH dx mov dx,word ptr [bp+4] mov ah,3 int 14h POP dx ; mov sp,bp pop bp ret _getcomstat_ endp public _getcomstat_ _TEXT ends end src/kernel/nocmos.asm0100664000076500007650000000175305670567242014401 0ustar prool2prool2Titlo equ ' NoCMOS Kernel Package ' Ver equ ' V 0.0.0.2 2-Nov-1994 ' ; CMOS & Real Time Clock asm functions for Proolix's Kernel _TEXT segment byte public 'CODE' assume cs:_TEXT _ReadTick proc near push bp mov bp,sp push bx push cx push dx ; word ptr [bp+4] - argument 1 ; 6 2 ; ... ; int ReadTick (unsigned long *Tick, char *Flag) mov ah,0 int 1ah jc @@ret ; error mov bx,word ptr [bp+4] mov word ptr [bx],dx mov word ptr [bx+2],cx mov bx,word ptr [bp+6] mov byte ptr [bx],al xor ax,ax jmp @@ret @@err: mov ax,1 @@ret: pop dx pop cx pop bx ; mov sp,bp pop bp ret _ReadTick endp public _ReadTick _TEXT ends end src/kernel/setjmp.asm0100664000076500007650000000716706502066120014372 0ustar prool2prool2 .8086 _TEXT segment byte public 'CODE' assume cs:_TEXT ; include macros.asm ; int setjmp(jmp_buf jmpb) _setjmp proc far ; SP = old SP - 6 (2 bytes - jmpb addr, 4 bytes - ; retf addr) push bp ; SP = old SP - 8 mov bp,sp ; BP = old SP - 8 ; old BP = [BP] ; old IP = [BP+2] ; old CS = [BP+4] ; jmpb addr = [BP+6] pushf ; SP = old SP - 12 ; flag = [BP- 2] push ax ; SP = old SP - 14 ; ax = [BP- 4] push bx ; SP = old SP - 16 ; bx = [BP- 6] push cx ; SP = old SP - 18 ; cx = [BP- 8] push dx ; SP = old SP - 20 ; dx = [BP-10] push si ; SP = old SP - 22 ; si = [BP-12] push di ; SP = old SP - 24 ; di = [BP-14] push ds ; SP = old SP - 26 ; ds = [BP-16] push es ; SP = old SP - 28 ; es = [BP-18] ; mov ax,SETJMP_DATA ; mov ds,ax mov bx,word ptr [bp+6] ; bx - adress of jmpb mov ax,BP add ax,8 mov word ptr [bx+ 0],ax ;j_sp mov word ptr [bx+ 2],ss ;j_ss mov ax,[BP-2] mov word ptr [bx+ 4],ax ;j_flag mov ax,[BP+4] mov word ptr [bx+ 6],ax ;j_cs mov ax,[BP+2] mov word ptr [bx+ 8],ax ;j_ip mov ax,[BP] mov word ptr [bx+10],ax ;j_bp mov word ptr [bx+12],di ;j_di mov ax,[BP-18] mov word ptr [bx+14],ax ;j_es mov word ptr [bx+16],si ;j_si mov word ptr [bx+18],DS ;j_ds mov ax,[BP-4] mov word ptr [bx+20],ax ;j_ax mov ax,[BP-6] mov word ptr [bx+22],ax ;j_bx mov word ptr [bx+24],cx ;j_cx mov word ptr [bx+26],dx ;j_dx pop es pop ds pop di pop si pop dx pop cx pop bx pop ax popf xor ax,ax pop bp ret _setjmp endp ; void _Cdecl longjmp(jmp_buf jmpb, int retval); _longjmp proc far mov bp,sp ; chr1 'Q' mov bx,word ptr [bp+4] ; bx - adress of jmpb cli mov ax,[bx] ; j_sp mov SP,ax mov ax,[bx+2] ; j_ss mov SS,ax sti push word ptr [bx+ 4] ;j_flag push word ptr [bx+ 6] ;j_cs push word ptr [bx+ 8] ;j_ip push word ptr [bx+10] ;j_bp push word ptr [bx+12] ;j_di push word ptr [bx+14] ;j_es push word ptr [bx+16] ;j_si push word ptr [bx+18] ;j_ds push word ptr [bx+20] ;j_ax push word ptr [bx+22] ;j_bx push word ptr [bx+24] ;j_cx push word ptr [bx+26] ;j_dx ; chr1 'q' pop dx pop cx pop bx pop ax pop ds pop si pop es pop di pop bp IRET ; == {pop ip; pop cs; popf} _longjmp endp _TEXT ends public _longjmp public _setjmp end src/kernel/nextclu.c0100664000076500007650000000434606761542150014221 0ustar prool2prool2#include #include #include #include "kernel.h" /* NextClu(), NextClu2() - next cluster number compute and load to Cache) */ /* NextClu() - kernel's internal module */ /* NextClu2() - boot manager internal module */ /* 뫌＋졹��猶졻� NextClu() � NextClu2() ! */ unsigned int NextClu (unsigned int CluNo) /* -1 for eof or error */ { unsigned long j; unsigned int nsect, offset, b; unsigned int i; if ((CluNo>MaxClusters)||(CluNo==0)) { printf("NextClu: Invalid cluster number. CluNo=%u, MaxClusters=%u", CluNo, MaxClusters); return -1; } if (FATMode==FAT12) { /* FAT 12 */ /* ��誓ㄵワ�� ��Д� 줎⒱� � �젩エ璵 FAT-12 */ j=(CluNo*3)/2; /* ��誓ㄵワ�� ��Д� 醒も��� FAT */ nsect=(unsigned int)(j/SECTOR_SIZE); printf("nsect=%i ",nsect); /* nsect-�狩�歲收レ�硫 ��Д� 醒も��� FAT. 0 - ��舒硫 醒も�� FAT */ if (nsect>=FatSize) {puts("NextClu: Invalid FAT's computing"); return -1;} if ( (b=LoadCache(ResSecs+nsect)) == -1U ) {puts("\nNextClu: FAT read error"); return -1;} offset=(unsigned int)(j%SECTOR_SIZE); printf("offset=%i ",offset); if (offset==(SECTOR_SIZE-1)) {unsigned char c; c=*(unsigned char far *)((*(Cache+b)).M+(SECTOR_SIZE-1)); if ( (b=LoadCache(ResSecs+nsect+1)) == -1U ) {puts("\nNextClu: FAT read error"); return -1;} printf("c=%04X ",c); i=((unsigned int)c)| (((unsigned int)(*(unsigned char far *)((*(Cache+b)).M)))<<8); } else i=*(int far *)((*(Cache+b)).M+offset); printf("word=%04X ",i); if (CluNo & 1) {putch('n');i>>=4;} else {putch('c');i&=0xfff;} if (i>0xff0) return -1; } else { /* FAT 16 */ /* ��誓ㄵワ�� ��Д� 줎⒱� � �젩エ璵 FAT-16 */ j=((long)CluNo)*2; /* ��誓ㄵワ�� ��Д� 醒も��� FAT */ nsect=(unsigned int)(j/SECTOR_SIZE); /* nsect-�狩�歲收レ�硫 ��Д� 醒も��� FAT. 0 - ��舒硫 醒も�� FAT */ if (nsect>=FatSize) {puts("NextClu: Invalid FAT's computing"); return -1;} if ( (b=LoadCache(ResSecs+nsect)) == -1U ) {puts("\nNextClu: FAT read error"); return -1;} offset=(unsigned int)(j%SECTOR_SIZE); i=*(int far *)((*(Cache+b)).M+offset); if (i>0xfff0) return -1; } #if 1 printf("%i->%i ",CluNo,i); #endif return i; }src/kernel/viewexe.c0100664000076500007650000001061306123350144014175 0ustar prool2prool2#include #include "..\include\limits.h" #include "..\include\struct.h" void ViewEXE (struct exe_header far *Buf) {long i, j; printf("Bytes on last page %04X\n",Buf->PartPag ); printf("Pages in file %04X\n",Buf->PageCnt ); printf("Relocations %04X\n",Buf->ReloCnt ); printf("Paragraphe in header %04X\n",Buf->HdrSize ); printf("MinMem %04X par\n",Buf->MinMem ); printf("MaxMem %04X par\n",Buf->MaxMem ); printf("SS:SP %04X:%04X\n",Buf->ReloSS,Buf->ExeSP); printf("CheckSum %04X\n",Buf->ChkSum ); printf("CS:IP %04X:%04X\n",Buf->ReloCS,Buf->ExeIP); printf("Relocation table addr %04X\n",Buf->TablOff ); /* printf("Overlay No. %1X\n",Buf->Overlay); */ } /* 닱 [TECH Help!] �袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴� � 묅說も侁� 쭬．ギ˚� �젵쳽 EXE � 훤袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴袴暠 뫊ι. 꽞Þ� 뫌ㄵ逝º�� 賽賽賽 賽賽� 賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽� 旼컴컴컴� +0 2 �4Dh 5aH� "��ㄿⓤ�" �젵쳽 .EXE ('MZ') 쳐컴좔컴� +2 2 쿛artPag� ㄻÞ� ����キ�� ��笹ⅳ�ⅸ 飡�젺ⓩ� (�〓嶺� ª��黍說β碎) 쳐컴좔컴� +4 2 쿛ageCnt� ㄻÞ� �□젳� � 512-줎⒱��音 飡�젺ⓩ졾, ˚ヮ�좑 쭬．ギ¡� 쳐컴좔컴� +6 2 쿝eloCnt� 葉笹� 姉�Д�獸� � �젩エ璵 ��誓Д耀�⑨ 쳐컴좔컴� +8 2 쿓drSize� ㄻÞ� 쭬．ギ˚� � 16-줎⒱��音 캙�젫�졽졾 쳐컴좔컴� +0aH 2 쿘inMem � Ж�º僧 循ⅰ濕М� 캙э殊 쭬 ぎ�餘� �昔｀젹щ (캙�젫�졽�) 쳐컴좔컴� +0cH 2 쿘axMem � 쵟めº僧 循ⅰ濕М� 캙э殊 쭬 ぎ�餘� �昔｀젹щ (캙�젫�졽�) 쳐컴좔컴� +0eH 2 쿝eloSS � 醒，��狩�� 細ι���� 醒，���� 飡ⅹ� (ㄻ� 信�젺�˚� SS) 쳐컴좔컴� +10H 2 쿐xeSP � ㎛좂���� 誓（飡�� SP (丞젳졻�ワ 飡ⅹ�) �黍 쭬�信ぅ 쳐컴좔컴� +12H 2 쿎hkSum � ぎ�循�レ췅� 率К� (�循ⓩ졻�レ췅� 率К� ㏇ε 笹�� � �젵ゥ) 쳐컴좔컴� +14H 2 쿐xeIP � ㎛좂���� 誓（飡�� IP (丞젳졻�ワ ぎ쵟��) �黍 쭬�信ぅ 쳐컴좔컴� +16H 2 쿝eloCS � 醒，��狩�� 細ι���� ぎㄾ¡． 醒，���� (ㄻ� 信�젺�˚� CS) 쳐컴좔컴� +18H 2 쿟ablOff� 細ι���� � �젵ゥ 1-． 姉�Д��� ��誓Д耀�⑨ (�졹獸 001cH) 쳐컴좔컴� +1aH 2 쿚verlay� ��Д� �´奭ο (0 ㄻ� ＋젪��． Мㅳワ) 읕컴좔컴� 1cH �젳Д� 兒席졻ⓣ�쥯���� ��剡Ŀ 쭬．ギ˚� EXE 旼컴컴컴쩡컴컴컴� � � 쩡컴컴컴쩡컴컴컴� 뮔∥ⓩ� ��誓Д耀�⑨. 뜝�젷� + ? 4*? � 細ι. 醒，��秀  � 細ι. 醒，��秀 �� 細ι��⑧ [EXE+18H]. 닾ⅴ� 읕컴좔컴좔컴좔컴� � � 좔컴좔컴좔컴좔컴� [EXE+6] 4-줎⒱��音 姉�Д���. + ? ? �昔�信� ㄾ ｀젺ⓩ� 캙�젫�졽� + ? ? 췅�젷� �□젳� �昔｀젹щ 컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴 룼稅�レゃ EXE-�젵� М┘� 〓筍 쭬｀拾�� � ヮ‘� 醒，���, ㏇� 젩貰ヮ狩瑜 醒，���- �瑜 遜維え (FAR CALL, 쩆ゥえ� 丞젳졻�エ, 遜維え 殊캙 MOV AX,data_seg) ㄾウ�� 〓筍 �黍´ㄵ�� � 젮誓�젹 캙э殊, 貰�手β飡㏂迹º 쭬｀習ぅ. 뜥┘ �黍´ㄵ�� �젫�, ⓤ��レ㎯�щ� �昔｀젹М� 쭬｀習え DOS (押�ゆ⑨ 4bH ) �黍 쭬｀習ぅ �젵쳽 EXE: 1. 貰ℓ졻� PSP ��蓀ⅳ飡¡� 押�ゆĿ DOS 26H 2. �昔葉�졻� 1cH 줎⒱ �젵쳽 EXE (兒席졻ⓣ�쥯��莘 ��剡⑧ 쭬．ギ˚� EXE) � ギ첓レ�莘 �∥졹筍 캙э殊 3. ��誓ㄵエ筍 �젳Д� Мㅳワ = ( (PageCnt*512)-(HdrSize*16) ) - PartPag 4. ��誓ㄵエ筍 �젵ギ¡� 細ι���� 쭬｀拾젰М． Мㅳワ = (HdrSize * 16) 5. �濡�졻� 醒，��狩硫 젮誓�, START_SEG, ㄻ� 쭬｀習え (�〓嶺� PSP + 10H) 6. 淞ⓥ졻� Мㅳレ � �∥졹筍 캙э殊, 췅葉췅迹莘碎 � 젮誓�� START_SEG:0000 7. LSEEK (信�. 丞젳졻�レ �젵쳽) 췅 췅�젷� �젩エ劣 ��誓Д耀�⑨ (TablOff) 8. ㄻ� 첓┐�． 姉�Д��� ��誓Д耀�⑨ (ReloCnt): a. 淞ⓥ졻� 姉�Д�� 첓� ㄲ� 16-〃獸�音 笹�쥯 (I_OFF,I_SEG) b. �揖ⓤエ筍 RELO_SEG=(START_SEG+I_SEG) (젮誓� ��誓Д�젰М� 遜維え) c. �㎖ゥ傲 笹�¡ �� 젮誓率 RELO_SEG:I_OFF (�昔葉�졻� 收ゃ耀� ㎛좂����) d. �黍줎˘筍 START_SEG � 將�с 笹�㏂ (�誘�キⓥ� �黍�筌ゃ 醒，����) e. ��Д飡ⓥ� 誓㎯レ�졻 �□졻�� �� ⅲ� 젮誓率 (RELO_SEG:I_OFF) 9. 맆召誓ㄵエ筍 캙э筍 ㄻ� �昔｀젹щ 貰＋졹�� MaxMem � MinMem 10. 댂ⓩ쯄エ㎤昔쥯筍 誓（飡贍 � 쭬�信殊筍 �昔｀젹с: a. ES = DS = PSP b. AX = �循젲젰� ぎ薛ⅹ狩�飡� Ħ��殊十첓獸昔� ㄸ稅�� � ぎ쵟�ㄽ�� 飡昔ぅ c. SS = START_SEG+ReloSS, SP = ExeSP d. CS = START_SEG+ReloCS, IP = ExeIP (ぎ쵟�ㅻ: PUSH seg; PUSH offset; RETF) */ src/kernel/port.asm0100664000076500007650000000233305670566110014053 0ustar prool2prool2_TEXT segment byte public 'CODE' assume cs:_TEXT _inport proc near push bp mov bp,sp push dx mov dx,word ptr [bp+4] in ax,dx pop dx ; mov sp,bp pop bp ret _inport endp public _inport _inportb proc near push bp mov bp,sp push dx mov dx,word ptr [bp+4] in al,dx pop dx ; mov sp,bp pop bp ret _inportb endp public _inportb _outport proc near push bp mov bp,sp push dx mov dx,word ptr [bp+4] mov ax,word ptr [bp+6] out dx,ax pop dx ; mov sp,bp pop bp ret _outport endp public _outport _outportb proc near push bp mov bp,sp push dx mov dx,word ptr [bp+4] mov al,byte ptr [bp+6] out dx,al pop dx ; mov sp,bp pop bp ret _outportb endp public _outportb _TEXT ends end src/kernel/key.asm0100664000076500007650000002320605561422204013653 0ustar prool2prool2comment | 귣頌쳽� ⓤ若ㄽØ 誓쩆も��� ぎ쵟�ㄽ�� 飡昔え � ⓤ獸黍ⅸ ㄻ� 뤲乘Ø��. 룼ㄴ�逝Ð젰щ� き��え - ˙ⅱ�,¿�젪�,Home,End,뇿‘�(Backspace),BK(Enter): 첓� �〓嶺�; ⇔�齧,˛�� : ��誓Д耀��� �� ⓤ獸黍�; ESC : �葉飡첓 飡昔え � 信�젺�˚� � 췅�젷� ▲芯�� 丞젳졻�ワ ⓤ獸黍�; Ctrl-Left,Ctrl-Right,Ctrl-Backspace. 곥芯� ⓤ獸黍� ぎレ璵¡�.뜥첓え� ��-鈺音 �黍ぎギ� №�ㄵ �β�,-ㄾウ�� �젩��졻� 췅 曄� 膝�ㄽ�, � む�Д 獸． ▲ㅳ �昔´涉筍 췅 췅エ葉� ⇔ⅳ����� 飡昔え � ▲芯誓 ⓤ獸黍� � 飡젪ⓥ� ⅴ ��舒��,誠˘짛�, 貰�手β飡´���,´刷 ▲芯� (誓ㄺ� ㏇循η젷 - 獸オ� � XTREE PRO). 뤲�´黍筍 �� 蝨젷�刷, �� �②� � ��譽� �①ⅲ� 췅 碎�, � Borland C,¡�↓� �� ヮ∥�; 飡�ⓥ � Д�� Symantec C 6.0, 췅�ⓤ젷 쵟ゥ�履Ł 收飡Ø - �젩��젰�, � �昔∥�쵟 М┘� ¡㎛Ø�呻� � ⅳÞ飡´���� Д飡� - �黍 ぎ�ⓣ�쥯�Ŀ 飡昔え � �音�ㄽ莘: ES ㄾウ�� 〓筍 �吟�젪ゥ� ��젪Œ彛�. 믞젺笹ⓣ�쥯� TASM 3.2 c か蹟젹� "-Z -q -t -m -ml". FidoNet 2:461/61.99 닧�閃 C젳���� | ; Version 0.0.0.2 3-May-94 .model tiny,pascal .8086 jumps locals @@ HISDEPTH equ 10 MaxLen equ 81 .code db 0 strbuf db MaxLen dup (?) hisbuf db MaxLen * HISDEPTH dup (0) curr dw ? cursor dw ? depth dw 0 ; 收ゃ�좑 ＋嵩Þ� ▲芯�� ぎ쵟�� current dw offset hisbuf ; 收ゃ�좑 ぎ쵟�쩆 � ▲芯誓 HisHead dw offset hisbuf HisCur dw offset hisbuf global _doskey:proc _doskey PROC C USES di,si ARG string push ds es mov ax,40h mov es,ax mov bx,63h mov bx,es:[bx] cmp bx,03b4h jnz @@more mov vseg,0b000h @@more: mov ax,cs mov es,ax mov ds,ax mov ax,HisHead mov HisCur,ax mov curr,offset strbuf mov strbuf,0 xor bh,bh mov ah,3 int 10h mov cursor,dx ; newkey: xor ax,ax int 16h cmp ax,0e7fh ; Ctrl+BackSpace jz @@cbs cmp al,' ' jb @@ctrl ; 歲Б�� push ax cmp curr,offset strbuf+80 ; 췅 ��誓��キ���� ℡�ㄽ�� 飡昔え jae newkey push curr call StrLen inc cx mov si,curr add si,cx mov di,si inc di std inc cx rep movsb pop ax mov di,curr mov [di],al inc curr call FlushBuf jmp newkey @@ctrl: cmp al,8 ; backspace jz @@bs cmp al,01bh ; ESC jz @@esc cmp ah,04bh ; left jz @@left cmp ah,04dh ; right jz @@right cmp ah,053h ; Del jz @@del cmp ah,047h ; Home jz @@home cmp ah,04fh ; End jz @@end cmp al,0dh ; Enter jz @@enter cmp ah,048h ; Up jz @@up cmp ah,050h ; Down jz @@down cmp ah,073h ; Ctrl+left jz @@cleft cmp ah,074h ; Ctrl+right jz @@cright jmp newkey @@bs: cmp curr,offset strbuf jz newkey mov cx,curr push cx CALL StrLen inc cx mov si,curr mov di,si dec di cld rep movsb dec curr call FlushBuf jmp newkey @@del: mov ax,curr mov cx,offset strbuf sub ax,cx push cx CALL StrLen cmp ax,cx jae newkey mov cx,curr push cx CALL StrLen inc cx mov di,curr mov si,di inc si cld rep movsb call FlushBuf jmp newkey @@esc: mov strbuf,0 mov curr,offset strbuf mov ax,HisHead mov HisCur,ax CALL FlushBuf jmp newkey @@left: cmp curr,offset strbuf jz newkey dec curr CALL SetCur jmp newkey @@right:mov ax,curr mov cx,offset strbuf sub ax,cx push cx CALL StrLen cmp ax,cx jae newkey inc curr CALL SetCur jmp newkey @@home: mov curr,offset strbuf CALL SetCur jmp newkey @@end: mov bx,offset strbuf push bx CALL StrLen add bx,cx mov curr,bx CALL SetCur jmp newkey @@cleft: mov bx,1 std jmp @@word @@cright: xor bx,bx cld @@word: mov si,curr @@cl3: lodsb or al,bl jz newkey cmp byte ptr [si],0 jz @@cl1 cmp byte ptr [si],'1' jb @@cl3 @@cl2: lodsb cmp al,'1' jb @@cl4 cmp byte ptr [si],'1' jae @@cl2 @@cl1: add si,bx @@cl4: mov curr,si CALL SetCur jmp newkey @@up: CALL GetPrev jmp @@his @@down: CALL GetNext @@his: cmp byte ptr [bx],0 jz newkey mov HisCur,bx push bx push offset strbuf CALL StrCpy mov bx,offset strbuf push bx CALL StrLen add bx,cx mov curr,bx CALL SetCur CALL FlushBuf jmp newkey @@cbs: cmp curr,offset strbuf jz newkey std mov si,curr @@bs3: lodsb cmp byte ptr [si],0 jz @@bs1 cmp byte ptr [si],'1' jb @@bs3 @@bs2: lodsb cmp al,'1' jb @@bs4 cmp byte ptr [si],'1' jae @@bs2 @@bs1: inc si @@bs4: mov di,si mov si,curr mov curr,di mov cx,si sub cx,di inc cx cld rep movsb CALL SetCur CALL FlushBuf jmp newkey @@enter:CALL AddHistory mov ax,0e0dh xor bh,bh int 10h mov ax,0e0ah xor bh,bh int 10h mov ax,string push offset strbuf push ax CALL StrCpy ; !!! 췅ㄾ 譽�〓 ES 細�循�� ��젪Œ彛� ; � Д�� Borland C �β, 收飡ⓣ�쥯ギ刷 ; 췅 Symantec C 6.0 - ㏇� OK pop es ds ret _doskey ENDP FlushBuf PROC USES ax,si xor bh,bh mov dx,cursor mov ah,2 int 10h mov si,offset strbuf push si CALL StrLen push es db 0B8h ;mov ax,VideoSeg vseg dw 0b800h mov es,ax mov ax,cursor mov bx,ax mov al,ah mov ah,160 mul ah xor bh,bh shl bx,1 add bx,ax mov di,bx or cx,cx jz @@empty cld push cx @@out: lodsb stosb inc di loop @@out pop cx @@empty:neg cx add cx,79 cld @@blank:mov al,020h stosb inc di loop @@blank pop es CALL SetCur ret FlushBuf ENDP StrLen PROC USES ax,di ARG instring:word mov di,instring xor al,al cld mov cx,0ffffh repne scasb neg cx dec cx dec cx ret StrLen ENDP StrCpy PROC USES di,si,cx ARG str1,str2 mov si,str1 mov di,str2 push si CALL StrLen inc cx cld rep movsb ret StrCpy ENDP SetCur PROC USES ax,bx,dx mov ax,curr sub ax,offset strbuf mov dx,cursor add dl,al xor bh,bh mov ah,2 int 10h ret SetCur ENDP AddHistory PROC push offset strbuf push HisHead CALL StrCpy add HisHead,MaxLen cmp HisHead,offset curr jb @@ret mov HisHead,offset hisbuf @@ret: mov ax,HisHead mov HisCur,ax ret AddHistory ENDP GetPrev PROC ; bx - addr mov bx,HisCur cmp bx,offset hisbuf jnz @@nojmp mov bx, offset hisbuf + (HISDEPTH - 1) * MaxLen jmp @@ret @@nojmp:sub bx,MaxLen @@ret: ret GetPrev ENDP GetNext PROC ; bx - addr mov bx,HisCur cmp bx, offset hisbuf + (HISDEPTH - 1) * MaxLen jnz @@nojmp mov bx,offset hisbuf jmp @@ret @@nojmp:add bx,MaxLen @@ret: ret GetNext ENDP end src/kernel/ohb.asm0100664000076500007650000000165205706254306013643 0ustar prool2prool2; ohb locals _TEXT segment byte public 'CODE' assume cs:_TEXT ohb proc ; Procedure output hex byte Ver 0.1.1 6 Dec 93 via BIOS ; Input: AL - byte ; All regs. reserved ;) ; Not worked in graph mode. bl - bg color !!! push ax push cx push dx mov dl,al mov cl,4 shr al,cl call ohb1 mov al,dl and al,0fh call ohb1 pop dx pop cx pop ax ret ohb endp ohb1 proc ; Regs not saved !!! push ax cmp al,9 ja @@_1 ; al > 9 ; al <= 9 add al,'0' jmp @@_out @@_1: add al,'A'-10 @@_out: mov ah,0eh int 10h pop ax ret ohb1 endp public ohb _TEXT ends end src/kernel/out_os.c0100664000076500007650000002510706465711536014054 0ustar prool2prool2#include void out_os (int c) { switch(c) { /* Values for operating system indicator: */ case 0x00: printf("none "); break; /* 00h empty */ case 0x01: printf("FAT-12 "); break; /* 01h DOS 12-bit FAT */ case 0x02: printf("XENIX /"); break; /* 02h XENIX root file system */ case 0x03: printf("XENIX u"); break; /* 03h XENIX /usr file system (obsolete) */ case 0x04: printf("FAT-16 "); break; /* 04h DOS 16-bit FAT < 32M */ case 0x05: printf("EXTEND "); break; /* 05h DOS 3.3+ extended partition */ case 0x06: printf("LARGE "); break; /* 06h DOS 3.31+ Large File System (16-bit FAT >= 32M) */ case 0x07: printf("HPFS/NT"); break; /* 07h QNX */ /* 07h OS/2 HPFS */ /* 07h Windows NT NTFS */ /* 07h Advanced Unix */ case 0x08: printf("OS2 AIX"); break; /* 08h OS/2 (v1.0-1.3 only) */ /* 08h AIX bootable partition, SplitDrive */ /* 08h Commodore DOS */ /* 08h DELL partition spanning multiple drives */ case 0x09: printf("AIX "); break; /* 09h AIX data partition */ /* 09h Coherent filesystem */ case 0x0A: printf("OS2 Coh"); break; /* 0Ah OS/2 Boot Manager */ /* 0Ah OPUS */ /* 0Ah Coherent swap partition */ case 0x0B: printf("FAT-32 "); break; /* 0Bh Windows95 with 32-bit FAT */ case 0x0C: printf("FAT32LB"); break; /* 0Ch Windows95 with 32-bit FAT (using LBA-mode INT 13 extensions) */ case 0x0E: printf("VFATLBA"); break; /* 0Eh logical-block-addressable VFAT (same as 06h but using LBA-mode INT 13) */ case 0x0F: printf("EXTENDL"); break; /* 0Fh logical-block-addressable VFAT (same as 05h but using LBA-mode INT 13) */ case 0x10: printf("OPUS "); break; /* 10h OPUS */ case 0x11: printf("OS/2 "); break; /* 11h OS/2 Boot Manager, hidden DOS 12-bit FAT */ case 0x12: printf("Compaq "); break; /* 12h Compaq Diagnostics (config) partition */ case 0x14: printf("OS/2 "); break; /* 14h (resulted from using Novell DOS 7.0 FDISK to delete Linux Native part) */ /* 14h OS/2 Boot Manager hidden sub-32M 16-bit FAT partition */ case 0x16: printf("OS/2 "); break; /* 16h OS/2 Boot Manager hidden over-32M 16-bit FAT partition */ case 0x17: printf("OS/2 "); break; /* 17h OS/2 Boot Manager hidden HPFS partition */ case 0x18: printf("WinSwap"); break; /* 18h AST special Windows swap file ("Zero-Volt Suspend" partition) */ case 0x19: printf("Photon "); break; /* 19h Willowtech Photon coS */ case 0x1E: printf("Hiden95"); break; /* 1Eh Hidden FAT95 */ case 0x20: printf("Willow "); break; /* 20h Willowsoft Overture File System (OFS1) */ case 0x21: printf("reserv "); break; /* 21h officially listed as reserved */ case 0x23: printf("reserv "); break; /* 23h officially listed as reserved */ case 0x24: printf("NEC "); break; /* 24h NEC MS-DOS 3.x */ case 0x26: printf("reserv "); break; /* 26h officially listed as reserved */ case 0x31: printf("reserv "); break; /* 31h officially listed as reserved */ case 0x33: printf("reserv "); break; /* 33h officially listed as reserved */ case 0x34: printf("reserv "); break; /* 34h officially listed as reserved */ case 0x36: printf("reserv "); break; /* 36h officially listed as reserved */ case 0x38: printf("Theos "); break; /* 38h Theos */ case 0x3C: printf("PQMagic"); break; /* 3Ch PowerQuest PartitionMagic recovery partition */ case 0x40: printf("VENIX "); break; /* 40h VENIX 80286 */ case 0x41: printf("Linux "); break; /* 41h Linux, Personal RISC Boot */ case 0x42: printf("LinuxSw"); break; /* 42h SFS (Secure File System) by Peter Gutmann */ /* Linux swap (sharing disk with DRDOS) */ case 0x43: printf("Linux "); break; /* 43h Linux native (sharing disk with DRDOS) */ case 0x50: printf("OnTrack"); break; /* 50h OnTrack Disk Manager, read-only partition */ case 0x51: printf("NOVEL "); break; /* 51h OnTrack Disk Manager, read/write partition */ /* 51h NOVEL */ case 0x52: printf("CP/M "); break; /* 52h CP/M */ /* 52h Microport System V/386 */ case 0x53: printf("OnTrack"); break; /* 53h OnTrack Disk Manager */ case 0x54: printf("OnTrack"); break; /* 54h OnTrack Disk Manager (Dynamic Drive Overlay) */ case 0x55: printf("EZ "); break; /* 55h EZ-Drive */ case 0x56: printf("GoldenB"); break; /* 56h GoldenBow VFeature */ case 0x5C: printf("Priam "); break; /* 5Ch Priam EDisk */ case 0x61: printf("SpeedSt"); break; /* 61h SpeedStor */ case 0x63: printf("SysV386"); break; /* 63h Unix SysV/386, 386/ix (SCO, ISC UNIX, UnixWare, ...) */ /* 63h Mach, MtXinu BSD 4.3 on Mach */ /* 63h GNU HURD */ case 0x64: printf("Novell "); break; /* 64h Novell NetWare 286 */ case 0x65: printf("Novell "); break; /* 65h Novell NetWare (3.11) */ case 0x67: printf("Novell "); break; /* 67h Novell */ case 0x68: printf("Novell "); break; /* 68h Novell */ case 0x69: printf("Novell "); break; /* 69h Novell */ case 0x70: printf("DiskSec"); break; /* 70h DiskSecure Multi-Boot */ case 0x71: printf("reserv "); break; /* 71h officially listed as reserved */ case 0x73: printf("reserv "); break; /* 73h officially listed as reserved */ case 0x74: printf("reserv "); break; /* 74h officially listed as reserved */ case 0x75: printf("PC/IX "); break; /* 75h PC/IX */ case 0x76: printf("reserv "); break; /* 76h officially listed as reserved */ case 0x77: printf("QNX "); break; /* 77h QNX4.x */ case 0x78: printf("QNX "); break; /* 78h QNX4.x 2nd part */ case 0x79: printf("QNX "); break; /* 79h QNX4.x 3rd part */ case 0x80: printf("Minix "); break; /* 80h Minix v1.1 - 1.4a */ case 0x81: printf("Linux "); break; /* 81h Minix v1.4b+ */ /* 81h Linux */ /* 81h Mitac Advanced Disk Manager */ case 0x82: printf("Linux "); break; /* 82h Linux Swap partition */ /* 82h Prime */ case 0x83: printf("Linux "); break; /* 83h Linux native file system (ext2fs/xiafs) */ case 0x84: printf("OS/2 "); break; /* 84h OS/2-renumbered type 04h partition (related to hiding DOS C: drive) */ case 0x85: printf("LinuxEx"); break; /* 85h Linux extended partition */ case 0x86: printf("WinNT "); break; /* 86h NTFS, FAT16 volume/stripe set (Windows NT) */ case 0x87: printf("HPFS/NT"); break; /* 87h HPFS Fault-Tolerant mirrored partition */ /* 87h NTFS volume/stripe set */ case 0x93: printf("Amoeba "); break; /* 93h Amoeba file system */ case 0x94: printf("Amoeba "); break; /* 94h Amoeba bad block table */ case 0xA0: printf("Phoenix"); break; /* A0h Phoenix NoteBIOS Power Management "Save-to-Disk" partition */ /* IBM Thinkpad hibernation partition */ case 0xA1: printf("reserv "); break; /* A1h officially listed as reserved */ case 0xA3: printf("reserv "); break; /* A3h officially listed as reserved */ case 0xA4: printf("reserv "); break; /* A4h officially listed as reserved */ case 0xA5: printf("386BSD "); break; /* A5h Net,Free,Open,386BSD and BSD/OS */ case 0xA6: printf("reserv "); break; /* A6h officially listed as reserved */ case 0xA7: printf("NEXT "); break; /* A7h NEXTSTEP */ case 0xB1: printf("reserv "); break; /* B1h officially listed as reserved */ case 0xB3: printf("reserv "); break; /* B3h officially listed as reserved */ case 0xB4: printf("reserv "); break; /* B4h officially listed as reserved */ case 0xB6: printf("reserv "); break; /* B6h officially listed as reserved */ case 0xB7: printf("BSDI "); break; /* B7h BSDI file system (secondarily swap) */ case 0xB8: printf("BSDI "); break; /* B8h BSDI swap partition (secondarily file system) */ case 0xC0: printf("CTOS "); break; /* C0h CTOS */ case 0xC1: printf("DR DOS "); break; /* C1h DR DOS 6.0 LOGIN.EXE-secured 12-bit FAT partition */ case 0xC4: printf("DR DOS "); break; /* C4h DR DOS 6.0 LOGIN.EXE-secured 16-bit FAT partition < 32M */ case 0xC6: printf("DR DOS "); break; /* C6h DR DOS 6.0 LOGIN.EXE-secured Huge partition >= 32M */ /* C6h corrupted FAT16 volume/stripe set (Windows NT) */ case 0xC7: printf("Syrinx "); break; /* C7h Syrinx Boot */ /* C7h corrupted NTFS volume/stripe set */ case 0xD8: printf("CP/M-86"); break; /* D8h CP/M-86 */ case 0xDB: printf("CP/M "); break; /* DBh CP/M, Concurrent CP/M, Concurrent DOS */ /* DBh CTOS (Convergent Technologies OS -Unisys) */ case 0xE1: printf("SpeedSt"); break; /* E1h DOS access or SpeedStor 12-bit FAT extended partition */ case 0xE3: printf("DOS r/o"); break; /* E3h DOS read-only */ /* E3h SpeedStor, Storage Dimensions */ case 0xE4: printf("SpeedSt"); break; /* E4h SpeedStor 16-bit FAT extended partition < 1024 cyl */ case 0xE5: printf("reserv "); break; /* E5h officially listed as reserved */ case 0xE6: printf("reserv "); break; /* E6h officially listed as reserved */ case 0xF1: printf("Storage"); break; /* F1h SpeedStor, Storage Dimensions */ case 0xF2: printf("DOS sec"); break; /* F2h DOS 3.3+ secondary partition */ case 0xF3: printf("reserv "); break; /* F3h officially listed as reserved */ case 0xF4: printf("SpeedSt"); break; /* F4h SpeedStor large partition, Storage Dimensions */ case 0xF6: printf("reserv "); break; /* F6h officially listed as reserved */ case 0xFE: printf("LANstep"); break; /* FEh LANstep */ /* FEh IBM PS/2 IML */ /* SpeedStor > 1024 cyl. */ case 0xFF: printf("XENIX "); break; /* FFh Xenix bad block table */ default : printf("unkn %02X",c); } } src/kernel/readsec.asm0100664000076500007650000000253706144634160014501 0ustar prool2prool2_TEXT segment byte public 'CODE' assume cs:_TEXT _ReadPhysSec proc ; int ReadPhysSec (unsigned char drive, unsigned char sec, unsigned char head, ; unsigned char trk /* or cyl */, char *Buffer); ; /* ; 2 bytes are combined to a word similar to INT 13: ; ; �7�6�5�4�3�2�1�0� 1st byte (sector) ; � � 읕좔좔좔좔좔� Sector offset within cylinder ; 읕좔컴컴컴컴컴컴 High order bits of cylinder # ; ; �7�6�5�4�3�2�1�0� 2nd byte (cylinder) ; 읕좔좔좔좔좔좔컴컴 Low order bits of cylinder # ; */ ; ALL REGS SAVED push bp mov bp,sp push bx push cx push dx push ES push DS pop ES mov dl,byte ptr [bp+ 4] ; drive mov cl,byte ptr [bp+ 6] ; sec mov dh,byte ptr [bp+ 8] ; head mov ch,byte ptr [bp+10] ; trk mov bx,word ptr [bp+12] ; Buffer mov ax,0201h; Fn=02, Read 1 sector int 13h jc @@err xor ax,ax jmp @@ret @@err: ; mov ax,-1 @@ret: pop ES pop dx pop cx pop bx ; mov sp,bp pop bp ret _ReadPhysSec endp public _ReadPhysSec _TEXT ends end src/kernel/p2d.c0100664000076500007650000000361706400076232013215 0ustar prool2prool2#include #include #include "kernel.h" /****************************************************************************/ /* #define DEBUG */ /****************************************************************************/ char DirName [11]; /****************************************************************************/ int PathToDir(const char far *path, struct dirent far *Dir) { const char far *cc; const char far *point; int Counter, MsDos, i, len=2, NameLen, ExtLen, Up; #ifdef DEBUG printf(" P2D: path=`%s' ",path); #endif if (path==NULL) return -1; /* �昔´夕� path 췅 MSDOS 貰¸α殊М飡� */ /* 꽞� 貰¸α殊М飡� �呻� ㄾウ�� 貰ㄵ逝졻� �� ‘ゥ� �ㄽ�� 獸囹�, ㄾ 獸囹� ㄾウ�� 〓筍 �� ‘ゥ� 8 歲Б�ギ�, ��笹� 獸囹� - �� ‘ゥ� 3, �� ㄾ�信첓β碎 � º��� ‘レ鼇� 쳽�. ▲あ */ cc=path; Up=0; Counter=0; MsDos=1; if (strcmp(path,"..")==0) MsDos=2; /* 2 == ".." */ else { while(*cc) { if (*cc=='.') { point=cc; Counter++; } else { if (isupper(*cc)) Up=1; } cc++; } if (Up) MsDos=0; len=(int)(cc-path); if (MsDos) { if (Counter) {NameLen=(int)(point-path); ExtLen=(int)(len-NameLen-1);} else {NameLen=len; ExtLen=0;} if (Counter>1) {MsDos=0;} else if (NameLen>8) {MsDos=0;} else if (ExtLen>3) {MsDos=0;} } } /* 뤲��□젳�쥯��� º��� �젵쳽 � 쭬�ⓤ� � 첓�젷�％ */ if (Dir!=NULL) { for (i=0;i<11;i++) DirName[i]=' '; if (MsDos==1) { memcpy(DirName,path,NameLen); memcpy(DirName+8,point+1,ExtLen); for (i=0;i<11;i++) DirName[i]=toupper(DirName[i]); } else { memcpy(DirName,path,(len>11)?11:len); } #ifdef DEBUG printf(" DirName=`%s' ", DirName); #endif memcpy((*Dir).d_name,DirName,11); (*Dir).Attr.B.Attr1=!MsDos; } #ifdef DEBUG printf(" dir=`%Fs' ",(*Dir).d_name); #endif return MsDos; } src/kernel/printf.c0100664000076500007650000002467506217356004014045 0ustar prool2prool2#include #include #include #include "kernel.h" /****************************************************************************/ /* #define DEBUG */ /****************************************************************************/ int printf (const char far *format, ...) { va_list v; int counter; char new_printf_buf[MAX_LEN_STR]; /* Called functions: vsprintf(), Puts0() */ /* 댾��レ㎜쥯��� � 첓曄飡´ ▲芯�� 쵟遜Ð� printf_buf, �琉�ワ�М． �� malloc (細. � kernel.c) �留猶젰� ＋渽� (쭬˘�젺⑨). � ⓤ��レ㎜쥯��� � 첓曄飡´ ▲芯�� ギ첓レ��． 쵟遜Ð� new_printf_buf ＋渽�� �� �留猶젰�. 귗� �젩��젰�. */ va_start(v,0); counter=vsprintf(new_printf_buf,format,v); if(Puts0(new_printf_buf)==EOF) return EOF; return counter; } /****************************************************************************/ int vsprintf (char far *str, const char far *format, va_list v) { int i, counter=0, width, prec, Modifier, Type, FlagMinus, FlagPlus, FlagBlank, FlagDiez, FlagZero; char c, *cc, far *fcc; unsigned int segment; int len; char far *ss; long L; /* char Clipboard [MAX_LEN_STR]; */ char new_printf_buf[MAX_LEN_STR]; /* 細. �黍Д�젺�� � 췅�젷� �-與� printf */ while(*format) { if (*format!='%') { *str++=*format; counter++; } else {char s [] = "printf: Flag '%c' is not realized now :( "; /* ㏇循η�� 歲Б�� '%' */ /* % [FLAG] [WIDTH] [.PREC] [MODIFIER] TYPE */ /* TYPE: d signed dec int i " o unsigned oct int u unsigned dec int x unsigned hex int lowercase X " uppercase f float e float with Exponent g f or e E e G g c 1 char s string % % p pointer n char counter (?) FLAG: none right, 0 or blank - left + sign + or - blank sign - only # oct - 0 hex - 0x 0X WIDTH: n 0n 0 fill * next arg - width PREC: none .0 .n * - next arg MODIFIER: F far N near h short int l long int L long double */ /* �□젩졻猶젰� 氏젫� */ /* % [FLAG] [WIDTH] [.PREC] [MODIFIER] TYPE */ FlagMinus=0; FlagPlus=0; FlagBlank=0; FlagDiez=0; FlagZero=0; while(strchr("-+ #0",c=*++format)!=NULL) switch (c) { /* 쩆�췅� ĦŦ恂첓� 쭬�ⓤ� ˘쩆 "var=1; if (var)" ⓤ��レ㎯β碎 ㄻ� 獸．, 譽�〓 �� 〓ギ 貰�↓��⑨ ぎНŒ汀��� "variable not used". 룼笹� 獸．, 첓� �□젩�洙� 氏젫�� ▲ㄵ� 誓젷�㎜쥯췅, ĦŦ恂え� ����졻�贍 ▲ㅳ�, α收飡´���, 蝨젷��� */ case '-': FlagMinus=1; break; case '+': FlagPlus =1; if (FlagPlus ) printf(s,c); break; case ' ': FlagBlank=1; if (FlagBlank) printf(s,c); break; case '#': FlagDiez =1; if (FlagDiez ) printf(s,c); break; case '0': FlagZero =1; } if (c==0) break; /* 렊�젩졻猶젰� 鼇黍�� */ /* % [FLAG] [WIDTH] [.PREC] [MODIFIER] TYPE */ if (isdigit(*format)) {width=atoi(format);while(isdigit(c=*++format)); } else width=0; if (c==0) break; if (c=='.') { prec=atoi(format+1); while(isdigit(c=*++format)); if (c==0) break; } else prec=0; if (prec) printf("printf: prec is not realized now :( "); /* �□젩졻猶젰� modifier */ /* % [FLAG] [WIDTH] [.PREC] [MODIFIER] TYPE */ if (strchr("FNhlL",c=*format)!=NULL) {Modifier=c; format++; switch(Modifier) { case 'F': case 'N': case 'h': case 'l': break; case 'L': printf("printf: Modifier '%c' is invalid\n",Modifier); } } else Modifier=0; if (c==0) break; if (strchr("diouxXfeEgGcspn%",c=*format)==NULL) {Type=0; printf("printf: invalid type '%c'",c);} else { Type=c; /* �猶�� 졷ｃД��� */ switch(Type) { case '%': *str++='%'; counter++; break; case 'u': /* unsigned int */ case 'i': /* signed int */ case 'd': /* signed int */ if (Type=='u') if (Modifier=='l') L=va_arg(v,unsigned long); else L=va_arg(v,unsigned int); else if (Modifier=='l') L=va_arg(v,long); else L=va_arg(v,int); #ifdef DEBUG printf("printf: L=%08lX\n",L); #endif if (Type!='u') if (L<0) {*str++='-'; width--; L=-L;} if (Type=='u') if (Modifier=='l') ultoa(L,new_printf_buf,10); else ultoa(L,new_printf_buf,10); else if (Modifier=='l') ltoa(L,new_printf_buf,10); else itoa((int)L,new_printf_buf,10); #ifdef DEBUG printf("printf: new_printf_buf=%s\n",new_printf_buf); #endif len=(int)strlen(new_printf_buf); /* ��쩆˙畑� �ⅶ췅�좈�� �乘� */ if (L) { ss=new_printf_buf; if (*ss=='-')ss++; while(*ss=='0')*ss++=' '; fcc=ss; } else fcc="0"; goto l_s; case 'x': case 'X': if (Modifier=='l') { if (width==0) width=8; ltoa(va_arg(v,long),new_printf_buf,16); } else { if (width==0) width=4; itoa(va_arg(v,int),new_printf_buf,16); } if ((len=(int)strlen(new_printf_buf))>width) { fcc=new_printf_buf; fcc+=len-width; } else fcc=new_printf_buf; goto l_s; case 'p': if (width<5) {itoa(va_arg(v,int),new_printf_buf,10); strcpy(str,new_printf_buf); counter+=(i=(int)strlen(new_printf_buf)); str+=i;} else { itoa(va_arg(v,int),new_printf_buf,10); strcpy(str,new_printf_buf); counter+=(i=(int)strlen(new_printf_buf)); str+=i; *str++=':'; counter++; itoa(va_arg(v,int),new_printf_buf,10); strcpy(str,new_printf_buf); counter+=(i=(int)strlen(new_printf_buf)); str+=i; } break; case 'c': *str++=(char)va_arg(v,int); counter++; break; case 'o': if (Modifier=='l') {ltoa(va_arg(v,long),new_printf_buf,8);} else {itoa(va_arg(v,int),new_printf_buf,8);} fcc=new_printf_buf; goto l_s; case 's': #if 1 if (Modifier=='F') {fcc=va_arg(v, char far *); if (fcc==(char far *)NULL) fcc="(null)"; } else {cc=va_arg(v,char *); if (cc==(char *)NULL) fcc="(null)"; else { #ifdef BOOT /* compile printf for Boot Manager */ asm mov ax,DS; /* SS ? */ asm mov segment,ax; fcc = MK_FP (segment, cc); #else /* Compile printf for Proolix Kernel */ if (User) { asm mov ax,ProcessPar; asm mov segment,ax; fcc = MK_FP (segment, cc); } else { asm mov ax,DS; /* SS ? */ asm mov segment,ax; fcc = MK_FP (segment, cc); } #endif } } #else fcc=va_arg(v, char far *); if (fcc==(char far *)NULL) fcc="(null)"; #endif #ifdef DEBUG puts("printf: fcc="); puts(fcc); #endif l_s: i=(int)strlen(fcc); if (width>i) { if (FlagMinus) { strcpy(str,fcc); memset(str+i,' ',width-i); } else {int j;char c; if (Type=='s') c=' '; else if (FlagZero) c='0'; else c=' '; memset(str,c,j=width-i); strcpy(str+j,fcc); } str+=width; counter+=width; } else { strcpy(str,fcc); counter+=i; str+=i; } break; case 'f': case 'e': case 'E': case 'g': case 'G': case 'n': default: printf("printf: type '%c' not supported in this realisation", Type); } } } format++; } *str=0; return counter; } /****************************************************************************/ int sprintf(char far *str, const char far *format, ...) {va_list v; va_start(v,0); return vsprintf(str, format, v); } /****************************************************************************/ int vprintf(const char far *format, va_list v) { int counter; /* char str[MAX_LEN_STR]; */ char new_printf_buf[MAX_LEN_STR]; /* 細. �黍Д�젺�� � 췅�젷� �-與� printf */ va_start(v,0); counter=vsprintf(new_printf_buf,format,v); if(Puts0(new_printf_buf)==EOF)return EOF; return counter; } /****************************************************************************/ src/kernel/kbhit.asm0100664000076500007650000000052406302171064014161 0ustar prool2prool2; locals _TEXT segment byte public 'CODE' assume cs:_TEXT _kbhit0 proc near mov ah,1 int 16h jz @@no mov ax,1 jmp @@ret @@no: xor ax,ax @@ret: ret _kbhit0 endp public _kbhit0 _TEXT ends end src/kernel/macros.asm0100664000076500007650000000764606046773356014401 0ustar prool2prool2@GetChAtr MACRO page ; 걽⒱ 졻黍▲獸� 歲Б�쳽 -> AH ; 뤲ⅳ쥯黍收レ�� ㄾウ�� 〓筍 �㎖α收� ��Д� 收ゃ耀� 飡�젺ⓩ�. ; 뀭� 췅ㄾ ��Д飡ⓥ� � 캙�젹β� page. ; 룼 僧�ョ젺⑧ ��Д� 飡�젺ⓩ� - 0. ; 뫊. 쵟む�� @GetAtr IFNB mov bh,page ELSE sub bh,bh ENDIF mov ah,08h int 10h ENDM @GetChAtr @cls MACRO ; 귗� 誓（飡贍 貰魚젺��� push ax push bx push cx push dx push BP ; 뫌魚젺���� BP, ぎ獸贍� Д�畑恂� �ㄽº �� ; �留�¡� int 10h @GetChAtr mov bl,bh mov bh,ah sub cx,cx mov dx,184Fh mov ax,0600h int 10h mov bh,bl sub dx,dx mov ah,02h int 10h pop BP pop dx pop cx pop bx pop ax ENDM @cls ; 럞솀뱩럲릣걟뭶떆뜘� ��뒓럧럩�뛾� ; (C) Copyright Serge Pustovoitoff, 1995 ; FidoNet 2:461/35 ; E-mail prool@infocom.kharkov.ua ; BBS in Kharkov - phone 007 24h 5 lines ; 룼譽��硫 젮誓�: 310168, 븷閃ぎ�, �/� 2996. ; 궙 ㏇ε 쵟む�ぎ쵟�쩆� 쩆���� �졹殊 貰魚젺��� 誓（飡贍 (�젳僧ⅴ恂�, む�Д 收�, ; � ぎ獸贍� ��Д�젰恂� �音�ㄽ�� 誓㎯レ�졻), 뀘땲 � 뒑뙆뀓��릦윎 � ��뙉� ; ��뒓럧럩�뛾� 뛿 몜���뜋 닄럢. GetPage MACRO ; 뜮Д� 收�. 飡�젺ⓩ� -> BH ; 릣깉몤맀 뛿 몠븧�뛿뜘: AX, BH mov ah,0fh int 10h ENDM GetPage say macro str ; � ｀졽①αえ� 誓┬쵟� �� �젩��젰� push si lea si,str ; 곷ギ mov si,offset str call sayr_proc pop si endm say sayr macro str ; � ｀졽①αえ� 誓┬쵟� �� �젩��젰� push si lea si,str ; 곷ギ mov si,offset str call sayr_proc pop si endm sayr chr macro sym ; via BIOS ; Not worked in graph mode (bl - bg color!) push ax mov al,sym mov ah,0eh int 10h pop ax endm chr chr1 macro sym ; via BIOS ; Not worked in graph mode (bl - bg color!) push ax mov al,sym mov ah,0eh int 10h pop ax endm chr1 inkey macro ; 궋�� �ㄽ�． 歲Б�쳽 � か젪쯄栒贍 � �┬쩆���� ‥� 張� � 誓（飡� AL ; 끷エ AL=0 獸 � AH 쭬頌쳽β碎 �졹鼇誓��硫 ぎ� Þ좂� - � AH 쭬頌쳽β碎 ; 稅��-ぎ�. ; � �漱①�� �� inkey � inkey1 쩆��硫 쵟む�� 循ⅰ濕� 럡뜋뒓�뭾럠� �留�쥯 ; ㄻ� 誓젶與� 췅 ��몮닇뀓뜘� ASCII 뒎�굠삁. ; 궙 №�э �┬쩆�⑨ 誓젶與� 췅 CTRL-BREAK 뀘뮏, 誓젶與� 췅 CTRL-C �β. ; 궙 №�э �┬쩆�⑨ popup �昔｀젹쵟 TECH HELP �留猶젰恂�. ; 룑릳닋 誓（飡� AX mov ah,00h int 16h endm inkey inkey2 macro ; 궋�� �ㄽ�． 歲Б�쳽 � か젪쯄栒贍 � �┬쩆���� ‥� 張� � 誓（飡� AL ; 끷エ AL=0 獸 � AH 쭬頌쳽β碎 �졹鼇誓��硫 ぎ� Þ좂� - � AH 쭬頌쳽β碎 ; 稅��-ぎ�. ; � �漱①�� �� inkey � inkey1 쩆��硫 쵟む�� 循ⅰ濕� 럡뜋뒓�뭾럠� �留�쥯 ; ㄻ� 誓젶與� 췅 ��몮닇뀓뜘� ASCII 뒎�굠삁. ; 궙 №�э �┬쩆�⑨ 誓젶與� 췅 CTRL-BREAK 뀘뮏, 誓젶與� 췅 CTRL-C �β. ; 궙 №�э �┬쩆�⑨ popup �昔｀젹쵟 TECH HELP �留猶젰恂�. ; 룑릳닋 誓（飡� AX mov ah,00h int 16h endm inkey2 src/kernel/memmove.c0100664000076500007650000000101306114174550014165 0ustar prool2prool2#include #include #include "kernel.h" /****************************************************************************/ void far *memmove (void far *dest, const void far *src, size_t n) {char far *IBuf; /* if (dest==NULL) return NULL; */ /* if (src==NULL) return NULL; */ if((IBuf=malloc(n))==NULL) {puts("memmove: No mem"); return NULL;} memcpy(IBuf,src,n); memcpy(dest,IBuf,n); free(IBuf); return dest; } /****************************************************************************/ src/kernel/out_boot.c0100664000076500007650000000450206501350434014355 0ustar prool2prool2#include #include #include "kernel.h" #define DEBUG putch__(char c) { switch (c) { case 0: c=' '; break; default: if (c<' ') c='.'; } return putch(c); } void out_boot(void far *buf) {int i; unsigned long DiskSize; unsigned long TrueSectors; struct BootStru far *b; b=buf; printf("\n\ ----------------------------------Disk parameters:------------------------------\n\ Jump command %02X %02X %02X \n\ OEM name %-8s\n\ OEM name ", (*b).Jmp[0], (*b).Jmp[1], (*b).Jmp[2], (*b).OEM); for(i=0;i<8;) printf("%02X ",(*b).OEM[i++]); #if 0 printf("\n\ Sector size %4i bytes Cluster size %1i sect\n\ Reserved sectors (before 1st FAT) %2i FAT counter %1i\n\ Root directory entries %4i Total sectors %7u\n\ Media descr %02X FAT size %5i sect\n\ Track size %2i sec Heads %2i\n\ Hidden sectors %7li Big Number Of Sectors %7li\n\ Physical Drive No %02X Extended Boot Signature %02X\n\ Volume Serial No %04X-%04X -----------------------------------------------------\n", (*b).SectSiz, (*b).ClustSiz, (*b).ResSecs, (*b).FatCnt, (*b).RootSiz, (*b).TotSecs, (*b).Media, (*b).FatSize, (*b).TrkSecs, (*b).HeadCnt, (*b).HidnSec, (*b).BigSect, (*b).DriveNo, (*b).BootSign, (*b).SerialNo[1], (*b).SerialNo[0]); #endif #ifdef DEBUG printf(" W0 "); #endif printf("\nVolume Label (in boot) "); for(i=0;i<11;)putch__((*b).VolLbl[i++]); printf("\n "); for(i=0;i<11;)printf("%02X ",(*b).VolLbl[i++]); printf("\nFile system Id "); for(i=0;i<8;)putch__((*b).FileSysId[i++]); printf("\n "); for(i=0;i<8;)printf("%02X ",(*b).FileSysId[i++]); if ((*b).TotSecs==0) TrueSectors=(*b).BigSect; else TrueSectors=(*b).TotSecs; #ifdef DEBUG printf(" W1 "); #endif DiskSize=((long) (*b).SectSiz * TrueSectors)/1024l; #ifdef DEBUG printf(" W2 "); #endif if (DiskSize>5000) { #ifdef DEBUG printf(" W3 "); #endif DiskSize/=1024; #ifdef DEBUG printf(" W4 "); #endif printf("\nDisk size %li Mb\n",DiskSize); } else { printf("\nDisk size %li Kb\n",DiskSize); } } src/kernel/sh_1.c0100664000076500007650000000244706375554726013406 0ustar prool2prool2static void alloc(char * hexstr) {void far * ptr; long m; unsigned Bolvan; puts(""); m=htol(hexstr); if (m==0) {printf("Usage: alloc \n"); return; } Bolvan=ProcessPar; ProcessPar=0xFEDA; printf("Allocated %8lX bytes\n",m); ptr=malloc(m); if (ptr==NULL) puts("No memory"); else {printf("%4X:%4X\n",FP_SEG(ptr),FP_OFF(ptr));} ProcessPar=Bolvan; } /****************************************************************************/ static void kill_zombie(char * hexstr) {void far * ptr; int m; puts(""); m=htoi(hexstr); printf("%4X ",m); ptr=MK_FP(m,0); free(ptr); } /****************************************************************************/ static void open_(char *s) {int h; printf ("h=%2i errno=%2i ", h=open(s,O_RDONLY), errno); if (h!=-1) close(h); } /****************************************************************************/ #pragma warn-par static void stimer(int argc, char far *argv[]) { #ifdef TIME_STAMP int i; for(i=1;i<=argc;i++) { if (argv[i][0]=='-') switch (argv[i][1]) { case 'y': Int8on=1; break; case 'n': Int8on=0; clrscr(); break; default: puts("usage `stimer -y` or `stimer -n`"); } } #else puts("Timer not supported. Use `date` command"); #endif } #pragma warn+par src/kernel/stat.c0100664000076500007650000000240706314477600013507 0ustar prool2prool2#include #include #include #include #include "kernel.h" #ifdef notyet #error Preprocessor variable 'notyet' is not supported in Proolix #endif int fstat (int h, struct stat far *statbuf) { if (statbuf==NULL) {errno=EFAULT; return -1;} if ((h<0)||(h>OPEN_MAX)) {errno=EBADF; return -1;} if (!FCBS[h].Name[0]) {errno=EBADF; return -1;} (*statbuf).st_dev = 0; /* inode's device */ (*statbuf).st_ino = FCBS[h].BegClu; /* inode's number */ (*statbuf).st_mode = FCBS[h].Attr.U; /* inode protection mode */ (*statbuf).st_nlink = 1; /* number of hard links */ (*statbuf).st_uid = 0; /* user ID of the file's owner */ (*statbuf).st_gid = 0; /* group ID of the file's group */ (*statbuf).st_atime = 0; /* time of last access */ (*statbuf).st_mtime = 0; /* time of last data modification */ (*statbuf).st_ctime = 0; /* time of last file status change */ (*statbuf).st_size = FCBS[h].Size; /* file size, in bytes */ return 0; } int stat (char far *path, struct stat far *statbuf) {int i, h; if ((h=open(path,O_RDONLY))==-1) {errno=ENOENT; return -1;} i=fstat(h,statbuf); close(h); return i; } src/kernel/syscall.c0100664000076500007650000000363706667334660014225 0ustar prool2prool2/* 맓젷�쭬與� Д�젺�㎚� 歲飡�Л音 �留�¡� */ int ParLen, Alpha, Beta; int user_ax, user_ss, user_sp; void interrupt SysCall2() { /* � 將�� 押�ゆĿ imho ��レ㏆ ⓤ��レ㎜쥯筍 ギ첓レ�瑜 ��誓Д��瑜. (???) */ /* CS 醒⑴졹 丞젳猶젰� 췅 甸昔, � DS/SS/SP 췅 材�褻え� �昔璵遜, �留쥯�鼇� 쩆��硫 �留�� */ /* 뫌魚젺���� 貰飡�輾⑨ (誓（飡昔�) �昔璵遜�, �留쥯�蜈． system call */ /* ; push ax ; push bx ; push cx ; push dx ; push es ; push ds ; push si ; push di ; push bp ; mov bp,DGROUP ; mov ds,bp ; � ℓα� � DS 丞젳猶젰� 췅 甸昔 */ Mode=0; /* Mode kernel */ asm mov bp,sp asm mov user_ax,ax asm mov ax,SS asm mov user_ss,ax asm mov ax,BP; /* � BP ゥ┬� �拾��� ㄻ� 貰魚젺��⑨ 材�褻ぎ� SP */ asm mov user_sp,ax #if 0 /* 信�젺젪エ쥯�� 甸�惜瑜 SS/SP */ asm cli asm mov ax,50H asm mov SS,ax asm mov ax,0FFFEh asm mov SP,ax asm mov BP,SP asm sti #endif /* 뒶�ⓣ�쥯��� 캙�젹β昔� �� 飡ⅹ� � 飡ⅹ */ ParLen=SysTable[user_ax].ParNo*2; asm sub SP,ParLen; asm mov Alpha,SS; asm mov Beta,SP; memcpy(MK_FP(Alpha,Beta), MK_FP(user_ss,user_sp+26), ParLen); /* 귣㎜� 押�ゆĿ, 誓젷�㎯迹ⅸ 쩆��硫 歲飡�Л硫 �留�� */ (SysTable[user_ax].Entry)(); asm add SP,ParLen; asm mov Alpha,ax; asm mov Beta,dx; Mode=1; /* Mode user */ /* 룼ㄺ쳽ㅻ쥯�� � 飡ⅹ, ＄� 貰魚젺��� 誓（飡贍, ㎛좂����, ¡㎖�좈����� 歲飡�Л臾 �留�¡� � 誓（飡�졾 AX � DX */ *(int far*)MK_FP(user_ss,user_sp+16)=Alpha; *(int far*)MK_FP(user_ss,user_sp+10)=Beta; /* ¡遜�젺�˙���� 材�褻え� ss sp */ asm cli Global=user_ss; asm mov ax,Global asm mov SS,ax Global=user_sp; asm mov ax,Global; asm mov SP,ax asm sti } src/kernel/out_dev.c0100664000076500007650000000243406501346162014175 0ustar prool2prool2#include #include #include "kernel.h" void out_os (int c); void out_devices (void) {int i; printf("\nDev Head Sec Trk/cyl Partition"); printf("\n-------------------------------"); for (i=0;iMAX_LEN_STR) {printf("fgets: n>MAX_LEN_STR"); l_err:errno=EINVAL;return NULL;} for(i=0;i #include #include "kernel.h" void nulldev (void) { } /****************************************************************************/ void FDDstrategy (void) { } /****************************************************************************/ void HDDstrategy (void) { } src/kernel/tolower.c0100664000076500007650000000120006076520070014210 0ustar prool2prool2#include #include #include "kernel.h" /****************************************************************************/ int tolower (int ch) { if ((ch>='A')&&(ch<='Z'))return ch + 'a' - 'A'; else return ch; /* ^^^^^^^^^^^^^ portions (C) Borland Intl., 1988 */ } /****************************************************************************/ int toupper (int ch) { if ((ch>='a')&&(ch<='z'))return ch + 'A' - 'a'; else return ch; /* ^^^^^^^^^^^^^ portions (C) Borland Intl., 1988 */ } src/kernel/out_mbr.c0100664000076500007650000000221006501345254014170 0ustar prool2prool2#include #include "..\include\struct.h" void out_os (int c); void outMBR (char far * buf) { int i; struct MBRstru far * MBR; MBR = (void far * ) buf; printf(" System ----Begin--- ----End----- Preceding sec Total sec Size,Mb\n"); printf(" head sec cyl head sec cyl\n"); /* "A FAT 12 iiii ii iiii iiii ii iiii iiiiiiiiii iiiiiiiiii\n" */ for (i=0;i<4;i++) {unsigned int j; if (MBR->Partition[i].indicator==0) printf(" "); else printf("A"); printf(" "); out_os(MBR->Partition[i].system_indicator); printf("(%02X) ",MBR->Partition[i].system_indicator); printf(" %4i ",MBR->Partition[i].begin_head); printf("%2i ",(j=MBR->Partition[i].begin_sec) & 0x3F); j = (j & 0xC0)<<2; printf("%4i ",MBR->Partition[i].begin_cyl | j); printf("%4i ",MBR->Partition[i].end_head); printf("%2i ",(j=MBR->Partition[i].end_sec) & 0x3F); j = (j & 0xC0)<<2; printf("%4i ",MBR->Partition[i].end_cyl | j); printf("%10lu ",MBR->Partition[i].preceding_sec); printf("%10lu ",MBR->Partition[i].total_sec); printf("%4i\n",(MBR->Partition[i].total_sec)/2048); } } src/kernel/initv.asm0100664000076500007650000000334206100166644014216 0ustar prool2prool2_TEXT segment byte public 'CODE' assume cs:_TEXT _initv proc SET_INT MACRO int_no, routine push CS mov ax,offset routine push ax mov ax,int_no push ax call _setvect add sp,6 ENDM extrn _setvect:near extrn InterCept:near SET_INT 20h, InterCept ; general program termination SET_INT 21h, InterCept ; function request services SET_INT 22h, InterCept ; terminate address SET_INT 23h, InterCept ; control break termination address SET_INT 24h, InterCept ; critical error handler SET_INT 25h, InterCept ; absolute disk read SET_INT 26h, InterCept ; absolute disk write SET_INT 27h, InterCept ; terminate and stay resident SET_INT 28h, InterCept ; idle loop, issued by DOS when idle SET_INT 29h, InterCept ; fast TTY console I/O SET_INT 2Ah, InterCept ; critical section and NETBIOS SET_INT 2Bh, InterCept ; internal, simple IRET in DOS 2.0-5.0 SET_INT 2Ch, InterCept ; " SET_INT 2Dh, InterCept ; " SET_INT 2Eh, InterCept ; exec command from base level command interpreter SET_INT 2Fh, InterCept ; multiplexer SET_INT 31h, InterCept ; DOS Protected Mode Interface (for DOS extenders) SET_INT 32h, InterCept ; reserved SET_INT 33h, InterCept ; mouse support SET_INT 34h, InterCept ; Microsoft/Borland floating point emulation SET_INT 35h, InterCept ; " SET_INT 36h, InterCept ; " SET_INT 37h, InterCept ; " SET_INT 38h, InterCept ; " SET_INT 39h, InterCept ; " SET_INT 3Ah, InterCept ; " SET_INT 3Bh, InterCept ; " SET_INT 3Ch, InterCept ; " SET_INT 3Dh, InterCept ; " SET_INT 3Eh, InterCept ; " SET_INT 3Fh, InterCept ; overlay manager ret _initv endp public _initv _TEXT ends end src/kernel/vector.asm0100664000076500007650000000236305670565644014407 0ustar prool2prool2_TEXT segment byte public 'CODE' assume cs:_TEXT _getvect proc near push bp mov bp,sp push DS push bx push cx xor ax,ax mov DS,ax mov bx,word ptr [bp+4] ; interrupt no mov cl,2 shl bx,cl cli mov ax,[bx] mov dx,[bx+2] sti pop cx pop bx pop DS ; mov sp,bp pop bp ret _getvect endp public _getvect _setvect proc near push bp mov bp,sp push ax push bx push cx push DS xor ax,ax mov DS,ax mov bx,word ptr [bp+4] ; interrupt no mov cl,2 shl bx,cl cli mov ax,word ptr [bp+6] mov [bx],ax add bx,2 mov ax,word ptr [bp+8] mov [bx],ax sti pop DS pop cx pop bx pop ax ; mov sp,bp pop bp ret _setvect endp public _setvect _TEXT ends end src/kernel/getch0.asm0100664000076500007650000000042006302170150014220 0ustar prool2prool2_TEXT segment byte public 'CODE' assume cs:_TEXT _getch0 proc near ; push DS mov ah,00h int 16h ; xor ah,ah ; pop DS ret _getch0 endp public _getch0 _TEXT ends end src/kernel/gentbl.com0100664000076500007650000003134006761267574014356 0ustar prool2prool2뚇.���0�!�.�,롖ｉ+��+��+�.,��+����>�+떿뗗��&�=87u&딼��=u�練��+��Yu��+池�aC&8u����槌��+�戴꺝껁���+뚗+��>&0��s��>&0곀64r(>$0r"�刀G;�r�>&0t�>$0u�;�w뗾��뗟���+��+←++�렳퀺W�!_袋�롌뗧�3�.��욈3�64+蹶���3琬擁����+��+��3�6�+�6�+�6�+雍P�s.���[��3뗭퀽둊�!�맳�+���5�!��+��+�5�!��+��+�5�!��+��+�5�!��+��+�%뚇롖�6�!��%��+�!�%��+�!�%��+�!�%��+�!쳬�+塏�@��!첫맳�+.��僥��P�J�U뗭곸 VW;�r9&�+r琬'뜂�P몄,P� 椀'뜂 �P못,P� 甕'뜂8�P�-P퉬誤'뛈퍹툑-P툯��'�~}맸-P�IDD���~u"�.P�^�w��꺞 픲�놐���놐��.P�DD���퇢.P뜂�P� 꺞뎳豹 픲뜂�P퇥.P寥꺞�i퇮.P뜂 �P歪 꺞뎳亨 픲뜂 �P퇥.P婉꺞�@�^�w퇱.P뜂섮P�+'꺞퇮.P뜂섮P熬 꺞뎳�� 픲�`툀.P툀.P뛈퍹�랗混�꺞=��u藕툌P툎.P�랗混�꺞=��u鎔툀.P툀.P뛈퍹�랐混|꺞=��u��3��랍醯�P뜂�P拗꺞 픲��뒉患= t� 픱�= t伎=;t���놕�뜂飄P뜂X�P뜂뫘P툢.P뜂�P邕%꺞 �없�u뜂뫘P뜂飄P�Z꺞뜂飄P뜂X�P뜂飄P륭.P�랐混�꺞 =��u뜂 �P툂.P��꺞�V뜂범P맛.P�랗混�꺞=��u遇V�^�w맹.P뜂섮P歪%꺞꺘濯t0퇢.P뜂섮P�P꺞뎳曉 픱P�DD뜂뫘PV멉.P�/꺞��퇮.P뜂섮P� 꺞뎳曉 픲祐뜂뫘P툌PV뜂뫘P뜂8�P�랒混*꺞 =��u�Z�랒混� DD 픱뜂섮P� /P緩꺞뜂飄P뜂뫘P� 꺞 픱뜂飄P뜂뫘PV�/P鰲꺞�뜂뫘PV�2/P��꺞F�U��랍混g DD 픱뜂�P� /P�u꺞�랐混K DD 픱뜂 �P� /P�Y꺞�랗混/ DD 픱뜂섮P� /P�=꺞�.P�,DD�^�w퇖/P뜂섮P��$꺞뜂섮P퇣/P�꺞퇮.P뜂섮P�꺞뎳�� 픲熔3��c�놎��"떿GP�`/P�랗混꺞=��u�>;�t �놎�꺘憔~�;�u퇱/P�랗混�꺞=��u��퇵/P�랗混�꺞=��u芸;�|��랗混a DD 픱뜂섮P� /P�o꺞�^�w퇺/P뜂섮P頑#꺞뜂섮P퇣/P�K꺞퇮.P뜂섮P�?꺞뎳�� 픲뜂섮P퇥.P�%꺞���|/P�|/P뛈퍹�랗混B꺞=��u�r�~/P�랗混,꺞=��t_3��n�놎��떿GP툒/P�랗混꺞=��t;;�t �놎�꺘憔 ~�;�u퇱/P�랗混�꺞=��t�'툎/P�랗混�꺞=��u뜂섮P툂.P��꺞��9;�}����랗混M DD 픱뜂섮P� /P�[꺞N떾P툜/P�M꺞3픐�DDD_^뗥]홛뗭V땦 �|껥Xv푐�6�/뒆�/삏� 偸껥#w鉞�/��떾ｋ+����^]�홛뗭� �(0洛�쀠3�(0�(0 픲��0� 0�"0�v�a�Y]�.��.�����+��2�&�@뚂뉁뱥6�+꺠��>�+r��+뗿�2쟌��v��껋���%��뗽+�r`뗧뙽롔뚍렳QI懲2윌롙뉟뉄떸뗊C�wr@�w�< t< t< u�2잼� 픱B� 픲C녱2쟬�촇,"t"<\u�<"u촇 稚�D�Y�.����+C�뗵뗭+�r�뗥�.�+�뎧꺟6� 잚�t�3핃F.�&���+Q�GY뗹 픱$��+3琢懲뗹�6�+�)꺞뗗＿+ 픲愚�3윽���?꺝池&8u��홛뗭�>(0 u��딣�(0洛뎴�3�(03잼]홛뗭VW�~딢�"4;�u�"4�땥�"4뎩�"4덬_^]홛뗭VW�~딣)�5�딣@��|� 4;�u�6 4�뗿~뎦떾�_^]홛뗭V딣3�%��곣RP樂YY뗱껥�u3잼� 4덬딣@��6 4� 4�^]홛뗭V딣3�%��곣RP雍YY뗱껥�u3잼�6$4�6 4딣@�떾�^]홛뗭VW�~ �t���v3잼Z떿 %��뗹�>$4uW���Y�B�6"4떾 픱1�뗖꺜(;혇 WV��YY�$�;�rV玩�Y�떾�땤;6"4u�W��Y�_^]홛뗭딣뗓곴;혉ｕ+3잼 ��+����]홛뗭딣딽�+꺬뗁겵꺬 �u ;�s��+� ��+����]홛뗭�v���Y�]홛뗭딣셊P縕�뗥�]홛뗭껋VW땦3��F��F�뗞F�뉶�颱�t�v3픐�Q�뗱떾 �}떾傭V�RY� ��v�v澮2�뗱떾 �}떾���p먉F�W�v��YY뗱떾 �|Y3픐V�]YY덯���t!곋 颱�t딣�%� P�PV�7꺞� 颱tV堯��~�t颱�t�P�P�v� 꺞 �|颱t��3핆�곣�� 혢寺�뎴l2떾�_^뗥]홛뗭V�딳泰u �泰u�딽깎"N 졍=�!r뗱딣%�� �뗞洛뎴l2떾�P�랓�^]홛뗭껋VW�^�7떾덯��^�G@t떾��^� � 뗟G�? u�F�떾N 픲�딣��_^뗥]�U뗭V땦V搖 Y 픱����L�~ u�<~ V����)FV갺_��딡덬 �v �v�v둈쁏��꺞껡�u =��u����3잼^]홛뗭껋V땦V�� Y 픱�������5둈쁏瘟Y뎈�덯��<~딽�딣�RPV��솇�뗃XZ+�卵딽�딣繪^뗥]홝W��,1�딡%=uV�- Y꺠떿O 픲�_^홛뗭V땦�Dt宛��t딡덬 P둈쁏�k꺞� �~ 갺��3잼#��<u딡%� 덬� �갟����^]�U뗭V땦�V�Y�^]홛뗭껋V땦� |�D �\ 둋��宇�|�Dt 갟���榕갟��|tV�O� 픱���耀戮���>�2u8�,1;�u1둈쁏蛙Y 픲갺�燻P�Dt��3픐3픐V穩꺞猷�Dt緩��P뛈�P둈쁏�1꺞=t&둈쁏��Y=t갟� 딡%� 덬�����~� u�D@t쳛d��둊���^뗥]첩,1P��Y�홛뗭퀱둊�^딳 딽�!r �~u떷��P玩蓄]홛뗭�D�^�!떷%�]홛뗭VW�~ 땦딡;�u �~���v���謠�>�2u�<1;�u��2��>�2u �,1;�u��2�<t�P3픐PV��꺞�Dt�t�&Y갺���D떾덬덬 �~t? �v;�0c�~uW臥�Y덯 픱갟�����딣덬 덬�|�~u갟3잼_^]홛뗭VW땦���딡;�t떿�f�|t �<} V�}Y 픱떿�N�Dt�t��Y�|| 둈쁏�6Y뗹�D�D�힑��| t3픐�t �#P��Y�D 떿�_^]홛뗭V땦 �|껥| �P�M請뗞洛�뇄2��V�Y�^]홛뗭V땦�>뗞�!r 洛�뇄2��3잼P�請^]홝W��|1��DtV��Y꺠Ou�_^홝W��,1��DtV��YO꺠 �u�_^홛뗭껋VW딣@=r �^洛�뇄2t3잰��v�v�v��꺞덯�딣�@=r �^洛�뇄2�t딣繪f릩N�땦뗿뗞確<t-< tも請荀S�P뛈�P�v�>꺞[�둊��;�u�뺣 S�P槌픐Q�v梡꺞�^洛걦l2[떿+취_^뗥]홛뗭�?�^딳딽�!r�P��姪]홛뗭곸�VW딣@=s3잰��^洛�뇄2�t�v�v�v嵬꺞愚�^洛겎l2��딣뎳|�딣뎳x�뜺~��m�럛�떈|���|��늽{�< u� F뒉{��F뜂~�뗕+�괋�|>뜂~�뗿+�W뜂~�P�v�{꺞뎳v�;�t꺘v�s���� 딣+냮�냬�+헝O뜺~�꺘x�t���뜂~�뗿+�떿 픳.W뜂~�P�v�-꺞뎳v�;�t꺘v�s���� 딣냬�+헝딣�_^뗥]홛뗭�^洛�뇄2t�P3픐P�v�a뗥�@�^딳딽�!rP�^洛걦l2X�P誤衆]홛뗭V3픐�v鰲YY뗱껥�u떾��Ft邰u3잼 ��+����^]홛뗭�^洛겎l2�塤B둊 �^딳딽�!r�P�C�숇]홛뗭껋"VW�~ �^껢$wX��rS딣 딳 �}�~t �-G槌堆꺳뛵砂�+菱�묟��F� 宜+菱��F 픲�뛐邪�俱N�, s:�Fも銓�딣 �_^뗥]� U뗭�~ u딣숇딣3�RP�v�v�P캻P�\��]홛뗭�v�v�v�v �P캻P�@��]홛뗭�v�v�v�v �~ u��3픐캻P���]홛뗭V땦 �u�(4�툥2PV�}YY� P떾P딣3�RP���꺞툩2PV�\YY떾�^]�U뗭V땦V�>&4�u���&4�&4P���뗱3픐V�A�YY=��u�떾�^]홛뗭퀮딽�!r3잼P窪町]홛뗭VW��~뗖2윽��池뛳��~���池慟+�뉥邰t짪駱澄s쨱쯤_^]홛뗭VW��~2윽��池떶討H�_^]홛뗭VW뚕렳�3핆��~뗸2윽��池慟뗿땦且둈��]�+취_^]홛뗭VW��~뗸2윽��池慟�~懲딣�_^]홛뗭VW�~땦딳駱宖쩾쨱F�_^]홛뗭퀰둊딳딽�!r묐P豌鏑]첬�2�벴2�맭@��!�'맳�2�@�!��U뗭껋�^洛�뇄2t��R맱D�^�!rA癡�u8�B3�3魯!r1RP�B3�3魯!덯�뎈�ZYr�B�!r;V�r w;F�r�� 3잼P�H鏑뗥]홛뗭VW땦딡;�t����f�<|-�Du 딡 뗕꺜;혋�딡 뗕꺜;혋딡덬 3잼4�|�Y뗹VW�<1P�%�;�t�����<1P� P� �YY= t����� �_^]��&�3U뗭딽�삔2�듔漏瘻듔"테챽쫘頑챽�"테る]�U뗭곸�VW�F�힓첧�F��AW���2쟌�慟I_횊G�N�~+SQR뛈�+�뛈촒W�v�V 픲�F�힓첧~쮰~�ZY[���~쵇푞�떮j�땦� 픱<%t�G�N�炡��凝�|돳v��<%t�돻j�3�뎻t�뎻h�닅s��냣����냦�����2�뗊뗗�� ��`sG뒣�2떸=v�$뗗洛.�㎺Z ����@����Q � �!�!�!�!,6郵��w�깕h�����w�깕h�����w��푩�+t닑s��|�깺h�森�r�깕h� ��h���wD�냜�u!깕h���Q����~�긃��s 뎳n���7���u�뎳p��톱)���s撻���,0���w�뇛n� �|綠�뗊邏邏�냣�熉���u쪍냦� �|닌�뗊邏邏�냦�盂�깕h��右�걥h�깺h�顫瑢�깺h��걥h���褥��� � � �녜泯냩��냢�닑l��~�3陋� �냢�닑l��~�섻G뎧�냜�t�GG�~띃y� 픲3 �u/꺘p�u-떮j�땸n��껠�t땰h�%t�0�� 듏鈺欠鹹芸깕h�RPW듖쁏뒉m�PS�딑떀p� ���!닑l�뎧띃x��^�7CC�^�냜� t�7CC�^� 珝:��揮�냢�깺h��뜋x�+�눹떀p�;�뗋榕뎧닑l��~�긃띃y�2���禑뎧닑l��~�냜� u �=긃 �� �=긃뙽 �u왯2翫�;럓�v땸p���뎧닑l��~땸p� �}�WQ뜛y�SR�#냜�P땰h���t ��F���t ��F� ��F��P�)�딣�F띃y��냜�t떀n� �~�R�&�=-uI+�~돃t�뒉s� 픱&�=-t꺇t�깣t�O&��$�뗸떮j�떈n��#냜�=u뒭l���ou꺘t��냪�����xt��Xu깕h�@KK꺇t�}�냪�럗��냜�u �� 翫�K;�擢냜�@t �0瓦�뒉l�甕�떀t� �~'+�+�&�<-t< t<+u&ц섩IK눳��0�랚戌눳�+�&쵆G�N���顥� �~ 뗅� �k顥鹹��뎧�~�냜� u �=긃��=긃퇠*F�F�&��v�떢v�떮j��%�,衡 픲��~첧}�&��~�t�����딣⑤_^뗥]�U뗭VW땦�>"4t�"4��"4뎩뎦�|�"4덬� �6"4뎥뎥_^]홛뗭껋VW땦�~�� 4;�u�> 4� ��덯��^��V�쏁Y_^뗥]홝�$4; 4u�6$4�-�Y3웰 4�$4�;� 4땧�u"V�g�Y;6$4u 3웰 4�$4�딡� 4V擾�Y� �6 4夭�Y�6 4^홛뗭껋VW땦� ��덯��|�u;6$4t��^��뗸�V��Y�^��u �v�V�*�YY_^뗥]홛뗭V땦 �u�떾��뗱;6 4u�<��V���Y^]홛뗭VW3��~�떾�G껥 t.�N~)�^�|�^�G �_ 둋��뗱� �v雍�Y뗱떾=��u�껥�u ;~u3잼��^�Gt3잼딣�_^]홛뗭맴P�v�v뛈P�哈]홛뗭껋*VW�F��F��릩~ �F� t�=긃 횏=긃 ��땦 � 픱]<%t\삒�F��v�VY �|% �x2�폫3u+� �x�풰3u�F��v�VY �鳶��vS�VYY�N潘�;�t��vP�VYY�N槃w�t�F���힓�쵖뎧 � �|H뒡R32�떸=v�=뗗洛.�㎘$�$�$�$�$�$�$�&%%%%/%�%�$�$�$ %Z&�&%*%�%% %�I���N�瑜껓0�~� �|쎑 坡F肆��N����N����N��~��f浬�w��N� �p�딣�+能F�tO�b��� � ����颱 u�N�뛈�P뛈�P딣�%�P떾P�v�v�v�`꺞�~�~�F�u�F陌뉮ヶF�t뮟�뾂|�m�V��k�vP�VYY�N�갽����zR<:t �~ �vP�VYY�N�Z뚘���Z[ �~RS�vP�VYY�N�[Z�F�u���F�뮟�F� t벇�#�|澐芋뛈�P뛈�P��#F�P�v�v�v�o꺞 �~�~8�F�t�*먫旗�F棉F�t�� �F�t��3픐W�>꺞甬翕9涌翕3|쒒�����F�u�랝�F�갽��t)�F�u��F��v�VY �~ 픵 ��풰3�~�N���vP�VYY�N蟠F�u�ら[曦F�u�7�땦� �}�t�F��v�VY�F�u� �|N念F�u�F驀 興�+전�~仙嵯��f鯉<^u�N�Т듢뗹�刀�"杆�k席<t&<]t%<-u�:w��<]t寞*혊�契흤�k筬�u請旅�뎧 갽��땦辭F�u�묥N|P�F��v�VY �|O뼀檳倒�"開�꼓�뼋t�F�t��F�t �F�u칭陸�vP�VYY�N�F;v�} �F�u�F莫らJ�F;v�} �F�u���F��v���P�VYY�~��^�딣驀��F��v�VY �~ 픵 ��풰3뱓�Y꺛��t�Y肉+拈�N�|ERQ�F��v�VYYZ �~5��|1딂��0r*�� r��r ��r �� r��s�� 樂樂樂樂濾�+���tY꺛��Y�_�_^뗥]��&�3�&�3�&�3S��0r#�� v��*w�����'�� v :�s꺞扁�[哈餉U뗭껋VW힓��F��F��+0�F��v�VY �|f삌稚�u�u���N |[<+t<-u�F��N |K�F��v�VY �|6+�뗿딳 �N껠$w/��r*<0ul��ue�N |3�F��v�VY #include #include "kernel.h" int Int13perror(unsigned err); /****************************************************************************/ /* #define DEBUG */ /* 뜢�▼�ㄸМ ��ㅳ쵟筍 � 獸�, 譽� 淞ⓥ猶졻� � ㄸ稅�� М┃� �� ��醒も�惜�, */ /* � 璵ルЖ ㄾ昔┴젹�. 앪� ▲ㄵ� 〓飡誓�. */ /****************************************************************************/ extern unsigned char NearBuffer [SECTOR_SIZE]; /* defined in c0.asm */ /****************************************************************************/ int secread (int drive, unsigned long AbsSec, char *Buffer) {/* Read absolute sectors Input: drive (for int 13h Fn=2) abs sec number buffer Output: return!=0 if error */ int Track, SecNoOnCyl, i; char Head, SecOnTrk; Track=(int)(AbsSec/SectorsOnCyl); /*SectorsOnCyl=HeadCnt*TrkSecs,Track==Cyl */ SecNoOnCyl=(int)(AbsSec%SectorsOnCyl); Head=SecNoOnCyl/TrkSecs; SecOnTrk=SecNoOnCyl%TrkSecs+1; /* 2 bytes are combined to a word similar to INT 13: �7�6�5�4�3�2�1�0� 1st byte (sector) � � 읕좔좔좔좔좔� Sector offset within cylinder 읕좔컴컴컴컴컴컴 High order bits of cylinder # �7�6�5�4�3�2�1�0� 2nd byte (cylinder) 읕좔좔좔좔좔좔컴컴 Low order bits of cylinder # */ if ((i=Track &0x0300)!=0) { SecOnTrk = (SecOnTrk & 0x3F) | (int)(i>>2); } return ReadPhysSec(drive, SecOnTrk, Head, Track, Buffer); } /****************************************************************************/ int absread (int drive, int nsects, unsigned long lsect, void far *FarBuffer) { int i, j, k; unsigned err; #ifdef DEBUG printf("absread: lsect=%lu ",lsect); #endif for (i=0;i=MaxSectors) { printf("absread: lsect >=MaxSectors. lsect=%lu ",lsect); printf("MaxSectors=%lu\n",MaxSectors); return -1; } while(1) { #ifdef DEBUG /* 앪� �昔´夕� 췅 ����誓醒曄��� 젮誓貰� ｀젺ⓩ� 64�. 댂좂� 譽����/ 쭬�ⓤ� 氏���� ＋蹟ⓥ (DMA overload) */ /* 쓵럲 럮뀗�뭿� H� 뱚닇�뮏 !!! 뤲� 蝨エ���Ŀ ぎ쩆 甸�� ��汀� 췅飡承ⓥ ��誓醒曄��� ｀젺ⓩ� � ��汀� 췅ㄾ ▲ㄵ� NearBuffer ゃ쩆-獸 ��誓Д�졻� */ /* printf("absread: NearBuffer = %lX ",(long)NearBuffer); */ #endif err=1; for (j=0;j>=8; printf("absread: error %2X in sec %li: ",err,lsect); Int13perror(err); printf(" Ignore (i), retry (r) or abort (a) ? "); j=getchar(); puts(""); if (j=='r') continue; else if (j=='a') return -1; else /* ignore */ break; } else break; } #if 1 for (k=0;k #include #include "kernel.h" /****************************************************************************/ int bootread (int Dev, void far *Buf) {int i, err; char InternalBuffer [SECTOR_SIZE]; for (i=0; i #include #include "kernel.h" /****************************************************************************/ char *Int13error [] = { "\000No errors", "\001Bad controller command", "\002Bad adress mark", "\003Write protect", "\004Sector ID bad or not found", "\005Reset controller error (AT)", "\010DMA fault", "\011DMA overload (over 64K frontiere)", "\013Bad track flag (AT)", "\020CRC error", "\021ECC error fixed (AT)", "\040Controller fault", "\100Seek error, track not found", "\200Timeout", "\273Undefined error (AT)", "\377Sense error (AT)" }; /****************************************************************************/ int Int13perror(unsigned err) {int i; for (i=0;;i++) { if (Int13error[i][0]==err) return printf(Int13error[i]+1); if (Int13error[i][0]==(char)0xff) break; } return printf("Illegal error code"); } /****************************************************************************/ src/kernel/int5dump.asm0100664000076500007650000000372506046774776014663 0ustar prool2prool2; INT 5 - Register dump _TEXT segment byte public 'CODE' assume cs:_TEXT sayr macro str ; � ｀졽①αえ� 誓┬쵟� �� �젩��젰� push si lea si,str ; 곷ギ mov si,offset str call sayr_proc pop si endm sayr chr1 macro sym ; via BIOS ; Not worked in graph mode (bl - bg color!) ; NO SAVE REG mov al,sym mov ah,0eh int 10h endm chr1 extrn sayr_proc:near extrn ohw:near _Int5dump proc push ax push DS chr1 'c' chr1 's' chr1 '=' ; mov ax,SS:[bp+4] push CS pop ax call ohw chr1 ' ' chr1 'd' chr1 's' chr1 '=' mov ax,DS call ohw push CS pop DS sayr s_bx mov ax,bx call ohw sayr s_cx mov ax,cx call ohw sayr s_dx mov ax,dx call ohw sayr s_si mov ax,si call ohw sayr s_di mov ax,di call ohw sayr s_ss mov ax,SS call ohw sayr s_sp mov ax,SP call ohw sayr s_es mov ax,ES call ohw sayr s_bp mov ax,[bp+4] call ohw pop DS pop ax IRET ;s0 db 13,10,"CS:IP=",0 s_ax db ' ax=',0 s_bx db ' bx=',0 s_cx db ' cx=',0 s_dx db ' dx=',0 s_si db ' si=',0 s_di db ' di=',0 s_ss db ' SS=',0 s_sp db ' SP=',0 s_ds db ' DS=',0 s_es db ' ES=',0 s_bp db ' BP=',0 _Int5dump endp public _Int5dump _TEXT ends end src/kernel/intercep.asm0100664000076500007650000000165005670566464014715 0ustar prool2prool2 include macros.asm _TEXT segment byte public 'CODE' assume cs:_TEXT extrn sayr_proc:near extrn ohw:near extrn _saycsip:near InterCept proc mov CS:@@BP,bp mov bp,sp push ax push bx push DS push ES push CS ; pop DS ; sayr @@s1 push bx push ES push ax mov bx,SS:[BP] mov ES,SS:[BP+2] sub bx,2 mov ax,ES:[bx] call ohw pop ax pop ES pop bx call _saycsip pop ES pop DS pop bx pop ax mov BP,CS:@@BP iret @@BP dw 0 @@s1 db 13,10,'Int command= ',0 InterCept endp public InterCept _TEXT ends end src/kernel/process.c0100664000076500007650000001402306645411644014212 0ustar prool2prool2/* "뤲�璵遜 ��蜈�" �.�.꺇胥좂ⅱ ****************************************************************************/ #define DEBUG_PROCESS /****************************************************************************/ extern char sh_str_orig []; jmp_buf the_return; #define F_COM 0 #define F_EXE 1 #define F_ERR 2 #define I_OFF Twix[0] #define I_SEG Twix[1] /****************************************************************************/ jmp_buf jmpb; unsigned int Twix[2]; /****************************************************************************/ int execve (char far *name, char far *_argv[], char far *far *env) { char Sec1 [SECTOR_SIZE]; char FirstSec [SECTOR_SIZE]; int i, h, argc, nenv, restos, segment, offset_s; long int FileLen, l; unsigned int len; size_t SizeMemoryBlock; char far *cc, huge *mem, huge *mem0=0, far *ptr, far *adr, far *EnvAdr; int status, n_sec; struct exe_header *H; unsigned int exe_begin, RELO_SEG; if ((h=open(name,O_RDONLY))==-1) { return 1; } if ((FileLen=filelength(h))<4) { R4: close(h); return 2; } /*** 쀢���� ��舒�． 醒も��� � �昔´夕� 췅 歲－졻侁� DEAD/DEAF ***/ restos = (SECTOR_SIZE>FileLen) ? (int)FileLen : SECTOR_SIZE; if (read(h,Sec1,restos) != restos) {close(h); return 3; } if (Sec1[0]==0xDE) { switch (Sec1[1]) { case 0xAD: status=F_COM; break; case 0xAF: status=F_EXE; /* ViewEXE((void *)Sec1); */ break; default : status=F_ERR; } } else status=F_ERR; if (status==F_ERR) goto R4; if (status==F_COM) SizeMemoryBlock= ComMemory<<4; /*((ComMemory -1U)<<4)+1;*/ if (status==F_EXE) { /* F_EXE */ H=(void *)Sec1; SizeMemoryBlock=((long)(H->PageCnt)+1L)*SECTOR_SIZE+ (long)(H->MinMem/*-H->HdrSize*/)*16; /* printf("exe mem size=%li\n",SizeMemoryBlock); */ } if ( (void far *)(mem0=calloc(SizeMemoryBlock,1)) == NULL ) { printf("execve: No memory. (Required %l bytes)\n",SizeMemoryBlock); return 5; } mem=mem0+0x100; if (status==F_EXE) { exe_begin=FP_SEG(mem0)+0x10; /* printf("exe_begin=%04X\n",exe_begin); */ /* printf("mem0=%08lX\n",mem0); */ /* printf("mem=%08lX\n",mem); */ } /* 룯誓쭬�ⓤ� ＋�줎レ�音 ��誓Д��音 stdin, stdout � stderr � PSP (細. ��ⓤ젺�� 將ⓨ ��誓�. � stdio.h � command/c1.asm */ *(FILE far * far *)(mem0+0x0A)=stdin; *(FILE far * far *)(mem0+0x0E)=stdout; *(FILE far * far *)(mem0+0x12)=stderr; if (status==F_COM) { memcpy((void far *)mem,Sec1,restos); mem+=restos; n_sec=(int)(FileLen/SECTOR_SIZE ); } if (status==F_EXE) { n_sec=(H->PageCnt/2)+1-(H->HdrSize/(SECTOR_SIZE/16))+1; /* printf("n_sec=%i\n",n_sec); */ } /* 쀢���� �飡젷彛音 醒も�昔� */ /* F_COM, F_EXE */ for (l=1;lSECTOR_SIZE) { restos=(int)(FileLen % SECTOR_SIZE); read(h,(void far *)mem,restos); } #if 1 if (status==F_EXE) { /* 뜝飡昔ø� ��誓Д�젰щ� 젮誓貰� � exe-Мㅳゥ */ if (lseek(h,H->TablOff,SEEK_SET)==-1L) {free((void far *)mem0);close(h);return 5;} for (i=0;iReloCnt;i++) { if (read(h,(void *)Twix,4)!=4) {free((void far *)mem0);close(h);return 6;} /* printf("relocation %04X:%04X\n",I_SEG,I_OFF); */ RELO_SEG=exe_begin+I_SEG; *(unsigned int far *)MK_FP(RELO_SEG,I_OFF) = *(unsigned int far *)MK_FP(RELO_SEG,I_OFF)+exe_begin; /* putch('@'); */ } } #endif close (h); puts(""); if (status==F_COM) { /* 룯誓��� 캙�젹β昔� argc, argv � env ˛呻閃 ��レ㎜쥯收レ稅�． �昔璵遜� */ len=0; for (argc=0;_argv[argc]!=NULL;argc++) len+=(int)(strlen(_argv[argc])+1); len+=(2+2+2*(argc)); /* 2 - ㄻÞ� 캙�젹β�� argc (int - 2 줎⒱�) 2 - ㄻÞ� 캙�젹β�� argv (near ptr - 2 줎⒱�) 2 * argc - ㄻÞ� 캙�젹β�� char *argv[] len - 率К� ㄻÞ 飡昔�-졷ｃД�獸� */ nenv=0; while(env[nenv]!=NULL) {len+=(int)(strlen(env[nenv++])+1);} len+=(2+2*(nenv+1)); if (len & 1) len++; /* ㄵ쳽�� len 曄狩臾 */ ptr=(char far *)mem0+(unsigned int) 0xfffe-len; segment=FP_SEG(ptr); /*** 룧�젹β贍 押�ゆĿ main ***/ /*** argc ***/ *(int far *)ptr=argc; ptr+=2; /*** argv ***/ *(int far *)ptr=FP_OFF(ptr+4); ptr+=2; /*** env ***/ EnvAdr=ptr; ptr+=2; /* 룯誓쭬�ⓤ� argv � ��レ㎜쥯收レ稅Ł �昔璵遜 */ offset_s=FP_OFF(ptr)+(argc)*2; for (i=0;iReloCS; jmpb[0].j_ip=H->ExeIP; jmpb[0].j_sp=H->ExeSP; jmpb[0].j_ss=exe_begin+H->ReloSS; jmpb[0].j_flag=_FLAGS; jmpb[0].j_bp=0; jmpb[0].j_di=0; jmpb[0].j_es=FP_SEG(mem0); jmpb[0].j_si=0; jmpb[0].j_ds=FP_SEG(mem0); jmpb[0].j_ax=0; jmpb[0].j_bx=0; jmpb[0].j_cx=0; jmpb[0].j_dx=0; #ifdef DEBUG_PROCESS printf("Ll"); #endif longjmp(jmpb,0); } asm LL label near; /* 룼笹� �音�쩆 쭬む猶젰� �洙贍瞬� �젵ル */ for (i=3;i #include #include "kernel.h" /****************************************************************************/ /* #define DEBUG */ char InternalBuffer [SECTOR_SIZE]; /****************************************************************************/ int ReadPhysSec2 (unsigned char drive, unsigned char sec, unsigned char head, unsigned char trk /* or cyl */, void far *Buf) {int i, err; #ifdef DEBUG printf("\nReadPhysSec2. drive=%i. sec=%i. head=%i. trk=%i.\n",drive,sec,head, trk); #endif for (i=0; i #ifndef _DIRENT_H_ #define _DIRENT_H_ #ifndef _ATTRFIELD_ #define _ATTRFIELD_ struct AttrField { unsigned int ReadOnly : 1; unsigned int Hidden : 1; unsigned int System : 1; unsigned int Label : 1; unsigned int Dir : 1; unsigned int Archive : 1; unsigned int Attr2 : 1; unsigned int Attr1 : 1; }; union FileAttr { struct AttrField B; unsigned char U; }; #endif #ifndef _FTIME_ #define _FTIME_ struct ftime { unsigned ft_tsec : 5; /* Two second interval */ unsigned ft_min : 6; /* Minutes */ unsigned ft_hour : 5; /* Hours */ unsigned ft_day : 5; /* Days */ unsigned ft_month : 4; /* Months */ unsigned ft_year : 7; /* Year */ }; #endif #define d_ino d_fileno /* backward compatibility */ #define DIR FILE struct dirent { char d_name [11]; union FileAttr Attr; char Reserv [10]; struct ftime FileDateTime; unsigned int d_fileno; /* initial cluster number in MSDOS/Proolix file systems */ unsigned long int Size; }; DIR far *opendir (const char far *dirname); #ifdef KERNEL DIR far *openwdir (const char far *dirname); #endif DIR far *openidir (int inode); struct dirent far *readdir (const DIR far *dirp); #ifdef KERNEL int writedir (const DIR far *dirp, struct dirent far *D); #endif void rewinddir (const DIR far *dirp); int closedir (const DIR far *dirp); long telldir (const DIR far *dirp); long seekdir (const DIR far *dirp, long offset, int where); int dircmp (struct dirent d1, struct dirent d2); #endif /* !_DIRENT_H_ */ src/include/dos.h0100664000076500007650000001123606501340666013470 0ustar prool2prool2/* dos.h Defines structs, unions, macros, and functions for dealing with MSDOS and the Intel iAPX86 microprocessor family. Copyright (c) Serge Pustovoitoff 1993-1997 */ #if !defined(__TIME_DATE_) #define __TIME_DATE_ struct time { unsigned char ti_min; /* Minutes */ unsigned char ti_hour; /* Hours */ unsigned char ti_hund; /* Hundredths of seconds */ unsigned char ti_sec; /* Seconds */ }; struct date { int da_year; /* Year - 1980 */ char da_day; /* Day of the month */ char da_mon; /* Month (1 = Jan) */ }; #endif #if !defined(__DOS_DEF_) #define __DOS_DEF_ /* Variables */ extern int errno; extern char ** environ; extern char * sys_errlist[]; /* prool */ #define FAT12 0 #define FAT16 1 #define NO_FAT 2 #define FA_RDONLY 0x01 /* Read only attribute */ #define FA_HIDDEN 0x02 /* Hidden file */ #define FA_SYSTEM 0x04 /* System file */ #define FA_LABEL 0x08 /* Volume label */ #define FA_DIREC 0x10 /* Directory */ #define FA_ARCH 0x20 /* Archive */ #define FA_ATTR2 0x40 /* Proolix Attr No.2 */ #define FA_ATTR1 0x80 /* Proolix Attr No.1 - Proolix file */ struct WORDREGS { unsigned int ax, bx, cx, dx, si, di, cflag, flags; }; struct BYTEREGS { unsigned char al, ah, bl, bh, cl, ch, dl, dh; }; union REGS { struct WORDREGS x; struct BYTEREGS h; }; struct SREGS { unsigned int es; unsigned int cs; unsigned int ss; unsigned int ds; }; struct REGPACK { unsigned r_ax, r_bx, r_cx, r_dx; unsigned r_bp, r_si, r_di, r_ds, r_es, r_flags; }; #define FP_OFF(fp) ((unsigned)(fp)) #define FP_SEG(fp) ((unsigned)((unsigned long)(fp) >> 16)) #define MK_FP(seg,ofs) ((void far *) \ (((unsigned long)(seg) << 16) | (unsigned)(ofs))) int absread (int drive, int nsects, unsigned long lsect, void far *buffer); /* prool */ int abswrite(int drive, int nsects, unsigned long lsect, void far *buffer); /* prool */ long dostounix (struct date *d, struct time *t); void getdate (struct date far *datep); /* prool */ void gettime (struct time far *timep); /* prool */ void interrupt (* getvect(int interruptno)) (); /* void far * getvect (int VecNo); */ int inport (int portid); unsigned char inportb(int portid); int int86 (int intno, union REGS far *inregs, union REGS far *outregs); /* prool */ int int86x (int intno, union REGS *inregs, union REGS *outregs, struct SREGS *segregs); void intr (int intno, struct REGPACK *preg); void outport (int portid, int value); void outportb(int portid, unsigned char value); int peek (unsigned segment, unsigned offset); char peekb (unsigned segment, unsigned offset); void poke (unsigned segment, unsigned offset, int value); void pokeb (unsigned segment, unsigned offset, char value); void setdate (struct date *datep); void settime (struct time *timep); void setvect (int interruptno, void interrupt (*isr) ()); /* These are in-line functions. These prototypes just clean up some syntax checks and code generation. */ void __cli__ (void); void __sti__ (void); unsigned char __inportb__(int portid); void __outportb__ (int portid, unsigned char value); void __int__ (int interruptnum); #define disable() __cli__() /* Clear interrupt flag */ #define enable() __sti__() /* Set interrupt flag */ #define inportb(portid) __inportb__(portid) /* Byte IN instruction */ #define outportb(portid, v) __outportb__(portid,v)/* Byte OUT instruction */ #define geninterrupt(i) __int__(i) /* Interrupt instruction */ /* some other compilers use inp, outp for inportb, outportb */ #define inp(portid) inportb(portid) #define outp(portid,v) outportb(portid,v) #if !__STDC__ #define poke(a,b,c) (*((int far*)MK_FP((a),(b))) = (int)(c)) #define pokeb(a,b,c) (*((char far*)MK_FP((a),(b))) = (char)(c)) #define peek(a,b) (*((int far*)MK_FP((a),(b)))) #define peekb(a,b) (*((char far*)MK_FP((a),(b)))) #endif #endif src/include/dir.h0100664000076500007650000000166506312073262013461 0ustar prool2prool2/* dir.h Defines structures, macros, and functions for dealing with directories and pathnames. Copyright (c) Serge Pustovoitoff 1995-1997 */ #include #if !defined(__DIR_DEF_) #define __DIR_DEF_ struct ffblk { char ff_reserved[21]; char ff_attrib; unsigned ff_ftime; unsigned ff_fdate; long ff_fsize; char ff_name[13]; }; #define WILDCARDS 0x01 #define EXTENSION 0x02 #define FILENAME 0x04 #define DIRECTORY 0x08 #define DRIVE 0x10 int chdir (const char far *path); /* prool */ int getcurdir (int drive, char *directory); char far* getcwd (char far *buf, int buflen); int mkdir (const char far *path, mode_t mode);/*prool*/ int rmdir (const char far *path); /* prool */ #endif src/include/errno.h0100664000076500007650000000711506312072344014024 0ustar prool2prool2/* errno.h Defines the system error variable errno and the error numbers set by system calls. Copyright (c) Serge Pustovoitoff 1993-1997 */ /* Dos Error Codes */ #define EZERO 0 /* Error 0 - no error */ #define EINVFNC 1 /* Invalid function number */ #define ENOFILE 2 /* File not found */ #define ENOPATH 3 /* Path not found */ #define ECONTR 7 /* Memory blocks destroyed */ #define EINVMEM 9 /* Invalid memory block address */ #define EINVENV 10 /* Invalid environment */ #define EINVFMT 11 /* Invalid format */ #define EINVACC 12 /* Invalid access code */ #define EINVDAT 13 /* Invalid data */ #define EINVDRV 15 /* Invalid drive specified */ #define ECURDIR 16 /* Attempt to remove CurDir */ #define ENOTSAM 17 /* Not same device */ #define ENMFILE 18 /* No more files */ #define ENOENT 2 /* No such file or directory */ #define EMFILE 4 /* Too many open files */ #define EACCES 5 /* Permission denied */ #define EBADF 6 /* Bad file number */ #define ENOMEM 8 /* Not enough core */ #define ENODEV 15 /* No such device */ #define EINVAL 19 /* Invalid argument */ #define E2BIG 20 /* Arg list too long */ #define ENOEXEC 21 /* Exec format error */ #define EXDEV 22 /* Cross-device link */ #define EDOM 33 /* Math argument */ #define ERANGE 34 /* Result too large */ #define EEXIST 35 /* File already exists */ #define EFAULT 36 /* Unknown error, I/O error, Proolix error */ #define EPERM 37 /* UNIX and Proolix error */ #define ESRCH 38 /* UNIX and Proolix error */ #define EINTR 39 /* UNIX and Proolix error */ #define EIO 40 /* UNIX and Proolix error */ #define ENXIO 41 /* UNIX and Proolix error */ #define ECHILD 42 /* UNIX and Proolix error */ #define EAGAIN 43 /* UNIX and Proolix error */ #define ENOTBLK 44 /* UNIX and Proolix error */ #define EBUSY 45 /* UNIX and Proolix error */ #define ENOTDIR 46 /* UNIX and Proolix error */ #define EISDIR 47 /* UNIX and Proolix error */ #define ENFILE 48 /* UNIX and Proolix error */ #define ENOTTY 49 /* UNIX and Proolix error */ #define ETXTBSY 50 /* UNIX and Proolix error */ #define EFBIG 51 /* UNIX and Proolix error */ #define ENOSPC 52 /* UNIX and Proolix error */ #define ESPIPE 53 /* UNIX and Proolix error */ #define EROFS 54 /* UNIX and Proolix error */ #define EMLINK 55 /* UNIX and Proolix error */ #define EPIPE 56 /* UNIX and Proolix error */ #define EUCLEAN 57 /* UNIX and Proolix error */ #define _sys_nerr 57 /* highest defined system error number */ extern int errno; src/include/fcntl.h0100664000076500007650000000232606312321004013772 0ustar prool2prool2/* fcntl.h Define flag values accessible to open. Copyright (c) Serge Pustovoitoff 1993-1997 Portions Copyright (c) 1983, 1990 The Regents of the University of California. All rights reserved. */ #ifndef _FCNTL_H_ #define _FCNTL_H_ /* DOS Fn=3C Directory Attribute Flags �7�6�5�4�3�2�1�0� Directory Attribute Flags � � � � � � � 읕컴 1 = read only � � � � � � 읕컴� 1 = hidden � � � � � 읕컴컴 1 = system � � � � 읕컴컴� 1 = volume label (exclusive) � � � 읕컴컴컴 1 = subdirectory � � 읕컴컴컴� 1 = archive 읕좔컴컴컴컴 unused */ #define O_RDONLY 1 #define O_WRONLY 2 #define O_RDWR 4 #define O_CREAT 0x0100 /* create and open file */ #define O_TRUNC 0x0200 /* open with truncation */ #define O_EXCL 0x0400 /* exclusive open */ #define O_APPEND 0x0800 /* to end of file */ /* MSDOS special bits */ #define O_TEXT 0x4000 /* CR-LF translation */ #define O_BINARY 0x8000 /* no translation */ /* Proolix special flag */ #define O_FREOPEN 8 #endif /* !_FCNTL_H_ */ src/include/io.h0100664000076500007650000000472406312074650013313 0ustar prool2prool2/* io.h Definitions for low level I/O functions. Copyright (c) Serge Pustovoitoff 1994-1997 */ #ifndef _IO_H #define _IO_H 1 #ifndef _MODE_T /* prool */ #define _MODE_T typedef unsigned int mode_t; #endif #ifndef _FTIME_ #define _FTIME_ struct ftime { unsigned ft_tsec : 5; /* Two second interval */ unsigned ft_min : 6; /* Minutes */ unsigned ft_hour : 5; /* Hours */ unsigned ft_day : 5; /* Days */ unsigned ft_month : 4; /* Months */ unsigned ft_year : 7; /* Year */ }; #endif #define SEEK_CUR 1 #define SEEK_END 2 #define SEEK_SET 0 int access (const char far *path, int amode); /* prool */ int _chmod (const char far *path, int func, ... /* int attr */); /* prool */ int chmod (const char far *path, int amode); /* prool */ int chsize (int handle, long size); int _close (int handle); int close (int handle); int _creat (const char far *path, mode_t attribute); /* prool */ int creat (const char far *path, mode_t amode); /* prool */ int dup (int handle); int dup2 (int oldhandle, int newhandle); int eof (int handle); long filelength(int handle); int getftime (int handle, struct ftime far *ftimep); /* prool */ int ioctl (int handle, unsigned long func, ...); /* prool */ /* optional 3rd and 4th args are: void FAR * argdx, int argcx */ /* prool */ int isatty (int handle); long lseek (int handle, long offset, int fromwhere); int _open (const char far *path, int oflags); /* prool */ int open (const char far *path, int access,...); /* prool */ long int _read (int handle, void far *buf, unsigned long len);/*prool*/ long int read (int handle, void far *buf, unsigned long len);/*prool*/ int setftime (int handle, struct ftime far *ftimep); /* prool */ int setmode (int handle, int amode); long tell (int handle); unsigned umask (unsigned cmask); int unlink (const char far *path); int unlock (int handle, long offset, long length); long int _write(int handle, void far *buf, unsigned long len);/*prool*/ long int write(int handle, void far *buf, unsigned long len);/*prool*/ /* macros for compatibility with earlier versions & other compilers. */ #define sopen(path,access,shflag,mode) open (path, (access)|(shflag), mode) #endif /* _IO_H */ src/include/kbd.h0100664000076500007650000000167606123030516013440 0ustar prool2prool2/* kbd.h BIOS keyboard status Copyright (c) Serge Pustovoitoff 1999 */ #ifndef KBD_H #define KBD_H /* From [PC Help] BIOS keyboard flags (located in BIOSDataArea 40:17) �7�6�5�4�3�2�1�0� � � � � � � � 읕컴� right shift key depressed � � � � � � 읕컴컴 left shift key depressed � � � � � 읕컴컴� CTRL key depressed � � � � 읕컴컴컴 ALT key depressed � � � 읕컴컴컴� scroll-lock is active � � 읕컴컴컴컴 num-lock is active � 읕컴컴컴컴� caps-lock is active 읕컴컴컴컴컴 insert is active */ #define R_SHIFT 1 #define RIGHT_SHIFT 1 #define L_SHIFT 2 #define LEFT_SHIFT 2 #define CTRL 4 #define CONTROL 4 #define ALT 8 #define SCROLL_LOCK 0x10 #define NUM_LOCK 0x20 #define CAPS_LOCK 0x40 #define INS 0x80 #define INSERT 0x80 #endif src/include/limits.h0100664000076500007650000000541706605256630014212 0ustar prool2prool2/* limits.h Defines implementation specific limits on type values. Copyright (c) Serge Pustovoitoff 1993-1998 */ #ifndef LIMITS_H #define LIMITS_H here /* 뒶エ曄飡´��瑜 �｀젺①��⑨ � 뤲乘Ø醒. � 稅�―졾 - Ж�º젷彛�� ㎛좂���� 貰＋졹�� 飡젺쩆設� POSIX */ #define ARG_MAX 4096 /* (4096) 쵟め. ㄻÞ� 召ⓤ첓 졷ｃД�獸� � 蓀ⅳ� */ #define MAX_ENV 20 /* 쵟めº젷彛�� 葉笹� ��誓Д��音 � 蓀ⅳ� */ #define CHAR_BIT 8 /* (8) 쵟め 葉笹� 〃� � 쩆��音 殊캙 char */ /* 쵟めº젷彛�� � Ж�º젷彛�� ㎛좂 쩆��音 殊캙 char */ #if (((int)((char)0x80)) < 0) #define CHAR_MAX 0x7F #define CHAR_MIN 0x80 #else #define CHAR_MAX 0xFFU #define CHAR_MIN 0x00 #endif #define CHILD_MAX 6 /* (6) 쵟め 葉笹� �ㄽ�№ 率� �昔璵遜�� � �ㄸ췅� euid */ #define CLK_TCK 18 /* (10) 葉笹� 殊ぎ� � 醒ゃ�ㄵ */ /* On TurboC 2.0 #define CLK_TCK 18.2 */ #define INT_MAX 0x7FFF /* ( 32767) */ #define INT_MIN ((int)0x8000) /* (-32767) */ #define LINK_MAX 8 /* (8) 쵟め 葉笹� 聲筌ⅸ �젵쳽 */ #define LONG_MAX 0x7FFFFFFFL /* ( 2147483647) */ #define LONG_MIN ((long)0x80000000L) /* (-2147483647) */ #define MAX_CANON 255 /* (255) 쵟め 葉笹� 줎⒱ � 첓���① �曄誓ㄸ 收席Þ젷� */ #define MAX_INPUT 255 /* (255) */ #define MB_CUR_MAX 2 /* (MB_LEN_MAX) */ #define MB_LEN_MAX 2 /* (1) */ #define NAME_MAX 14 /* (14) 쵟め 葉笹� 줎⒱ � º��� �젵쳽, �� 淞ⓥ좑 쭬´殲좐耀． NUL */ #define NGROUPS_MAX 1 /* (0) */ #ifndef OPEN_MAX #define OPEN_MAX 16 /* (16) 쵟め 葉笹� �ㄽ�№ �洙贍瞬� �젵ギ� */ #endif #ifndef TMP_MAX #define TMP_MAX 25 /* (25) */ #endif #define PATH_MAX 255 /* (255) 쵟め ㄻÞ� �呻� */ #define PIPE_BUF 512 /* (512) */ #define SCHAR_MAX 0x7F /* 쵟め ㎛좂 쩆��音 殊캙 signed char */ #define SCHAR_MIN -128 /* Ж�. ㎛좂 쩆��音 殊캙 signed char */ #define SHRT_MAX 0x7FFF /* 쵟め ㎛좂 쩆��音 殊캙 short */ #define SHRT_MIN ((int)0x8000) /* Ж�. ㎛좂 쩆��音 殊캙 short */ #define UCHAR_MAX 0xFFU /* 쵟め ㎛좂 쩆��音 殊캙 unsigned char */ #define UINT_MAX 0xFFFFU /* ( 65535) */ #define ULONG_MAX 0xFFFFFFFFUL /* (4294967295) */ #define USHRT_MAX 0xFFFFU /* (65535) */ #define PROC_MAX 10 /* 쵟めº젷彛�� 葉笹� �昔璵遜�� */ /* 뙫� 貰■手���瑜 �｀젺①��⑨: */ /* 뤲乘� - �｀젺①���硫 曄ギ´� ;) */ /* 쵟めº젷彛좑 ㄻÞ� 飡昔え */ #define MAX_LEN_STR 256 #define PassLen 80 #define MAX_ARG 40 #define SECTOR_SIZE 512 #define FAT_SECS 7 #define MAX_LINE 24 #define RETRYES 15 #define BUFFERS 10 /* max 127. 뙛め. �젳Д� ▲芯惜�． �乘� - 64�, ㄻÞ� ▲芯�� 512+6=518 �, 64� % 518 = 127. */ /* 룧э筍, �琉�ワ�쵟� 첓┐�с COM-�젵ャ (캙�젫�졽��) */ #define ComMemory 0x1000UL #endifsrc/include/prool.h0100664000076500007650000000215406617053226014036 0ustar prool2prool2/* prool.h Prool's Global Header Version 1.0.12 1-Nov-98 Copyright (c) Serge Pustovoitoff, 1993-1998 */ #define EMAIL "E-mail prool@itl.net.ua" /* #define IP */ #define FIDO "FidoNet 2:461/35" #define BBS "none" #define VOICE "Voice (work) +380(572)123445, 235102" #define WWW "http://www.infocom.kharkov.ua/~prool/proolix.html" #define ESC 27 #define CR '\r' #define LF '\n' #define ENTER 13 #ifndef NULL #define NULL 0l #endif /* #define TAB '\t' #define HT '\t' #define SP ' ' #define SPACE ' ' #define BEL '\7' #define BEEP '\7' #define VT 11 #define FF 12 #define SO 14 #define SI 15 #define DC2 18 #define DC4 20 #define CAN 24 #define DEL 127 #define BS 8 */ src/include/proto.h0100664000076500007650000000731407007552234014046 0ustar prool2prool2/* proto.h Proolix Kernel Internal Fuctions Prototypes Copyright (c) Serge Pustovoitoff 1996 */ void loop(void); int mshercinit(void); void saycsip (void); void reboot (void); int bootread0 (int Dev, void far * Buf); int bootread (int Dev, void far *Buf); int secread (int dev, unsigned long lsect /* 0 - first for C convention */, char *buf); int secwrite (int dev, unsigned long lsect, char *buf); int ReadPhysSec (unsigned char drive, unsigned char sec, unsigned char head, unsigned char trk, void *Buffer); int ReadPhysSec2 (unsigned char drive, unsigned char sec, unsigned char head, unsigned char trk /* or cyl */, void far *Buf); int WritePhysSec (unsigned char drive, unsigned char sec, unsigned char head, unsigned char trk, char *Buffer); void far *end (void); void msdos(void); void initv(void); unsigned char unpack(unsigned char c); int PathToDir(const char far *path, struct dirent far *Dir); char *DirToPath(struct dirent far *Dir, char *path); void interrupt far sh (void); void interrupt far msh (void); int FlushAll(void); int LoadCache (unsigned long sec); int NewCache (unsigned long sec); int garbage (void); int shutdown(void); void reboot (void); void msdos(void); void ident(void); int l (int argc, char far *argv[]); void rm(int argc, char far *argv[] ); void mv(int argc, char far *argv[] ); void cp(int argc, char far *argv[] ); void e(int argc, char far*argv[]); void mem(void); void memd(void); void cat (int argc, char far *argv[] ); void vec(int argc,char far *argv[]); void de (void); void mount(int NewDevice); void umount(void); unsigned com_address ( int portid ) ; int readRTC (char *Hour, char *Min, char *Sec, char *Flag); int readRTCdate (char *Century, char *Year, char *Month, char *Day); int ReadTick (unsigned long *Tick, char *Flag); void On (char *str); void Off (char *str); unsigned long SecForClu (unsigned int CluNo); unsigned int NextClu (unsigned int CluNo); unsigned int NextClu2 (unsigned int CluNo); int LinkClu (unsigned int CluNo, unsigned int NeXT); unsigned int GetFreeClu(void); unsigned int AppendClu(unsigned int CluNo); int CluRead (int drive, unsigned int CluNo, void far * buffer); int putch0 (int); int putch1 (int); int putch2 (int); int putch3 (int); int open2 (int h, const char far *path, int flag); void sched (void); int OutIntVector(int i); #ifndef exe_header #include #endif int ViewEXE (struct exe_header far *Buf); void outMBR(char far *buf); void interrupt done(void); void interrupt CtrlAltDel(void); void interrupt Int0(void); void interrupt Int1(void); void interrupt Int2(void); void interrupt Int3(void); void interrupt Int4(void); void interrupt Int6(void); void interrupt Int7(void); void interrupt Int8(void); void interrupt Int20(void); void interrupt Int21(void); void interrupt Int75(void); void init (void); void nulldev (void); void FDDstrategy (void); void HDDstrategy (void); int execpix(void far *mem0,int len); int execdos(void far *mem0,int len); void SysCall1(void); void Int5dump(void); /* H� �젹�� ㄵゥ 將� - interrupt far 押�ゆĿ. H� ㄻ� 信�θ��� 聖�夕� 甸�� � ˘ㄵ com-�젵쳽 �黍獄�刷 笹丞젪ⓥ� � №晨�莘 丞젳졻� 甸�惜硫 醒，��� �黍 췅㎛좂��Ŀ 젮誓�� �昔｀젹щ ��誓罌졻�. (뫊. �IJ� � 貰�手. �留�쥯� setvect(INT_NO, ... ) */ void ps (void); unsigned int stackend (void); unsigned int kernel_begin (void); unsigned int mem_top(void); void interrupt SysCall2(); int TR (int curdev); void print_mount (void); void out_devices (void); char dos_letter(int); unsigned int par_size_of_block ( void far *); void exitw (void);src/include/psp.h0100664000076500007650000000462006445322162013502 0ustar prool2prool2/* psp.h Program Segment Prefix (PSP) structure Copyright (c) Serge Pustovoitoff 1997 */ struct sPSP { /* by Prool */ /* comments from [Help PC] */ int CD20; /* machine code INT 20 instruction (CDh 20h) */ unsigned int TopMemPar; /* top of memory in segment (paragraph) form */ char Reserved; /* reserved for DOS, usually 0 */ /* 5 bytes - machine code instruction long call to the DOS */ /* function dispatcher (obsolete CP/M) */ char op; /* cpm_offset or .COM programs bytes available in segment */ unsigned int Avail; unsigned int cpm_segment; unsigned long Int22; /* INT 22 terminate address; used by Proolix and MSDOS */ unsigned long Int23; /* INT 23 Ctrl-Break exit address; the original INT 23 */ /* vector is NOT restored from this pointer (IP,CS) */ unsigned long Int24; /* INT 24 critical error exit address; the original */ /* INT 24 vector is NOT restored from this field (IP,CS) */ unsigned int ParentSeg; /* parent process segment addr (Undoc. DOS 2.x+) */ /* COMMAND.COM has a parent id of zero, or its own PSP */ char aHandle [20]; /* file handle array (Undocumented DOS 2.x+); if handle */ /* array element is FF then handle is available. Network */ /* redirectors often indicate remotes files by setting */ /* these to values between 80-FE. */ unsigned int aEnv; /* segment address of the environment, or zero (DOS 2.x+) */ unsigned long SS_SP; /* SS:SP on entry to last INT 21 function (Undoc. 2.x+) */ unsigned int sHandle; /* handle array size (Undocumented DOS 3.x+) */ unsigned long pHandle; /* handle array pointer (Undocumented DOS 3.x+) */ unsigned long prevPSP; /* pointer to previous PSP (deflt FFFF:FFFF, Undoc 3.x+) */ char DOS401 [20]; /* unused in DOS before 4.01 */ char FnCB [3]; /* DOS function dispatcher CDh 21h CBh (Undoc. 3.x+) */ char Unused [9]; char FCB1 [16]; /* default unopened FCB #1 (parts overlayed by FCB #2) */ char FCB2 [20]; /* default unopened FCB #2 (overlays part of FCB #1) */ unsigned char cLine_ctr; /* count of characters in command tail; all bytes */ /* following command name; also default DTA (128 bytes) */ char cLine [127]; /* all characters entered after the program name followed */ /* by a CR byte */ }; src/include/psp.inc0100664000076500007650000000476306445011530014026 0ustar prool2prool2 ; struct sPSP { by Prool comments from [Help PC] ; original from dos.h CD20 dw ? ; machine code INT 20 instruction (CDh 20h) TopMemPar dw ? ; top of memory in segment (paragraph) form Reserved db ? ; reserved for DOS, usually 0 LongCall db 5 dup (?) ; machine code instruction long call to the DOS ; function dispatcher (obsolete CP/M) Avail dw ? ; .COM programs bytes available in segment (CP/M) Int22 dd ? ; INT 22 terminate address; used by Proolix and MSDOS Int23 dd ? ; INT 23 Ctrl-Break exit address; the original INT 23 ; vector is NOT restored from this pointer (IP,CS) Int24 dd ? ; INT 24 critical error exit address; the original ; INT 24 vector is NOT restored from this field (IP,CS) ParentSeg dw ? ; parent process segment addr (Undoc. DOS 2.x+) ; COMMAND.COM has a parent id of zero, or its own PSP aHandle db 20 dup (?) ; file handle array (Undocumented DOS 2.x+); if handle ; array element is FF then handle is available. Network ; redirectors often indicate remotes files by setting ; these to values between 80-FE. aEnv dw ? ; segment address of the environment, or zero (DOS 2.x+) SS_SP dd ? ; SS:SP on entry to last INT 21 function (Undoc. 2.x+) sHandle dw ? ; handle array size (Undocumented DOS 3.x+) pHandle dd ? ; handle array pointer (Undocumented DOS 3.x+) prevPSP dd ? ; pointer to previous PSP (deflt FFFF:FFFF, Undoc 3.x+) DOS401 db 20 dup (?) ; unused in DOS before 4.01 FnCB db 3 dup (?) ; DOS function dispatcher CDh 21h CBh (Undoc. 3.x+) LList dd ? ; Proolix: far address of LList structure ; DOS: unused Unused db 4 dup (?) ; DOS: unused FCB1 db 16 dup (?) ; default unopened FCB #1 (parts overlayed by FCB #2) FCB2 db 19 dup (?) ; default unopened FCB #2 (overlays part of FCB #1) cLine_ctr db ? ; count of characters in command tail; all bytes ; following command name; also default DTA (128 bytes) cLine db 127 dup (?) ; all characters entered after the program name followed ; by a CR byte src/include/stdlib.h0100664000076500007650000000641106312075616014163 0ustar prool2prool2/* stdlib.h Definitions for common types, variables, and functions. Copyright (c) Serge Pustovoitoff 1994-1997 */ #if !defined(__STDLIB) #define __STDLIB #ifndef _SIZE_T #define _SIZE_T typedef unsigned long size_t; #endif #ifndef _DIV_T #define _DIV_T typedef struct { int quot; int rem; } div_t; #endif #ifndef _LDIV_T #define _LDIV_T typedef struct { long quot; long rem; } ldiv_t; #endif /* Maximum value returned by "rand" function */ #define RAND_MAX 0x7FFF typedef void (* atexit_t)(void); int abs (int x); double atof (const char *s); int htoi (const char far *s); /* prool */ long int htol (const char far *s); /* prool */ int atoi (const char far *s); /* prool */ long atol (const char far *s); /* prool */ void far * calloc (size_t nitems, size_t size); /* prool */ div_t div (int numer, int denom); void exit (int status); void free (void far *block); /* prool */ char far * getenv (const char far *name); /* prool */ long labs (long x); ldiv_t ldiv (long numer, long denom); void far * malloc (size_t size); /* prool */ void qsort (void far *base, size_t nelem, size_t width,/*prool*/ int /**/ (far *fcmp) (/* const void far *, const void far * */)); int rand (void); void far * realloc(void far *block, size_t size); /* prool */ void srand (unsigned seed); double strtod (const char *s, char **endptr); long strtol (const char *s, char **endptr, int radix); int system (const char far *command); unsigned long strtoul (const char *s, char **endptr, int radix); #if !__STDC__ #ifndef NULL #if defined(__TINY__) || defined(__SMALL__) || defined(__MEDIUM__) #define NULL 0 #else #define NULL 0L #endif #endif /* Variables */ extern int errno; extern char ** environ; extern char * sys_errlist[]; /* prool */ #define abs(x) (((x) < (0)) ? (-(x)) : (x)) /* prool */ #define labs(x) (((x) < (0)) ? (-(x)) : (x)) /* prool */ #define max(a,b) (((a) > (b)) ? (a) : (b)) #define min(a,b) (((a) < (b)) ? (a) : (b)) #define random(num) (rand() % (num)) #define randomize() srand((unsigned)time(NULL)) char * ecvt (double value, int ndig, int *dec, int *sign); void _exit (int status); char * fcvt (double value, int ndig, int *dec, int *sign); char * gcvt (double value, int ndec, char *buf); char far * itoa (int value, char far *string, int radix); /* prool */ void * lfind (const void *key, const void *base, size_t *num, size_t width, int (*fcmp)(/* const void *, const void * */)); unsigned long _lrotl(unsigned long val, int count); unsigned long _lrotr(unsigned long val, int count); char far * ltoa (long value, char far *string, int radix); /* prool */ int putenv (const char *name); unsigned _rotl (unsigned value, int count); unsigned _rotr (unsigned value, int count); char far * ultoa (unsigned long value, char far *string, int radix); /* prool */ #endif #endif src/include/string.h0100664000076500007650000000447506312072312014206 0ustar prool2prool2/* string.h Definitions for memory and string functions. Copyright (c) Serge Pustovoitoff 1994-1997 */ #ifndef _SIZE_T #define _SIZE_T typedef unsigned long size_t; #endif void far * memccpy (void far *dest,const void far *src,int c, size_t n); void far * memchr (const void far *s, int c, size_t n); int memcmp (const void far *s1, const void far *s2, size_t n); void far * memcpy (void far *dest, const void far *src, size_t n); int memicmp (const void far *s1, const void far *s2, size_t n); void far * memmove (void far *dest, const void far *src, size_t n); void far * memset (void far *s, int c, size_t n); void movedata(unsigned srcseg, unsigned srcoff, unsigned dstseg, unsigned dstoff, size_t n); char far * stpcpy (char far *dest, const char far *src); char far * strcat (char far *dest, const char far *src); char far * strchr (const char far *s, int c); int strcmp (const char far*s1, const char far*s2); char far * strcpy (char far*dest, const char far*src); size_t strcspn (const char far *s1, const char far *s2); char far * strdup (const char far *s); char far * strerror(int errnum); int stricmp (const char far *s1, const char far *s2); size_t strlen (const char far *s); char far * strlwr (char far *s); char far * strncat (char far *dest, const char far *src, size_t maxlen); int strncmp (const char far *s1, const char far *s2, size_t maxlen); char far * strncpy (char far*dest, const char far*src, size_t maxlen); int strnicmp(const char far *s1, const char far *s2, size_t maxlen); char far * strnset (char far *s, int ch, size_t n); char far * strpbrk (const char far *s1, const char far *s2); char far * strrchr (const char far *s, int c); char far * strrev (char far *s); char far * strset (char far *s, int ch); size_t strspn (const char far *s1, const char far *s2); char far * strstr (const char far *s1, const char far *s2); char far * strtok (char far *s1, const char far *s2); char far * strupr (char far *s); char far * _strerror (const char far *s); /* compatibility with other compilers */ #define strcmpi(s1,s2) stricmp(s1,s2) #define strncmpi(s1,s2,n) strnicmp(s1,s2,n) src/include/struct.h0100664000076500007650000001214506652162020014220 0ustar prool2prool2/* struct.h Proolix Kernel structures (struct) Copyright (c) Serge Pustovoitoff 1994, 1995 */ #ifndef LIMITS_H #include "limits.h" #endif #ifndef _IO_H #include #endif #if !defined(__TIME_DATE_) #define __TIME_DATE_ struct time { unsigned char ti_min; /* Minutes */ unsigned char ti_hour; /* Hours */ unsigned char ti_hund; /* Hundredths of seconds */ unsigned char ti_sec; /* Seconds */ }; struct date { int da_year; /* Year - 1980 */ char da_day; /* Day of the month */ char da_mon; /* Month (1 = Jan) */ }; #endif #ifndef STRUCT_H #define STRUCT_H struct MemBlk { char Type; unsigned int OwnerPar; unsigned int SizePar; }; /* struct TimeField { unsigned int Sec2 : 5; unsigned int Min : 6; unsigned int Hour : 5; }; struct DateField { unsigned int Day : 5; unsigned int Month : 4; unsigned int Year : 7; }; */ struct BootStru { char Jmp [3]; char OEM [8]; int SectSiz; char ClustSiz; int ResSecs; char FatCnt; int RootSiz; unsigned int TotSecs; char Media; int FatSize; int TrkSecs; int HeadCnt; unsigned long HidnSec; unsigned long BigSect; char DriveNo; char Thing; char BootSign; int SerialNo [2]; char VolLbl [11]; char FileSysId [8]; /* int FATaddr; int StartClu; int RootSize; */ }; struct Partition_stru { unsigned char indicator; /* 00 - non-bootable partition 80 - bootable partition (one partition only) */ unsigned char begin_head; unsigned char begin_sec; /* and 2 high bits of cylinder # */ unsigned char begin_cyl; /* low order bits of cylinder # */ /* 2 bytes are combined to a word similar to INT 13: �7�6�5�4�3�2�1�0� 1st byte (sector) � � 읕좔좔좔좔좔� Sector offset within cylinder 읕좔컴컴컴컴컴컴 High order bits of cylinder # �7�6�5�4�3�2�1�0� 2nd byte (cylinder) 읕좔좔좔좔좔좔컴컴 Low order bits of cylinder # */ unsigned char system_indicator; unsigned char end_head; unsigned char end_sec; /* and 2 high bits of cylinder # */ unsigned char end_cyl; /* low order bits of cylinder # */ unsigned long preceding_sec; unsigned long total_sec; }; struct MBRstru { char master_boot_loader [0x1BE]; struct Partition_stru Partition [4]; unsigned int Signature; /* 55AA */ }; struct DevRecord { char *Name; int Major; int Minor; char Byte; /* 1 - byte-oriented device, 0 - block-oriented */ }; struct DevByte { void (*dev_open) (); void (*dev_close) (); void (*dev_read) (); void (*dev_write) (); void (*dev_ioctl) (); }; struct DevBlock { void (*dev_open) (); void (*dev_close) (); void (*dev_strategy) (); }; /* 묅說も侁� �젩エ劣 �昔璵遜�� */ #include struct processes { int pid; int status; /* 1 - 젶殊´�, 0 - �쪧もÐ�� (Œ� ┐β) */ int wait; /* pid �昔璵遜� (�殉�), ぎ獸贍� ┐β �ぎ��젺⑨ 將�． �昔璵遜� Œ� 0, αエ �Ø獸 �� ┐β */ jmp_buf control_point; char huge *mem0; }; /* 姉�Д�� ▲芯惜�． �乘� */ struct BufPool { unsigned long Sec; unsigned int Status; /* 묅졻信 ▲芯��: 0 - 聲�‘ㄽ硫, 1 - 쭬��キ���硫, 2 - �㎚�����硫 */ unsigned int Counter; unsigned char M [SECTOR_SIZE]; }; struct reloc { unsigned int offset; unsigned int segment; }; /* 쭬．ギ¡� ⓤ��キ畑М． EXE �젵쳽 (첓� � MSDOS) */ struct exe_header { /* ぎК���졷Ŀ �� [TECH Help!] */ char MZ[2]; /* "��ㄿⓤ�" �젵쳽 .EXE ('MZ') */ unsigned int PartPag; /* ㄻÞ� ����キ�� ��笹ⅳ�ⅸ 飡�젺ⓩ� (�〓嶺� ª��黍說β碎) */ unsigned int PageCnt; /* ㄻÞ� �□젳� � 512-줎⒱��音 飡�젺ⓩ졾, ˚ヮ�좑 쭬．ギ¡� */ unsigned int ReloCnt; /* 葉笹� 姉�Д�獸� � �젩エ璵 ��誓Д耀�⑨ */ unsigned int HdrSize; /* ㄻÞ� 쭬．ギ˚� � 16-줎⒱��音 캙�젫�졽졾 */ unsigned int MinMem; /* Ж�º僧 循ⅰ濕М� 캙э殊 쭬 ぎ�餘� �昔｀젹щ (캙�젫�졽�) */ unsigned int MaxMem; /* 쵟めº僧 循ⅰ濕М� 캙э殊 쭬 ぎ�餘� �昔｀젹щ (캙�젫�졽�) */ unsigned int ReloSS; /* 醒，��狩�� 細ι���� 醒，���� 飡ⅹ� (ㄻ� 信�젺�˚� SS) */ unsigned int ExeSP; /* ㎛좂���� 誓（飡�� SP (丞젳졻�ワ 飡ⅹ�) �黍 쭬�信ぅ */ unsigned int ChkSum; /* ぎ�循�レ췅� 率К� (�循ⓩ졻�レ췅� 率К� ㏇ε 笹�� � �젵ゥ) */ unsigned int ExeIP; /* ㎛좂���� 誓（飡�� IP (丞젳졻�ワ ぎ쵟��) �黍 쭬�信ぅ */ unsigned int ReloCS; /* 醒，��狩�� 細ι���� ぎㄾ¡． 醒，���� (ㄻ� 信�젺�˚� CS) */ unsigned int TablOff; /* 細ι���� � �젵ゥ 1-． 姉�Д��� ��誓Д耀�⑨ (�졹獸 001cH) */ unsigned int Overlay; /* ��Д� �´奭ο (0 ㄻ� ＋젪��． Мㅳワ) */ struct reloc RelTbl []; }; struct DeviceStruct { char FileSystem; int head; int sec; int trk; unsigned long ResSecs; unsigned long MaxSectors; char dos_disk; /* 'A' 'B' 'C' 'D' ... */ char system_indicator; }; #endif src/include/sys/0040775000076500007650000000000007150743252013347 5ustar prool2prool2src/include/sys/STAT.H0100664000076500007650000000651306312072130014222 0ustar prool2prool2/* stat.h Definitions used for file status functions Copyright (c) Serge Pustovoitoff 1995-1997 */ #include #ifndef _STAT_H #define _STAT_H 1 #define S_IFMT 0xF000 /* file type mask */ #define S_IFDIR 0x4000 /* directory */ #define S_IFIFO 0x1000 /* FIFO special */ #define S_IFCHR 0x2000 /* character special */ #define S_IFBLK 0x3000 /* block special */ #define S_IFREG 0x8000 /* or just 0x0000, regular */ #define S_IREAD 0x0100 /* owner may read */ #define S_IWRITE 0x0080 /* owner may write */ #define S_IEXEC 0x0040 /* owner may execute */ int fstat (int handle, struct stat far *statbuf); /* prool */ int stat (char far *path, struct stat far *statbuf); /* prool */ #define lstat stat #if 1 /* Modified by Prool */ #define S_ISDIR(m) (m & FA_DIREC) /* directory */ /* regular file */ #define S_ISREG(m) (!((m & FA_DIREC)||(m & FA_LABEL))) /* fifo: include both fifo and socket (pipe) */ #if 1 #define S_ISFIFO(m) (0) #define S_ISLNK(m) (0) /* symbolic link */ #define S_ISCHR(m) (0) /* char special */ #define S_ISBLK(m) (0) /* block special */ #define S_ISSOCK(m) (0) /* socket */ #endif #define S_ISLABEL(m) (m & FA_LABEL) /* device label */ /* * Current stat structure with larger uid/gid/dev fields; * still 32-bit offsets and sizes, so we reserve space to increase later. */ struct stat { dev_t st_dev; /* inode's device */ ino_t st_ino; /* inode's number */ mode_t st_mode; /* inode protection mode */ nlink_t st_nlink; /* number of hard links */ uid_t st_uid; /* user ID of the file's owner */ gid_t st_gid; /* group ID of the file's group */ dev_t st_rdev; /* device type */ #ifdef notyet struct timespec st_atimespec; /* time of last access */ struct timespec st_mtimespec; /* time of last data modification */ struct timespec st_ctimespec; /* time of last file status change */ #else time_t st_atime; /* time of last access */ long st_spare1; time_t st_mtime; /* time of last data modification */ long st_spare2; time_t st_ctime; /* time of last file status change */ long st_spare3; #endif off_t st_size; /* file size, in bytes */ long st_size1; /* reserved for st_size expansion */ long st_blocks; /* blocks allocated for file */ long st_blocks1; /* reserved for st_blocks expansion */ unsigned long st_blksize; /* optimal blocksize for I/O */ unsigned long st_flags; /* user defined flags for file */ unsigned long st_gen; /* file generation number */ long st_lspare; long st_qspare[2*2]; }; #endif int mkdir (const char far *path, mode_t mode); /* prool */ #endif /* _STAT_H */ src/include/sys/TYPES.H0100664000076500007650000000202606312070064014352 0ustar prool2prool2/* types.h Types. Copyright (c) Serge Pustovoitoff 1994-1997 */ #ifndef __TIME_T #define __TIME_T typedef long time_t; #endif #ifndef _SIZE_T #define _SIZE_T typedef unsigned long size_t; #endif #ifndef _MODE_T /* prool */ #define _MODE_T typedef unsigned int mode_t; #endif #ifndef __CLOCK_T #define __CLOCK_T typedef long clock_t; #endif #ifndef _DIV_T #define _DIV_T typedef struct { int quot; int rem; } div_t; #endif #ifndef _LDIV_T #define _LDIV_T typedef struct { long quot; long rem; } ldiv_t; #endif #ifndef _TYPES_H /* prool */ #define _TYPES_H #ifndef _CC_T /* prool */ #define _CC_T typedef unsigned char cc_t; #endif typedef int dev_t; typedef int gid_t; typedef int ino_t; typedef unsigned nlink_t; typedef unsigned long off_t; typedef int pid_t; typedef void far *sigjmp_buf; typedef unsigned speed_t; typedef unsigned tcflag_t; typedef int uid_t; typedef unsigned wchar_t; #endif src/include/unistd.h0100664000076500007650000000105506312075730014204 0ustar prool2prool2/* unistd.h Copyright (c) Serge Pustovoitoff 1994, 1995 */ #ifndef _UNISTD_H_ #define _UNISTD_H_ #include /* #define POSIX_JOB_CONTROL */ /* #define POSIX_SAVED_IDS */ /* #define POSIX_VERSION 199401L */ /* ��Д� ´褻Ŀ ㄵ⒰手 飡젺쩆設� POSIX */ /* #define POSIX_CHOWN_RESTRICTED */ /* #define POSIX_NO_TRUNC */ /* 끷エ 將� ��誓ㄵゥ��, 獸 º�췅, 貰ㄵ逝. ‘ゥ� NAME_MAX 歲Б�ギ� �㎛좂. �鼇―�, 뉸�뾽 ⓤ�. 獸レぎ ��舒瑜 NAME_MAX 歲Б�ギ� º��� */ /* #define POSIX_VDISABLE 0 */ #endif /* !_UNISTD_H_ */ src/include/stdio.h0100664000076500007650000001522006336707014014022 0ustar prool2prool2/* stdio.h Definitions for stream input/output. Copyright (c) Serge Pustovoitoff 1994-1997 */ #if !defined(__STDIO_DEF_) #define __STDIO_DEF_ #include #ifndef _FTIME_ #define _FTIME_ struct ftime { unsigned ft_tsec : 5; /* Two second interval */ unsigned ft_min : 6; /* Minutes */ unsigned ft_hour : 5; /* Hours */ unsigned ft_day : 5; /* Days */ unsigned ft_month : 4; /* Months */ unsigned ft_year : 7; /* Year */ }; #endif #ifndef _ATTRFIELD_ #define _ATTRFIELD_ struct AttrField { unsigned int ReadOnly : 1; unsigned int Hidden : 1; unsigned int System : 1; unsigned int Label : 1; unsigned int Dir : 1; unsigned int Archive : 1; unsigned int Attr2 : 1; unsigned int Attr1 : 1; }; union FileAttr { struct AttrField B; unsigned char U; }; #endif #ifndef _SIZE_T #define _SIZE_T typedef unsigned long size_t; #endif #ifndef NULL # if defined(__TINY__) || defined(__SMALL__) || defined(__MEDIUM__) # define NULL 0 # else # define NULL 0L # endif #endif #if !defined(__STDARG) #include #endif /* prool */ /* Definition of the control structure for streams */ typedef struct {char Name [NAME_MAX+1]; char File; /* file type: 0 - device driver, 1 - ordinary file, 2 - directory, 3 - MS DOS root directory */ /* int Major; int Minor; */ union FileAttr Attr; int flag; struct ftime FileDateTime; unsigned int BegClu; /* ㄻ� �〓嶺音 �젵ギ� � 첓�젷�．� - 췅�젷彛硫 か졹收�, ㄻ� 召ζ쯄レ�音 �젵ギ� - 將� ��Д� 召ζ. �젵쳽 � �젩エ璵 */ unsigned long int Size; unsigned int Drive; /* or filesystem */ /* ��Д� inode (췅�.か졹收��) 첓�젷�짛 � 쭬�ⓤ溢 �� 將�� �젵ゥ */ unsigned int DirInode; /* ��Д� ��㎤與� 쭬�ⓤ� �� 將�� �젵ゥ � 첓�젷�％ (細. opendir() � seekdir() */ long DirSeekPos; unsigned int AbsClu; unsigned long AbsSec; unsigned long AbsOffset; char Buf [32]; } FILE; /* End-of-file constant definition */ #define EOF (-1) /* End of file indicator */ /* Constants to be used as 3rd argument for "fseek" function */ #define SEEK_CUR 1 #define SEEK_END 2 #define SEEK_SET 0 #if 1 /* prool */ extern FILE far *stdin ; extern FILE far *stdout; extern FILE far *stderr; #else /* Standard I/O predefined streams for MSDOS TurboC 2.0 */ extern FILE _streams[]; #define stdin (&_streams[0]) #define stdout (&_streams[1]) #define stderr (&_streams[2]) #define stdaux (&_streams[3]) #define stdprn (&_streams[4]) #endif void ohd (unsigned long int ll); /* prool */ void ohs (const char far *s); /* prool */ typedef long fpos_t; int fgetpos (FILE far *stream, fpos_t far *pos); /* prool */ int fsetpos (FILE far *stream, const fpos_t far *pos); /* prool */ int fclose (FILE far *stream); /* prool */ int fflush (FILE far *stream); /* prool */ int fgetc (FILE far *stream); /* prool */ FILE far* fopen (const char far *path, const char far *mode); /* prool */ int fprintf (FILE far *stream, const char far *format, ...); /* prool */ int fputc (int c, FILE far *stream); /* prool */ int fputs (const char far *s, FILE far *stream); /* prool */ size_t fread (void far *ptr, size_t size, size_t n, FILE far *stream); /* prool */ FILE far* freopen (const char far *path, const char far *mode, FILE far *stream); /* prool */ int fscanf (FILE *stream, const char *format, ...); int fseek (FILE far *stream, long offset, int wh); /* prool */ long ftell (FILE far *stream); /* prool */ size_t fwrite (const void far *ptr, size_t size, size_t n, FILE far *stream); /* prool */ #ifdef KERNEL /* proolix */ char * gets (char *s); char * fgets (char *s, int n, FILE far *stream); #else char far * gets (char far *s); char far * fgets (char far *s, int n, FILE far *stream); #endif char far* _gets (char far *s); /* prool */ void perror (const char far *s); /* prool */ int printf (const char far *format, ...); /* prool */ int puts (const char far *s); /* prool */ #define puts0(s) printf(s) /* 앪� ㄻ� 貰¸α殊М飡� �뤲乘�� (召說ゥ� - 將� 췅誓葉�) */ int Puts0 (const char far *str); /* Prool */ int puti (int w, int Prec, int Zeroes); /* prool */ int putl (long int w, int Prec, int Zeroes); /* prool */ int rename (const char far *oldname, const char far *newname); /* prool */ void rewind (FILE far *stream); /* prool */ int scanf (const char *format, ...); int sprintf (char far *buffer, const char far *format, ...); /* prool */ int sscanf (const char *buffer, const char *format, ...); char far* strerror (int errnum); int ungetc (int c, FILE *stream); int vfprintf (FILE *stream, const char *format, va_list arglist); /* prool */ int vfscanf (FILE *stream, const char *format, va_list arglist); int vprintf (const char far *format, va_list arglist); /* prool */ int vscanf (const char *format, va_list arglist); int vsprintf (char far *buffer, const char far *format, va_list arglist); /* prool */ int vsscanf (const char *buffer, const char *format, va_list arglist); #if !__STDC__ int fcloseall(void); FILE far* fdopen (int handle, char far *type); /* prool */ int fgetchar (void); int flushall (void); int fputchar (int c); int getw (FILE *stream); int putw (int w, FILE *stream); char far* _strerror(const char far *s); int unlink (const char far *path); /* prool */ #ifdef KERNEL int delete (const char far *path); /* prool */ #endif #endif int _fgetc (FILE *stream); /* used by getc() macro */ int _fputc (char c, FILE *stream); /* used by putc() macro */ int fileno (const FILE far *stream); /* prool */ /* The following macros provide for common functions */ #ifdef Proolix int feof (FILE far *stream); int ferror (FILE far *stream); #else #define ferror(f) ((f)->flags & _F_ERR) #define feof(f) ((f)->flags & _F_EOF) #endif #define remove(path) unlink(path) #define getc(f) fgetc(f) #define putc(c,f) fputc(c,f) int putchar (int); int getchar (void); #define ungetc(c,f) ungetc((c),f) /* traditionally a macro */ extern int More; /* prool */ extern int NLine; /* prool */ #endif src/include/stdarg.h0100664000076500007650000000101506312071362014153 0ustar prool2prool2/* stdarg.h Definitions for accessing parameters in functions that accept a variable number of arguments. Copyright (c) Serge Pustovoitoff 1993-1997 */ #if !defined(__STDARG) #define __STDARG typedef void far *va_list; /* prool */ #define va_start(ap, parmN) (ap = ...) #if 0 #define va_arg(ap, type) (*((type *)(ap))++) #else #define va_arg(ap, type) (*((type far *)(ap))++) #endif #define va_end(ap) #define _va_ptr (...) #endif src/include/time.h0100664000076500007650000000202206312072312013620 0ustar prool2prool2/* time.h Struct and function declarations for dealing with time. Copyright (c) Serge Pustovoitoff 1994-1997 */ #ifndef _TM_DEFINED #define _TM_DEFINED #ifndef __TIME_T #define __TIME_T typedef long time_t; #endif #ifndef __CLOCK_T #define __CLOCK_T typedef long clock_t; #endif struct tm { int tm_sec; int tm_min; int tm_hour; int tm_mday; int tm_mon; int tm_year; int tm_wday; int tm_yday; int tm_isdst; }; char * asctime (const struct tm *tblock); char far* ctime (time_t time); /* prool */ double difftime(time_t time2, time_t time1); struct tm * gmtime(const time_t *timer); struct tm * localtime(const time_t *timer); time_t time (time_t far *timer); /* proolix */ clock_t clock(void); #if !__STDC__ extern int daylight; extern long timezone; int stime(time_t *tp); void tzset(void); #endif #endif src/include/alloc.h0100664000076500007650000000121706312072544013770 0ustar prool2prool2/* alloc.h memory management functions and variables. Copyright (c) Serge Pustovoitoff 1993-1997 */ #ifndef _STDDEF #define _STDDEF #ifndef _SIZE_T #define _SIZE_T typedef unsigned long size_t; #endif #endif #ifndef NULL #if defined(__TINY__) || defined(__SMALL__) || defined(__MEDIUM__) #define NULL 0 #else #define NULL 0L #endif #endif void far* calloc (size_t nitems, size_t size); /* prool */ unsigned long coreleft (void); /* prool */ void free (void far *block); /* prool */ void far* malloc (size_t size); void far* realloc (void far *block, size_t size); /* prool */ src/include/process.h0100664000076500007650000000202506664032402014351 0ustar prool2prool2/* process.h Symbols and structures for process management. Copyright (c) Serge Pustovoitoff 1994-1999 */ #include int exec(char far *path); int execl(char far *path, char far *arg0, ...); int execle(char far *path, char far *arg0, ...); int execlp(char far *path, char far *arg0, ...); int execlpe(char far *path, char far *arg0, ...); int execv(char far *path, char far *argv[]); int execve(char far*name, char far*_argv[], char far*far*env); int execvp(char far *path, char far *argv[]); int execvpe(char far *path, char far *argv[], char far *far *env); void exit(int status); void _exit(int status); int system(const char far *command); /* Proolix */ int fork (void); /* Proolix */ int service(int fn); /* Proolix: kernel service: fn=0 - ps */ void ps_(void); /* Proolix */ int wait (pid_t pid); /* Proolix */ int sema_lock (int far *sema); /* Proolix */ void sema_unlock (int far *sema); /* Proolix */ src/include/readme.1st0100664000076500007650000000220306645132324014411 0ustar prool2prool2 Proolix Include Files (Headers, *.h for C-compiler) (C) Serge Pustovoitoff, 1995-1999 끷エ Proolix ��誓ㄵゥ췅 (ifdef Proolix), ㎛좂ⓥ Ħβ 聖�夕� 럱 뤲乘Ø� Œ� 뤲乘Øc-呻Œⓥ. 룯誓Д�췅� KERNEL ⓤ��レ㎯β碎 �黍（췅レ�臾� header'젹� by BSD � �졹殊嶺� Л��. 끷エ KERNEL ��誓ㄵゥ췅, ㎛좂ⓥ �昔ⓤ若ㄸ� ぎНŒ湞⑨ 甸�� BSD Œ� Proolix. 끷エ ┘ KERNEL ����誓ㄵゥ췅, ㎛좂ⓥ, Ħβ ぎНŒ湞⑨ 呻Œⓥ Œ� �昔｀젹� ��レ㎜쥯收ワ. 앪� ���▼�ㄸМ ��-쭬 獸．, 譽� �ⅹ�獸贍� 歲飡�Л瑜 �留��� � 押�ゆĿ ºξ� �ⅹ�獸贍� �젳エ葉� �黍 ⓨ �留�´ � 甸誓 Œ� ¡ ˛θ�ⅸ 呻Œⓥ�. 뮔�, � 呻Œⓥ졾 뤲乘Ø�� ㏇� ��誓쩆쥯�щ� 歲飡�Л臾 �留�쥯� 캙�젹β贍 殊캙 char * ºξ� Мㄸ十첓獸� char far * (將� �αМ循� 췅 獸, 譽� 呻Œⓥ� ぎНŒⓣ莘恂� ぎНŒ汀�昔� Turbo C 2.0 � Мㄵエ 캙э殊 tiny, ＄� ㏇� 遜維え 殊캙 char * 琠ワ荻碎 �� 僧�ョ젺⑧ near). 앪� 聲筌젺� � 收�, 譽� 呻Œⓥ� �洙�НŒⓣ�쥯�� � Мㄵエ tiny � ��將�с 遜維え �� 呻Œⓥ � 甸昔 � �□졻�� Мｃ� 〓筍 �昔�㎖ⅳ��� 獸レぎ far-丞젳졻�ワЖ, �黍曄� 笹�¡ far 췅ㄾ 丞젳猶졻� 琠��. 뫁薯ⅸ 뤵飡�¡⒱��, 13-03-97�. 21:25:46 prool@infocom.kharkov.ua Fido 2:461/35 src/develop/0040775000076500007650000000000007725636611012554 5ustar prool2prool2src/develop/man.c0100664000076500007650000000336306723536510013467 0ustar prool2prool2/* Man utility for Proolix by Yurii Rashkovskii ( 2:461/11@fidonet.org, yrashk@antisocial.com ) 27.04.98 # Started (1st release) man 0.1 Thanks to Prool for his more.c sources. */ #include #include #include #include #define MAN "/usr/man/" #define MAX_LINE 24 #define STR_LEN 256 #define Proolix char man_d[120]; void getman(char *prog); void main(int argc,char *argv[]) {char str[120]; FILE far *fp; printf("man 0.1 utility, Copyright (c) 1998, Yurii Rashkovskii \n"); if (argc==1) getman("man"); else { strcpy(str,MAN); strcat(str,argv[1]); fp=fopen(str,"r"); if (fp==NULL) { setcolor(0x0F); printf("man: Unable to open %s (help file)\nPlease type 'man man' to get help\n",str); setcolor(0x07); } else { fgets(man_d,1,fp); man_d[29]=0; fclose(fp); getman(argv[1]); } } } void getman(char *prog) { {char str [STR_LEN]; char st[120]; FILE far *ff; int l, z,nl=1, counter=0; strcpy(st,MAN); strcat(st,prog); printf("man: listing %s%s\n",MAN,prog); if ((ff=fopen(st,"r"))==NULL) {printf("man: Can't open %s\n",prog);} else while (fgets(str,STR_LEN,ff)!=NULL) { l=(int)strlen(str); if (str[l-1]=='\n') str[l-1]=0; /* ohs(str); */ #ifdef Proolix if (str[0]==10) puts(str+1); else puts(str); #else puts(str); #endif counter++; if (++nl>MAX_LINE) { printf(" %% ( [ %s ] [%i] of [%i] [ ESC exits ])",man_d,counter-(MAX_LINE-1),counter); if (getchar()==27) { printf("\n"); break; } puts(""); nl=1; for (z=1;z<25;z++) printf("\n"); } } } }src/develop/makefile0100664000076500007650000000532506761506674014262 0ustar prool2prool2# OS Proolix - development kit makefile # Use Turbo C 2.0 make TasmFlags = /w2 /t /q /ml /z /m4 # '-v+ -y+' is debug switches # TCFlag = -I..\include -DProolix -v+ -y+ TCFlag = -N- -I..\include -DProolix -wcln -wsig -wucp -wrvl -wamp -wamb -wnod \ -wpro -K TCFlag = $(TCFlag) -g1 -j1 CPPFlag = -I..\include -DProolix TC = \tc Kernel = ..\kernel Include = ..\include .obj.com: tlink /c/t/m/s/x ..\command\c1 $&,$&,,..\command\lib1 $(Kernel)\cs0 .c.obj: tcc -ms -c $(TCFlag) $& .asm.obj: tasm $(TasmFlags) $& .c.asm: tcc -mt -c -S $(TCFlag) $& .c.i: cpp $(CPPFlag) $& all: hello he bpatch.com hc bpatch.com: bpatch.c tcc -mt -lt bpatch ############################################################################## # memory model small he: he.obj tlink /c/m/s/x ..\command\ce $&,$&.,,..\command\lib1 ..\kernel\cs0 bpatch he 0xAFDE he.obj: he.c tcc -ms -c $(TCFlag) $& he.asm: he.c tcc -ms -c -S $(TCFlag) $& ############################################################################## # memory model small hc: hc.obj tlink /c/m/s/x ..\command\ce $&,$&.,,..\command\lib1 cc0 bpatch hc 0xAFDE hc.obj: hc.c tcc -mc -c $(TCFlag) $& hc.asm: hc.c tcc -mc -c -S $(TCFlag) $& ############################################################################## hello: hello.obj tlink /c/t/m/s/x ..\command\c1 $&,$&.,,..\command\lib1 hello.obj: hello.c hello.asm: hello.c install: all copy hello a:\bin\hello copy he a:\bin\he copy hc a:\bin\hc clean: del *.bak del *.map del *.tmp del *.lst del hello.asm del m.asm del m.obj del m.com del m.exe del *.dic del *.i del norton.ini sh: sh.obj tlink /c/t/m/s/x ..\command\c1 $&,$&.,,..\command\lib1 sh.obj: sh.c zadroka.h $(Include)\conf.c $(Include)\limits.h \ $(Include)\unistd.h $(Include)\struct.h c:\bin\sh: sh copy sh c:\bin\sh t1: t1.obj tlink /c/t/m/s/x ..\command\c1 $&,$&.,,..\command\lib1 t1.obj: t1.c t2: t2.obj tlink /c/t/m/s/x ..\command\c1 $&,$&.,,..\command\lib1 t2.obj: t2.c src/develop/hc0100664000076500007650000000176606761253334013074 0ustar prool2prool2彬� �� 6"� rj*�롔.��3픐�\U뗭껋뛈�P툩P�쉞릴P�4YY툙P�*YY뛈�P� YY많P�YY� 3픐�Y뗥]첩�꽸��꽸툝�꽸U뗭VW흚�~ 滉稶��懲_^]� static string dynamic string Hello, press any key stackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstacksrc/develop/hello.c0100664000076500007650000000031706471350200014001 0ustar prool2prool2#include #include #include #include void main(void) { printf("Hello, world! Ver from 14.02.98, 17:05:03 "); printf("press any key\n"); getch(); exit(0); } src/develop/cc0.lib0100664000076500007650000000200006516432046013667 0ustar prool2prool2� �SCOPY��h� _TEXTCODE뼐(� SCOPY@렆 U뗭VW흚�~ 滉稶��懲_^]�O�t�LLSHC�h� _TEXTCODE뼐(� LXLSH@몺#��s뗗岱待浸��宅 沓��뗊3임隨뿂t�LURSH��h� _TEXTCODE뼐(�LXURSH@4�#��s뗚貸黛浸��戴 촉��떷3錄浣뱤t�LXMUL��h� _TEXTCODE뼐(� LXMUL@뒥V뼊끐t鬪몗픱闖�뽻��^盖�t�M&5+!0:LLSH!LURSH!LXLSH@LXMUL!LXMUL@LXURSH@SCOPY!SCOPY@src/develop/files.bbs0100664000076500007650000000014306664352454014342 0ustar prool2prool2HELLO.C Hello, world! HE.C Hello, world! HC.C Hello, world! SH.C Proolix External Simply Shell src/develop/hc.c0100664000076500007650000000044606516424470013306 0ustar prool2prool2/* memory model compact */ #include #include #include #include char s1[]=" static string "; void main(void) { char s2[]=" dynamic string "; printf("Hello,\n"); printf(s1); printf(s2); printf("\npress any key\n"); getch(); exit(0); } src/develop/he0100664000076500007650000000176606761253334013076 0ustar prool2prool2彬� �� 6"� rj*�롔.��3픐�\U뗭껋뛈�P툩P�쉞릴P�4YY툙P�*YY뛈�P� YY많P�YY� 3픐�Y뗥]첩�꽸��꽸툝�꽸U뗭VW흚�~ 滉稶��懲_^]� static string dynamic string Hello, press any key stackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstackstacksrc/develop/he.c0100664000076500007650000000044406516424366013312 0ustar prool2prool2/* memory model small */ #include #include #include #include char s1[]=" static string "; void main(void) { char s2[]=" dynamic string "; printf("Hello,\n"); printf(s1); printf(s2); printf("\npress any key\n"); getch(); exit(0); } src/develop/hello0100664000076500007650000000017406761253334013575 0ustar prool2prool2嚬X���. 퇑P�YY퇹P�YY� 3픐�Y���꽸��꽸툝�꽸Hello, world! Ver from 14.02.98, 17:05:03 press any key src/develop/sh0100664000076500007650000000244306704435324013103 0ustar prool2prool2嚬X���. U뗭껋뛈�P�꺞뛈�P撓꺞둊��P둊患P둊塤P딣��P둊慧P둊駭P�_P蘊꺞뗥]홝��떾F뗗洛洛��.��,툍P��꺞뗞洛洛땱, �.u�^홛뗭V3楕떾邏邏�^�&�w&�7�U꺞F떾邏邏�^�&�& Gu�^]홝W3��53楕 � P�#DDF;�|�툒P�꺞3楕F괓}|陷� 픱凹�G��P|펭�_^홝툔P夭꺞3楕뗞洛洛�눸�눶F껥|��*�(��(&�_&��&�G&�G맘P鼇꺞�(P��꺞퇤P��꺞�>(t��>( t�3楕��( u��(�F��(u鉞&3楕��( t ��( t��F껥O|���(u笙u떾(뚗�&洛洛돆.뎴,�&�>&(~망P�꺞�Y���( t��( t F껥O}��(u���(t2��(F���( t��( u F껥O}��(u�껥O} ��(t�|��>&u熉��&洛洛��.��,3楕2뗞洛洛�텵�6.�6,��꺞 픲뗞洛洛�텷�h꺞縟�F뗞洛洛떉H�?u옭,&�?u먹P�@꺞�딝멤P�6.�6,�6꺞 픱멩P�6.�6,�꺞 픲��V�몄P�6.�6,�꺞 픲�@興9�목P�6.�6,猥꺞 픲�6*�6(�O�꺞��몲P�6.�6,饔꺞 픲獄灰招뫄P�6.�6,��꺞 픲 �P瘟DD又翕��$=��u 뫙P�h꺞�=�>$t�6$��DD퇧P�FDD�"�6.�6,�s꺞�P�8꺞�P�LDD�<P�DD�p�^첩�꽸��꽸��꽸��꽸��꽸��꽸��꽸�;�꽸툒�꽸툓�꽸툝�꽸툟�꽸툠�꽸툡�꽸툢�꽸PUTTfuckfuck out Date is %2i-%02i-%02i %2i:%02i:%02i %s -Proolix external shell 12.04.99, 18:26:07 HOME=/$ Too many argumentsNull command clsclearechosetdatepssh: sorry, can't forksh: exec error src/develop/sh.c0100664000076500007650000000653206704440316013324 0ustar prool2prool2/* #define DEBUG */ #include #include #include #include #include #include #include #include "prool.h" #include "conf.c" #include "limits.h" #include "unistd.h" #include "struct.h" #include "zadroka.h" int p; int _argc; char far*_argv [MAX_ARG]; char str[MAX_LEN_STR]; char far * far * _env; char far* __env [MAX_ENV]; /*****************************************************************************/ void date (void) { struct date d; struct time t; getdate(&d); gettime(&t); printf("Date is %2i-%02i-%02i %2i:%02i:%02i\n\n", d.da_day,d.da_mon,d.da_year+1980, t.ti_hour,t.ti_min,t.ti_sec); } /*****************************************************************************/ void echo(void) {int i=1; while (_argv[i]) printf("%s ",_argv[i++]); } /*****************************************************************************/ void put_env(char far*far*_env) { int i; for (i=0; _env[i] != NULL; i++) { puts (_env[i]); } } /*****************************************************************************/ void ladder (void) {int i,j; for (;;) { for (i=0;i<80;i++) { for (j=0;jMAX_ARG) {printf("Too many arguments"); goto l2;} for(;(i #include #include int main (int argc, char *argv[]) {int magick, h; if (argc!=3) { printf("usage: bpatch filename magick\n\n\ Par example: bpatch he 0xDEAF\n"); return 1; } sscanf(argv[2],"%X",&magick); printf("name=%s magick=%X",argv[1],magick); if ((h=open(argv[1],O_WRONLY))==-1) {printf("open error\n"); return 2; } if (write(h,&magick,2)!=2) {printf("write error\n"); return 3; } if (close(h)==-1) {printf("close error\n"); return 4; } return 0; } src/develop/bpatch.com0100664000076500007650000002145206471546522014514 0ustar prool2prool2뚇.���0�!�.�,롖짍�����.�������>�떿뗗��&�=87u&딼��=u�練����Yu��池�aC&8u����槌���戴꺝껁���뚗+��>z ��s��>z 곀p$r(>x r"�刀G;�r�>z t�>x u�;�w뗾��뗟�����죿+�렳퀺W�!_袋�롌뗧�3�.���*$퉝$+蹶��$�僥������� $�6��6��6�雍P誤.���[�$뗭퀽둊�!�맳O���5�!�{�}�5�!����5�!�����5�!�����%뚇롖�6�!��%�{�!�%��!�%���!�%���!쳬�塏�@��!첫맳].��僥��P�J�U뗭껋VW9&�r�"�~�~t툥P�� DD���뛈�P멋P�u鈺꺞�v��u멓P�v 꺞�P�u�꺞뗱떾=��u몌P�V DD��=�P뛈�PV�꺞=t뫈P�4 DD��V��DD=��u� P� DD��3�_^뗥]홛뗭V땦 �|껥Xv푐�6 뒆 삏� 偸껥#w鉞 ��떾짏����^]�홛뗭� �| 洛��*$�| �| 픲��r �t �v �v�.�Y]�.��.�������2�&�@뚂뉁뱥6�꺠��>�r��뗿�2쟌��v��껋���%��뗽+�r`뗧뙽롔뚍렳QI懲2윌롙뉟뉄떸뗊C�wr@�w�< t< t< u�2잼� 픱B� 픲C녱2쟬�촇,"t"<\u�<"u촇 稚��Y�.����C�뗵뗭+�r�뗥�.��뎧꺟6� 잚�t�3핃F.�&���Q�GY뗹 픱$��3琢懲뗹�6��)꺞뗗즽 픲繞�3윽���?꺝池&8u��홛뗭�>| u��딣�| 洛뎴*$�| 3잼]홛뗭VW�~딢즠$;�u�l$�땥�l$뎩죐$덬_^]홛뗭VW�~딣)�5�딣@��|죎$;�u�6j$�뗿~뎦떾�_^]홛뗭V딣3�%��곣RP搖YY뗱껥�u3잼죎$덬딣@��6j$죎$�^]홛뗭V딣3�%��곣RP瓮YY뗱껥�u3잼�6n$�6j$딣@�떾�^]홛뗭VW�~ �u3잼Z떿 %��뗹�>n$uW烏�Y�B�6l$떾 픱1�뗖꺜(;혇 WV� �YY�$�;�rV翫�Y�떾�땤;6l$u�W�"�Y�_^]홛뗭딣뗓곴;혉％3잼 ������]홛뗭딣딽�꺬뗁겵꺬 �u ;�s��� ������]홛뗭�v���Y�]홛뗭딣셊P縕�뗥�]홛뗭딳�<딽�!r�P�Z繪]�U뗭�^+�+年@�!�]�U뗭껋VW�~颱픲↑"%� 漂�u��↔"!F딣��u�P� �3픐�v�PYY덯�=��u�F�t3잼�덯繪颱t 퇠P阮渾���>颱�t�v3픐�Q�뗱떾 �}떾傭V�KY� ��v�v澮2�뗱떾 �}떾���p먉F�W�v��YY뗱떾 �|Y3픐V緩YY덯���t!곋 颱�t딣�%� P�PV沃꺞� 颱tV堯��~�t颱�t�P�P�v�u꺞 �|颱t��3핆�곣�� 혢寺�뎴�"떾�_^뗥]홛뗭V�딳泰u �泰u�딽깎"N 졍=�!r뗱딣%�� �뗞洛뎴�"떾�P蘊穴^]홛뗭껋VW�^�7떾덯��^�G@t떾��^� � 뗟G�? u�F�떾N 픲�딣��_^뗥]�U뗭V땦V凹Y 픱����L�~ u�<~ V����)FV갺_��딡덬 �v �v�v둈쁏�V꺞껡�u =��u����3잼^]홛뗭껋V땦V��Y 픱�������?�P3픐P둈쁏�꺞뎈�덯��<~딽�딣�RPV��솇�뗃XZ+�卵딽�딣繪^뗥]홛뗭퀱둊�^딳 딽�!r �~u떷��P�哈]홛뗭�D�^�!�r樂桔�]홛뗭VW�~ 땦딡;�u �~���v���謠�>�"u툙!;�u��"��>�"u ��!;�u��"�<t�P3픐PV�얔꺞�Dt�t�y Y갺���D떾덬덬 �~t? �v;�r J �~uW�o�Y덯 픱갟�����딣덬 덬�|�~u갟3잼_^]홛뗭V땦 �|껥| �P�z幅뗞洛�눩"��V�Y�^]홛뗭V땦�>뗞�!r 洛�눩"��3잼P�E幅^]홝W���!��DtV癰YO꺠 �u�_^홛뗭곸�VW딣@=s3잰��^洛�눩"�t�v�v�v嵬꺞愚�^洛겎�"��딣뎳|�딣뎳x�뜺~��m�럛�떈|���|��늽{�< u� F뒉{��F뜂~�뗕+�괋�|>뜂~�뗿+�W뜂~�P�v�{꺞뎳v�;�t꺘v�s���� 딣+냮�냬�+헝O뜺~�꺘x�t���뜂~�뗿+�떿 픳.W뜂~�P�v�-꺞뎳v�;�t꺘v�s���� 딣냬�+헝딣�_^뗥]홛뗭�^洛�눩"t�P3픐P�v�(뗥�@�^딳딽�!rP�^洛걦�"X�P椀楕]홛뗭�^洛겎�"�塤B둊 �^딳딽�!r�P�좙숇]홛뗭껋"VW�~ �^껢$wX��rS딣 딳 �}�~t �-G槌堆꺳뛵砂�+菱�묟��F� 宜+菱��F 픲�뛐邪�俱N�, s:�Fも銓�딣 �_^뗥]� U뗭�~ u딣숇딣3�RP�v�v�P캻P�\��]홛뗭�v�v�v�v �P캻P�@��]홛뗭�v�v�v�v �~ u��3픐캻P���]홛뗭퀰둊딳딽�!r묐P�쀵�]첬�"�빎"�맭@��!�'맳�"�@�!蟯�U뗭VW땦딡;�t����f�<|-�Du 딡 뗕꺜;혋�딡 뗕꺜;혋딡덬 3잼4�|�"u9툙!;�u2둈쁏�쏔Y 픲갺�燻P�Dt��3픐3픐V�륓꺞����~� u�D@u�P�"#P둈쁏蛙�꺞=u�P뛈P둈쁏獄�꺞=t�Du 갟����둊���^뗥]홛뗭V땦툙!PV窪�YY�^]홛뗭껋VW땦�~G�Dt#��O떿 픱V�^�F�쁏�뗿YY=��u珣u�D@t7�|t1딡;�s*�<t V兀�Y 픱3잼SOW�v둈쁏��꺞덯�+~��7��O떿 픱,�}�^�F��D �\ 뉷���V�^�F�7橈�YY=��u�떿�_^뗥]��&"$U뗭딽��+#�듔漏瘻듔"테챽쫘頑챽�"테る]�U뗭곸�VW�F�힓쵵�8W���2쟌�慟I_횊G�N�~"SQR뛈�+�뛈췗W�v�V 힓쵵~첀~�ZY[���~츎푡�떮l�땦� 픱<%t�G�N�炡��凝�u돳x��<%t�돻l�3�뎻v�뎻j�닅u��냦����냨�����2�뗊뗗�� ��`sG뒣;#떸=v�뗗洛.�㎉�G�lv���-����>������#紆��w�깕j�����w�깕j�����w��푫�+t닑u��|�깺j�森�r�깕j� ��h���wD�냞�u!깕j���Q����~�긃��s 뎳p���7���u�뎳r��톱)���s撻���,0���w�뇛p� �|綠�뗊邏邏�냦�熉���u쪍냨� �|닌�뗊邏邏�냨�盂�깕j��右�걥j�깺j�顫瑢�깺j��걥j���褥��� � � �녜泯냫��냤�닑n��~�3陋� �냤�닑n��~�섻G뎧�냞�t�GG�~띃{� 픲3 �u/꺘r�u-떮l�땸p��껠�t땰j�%t�0�� 듏擁欠鹹芸깕j�RPW듖쁏뒉o�PS�s�떀r� ���!닑n�뎧띃z��^�7CC�^�냞� t�7CC�^�珝:��揮�냤�깺j��뜋z�+�눹떀r�;�뗋榕뎧닑n��~�긃띃{�2���憂뎧닑n��~�냞� u �=긃 �� �=긃뙽 �u�$#旺�;럕�v땸r���뎧닑n��~땸r� �}�WQ뜛{�SR�#냞�P땰j���t ��F���t ��F� ��F��P�7�딣�F띃{��냞�t떀p� �~ �[�+�~돃v�뒉u� 픱&�=-t꺇v�깣v�O&��4�뗸떮l�떈p��#냞�=u뒭n���ou꺘v��냬�����xt��Xu깕j�@KK꺇v�}�냬�럙��냞�u �� 矮�K;�擢냞�@t �0碗�뒉n�宛�떀v� �~'+�+�&�<-t< t<+u&ц⅛IK눳��0�얐戌눳�+�&쵆G�N��멃蓴 �~ 뗅� �{顥鹹��뎧�~�냞� u �=긃��=긃퇠*F�F�&��}�떢x�떮l��%�<衡 픲��~쵵}�6�딣る_^뗥]�U뗭VW땦�>l$t�l$��l$뎩뎦�|죐$덬� �6l$뎥뎥_^]홛뗭껋VW땦�~�죎$;�u�>j$� ��덯��^��V撓�Y_^뗥]홝죒$;j$u�6n$�귩Y3웰j$즢$�;�j$땧�u"V窪�Y;6n$u 3웰j$즢$�딡즞$V�K�Y� �6j$�A�Y�6j$^홛뗭껋VW땦� ��덯��|�u;6n$t��^��뗸�V��Y�^��u �v�V�*�YY_^뗥]홛뗭V땦 �u�떾��뗱;6j$u�<��V���Y^]홛뗭껋*VW�F��F��릩~ �F� t�=긃 횏=긃 ��땦 � 픱]<%t\삒�F��v�VY �|% �x2�퐳#u+� �x�퓶#u�F��v�VY �鳶~�vS�VYY�N潘�;�t��vP�VYY�N槃q�n�F���힓�쵖뎧 � �|H뒡�#2�떸=v�7뗗洛.���)))&,2zz�EFRLu�Cg�Y`�I���N�瑜껓0�~� �|쎑 坡F肆��N����N����N��~��f浬�w��N� �p�딣�+能F�tO�b��� � ����颱 u�N�뛈�P뛈�P딣�%�P떾P�v�v�v�Z꺞�~�~�F�u�F陌뉮ヶF�t뮟�뾂|�g�P��e�vP�VYY�N�갽����tR<:t �~ �vP�VYY�N�Z뚘���T[ �~RS�vP�VYY�N�[Z�F�u ���F�뮟벇�)�|澐芋뛈�P뛈�P��#F�P�v�v�v�o꺞 �~�~8�F�t�*먫聊�F棉F�t�� �F�t��3픐W�>꺞鏞翕9甬翕3|쒒�����F�u�볻�F�갽��t)�F�u��F��v�VY �~ 픵 ��퓶#�~�N���vP�VYY�N蟠F�u�らa曦F�u�=�땦� �}�t�F��v�VY�F�u� �|N念F�u�F驀&興�+전�~仙嵯��f鯉<^u�N�Т듢뗹�刀�"杆�k席<t&<]t%<-u�:w��<]t寞*혊�契흤�k筬�u請旅�뎧 갽��땦辭F�u�쀽N|P�F��v�VY �|O뼀檳倒�"開�꼓�뼋t�F�t��F�t �F�u칭陸�vP�VYY�N�F;v�} �F�u�F莫らP�F;v�} �F�u���F��v���P�VYY�~��^�딣驀��F��v�VY �~ 픵 ��퓶#뱓�Y꺛��t�Y肉+拈�N�|ERQ�F��v�VYYZ �~5��|1딂��0r*�� r��r ��r �� r��s�� 樂樂樂樂濾�+���tY꺛��Y�_�_^뗥]��&$$�&&$�&($S��0r#�� v��*w�����'�� v :�s꺞扁�[哈餉U뗭껋VW힓��F��F�� �F��v�VY �|f삌稚�u�u���N |[<+t<-u�F��N |K�F��v�VY �|6+�뗿딳 �N껠$w/��r*<0ul��ue�N |3�F��v�VY;| %씈!�!뒊��뮕�透뗗X뎥]눮K#�#항�#�#�#孺�!늾�쩚!D=칣 =P拗t=�"��3�눭K� ��p+UK=:@�.�K ��;/���CAG떁�눯A웵�R1Z돆磎뾍丁�2�I�2�,콻(0B�BI�x;F@�tu_띹h��P裡P� ����@P�}0꺞 픱 �$;QlgT$蜈� F껥}浴�@�^뗥]첩P$)I봋)>) |�% 34 찷( ( 췄��i��죨~~���딣궔H�3읔둌( �~�� (� � �) s .]�C�%x C� VW땦�>�N�(�6�섍5�?� 轅�K�2귟떸덯�U�#��(倖bFP�v�e���h/�� ="R 헙�\ED+�딦Ｔ둒ＺL� �&BｐNx�(@��[Y邕3u$ �%?�쒁�QS �'�邏뗊更X 헟b�Ol3<��L��=XL4?P8�K���N�]�븡�@�즖J于5 줙嶢<�j �,�c��.�(3S�J ���0 솄V�덯�륥 �t � 삢N��W!/-G哮3�0 0�T⑸2"봹" 5;ぢq뀡H� 둋 ���bJ=@~��*I 턚텛 Q융�� 岱ｒ %N즔J4씛4��g솏8쫥pJ� nJ&�4숗YU (�����!lx!jJ梅뚙륧b쨱뒕끝�+��1@ｎN_^G좨�TK좷P���^D껥桓@}형D窩p� ��$)속� A곐�O�F型�B�~�D겏�곀D�=t/`�t*3楕뗞둢I�4�4)�4� |(i��u�y*�F귻|퇔 깑깚( 뱥 ;�s��d�w ;�w Y]���.��� �^�^盧 뵢I�I�`�칫�W<RP�" 뛈�m�瞰飯驀狗�限�39寒化�.�'�鰕덿 鹹�{��{�M�P�EO�뗗�2�?e� � [ 딦 �Sx�쯗)UH^*a7 6�3恬 �鍋겯莞|2)/�wJ뻲�덁��@� �`�$\>1A쐦:≒L@Q徘`FPP^FT�(=�U��!�뢍��gm�w布��@佈-[3����,뚗寮/Y�2�;dJ|�Y��n�b弟J`g���9m�P냁)�,3� gk�(>P#9뷭�U+d댠n�"쿹�B�$DBQB�#똼� ��NB윁�뛬쏷덶/+鈺+� @�~6u얕拖�죚%�RlL�묹�L玩t� 똅��^��S짺蘊*y� & H�E�= v쯍7붫W友]-��!궳휨+�RaD�떣�<g뗓m]��[�7q�&괏밠.깬*구 Rt賭' �3�&�L杭Y+�m��e>�*點槨H殞�.�훱橓��욛�DR��햙j긃�� 擴 � �뗗�%냉�� ��E�誤oO ^; w컪*��&~ST({~��a�3�&�� 뛆 � �윞쓹�5쭕SGx�딳凡WV6� v&S  ~�E�(G�롋뗦�RW��뫴�~�x���/瘀;"�S�;�H;\�MA�IVW� CvID6A뎈� 꽫 劤@Rg�뉦&줡�1v�S묨IsI�牡R楕힎� �G쟝톰�)�3{D聾홏}�_�\ら�}�|��꿗�잳J*�C}M�}Kq�{B)뤶}j�웲�}�봆}PiJ}F}3S�z$xz�S�\T콂 *^�t뻭��}$蓴�뼤쿯훘@ ;SEc�앮�4뺠e�cs蟄l)�c�+F;6jZ^�^���w맾�&WC0C=(p 龕$ �^�}A�F�ㅼ裂%�&�뉶��F��~� rj$ � 圈��>쁼~�Br�u�~4r�*긞꺓W�^몤뗹���Q�껊?C�*� �h랞;y묃h7���>P|預=#�N( 눩맘窄��@  픲툝�;L劣���"껝꺯�u �?$끺6 몤60(�>4)  rJ 'a�, kJ C�> N!;W�蹂}�@U"X�a凹姪�졾���!�괁����z!�g��_��9I�M���� �3깅��꾲�擅�m( � ;耘���PJ⑥署�폗�,�$� 촸d42�$ 랗�>sJ:u��`��C�DD�욦�\%쿼 밁�焄V@ 뚐렻�^b졋�빤�2뾄�.��C#쏜�SYY=��u���떾�^QT4�녫 �롫�)|%t �&��F�!�lI*O괆股�@��*�.&:�:쾚�����R�뒉 長瑠삿.9tCC順�.�(Pg �+-0&RtQ쁐�m륳%�-푓tFP��撓�揭�Jp"硯�"�"(뚑m"�"�"너�"��,��$�A놆쏂 뇏�[9����촻9 )솭좵Y�)�v z�| YY뗱�LM�'u堯3�eF1 .u8딽딊 �0@R꾫?뎳婦 A;|섲=�%벜*�t 뭈�驟省A'x�@ ;떺M�c索�a� 봽�`붾)밊캪Nhl��삞J���/O!r좴z�7蔚�뭕K6yC*�yu%�,�,듧�T4F�[뮅!��쥜�%�� %EGXcd�efginops|xV�挺5_g A�y�� 컷%B∴�꺘kuu5 홯u &딣W_뺹P놚1笠 �炡w�2N}55�4�0nt9寇*+| 벨$"�-뻅�%�.�.腿堆꺴�N=�;r,�� �w�)}�B�늰|�A�LpY([SMv#뛴�誾��0�0Аe��~��daT롽f�떊e뀀 Gt �cU:獲뮇�eM 3 욒쁉A3 3풥-<捻떞=� =~�3�c���bJ@�3��b>�踞c����58�w캏K��d-� 챩엪쮃�" (A�A�;Vr�끦�;F r�S\R��J/떃�+$P�=uG�t� �0펂r힚�_f왑3픲�]]�o�Y쓟'v쳖�v�^;#v�*u �h(l/H �O r�씱/Q듔=큈u;�B�B悶8gDV@큳�A|Z 떾脚 J{n�!a!z�h!��!�%뛍� 9��^ 7��H7��~�0r�9w ��w足A��F�腦� P4갔콓�M)We힙�紺u�0� �@榴}Dm/}}}솯�+1�#宅�F�룅iu6뎿n�z�+u��w�-u<e�붢놷堆�@�sP1���bn�d奈씶 #��� �|��"W7�����欌U誾vB 꿌�&�(�v *l�튣3뼲k ��~ "~읬��@g �}. �H�a�몸K 떿윚�?�b3V�T拖�2 � 3�<� .;� Q 46 ��!� � H!� !}E0s)$r��諾 |釪RI*뗞洛쇚.殆�@�뗔잆�:8`6|駱6뗟곥�薺 宅뒊�@$��^|笙팪�r�0�uh�h� hI7h�*6u賂����`�+~ +캄~�~�⁴�뎧깪귵"$S% F&�f%;몒|�t,8�=p �y+� t�nz�F5�h���� `픺�"~웍�@�/?|^ 홹7 u2/�瑄Д c낙�줎HV�侄zi� �"� � �#�@�"#�#Y#�!�젞 촙�^x殊V植��1 |槃쿷�G�AA�c���쒋 �e�Ii��^+g嘯앶�95 쮝%곣@�4��@T뽋뤍s�|�r �#쮁R��@숏�@꼎¡KQ� ▶NWW��W혬���GF�&�:R�#q�;�윑적| 쟽촺잣� |�뎧�I풉F>bN딳r?[\잺^{|}~)O�&��tpV� u�m�A절(Z웹0"�9~Jb, f~ 붥WF�202슣�� � �V;�B뮗`�<�n�>젋BAt�킋뮿�G�})H �틌3쟩�度�'�1h&뭨ow8�8�% Y`�:屋��%6��N��L&�t�닃�둩醴Q뫮�|��� �홝�f�뗱붻t $E� �떾cF�+슙M�$B$ }�� zX�Y�<뵶Dk츅O퇓A◐>녫q=c}�up�\Ys�+�\�|�씸�晞o�4Z� 픲�H=�,c� H�= �C��� �1HzHR퀘�r�>(Ute�";� �=~W� 쥷e�|R�#u K붩k�X�J햮[ -hJ$훦�8� 블ccご�. 짐�Y휘�TYH-� �1"��$; Fu 칧�斫5��!�?괜 E��!!�!�냪@� �jCュ#�*�H[�_�&�+熄莞皇�O�5拮!��솷輓0t�)�ZsvN#遯m@i��때 *QG(: o=�y� ��}t]iEi�}�N`샖숝S( 뚜�쏂뉝卞쐰z ����"�f릢 꾊��64"�@a�5T졤�(�!Q4X W꿾o F�1k6X��h�];6*],� �c�{�m<k&�沆순k�%� N�Z�Z�伏 頭���m��`r洧⊂a3�앻쬄n먱6ihA契 2 &�'s�r�uL� h� �b M.1�8�#B5�?� r聯�?��쌄PK��4~� \Sv �-� 팂�>��� �2�뼣�wjj�@��j88W줺秧' ���꼀�S��|U��웽��N⊆N뫳�쨟)�쎏뜅덖�k�1� i蛙c*<�As�a버 AtŀB븠뼊)� HEC 뾖�m밸j4m좗 쑵�,H�YY솄Vb공뎪>�맪�d-� � N祗X 迷TH9긘BT�)�n���^�A;DLr롤�r캢4덽SQ��< t< t僚� � �$�.�;���Y[X2�0(錐�븰C濤$.�-O.�&( *鉉ぱ�렳쾪������@d|�릖轅U���'꺆'�'�@롔邕r�!C愉��l34��&쟑�2Q뾖R��(Ev둞��Z[�� 콎힓�흫F�꽧5� P���1��.SQVW��41a �PG뗗XS Og�[ )�� w  � �w�[� &�引[떸 D탃@>�.<:N8쏼%%�' _^Y[1:�3�*8떉괔[u텏�x��YY�#�?�FF�P椽멤B� 녴R)둕�v�둵�^ ��rぴZu� )�'럟tF2� &P'鮮�&�戴��)咐u@}F�꺝쏣D�槽v@)�V穩�YP�J2RV랄턏榧{[텵fJuD떿El훔���亂懶���`( F�^F�렺u&�7颱7�쒘�곫��괓�v5.��(D팛g;�;긥�+vq_��-�|뽏뽷�x"懶�r�DDc(�6bJ쎚UV�#틠���^므 n[�SC弛�;責�N냏>g꼠웺W&�}d숗>�L|� �혞�쵉~�곭饑QQ[楠 ����? �<뢷�!땱 �(徽�)��~9n功�U;�Nr2u;�N*�멎늃唵밶� 튔� ���콓{�팝�7<�z�(崧�(*(|� �꺿픆� (+7F}7iM-_3D��3�� 勘���%U��쥮딽-딳 �u �ti� �te꿼�6y �T굛� 鵡�꺳P�뗩� W3n�먓潞�;�r w;�r+��@洵[ 좚홳t떾뗖卵D {AN쎣罷%g!떷3陋�V�뭶� 鬪��(X��� �^�G흚�~ 滉稶���懲C��s뗗岱待浸��宅 �墾���3�� N朴腕��,� �rＫ렺벿S��} 討慟�꺫�B��s겶(듻�壘2��딅^���듓%[�0]�B g�B�+A��VA+ Ax�샢6꺝6-x�-죢�7��듾쑝�|5:n- -�+홤 :�,�2�+�.0C boot: �extend sec@죜or reaerr�� %sP� olix'manaEAg v. 0.�1.2 26-Aug-99,ess ESC fast*쯮yTing헗RuptjquQ�wceZhelp - YfhE&뭊lo�<쮅hdar }k�"n'&F1쿻#U?툍f!m 10 HDD?� Sthis 첶0: 1:v짺#F#23��.�37킟둖� cwj�b齧msdos줠SL@{@ 0 hdd2/ �(if p(��t) lぼ?sJ햑t� on no쟑ff dum�fil�b>am�x �o ! ��:jvali긠ev�icpartU ieg뉕(  :( P PANIC!` Clus챪i03ze=%i1셆챣7o�XXkge銃b괚뢽aBA| Ma펣uppU�?\c�[G 뎱%AG# abs�%c)�uK  `%s'nund. F굓irW�]R;SZ%�.L뾦ng,맊=04X:0MZCOM KERN^PEL{illeg0姆 Hdr@ =끨2�EXE� �xn~|2�긂Reloc�)s&즗�bphe+ad�V�M饅Mem �YaxSS:;SPiUq3CA�Suf�$ I� � tab뿼꼘do U @!ニ�E:E" >=~놃 -a滯 ��8�3%2X홌某i(뙡 Ign@ht(i�좿try r)�b퇦�% ?��src/bm/files.bbs0100664000076500007650000000021506144656462013301 0ustar prool2prool2CB.ASM Boot manager CRT file (asm) MAKEFILE Makefile BOOT.OLD Boot manager (src) MAKEFILE.OLD Makefile src/bm/msdos.asm0100664000076500007650000000143606100463636013333 0ustar prool2prool2_TEXT segment byte public 'CODE' assume cs:_TEXT _msdos proc extrn _RestoreVec:near ; ´惜呻� 飡졷瑜 �誓贍쥯�⑨ cli call _RestoreVec sti xor ax,ax mov ES,ax ; Read MBR mov dl,80h ; drive mov dh,0 ; head mov cl,1 ; sec mov ch,0 ; trk mov al,1 ; sec count mov ah,2 ; Fn read mov bx,7c00h int 13h nop jc @@reboot ;jmp 0:7c00 db 0eah dw 7c00h dw 0 @@reboot:; jmp ffff:0 db 0eah dw 0 dw 0ffffh _msdos endp public _msdos _TEXT ends end src/bm/hdd2.asm0100664000076500007650000000143306100465646013027 0ustar prool2prool2_TEXT segment byte public 'CODE' assume cs:_TEXT _hdd2 proc extrn _RestoreVec:near ; ´惜呻� 飡졷瑜 �誓贍쥯�⑨ cli call _RestoreVec sti xor ax,ax mov ES,ax ; Read MBR mov dl,81h ; drive mov dh,0 ; head mov cl,1 ; sec mov ch,0 ; trk mov al,1 ; sec count mov ah,2 ; Fn read mov bx,7c00h int 13h nop jc @@reboot ;jmp 0:7c00 db 0eah dw 7c00h dw 0 @@reboot:; jmp ffff:0 db 0eah dw 0 dw 0ffffh _hdd2 endp public _hdd2 _TEXT ends end src/bm/out_mbr.c0100664000076500007650000000170406400025236013306 0ustar prool2prool2#include void outMBR (char far *buf) { int i; struct MBRstru far *MBR; MBR=(void far *)buf; printf("System ----Begin---- ----End----- Preceding sec Total sec\n"); printf(" head sec cyl head sec cyl\n"); /* "A FAT 12 iiii ii iiii iiii ii iiii iiiiiiiiii iiiiiiiiii\n" */ for (i=0;i<4;i++) {unsigned int j; if (MBR->Partition[i].indicator==0) printf(" "); else printf("A"); printf(" "); out_os(MBR->Partition[i].system_indicator); printf(" %4i ",MBR->Partition[i].begin_head); printf("%2i ",(j=MBR->Partition[i].begin_sec) & 0x3F); j = (j & 0xC0)<<2; printf("%4i ",MBR->Partition[i].begin_cyl | j); printf("%4i ",MBR->Partition[i].end_head); printf("%2i ",(j=MBR->Partition[i].end_sec) & 0x3F); j = (j & 0xC0)<<2; printf("%4i ",MBR->Partition[i].end_cyl | j); printf("%10lu ",MBR->Partition[i].preceding_sec); printf("%10lu\n",MBR->Partition[i].total_sec); } } src/bm/tlib.cmd0100664000076500007650000000045006400025260013104 0ustar prool2prool2bootl/C/E-+printf-+sec4clu2-+mem-+tolower-+conv-+ctype-+strchr-+char_in-+char_out-+string-+putch0-+getch0-+kbhit-+txtattr-+hdd2-+msdos-+cold-+reboot-+bootread-+out_os-+cursor-+videopag-+int86-+out_mbr & -+int13err-+readsec-+bootred0-+vector-+out_iv-+viewexe-+nextclu2-+cluread-+strlen-+absread src/bm/cb.asm0100664000076500007650000001220706466160400012566 0ustar prool2prool2; Startup module for Proolix /boot (similar c0t.obj from Turbo C 2.0 and ; similar crt.o from UNIXs) ; Version 0.0.1.7 23-Apr-97 ; History ; 0.0.1.7 23-Apr-97 ; 0.0.1.6 22-Apr-97 ; 0.0.1.5 20-Apr-97 �漱�˙�� ‘レ溫� ＋渽 � mov SP, ... ; 0.0.1.4 10-May-96 add internal stack ; 0.0.1.3 9-Mar-96 ; 0.0.1.2 27-Feb-96 ... ; 0.0.1.1 26-Feb-96 cb.arj ; 0.0.1.1 25-Feb-96 cb.arj ; 0.0.1.0 11-Jan-96 cb.arj ; ; 0.0.0.15 5-Nov-95 c0.asm ; 0.0.0.15 4-Nov-95 ... ; 0.0.0.14 15-Jan-95 c0.asm sayr macro str ; � ｀졽①αえ� 誓┬쵟� �� �젩��젰� push si lea si,str ; 곷ギ mov si,offset str call sayr_proc pop si endm sayr chr macro sym ; via BIOS ; Not worked in graph mode (bl - bg color!) ; NO SAVE REG mov al,sym mov ah,0eh int 10h endm chr KernPSP equ 50h _TEXT segment byte public 'CODE' DGROUP group _TEXT,_DATA,_BSS org 100h assume cs:DGROUP,ds:DGROUP ; ,ss:DGROUP .8086 _Begin: mov ax,CS mov DS,ax mov ES,ax ; mov DGROUP@,ax cli mov SS,ax mov SP,offset 0FFECH ; StackEnd ; 0fffeh sti ; chr 'A' ; call _saycsip extrn _main:near jmp _main _kernel_start: public _kernel_start ; mov ax,KernPSP mov DS,ax mov ES,ax cli mov SS,ax mov SP,0fffeh sti db 0eah ; /* KERNEL START: JMP 50:100 */ dw 100h,KernPSP ; ;DGROUP@ dw 0 ;public DGROUP@ ; comment | _saycsip proc near ; REG SAVED push ax push DS chr 'i' chr 'p' chr '=' push CS pop ax call ohw chr ':' call ll ll: pop ax call ohw chr ' ' chr 'd' chr 's' chr '=' push DS pop ax call ohw push CS pop DS sayr s_ax pop ax push ax call ohw sayr s_bx mov ax,bx call ohw sayr s_cx mov ax,cx call ohw sayr s_dx mov ax,dx call ohw sayr s_si mov ax,si call ohw sayr s_di mov ax,di call ohw sayr s_ss mov ax,SS call ohw sayr s_sp mov ax,SP call ohw sayr s_es mov ax,ES call ohw sayr s_bp mov ax,BP call ohw pop DS pop ax ret ;s0 db 13,10,"CS:IP=",0 s_ax db ' ax=',0 s_bx db ' bx=',0 s_cx db ' cx=',0 s_dx db ' dx=',0 s_si db ' si=',0 s_di db ' di=',0 s_ss db ' SS=',0 s_sp db ' SP=',0 s_ds db ' DS=',0 s_es db ' ES=',0 s_bp db ' BP=',0 _saycsip endp ohw proc ; 귣¡� 笹�쥯 � HEX-˘ㄵ. 귛��: 笹�¡ � ax. ; 귗� 誓（飡贍 貰魚젺禎恂�. ; 귣㏓쥯β ��ㄿ昔｀젹с ohb push ax ; 뫌魚. �젮� al. mov al,ah call ohb pop ax ; 궙遜�. al. call ohb ret ohw endp sayr_proc proc ; 뤲�璵ㅳ�� �猶�쩆 飡昔え �黍 ��М蟯 押�ゆŁ BIOS ; 귛��: DS:SI - ASCIIZ 飡昔첓. ; All registers saved ; � ｀졽①αえ� 誓┬쵟� �� �젩��젰� ; ALL REGS SAVED! push ax push si PUSHF cld sayr_l1: lodsb or al,al jz sayr_ret mov ah,0eh int 10h jmp short sayr_l1 sayr_ret: POPF pop si pop ax ret sayr_proc endp ohb proc ; Procedure output hex byte Ver 0.1.1 6 Dec 93 via BIOS ; Input: AL - byte ; All regs. reserved ;) ; Not worked in graph mode. bl - bg color !!! push ax push cx push dx mov dl,al mov cl,4 shr al,cl call ohb1 mov al,dl and al,0fh call ohb1 pop dx pop cx pop ax ret ohb endp ohb1 proc ; Regs not saved !!! push ax cmp al,9 ja @@_1 ; al > 9 ; al <= 9 add al,'0' jmp @@_out @@_1: add al,'A'-10 @@_out: mov ah,0eh int 10h pop ax ret ohb1 endp ; | _TEXT ends _DATA segment byte public 'DATA' _DATA ends _BSS segment byte public 'BSS' _BSS ends end _Begin src/bm/boot.h0100664000076500007650000000012106466163402012611 0ustar prool2prool2#define EXTEND 5 #define EXTEND2 0xF #define _HDD_ 0x80 #define MAX_LINES 22 src/bm/booth0100664000076500007650000002322606664626236012557 0ustar prool2prool2툚U붊$;훥i떹-D�%��뗹묄맽~宖쪑邈宅뚖�S3�S�PKLITE Copr. 1992 PKWARE Inc. All Rights ReservedNot enough memory$� 튮�!� 멅뗹OO씬�뗃駱澄�뉥FF�춹��2맠빍�;춹��<춹��A춹��c춹��d춹��e춹��f춹�rㅡ�Jt�s�3�3裵�Jt왐堂�Jt앗�끱t欄Jt밂���r 欄Ju춹�儺.뒒�� t:3�껠t&欄Jt뾯欄Jt뽔堂�Jt뺁堂�Jt붡���s.듌,쵈�V뗸+寨�^�닾���<�u쇰3欄Ju춹�儺��r綠�Ju춹�儺��r쫓�Ju춹�儺곥�녰遊3��S뗗뗁뗊뗨뗱뗹�   �뚅롔렳�롊쇱�渾x퇠�� �P컄��컋m=X僚f)�:  e栢 d�s*�PV얩窩^XP瑥JA � � 떸熬*� � � 쥡뷪 � � 쮜 뎵 �� 펨{T   험�n r 뙟믌�a  eH%쾌T  X멙잭G  K톰:X� ax= �4bcd솓si SS)MPD SREBP�Z�홓V쒧� �&챫罰�앆QR듢�漏� 듏$ �ZY< w0��7,U뗭곸V�^뙀��돒涍P�3拖G�=岱��&�온u�/@��>n9| %씈!�!뒊��뮕�透뗗X뎥]뉫I#�#洶�#�#�#慰�!늾 JK�!D=칣 =졤�t=�"3�뉪I� 戮�V(UK=t��. J �쟰9^T��뇗G떁�눯�웵�R1Z돆J/J��2�.�2�,e�(0B�>Bxn9F��tu_今뜂�P裡P������P�/꺞 픱 툄9↖hHT蜈� F껥}浴�*�^뗥]첩�$))븴)?) �4K 44 �숻 ) 췄���Q:죨~~���� 쪭H�3읔�"� �~��젏 � �) sv1 .C|$'xC� VW땦�>Ð"M�6�� �5�0�?꺙�I�2 �떸덯�W�#���倖쁃P�v����(�-��_;S 헙�묪+�딦(� K�K� ]�&�&Mx솧��[Y���2 �%?ps��QSv(�'�邏0k뗊X 헟bsO�1<�K됺` K4?A8J�� t!M�븡 �짒H于J�5 �F�k X堯c�P�� K� ���0 솄V�덯� 圭뭪 � 삢뱑�W� -G3옙�0 09⑸2"" ��5;혛*q끤& 둋 �쁇졁=@~�픉R 땐텞 p��� 岱�(CIN짎H44',��g셝�8쫥쪯＄HBA&�4숗 VJ)����!�!^E쟄��K쨆쨱끝줰�+��q/@�$M_^Q0�휑K좷A��첇B��桓�(}형DD�,.�g �Q$)<� 宅(EO�F型閏~降@①곀D�=t/0�t*3楕뗞뒳쨴404�4� |��4�u3z븖�F귻|툋��깚�뱥 ;�s�dP��w ;�w Y�췑�.��P �^�^盧 JQI�I�`�J맗�,-RP E 뛈�m� 瞰飯驀n羊限�gr寒化3-:O��Ι 鹹�{�5{�M�� �EO�� e��?eJ � [ 딦 �璪�쯗R�H^*혂  l63恬 �'쑇겯�eR|/�w�,w��)18뉯� �` %\f2A쐦:� K(E徘뽃P봁P�(=U��땴 !뢍��웟�w布�)�;8 3�( ��,뚗�C.P�Y2�;숰|봅�Y�n�"Ub�`g�)㎖��P낾 P+3e飡k�|)y횶 &�E�= v) 찇붬젷W友��!�B�P*휨+�D�뗭V<뮱g�]�쒎�t7�&깟,콅)MR구 �7&t� �3�L杭菱m�截>�C)點첏卦蔽��.�꺿�욛�R�D癡�j긃�땘� � �% �뗗렻邂� � E���zOo^ �; w갭~%*~�(SN~팤�띊3�&�� �D� �윞�븾5SG띧x�딳W�6V�& v  ~S�E�G�롋뗦(�RW�붥�~�몙x�/紘�S;"�;뺿�;강M�AIVW� vCI61D 뎈劾 �껽�@g�쥎�&�1P�v�SI�I�A잎楕힎� RG霧잃톰L({3D聾�T-� }窪�_鳶��'}�� �꿗瓣�(�<}�$}Lq�{(뵋�}j旨兪}�Gy}P뵧}F4�}3z$i�z�S�� Gx *^Kg�r횵"����~:뻜�� 4U ;c�T@앮�뺠S&cs蟄�MA'c�)F;6IJ^�^��w맩m풵C0C눤& @쪽��^�}A�F�PA靷� %�&�뉶��F��쟂~� r � �^救>� (�~r�u�~4쨧r�깦꺓W嵬 댶뗹���똓껊?C�y*�h랞��;�|�h7�h,��1�1썌�쩵���}k$Y괋픰"∃ ={ -K�;� g往홝}I�(푄 뤫Bfr�3�&�7곫��倒F 翠늯�#Hj�v J 3H(u퍁+$줦FPGb�#�$Uu�fq�y # �2� ^뜄�D(~偈莞P�뉶���@=v���뺁�.�쬴`����心�� �쇢�;=;J쌇Zk�x~�픵 � W�D�Qf�#N@쩽귷���DD�쒑� 봪� �"6H���^I � F��A쭾�힓��$��G��*t� |�떿쟆��FM C��늾�H흦� �~)麟륉0렳&�&��(�KP@K0쏷�.�8�C*�>�>P |預=#"M�� � ㉴콷 `�y4� �y�>뭆 ;W�%蹂怜 V"�$PYa僥姪�^?��,붨 ���� 8� �g�괄��^��M�퓪e�3^?�K�$륄�>1� �t9耘�叱죩墻�Z沂B �R$�춏즩P�P%랗�>쯌:u젨���B�DD�옕額%츔 밁B �b�V뚐렻�^샤샤텼�B�S쥽 �@넿"삽I�)g=��u퇓�音^괣T1�녫 T尤훁By%tc�&��E묯�#G괆 P�퓜*��$쾙3�3��6����K�뒉長= "+t( 쟴JC=#`��-!  =0幅s삉먮v륦�mU N푨:Tt_@PUz旺��s&Jj"pt쉐="5"(9뱠"똳n�"�"Uf�"�簪Yo$ C�<峰�꿂f�K?��� �쑱)뎻D좵D�+�v � 瑥�뗱� �N�e)u俉퍵3�I� @Q.u:딽 �1@R&t'nA뎳婦 C撑"C?D,쇊+�c�|Bг녹�E���g�'�"e索)@c=L9���텞�)m)��B�[첢m�S�*6%�Su,嬋�,��e�[F��nL`!=oI�'=c* � =%>&�=X��T=dP;=i6�G-p냧=�<P� D�0 }A 쀆%B줁�꺘huu %펚t r� B(�놚눷� �2uf�WE랺�5쇷24Vt9 ��+| pJs"z-zRN�.�.腿堆껥띦=�� 흶ty!U�D��=� �5�솈 !O z !Tu .칵떢,�y 뽽tA*��뙀�驃�-u s�� � �t�` � 0t� $�.�.腫�뙙(p �� @>殞��' �u���"�`+&�w7蜈 勃�!''쫟#�륄C?�;�~콗��+�~�}멇)껥|QC�_>츭_�7�q꼚뗹떿�[潑~��:��墉 Q�QiQ3렶Q遙5헐"E�]�멐#4 � 0�>g>o� f뇖� �aSFu&�;t���4X �뎳著�Q@ 뚕륤梢떀"돃&UL��꿒�I�;�,B$싀xg�t1/0Ob璇+�며딽��필4�2�Y�su�넰� �2�越u0v�">x���츭�큻鍔�^ �3pY(EO[��#뛴��,벣�@풚�B망Y짅楠�홄論 <�걭떘핻P Qb쁱�5S�-}a�I �2R�/ /% h|���|� 2a|w�3����쁇3�늍�鎌��-�^쳽S됀蒲걺�'��(뎰� �"�_�;(pVr�{;F r�L�~V딽.v ��L.L躬Rp8�;�u띕m��Vr�Y�`g읫떷6w�[謠:U持麝X ���:v8-l�) s猥(g`틾颱�3� dJ�d>D}2Dl�팗#t쳓��t7��x"x( 뗔�P&+I�P tr�+O�뒻R嗜\A�t�A�f B�껥A| Z픟떾 i7mazz斗�K�D쿗/_�v�,��$,��~�0r9V땧  i�足A{MF�083잼 Az띢�仄��*�|f쐤쐈@t�^� 됭벰|I|剩||�{,2�#걕�F�x^�씘닊o��=�+u�v�-uy CYTds�s0堆�9�렚�k驥�3� 쉮G�W�v� �^�zbzYz�>"z[誾�N -똀�� 붯4퍴+쵎� �(�~ "~섿�� � �}% u#b�몸꼆T1 떿���F1�몜D� 켾@쨰�"竹�=�몎�= 붋��W栯��<�R0$f^�諾|繞�B*뗞洛�]숗�?�떔?濫:8�6|駱 6뗟�懷薺 宅뒊�>� $�^|�v�藕r�0��h'h' 묿hh�)6�o∝��퐹둧�*~ q2뮌 � 靑뎧첟둂! F2"�f!;|쯜�o,4k楣 �t b�o��3�F5芎Ti'�;�n�� �0��"~욋�C�~9�A|as1a� u,����澱^ 몛 @삮� �f x뚻R���A�(� $討�뇫R穆!<�~�ΖX쪞��/". |雯걦-K[귘��[?Y?좿렏(�s� IIi��{똤-샾곈츽�5t%곣T�14{졳J�뼍��|펩nuC�蓼3�1꽱w��� � ㅻ� We튡WPW턲|d���� 떎侍.�; 픏� u 픴<뉆뎧�~릮�F$�8딳it+6y6;&R�|泳NT�鴨RP…<_�"乖�톁�`:긃W�꼗攻딣唇F�i�i�렳(쨷럘�;F)�2i�7-롗�HW�/�~#�*롫4��*�H# �)�~HV!| ~튤H3� 룵 FQ�6E�몀]  t$E쬜$$`佛}0r9m=둧z[V���H-!=1zs똶(�'(량@ =]tE$=4Pe>=<휁7=U2=>�-�0=[&=\�!�$|뉸 =^*={Q��0}c�!=~�pg�t�벼 uA�Z筏0|뀘9~ｔ f~ ��F.+8��*_�`�u취�#�Y�6洗�H9�>녳�x�퀷릟��C� b �~u/�枓度�늙D.hr$ow�5쁏雍 DD8CNm뛂J�K&��tw�딗롉}啼o�v�瘟홝�븆�뗱tV�  )Q�\6+r�x��#M# } �(�fm�P�'툑?/겡^=� S�R쬶# � ~%�+-��:v왁_�W"턇�� 픲�稶�* 같z딂a}�� �9괛F뭷�u �>�*$vP@�v9�=~j�VI 솋뒒쥾x 'b�u��&�f�l��8 E/얡��$�2 �:hh Y� ���8핂�V料遑�G��z#�1!��7 Fu ㉫�\⑦P�껣C� 뺅C !�!�}}q批 뀿풄���(랇1e=� � �K� �� �8긘A)?*�n흻�^�껈;Lr룩댃�r�냁SQA< t< t僚P�� � 퉰.�r9��@�Y[X2��0謐�<흹�C$.�-�O.� *鉉!��렳쾪�������|�릖�챂����:'爀'�'��@롔팿�!C愉�照64�픉&쟑홦Q뾖R�P뒍v둞��Z[T�@b�힓�흫F� e� P룢 �0� 픣.SQVW�3뚕쨱P읗G뗗XS O[Y7 ) w7'  � w�[� &�[떩v� D雜@>탩<:쏼N%% �I _^Y[cf좣3�4X�떉�? [<�u뇡(@왻� U�#�?�etF鈗�&AvrC_^�R��+둕�v둵�^ ��r�ZwW)�'랥A�4� & '潚�삺戴��U랑��F�꺝8뒞��뾶IV穩팒IJ�RV�:p맘��^쪀A뾼�H╄뗥SIa몧棅u~%�뉭�s�?口b끄�Q(��W�<�/�+뺭�+I��틕>쏦u?떿b3茶+좤�亂懶����뺻죺D�D렺&�7颱+��`�곫�괓�v*�#렊?�{�6�6�&v瀛녀3�V�잭>�UP�6쁇�胚XQj擁ヰ;�\{�9 E�蹙귇뭌�&M�"홦뛨�3#bA쨆숗>K� �혞쐦~�뵂곭옳둚楠�`���? �"i뭘�m��뇂kOd �|뉃��; M@9r.u;&죭��B�y�\U岫LX�f�m�/�KPD[+[��� �|� �tF:�+�%W�DJD"D WPR�`�DDj��+�J2�9쒞D �rt쁶T�J �9b���7v;<�C쑭ㆎ�(*�|� �꺧핂z @D�F}�來_�]�3�B � 믩�:f�U뽜h���딽��`N �u �ti �te먥Suy �P꺩 鵡�꺳�@뗩� W3j�c娜懦;�r w;�늭+��@洵[胎P�떾뗖卵b� 깲Np�罷g!떷3陋�V뼊 끐 鬪�闖,�� �^�흚�~ 滉稶쩺�懲C��s뗗岱待浸��宅 沓 ����3��'朴腕��v �r�껻렺뱲S P�} 討慟�꺫�B��s겶�塑壘2��딅^@X�듓%[쮼츛B 3uB�+A�A}++ Ax�6L�꺝6-x횜Px�7��둹N쇠|5-� -�+홤�,�2�+�.0C boot: �extend sec@죜or reaerr�� %sP� olix'manaEAg v. 0.)1 23-Feb-99,ess ESC faĦstlyTin /gRuptjqEuwceZhelp f�- hEIV&lo�<�^hdar }쩓kn'&F셵n-U?+퇰!m 10 脯HDD SthisYX0: 1:%븎#F#23R�.쵛7킟yR� cU�wb/msdos줠gS{@ 0 hdz갺2 �(if p@��t) lV�?sJ햑��� on no�ff dum�filb>am�x�~   ��(:jvali긬devicp쮒artie8;�(  �:( PANIC! Clus�솵size=%i1갧셭7o태�kge�B괚뢽 a| Ma펣u찴pp?\c偸G � :�%# abs�%JYcuK  `%s'nund�. FirレWR;SZ*.L뾡걁ng�=04X:0,MZCOM K�괙RNEL{illeg궸� Hdr@ =.�2�EXE� npxn~�|=혅哮0喇a ��8%瓊%2X鉀핟i Ign꼁(i듺try r)E!�ba�� ?'�src/bm/sec4clu2.c0100664000076500007650000000142506145355350013274 0ustar prool2prool2#include #include #include #include "kernel.h" /****************************************************************************/ /* #define DEBUG */ /****************************************************************************/ unsigned long SecForClu (unsigned int CluNo) {unsigned long l; /* Sector=ResSecs + FatCnt*FatSize + (RootSiz*32)/SectSiz + ((CluNo-2)*ClustSiz) ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ DataStart */ #if 0 if ((CluNo>MaxClusters)||(CluNo<2)) { printf("SecForClu: Invalid cluster number. CluNo=%i, MaxClusters=%i", CluNo,MaxClusters); return -1; } #endif l=DataStart + ( ((unsigned long)CluNo-2) * CluSize ); #ifdef DEBUG printf("sec4clu: return %li ",l); #endif return l; } src/bm/nextclu2.c0100664000076500007650000000165406761520344013421 0ustar prool2prool2#include #include #include /* NextClu(), NextClu2() - next cluster number compute and load to Cache) */ /* NextClu() - kernel's internal module */ /* NextClu2() - boot manager internal module */ /* 뫌＋졹��猶졻� NextClu() � NextClu2() ! */ extern unsigned int MaxClusters; extern int FATMode; extern char huge * FAT; unsigned int NextClu2 (unsigned int CluNo) /* -1 for eof or error */ { /* for FAT12 */ unsigned int i; if ((CluNo>MaxClusters)||(CluNo==0)) { printf("NextClu: Invalid cluster number. CluNo=%u, MaxClusters=%u", CluNo, MaxClusters); return -1; } if (FATMode==FAT12) { /* FAT 12 */ i=*(unsigned int huge *)(FAT+ (((unsigned long)CluNo) * 3)/2); if (CluNo & 1) i>>=4; else i&=0xfff; if (i>0xff0) return -1; } else { /* FAT 16 */ i=*(unsigned int far *)(FAT+ ((unsigned long)CluNo) * 2); if (i>0xfff0) return -1; } return i; }src/bm/makefile0100664000076500007650000001721606545770604013220 0ustar prool2prool2# OS Proolix. Boot manager makefile. # Use Turbo C 2.0 make.exe TasmFlags = /q /t /w2 /m4 #TasmFlags = /t /w2 /m4 /l # LinkFlag = /c/t/d/m/s LinkFlag = /c/d/m/s TCOpt = -K -wcln -wsig -wucp -wrvl -N- # -wstv # TCFlag = -mt -I..\include -I..\kernel -DKERNEL -DProolix $(TCOpt) CPPFlag = -I..\include TC = \tc # Proc = \usr\prool\proc Commands = ..\command Include = ..\include Kernel = ..\kernel KernelFiles = kernel.c progname.c alloc.c process.c syscall.c ConfFiles = $(Include)\conf.c $(Include)\limits.h $(Include)\unistd.h \ $(Include)\struct.h $(Include)\prool.h $(Include)\proto.h $(Kernel)\kernel.h .a.obj: tasm /ml /z $(TasmFlags) /jjumps $&.a .c.obj: tcc -c $(TCFlag) -o $& $& .asm.obj: tasm /ml /z $(TasmFlags) $& .c.asm: tcc -c -S $(TCFlag) $& .asm.a: app $&.asm $&.a .c.i: cpp $(CPPFlag) $& ############################################################################## boot: boot.com ..\kernel\pklite -o boot.com boot. boot.com: boot.obj cb.obj bootl.lib $(Kernel)\cs0.lib tlink /c/d/m/s/t cb boot,boot,boot,bootl $(Kernel)\cs0 boot.obj: boot.c boot.h $(Include)\struct.h $(Kernel)\ppt.c tcc -c -B -mt -I..\include $(TCOpt) \ -DKERNEL -DProolix -DBOOT $& ############################################################################## bootf: bootf.com ..\kernel\pklite -o bootf.com bootf. bootf.com: bootf.obj cb.obj bootl.lib $(Kernel)\cs0.lib tlink /c/d/m/s/t cb bootf,bootf,bootf,bootl $(Kernel)\cs0 bootf.obj: boot.c boot.h $(Include)\struct.h tcc -c -B -mt -I..\include $(TCOpt) -obootf \ -DKERNEL -DProolix -DBOOT -DAUTO -DDEF_BOOT=0 boot ############################################################################## booth: booth.com ..\kernel\pklite -o booth.com booth. booth.com: booth.obj cb.obj bootl.lib $(Kernel)\cs0.lib tlink /c/d/m/s/t cb booth,booth,booth,bootl $(Kernel)\cs0 booth.obj: boot.c boot.h $(Include)\struct.h tcc -c -B -mt -I..\include $(TCOpt) -obooth \ -DKERNEL -DProolix -DBOOT -DAUTO -DDEF_BOOT=2 boot ############################################################################## boot.asm: boot.c boot.h $(Include)\struct.h tcc -c -S -mt -I..\include $(TCOpt) \ -DKERNEL -DProolix -DBOOT $& a:\boot: boot copy boot a:\boot bootl.lib: tlib.cmd printf.obj sec4clu2.obj mem.obj tolower.obj \ conv.obj ctype.obj strchr.obj char_in.obj char_out.obj \ string.obj bootread.obj out_iv.obj viewexe.obj nextclu2.obj \ putch0.obj getch0.obj out_os.obj cursor.obj videopag.obj \ kbhit.obj txtattr.obj int86.obj out_mbr.obj \ hdd2.obj msdos.obj cold.obj \ reboot.obj bootred0.obj \ vector.obj readsec.obj \ int13err.obj \ cluread.obj strlen.obj absread.obj tlib @ tlib.cmd out_mbr.obj: out_mbr.c tcc -c $(TCFlag) $(Kernel)\out_mbr.c out_os.obj: $(Kernel)\out_os.c $(ConfFiles) tcc -c -oout_os.obj $(TCFlag) $(Kernel)\out_os.c strlen.obj: $(Kernel)\strlen.c $(ConfFiles) tcc -c -ostrlen.obj $(TCFlag) $(Kernel)\strlen.c absread.obj: $(Kernel)\absread.c $(ConfFiles) $(Kernel)\kernel.h tcc -c -oabsread.obj $(TCFlag) $(Kernel)\absread.c cluread.obj: $(Kernel)\cluread.c $(ConfFiles) $(Kernel)\kernel.h tcc -c -ocluread.obj $(TCFlag) $(Kernel)\cluread.c nextclu2.obj: nextclu2.c $(ConfFiles) tcc -c -onextclu2.obj $(TCFlag) nextclu2.c viewexe.obj: $(Kernel)\viewexe.c tcc -c -oviewexe.obj $(TCFlag) $(Kernel)\viewexe.c out_iv.obj: $(Kernel)\out_iv.c $(ConfFiles) $(Kernel)\kernel.h tcc -c -oout_iv.obj $(TCFlag) $(Kernel)\out_iv.c bootread.obj: $(Kernel)\bootread.c $(ConfFiles) $(Kernel)\kernel.h tcc -c -obootread.obj $(TCFlag) $(Kernel)\bootread.c string.obj: $(Kernel)\string.c $(ConfFiles) tcc -c -ostring.obj $(TCFlag) $(Kernel)\string.c char_in.obj: $(Kernel)\char_in.c $(ConfFiles) tcc -c -ochar_in.obj $(TCFlag) $(Kernel)\char_in.c char_out.obj: $(Kernel)\char_out.c $(ConfFiles) tcc -c -ochar_out.obj $(TCFlag) $(Kernel)\char_out.c strchr.obj: $(Kernel)\strchr.c $(ConfFiles) tcc -c -ostrchr.obj $(TCFlag) $(Kernel)\strchr.c ctype.obj: $(Kernel)\ctype.c $(ConfFiles) tcc -c -octype.obj $(TCFlag) $(Kernel)\ctype.c conv.obj: $(Kernel)\conv.c $(ConfFiles) tcc -c -oconv.obj $(TCFlag) $(Kernel)\conv.c printf.obj: $(Kernel)\printf.c $(ConfFiles) tcc -c -B -DBOOT $(TCFlag) -oprintf.obj $(Kernel)\printf.c printf.asm: $(Kernel)\printf.c $(ConfFiles) tcc -c -S -DBOOT $(TCFlag) -oprintf.asm $(Kernel)\printf.c #printf.obj: printf.asm # tasm /ml /z $(TasmFlags) $& sec4clu2.obj: sec4clu2.c $(ConfFiles) $(Kernel)\kernel.h tcc -c $(TCFlag) sec4clu2.c mem.obj: $(Kernel)\mem.c $(ConfFiles) tcc -c $(TCFlag) -omem.obj $(Kernel)\mem.c tolower.obj: $(Kernel)\tolower.c $(ConfFiles) tcc -c $(TCFlag) -otolower.obj $(Kernel)\tolower.c videopag.obj: $(Kernel)\videopag.c $(ConfFiles) tcc -c $(TCFlag) -ovideopag.obj $(Kernel)\videopag.c int13err.obj: $(Kernel)\int13err.c $(ConfFiles) tcc -c $(TCFlag) -oint13err.obj $(Kernel)\int13err.c putch0.obj: $(Kernel)\putch0.asm tasm /ml /z $(TasmFlags) $(Kernel)\putch0.asm; getch0.obj: $(Kernel)\getch0.asm tasm /ml /z $(TasmFlags) $(Kernel)\getch0.asm; kbhit.obj: $(Kernel)\kbhit.asm tasm /ml /z $(TasmFlags) $(Kernel)\kbhit.asm; txtattr.obj: $(Kernel)\txtattr.asm tasm /ml /z $(TasmFlags) $(Kernel)\txtattr.asm; hdd2.obj: $(Kernel)\hdd2.asm tasm /ml /z $(TasmFlags) $(Kernel)\hdd2.asm; msdos.obj: $(Kernel)\msdos.asm tasm /ml /z $(TasmFlags) $(Kernel)\msdos.asm; cold.obj: $(Kernel)\cold.asm tasm /ml /z $(TasmFlags) $(Kernel)\cold.asm; reboot.obj: $(Kernel)\reboot.asm tasm /ml /z $(TasmFlags) $(Kernel)\reboot.asm; bootred0.obj: $(Kernel)\bootred0.asm tasm /ml /z $(TasmFlags) $(Kernel)\bootred0.asm; vector.obj: $(Kernel)\vector.asm tasm /ml /z $(TasmFlags) $(Kernel)\vector.asm; readsec.obj: $(Kernel)\readsec.asm tasm /ml /z $(TasmFlags) $(Kernel)\readsec.asm; cursor.obj: $(Kernel)\cursor.asm tasm /ml /z $(TasmFlags) $(Kernel)\cursor.asm; int86.obj: $(Kernel)\int86.asm tasm /ml /z $(TasmFlags) $(Kernel)\int86.asm; install: boot copy boot a:\boot all: boot booth bootf cb.obj: cb.asm bak: del *.bak del *.map del *.tmp del *.lst del *.dic del *.i del norton.ini clean: bak del *.obj del *.lib del boot del tcpick.pck reboot: reboot src/bm/boot0100664000076500007650000002355006761536476012413 0ustar prool2prool2퇠X벧%;훥i떹-D�%��뗹묄맽~宖쪑邈宅뚖�S3�S�PKLITE Copr. 1992 PKWARE Inc. All Rights ReservedNot enough memory$� 튮�!� 멅뗹OO씬�뗃駱澄�뉥FF�춹��2맠빍�;춹��<춹��A춹��c춹��d춹��e춹��f춹�rㅡ�Jt�s�3�3裵�Jt왐堂�Jt앗�끱t欄Jt밂���r 欄Ju춹�儺.뒒�� t:3�껠t&欄Jt뾯欄Jt뽔堂�Jt뺁堂�Jt붡���s.듌,쵈�V뗸+寨�^�닾���<�u쇰3欄Ju춹�儺��r綠�Ju춹�儺��r쫓�Ju춹�儺곥�녰遊3��S뗗뗁뗊뗨뗱뗹�   �뚅롔렳�롊쇱�渾ux퇠�� �P컄��컋m=X僚f)�:  e栢 d�s*�PV얩窩^XP瑥JA � � 떸熬*� � � 쥡뷪 � � 쮜 뎵 �� 펨{T   험�n r 뙟믌�a  eH%쾌T  X멙잭G  K톰:X� ax= �4bcd솓si SS)MPD SREBP�Z�홓V쒧� �&챫罰�앆QR듢�漏� 듏$ �ZY< w0��7,U뗭곸V�^뙀��돒涍P�3拖E�=岱��&�온u�-@��>z;| #�!뒊�킆��t透뗗X뎴툹#]戮#�#증�#�#�蜈!늾�!D=PP칣 =�t=���"3�눡L� 렜�+ UK=:@�.�L ��|;/���CAG떁�눯A웵�R1Z돆핬7L占L2耕R2�,(v)0B휖홬@xz;�thu]뜂�P翁�����P阮0꺞 픱P` 툌;�YY�S誤� F껥}ら뇜^뗥]첩�"$�'�'�6�, � �2 JB < � 췄��I3]v쐝~~���@〓딣�I�3픋E���BA�� � �!�/ s .혵H&Y3쟆� VW땦�>�O�6뒧�쏬.�A꺙팊뒧u�R=8� $~��*偶!A�뗒덯�*]1���倖VGP�v��2��%�/걫%[k��[�[렷PE��.�딦ＨM ＮM� ��.&ｄO셆���[Y�4�H �%?�9��QS;�'�邏떂둔X 헟b9O�3<��M�z걺M4V쟄8홎���O￦뿂4.�즏K羽HnL볫� �,�<~訛. ��$�4$_솄V��R덯� �t � 딼 깵��*W"賂LG3菱n77턓e�9"% *� @F6T�닓1묆둋 P@�VK�>@~�@VI� �炚�� ��� 岱n8ｆT즍K�>::� � �g�]dKv。b 6�&dD 숗 #U�#��봕��)`)^�)�(2浪�M}PΩ棹(Y�+��21@ｂO_,�믨R죀�/��� �E엎桓�쳗�Y莽� 쏣�(5>�� 欌S�F��(�F땦諧�겿C@I�<u�1�!*3��뗟�%%�8U8�8%G�� |��tXM��J�~�(�|큳�깢 �;�s��a�w ;�w V]���.�꺬쟽 �^�^盧 뵢I�I�`�&��h.YYRP �뛈�l��+뫈拔驀�븶蒿緬|或t蒿.��&’�덿 渾�y�(y��┲���DN��^��?�1~� � s 딦 �Sx�æ뮨_n [M3恬 |'㈁�쐃倭0Rl/�ww YR��}랦b@� �``첡�8�8갥ÅM璿TGPP�RG�Ø,<�RE�!쌔��q�zO믾刑�-@Z3���+뚗療�/\1�;X擲K|�X�쯯�a�`f�J)∝��$�Q.Q�,맪9�kp獸�>P$料T�j컬u쟑YY��O{뚏뜢 Kx냮G往묿+Ya�9Y轢쉪YUY�#�m� ;K;��;�~3u쥡춴付羽�$�RE걖I�M�M渦��됂 똅��^�RP�震�*J)먅&�F젘�= v鼻�$���o佑췋��# /��+Β�G�뛫%�j떓�`��J4ot�&�&뱲.노*낯 앐�'Y�1秤�$색_+��]古;�*菹$/�孕��퍝�~星숖긇G� �퓘F�� � Q��� �P2좤렻���A���Y� a; w��� �&攝�(m�플3�&�� ��: �윞�+O3PE�v�딳U�mV튝 v  �~�E�G�롋딶 焰RW�믑�~�"�^�^荀呵S �,멣��O�슠���aVW� 넂vN4뉸뎈� ���:g�8꼪�&�+#�K %?K쵮3楕힑헋�  |�돘腕)g닏 佃˝,D쀪괡`僥�뷤쀪��싧濁C*�,�(io>o�u 뗤뾡딟~�쀧곀fR�=얧C�뢊E쫋�5S��&x돍W�W펶 �u뭹�7u�읦�o를��:)�l����딄�4l�q)죐�+F;6� g�gE꿆d劣{먌&쾲�D机 DO( 엎�^�}B�FCｊ�C�&�&�뉶P��F��~� s� �#�+�Y��셾~r�u�~B*5r�꿝뀎퇲�Y'WU� r (e}��?H��먽b볽?셜�b>�Gb3��6U6�I챓��%�%Y괋픰!j땘`YY닎B�b�,了�V}I�m푄 鷺B\r�3��&�7곫��倒F �tTD�#8ㅬ�v � (u퀃+�(뻀P흷dc/%E� @�콗r� 豌� ^1�;~@*�凹뉶����@=v��뺁�.�㎀A�K�.A� 瑥3�;=;X뮧l3xxxd H@xo(H簫�k�=�� N�귷���$Y!�뽬T!� g��RR�^� F�`쪷�힓�����G�紀*�&5"|�kA��FQ �@�늾퇛�1! �~+麟+��렳&�&峠( �MP@�M0�,'漣8�� �>�>|預9#�O 떲�^�Y�� 픲퇞(澤0A燿�{拖a���u �?�0�, 2R�0  �>뭦fK� �: e YT!Y�> � 퇥A쮂藤Y�N\�6V!�@Y_�덏��$/�a�/��!虞h鏤�sㅧ�m눕�2�s��� 釪��x�껖o蓄~�{�f��;봚�a�JcE덩�M뇳�#� �촸 :���>gK:u��(���栯.!몲Y�쒩��V� F�렻�^1�����*��.��@#�啼�Se=��u툊��떾,_QT/�굜녫�� 줏w%t� �&��F�$�!�lO괆졜롇�*�4&d�:�:蛾m���R�뒉長瀆팈.9tCC順��.P�g �+-0�3�g^�Q핇Um륳*9;푓t�FP�撓�eN �Jp"�6�"�"(쬷�"�"콣U"�"Ng���$ 2綬뽬Tq�M9�p���Ｎaw)뀞�Y�)�v 궶�| ��足L읫'u堯3�F1 .u8딽 �0@%좷&=?뎳婦;_ A;A=f���*��宣dㄾ省C.�톈#�"휥�c索�a�붮�붾)밊LlNhl���쮵���/O�\쭽z�7z��뭕Doy AZS�yu,�,�+M4F�%��!�)�몂I%�� %EGXcdefgino(@ps|x�X�]H�� ���% �컷%C(큘꺘kT몍u5홯u`d &딾S!D뻇놚�-* ��렚�2吊55쇃 4nt9꺁�+| rJ�"�-뻉N�.�.腿堆껥雜=�;훎r� 뵌#�뉸炡� 潘톟 �5;쬇� !�^�십�2�륍-뵗 itD� v�뙀″�w驃�P,-u�X � ���0t낀� 2�2�BQ$ 뙙 �녱 6A�C�' �u� ��� @EN&�wa�7�0�!峴''#糞��;�~O�퀋�+��곷縟껥4t}Ea�ゲa� hus�A莢떿Y潑~t]�� EmE0�EaE붕 :턷� PP�P僑빉쓈慘D�콎 쯽 꺆�}� � LtM�fSL�Fu(t�) T�~ }�u 8A�7Cp9뎳�I�4u U(!?!뚕�$梢떀%돃벆Q���$�#�;�Va6싡�봳1� 1��+�뛾걵딽X ��c|G�Y@rsu�넰� �끱혊"�0�Y�>w��B딎5큩澯Ap3MY([Mvt#뛴��볒�0쐴캛e퇕k�r꼘랷9�f�H�떜eGt� Sc>�뼊e� M 3옒�AJ�3 3-H�<捻킌== c~�3��@��VK3���b�>璉튰�'�8�5�싍츺$��*- rえ엪U �"A�A�;(�Vr��;F r覩\S�R��J/�+�P$G�=u졡t� 0K�Vr�_f퓤쌀�-]�]<틲W¾|)Z ��Et:v�26�-�-�s4釀jc믈끗#hJh줠 Yot��Y'v쳖ㅮ�v;#.v*u �l�D/H�O r�Cg/Q둷�T�NuB�B�/�gDVNP 껥A|�rZ 떾 J콣{!a6=!z!��!斑� 뉻4���7��7��~�0쳑9w E곣t足늄AF�4�� 8FPEM弛�cSfeJ곂恍�u�6�2� 돱u�}D}}K)}�+1度�#�F�-�x쓎뎿 �nz�Dr+uw�"-u�*e붢눩Y堆�@�1�;��n쉻FEo�� t��j� |��^�"��<���"t欌U�B 끱I�&腥쮞 hl�R�3뼲� �~쭶 "~�읞[ �}i�. �#a�몸꼆KT1 떿웻��쐜3V�T拖�2  3<�!.;� Q 46 ��!%!C!�!� y!}E0s)$r��諾|釪RI*뗞洛쇚.殆욨�뗔잆�:8`6|駱6뗟곥�薺 宅뒊zA$��^|笙팪�r�0�uh�h� hI7h�*6u賂����W�+~ +친~�~�陷뎧깪y�"$S% F&�f%;몒|�t,8�=p �y+� t�nz�F5�h���� `픺�"~웍�2�/?|� 홹7 u2/�瑄Д c낙�줎FV�侄zi� #� � T$.@�#[#�#�#�!�좒 촙�^x盾Q �읽 |槃퀋굁�룃A��Ap쵖�씟� �I �i�쌽흁柰容�95t%곣@4녈 �CT뽽Q퐕�|��#u�R◁꽪쭀꼕�]�W� �u]WWW�뷑����&뗽H�#;�c�껖| 촺� |�뎧�置$돮F>딳99i<#�<;&|煐R퍨ZbZtr뜪Lv炚?죠`W�뛈��[⑸z깓{i�쑗%젣�&�%�%�&N&멑=쐖�ib(�쨷쒆)쑼FE�-u�}Wi/i쩂 0쐡멑쑪 �i� 쑉-돏~!| ~몟�獪 �2챃&貸 �u t $I$}溜 $b}턭0v9 륾�Azn`획생(H1 m�G2!"'()*X캥,�./:;<=�>?[\C^{}|}~a)&�냺�t퀕� u�n�A픝G)�"�꿗9~�, f~ �~WF0붡2|흟� U컪��멊�`扉�n�> Bte폖�$H꺠�G�} A��틌3킳�度�81�1hr뫤ow8샔% Y:屋�蔭�%�횼��M&�tG{��;뤭Qt.�|��� 죥�f�뗱붻t $E� �떾cF�+슙M�$B$ }�� zX�Y�<�DkUJ� B�黨q=뢅x�u쐒pY亂큣e|�엄侖�o�j4dh� 픲�e =찉, H�F= ��릇� HzHH陷r�>쟏te��;���=~W� R뵣�|RIl#uRb k�X�+�[ -\K$��8� 傭ccヒ��0빠�Y [�PYH]- �1"�`�; F믠@����!峨� 읬E!G!�|}!tC�@ 듦ュ�#*圓�H_鑽�&븇莞膾�O笙싌h�!��?l�0a�)�F춚N9j#m�4@例�텉�*(: ７��<zC�댃}tE늅i��0N횢獻S(癩M�뉝tn쐰S�z ��"m3�� 껰���|"�a�Th�(�!PQ ЩW� 뤠Fk�,��Q];�],們c植���ckR빙行�%펼� Z�t�Z�} 頭��� m��&洧⊂6c�앻튷n먱�hA m2 �'s�r�u뇬� h� -� ��1�#cZBS[?pL r��?�傘 ��킘�� �7\5�v �궭 쫕�>�� wm�2�i街jj�q7@퐠j8s%唵펭' �劃]뀸S�U謹�����O↔O9M�)J五쎏떪�m除k�� 홤녞*As�c쓆 Atk��*B븠�)P� H44 �ⅸm밸mF좗�;を, H�YY솄V��땨>侮�d콼 � N� 딢迷9긘뀛BT�잂n�^�*둅;Lr텮t嵐r�덬PSQ�< t(< t僚� � 퉳@R.�~;��젇Y[X2�0士R_섾C$.줺j-O.� �*鉉P男렳쾪������|�륞Vr轅����'):'�'�@롔팿���!C愉��46��.�&쟑�Q�뾖R�둽둞Rㅟ�Z[�:�힓K�흫F�({5� P<���.�SQVW鏃46 �PG컌뗗XS O[怒 ) w�  �wH핟[� &�[떸�] D퍃@>將<:쏼�%% x_^Y[�3즱�*떉JBCa[u����\�YY�#�?!�FF贇릉e^C� 녴R@A)둕�v둵��^ ��rJ�Zu� )�'랥HW2� &'鮮&�읭悉�咐�P}�F�꺝YD�� v�V穩뵢�YP�RV$嘶쓺J附�[렬SiSN�0�뗥%��E�棅�� D炘Y�&�#�K�(7�SIH퓪�Y~���~h�%yy됝06푂(�;>�O� �u�6릢 W툟"g� 뀀i�>ZKu?떿긱�� 끗亂懶��떊(TG좷G�@�렺&�7颱R�룽�곫��괓�v*�#?�}6챊Y6�&v!챬�_蟻 D篩l�DD룪�6VKTY�]�씦1���^� toIYI爾�A行�OfDg�룇]� }d숗>�M��% �혞J엹~�곭좡DEa楠)0���? 찜<{퐜,� ��"�/SG�~訝悳P�;�Or2u;�N$*�먁璘QぺB�찴���1 펩퐸}�Vx��MPPV6s1x阪u# c|� �tM:㎈�'W�$3EM~M 뉿W�4�(�n�e됷*I�O(�4똿�ru>.6쇥a��!찯�a!���{親 礫�꼩뉢�療�.|E� �꺿 � =Fe%}73춬_9B꽉3�� �@伎��U걜��A處딽3딳 �u �ti �t�epuy�� �꺩 JP 鵡�꺳��뗩� W3n� �娜懦;�r w@;�r+��@洵[胎봭t떾뗖卵 寥갢 쮰�罷g�!떷3陋�V뼊끐B 鬪�闖�K� �^�M흚�~ 滉稶���懲C��s뗗�岱待浸��宅 沓��B9�3�個�朴腕�� 횦r�렺a뵑�S�} 討慟����B��s겶듻�壘2��딅^���%[諶慄B L]B�+A�A+� Ax�6꺝S�6-x�%봷�7��듉�쏶|5- �--�+홤�A,�2�+�.CL boot: ex0tend sectoP(r reaerr �( %sP 8Aolix'managQP v. 0. 1.2 26-Aug-99�,ess ESC fastlyJ�Ting�RRuptjqu`wceZhelp - 뼑hE&dlo�a넥m�x �[ ��:@걂vali긠evic�@partiUCe愈A 7 :(  %PANIC! C lus홹ize=f%i1콺�7o�꼏� eYL쌙gza�(� Ma�supp*�?\cG {+뎱%#�( abs�%c�"u(KH H�`%s'럘nd. Fir�]?weWr3Sz .L�ing d헚04X:0�MZCOM KERNELsilleg� L6Hdr@ =2�n EXEC! ynp뼵}=Dt�%Fs틒�F�?F�퉞翩S]WA(舒INGVMaybe,�とv�7�=In 13h쾂�qcha \�ed�RB�y*Dv� �1]MSDE&�tiB�s�oftwar�cu F.eZA2id뾖(akL a Vo HuQ�)귺* Pf�/Qod(ul뺻r.Web� ht�MBRlR�遺$���HPREpBOOT짲D'�%12LMO혛NODUMPB쭱pr웖0OFlag '%c'h縟n`간�  w�-+ #�00�c�+FNhlL+D纖ifi㈌�_f �ouxXfeEgGc�spn%3겖늯ype7��z(null)�w*"뒖jGbIjsjD123456789ABCD�EFGHIJKLMNOPQRST늿XYZ=nf壓V@�w '�d� ��;嗽�뼐@0첕젂챴 "iy�[�3윕`R*�T��. �A9O 긭uit, 깑뀈귛co{�eArjBuB�B얙쵢�B�B�BC)C4�CJC\CyC괖쁂No�BspB�NC2뀳Nm뻒柱��~rkWrP|e�o봀ct푌 � ID b* `Re��VCA(AT�DMA�*첗S� o2�&( f64K擒)� e. 놮긃ackN덪CRCS맡EC 6�x�! �TC{k@쒘칎k),P���Time (�&팙eHned츇��= �6g눾M �]`8_%2X`�6Zi�똇둮n(iX�8tryX" r)b$т_�4 ?b�src/bm/boot.c0100664000076500007650000006067506761255342012633 0ustar prool2prool2#define VERSION "Proolix boot manager ver. 0.0.1.2 26-Aug-99" /* #define DEBUG */ /* History in reverse order 0.0.1.2 26-Aug-99 - 0.0.1.1, compile by Turbo C 2.01 (all previous compiled by TC 2.0) 0.0.1.1 23-Feb-99 - add NumLock off, anykey for interrupt boot sec. 0.0.1.0 10-Mar-98 0.0.0.29 15-Feb-98 0.0.0.28 4-Feb-98 0.0.0.27 18-Aug-97 0.0.0.26 10-Aug-97 0.0.0.25 31-May-97 0.0.0.24 31-May-97 0.0.0.23W 12-May-97 - add command MORE and NOMORE 0.0.0.22 11-May-97 - F1 - boot from 1st HDD 0.0.0.21 6-May-97 - 誠�쳽췅 �젩��� � か졹收�젹� ㄾ 32� ˚ヮ葉收レ�� 0.0.0.20 1-May-97 - fixed case Cylinder>255 in HDD 0.0.0.19 27-Apr-97 - booted from A:, B:, C:, D:, etc... 0.0.0.18 26-Apr-97 0.0.0.17 23-Apr-97 0.0.0.16 22-Apr-97 0.0.0.15 21-Apr-97 0.0.0.14 20-Apr-97 - �漱�˙�� ‘レ溫� ＋渽 � mov SP, ... 0.0.0.13 19-Apr-97 - add boot.h and AUTOSTART preprocessor variable 0.0.0.12 12-May-96 - �萸α Cluster � static 0.0.0.11 21-Apr-96 0.0.0.10 20-Apr-96 - /boot 收��閃 世졻 PKLite'�� 0.0.0.9 15-Apr-96 - ㄵ쳽� 쭬｀習ゃ � ヮ‘． �젳ㄵ쳽 ˘�曄c收�� (� �� 獸レぎ � C: 첓� 將� 〓ギ �젺麟�) 0.0.0.8 11-Apr-96 - 誠�쳽� �젩�栒 � FAT �젳Д昔� ‘レ蜈, 曄� 64� 0.0.0.7 6-Apr-96 0.0.0.7 5-Apr-96 0.0.0.6 4-Apr-96 0.0.0.5 31-Mar-96 0.0.0.5 30-Mar-96 - HDD... 0.0.0.4 27-Mar-96 - add "dump" command 0.0.0.3 25-Mar-96 0.0.0.2 18-Mar-96 - �젩��젷� 獸レぎ � か졹收�젹� 1024� (�젩��젷� � 3" 720k ㄸ稅β젹� � �� �젩��젷� � 3" 1.2M) 0.0.0.1 13-Mar-96 0.0.0.1 12-Mar-96 0.0.0.1 9-Mar-96 0.0.0.0 27-Feb-96 */ #include #include #include #include #include #include #include #include #include #include #include "boot.h" #define AUTOSTART #ifndef DEF_BOOT #define DEF_BOOT 0 /* default boot device 0 - a: 1 - b: 2 - c: */ #endif #define CLUSTER_ADDR MK_FP(0x4050, 0) #define FAT_ADDR MK_FP(0x5050, 0) #define COMMAND_LINE 80 #define KERNEL_BEGIN_SEG 0x60 #define EXE_HEADER_SIZE 0x1c #define MAX_CLU_SEC 64 /* 64 */ /* 16 */ #define PSP KERNEL_BEGIN_SEG-0x10 #ifdef _HERCULES_ #define MAIN_COLOR 7 #else #define MAIN_COLOR 11 #endif #define ReadPhysSec2 ReadPhysSec unsigned char NearBuffer [SECTOR_SIZE]; char far * pCluster; unsigned long RootBeg; unsigned long RootEnd; int CurrentDevice; int FATMode; struct BootStru *B; char huge *FAT ; int NextDrive=2; /* disk C: */ int NextDOSDrive='C'; void kernel_start (void); struct DeviceStruct Devices [LASTDRIVE]; /* Devices [0] - disk A: sec=0 if not present Devices [1] - disk B: sec=0 if not present Devices [2] - disk C: sec=0 if not present Devices [3] - disk D: sec=0 if not present ... */ /*--------------------------------------------------------------------------*/ int TextAttr=MAIN_COLOR; char far *KbdStatus; char Russian [256]; char Buf [SECTOR_SIZE]; char Buf2 [SECTOR_SIZE]; char MBRBuf [SECTOR_SIZE]; char command [COMMAND_LINE]; int errno; int SectorsOnCyl; unsigned long MaxSectors; int TrkSecs; int HeadCnt; int CluSize; unsigned int CluSizeBytes; int FatSize; int FatCnt; unsigned long ResSecs; unsigned long DataStart; unsigned int TargetForBugs; unsigned int MaxClusters; int More=0; int NLine=0; /****************************************************************************/ void cold (void); void hdd2 (void); void out_os (int c); #include "..\kernel\ppt.c" /****************************************************************************/ void ident (void) { printf("\n\n%s\n\n",VERSION); #ifdef AUTOSTART printf("Press ESC fastly for interrupt boot sequence\n"); #endif printf("help - help\n\n\ Enter - load standard Proolix kernel\n\n\ F1 - forced boot from 1st HDD\n\n\ "); } /****************************************************************************/ void help (void) { ident(); printf("\ help - this help\n\ 0:\n\ 1: - set FDD\n\ 2:\n\ 3:\n\ ... - set HDD\n\ reboot - hot reboot\n\ cold - cold reboot\n\ msdos - load OS from HDD 0\n\ hdd2 - load OS from HDD 1 (if present)\n\ ls - ls\n\ more - set more on\n\ nomore - set more off\n\ dump filename - hex dump of filename\n\ "); } /****************************************************************************/ int TR (int curdev) { if (curdev>1) return _HDD_; /* HDD */ else return curdev; /* FDD */ } /****************************************************************************/ void RestoreVec (void) { } /****************************************************************************/ int sema_lock (void /* ;) */ ) { return 0; } /****************************************************************************/ void sema_unlock (void /* ;) */ ) { } /****************************************************************************/ int putch__(char c) { switch (c) { case 0: c=' '; break; default: if (c<' ') c='.'; } return putch(c); } /****************************************************************************/ #ifdef DEBUG void out_boot(void far *buf) {int i; unsigned long DiskSize; unsigned long TrueSectors; struct BootStru far *b; b=buf; printf("\n\ ----------------------------------Disk parameters:------------------------------\n"); printf("Jump command %02X %02X %02X \n",(*b).Jmp[0],(*b).Jmp[1],(*b).Jmp[2]); printf("OEM name %-8s\n\ OEM name ",(*b).OEM); for(i=0;i<8;) printf("%02X ",(*b).OEM[i++]); #if 1 printf("\nSector size %4i bytes Cluster size %1i sect\n",(*b).SectSiz,(*b).ClustSiz); printf("Reserved sectors (before 1st FAT) %2i FAT counter %1i\n",(*b).ResSecs,(*b).FatCnt); printf("Root directory entries %4i Total sectors %7u\n",(*b).RootSiz,(*b).TotSecs); printf("Media descr %02X FAT size %5i sect\n",(*b).Media,(*b).FatSize); printf("Track size %2i sec Heads %2i\n",(*b).TrkSecs,(*b).HeadCnt); printf("Hidden sectors %7li Big Number Of Sectors %7li\n",(*b).HidnSec,(*b).BigSect); printf("Physical Drive No %02X Extended Boot Signature %02X\n",(*b).DriveNo,(*b).BootSign); printf("Volume Serial No %04X-%04X\n", (*b).SerialNo[1], (*b).SerialNo[0]); #endif printf("\nVolume Label (in boot) "); for(i=0;i<11;)putch__((*b).VolLbl[i++]); printf("\n "); for(i=0;i<11;)printf("%02X ",(*b).VolLbl[i++]); printf("\nFile system Id "); for(i=0;i<8;)putch__((*b).FileSysId[i++]); printf("\n "); for(i=0;i<8;)printf("%02X ",(*b).FileSysId[i++]); if ((*b).TotSecs==0) TrueSectors=(*b).BigSect; else TrueSectors=(*b).TotSecs; DiskSize=((long) (*b).SectSiz * TrueSectors)/1024l; if (DiskSize>5000) { DiskSize/=1024; printf("\nDisk size %li Mb\n",DiskSize); } else { printf("\nDisk size %li Kb\n",DiskSize); } } #endif /****************************************************************************/ void setdisk (int NewDevice) {int sec, head, trk, olddevice, oldpart; unsigned long i; olddevice=CurrentDevice; CurrentDevice=NewDevice; if (NewDevice>1) { /* HDD */ if (Devices[NewDevice].sec==0) { printf("bootman: invalid device\n"); CurrentDevice=olddevice; return; } head=Devices[NewDevice].head; sec=Devices[NewDevice].sec; trk=Devices[NewDevice].trk; if (ReadPhysSec (_HDD_, sec, head, trk, Buf)) { printf ("boot: partition boot sector read error\n"); CurrentDevice=olddevice; return; } /* printf("========================================================\n"); */ B = (void *) Buf; #if 0 out_boot((void far *) Buf); #endif HeadCnt=B->HeadCnt; TrkSecs=B->TrkSecs; SectorsOnCyl=HeadCnt*TrkSecs; #if 0 ResSecs=(unsigned long)Devices[NewDevice].sec+ (unsigned long)Devices[NewDevice].head*(unsigned long)TrkSecs+ (unsigned long)Devices[NewDevice].trk*SectorsOnCyl; #else ResSecs=(unsigned long)(Devices[NewDevice].sec & 0x3F)+ (unsigned long)Devices[NewDevice].head*(unsigned long)TrkSecs+ (unsigned long)(Devices[NewDevice].trk|((int)(Devices[NewDevice].sec & 0xC0)<<2))* SectorsOnCyl; #endif #ifdef DEBUG printf("ResSecs=%lu\n",ResSecs); #endif MaxSectors=Devices[NewDevice].MaxSectors+ResSecs; FATMode=Devices[NewDevice].FileSystem; } else { /* FDD */ if (Devices[NewDevice].sec==0) { printf("bootman: invalid device\n"); CurrentDevice=olddevice; return; } if (bootread0 (CurrentDevice, Buf)) { printf ("boot: boot sector read error :( \n"); CurrentDevice=olddevice; return; } B = (void *) Buf; #if defined (DEBUG) out_boot((void far *) Buf); #endif if ((i=B->ResSecs)!=0) ResSecs=i; ResSecs=B->HidnSec+1; if ((i=B->TotSecs)!=0) MaxSectors=i; else MaxSectors=B->BigSect+B->HidnSec; #ifdef DEBUG printf("MaxSectors=%li\n",MaxSectors); #endif HeadCnt=B->HeadCnt; TrkSecs=B->TrkSecs; SectorsOnCyl=HeadCnt*TrkSecs; FATMode=FAT12; } CluSize=B->ClustSiz; if (CluSize>MAX_CLU_SEC) printf("\nPANIC!!! Cluster size=%i sec - is too large for this realization\n\n\ Max supported cluster size=%i sec\n\n",CluSize,MAX_CLU_SEC); CluSizeBytes=CluSize * SECTOR_SIZE; FatSize=B->FatSize; FatCnt=B->FatCnt; RootBeg = ResSecs + B->FatCnt * B->FatSize; RootEnd = RootBeg + ( ( B->RootSiz * 32 ) / B->SectSiz ) - 1; DataStart = RootEnd+1; MaxClusters=(unsigned int)((MaxSectors-DataStart)/CluSize+1); #ifdef DEBUG printf("RootBeg =%lu\n",RootBeg); printf("RootEnd =%lu ",RootEnd); printf("ResSecs =%lu ",ResSecs); printf("MaxSectors =%lu =%08lX MaxClusters =%u\n", MaxSectors,MaxSectors,MaxClusters); printf("\nHeadCnt =%2i TrkSecs =%2i FatSize =%2i FatCnt =%1i\n", HeadCnt,TrkSecs,FatSize,FatCnt); printf("B->SectSiz =%i ", B->SectSiz ); printf("B->ClustSiz=%i ", B->ClustSiz); printf("B->ResSecs =%u ", B->ResSecs ); printf("B->FatCnt =%i ", B->FatCnt ); printf("B->RootSiz =%i ", B->RootSiz ); printf("B->TotSecs =%u ", B->TotSecs ); printf("B->Media =%02X ", B->Media ); printf("B->FatSize =%i ", B->FatSize ); printf("B->TrkSecs =%i ", B->TrkSecs ); printf("B->HeadCnt =%i ", B->HeadCnt ); printf("B->HidnSec =%lu ",B->HidnSec ); printf("B->BigSect =%lu ",B->BigSect ); printf("B->DriveNo =%02X ", B->DriveNo ); printf("B->BootSign=%02X ", B->BootSign); printf("DataStart = %lu ",DataStart); printf("\nCluster size = %u bytes\n",CluSizeBytes); #endif } /****************************************************************************/ void ls (void) {int i, k; unsigned long j; struct dirent *Ent; for (j=RootBeg;j<=RootEnd;j++) { if (absread (TR(CurrentDevice), 1, j, Buf2)) printf ("boot: sector %lu absread error\n", j); else { for (k=0;k<16;k++) { Ent = (void *) (Buf2+k*32); if ((*Ent).d_name[0]==0) continue; if ((*Ent).d_name[0]==0xE5) continue; #if 0 if ((*Ent).Attr.B.Label) continue; if ((*Ent).Attr.B.Dir) continue; #endif for (i=0;i<11; i++) printf("%c",Ent->d_name[i]); printf(" %u\n",Ent->d_fileno); } } } } /****************************************************************************/ void load_and_run (char *KernelName) {int i, k; unsigned int Clu; unsigned long j; unsigned len, len1; struct dirent *Ent; char DirectoryRecord [11]; char huge * Adr; struct exe_header far * H; unsigned int far * Rel; unsigned int I_OFF, I_SEG, RELO_SEG; for (i=0;i<11;i++)DirectoryRecord[i]=' '; memcpy(DirectoryRecord,KernelName,strlen(KernelName)); for (j=RootBeg;j<=RootEnd;j++) if (absread (TR(CurrentDevice), 1, j, Buf2)) printf ("boot: sector %lu absread error\n", j); else { for (k=0;k<16;k++) { Ent = (void *) (Buf2+k*32); if (Ent->d_name[0] && ((*Ent).d_name[0]!=0xE5)) { if (Ent->Attr.B.Label) continue; if (Ent->Attr.B.Dir) continue; if (memcmp(Ent->d_name,DirectoryRecord,11)==0) { printf("Kernel `%s' found. First cluster=%u Size=%lu\n", KernelName,Ent->d_fileno,Ent->Size); printf("Loading to %04X:0000\n",KERNEL_BEGIN_SEG); /* Load FAT */ j=ResSecs; FAT = FAT_ADDR; #if 1 for (i=0; id_fileno; Adr = MK_FP (KERNEL_BEGIN_SEG,0); CluRead(TR(CurrentDevice),Clu,(char far *)Adr); if (memcmp((char far *)Adr,"MZ",2)) { /* COM */ printf("COM KERNEL\n"); Adr += CluSizeBytes; Clu=NextClu2(Clu); while (Clu!=0xFFFFU) { CluRead(TR(CurrentDevice),Clu,(char far *)Adr); putch('#'); Adr += CluSizeBytes; Clu=NextClu2(Clu); }; kernel_start(); } else { #if 1 memcpy(pCluster,(char far *)Adr,CluSizeBytes); #else {int ii; for (ii=0;iiHdrSize) > 0x20) {printf ("boot: illegal HdrSize = %04X",len1); goto l1; } /* 쭬｀習첓 �젵쳽 � 럤� */ Adr = MK_FP (KERNEL_BEGIN_SEG,0); #if 1 memcpy((char far *)Adr,pCluster+(len1<<4), len=CluSizeBytes-(len1<<4)); #else {int ii, jj; jj=len1<<4; for (ii=0;ii<(len=CluSizeBytes-jj);ii++) *(Adr+ii)=*(pCluster+jj+ii); } #endif Adr += len; Clu=NextClu2(Clu); #if !defined(_HERCULES_) textattr(9); #endif while (Clu!=0xFFFFU) { CluRead(TR(CurrentDevice),Clu,(char far *)Adr); #ifdef DEBUG putch('#'); /* printf(" %08lX",Adr); */ #endif Adr += CluSizeBytes; Clu=NextClu2(Clu); }; /* 췅飡昔ø� ��誓Д�젰щ� 젮誓貰� */ puts(""); Rel=(unsigned int far *)(pCluster + (H->TablOff)); for (i=0; iReloCnt; i++) { /* printf(" #%02X",i); */ I_OFF=*Rel++; /* printf(" I_OFF=%04X",I_OFF); */ I_SEG=*Rel++; /* printf(" I_SEG=%04X",I_SEG); */ RELO_SEG=KERNEL_BEGIN_SEG+I_SEG; /* printf(" RELO_SEG=%04X",RELO_SEG); */ *(unsigned int far *)MK_FP(RELO_SEG,I_OFF) = *(unsigned int far *)MK_FP(RELO_SEG,I_OFF)+KERNEL_BEGIN_SEG; putch('@'); } #if !defined(_HERCULES_) textattr(4); #endif puts("\nEXEC! "); *(int far *)MK_FP(PSP,0)=0x20CD; /* INT 20H :) */ *(int far *)MK_FP(PSP,2)=0x9FFF; /* ㄻ� LZEXE */ *(int far *)MK_FP(PSP,4)=CurrentDevice; /* EXEC ! */ /* ES = DS = PSP */ /* SS = START_SEG+ReloSS, SP = ExeSP */ /* CS = START_SEG+ReloCS, IP = ExeIP */ /* (ぎ쵟�ㅻ: PUSH seg; PUSH offset; RETF) */ i=H->ReloSS+KERNEL_BEGIN_SEG; asm mov cx,i; i=H->ReloCS+KERNEL_BEGIN_SEG; asm mov dx,i; i=H->ExeSP; asm mov si,i; i=H->ExeIP; asm mov di,i; asm mov bx,PSP; asm mov DS,bx; asm mov ES,bx; asm cli; asm mov SS,cx; asm mov SP,si; asm sti; asm push dx; asm push di; asm retf; } } } } } printf("Kernel `%s' not found\n",KernelName); l1:; } /****************************************************************************/ void dump (char far *Command) {int i, k, Clu; unsigned long j; unsigned len, len1; struct dirent *Ent; char DirectoryRecord [11]; char far *FileName; char far *ppp; if ((FileName=strchr(Command,' '))==NULL) return; FileName++; if (*FileName==0) return; printf("Dump %Fs\n",FileName); for (i=0;i<11;i++)DirectoryRecord[i]=' '; memcpy(DirectoryRecord,FileName,strlen(FileName)); for (j=RootBeg;j<=RootEnd;j++) if (absread (TR(CurrentDevice), 1, j, Buf2)) printf ("boot: sector %lu absread error\n", j); else { for (k=0;k<16;k++) { Ent = (void *) (Buf2+k*32); if ((*Ent).d_name[0] && ((*Ent).d_name[0]!=0xE5)) { if ((*Ent).Attr.B.Label) continue; if ((*Ent).Attr.B.Dir) continue; if (memcmp(Ent->d_name,DirectoryRecord,11)==0) { printf("File `%Fs' found. Cluster %u\n",FileName,Ent->d_fileno); #ifdef DEBUG printf(" press any key "); getch(); #endif /* Load FAT */ j=ResSecs; FAT = FAT_ADDR; for (i=0; id_fileno; #ifdef DEBUG printf("FAT loaded\n"); printf(" press any key "); getch(); #endif while (Clu!=-1) { CluRead(TR(CurrentDevice),Clu,pCluster); ppp=pCluster; for (i=0;i>6)+1; if (i) Devices[0].sec=-1; if (i>1) Devices[1].sec=-1; if (*(char far *)MK_FP(0,0x475)) /* 40h:75h - number of fixed disk drives */ if (bootread0 (_HDD_, MBRBuf)) /* [Interrupt List] */ printf ("boot: MBR read error\n"); else { /* printf("# head sec trk ResSecs MaxSectors\n"); */ process_partition_table (MBRBuf); } else ; /* outMBR(MBRBuf); */ } /****************************************************************************/ char *gets (char *s) { int i; char buf[MAX_LEN_STR]; char c; for(i=0;i'); gets(command); strupr(command); /* printf("\ncom=`%s'\n",command); */ if (command[0]==0) { load_and_run ("KERNEL"); } else if (strcmp(command,"HELP")==0) help(); else if (strcmp(command,"REBOOT")==0) reboot(); else if (strcmp(command,"COLD")==0) cold(); else if (strcmp(command,"MSDOS")==0) msdos(); else if (strcmp(command,"HDD2")==0) hdd2(); else if (strcmp(command,"LS")==0) ls(); else if (strcmp(command,"MORE")==0) More=1; else if (strcmp(command,"NOMORE")==0) More=0; else if (memcmp(command,"DUMP ",5)==0) dump(command); else if (command[1]==':') { setdisk(command[0]-'0'); } else { load_and_run (command); } } }src/history.doc0100664000076500007650000007440207010271742013275 0ustar prool2prool2댾獸黍� 췅�ⓤ젺⑨ 甸�� 뤲乘Ø�� � �□졻��� ��涉ㄺ� (� �勝も졾 ⓤ獸黍� �〓嶺� ��º����猶젰恂� 獸, 譽� ��琠Œ�刷 ��¡． � 獸� Œ� Þ�� ´褻Ŀ 甸��) 뙠獸ㄸ첓 �僧��졿⑨ ´褻Ł ι� �� 信獸纏졹�, �ㄽ젶� �黍Д惜瑜 ��젪Œ� �젶���: 꽑�� � 췅º���쥯�Ŀ ´褻Ŀ �‘㎛좂젰� 收ゃ芋� 쩆栒. 뫁�, 췅�黍Д�, � ¡稅誓醒�伊 쭬 뤲乘Ø� � ��舒臾 ㄵギ� Д�禎 쩆栒 ´褻Ŀ. 궘呻黍 收ゃ耀． ㄽ� (收ゃ蟯� 率獸�) 쩆�� � №�э (�졹�-Ж�呻�-醒ゃ�ㅻ) ぎНŒ湞Ŀ ㏇�젪ワ荻碎 젪獸쵟殊曄稅� ⓤ��レ㎜쥯���� �誓�昔璵遜�惜音 ��誓Д��音 ぎНŒ汀��� Turbo C 2.0 (__DATE__ � __TIME__). � 笹晨젰 ‘ゥ�-Д�ⅴ 率耀飡´��音 �㎚����Ł � 럱 뤲乘Ø�, � �젶┘ � 笹晨젰 �誘信첓 �曄誓ㄽ�． �ℓ젺⑨ 럱 � 聲β (췅�黍Д�, �吟�젪ゥ���� 췅 BBS Œ� ftp Œ� �졹�昔飡�젺����� �� �젵�-張�) �㎚��畑恂� ��Д� ´褻Ŀ. 뿥� 率耀飡´��ⅴ �㎚����⑨, 收� ‘ゥ� ㎛좂좈Ł �젳涉� ��Д�� ´褻Ŀ �誓收晳ⅱ젰� �㎚����⑨. (귣 �젹� ���º젰收, 譽� MSDOS 3.0 �漱①젰恂� �� 2.0 歲レ�ⅴ, 曄� 3.0 �� 3.1). 룼笹ⅳ�Ł (曄手�設硫) �젳涉� ��Д�� ´褻Ŀ М┘� 〓筍 �㎚���� 쩆┘ �黍 ⓤ��젪ゥ�Ŀ �ㄽ�� ��η졻え � �昔｀젹Д � �졹殊嶺�� ⅴ ��誓ぎНŒ湞Ŀ. TODO ? - ㅰ젵´贍 (DEVices) - 蝨젷ⓥ� ���拾�瑜 歲�. �留��� 殊캙 end Kernel History (In STACK (REVERSE) order) 댾獸黍� 甸�� � 럞��묱럩 ��涉ㄺ� Ver. 0.1.1.19 4-Nov-99 Ver. 0.1.1.18 2-Nov-99 - 쭬｀習첓 � 꼶�-�き� Windows 95 OSR2 RUS Ver. 0.1.1.17 26-Aug-99 - 0.1.1.16, compile by Turbo C 2.01 (all previous compiled by TC 2.0) Ver. 0.1.1.16 12-Apr-99 Ver. 0.1.1.15 3-Mar-99 Ver. 0.1.1.15 23-Feb-99 Ver. 0.1.1.14 22-Feb-99 Ver. 0.1.1.14 21-Feb-99 Ver. 0.1.1.14 20-Feb-99 Ver. 0.1.1.14 19-Feb-99 Ver. 0.1.1.13 18-Feb-99 Ver. 0.1.1.12 7-Feb-99 Ver. 0.1.1.11 22-Jan-99 Ver. 0.1.1.11 8-Jan-99 - 췅�ⓤ젷 exec() (�� 獸� execve(), 譽� 췅�ⓤ젺 拾� 쩆˛� � Мㅳゥ process.c, � 췅飡�玎Ł exec(), 譽� ▲ㄵ� ��席젷彛� �留猶졻藺� �� �昔璵遜�� � ▲ㄵ� 貰�手β飡¡쥯筍 循ⅰ�쥯�⑨� POSIX); �젶┘ 췅�ⓤ젷 ���硫 exit() Ver. 0.1.1.10 7-Jan-99 - fork() 쭬�젩��젷!!! :)) Ver. 0.1.1.10 6-Jan-99 Ver. 0.1.1.10 5-Jan-99 Ver. 0.1.1.9 4-Jan-99 Ver. 0.1.1.8 3-Oct-98 - ㄵ쳽� fork() Ver. 0.1.1.7 2-Oct-98 - ⓤ��젪ゥ�� �αぎレぎ �鼇‘�, � 獸� 葉笹� � ぎ쵟�ㄵ start (ㄵМ�飡�졿Ŀ 쵟モⓥ졹え�짛) Ver. 0.1.1.6 1-Oct-98 - 쭬�젩��젷 сレ殊�졹ぅ� !!! Ver. 0.1.1.5 30-Sep-98 Ver. 0.1.1.4 29-Jun-98 ��舒硫 쥯黍젺� ��쳽�ⓣ��蟯첓 (not worked) Ver. 0.1.1.0 15-Feb-98. 댾��젪ゥ� ＋渽, 쭬か蹟젪鼇⒰� � 獸�, 譽� 甸昔 �� �젩��젷� � �젵ギ¡� 歲飡�М� FAT-12 췅 ˘�收. �췅ギ（嶺硫 ＋渽 � ▲燧��ⅳ┘誓 〓� ⓤ��젪ゥ� 쩆˛� (� ´褻Ŀ 뤲乘Ø�� 0.0.0.21 (L) 31-May-97), �� ��-쭬 Мⅲ� �ⅳ�細�循� 젺젷�（嶺瑜 �㎚����⑨ � 甸昔 〓エ ˛α��� 獸レぎ 醒⑴졹. Ver. 0.1.1.2 8-Apr-98 Ver. 0.1.1.1 10-Mar-98 Ver. 0.1.1.0 14-Feb-98 Ver 0.1.0.33 14-Dec-97 Version 0.1.0.31 31-Aug-97 Version 0.1.0.30 24-Aug-97 - add system calls absread, abswrite; fixed bug (¡㎛Ø젪鼇�, αエ ㄻÞ� ��キ�． �呻� > 11. 뮙��閃 ��キ硫 �呻� М┘� 쭬�º졻� PATH_MAX 歲Б�ギ� (細. include/limits.h, 醒⑴졹 =255 歲Б�ギ�)) Version 0.1.0.29 17-Aug-97 Version 0.1.0.28 11-Jul-97 Version 0.1.0.27 30-Jun-97 Version 0.1.0.26 21-Jun-97 Version 0.1.0.25 9-Jun-97 � kernel.ovl ㄾ줎˙�� 쭬｀習葉� 說遜え� 歪ⓧ獸� (portions copyright by G. Shepelev) Version 0.1.0.26 31-May-97 Version 0.1.0.25 31-May-97 ⓤ��젪ゥ� 줎�, ¡㎛Ø젪鼇� � 笹晨젰 �留�쥯 read(h,buf,len) �黍 len>1024 Version 0.1.0.24 21-May-97 Version 0.1.0.23 18-May-97 Version 0.1.0.23 17-May-97 Version 0.1.0.22 15-May-97 Version 0.1.0.21W 14-May-97 Version 0.1.0.20W 12-May-97 ´褻Ŀ � 率狎Ø貰� "W" 貰□젺� �� ㄾ쵟, � 췅 �젩�收. 댾��젪ゥ췅 �鼇―� �黍 �젩�收 � FAT > 64K Version 0.1.0.19 11-May-97 Version 0.1.0.17 2-May-97 Version 0.1.0.17 1-May-97 fixed case Cylinder>255 in HDD Version 0.1.0.16 30-Apr-97 Version 0.1.0.15 28-Apr-97 �漱�˙�� ‘レ溫� ＋渽 � 聲筌� � 收�, 譽� 甸昔 �洙�НŒⓣ�쥯�� Turbo C 2.0 � Мㄵエ 캙э殊 small, ＄� ㄾウ�� 〓筍 DS=SS, � � Д�� 〓ギ DS!=SS Version 0.1.0.14 28-Apr-97 Version 0.1.0.14 27-Apr-97 booted from A:, B:, C:, D:, etc... Version 0.1.0.13 26-Apr-97 Version 0.1.0.12 24-Apr-97 add system calls wherex(), wherey() Version 0.1.0.11 23-Apr-97 Version 0.1.0.10 21-Apr-97 Version 0.1.0.9 20-Apr-97 �漱�˙�� ‘レ溫� ＋渽 � mov SP, ... (細. c0.asm �� 20-Apr-97) Version 0.1.0.8 22-Mar-97 Version 0.1.0.8 21-Mar-97 Version 0.1.0.8 20-Mar-97 Version 0.1.0.7 19-Mar-97 Version 0.1.0.6 13-Mar-97 - �昔´ㄵ� �졹殊嶺硫 졼ㄸ� ㏇ε �젵ギ� 췅 �誓ㄼβ ぎ�ⓣ젵獸� Version 0.1.0.5 9-Mar-97 Version 0.1.0.5 8-Mar-97 Version 0.1.0.4 3-Mar-97 Version 0.1.0.4 2-Mar-97 Version 0.1.0.4 1-Mar-97 Version 0.1.0.3 23-Feb-97 Version 0.1.0.2 17-Feb-97 H좂Þ좑 � ´褻Ŀ 0.1.0.0 � 뤲乘Ø醒, � 꼶�-姿乘汀�誓 �젩��젰� �漱젮葉� AFD-Pro (c) AdTec GmbH, 1987 Version 0.1.0.1 2-Feb-97 Version 0.1.0.1 1-Feb-97 Version 0.1.0.0 26-Jan-97 0.0.2.4 16-Oct-96 信循젺�췅 �鼇―�: �젺ⅴ ㏇� �젩��� � FAT (LinkClu()) ㄵ쳽쳽刷 �� � �‥º� ぎ�⑨Ж FAT 0.0.2.4 15-Oct-96 0.0.2.3 14-Oct-96 ⓤ��젪ゥ췅 �鼇―� � 聲筌� � DS!=SS (細. src/kernel/c0.asm) 0.0.2.3 13-Oct-96 0.0.2.3 12-Oct-96 0.0.2.2 29-Sep-96 0.0.2.1 16-Sep-96 0.0.2.0 12-Sep-96 0.0.2.0 11-Sep-96 0.0.1.30 10-Jun-96 0.0.1.29 18-May-96 0.0.1.28 16-May-96 0.0.1.27 15-May-96 0.0.1.26 15-May-96 0.0.1.25 12-May-96 0.0.1.24 12-May-96 0.0.1.23 11-May-96 췅�젷 ㄵ쳽筍 control-break 0.0.1.22 10-May-96 - fixed �αぎレぎ bugs... 0.0.1.21 ??? 0.0.1.20 ??? 0.0.1.19 21-Apr-96 0.0.1.19 20-Apr-96 0.0.1.18 19-Apr-96 0.0.1.18 18-Apr-96 - 貰ℓ젺 뤲乘Ø� mailing list proolix@infocom.kharkov.ua 0.0.1.17 17-Apr-96 - 貰〃�젷 뤲乘Ø� 췅 �젩�收 � 쭬�좂Ð젷 ⅲ� ��� ˘�� � �젳ㄵギ� 兒席졻� DOS 4.0. axl 췅�ⓤ젷 ㄻ� 뤲乘Ø�� 嵬獸嶺硫 ping (TCP/IP ��첓 �β) 0.0.1.17 15-Apr-96 - ⓤ��젪ゥ� 줎� � 押�ゆĿ printf(), ¡㎛Ø젪鼇� �黍 ⓤ��レ㎜쥯�Ŀ 兒席졻� "%lu". ⓤ��젪ゥ췅 押�ゆ⑨ ultoa() 0.0.1.17 14-Apr-96 0.0.1.17 13-Apr-96 - ⓤ��젪ゥ� 줎� � 押�ゆĿ getcwd() 0.0.1.16 11-Apr-96 10-Apr-96 7-Apr-96 - М� ㄵ�� 昔┐��⑨ 0.0.1.15 6-Apr-96 0.0.1.15 5-Apr-96 - ⓤ��젪ワ� ＋渽� �黍 �젩�收 � ˘�獸�... 0.0.1.14 4-Apr-96 - 쭬�젩��젷 � ˘�獸�, ��젪쩆 ＋渽젪� 0.0.1.13 3-Apr-96 0.0.1.13 31-Mar-96 0.0.1.12 30-Mar-96 0.0.1.12 27-Mar-96 - 췅�젷 ㄵ쳽筍 �젩�栒 � ˘�獸� 0.0.1.12 26-Mar-96 0.0.1.12 25-Mar-96 �誓ㅻㅳ�좑 ´褻⑨ �� ｀習Œ졹� � ㄸ稅β � �젳Д昔� か졹收�� 512�. 댾��젪ゥ��. 뤲�´誓�� 췅 ㄸ稅β졾 3" (720k � 1.44 M) � 5" (360 K � 1.2 M) 0.0.1.11 24-Mar-96 0.0.1.11 22-Mar-96 0.0.1.10 21-Mar-96 0.0.1.9 20-Mar-96 0.0.1.8 19-Mar-96 0.0.1.7 18-Mar-96 0.0.1.6 17-Mar-96 甸昔 殊캙 EXE � �↓�� �젩��젰�. 뫀�쳽췅 承젶�˚� 甸�� �黍 ��М蟯 �昔｀젹щ PKLITE by PKWARE Corp. 0.0.1.6 16-Mar-96 0.0.1.5 14-Mar-96 0.0.1.5 13-Mar-96 0.0.1.5 12-Mar-96 0.0.1.5 10-Mar-96 0.0.1.5 9-Mar-96 Boot-manager 收��閃 М┘� 쭬｀拾졻� �� 獸レぎ 甸昔 OS Proolix, �� � ㅰ膝�� 젪獸��Л瑜 �昔｀젹щ 殊캙 COM (췅�黍Д� 젪獸��Л瑜 ª贍 Arcanoid (ar.com) � Last Mission (mission.com) �� 캙ぅ�� Proolix Games (細. ㄾゃ � 첓�젷�％ games) 0.0.1.4 7-Mar-96 0.0.1.4 6-Mar-96 0.0.1.4 5-Mar-96 췅�젷 ㄵ쳽筍 甸昔 殊캙 EXE 0.0.1.4 27-Feb-96 �昔Д╉獸嶺硫 쭬｀習葉�, �� ┘ ™�黍嶺硫 쭬｀習葉�, �� ┘ Boot Manager ver. 0.0.0.0 쭬�젩��젷 !!! (｀習ⓥ 甸昔 殊캙 COM) 0.0.1.4 26-Feb-96 0.0.1.4 25-Feb-96 0.0.1.4 22-Feb-96 0.0.1.4 21-Jan-96 0.0.1.4 20-Jan-96 0.0.1.4 19-Jan-96 0.0.1.4 15-Jan-96 0.0.1.4 11-Jan-96 0.0.1.4 10-Jan-96 췅�젷 ㄵ쳽筍 �昔Д╉獸嶺硫 쭬｀習葉� /boot (ㄾ 將�． boot 醒も�� ´褻Ŀ 0.0.2.3 16-Sep-95 ｀習Œ �涉М 甸昔 (�젵� /kernel)). � 收��閃 boot-醒も�� ▲ㄵ� ｀習ⓥ� �昔Д╉獸嶺硫 쭬｀晨Ø /boot, � /boot ▲ㄵ� ｀習ⓥ� 甸昔 /kernel 0.0.1.3 29-Dec-95 0.0.1.3 28-Dec-95 0.0.1.2 27-Dec-95 - fork() ??? 0.0.1.1 25-Dec-95 - zarabotal perviy variant novogo systemnogo vyzova exec() 0.0.1.1 24-Dec-95 0.0.1.0 14-Dec-95 H럟썖 쓵�� � 룓뱥닁몗. 맆�ⅴ � ㄵ쳽� �曄�� Л�．� 첓� � MSDOS. 뮙��閃 Л�（� �졹殊 ��誓ㄵル쥯荻碎 ㄻ� ‘レ蜈� 貰¸α殊М飡� � Ħ��ギ（ⅸ UNIX. 궋�ㄸ恂� �젩エ�� �昔璵遜�� (struct processes � include/struct.h), �昔璵遜 1, 誠�쳽� ���硫 쥯黍젺� syscall (� ⓤ��レ㎜쥯���� �젩エ劣 �昔璵遜��). 꽑ゥ� ▲ㅳ� ��誓�ⓤ젺� 쭬��¡ exec() � exit(). 곥ㄵ� 췅�ⓤ젺 fork(). 궙㎚�┃� 蓀젳� ▲ㄵ� ㄸ召β曄黍쭬與� �� �젵Д說. 삩昔ぎ ⓤ��レ㎯荻碎 Ħⅷ Linux8086 by Chad Page, Minix, BSD, Ħⅷ, �吟첓쭬��瑜 �.Hε젰�臾 (vovik@glutton.uanet.kharkov.ua). 룼飡젪첓 뤲乘Ø�� ▲ㄵ� �率耀飡˙汀藺� �ㄽº �젵ギ� proolixN.arj (proolixN.z/proolixN.tgz), ＄� N - ��笹ⅳ�程 與菴� ��Д�� ´褻Ŀ (0.0.1.0 -> proolix0.arj, 0.0.1.1 -> proolix1.arj, 0.0.1.10 -> proolixa.arj etc). 0.0.0.112 13-Dec-95 11-Dec-95 - �첓㏓쥯β碎, 뤲乘Ø� ��席젷彛� ｀習ⓥ碎 � ˘��� 3" (720 � 1.44), � 첓ぎ� ´褻Ŀ 將� 췅�젷�刷, �ⅷ㎖α狩�, �� 收ゃ�좑 ´褻⑨ ｀習ⓥ碎 ��席젷彛�. H� ftp �維�┘�� 3" �□젳� image720.gz � image144.gz 0.0.0.111 10-Dec-95 - �� 押�ゆŁ ｀承� mem.h � string.h 嵩�젺� 췅�젷彛瑜 �昔´夕� 'if (dest==NULL) return NULL'. 렚� Д�젷� �젩��졻� � �젩エ璵� ´も�昔� �誓贍쥯�Ł (젮誓� ぎ獸昔� �젪�� NULL). � Minix'� 뮔���줎僧� � 젺젷�（嶺音 押�ゆ⑨� 獸┘ �β �젶ⓨ �昔´昔�. � 獸с ┘ 殺ぎ��Ж恂� ��Л�． 캙э殊. (윣昔 � �昔´夕젹� 쭬�º젷� 50820, � 收��閃 - 50340, delta=480 bytes) 0.0.0.111 9-Dec-95 8-Dec-95 7-Dec-95 0.0.0.110 6-Dec-95 誠. images 360K � 1.2M, �α申. �㎚. � ls � Ls 5-Dec-95 誠. pix.tgz 20-Nov-95 19-Nov-95 룯誓�α��� �� Minix � Proolix 夜ㄵ贍 ansi.h, 呻Œⓥ�: banner 15-Nov-95 0.0.0.109 12-Nov-95 - 獸 ┘, 譽� � 11-Nov-95, �α申α手���瑜 �㎚����⑨ � OS Proolix. � 誓㎯レ�졻� 收飡�� 信�젺�˙���, 譽� �黍葉췅 ㏇ε ＋渽�� - 줎（ � Мㅳゥ execve(). 꽡 젮젽�졿Ŀ Мㅳワ � EXE �젵쳽� (��첓 �ⅶ젶��曄����) 將ⓨ 줎．� �� 〓ギ. (�쩆��졿⑨ � EXE �젵쳽� 〓쳽 췅�졻� � ´褻Ŀ 0.0.0.102 �� 23-Mar-95) 11-Nov-95 - 咨召�黍Д�殊昔쥯� � 甸昔� Linux8086 0.00.3, �淫젷碎 ⅲ� 貰□졻� ��� 럱 Minix, �淫젷碎 貰□졻� ��� Minix bcc (將� ��ㄼ��┘飡¡ gcc �� Linux8086 0.00.3) 10-Nov-95 - �搜젷 VGA 첓設�. 뮙��閃 Proolix ▲ㄵ� ㄵ쳽筍碎 췅 깷夕乘α�. ("뼟β�瑜" �留��� setcolor/getcolor �漱젲��� �젺ⅴ, 췅 VGA) 0.0.0.108 8-Nov-95 0.0.0.107 8-Nov-95 0.0.0.106 7-Nov-95 - 誠. ぎ쵟�ㅳ more, ⓤ��. 줎� � ohs() 0.0.0.106 6-Nov-95 - ¡㎤メ� 貰 聖�夕�� �昔｀젹щ yap/more �� 럱 Minix. � 뤲乘Ø醒 �β curses � �ⅹ�獸贍� ��ㄿ昔｀젹� �↓ⅲ� �졷젶收�� (signal(), wait() etc...) 0.0.0.106 5-Nov-95 - � �昔｀젹쵟� ｀承�� printf �黍 ⓤ��レ㎜쥯�Ŀ ▲芯�� printf_buf, �琉�ワ�М． �� malloc, �昔ⓤ若ㅿ� 쭬˘�젺⑨. � ⓤ��レ㎜쥯��� ギ첓レ��． 쵟遜Ð� new_printf_buf (細. � printf.c), 첓� � 〓ギ �젺麟� (ㄾ ´褻Ŀ 0.0.0.106 7-Oct-95) �젩��젰� ��席젷彛�. 0.0.0.106 4-Nov-95 0.0.0.106 25-Oct-95 0.0.0.106 15-Oct-95 0.0.0.106 12-Oct-95 0.0.0.106 11-Oct-95 0.0.0.106 8-Oct-95 - ��誓ㄵ쳽�� �-與� ｀承�� printf, 쩆〓 ��� ⓤ�レ㎜쥯エ ▲芯� �� �� 飡ⅹ�, � �㎖�� 젮誓說�． �昔飡�젺飡쥯 甸��. 꾝젵´� ぎ�貰エ ��誓�ⓤ젺 췅 �. 궓說β... :( 0.0.0.106 7-Oct-95 - ��汀� 貰ℓ젰恂� ¿η졻ゥ���, 譽� 押�ゆĿ ｀承�� printf �曄�� 歲レ�� ⓤ��レ㎯荻 飡ⅹ, 飡ⅹ 췅ⅶ쬊β 췅 ぎ� � �昔ⓤ若ㅿ� ＋渽�. (뒶�+飡ⅹ 쭬�º젰� �ㄸ� 醒，��� - 64�, �黍 �誓�泣��Ŀ �젳Д�� ぎ쩆 �誓ㄵ� 55-56� � �猶�ㄵ ㄻÞ�音 飡昔� 曄誓� printf 췅葉췅荻 ¡㎛Ø졻� �����汀�瑜 ＋渽�, ぎ獸贍� ⓤ曄쭬荻, ぎ＄� 葉笹� printf � ㄻÞ� �猶�ㄸщ� º 飡昔� 僧��麟좐恂�). H��▼�ㄸМ ��誓�ⓤ졻� printf �젶, 譽�〓 � 첓曄飡´ ▲芯昔� ㄻ� 飡昔� ⓤ��レ㎜쥯エ刷 �� ギ첓レ�瑜 쵟遜Ð�, �젳Д�좐蟯α� � 飡ⅹ�, � 쵟遜Ð�, �琉�ワ�щ� �� alloc/malloc (將� �琉�ゥ��� �昔ⓤ若ㄸ� �� �� 醒，���� 甸��, � �� �↓ⅲ� �乘� conventional memory � 循ⅰ濕� 獸レぎ far pointers) 0.0.0.106 1-Oct-95 - ��� 뤲乘Ø貰� 쭬�젩��젷� ª贍 arcanoid � mission �� ㄸ飡黍▲殊쥯 럱 �뭿� 닣좄Þ�Ø�쥯 0.0.0.106 28-Sep-95 0.0.0.106 24-Sep-95 - ㄵ쳽� �젩�栒 � ˘�獸� 0.0.0.107 24-Sep-95 - ㄵ쳽� 쭬｀習ゃ � ˘��� 0.0.0.107 23-Sep-95 - ㄵ쳽� 쭬｀習ゃ � ˘��� 0.0.0.107 22-Sep-95 - ㄵ쳽� 쭬｀習ゃ � ˘��� 0.0.0.107 17-Sep-95 - ㄵ쳽� 쭬｀習ゃ � ˘��� 0.0.0.107 16-Sep-95 - ㄵ쳽� 쭬｀習ゃ � ˘��� 0.0.0.107 15-Sep-95 - ㄵ쳽� 쭬｀習ゃ � ˘��� 0.0.0.107 3-Sep-95 - 뫀. 歲�. �留�� getcolor 0.0.0.107 1-Sep-95 - ��笹� ��誓贍쥯 ��汀� ˇ纏碎 쭬 뤲乘Ø�. 뫀. 歲�. �留��� rand, srand, setcolor 0.0.0.106 6-Jun-95 0.0.0.105 25-May-95 0.0.0.105 14-May-95 0.0.0.104 14-May-95 0.0.0.104 23-Apr-95 0.0.0.104 19-Apr-95 0.0.0.104 16-Apr-95 0.0.0.104 10-Apr-95 0.0.0.104 6-Apr-95 0.0.0.103 25-Mar-95 - ⓤ��젪ゥ췅 �鼇―� �黍 cp /bin/e /1/ee malloc 촲┘� �졹�誓ㄵワ筍 ∥�え 캙э殊 ‘ゥ� 64� 0.0.0.102 24-Mar-95 - ⓤ��젪ゥ� 줎� � mkdir() 0.0.0.102 23-Mar-95 - ㄻ� �∥ⅲ曄�⑨ ��誓���� GNU 呻Œⓥ � ㅰ膝ⓨ 呻Œⓥ � 뤲乘Ø� �拾�� 兒席졻 .exe. 꽖ギ �� 獸レぎ � 獸�, 譽� �ⅹ-贍� 呻Œⓥ� �� ˙ⅶ좐� � 64�. 귗� pointers (*), ��誓쩆쥯�щ� 歲飡�Л臾 �留�쥯� 甸��, ㄾウ�� 〓筍 far (far *). 쀢�〓 �� ⇒Ð졻� №晨�莘 ´ℓ� 笹�¡ far (FAR), ャ預� ´飡� ぎНŒ湞⑧ 呻Œⓥ �� � Мㄵエ tiny, 첓� �젺麟�, � � Мㄵエ compact, large Œ� huge - � 將� 쩆飡 �� �젵� �□젳� 캙э殊 .com (aka .bin aka .sav), � �젵� .exe H좂젷 ㄵ쳽筍 �젩�栒 � 兒席졻�� .exe 0.0.0.101 19-Mar-95 0.0.0.101 18-Mar-95 0.0.0.101 17-Mar-95 - 쭬�젩��젷� ��席젷彛� GNU rmdir & rm. H좂젷 ㄵ쳽筍 ls 0.0.0.100 15-Mar-95 - �昔ㄾウ좐 �漱젲Ð졻� GNU rmdir & rm 0.0.0.100 13-Mar-95 0.0.0.99 8-Mar-95 - 貰□젷ⓤ� ㄲ� ��舒瑜 GNU-呻Œⓥ� - rm � rmdir. 렊� �� �젩��좐� ��첓. 앪� 쥯� �� ‥㎜洙젳�硫 unarj ! 0.0.0.98 5-Mar-95 - 맆‘�� � ��ㄺ졻젷�짛Ж ®�惜� 拾� 誠�쳽췅. fixed bug in open2() (case of open(".")). 뫀�쳽� 歲飡�Л硫 �留�� rmdir(). 맓젷�㎜쥯� ��ⓤ� �誘�キ畑М� �昔｀젹щ �� �呻� PATH 0.0.0.97 4-Mar-95 - ⓤ��. 줎� � open2(), 誠�쳽��硫 ®��� (the case of open("/dir/file")). 뫀�쳽췅 押�ゆ⑨ openwdir 0.0.0.97 3-Mar-95 - ⓤ��젪ゥ� 줎�. � close(), 聲筌젺�硫 � 쭬む淫��� 첓�젷�．�, fixed bug in mkdir() 0.0.0.96 27-Feb-95 - 押�ゆ⑨ getcwd() � ぎ쵟�쩆 pwd �젩��좐� ��젪Œ彛� � ��ㄺ졻젷�짛Ж, 誠. 押�ゆ⑨ � 歲�.�留�� getenv, mkdir, ぎ쵟�쩆 md 0.0.0.96 26-Feb-95 - ⓤ��. 줎� � open2() �黍 貰ℓ젺Ŀ �젵쳽 � �쩗SDOS º����, ⓤ��. 줎� � lseek(,0,SEEK_SET) 0.0.0.96 25-Feb-95 - ⓤ��젪ゥ� 줎� � boot-醒も�誓 ��-쭬 ぎ獸昔． ヮ‘� �젵� � º���� kernel � ヮ〓� �졹鼇誓���� 淞ⓥ젷碎 甸昔� (� �昔ⓤ若ㄸエ ぎ�氏Ø瞬 Д┐� kernel � kernel.ovl). H��硫 boots.asm ºⅴ� ´褻⑧ 0.0.2.1 25-Feb-95. 댾��. 줎� � open2() (�黍 貰ℓ젺Ŀ �젵쳽) � � lseek() 0.0.0.95 23-Feb-95 - 궘呻誓��程 ぎ쵟�쩆 l � ˛θ�程 ぎ쵟�쩆 ls 歲飡�Л瑜 �留��� telldir � seekdir 룯誓ㄵ쳽췅 �젩��� � ぎ惜ⅱ臾 첓�젷�．�, �洙贍쥯�щ� 첓� �젵�. MS DOS ．胥愼�! � UNIX/POSIX 굫� 첓�젷�（ 젺젷�（嶺� �〓嶺臾 �젵쳽� (� 獸� 葉笹� � ぎ惜ⅱ��), 譽� �‥召ηÐ젰� 飡昔þ�飡�, �設�．췅レ��飡� � ゥ＊�飡� �昔｀젹Ж昔쥯�⑨. � � MSDOS ぎ惜ⅱ�� 첓�젷�� 勝Ø젷�� - 將� ⅳÞ飡´��硫 첓�젷��, ぎ獸贍� �� 琠ワβ碎 �젵ギ� (�� ºⅴ� 十めⓣ�쥯��莘 ㄻÞ�, � �� �誓ㅱ�젪ゥ� 璵��囹�� か졹收昔�, 첓� �〓嶺瑜 �젵ル � �〓嶺瑜 �ⅹ�惜ⅱ瑜 첓�젷�（). 듺�Д 獸．, � ぎ惜ⅱ�� 첓�젷�％ MSDOS �β 遜維�� "." � "..", 첓� � �〓嶺音 첓�젷�짛�. (앪� �留猶젰� ι� �ㄽ� �昔´夕� �黍 ���淫ぅ �洙贍筍 �젵ル "." Œ� ".." � 笹晨젰, ぎ＄� 收ゃ蟯� 琠ワβ碎 root ("/")). (뮔첓� ．胥졻�飡� MSDOS 琠ワβ碎 說ㄸД�獸� MSDOS 1.0 aka CP/M-86). 뫀�쳽� 줎� � open2() � 栒� ┘ ⅲ� ⓤ��젪Œ. 0.0.0.94 21-Feb-95 - �淫젷碎 貰□졻� zoo ��� 뤲乘Ø�. 꽞� zoo �≪�쵟 64� com-�젵쳽 쵟ギ. H젮� ㄵ쳽筍 � 뤲乘Ø醒 exe-Мㅳエ. 뤿�젷碎 貰□졻� GNU file utilities ��� 뤲乘Ø�. 맆㎜□젷碎 � ⓨ ギ첓レ��� 〃∥Ŧ收ぎ� � � ⓤ��レ㎜쥯���� header-files from BSDI UNIX � � 캙�젹β�젹� POSIX_SOURCE etc. 꽞� GNU-呻Œⓥ � 뤲乘Ø醒 ι� �� ㏇� 歲飡�Л瑜 �留���. 뫀�쳽� external variable environ. 0.0.0.94 15-Feb-95 - ˛θ�程 ぎ쵟�쩆 `key` 0.0.0.94 13-Feb-95 - ˛θ�程 ぎ쵟�쩆 `s` (`string`), か쵟�쩆 承�젪ゥ�⑨ 循졹歲昔˚�� trace, ˛θ. ぎ쵟�ㅻ page � videomod 0.0.0.94 12-Feb-95 - sys_errlist, modified perror(), 蝨젷��� �αぎレぎ 줎．� � io.c stdio.c dir.c 0.0.0.94 11-Feb-95 - ⓤ��. 줎� � lseek(), � opendir() 0.0.0.94 9-Feb-95 - �젳�젩��젺 Д獸� �琉좂� 循졹歲昔¡嶺�� Þ兒席졿Ŀ �黍 �漱젮�嶺音 �昔．췅� �昔｀젹� 뤲乘Ø�� (� ⓤ��レ㎜쥯���� 飡젺쩆設�音 蓀ⅳ飡� Turbo C � �誓�昔璵遜��� APP) 0.0.0.94 30-Jan-95 0.0.0.94 29-Jan-95 - 歲� �留�� chdir 쵟む�頌 S_ISDIR, S_ISREG, S_ISLABEL 0.0.0.94 28-Jan-95 - 歲� �留�� getcwd() 0.0.0.93 23-Jan-95 - ��誓ㄵ쳽� 歲飡�Л�� �誓贍쥯��� � 60h 췅 83h � 誠�쳽� ⅲ� ��誓ㄵワ�щ� � �젵ゥ conf.c 뱾젷��� 쭬 ��췅ㄾ∼�飡溢 歲飡�Л瑜 �留��� � 押�ゆĿ offset(), seg(), farptr() 0.0.0.92 22-Jan-95 - 룼ㄴ�逝첓 ｀졽Ø� 깷夕乘α� � 甸誓 (msherc.asm, msherc1.asm). 뫅�. �留�� int86 0.0.0.92 21-Jan-95 - boot record � 聲筌젺�瑜 � 將º �젵ル �琉�ゥ�� � �搜�レ�硫 첓�젷�� BOOT � � �搜�レ�硫 졷夜� pix_boot.arj. 꽙쭬遜�Аエ昔쥯� msherc.com. 뫅貰�첓 � 꺇奭篆� � 16:00 0.0.0.92 19-Jan-95 - 咨召�黍Д�瞬 貰 聖�夕�� GNU 呻Œⓥ ��� Proolix. 낂� �젺�, ι� Л�．� �� 誓젷�㎜쥯�� (ㄾ ��キ�． POSIX� ι� 쩆ゥぎ, 첓� Ж�º僧, ι� 췅ㄾ ㄵ誓¡ ��ㄺ졻젷�．�, ㅰ젵´贍, М�殊昔쥯��� �젵ギ�音 歲飡��, Л�．��レ㎜쥯收レ稅�飡� (permissions) (��첓 М┃� � ‥� Л�．쭬쩆嶺�飡�)) 0.0.0.91 16-Jan-95 - ⓤ��. 줎� � close(), � getftime � setftime, 誠. ぎ쵟�ㅳ touch 0.0.0.91 15-Jan-95 - � absread ㄾ줎˙�� ㄵ�젷彛硫 �猶�� 貰�↓��⑨ �� �鼇―�. 댾��. 줎� � printf("%s",NULL). 댾��. �鼇―� � 쵟む��젵쳽Ж, �恂信手莘蟯Ж � ��飡젪ぅ 甸�� (收��閃 ��� �黍率飡㏂荻) {=�} (�젶 ▲ㅳ� �‘㎛좂졻藺� �鼇―�, �∼졷拾���瑜 겈ギ殊茹º) 0.0.0.91 14-Jan-95 - ⓤ��. 줎� � printf("%2X") � 줎� � de.c (diskeditor), � 줎� � read(), ⓤ��. ��� � absread.c (NearBuffer 誠�쳽� static � 蓀젳� �昔캙쳽 DMA error, �昔ⓤ若ㅿ�좑 �黍 ��誓醒曄�Ŀ 64� ｀젺ⓩ�), ¡㎚�┃�, 將� º���� 獸� 줎�, 譽� 承�Ж췅メ� � {0.0.0.86 16-Dec-94} (���≪正�º硫 줎� 〓� ¡ ˛呻�. cp, � ��笹� �誓№좈��⑨ cp ¡ ˛θ�傳 ぎ쵟�ㅳ 줎� �昔캙�) 0.0.0.91 13-Jan-95 0.0.0.91 12-Jan-95 - �� 貰´栒 겈ギ殊茹�． 誠�쳽� �´奭ⅸ � 甸誓 (ㄻ� 咨���Ж� Д飡� � 誓㎤�. �졹殊 甸�� - �癒｀젺 收� �젹臾 1�) � ㄾ줎˙��� ��誓ㄵゥ��� 殊캙 �昔�� 0.0.0.90 11-Jan-95 - ⓤ��젪ゥ� 줎� � printf("%s"). 댾��. ι� 줎（ � printf. 뫀. 兒席졻 %u, Мㄸ十첓獸� "-" ("%-10s") 0.0.0.89 10-Jan-95 - 押�ゆĿ � 歲�. �留��� fgets, fputc, fputs, fread, fwrite, fprintf, vfprintf, ftell, fseek, fgetpos, fsetpos, rewind. 궋ⅳ��� �젵ル � �젺ㄻ��젹� 0, 1, 2 � ��獸え stdin, stdout, stderr. H젶��ζ-獸 ��� 將�� ´褻�ⅸ 貰□젷碎 unarj! � �琉젷 쭬飡젪ゃ! 0.0.0.89 9-Jan-95 - 押�ゆĿ � 歲�. �留��� _chmod, access 뫀�쳽� �� 貰´栒 겈ギ殊茹�． 젺殊˘說說硫 ぎ�循�レ � boot-醒も�誓 (ver. 0.0.2.0 9-Jan-95, ㄻÞ� ▲�� 493 bytes) � � 췅�젷� 甸��. �췅ギ（嶺硫 ぎ�循�レ ºⅴ� 럱 PTS DOS (細. [HØⓥ��ぎ]) H좂젷 ㄵ쳽筍 ��獸ぎ�硫 I/O (�젵� stream.c): 押�ゆĿ � 歲�.�留��� fopen, freopen, fdopen, fileno, fgetc, fclose 0.0.0.89 8-Jan-95 - 押�ゆĿ � 歲�. �留��� getftime, setftime, chmod 0.0.0.89 7-Jan-95 - ⓤ��. 쵟젷��履Ł 줎� � 甸誓. 뱾젷��� 쭬 ��췅ㄾ∼�飡溢 ��ㄿ昔｀젹щ (� 歲�.�留���) ohb/ohw/ohd, puti/putl. 귗� 將� М┘� 收��閃 printf 0.0.0.89 6-Jan-95 - ⓤ��. ��. � gets. 맆㏅젩��젺 Д�젺�㎚ ��誓쩆葉 ＋�줎レ�音 ��誓Д��音 �� 甸�� � 材�褻え� �昔璵遜 � �□졻��. 뫊. errno � command\c1.asm, include\errno.h, kernel\klib.asm � 若舜 〓 � open() (�젵� io.c). 붵�ゆĿ (� 歲飡�Л瑜 �留���) putch/putchar � getch/getchar 誠�쳽�� Ħ��殊嶺臾� 뫀�쳽췅 ＋��. ��誓Д�췅� More, ㄾ飡承췅� �� 材�褻え� �昔璵遜��, 承�젪ワ迹좑 캙習�� �黍 �猶�ㄵ 췅 咨�젺. 뫀. ˛θ�程 ぎ쵟�쩆 setmore. 맓젷�㎜쥯� 캙�젹β� 'width' � 押�ゆ⑨� 醒Д⒰手� printf 0.0.0.88 29-Dec-94 - ⓤ��젪ゥ� "Ж짛迹Ł" 줎� � gets. (�.�., �젶�� 줎�, ぎ獸贍� 拾� ��琠ワメ�, 〓� ⓤ��젪ゥ�, � ��獸� ��汀� ¡㎛Ø ��-쭬 �ⅹ�獸贍� ＋�줎レ�音 �㎚����Ł (� 쩆���� 笹晨젰, ��-쭬 ��誓���� header-�젵ギ� � 첓�젷��, include, 럞솃� ㄻ� 甸�� � ㄻ� 呻Œⓥ). 꽞� �젳エ曄�⑨ ぎНŒ湞Ŀ 甸�� � ぎНŒ湞Ŀ 呻Œⓥ ⇔ⅳ�췅 �誓�昔璵遜�惜좑 ��誓Д�췅� KERNEL, ��誓ㄵゥ�췅� 獸レぎ ¡ №�э ぎНŒ湞Ŀ 甸�� (細. ⅴ � 甸�惜�� makefile � 細. ⅴ � stdio.h). 댾��젪ゥ� 줎� � atoi() 댾��젪ゥ�� 2 줎짛 � vsprintf(), ぎ獸贍� ˙⑨エ � 췅 sprintf, vprintf, printf 댾��젪ゥ� 줎� � itoa()/ltoa() 댾��. 줎� � printf 귗� �留��� 押�ゆŁ puts0 � ��笹ⅳ莘蟯� ohw/puti etc 誓ｃワ惜� 쭬Д���� 췅 젺젷�（嶺瑜 �留��� printf ¡ ㏇�� 甸誓 � 呻Œⓥ졾 볚循젺��� 쭬 ��췅ㄾ∼�飡溢 歲飡�Л瑜 �留��� (� 押�ゆĿ) puts0(細. 쵟む�� � stdio.h) � puti() 렊췅說┘췅 ¡㎚�┃�飡� ＋渽�� ��-쭬 �猶�쩆 笹②ぎ� ㄻÞ�音 飡昔� � printf() � 裔ⅶД惜� ‘レ溫． ㎛좂��⑨ MAX_LEN_STR � limits.h 0.0.0.87 25-Dec-94 - 歲飡�Л瑜 �留��� printf, sprintf, vsprintf, vprintf, itoa, ltoa, ultoa. 0.0.0.87 24-Dec-94 - 췅�젷 캙ぅ� printf: 押�ゆ⑨ printf 0.0.0.87 23-Dec-94 - ⓤ��. 줎� � write (��誓若� 曄誓� 醒も��), � 줎� � absread/abswrite. 뫀�쳽췅 ˛θ�程 ぎ쵟�쩆 cp, 曄� 쭬か哉�쥯췅 �鼇―� ¡ ˛呻誓��ⅸ Cp. 0.0.0.86 18-Dec-94 - ⓤ�� 줎� � AppendClu 0.0.0.86 17-Dec-94 - ㏇� �젩��� 璵ギ． ㄽ� ��收涉췅 ��-쭬 獸．, 譽� ㄾ囹� (4 ．쩆) 췅쬊쳽 F8-Enter ;) 0.0.0.86 16-Dec-94 - 쭬か哉�쥯� 줎� � cp � de (RTFM "Press ENTER�") 0.0.0.86 15-Dec-94 - ⓤ�� 줎（ � open(), close(). 렊췅說┘� �����汀�硫 ＋渽 � ぎ쵟�ㄵ cp � � de 0.0.0.85 14-Dec-94 - 쵟む�頌 abs, labs, 歲�. �留��� div, ldiv. 꽡줎˙��� �ⅳ�飡좐蟯� 歲� �留��� ｀承� str* � mem*, � � 拾� 率耀飡㏂迹ⓨ ⓤ��젪ゥ�� �∼졷拾���瑜 줎（ (細. string.c � mem.c). 뫀�쳽췅 쭬＋燼첓 ㄻ� 歲� �留�쥯 system() 0.0.0.84 13-Dec-94 - ⓤ��젪ゥ� 줎� � ぎ�ⓣ�쥯���� ¡ ™�說� ぎ�⑧ FAT, ⓤ��. 줎� � unlink(), ⓤ��. 줎� � msdos() (¡遜�. 飡졷. ´も�贍 ��誓� ．涉�. 쭬｀. MSDOS, 收��閃 MSDOS 쭬｀拾젰恂� ぎ쵟�ㄾ� msdos � �黍 ˚ヮ曄���� �젵Д誓 (細.�젵� msdos.asm)). H젽ⓤ젺� ぎ쵟�쩆 cp 0.0.0.84 12-Dec-94 - ⓤ��젪ゥ�� 줎（ ¡ write, open, close. H젽ⓤ젺� unlink(), rename() � 貰�手. 歲�. �留��� � ぎ쵟�ㅻ rm � mv 0.0.0.83 11-Dec-94 - 쭬�ⓤ� 췅 ㄸ稅: abswrite, secwrite, WritePhysSec, 氏젫� O_CREAT, O_WRONLY, O_RDWR � 押�ゆĿ open, ⓤ��. �鼇―� � puti, 押�ゆ⑨ write !!!, 押�ゆĿ NewCashe, AppendClu, LinkClu 0.0.0.83 10-Dec-94 - ��殊Ж㎤昔쥯� 젷．黍燧 譽��⑨ �젵쳽 � 押�ゆĿ read(). 쭬�젩��젷� ぎ쵟�쩆 msdos (쭬｀習첓 msdos � ˘�曄飡��� �� 蓀ⅳ� 뤲乘Ø�� ‥� �洙贍쥯�⑨ ㄸ稅�¡쩆 A:), ぎ쵟�ㅻ mount � umount 0.0.0.83 9-Dec-94 - ��殊Ж㎤昔쥯� 젷．黍燧 譽��⑨ �誘�キ畑М． �젵쳽 � 押�ゆĿ execve() � 젷．黍燧 �젩�瞬 � ▲芯�젹�-ぅ�젹� 0.0.0.82 7-Dec-94 - internal command `buf`, �漱�˙��� ＋渽� � 젷．黍燧� ぅ鼇昔쥯�⑨ � 聖昔�� 췅 ㄸ稅 �젹音 誓ㄺ� ⓤ��レ㎯�щ� ∥�ぎ� 0.0.0.81 5-Dec-94 - 誠�쳽�� ��譽� 첓� � MSDOS. 뤵� �� BUFFERS ▲芯昔�. (#define BUFFERS 細. � �젵ゥ limits.h, � 첓�젷�％ include, � 졷夜´ pix_incl.arj) 0.0.0.81 4-Dec-94 0.0.0.81 1-Dec-94 - ㏇� �젩��� � ㄸ稅�� ▲芯黍㎜쥯췅 曄誓� ぅ� Cashe 0.0.0.81 29-Nov-94 0.0.0.81 27-Nov-94 - int.command timer, 璵쳽� ゃ�� 歲飡�Л音 �留�¡� 殊캙 str* (string.h/string.c), isalpha (ctype.h/ctype.c), malloc/free, tell/lseek 0.0.0.81 26-Nov-94 - syscall raise(int sig) 0.0.0.80 21-Nov-94 0.0.0.80 20-Nov-94 0.0.0.80 19-Nov-94 - boot 0.0.1.4 19-Nov-94, �㎚����⑨ �α申α手���� 0.0.0.79 13-Nov-94 - ���硫 boot (boot.asm 0.0.1.2 13-Nov-94) �젩��젰� !!! 0.0.0.78 8-Nov-94 - boot-醒も�� ｀習ⓥ碎 �� 젮誓率 0:7c00, � 甸昔 - 췅葉췅� � 60:0, ��將�с, αエ ㄻÞ� 甸�� ∥�㎤恂� � 30�, ¡ №�э 쭬｀習え ▲ㄵ� 쭬殊�졻藺� boot-醒も�� � 럤� � 쭬｀習첓 �誓む졻ⓥ碎. 룼將�с ㄵ쳽� ���硫 boot-醒も�� (ver. 0.0.1.0), ぎ獸贍� ▲ㄵ� ��誓Д�졻藺� ¡ 2-� ��ギ˘�� �젩エ軟 �誓贍쥯�Ł � 쭬｀拾졻� 甸昔 �旬蝨�. (H� 쭬〓筍 diskette parameter table!!!) 쀢�-獸 �� ��ャ�젰恂� 貰 2-� ��ギ˘��� �젩エ劣 �誓贍쥯�Ł. H� int f0 첓ぎ�-獸 젮誓� ˘쩆 F000:XXXX - 譽�-獸 �� BIOS. � � ⅲ� ��暹�. 뗣預� ▲ㅳ －졻� boot- 醒も�� (ver. 0.0.1.1) ゃ쩆 �Æ蝨� 쭬 �昔飡�젺飡¡ 甸�� - � 1000:0500. 0.0.0.78 7-Nov-94 - 졹醒Аゥ惜莘 ��ㄿ昔｀젹с SysCall (klib.asm), 誓젷�㎯迹莘 Д�젺�㎚ 歲飡�Л音 �留�¡�, ��誓�ⓤ猶좐 췅 �, ��獸с 譽� �젶 췅ㄾ. 0.0.0.78 6-Nov-94 - 췅�졻� 押�ゆ⑨ fork() 0.0.0.78 5-Nov-94 - ぎ쵟�쩆 ps 0.0.0.77 3-Nov-94 - ��Л�． ⓤ��젪ゥ� boot-醒も�� (0.0.0.7 3-Nov-94), �� 收��閃 葉�젰� 醒も�贍 �αぎレぎ �젳 �黍 �鼇―졾 (retrying) 0.0.0.76 26-Oct-94 - izmenen adres zagruzki v boots.asm (boots.asm ver.0.0.0.6 26-Oct-94) na PSP=50h (bilo PSP=70h). Gruzitsya i s 360K i s 1.2M (???!!!) Gipoteza: kogda kernel udlinitsya na 200h bytes - opyat' nachnutsya glucki :( 0.0.0.75 24-Oct-94 - ⓤ��젪ゥ�� �ⅹ�獸贍� 줎（ � ㄾ줎˙��� ���瑜... 收��閃 將� ´褻⑨ �� ｀習ⓥ碎 � 360�, 若舜 �젺麟� ｀習Œ졹�. H� ｀習ⓥ碎 � 1.2�, 若舜 �젺麟� �� ㏇� ´褻Ŀ ｀習Œⓤ�... 깂� ��� ??? (� 3" gruzitsya, no gluckaet, hotya ran'she sovsem ne gruzilas') 0.0.0.74 23-Oct-94 - 歲� �留��� strchr, strcmp, strcpy, strncpy, strlen ˛θ�Ł 蜈カ sh.com, fixed bugs in argc, argv & env params 0.0.0.73 20-Oct-94 - �젩��� � 쩆獸�, �猶�� 쩆瞬 � ´齧-ゥ¡� 膝ャ 咨�젺�, 歲� �留��� gettime � getdate, ぎ쵟�쩆 date 0.0.0.72 18-Oct-94 - system call htoi 0.0.0.71 16-Oct-94 - gentbl 쭬ぎ�曄� (imho) 0.0.0.70 14-Oct-94 - 誠�쳽�� limits.h � unistd.h, 貰＋졹�� POSIX� errno (췅�졻�), lib1.lib (췅�졻�). H좂졻 ％���졻�� ��ⓤ젺Ł 歲飡�Л音 �留�¡� (췅 졹醒Аゥ�) �� ⓤ若ㄽ�� �젩エ璵 ��ⓤ젺Ł (ㄻ� 甸�� � ㄻ� 呻Œⓥ): gentbl.c/gentbl.com - ％���졻��, syscall.tbl - �젩エ�� 歲�.�留�¡� 0.0.0.69 12-Oct-94 - 押�ゆĿ wherex(), wherey(), Ж짛迹Ł 歲Б�� � 膝ャ - 蓀ⅳ飡쥯Ж BIOS - 將� ㄾウ�� Ħ殊 췅 ㏇ε ˘ㄵ츫쩆�收�졾. 뇿收� ¸α獸 Ж짛迹ⅲ� 歲Б�쳽 � 膝ャ 誠�쳽�� №�э (�� CMOS�) 0.0.0.68 8-Oct-94 0.0.0.67 6-Oct-94 - 說歲十與昔쥯췅 か젪쯄栒�� (�� 咨�젺!), 誠�쳽췅 ゃ- �� 쭬＋燼ⅹ/ギ㏂蜈� 췅 ㏇� �誓贍쥯�⑨, 췅 ぎ獸贍� 獸レぎ М┃� � 쩆┘ 췅 收, 췅 ぎ獸贍� ��レ㏆, 誠�쳽췅 �□젩�洙� �誓贍쥯�⑨ 8 � Ж짛迹Ł 歲Б�� � 膝ャ (稅�) - 獸レぎ 췅 깷夕乘α� 0.0.0.66 5-Oct-94 - internal command 'ls' - modify & add flags -L -F -T -M - ‘ゥ� �㏆邀� 誠�쳽췅 �□젩�洙� か젪②� BackSpace � gets() 0.0.0.65 3-Oct-94 - env ��誓쩆β碎 � ��昔┐���硫 �昔璵遜. 뫀�쳽췅 ˛呻�. ぎ쵟�쩆 "set". 0.0.0.64 26-Sep-94 - 췅�졻� ��誓ㄵオ� ⓤ若ㄽØ�� 甸�� �젶, 譽�〓 ㏇� 遜維え (丞젳졻�エ '*') 〓エ far (ㄻ� ⅳÞ��□젳⑨ � ㄻ� ‘ゥ� �昔飡�� 誓젷�쭬與� 歲飡�Л音 �留�¡�). 궘좂젷� ��誓ㄵ쳽�� 押�ゆĿ open/read � 押�ゆĿ �젩�瞬 貰 飡昔첓Ж. read ��Л�． ��殊Ж㎤昔쥯췅 �� 稅�昔飡� 0.0.0.63 25-Sep-94 - ぎ쵟�쩆 de 0.0.0.62 24-Sep-94 - cat.com: 氏젫� -H -M -A, 歲�.�留�� strlen, �젵ル-信循�⒰手� /dev/* 0.0.0.57 15-Sep-94 - ˛θ��� 呻Œⓥ� cat.com � crc.com, 歲�.�留��� perror, exit, getche 0.0.0.56 15-Sep-94 - 誠�쳽췅 ��誓쩆�� argc, argv � ��レ㎜쥯收レ稅�� �昔璵遜�, 甸昔 ��笹� 쭬｀習え 쭬�信첓β rc.com (αエ 췅若ㄸ�, ぎ�η�� ;), 誠�쳽췅 ぎ쵟�쩆 echo 0.0.0.51 12-Sep-94 - 췅�젷 ㄵ쳽筍 ��誓쩆豫 argc, argv � ��レ㎜쥯收レ稅�� �昔璵遜� 0.0.0.50 4-Sep-94 - 0.0.0.47 2-Sep-94 - ��舒硫 뤲乘Ø� ㄾ쵟 췅 쵟鼇�� 286, system call shutdown, fixed error in asm proc getch(), ι� ゃ�� 줎．� ⓤ��젪ゥ췅, � �졹狩�飡�, ��誓ギ캙曄� ▲�-醒も��, 젮誓說�� �昔飡�젺飡¡ 甸�� � �乘� ㄸ췅Ж曄稅�� 캙э殊 etc. H� � 3-ㅾß�¡． ㄸ稅� �� ｀習ⓥ碎 (�젺麟� ｀習Œ�刷). IMHO 譽�-獸 � 젺젷�㎜� 璵��曄� か졹收昔� (� �젺麟� 'cat - H' ‘レ鼇� �젵ギ� 笹②ぎ� 〓飡昔 �昔‥짛�) 궋ⅳ�췅 CRC 甸�� - �췅 ��飡�輾�� Д�畑恂� !!!??? :( 0.0.0.45 19-Jul-94 - ls ▲ㄵ� �琉젪졻� �≪�� ㄸ稅�, �≪�� 쭬�汀�． � 聲�‘ㄽ�．. � ���ⅳ�レ�Ø� (®���) 췅 �ⅳ�ヮ � �飡좐刷 췅 �젩�收 �ㄸ�, �拾�� 兒褻ⓣ�쥯筍 뤲乘Ø�. H� ㄽ� ‥� ´褻Ŀ ! 0.0.0.44 18-Jul-94 - fixed error in absread.c (��笹� 細��� ㄸ稅β� ��琠ワ쳽刷 read error) 0.0.0.43 13-Jul-94 - system calls ohw, ohb, puti, fixed error in sh.c (ぎ＄� ぎ�. 飡昔첓 췅�. � �昔‥쳽 - ㏇� ぎ쵟�쩆 ª��黍昔쥯쳽刷) 0.0.0.42 12-Jul-94 - system calls open, read, close, filelength, puts0, minus, 쭬＋燼え ㄻ� write, lseek, creat, dup 0.0.0.41 7-Jul-94 - 쭬□젷� Þ飡p僧���젷彛莘 쵟鼇��. H� �ⅸ 收��閃 Li- nux � ��첓 �� Мⅲ� 젶ぎ勝��, �� VPIX'� :( 뒶НŒ禎 ��� DV 췅 2:461/35@FidoNet � �漱젲Ð좐 ��� DV 췅 2:461/36 :( 0.0.0.40 5-Jul-94 - fixed err in ls.c (60 sec & 62 sec), history.doc 0.0.0.39 4-Jul-94 - fixed error on puti() (stdio.h) - output ** ¸α獸 00 {XT 쭬□젷� :( } 0.0.0.38 20-Jun-94 - �≪ⅳÞ���� ㄲ愼 38-� ´褻Ł 0.0.0.38 18-Jun-94 - ��舒硫 뤲乘Ø�, �洙�НŒⓣ�쥯��硫 ㄾ쵟, 췅 XT/VGA, � 率　�栒 - 쭬Д筍收, ��-쭬 Мⅲ� ＋渽� ��Д� ´褻Ŀ �� �㎚��Œ碎 �� 蓀젪���⑧ � �誓ㅻㅳ耀�, 獸レぎ 쩆�� ��Д�纏졹� 0.0.0.38 14-Jun-94 - �㎚���� �留�� exec_ � 兒席졻 �誘�キ畑М． �젵쳽 - ㄾ줎˙�췅 歲－졻侁� � ⅴ �昔´夕� 0.0.0.37 9-Jun-94 - ⓤ�� �鼇―� �黍 歲� �留�´ � 0 葉笹�� 캙�젹β昔�, ¡ ㏇� 졹�-Мㅳエ ㏇�젪ゥ췅 飡昔첓 � 쩆獸� ぎНŒ湞Ŀ � Ħ��收十첓與ⅸ, ��誓若ㅿ�좑 � obj � � bin Мㅳレ 0.0.0.36 8-Jun-94 - 쭬�젩��젷 ��舒硫 歲飡�Л硫 �留�� putch('Y') � ��誓쩆曄� N 캙�젹β昔� �� 飡ⅹ� ��レ㎜쥯收ワ � 飡ⅹ 甸��. (뵠œ hello.c - hello.com) 뫌ℓ젺� �젩エ�� 歲飡�Л音 �留�¡�. 뮙��閃 歲飡�Л瑜 �留��� �� �-��ㄿ昔｀젹� (押�ゆŁ) � N 캙�젹β�젹� ▲ㄵ� ㄵ쳽筍 �αギ┃� 0.0.0.35 7-Jun-94 - redko poluchaetsya sest' za Proolix :( 끷エ ����졿Ŧ�췅� 歲飡�쵟 뤲乘Ø� Д�젰� �젩�收, �� ⅴ 췅十�... 將� �젩�栒 ;) 0.0.0.34 3-May-94 - doskey Ver 0.0.0.2 3-May-94 0.0.0.33 2-May-94 - doskey by 닧�閃 C젳����, 2:461/61.99@Fido 0.0.0.32 2-May-94 - ��舒硫 뤲乘ⓨ � 十席� Infocom. 0.0.0.31 4-Mar-94 - ��笹ⅳ�Ł 뤲乘ⓨ � 十席� SIA 0.0.0.30 2-Mar-94 - Lost 150 000 ukr. coupon :( 0.0.0.29 1-Mar-94 - touch *.* ;) 0.0.0.28 28-Feb-94 0.0.0.27 27-Feb-94 - �黍�α 췅 �젩�栒 걡-0010. Fixed error in setvect() 0.0.0.26 24-Feb-94 0.0.0.25 23-Feb-94 0.0.0.24 22-Feb-94 - Proolix for mouse (XProolix) 0.0.0.23 14-Feb-94 0.0.0.22 11-Feb-94 - 誓ㄺ� ��ャ�젰恂� 醒飡� 쭬 뤲乘ⓨ... :( 뜝�졻� 收飡� 뤲乘ⓨ� ��� 럱/2 � 誓┬Д 꼶�-醒遜Ŀ - ＋蹟ⓥ... (�� ˘�� OS/2, ⅴ DOS-醒遜⑨ �� 琠ワβ碎 ˘設�젷彛�� XT � ��キ�� 細吟ゥ 將�． 笹�쥯) 0.0.0.21 5-Feb-94 - int0 ＋蹟ⓥ... 0.0.0.20 4-Feb-94 - �젩��좐 ‥� 飡��ㄾ¡� 쵟鼇��. Дㄻ����... :( 誓- 鼇� ㄵ쳽筍 Жむ�甸昔, �� ㎛좑, 譽� 將� �젶�� ;) 0.0.0.19 31-Jan-94 - 쭬□젷� 飡��ㄾ㏂� 쵟鼇�� - �젩��� 쭬Дㄻⓥ碎 :( 0.0.0.13 12-Jan-94 - break key ('\b') 0.0.0.12 11-Jan-94 - alloc.h 0.0.0.8 26-Dec-93 - fixed error in ls, in puti ㄾ 將�． ⓤ獸黍� �� ´쳽刷, �� 췅�젷� 뤲乘Ø�� �黍若ㄸ恂� ＄�-獸 췅 醒�舜□� 1993 (Œ� 豫筍 ��㏄�)src/boot/0040775000076500007650000000000007725637107012062 5ustar prool2prool2src/boot/bp.c0100664000076500007650000003450507007540162012616 0ustar prool2prool2#define VER "Boot Processor 0.1.6 2-Nov-99 (C) 1993-1999, S.Pustovoitoff" /* 댾獸黍�: 0.1.6 2-Nov-99 - �α申α手���瑜 (ぎ細β①αえ�) Мㄸ十첓與� 0.1.5 10-Mar-98 0.1.4 24-Feb-98 - 誠�쳽췅 �젩��� � Л�．葉笹���臾� extended partition 0.1.3 16-Jan-98 - 誠�쳽췅 �젩��� � extended partition 0.1.2 11-Jan-98 0.1.1 7-Jan-98 0.1.0 28-Dec-97 - add bootread() instead of absread(), add outMBR, add bootwrite() instead of abswrite() 0.0.20 32-Aug-97 - fixed small bug 0.0.19 24-Aug-97 - MSDOS/Proolix version 0.0.18 22-Aug-97 0.0.17 27-Apr-97 0.0.16 26-Apr-97 0.0.15 3-Apr-96 0.0.14 24-Sep-95 0.0.14 24-Sep-95 0.0.13 16-Sep-95 0.0.13 15-Sep-95 - ⓤ��젪ゥ�� �ⅹ�獸贍� �鼇―� �黍 �젩�收 � ┘飡えЖ ㄸ稅젹� 0.0.12 21-Mar-95 - �ⅹ�獸�좑 ぎ細βØ� �� 貰´栒 Mike Aizatsky, 2:461/21.100 0.0.11 26-Nov-94 - 嵩�젷 progname(). H졽ª� �췅 〓쳽 �拾췅!? 0.0.10 19-Nov-94 - ��笹� -d ¡㎚�┘� ヮ‘� 歲Б�� 0.0.9 5-Sep-94 - -y switch 0.0.8 3-Sep-94 - �猶�� º��� �젵쳽 InName 0.0.7 26-Jan-94 0.0.6 10-Jan-94 putch__() 0.0.5 23-Dec-93 0.0.4 11 Dec 93 rename to BP - Boot Processor 0.0.3 0.0.2 7 Dec 93 0.0.1 6 Dec 93 add out_boot(), -d switch 0.0.0 2 dec 93 ㄾ 將�． �� Buffered MonoPIP 2.04 22 Nov 93 */ #include #include #include #include #include #include #include #define FAT12 0 #define FAT16 1 #define NO_FAT 2 #undef OPEN_MAX #undef TMP_MAX #include "..\include\prool.h" #define __TIME_DATE_ #define _FTIME_ #include "..\include\conf.c" #include "..\include\limits.h" #include "..\include\struct.h" #define SECSIZE 512 #define _HDD_ 0x80 /* Global definitions */ char FlagR = 0; char FlagI = 0; char FlagY = 0; char dev = 0xF0; int NextDrive=2; int NextDOSDrive='C'; struct DeviceStruct Devices [LASTDRIVE]; /* Devices [0] - disk A: sec=0 if not present Devices [1] - disk B: sec=0 if not present Devices [2] - disk C: sec=0 if not present Devices [3] - disk D: sec=0 if not present ... */ int active=-1; int bootread0 (int dev, void far * buf); int bootwrite (int dev, void far * buf); int ReadPhysSec (unsigned char drive, unsigned char sec, unsigned char head, unsigned char trk /* or cyl */, char *Buffer); int WritePhysSec (unsigned char drive, unsigned char sec, unsigned char head, unsigned char trk /* or cyl */, char *Buffer); #include "..\kernel\out_os.c" #include "..\kernel\out_mbr.c" int bootread (int Dev, void *Buf) {int i, err; char InternalBuffer [SECTOR_SIZE]; for (i=0; i [filename] [-r] [-i] [-a] [-y]\n\ -r - reverse copy (file->boot/master boot sector),\n\ DEFAULT (without '-r') - boot/master boot sector->file\n\ \n\ -i - install file to boot/master boot sector,\n\ BPB and partition table not change!\n\ -d - drive:\n\ @ - master boot record of 1st HDD\n\ Boot records:\n\ 0 - drive 0 (floppy drive A:)\n\ 1 - drive 1 (floppy drive B:)\n\ 2 - drive 2 (1st partition of 1st HDD)\n\ ...\n\ -a - set active partition (for extended partition only)\n\ -y - assume 'y' on all queries\n"); } putch__(char c) { switch (c) { case 0: c=' '; break; default: if (c<' ') c='.'; } return putch(c); } void out_devices() {int i; printf("\nDev Head Sec Trk/cyl Partition"); printf("\n-------------------------------"); for (i=0;i5000) { DiskSize/=1024; printf("\nDisk size %li Mb\n",DiskSize); } else { printf("\nDisk size %li Kb\n",DiskSize); } } #define EXTEND 5 #define EXTEND2 0xF int extended_partition(int dev) { if (dev==0xFF) return 1; if ((Devices[dev].system_indicator==EXTEND ) || (Devices[dev].system_indicator==EXTEND2) ) return 1; return 0; } void out_boot_or_mbr (int dev, void far *buf) { if (extended_partition(dev)) outMBR(buf); else out_boot(buf); } #include "..\kernel\ppt.c" void test_devices (void) {unsigned int i; struct MBRstru *MBR; char MBRBuf [SECTOR_SIZE]; for (i=0;i 0: 0 = �β ㄸ稅��音 信循�⒰手 (AX & 0001H) � � � � � � � � 훤袴> 1: 8087 貰�昔璵遜�� (��췅ㄵ┃�) � � � � � � � 훤袴袴�> 2-3: 쵟收黍�稅좑 �쳽�� RAM (AX & 0eH) � � � � � � � 01H=16K; 04H=32K; 0eH=64K (Œ� ‘レ蜈) � � � � � � 훤袴袴袴袴�> 4-5: 췅�젷彛硫/젶殊˛硫 誓┬� (AX & 0030H) � � � � � � 10H=40-ぎ� 歟β�; 20H=80-ぎ� 歟β�; � � � � � � 30H=TTL М��魚�Л좑 �쳽�� � � � � � 훤袴袴袴袴袴袴�> 6-7: ㏇ⅲ� ㄸ稅�¡ㄾ� -1 (AX & 00c0H) � � � � � 00H=1; 40H=2; 80H=3; c0H=4 � � � � 훤袴袴袴袴袴袴袴袴> 8: DMA �黍率恂手濕� (AX & 0100H) � � � 훤袴袴袴袴袴袴袴袴袴袴> 9-11: RS232 ��設� (AX & 0e00H) � � � 000H=�β; 200H=1; 400H=2; ... e00H=7 � � 훤袴袴袴袴袴袴袴袴袴袴袴袴>12: 1=ª昔¡� 젮젽收� �黍率恂手濕�(AX & 1000H) � 훤袴袴袴袴袴袴袴袴袴袴袴袴袴>13: 1=��笹ⅳ.�黍�收� (PC/Jr 獸レぎ) 훤袴袴袴袴袴袴袴袴袴袴袴袴袴袴�>14-15: 信�젺�˙��� �黍�收昔� (AX & c000H) 0000H=�β; 4000H=1; 8000H=2; c000H=3 뇿Д�: 뿞飡� ⓤ��レ㎯β碎 ㄻ� �昔´夕� 誓┬쵟 ˘ㄵ�. 끷エ (AX & 30H) = 30H, 獸 젮젽收� М��魚�Л硫컴˘ㄵ� 醒，��� RAM �� 젮誓率 0b000H, Þ좂� 0b800H. */ i=((*(unsigned int far *)MK_FP(0,0x410) & 0xC0)>>6)+1; if (i) Devices[0].sec=-1; if (i>1) Devices[1].sec=-1; if (bootread0 (_HDD_, MBRBuf)) printf ("test_devices: MBR read error\n"); process_partition_table (MBRBuf); } int read_boot_or_mbr (int dev, char *buf) { int sec; if ((dev==0)||(dev==1)) { /* A: or B: */ return bootread(dev,buf); } if (dev==0xFF) { return bootread(_HDD_,buf); } sec=Devices[dev].sec; if (sec==0) return -1; return ReadPhysSec (_HDD_,sec,Devices[dev].head,Devices[dev].trk,buf); } int write_boot_or_mbr (int dev, void *buf) { int sec; if ((dev==0)||(dev==1)) { /* A: or B: */ return bootwrite(dev,buf); } if (dev==0xFF) { return bootwrite(_HDD_,buf); } sec=Devices[dev].sec; if (sec==0) return -1; return WritePhysSec (_HDD_,sec,Devices[dev].head,Devices[dev].trk,buf); } char buf [SECSIZE], bufboot[SECSIZE]; int main (int argc, char *argv[] /* , char *env[] */) { int i; int FileNameCounter; char InName [80]; int h; struct MBRstru *mbr_p; #if 1 clrscr(); #else for (i=0;i<25;i++)puts(""); #endif ident(); FileNameCounter=0; for(i=1;i=SECSIZE) printf(" or more\n"); else printf("\n"); if (i>SECSIZE) {printf("Not enough memory in boot sector\n");return 2;} else if (i>510) printf("Warning! Last 1-2 bytes lost!\n"); close(h); if (extended_partition(dev)) { /* MBR or extended partition */ for (i=0;i<0x1BE;i++)bufboot[i]=buf[i]; /* bootloader */ if ((active>=0)&&(active<4)) { /* set active partition */ mbr_p=(void *)bufboot; mbr_p->Partition[active].indicator=0x80; out_boot_or_mbr(dev,bufboot); } } else { /* plain boot sector */ for (i=0;i<3+8;i++)bufboot[i]=buf[i]; /* JMP and OEM name */ for (i=0x26; i %s sector %i:\n\nOverwrite %s sector (y/n) ? ", InName,sector_type(dev),dev,sector_type(dev)); if (reply("YN")!=1) return 1; } printf("\nFile %s -> %s sector %i: !\n", InName,sector_type(dev),dev); if (write_boot_or_mbr(dev,bufboot)){printf("Disk write error\n"); return 2;} } else if (!FlagR) { /* boot -> file */ printf("%s sector %i: -> file %s\n",sector_type(dev),dev,InName); if(read_boot_or_mbr(dev,buf)==-1){printf("Disk read error\n"); return 2;} out_boot_or_mbr(dev,buf); if((h=open(InName,O_CREAT|O_WRONLY|O_BINARY,S_IWRITE))==-1) {printf("Boot image open/creat error in file %s\n",InName); return 2;} if(write(h,buf,SECSIZE)!=SECSIZE) {printf("Boot image write error\n"); return 2;} if(close(h)) {printf("Boot image close error\n"); return 2;} } else { /* file -> boot */ if (!FlagY) { printf("File %s -> %s sector %i:\n\nOverwrite %s sector (y/n) ? ", InName,sector_type(dev),dev,sector_type(dev)); if(reply("YN")!=1)return 1; } printf("\nFile %s -> %s sector %i: !\n", InName,sector_type(dev),dev); if((h=open(InName,O_RDONLY|O_BINARY))==-1) {printf("Boot image open error in file %s\n",InName); return 2;} if(read(h,buf,SECSIZE)!=SECSIZE) {printf("Boot image read error\n"); return 2;} out_boot_or_mbr(dev,buf); if(close(h)) {printf("Boot image close error\n"); return 2;} if(write_boot_or_mbr(dev,buf)){printf("Disk write error\n"); return 2;} } return 0; }src/boot/fat12.asm0100664000076500007650000000201506465173710013467 0ustar prool2prool2; for FAT-12 NextClu proc ; Input: ax - cluster no ; Output: ax - next cluster from FAT ; cf=1 if EOF ; REGS SAVED ! push bx push cx push dx push di push ES mov di,ax mov bx,3 mul bx ; dx:ax := ax * bx shr ax,1 ; ax := ax /2 ; ax - addr in FAT mov bx,FATseg mov ES,bx mov bx,ax mov ax,word ptr ES:[bx] test di,1 jz @@1 mov cl,4 shr ax,cl jmp @@2 @@1: and ax,0fffh @@2: ; cmp ax,0fffh ; je @@cf ; cmp ax,0ff7h ; je @@cf cmp ax,word ptr MaxClusters+off ja @@cf clc @@ret: pop ES pop di pop dx pop cx pop bx ret @@cf: stc jmp @@ret NextClu endp src/boot/boots.bin0100664000076500007650000000077206761253110013670 0ustar prool2prool2�@륯roolix p�� )BOOT FAT12 &�6x힑 �|뉽�3익r\�|삄|投|�)|P�|� 投� |琶 �t@)|뗁�<|XQP샙}�P瓦rX�Q� 뗼�+|且t Y꺝 純X@Y淑�2岸�� 픱��椅홠딦P�|샙}�|�P�wr�X겷@荀� |삄 |透뗁X팒0렻����P린�X撫s磁P0롔�롊숭�琿P0SQRVW뗹�鬪酪뗱샙}�颱t�貸�%�;|w�_^ZY[츤疑SQRVW뗴뗻P�|�|投뗗X3菱�뗗떷3菱�B�Q듙딅뗞뗖딊��sY瞬�Y_^ZY[홓SQSRHH뗗� |삄히�)|Z[P烏�s熉�X |@舜Y[X홓듒�X�홓QR듢�漏� 듏$�ZYX홓< w0�7��X�src/boot/boot_p.asm0100664000076500007650000003331006075037220014026 0ustar prool2prool2 PAGE ,132 ; Boot sector ver. 0.0.1.1 8-Nov-94 from Proolix operating system ; Copyright (C) Serge Pustovoitoff, 1993, 1994 off equ -100h Drive equ 0 ; Drive A ;ModifyParams equ 'Yes' Buff equ 0 ; 500h ?!!!!!!!!!! NewSeg equ 1050h PSPSeg equ 50h ; 70h ??????????????????????????????? LoadAddr equ (PSPSeg shl 4)+100h ;############################################################################# ; Print character sym to tty ; APS revised chr1 macro sym ; via BIOS ; Not worked in graph mode (bl - bg color!) ; NO SAVE REGS !!! mov ax,0e00h+sym int 10h endm chr1 ;############################################################################# ; NO SAVE REGS !!! ; 뙛む�ぎ쵟�쩆, 젺젷�（嶺좑 쵟む�ぎ쵟�ㄵ say. 뮢レぎ say ⓤ��レ㎯β 押�ゆ⑧ 9h ; 꼶�, � sayr - 押�ゆ⑧ BIOS (押�ゆ⑨ 0eh �誓贍쥯�⑨ 10h) ; � ｀졽①αえ� 誓┬쵟� �� �젩��젰� ; APS revised ; APS ! 닱 醒，���� 쩆��音 �η졻젰� 飡昔ゃ ; APS ! �� const 젮誓率 str sayr macro str mov si,offset str call sayr_proc endm sayr ;############################################################################# locals ; 맆㏅θⓥ� ギ첓レ�瑜 Д洙� jumps ; 맆訟ⓣ汀� ぎ昔洙�� ��誓若ㅻ .model tiny .code org 100h ;????????????????????????????? Begin: jmp short start db 90h OEM db 'KERNEL',0,0 SectSize dw 2 ;512 ;?! 2 ClustSiz db 2 ResSecs dw 1 FatCnt db 2 RootSiz dw 112 TotSecs dw 0b40h ;720 ;?! 0b40h Media db 0f0h ;0fdh ;?! f0 FatSize dw 9 ;2 ;?! 9 TrkSecs dw 18 ;9 ;?! 12h HeadCnt dw 2 HidnSec dd 0 BigNo dd 0 ; Big total no of sectors dw 0 ; Physical drive no db 9 ; Extended boot signature FATaddr dw 0,0 ; ! internal vars StartClu dw 0 ; ! Lbl db 'No_Kernel',0,0 ; Volume label db 'FAT12 ' ; File system ID RootSize dw ' ' ; use 2 last bytes of File system id SectSiz dw 512 ;?! 2 OldVec dw 2 dup (0) start: ; Table 11 bytes - drive param ; CS:IP = 0:7C00 SS=30 SP=F6 DS=0 ES=0 BX=7C00 Flags=0206 (DF==0) ; 0:0 - 0:100 - 1-� ��ギ˘췅 �젩エ劣 �誓贍쥯�Ł ; 묅ⅹ: c 30:F6 (0:3F6) �졹收� � 0 ; ROM BIOS area 0:400-0:500 ; 0:500 - 0:10500 (1000:0500) - ℓα� ��獸� ▲ㄵ� 甸昔 ; 룯誓쭬�ⓤ� boot'� � 1000:0500 (1050:0) mov si,bx ; si <- 7C00h mov cx,NewSeg mov ES,cx mov cx,512 xor di,di ; es:di <- 1050h:0 rep movsb ; 0:7C00h -> 1050h:0 chr1 '1' ; Indicate Ok db 0eah ; JMP long l_fork (in child process) dw l_fork+off,NewSeg l_fork: push es pop ds XOR AX,AX mov dl,Drive int 13h ; Disk dl=drive ah=func 00h ; reset disk, al=return status chr1 '2' loc_3: sayr Ident+off ; 'P' mov al,byte ptr FatCnt+off ; al <- ぎエ曄飡¡ FAT�� cbw ; ax <- ぎエ曄飡¡ FAT�� mov cx,word ptr FatSize+off ; cx <- �젳Д� FAT mul cx ; (dx:)ax <- 率К졷�硫 ; �젳Д� FAT�� ; (dx = 0) add ax,word ptr ResSecs+off ; ax <- FAT� + boot ; ax - Root Beginning Sector mov word ptr StartClu+off,ax ; PUSH ax mov ax,word ptr RootSiz+off mov cx,32 mul cx mov cx,word ptr SectSiz+off ; APS� 複複� dec ax ; 1-� �젫 �む膝ゥ�⑨ ; APS� ^^^^^ div cx ; dx:ax / cx -> ax; mod -> dx ; ax - Root Size in Sectors ; APS� 複複� inc ax ; 2-� �젫 �む膝ゥ�⑨ ; APS� ^^^^^ add word ptr StartClu+off,ax ; 룼ャ葉エ # 1-． ; か信收�� mov cx,ax mov word ptr RootSize+off,ax ; 맆㎚�� ぎ惜� � 醒も��졾 POP ax ; ax - Root Bg Sec @@loop: ; load root directory push cx push ax mov bx,600h ; 1000h ******************* mov ES,bx mov bx,Buff mov dl,Drive call SecRead ; 뿨�젰� �ㄸ� 醒も�� jc l_err mov cx,16 ; directory entries in 1 sector ; 꼱� 몤�뛾�릳뜋깕 몗뒕럯�!!!!!! @@l: push cx mov cx,6 mov di,bx mov si,offset OEM+off rep cmpsb je l_found pop cx add bx,32 loop @@l pop ax inc ax pop cx loop @@loop ;꽡｀習ⓥ� 醒も�� � ��汀� ⓤ첓筍 ; end of load root dir ; inkey2 l_err: sayr Lbl+off Vis: jmp short Vis ;***************************************************************************** ; APS revised sayr_proc proc ; Ver 0.0.1 9-Dec-93 ; 뤲�璵ㅳ�� �猶�쩆 飡昔え �黍 ��М蟯 押�ゆŁ BIOS ; 귛��: DS:SI - ASCIIZ 飡昔첓. ; NO REG SAVED !!! ; � ｀졽①αえ� 誓┬쵟� �� �젩��젰� ; APS� 複複� cld ; APS� 賽賽� sayr_l1: lodsb or al,al jz sayr_ret mov ah,0eh int 10h jmp short sayr_l1 sayr_ret: ret sayr_proc endp ;***************************************************************************** Ident db 'P',0 Ver db 'I',0 l_found: pop cx sayr Ver+off ; jmp Vis ; Found kernel ; bx - kernel dir record ; word ptr [bx+1ah] - 1st cluster mov ax,word ptr es:[bx+1ah] ; ax - 1st cluster ; LoadFAT PUSH ax ; save ax with 1st clu no mov bx,Buff add bx,word ptr SectSiz+off ; Addr buf for FAT mov word ptr FATaddr+off,bx ; 뫌魚젺Œ� 젮誓� ▲芯��. mov word ptr FATaddr+2+off,es mov ax,word ptr ResSecs+off ; 1-� 醒も�� FAT ; mov cx,word ptr FatSize+off ; 뫇�レぎ ㏇ⅲ� � �ⅸ 醒も�昔� MOV CX,2 ; 룑�� 꼱� 럲��꼯� @@l: mov dl,Drive call SecRead jc l_err add bx,word ptr SectSiz+off ; 뱼�エ葉筍 ▲芯� 췅 �젳Д� 醒も��� loop @@l mov al,byte ptr ClustSiz+off cbw mov dx,word ptr SectSiz+off mul dx mov cx,ax ; Cluster Size in Bytes ;!!!!!!!!!!!!!!!!!!!!!!!!!!!! xor ax,ax mov es,ax ;!!!!!!!!!!!!!!!!!!!!!!!!!!!! POP ax ; restore ax (1st clu of KERNEL) mov bx,LoadAddr MOV BX,1100h MOV ES,BX XOR BX,BX l2: mov dl,Drive call CluRead add bx,cx ; cmp bx,off ; 럦, 삇 쓵�??? ; jae l3 ; call NextClu ; set ax jnc l2 DB 0EAH DW 000H,1100H db 0eah ; JMP PSPSeg:100 dw 100h,PSPSeg l3: sayr Lbl+1+off l4: jmp l4 ;ssize db 'SIZE',0 ;**************************************************************************** NextClu proc ; Input: ax - cluster no ; Output: ax - next cluster from FAT ; cf=1 if EOF ; Use global var: ; FATaddr dw 0 ; REGS SAVED ! push bx push cx push dx push si push di push es mov di,ax mov bx,3 mul bx ; dx:ax := ax * bx shr ax,1 ; ax := ax /2 ; ax - addr in FAT mov si,ax les bx,dword ptr FATaddr+off mov ax,word ptr es:[bx+si] test di,1 jz @@1 mov cl,4 shr ax,cl ; jmp @@2 @@1: and ax,0fffh @@2: ; cmp ax,word ptr TotSecs+off ; ?!!!!! cmp ax,0ff8h jae @@cf clc @@ret: pop es pop di pop si pop dx pop cx pop bx ret @@cf: stc jmp @@ret NextClu endp ;**************************************************************************** SecRead proc ; ver 0.0.1 3-Nov-94 (for boot) ; Read absolute sectors ; Input: ax - abs sec number ; dl - drive (for int 13h Fn=2) ; ES:bx - buffer ; BP - autobase register ; DS - data segment reg ; Use global variables (based on BP!): ; word ptr HeadCnt+off ; word ptr TrkSecs+off ; Output: cf=1 if error ; ALL REGS SAVED !!! ; APS revised push ax push cx push dx push si push di mov si,bx ; save bx & dx mov di,dx PUSH ax mov ax,word ptr HeadCnt+off mov cx,word ptr TrkSecs+off mul cx ; dx:ax := HeadCnt*TrkSecs �.�. 뫁も�昔� 췅 �ㄸ� ; 與エ�ㅰ �� ㏇�� ．ギ˚젹 ; => dx=0 mov bx,ax POP ax xor dx,dx ; dx:ax - Abs Sec No div bx ; ax - Trk; dx - mod ; Ax - 꽡昔┴�, 췅 ぎ獸昔� 췅若ㄸ恂� �拾�硫 醒も�� mov bx,ax ; bx - track no mov ax,dx xor dx,dx ; dx:ax - module div cx ; dx:ax / TrkSecs; ax - Head; dx - Sec on Head-1 inc dx ; dx - Sec on Head mov cx,5 l_loop: push cx mov cl,dl ; sector mov ch,bl ; track ; Warning: track < 255 !!! mov bx,si ; Restore bx - offset for buff mov dx,di ; Restore dl - drive no mov dh,al ; head mov ax,0201h; Fn=02, Read 1 sector int 13h jnc l_break pop cx loop l_loop jmp short l_ret l_break: pop cx l_ret: pop di pop si pop dx pop cx pop ax ret SecRead endp ;**************************************************************************** CluRead proc ; Read cluster ; Input: ax - cluster number ; dl - drive (for int 13h Fn=2) ; ES:bx - buffer ; BP - autobase register ; DS - data segment reg ; Use global variables (based on BP!): ; StartClu dw 0 ; Number sector of 1st cluster ; ClustSiz db 2 ; SectSiz dw ; ALL REGS SAVED !!! ; APS revised push ax push bx push cx ; Sector = StartClu + ((Clu-2) * ClustSiz) PUSH bx PUSH dx dec ax dec ax mov bx,ax mov al,byte ptr ClustSiz+off cbw mov cx,ax mul bx add ax,word ptr StartClu+off ; ax - sector POP dx ; Restore dl POP bx ; cx - ClustSiz @@l: call SecRead jc l_err add bx,word ptr SectSiz+off inc ax loop @@l pop cx pop bx pop ax ret CluRead endp ;***************************************************************************** ;***************************************************************************** ;***************************************************************************** end Begin src/boot/booth12.bin0100664000076500007650000000077107007540152014016 0ustar prool2prool2�H륯roolix �+2��)BOOT FAT16 �|섡&||||꺬쥷|�H|�'|�)|� |�"|||+)|'|� |2葬�@�6|�|쇆琶 �t@)|�)|뗁좫|�H|샘}QPR搖r�Q� 뗼�+|且tY꺝 純ZXY@꺬宿퇔�誼딦�%|�|�||꺬삑렻3��|沃r�뚃꺠 렾@꺬脣� |삄 |透뗁�%|�`0렻3飜撫Fs嗤P0롔렳�롊숭�琿P0PSQRSHH뗗� |삄히�)|'|[�Ks�s�@꺬겷脣ZY[X홙QRW뗹�鬪酪삑렻뗗&�颱t�貸�%�;6|w�_ZY[츤疑PQR�6|�혞B|3菱6|�C|쥵|� Q�D|�樓 6B|뗃녽���6C|��sY徇�ZYX홠義src/boot/bootd.asm0100664000076500007650000001444106114105372013655 0ustar prool2prool2 PAGE ,79 ; Debugging boot sector 0.0.0.4 25-Feb-96 ; Copyright (C) Serge Pustovoitoff 1994, 1995 ; History ; 0.0.0.4 25-Feb-96 ; 0.0.0.3 16-Sep-95 ; 0.0.0.3 15-Sep-95 ; 0.0.0.2 8-Nov-94 off equ 7c00h - 100h ; 뙛む��. 귣¡� �ㄽ�． 歲Б�쳽 曄誓� ROM BIOS. chr1 macro sym ; Not worked in graph mode (registr bl - background color!) ; NO SAVED REGS !!! mov ax,0e00h+sym int 10h endm chr1 sayr macro str ; NO SAVE REGS !!! ; 뙛む�ぎ쵟�쩆, 젺젷�（嶺좑 쵟む�ぎ쵟�ㄵ say. 뮢レぎ say ⓤ��レ㎯β 押�ゆ⑧ 9h ; 꼶�, � sayr - 押�ゆ⑧ BIOS (押�ゆ⑨ 0eh �誓贍쥯�⑨ 10h) ; � ｀졽①αえ� 誓┬쵟� �� �젩��젰� mov si,offset str call sayr_proc endm sayr locals jumps .model tiny .code org 100h Begin: jmp short l db 90h ; '12345678' OEM db 'KERNEL',0,0 SectSiz dw 512 ClustSiz db 2 ResSecs dw 1 FatCnt db 2 RootSiz dw 112 TotSecs dw 720 Media db 0fdh FatSize dw 2 TrkSecs dw 9 HeadCnt dw 2 HidnSec dd 0 BigNo dd 0 ; Big total no of sectors dw 0 ; Physical drive no db 9 ; Extended boot signature ;dd 1 ; Volume serial no FATaddr dw 0 ; ! internal vars StartClu dw 0 ; ! Lbl db 'No_Kernel',0,0 ; Volume label db 'FAT12 ' ; File system ID RootSize dw ' '; use 2 last bytes of File system id OldVec dw 2 dup (0) l: ; Table 11 bytes - drive param push CS pop DS call saycsip sayr s1+off mov ax,FatSize+off call ohw sayr s2+off xor ax,ax mov ES,ax mov ax,word ptr ES:[13h*4+2] call ohw l0: jmp l0 saycsip proc ; REG SAVED push ax PUSHF sayr s0+off push CS pop ax call ohw chr1 ':' call l1 l1: pop ax PUSH BX mov bx,offset l1-Begin sub ax,bx call ohw POP BX sayr s_ax+off pop ax push ax call ohw sayr s_bx+off mov ax,bx call ohw sayr s_cx+off mov ax,cx call ohw sayr s_dx+off mov ax,dx call ohw sayr s_f+off POP ax ; flags (from stack) -> ax ; (see PUSHF) call ohw sayr s_si+off mov ax,si call ohw sayr s_di+off mov ax,di call ohw sayr s_ss+off mov ax,SS call ohw sayr s_sp+off mov ax,SP call ohw sayr s_ds+off mov ax,DS call ohw sayr s_es+off mov ax,ES call ohw sayr s_bp+off mov ax,BP call ohw pop ax ret s0 db 13,10,"Bg CS:IP=",0 s1 db " FatSize=",0 s2 db " int 13h =",0 s_ax db ' ax=',0 s_bx db ' bx=',0 s_cx db ' cx=',0 s_dx db ' dx=',0 s_si db ' si=',0 s_di db ' di=',0 s_ss db ' SS=',0 s_sp db ' SP=',0 s_ds db ' DS=',0 s_es db ' ES=',0 s_bp db ' BP=',0 s_f db ' Flags=',0 saycsip endp comment | ints proc ; Reg no saved !!! sayr s1+off mov cx,0ffh mov bp,0 l1: mov al,0ffh sub al,cl call ohb chr1 ' ' mov ax,[bp+2] call ohw chr1 ':' mov ax,[bp] call ohw chr1 13 chr1 10 add bp,4 test cx,0fh jnz l3 inkey2 l3: loop l1 ret s1 db 13,10,"ints",13,10,0 ints endp | comment | Int21 proc sayr Ver+off iret Int21 endp | comment | dump proc mov cx,520 xor si,si @@l: mov ax,byte ptr Begin-base[bp+si] call ohb inc si loop @@l ret dump endp | sayr_proc proc ; Ver 0.0.1 9-Dec-93 ; 뤲�璵ㅳ�� �猶�쩆 飡昔え �黍 ��М蟯 押�ゆŁ BIOS ; 귛��: DS:SI - ASCIIZ 飡昔첓. ; NO REG SAVED !!! ; � ｀졽①αえ� 誓┬쵟� �� �젩��젰� ; cld sayr_l1: lodsb or al,al jz sayr_ret mov ah,0eh int 10h jmp short sayr_l1 sayr_ret: ret sayr_proc endp ohw proc ; 귣¡� 笹�쥯 � HEX-˘ㄵ. 귛��: 笹�¡ � ax. ; 귗� 誓（飡贍 貰魚젺禎恂�. ; 귣㏓쥯β ��ㄿ昔｀젹с ohb push ax ; 뫌魚. �젮� al. mov al,ah call ohb pop ax ; 궙遜�. al. call ohb ret ohw endp ohb proc ; Procedure output hex byte Ver 0.1.1 6 Dec 93 via BIOS ; Input: AL - byte ; All regs. reserved ;) ; Not worked in graph mode. bl - bg color !!! push ax push cx push dx mov dl,al mov cl,4 shr al,cl call ohb1 mov al,dl and al,0fh call ohb1 pop dx pop cx pop ax ret ohb endp ohb1 proc ; Regs not saved !!! push ax cmp al,9 ja @@_1 ; al > 9 ; al <= 9 add al,'0' jmp @@_out @@_1: add al,'A'-10 @@_out: mov ah,0eh int 10h pop ax ret ohb1 endp Buff label byte ; for 512 byte space end Begin src/boot/bootrw.asm0100664000076500007650000000760406455725712014103 0ustar prool2prool2; read/write boot/master boot sector modules for bp.c locals _TEXT segment byte public 'CODE' assume cs:_TEXT ; bootread0 (int dev, void far * buf) return 0 or ErrorCode _bootread0 proc near push bp mov bp,sp ; word ptr [bp+4] - argument 1 ; word ptr [bp+6] - argument 2 ... push bx push cx push dx push ES mov dx,word ptr [bp+4] mov bx,word ptr [bp+6] mov ES,word ptr [bp+8] mov cx,1 mov dh,0 mov ax,0201h ; Fn=02, Read 1 sector int 13h jc @@err xor ax,ax jmp @@ret @@err: @@ret: pop ES pop dx pop cx pop bx ; mov sp,bp pop bp ret _bootread0 endp public _bootread0 ; bootwrite (int dev, void far * buf) return 0 or ErrorCode _bootwrite proc near push bp mov bp,sp ; word ptr [bp+4] - argument 1 ; word ptr [bp+6] - argument 2 ... push bx push cx push dx push ES mov dx,word ptr [bp+4] mov bx,word ptr [bp+6] mov ES,word ptr [bp+8] mov cx,1 mov dh,0 mov ax,0301h ; Fn=03, Write 1 sector int 13h jc @@err xor ax,ax jmp @@ret @@err: @@ret: pop ES pop dx pop cx pop bx ; mov sp,bp pop bp ret _bootwrite endp public _bootwrite _ReadPhysSec proc ; int ReadPhysSec (unsigned char drive, unsigned char sec, unsigned char head, ; unsigned char trk /* or cyl */, char *Buffer); ; /* ; 2 bytes are combined to a word similar to INT 13: ; ; �7�6�5�4�3�2�1�0� 1st byte (sector) ; � � 읕좔좔좔좔좔� Sector offset within cylinder ; 읕좔컴컴컴컴컴컴 High order bits of cylinder # ; ; �7�6�5�4�3�2�1�0� 2nd byte (cylinder) ; 읕좔좔좔좔좔좔컴컴 Low order bits of cylinder # ; */ ; ALL REGS SAVED push bp mov bp,sp push bx push cx push dx push ES push DS pop ES mov dl,byte ptr [bp+ 4] ; drive mov cl,byte ptr [bp+ 6] ; sec mov dh,byte ptr [bp+ 8] ; head mov ch,byte ptr [bp+10] ; trk mov bx,word ptr [bp+12] ; Buffer mov ax,0201h; Fn=02, Read 1 sector int 13h jc @@err xor ax,ax jmp @@ret @@err: ; mov ax,-1 @@ret: pop ES pop dx pop cx pop bx ; mov sp,bp pop bp ret _ReadPhysSec endp public _ReadPhysSec _WritePhysSec proc ; int WritePhysSec (unsigned char drive, unsigned char sec, unsigned char head, ; unsigned char trk, char *Buffer); ; ALL REGS SAVED push bp mov bp,sp push bx push cx push dx push ES push DS pop ES mov dl,byte ptr [bp+ 4] ; drive mov cl,byte ptr [bp+ 6] ; sec mov dh,byte ptr [bp+ 8] ; head mov ch,byte ptr [bp+10] ; trk mov bx,word ptr [bp+12] ; Buffer mov ax,0301h; Fn=03, Write 1 sector int 13h jc @@err xor ax,ax jmp @@ret @@err: ; mov ax,-1 @@ret: pop ES pop dx pop cx pop bx ; mov sp,bp pop bp ret _WritePhysSec endp public _WritePhysSec _TEXT ends end src/boot/makefile0100664000076500007650000000663407007540144013553 0ustar prool2prool2# OS Proolix. Boot record makefile. # Use Turbo C 2.0 make.exe for make Proolix kernel TasmFlags = /i..\..\..\proc /q /t /w2 /ml /z /m3 /l LinkFlag = /c/t/d/m/s/x # LinkFlag = /c/t/d/x TCFlag = -N- -K -C -mt -I..\include -DKERNEL # TCFlag = -K -C -mt -I..\include -DKERNEL -g1 -j1 # TCFlag = -K -C -O- -G- -Z- -d- -mt -r- -u+ -v- -y- CPPFlag = -I..\include TC = \tc # Proc = \usr\prool\proc Commands = ..\command Include = ..\include Kernel = ..\kernel .c.obj: tcc -c $(TCFlag) $& .asm.obj: tasm $(TasmFlags) $& .c.asm: tcc -c -S $(TCFlag) $& .c.i: cpp $(CPPFlag) $& all: bp.com boots.bin booth12.bin booth16.bin boots.bin: boots.obj tlink $(LinkFlag) boots,boots.bin booth12: booth12.bin bp.com bp -d4 -i -y booth12.bin booth16: booth16.bin bp.com bp -d4 -i -y booth16.bin boot: boots.bin bp.com bp -d0 -i -y boots.bin booth12.bin: booth12.obj tlink $(LinkFlag) booth12,booth12.bin booth16.bin: booth16.obj tlink $(LinkFlag) booth16,booth16.bin boots.obj: boots.asm booth12.obj: booth.asm fat12.asm tasm $(TasmFlags) /dFAT12 booth,booth12,booth12 booth16.obj: booth.asm fat16.asm tasm $(TasmFlags) /dFAT16 booth,booth16,booth16 bootrw.obj: bootrw.asm bp.com: bp.c $(Include)\struct.h $(Include)\limits.h bootrw.obj \ $(Kernel)\out_os.c $(Kernel)\out_mbr.c tcc -mt -lt bp.c bootrw.obj copy bp.com \bin herccomp: msherc.com msherc.bin comp msherc.bin msherc.com msherc.com: msherc.asm tasm $(TasmFlags) $& tlink /t/x msherc boot_p.bin: boot_p.obj tlink $(LinkFlag) boot_p,boot_p.bin csipboot: bootd.bin bp.com bp -da -i -y bootd.bin bootd.bin: bootd.obj tlink $(LinkFlag) bootd,bootd.bin i install: boot mbr.obj: mbr.asm mbr.com: mbr.obj bootcomp: mbr.com comp mbr.bin mbr.com boot360k.2nd: boot360k.asm tasm $(TasmFlag) -i\etc\sr boot360k tlink $(LinkFlag) boot360k,boot360k.2nd arh arj: pix_boot.arj arj f -jm pix_boot makefile arj f -r -t1g pix_boot *.c arj f -r -jm pix_boot save: a:\pix_boot.arj a:\proolix.arj a:\pix_boot.arj: pix_boot.arj copy pix_boot.arj a:\pix_boot.arj a:\proolix.arj: ..\proolix.arj copy ..\proolix.arj a:\proolix.arj ..\proolix.arj: pix_boot.arj arj f -r -jm -xfile_id.diz ..\proolix bak: del *.bak del *.map del *.tmp del *.lst del *.i del norton.ini clean: bak del *.obj del delete: clean pix_boot.arj arj f -jm pix_boot makefile arj f -r -jm -d -xmakefile pix_boot del tcpick.tcp test disktest: arj t a:\pix_boot.arj arj t a:\proolix.arj normalboot: boot360k bp -r -da boot360k reboot: hboot src/boot/boots.asm0100664000076500007650000003310506465111330013672 0ustar prool2prool2 PAGE ,79 jumps ; FDD Boot sector ver. 0.0.4.0 20-Apr-96 from Proolix operating system ; Copyright (C) Serge Pustovoitoff, 1993-1996 ; 뤲� �漱젮ぅ ▲�� 晨ⓥ猶젷ⓤ� Л�．葉笹���瑜 ��ゥ㎛瑜 쭬Д�젺⑨, ぎ獸贍� ; 誠�쳽� �ゥめ 뫁Д�篆� � 왽Ł 겈ギ殊茹Ł (bela@padco.kharkov.ua) ; History in stack order ; 0.0.4.0 20-Apr-96 쭬｀拾젰щ� �젵� /boot М┘� 〓筍 世졻 pklite'�� ; 0.0.3.1 24-Mar-96 replace chr1 '.' -> char1 176 ; 0.0.3.1 12-Mar-96 PSPSeg = 3050h ; 0.0.3.0 25-Feb-96 PSPSeg = 1050h ; 0.0.3.0 10-Jan-96 - 쭬｀拾젰� �� /kernel, � /boot (細. �젵� history, ; 쭬�ⓤ� 0.0.1.4 10-Jan-96 ; 0.0.2.3 16-Sep-95 ; 0.0.2.2 15-Sep-95 - �젳´手ゥ��� 췅 FDD � HDD ▲� 醒も��� ; 0.0.2.1 25-Feb-95 - ㄾ 將�． ⓤ獸黍� �� ´쳽刷... (細. �젶┘ �↓莘 ⓤ獸黍� ; � �젵ゥ kernel/history.doc ; 뫊ι����, 聲筌젺��� � 收�, 譽� ¡ №�э ぎНŒ湞Ŀ ; 젮誓貰� 췅�젷� 琠ワβ碎 100h, � ¡ №�э ; �誘�キ��⑨ 7c00h off equ 7c00h-100h Drive equ 0 ; 뇿｀習�嶺硫 ㄸ稅 A: (FDD 0) PSPSeg equ 3050h ; 뫁，��狩硫 젮誓�, ゃ쩆 ▲ㄵ� ; 쭬｀拾�� /boot (獸嶺ⅴ, ⅲ� PSP) FATaddr equ Buff ; 뙛む��. 귣¡� �ㄽ�． 歲Б�쳽 曄誓� ROM BIOS. chr1 macro sym ; Not worked in graph mode (registr bl - background color!) ; NO SAVE REGS !!! mov ax,0e00h+sym int 10h endm chr1 sayr macro str ; NO SAVE REGS !!! ; 뙛む�ぎ쵟�쩆, 젺젷�（嶺좑 쵟む�ぎ쵟�ㄵ say. 뮢レぎ say ⓤ��レ㎯β 押�ゆ⑧ 9h ; 꼶�, � sayr - 押�ゆ⑧ ROM BIOS (押�ゆ⑨ 0eh �誓贍쥯�⑨ 10h) ; � ｀졽①αえ� 誓┬쵟� �� �젩��젰� mov si,offset str call sayr_proc endm sayr locals .model tiny .code org 100h Begin: jmp short start ; 뮔∥ⓩ� 캙�젹β昔� ㄸ稅� db 90h ; NOP ; '12345678' OEM db 'Proolix ' SectSiz dw 512 ClustSiz db 2 ResSecs dw 1 FatCnt db 2 RootSiz dw 112 TotSecs dw 720 Media db 0fdh FatSize dw 2 TrkSecs dw 9 HeadCnt dw 2 HidnSec dd 0 BigNo dd 0 ; Big total no of sectors db 0 ; Head No db 0h ; Physical drive no db 29h ; Extended boot signature ;dd 1 ; Volume serial no ;FATaddr label word ; ! dw 0 ; ! internal vars StartClu dw 0 ; ! Lbl db 'BOOT ' ; Volume label db 'FAT12 ' ; File system ID RootSize dw ' '; use 2 last bytes of File system id OldVec dw 2 dup (0) start: ; push CS ; pop DS ; sayr OEM+off ; 눑좂��⑨ 誓（飡昔� ��笹� 쭬｀習え boot-醒も��� ; CS:IP = 0:7C00 SS=30 SP=F6 ES=0 ; 0:0 - 0:200 - �젩エ�� �誓贍쥯�Ł ; 묅ⅹ: c 30:F6 (0:3F6) �졹收� � 0 (0:200-0:400 - 飡ⅹ) ; ROM BIOS area 0:400-0:500 ; cli ; 뙫ㄸ十첓與� diskette param table (ˇ汀� �� ▲�� MSDOS 6.0) ; �拾�� エ � �IJαゥㅳ迹ⅸ ぎ쵟�ㄵ �誓十め ES: ? lds si,dword ptr ES:[78h] ; DS:si - vector diskette param table ; diskette param tble ; Bytes: ; 0 - bit 0-3 - SRT (step rate time), 4-7 head unload time ; 1 - bit 0: 1 if DMA, 2-7 head load time ; 2 - motor wait (in 55 ms) ; 3 - sec size (0 - 128, 1 - 256, 2 - 512, 3 - 1024) ; 4 - EOT (finish sector on track) ; 5 - interval length for ReadWrite ; 6 - DTL - Data Transfer Length (maximal) ; 7 - interval length for formatting ; 8 - Filler ; 9 - head settle time (in ms) ; a - motor start time (in 1/8 s) mov byte ptr [si+9],0Fh ; head settle := f mov cx,TrkSecs+off ; TrkSecs mov [si+6],cl ; Data Transfer Length ; sti mov dl,Drive xor ax,ax int 13h ; Disk dl=drive ah=func 00h ; reset disk, al=return status jc l_err push CS pop ES push CS pop DS ; 귣葉笹��⑨ mov al,byte ptr FatCnt+off cbw mov cx,word ptr FatSize+off mul cx ; ax*cx -> dx:ax add ax,word ptr ResSecs+off ; ax - Root Beginning Sector mov word ptr StartClu+off,ax PUSH ax mov ax,word ptr RootSiz+off mov cx,32 mul cx mov cx,word ptr SectSiz+off div cx ; dx:ax / cx -> ax; mod -> dx or dx,dx ; 끷エ �飡졻�� ���乘ⅱ��, 獸 �黍줎˙畑� ι� �ㄸ� jz l_ll ; 醒も�� (��笹ⅳ�Ł ����キ硫 醒も�� root'�) inc ax l_ll: ; ax - Root Size in Sectors add word ptr StartClu+off,ax mov cx,ax mov word ptr RootSize+off,ax POP ax ; ax - Root Bg Sec @@loop: ; 뇿｀習첓 ぎ惜ⅱ�． 첓�젷�짛 ��醒も�惜� � ��醒も�惜硫 ��ⓤ� � ��� ; º��� 甸�� push cx push ax mov bx,offset Buff+off mov dl,Drive push ax call SecRead jc l_err pop ax ; push ax ; chr1 'R' ; pop ax mov cx,16 ; root entryes in 1 sector @@l: push cx mov cx,11 mov di,bx mov si,offset Lbl+off rep cmpsb je l_found pop cx add bx,32 loop @@l pop ax inc ax pop cx loop @@loop ; end of load root dir ; H� H�삄� 웶�� l_err: ; chr1 'E' call ohw xor ah,ah int 16h int 19h ;Vis: jmp short Vis sayr_proc proc ; Ver 0.0.1 9-Dec-93 ; 뤲�璵ㅳ�� �猶�쩆 飡昔え �黍 ��М蟯 押�ゆŁ BIOS ; 귛��: DS:SI - ASCIIZ 飡昔첓. ; NO REG SAVED !!! ; � ｀졽①αえ� 誓┬쵟� �� �젩��젰� ; cld sayr_l1: lodsb or al,al jz sayr_ret mov ah,0eh int 10h jmp short sayr_l1 sayr_ret: ret sayr_proc endp l_found: ; H�삄� ! pop cx ; Found kernel ; bx - kernel dir record ; word ptr [bx+1ah] - 1st cluster mov ax,word ptr [bx+1ah] ; ax - 1st cluster ; 뇿｀習첓 FAT � 럤� PUSH ax ; save ax with 1st clu no mov ax,word ptr ResSecs+off mov bx,offset FATaddr+off mov cx,word ptr FatSize+off ; 뇿｀習첓 甸�� ��か졹收惜� (�� 璵��囹� �� FAT�) ; 뇿｀習첓 FAT @@l: mov dl,Drive push ax call SecRead jc l_err pop ax add bx,512 inc ax ; Next sector! ; push ax ; chr1 'F' ; pop ax loop @@l mov al,byte ptr ClustSiz+off cbw mov dx,word ptr SectSiz+off mul dx mov cx,ax ; Cluster Size in Bytes POP ax ; restore ax (1st clu no) mov bx,PSPSeg mov ES,bx mov bx,100h l2: mov dl,Drive call CluRead push ax chr1 176 pop ax add bx,cx call NextClu ; set ax jnc l2 ; EXEC! 뇿�信� 甸�� ; mov ax,PSPSeg ; mov DS,ax ; mov ES,ax ; cli ; mov SS,ax ; mov SP,0fffeh ; sti ; sayr OEM+off ; *(int far *)MK_FP(PSP,2)=0x9FFF; /* ㄻ� LZEXE */ mov ax,PSPSeg mov DS,ax cli mov SS,ax mov SP,0fffeh sti ; mov ES,ax ; mov word ptr ES:[2],9FFFh db 0eah ; JMP PSPSeg:100 dw 100h,PSPSeg NextClu proc ; Input: ax - cluster no ; Output: ax - next cluster from FAT ; cf=1 if EOF ; Use global var: ; FATaddr dw 0 ; REGS SAVED ! push bx push cx push dx push si push di mov di,ax mov bx,3 mul bx ; dx:ax := ax * bx shr ax,1 ; ax := ax /2 ; ax - addr in FAT mov si,ax mov bx,offset FATaddr+off mov ax,word ptr [bx+si] test di,1 jz @@1 mov cl,4 shr ax,cl jmp @@2 @@1: and ax,0fffh @@2: ; cmp ax,0fffh ; je @@cf ; cmp ax,0ff7h ; je @@cf cmp ax,word ptr TotSecs+off ja @@cf clc @@ret: pop di pop si pop dx pop cx pop bx ret @@cf: stc jmp @@ret NextClu endp SecRead proc ; ver 0.0.1 3-Nov-94 (for FDD boot) ; Read absolute sectors ; Input: ax - abs sec number ; dl - drive (for int 13h Fn=2) ; ES:bx - buffer ; DS - data segment reg ; Use global variables: ; word ptr HeadCnt+off ; word ptr TrkSecs+off ; Output: cf=1 if error ; NO ALL REGS SAVED !!! ; push ax push bx push cx push dx push si push di mov si,bx ; save bx & dx mov di,dx PUSH ax mov ax,word ptr HeadCnt+off mov cx,word ptr TrkSecs+off mul cx ; dx:ax := HeadCnt * TrkSecs mov bx,ax ; bx = HeadCnt * TrkSecs POP ax xor dx,dx ; dx:ax - Abs Sec No div bx ; ax=Track=AbsSec/(HeadCnt*TrkSecs); dx - mod (Sec on Cyl) mov bx,ax ; bx - track no mov ax,dx xor dx,dx ; dx:ax - module (Sec on Cyl) div cx ; Head=[dx:ax]/TrkSecs;ax - Head; mod (dx) - Sec on Head-1 inc dx ; dx - Sec on Head mov cx,5 l_loop: push cx mov cl,dl ; sector mov ch,bl ; track ; Warning: track < 255 !!! mov bx,si ; Restore bx - offset for buff mov dx,di ; Restore dl - drive no mov dh,al ; head mov ax,0201h; Fn=02, Read 1 sector int 13h jnc l_break pop cx loop l_loop jmp short l_ret l_break: pop cx l_ret: pop di pop si pop dx pop cx pop bx ; pop ax ret SecRead endp CluRead proc ; Read cluster ; Input: ax - cluster number ; dl - drive (for int 13h Fn=2) ; ES:bx - buffer ; DS - data segment reg ; Use global variables: ; StartClu dw 0 ; Number sector of 1st cluster ; ClustSiz db 2 ; SectSiz dw ; ALL REGS SAVED !!! push ax push bx push cx ; Sector = StartClu + ((Clu-2) * ClustSiz) PUSH bx PUSH dx dec ax ; ax:=ax-2 dec ax ; mov bx,ax mov al,byte ptr ClustSiz+off cbw mov cx,ax mul bx add ax,word ptr StartClu+off ; ax - sector POP dx ; Restore dl POP bx ; cx - ClustSiz @@l: push ax call SecRead jc l_err pop ax add bx,word ptr SectSiz+off inc ax loop @@l pop cx pop bx pop ax ret CluRead endp ohw proc ; 귣¡� 笹�쥯 � HEX-˘ㄵ. 귛��: 笹�¡ � ax. ; 귗� 誓（飡贍 貰魚젺禎恂�. ; 귣㏓쥯β ��ㄿ昔｀젹с ohb push ax ; 뫌魚. �젮� al. mov al,ah call ohb pop ax ; 궙遜�. al. call ohb ret ohw endp ohb proc ; Procedure output hex byte Ver 0.1.1 6 Dec 93 via BIOS ; Input: AL - byte ; All regs. reserved ;) ; Not worked in graph mode. bl - bg color !!! push ax push cx push dx mov dl,al mov cl,4 shr al,cl call ohb1 mov al,dl and al,0fh call ohb1 pop dx pop cx pop ax ret ohb endp ohb1 proc ; Regs not saved !!! push ax cmp al,9 ja @@_1 ; al > 9 ; al <= 9 add al,'0' jmp @@_out @@_1: add al,'A'-10 @@_out: mov ah,0eh int 10h pop ax ret ohb1 endp Buff label byte end Begin src/boot/files.bbs0100664000076500007650000000003006451504224013626 0ustar prool2prool2BOOTRW.ASM bootread0() src/boot/fat16.asm0100664000076500007650000000145706465172730013505 0ustar prool2prool2; for FAT-16 NextClu proc ; Input: ax - cluster no ; Output: ax - next cluster from FAT ; cf=1 if EOF ; REGS SAVED ! push bx push dx push ES mov bx,2 mul bx ; dx:ax := ax * bx ; dx:ax - relative address in FAT add dx,FATseg ; dx:ax - absolute address in FAT mov ES,dx mov bx,ax mov ax,word ptr ES:[bx] ; cmp ax,0fffh ; je @@cf ; cmp ax,0ff7h ; je @@cf cmp ax,word ptr MaxClusters+off ja @@cf clc @@ret: pop ES pop dx pop bx ret @@cf: stc jmp @@ret NextClu endp src/boot/booth16.bin0100664000076500007650000000074307007540152014021 0ustar prool2prool2�H륯roolix �+2��)BOOT FAT16 �|섡&||||꺬쥷|�H|�'|�)|� |�"|||+)|'|� |2葬�@�6|�|쇆琶 �t@)|�)|뗁좫|�H|삠}QPR倭r�Q� 뗼�+|且tY꺝 純ZXY@꺬宿퇔�誼딦�%|�|�||꺬삑렻3��|��r�뚃꺠 렾@꺬脣� |삄 |透뗁�%|�`0렻3飜撫Fs嗤P0롔렳�롊숭�琿P0PSQRSHH뗗� |삄히�)|'|[�5s�s�@꺬겷脣ZY[X홙R�鬪겶�렺뗗&�;6|w�Z[츤義PQR�6|�혞B|3菱6|�C|쥵|� Q�D|�樓 6B|뗃녽���6C|��sY徇�ZYX홠義src/boot/booth.asm0100664000076500007650000002410506466160236013671 0ustar prool2prool2 PAGE ,79 jumps ; HDD Boot sector ver. 0.0.0.0 2-Feb-98 from Proolix operating system ; 뤲� �漱젮ぅ ▲�� 晨ⓥ猶젷ⓤ� Л�．葉笹���瑜 ��ゥ㎛瑜 쭬Д�젺⑨, ぎ獸贍� ; 誠�쳽� �ゥめ 뫁Д�篆� � 왽Ł 겈ギ殊茹Ł, bela@interfax.kharkov.ua off equ 7C00h-100h ; 뫊ι����, 聲筌젺��� � 收�, 譽� ¡ №�э ぎНŒ湞Ŀ ; 젮誓貰� 췅�젷� 琠ワβ碎 100h, � ¡ №�э ; �誘�キ��⑨ 7C00 PSPSeg equ 3050h ; 뫁，��狩硫 젮誓�, ゃ쩆 ▲ㄵ� ; 쭬｀拾�� ▲燧��ⅳ┘� ; (獸嶺ⅴ, ⅲ� PSP) FATseg equ 7E0h ; 뙛む��. 귣¡� �ㄽ�． 歲Б�쳽 曄誓� ROM BIOS. chr macro sym ; Not worked in graph mode (registr bl - background color!) ; NO SAVED REGS !!! mov ax,0e00h+sym int 10h endm chr locals .model tiny .code org 100h Begin: jmp start ; 뮔∥ⓩ� 캙�젹β昔� ㄸ稅� db 90h ; NOP ; '12345678' OEM db 'Proolix ' SectSiz dw 512 ClustSiz db 4 ResSecs dw 1 FatCnt db 2 RootSiz dw 512 TotSecs dw 0 Media db 0f8h FatSize dw 43 TrkSecs dw 50 HeadCnt dw 2 HidnSec dd 40200 BigNo dd 0 ; Big total no of sectors db 0 ; Head No FirstClu label word DriveNo_ db 80h ; Physical drive no db 29h ; Extended boot signature StartCluHi dw 0 ; dd Volume serial no StartCluLo dw 0 Lbl db 'BOOT ' ; Volume label MaxClusters label word db 'FAT16 ' ; File system ID RootSize dw ' '; use 2 last bytes of File system id OldVec dw 2 dup (0) Sector_ db 0 HeadNo db 0 TrackNo_ dw 0 RootSectLow dw 0 RootSectHi dw 0 start: ; 눑좂��⑨ 誓（飡昔� ��笹� 쭬｀習え boot-醒も��� ; CS:IP = 0:7C00 SS=30 SP=F6 ES=0 ; 0:0 - 0:200 - �젩エ�� �誓贍쥯�Ł ; 묅ⅹ: c 30:F6 (0:3F6) �졹收� � 0 (0:200-0:400 - 飡ⅹ) ; ROM BIOS area 0:400-0:500 ; mov dl,80h ; int 13h ; Disk dl=drive ah=func 00h ; ; reset disk, al=return status ; jc l_err loc_3: push CS pop DS push CS pop ES ; chr '0' ; 귣葉笹��⑨ mov al,byte ptr FatCnt+off cbw mul word ptr FatSize+off ; FatCnt * FatSize -> dx:ax add ax,word ptr HidnSec+off ; low adc dx,word ptr HidnSec+2+off ; high add ax,word ptr ResSecs+off adc dx,0 ; dx:ax - Root 1st Sector mov RootSectLow+off,ax mov RootSectHi+off,dx ; 뫌魚젺畑� ; �≪�� ぎ惜� � 醒も��졾=(RootSiz*32)/512=RootSiz/16; mov word ptr StartCluHi+off,dx mov word ptr StartCluLo+off,ax ; MaxClusters=(unsigned int)((MaxSectors-DataStart)/CluSize+1); mov ax,word ptr BigNo+off mov dx,word ptr BigNo+2+off add ax,word ptr HidnSec+off ; low adc dx,word ptr HidnSec+2+off ; high sub ax,word ptr StartCluLo+off sbb dx,word ptr StartCluHi+off mov cl,ClustSiz+off xor ch,ch div cx inc ax mov MaxClusters+off,ax mov ax,word ptr RootSiz+off ; dx:ax - �↔�� ぎ惜� � 줎⒱졾 cwd mov cx,16 div cx ; ax <- �↔�� ぎ惜� � 醒も��졾 ; dx <- �飡졻�� or dx,dx ; ㄾ줎˙���� ��笹ⅳ�ⅲ� ����キ�． 醒も��� jz l_zero inc ax l_zero: ; ax - �↔�� ぎ惜� � 醒も��졾 add word ptr StartCluLo+off,ax adc word ptr StartCluLo+off,0 ; 뇿｀習첓 ぎ惜ⅱ�． 첓�젷�짛 ��醒も�惜� � ��醒も�惜硫 ��ⓤ� � ��� ; º��� 甸�� mov cx,ax ; - �↔�� ぎ惜� � 醒も��졾 mov ax,RootSectLow+off mov dx,RootSectHi+off l_loop_1: mov bx,offset Buff+off push cx push ax push dx call ReadSector ; read sector (dx:ax)-> ES:bx jc l_err ; 룼ⓤ� 甸�� � ぎ惜� mov cx,16 ; root entryes in 1 sector @@l: push cx mov cx,11 mov di,bx mov si,offset Lbl+off rep cmpsb je l_found pop cx add bx,32 loop @@l pop dx pop ax pop cx inc ax adc dx,0 loop l_loop_1 l_err: chr 'E' Vis: jmp short Vis l_found: ; H�삄� ! ; chr 'O' ; Found kernel ; bx - kernel dir record ; word ptr [bx+1ah] - 1st cluster mov ax,word ptr [bx+1ah] ; ax - 1st cluster mov FirstClu+off,ax mov ax,word ptr HidnSec+off mov dx,word ptr HidnSec+2+off add ax,word ptr ResSecs+off adc dx,0 ; dx:ax - 1st FAT sector mov bx,FATseg mov ES,bx ; ES=FATseg xor bx,bx mov cx,word ptr FatSize+off ; 뇿｀習첓 甸�� ��か졹收惜� (�� 璵��囹� �� FAT�) ; 뇿｀習첓 FAT @@l: call ReadSector ; read sec dx:ax -> ES:bx jc l_err mov si,ES add si,20h mov ES,si ; ES+=20h inc ax ; Next sector! adc dx,0 loop @@l mov al,byte ptr ClustSiz+off cbw mov dx,word ptr SectSiz+off mul dx mov cx,ax ; Cluster Size in Bytes mov ax,FirstClu+off mov bx,PSPSeg+10h mov ES,bx ; ES=PSPSeg+10h xor bx,bx l2: call CluRead ; push ax ; chr '.' ; pop ax add bx,cx call NextClu ; set ax jnc l2 ; chr 'X' ; EXEC! 뇿�信� 甸�� ; *(int far *)MK_FP(PSP,2)=0x9FFF; /* ㄻ� LZEXE */ mov ax,PSPSeg mov DS,ax mov ES,ax cli mov SS,ax mov SP,0fffeh sti db 0eah ; JMP PSPSeg:100 dw 100h,PSPSeg CluRead proc ; Read cluster ; Input: ax - cluster number ; ES:bx - buffer ; DS - data segment reg ; Use global variables: ; StartCluHi:StartCluLo - Number sector of 1st cluster ; ClustSiz db 2 ; SectSiz dw ; ALL REGS SAVED !!! push ax push bx push cx push dx ; Sector = StartClu + ((Clu-2) * ClustSiz) PUSH bx dec ax ; ax:=ax-2 dec ax ; mov bx,ax mov al,byte ptr ClustSiz+off cbw mov cx,ax mul bx add ax,word ptr StartCluLo+off adc dx,word ptr StartCluHi+off POP bx ; dx:ax - sector @@lll: call ReadSector jc l_err inc ax adc dx,0 add bx,512 loop @@lll pop dx pop cx pop bx pop ax ret CluRead endp ifdef FAT12 include fat12.asm else include fat16.asm endif ;賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽 ; 뿨�젰� 1 醒も�� dx:ax � es:bx. CF, αエ �鼇―�. ReadSector proc near push ax push cx push dx ; 뇿��キ畑� ˛呻誓���� ��誓Д��瑜 Sector_, HeadNo � TrackNo_ ㎛좂��⑨Ж, ; 貰�手β飡㏂迹º� 젩�. 醒も�說 dx:ax. div word ptr TrkSecs+off ; dx:ax / TrkSecs -> (dx,ax) inc dl ; dl - # 醒も��� mov Sector_+off,dl xor dx,dx ; dx=0 div word ptr HeadCnt+off mov HeadNo+off,dl ; # 飡�昔�� mov TrackNo_+off,ax ; # ㄾ昔┴� mov cx,10 @@loop: PUSH CX mov dx,TrackNo_+off ; dx=TrackNo_ mov cl,6 ; cl=6 shl dh,cl ; dh=tt000000 B or dh,Sector_+off ; dh=ttssssss B mov cx,dx ; cx=ttsssssstttttttt xchg ch,cl ; cx=ttttttttttssssss mov dl,80h ; drive mov dh,HeadNo+off mov ax,0201h int 13h ; read sectors to memory es:bx ; al=#,ch=cyl,cl=sectr,dh=head jnc @@ok POP CX loop @@loop stc @@ret: pop dx pop cx pop ax retn @@ok: POP CX jmp @@ret ReadSector endp ;賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽賽 Buff label byte end Begin src/boot/boot0.asm0100664000076500007650000003420006075037234013573 0ustar prool2prool2 PAGE ,79 ; Boot sector ver. 0.0.0.8 7-Nov-94 from Proolix operating system ; Copyright (C) Serge Pustovoitoff, 1993, 1994 off equ 7c00h - 100h Drive equ 0 ModifyParams equ 'Yes' PSPSeg equ 50h ; 70h LoadAddr equ (PSPSeg shl 4)+100h include macros.asm sayr macro str ; NO SAVE REGS !!! ; 뙛む�ぎ쵟�쩆, 젺젷�（嶺좑 쵟む�ぎ쵟�ㄵ say. 뮢レぎ say ⓤ��レ㎯β 押�ゆ⑧ 9h ; 꼶�, � sayr - 押�ゆ⑧ BIOS (押�ゆ⑨ 0eh �誓贍쥯�⑨ 10h) ; � ｀졽①αえ� 誓┬쵟� �� �젩��젰� mov si,offset str call sayr_proc endm sayr locals jumps .model tiny .code org 100h Begin: jmp short l db 90h ; '12345678' OEM db 'KERNEL',0,0 SectSiz dw 512 ClustSiz db 2 ResSecs dw 1 FatCnt db 2 RootSiz dw 112 TotSecs dw 720 Media db 0fdh FatSize dw 2 TrkSecs dw 9 HeadCnt dw 2 HidnSec dd 0 BigNo dd 0 ; Big total no of sectors dw 0 ; Physical drive no db 9 ; Extended boot signature ;dd 1 ; Volume serial no FATaddr dw 0 ; ! internal vars StartClu dw 0 ; ! Lbl db 'No_Kernel',0,0 ; Volume label db 'FAT12 ' ; File system ID RootSize dw ' '; use 2 last bytes of File system id OldVec dw 2 dup (0) l: ; Table 11 bytes - drive param cli xor ax,ax mov es,ax ifdef ModifyParams mov bx,78h ; ¡� ㄾ 歲� ��� ▲ㄵ� �젩エ�� � 11 줎⒱ lds si,dword ptr es:[bx] ; ds:si - vector diskette param mov word ptr OldVec+off,si mov word ptr OldVec+off+2,ds ; push ds ; push si ; push ss ; push bx mov di,offset l+off mov cx,0Bh cld rep movsb ;11 bytes from diskette param tble to begin of pgm ; Bytes: ; 0 - bit 0-3 - SRT (step rate time), 4-7 head unload time ; 1 - bit 0: 1 if DMA, 2-7 head load time ; 2 - motor wait (in 55 ms) ; 3 - sec size (0 - 128, 1 - 256, 2 - 512, 3 - 1024) ; 4 - EOT (finish sector on track) ; 5 - interval length for ReadWrite ; 6 - DTL - Data Transfer Length (maximal) ; 7 - interval length for formatting ; 8 - Filler ; 9 - head settle time (in ms) ; a - motor start time (in 1/8 s) push es pop ds mov byte ptr [di-2],0Fh ; head settle := f mov cx,ds:TrkSecs+off ; TrkSecs mov [di-7],cl ; Data Transfer Length mov [bx+2],ax mov word ptr [bx],offset l+off ; new diskette table endif sti mov dl,Drive int 13h ; Disk dl=drive ah=func 00h ; reset disk, al=return status comment | jc l_err xor ax,ax cmp TotSecs+off,ax ; TotSecs cmp with 0 je loc_3 mov cx,TotSecs+off ; TotSecs mov word ptr BigNo+off,cx ; Big total no of sec | loc_3: sayr Ident+off mov al,byte ptr FatCnt+off cbw mov cx,word ptr FatSize+off mul cx ; ax*cx -> dx:ax add ax,word ptr ResSecs+off ; ax - Root Beginning Sector mov word ptr StartClu+off,ax PUSH ax mov ax,word ptr RootSiz+off mov cx,32 mul cx mov cx,word ptr SectSiz+off div cx ; dx:ax / cx -> ax; mod -> dx ; ax - Root Size in Sectors add word ptr StartClu+off,ax mov cx,ax mov word ptr RootSize+off,ax POP ax ; ax - Root Bg Sec @@loop: ; load root directory push cx push ax mov bx,offset Buff+off mov dl,Drive call SecRead jc l_err ; chr1 '#' mov cx,16 ; root entryes in 1 sector @@l: push cx mov cx,6 mov si,bx mov di,offset OEM+off rep cmpsb je l_found pop cx add bx,32 loop @@l pop ax inc ax pop cx loop @@loop ; end of load root dir ; inkey2 l_err: sayr Lbl+off @@ll: jmp short @@ll ; include ohb1.asm ; include ohw.asm l_found: pop cx ;sayr Ver+off ; Found kernel ; bx - kernel dir record ; word ptr [bx+1ah] - 1st cluster mov ax,word ptr [bx+1ah] ; ax - 1st cluster ;LoadFAT PUSH ax ; save ax with 1st clu no mov bx,offset Buff+off mov ax,word ptr RootSize+off mov cx,word ptr SectSiz+off mul cx ; ax - RootSize in bytes add bx,ax ; Addr buf for FAT mov word ptr FATaddr+off,bx mov ax,word ptr ResSecs+off mov cx,word ptr FatSize+off @@l: mov dl,Drive call SecRead jc l_err add bx,512 loop @@l mov al,byte ptr ClustSiz+off cbw mov dx,word ptr SectSiz+off mul dx mov cx,ax ; Cluster Size in Bytes POP ax ; restore ax (1st clu no) mov bx,LoadAddr l2: mov dl,Drive call CluRead add bx,cx cmp bx,off jae l3 call NextClu ; set ax jnc l2 ; EXEC! ; mov ax,PSPSeg ; mov DS,ax ; mov ES,ax ; cli ; mov SS,ax ; mov SP,0fffeh ; sti db 0eah ; JMP PSPSeg:100 dw 100h,PSPSeg l3: sayr L_err+off l4: jmp l4 ;ssize db 'SIZE',0 NextClu proc ; Input: ax - cluster no ; Output: ax - next cluster from FAT ; cf=1 if EOF ; Use global var: ; FATaddr dw 0 ; REGS SAVED ! push bx push cx push dx push si push di mov di,ax mov bx,3 mul bx ; dx:ax := ax * bx shr ax,1 ; ax := ax /2 ; ax - addr in FAT mov si,ax mov bx,word ptr FATaddr+off mov ax,word ptr [bx+si] test di,1 jz @@1 mov cl,4 shr ax,cl jmp @@2 @@1: and ax,0fffh @@2: ; cmp ax,0fffh ; je @@cf ; cmp ax,0ff7h ; je @@cf cmp ax,word ptr TotSecs+off ja @@cf clc @@ret: pop di pop si pop dx pop cx pop bx ret @@cf: stc jmp @@ret NextClu endp SecRead proc ; ver 0.0.1 3-Nov-94 (for boot) ; Read absolute sectors ; Input: ax - abs sec number ; dl - drive (for int 13h Fn=2) ; ES:bx - buffer ; BP - autobase register ; DS - data segment reg ; Use global variables (based on BP!): ; word ptr HeadCnt+off ; word ptr TrkSecs+off ; Output: cf=1 if error ; ALL REGS SAVED !!! push ax push cx push dx push si push di mov si,bx ; save bx & dx mov di,dx PUSH ax mov ax,word ptr HeadCnt+off mov cx,word ptr TrkSecs+off mul cx ; dx:ax := HeadCnt * TrkSecs mov bx,ax POP ax xor dx,dx ; dx:ax - Abs Sec No div bx ; ax - Trk; dx - mod mov bx,ax ; bx - track no mov ax,dx xor dx,dx ; dx:ax - module div cx ; dx:ax / TrkSecs; ax - Head; dx - Sec on Head-1 inc dx ; dx - Sec on Head mov cx,5 l_loop: push cx mov cl,dl ; sector mov ch,bl ; track ; Warning: track < 255 !!! mov bx,si ; Restore dl - drive no mov dx,di ; Restore bx - offset for buff mov dh,al ; head mov ax,0201h; Fn=02, Read 1 sector int 13h jnc l_break pop cx loop l_loop jmp short l_ret l_break: pop cx l_ret: pop di pop si pop dx pop cx pop ax ret SecRead endp CluRead proc ; Read cluster ; Input: ax - cluster number ; dl - drive (for int 13h Fn=2) ; ES:bx - buffer ; BP - autobase register ; DS - data segment reg ; Use global variables (based on BP!): ; StartClu dw 0 ; Number sector of 1st cluster ; ClustSiz db 2 ; SectSiz dw ; ALL REGS SAVED !!! push ax push bx push cx push bx mov bl,1 chr1 '#' pop bx ; Sector = StartClu + ((Clu-2) * ClustSiz) PUSH bx PUSH dx sub ax,2 mov bx,ax mov al,byte ptr ClustSiz+off cbw mov cx,ax mul bx add ax,word ptr StartClu+off ; ax - sector POP dx ; Restore dl POP bx ; cx - ClustSiz @@l: call SecRead jc l_err add bx,word ptr SectSiz+off inc ax loop @@l pop cx pop bx pop ax ret CluRead endp comment | reada1 proc ; Regs no save !!! xor ax,ax xor dl,dl mov bx,offset Buff+off call SecRead jc l_err sayr Buff-base+3[bp] ret reada1 endp | comment | reada proc ; Reg no save !!! mov ah,2 ; Fn read mov al,1 ; num sec mov dl,Drive ; drive mov dh,0 ; head mov cx,1 ; cyl/sec mov bx,offset Buff+off int 13h jc l_err sayr Buff-base+3[bp] ret reada endp | comment | saycsip proc ; REG SAVED push ax sayr s0+off push CS pop ax call ohw chr1 ':' mov ax,Begin+off call ohw ; sayr s_ax+off ; pop ax ; push ax ; call ohw ; sayr s_bx+off ; mov ax,bx ; call ohw ; sayr s_cx+off ; mov ax,cx ; call ohw ; sayr s_dx+off ; mov ax,dx ; call ohw ; sayr s_si+off ; mov ax,si ; call ohw ; sayr s_di+off ; mov ax,di ; call ohw sayr s_ss+off mov ax,SS call ohw sayr s_sp+off mov ax,SP call ohw sayr s_ds+off mov ax,DS call ohw sayr s_es+off mov ax,ES call ohw ; sayr s_bp+off ; mov ax,BP ; call ohw pop ax ret s0 db 13,10,"Bg CS:IP=",0 ;s_ax db ' ax=',0 ;s_bx db ' bx=',0 ;s_cx db ' cx=',0 ;s_dx db ' dx=',0 ;s_si db ' si=',0 ;s_di db ' di=',0 s_SS db ' SS=',0 s_SP db ' SP=',0 s_DS db ' DS=',0 s_ES db ' ES=',0 ;s_bp db ' BP=',0 saycsip endp | comment | ints proc ; Reg no saved !!! sayr s1+off mov cx,0ffh mov bp,0 l1: mov al,0ffh sub al,cl call ohb chr1 ' ' mov ax,[bp+2] call ohw chr1 ':' mov ax,[bp] call ohw chr1 13 chr1 10 add bp,4 test cx,0fh jnz l3 inkey2 l3: loop l1 ret s1 db 13,10,"ints",13,10,0 ints endp | comment | Int21 proc sayr Ver+off iret Int21 endp | comment | dump proc mov cx,520 xor si,si @@l: mov ax,byte ptr Begin-base[bp+si] call ohb inc si loop @@l ret dump endp | sayr_proc proc ; Ver 0.0.1 9-Dec-93 ; 뤲�璵ㅳ�� �猶�쩆 飡昔え �黍 ��М蟯 押�ゆŁ BIOS ; 귛��: DS:SI - ASCIIZ 飡昔첓. ; NO REG SAVED !!! ; � ｀졽①αえ� 誓┬쵟� �� �젩��젰� ; cld sayr_l1: lodsb or al,al jz sayr_ret mov ah,0eh int 10h jmp short sayr_l1 sayr_ret: ret sayr_proc endp Ident db 'PILO',0 ;Ident db 'Proolix by Prool. Load ',0 L_err db 'Error',0 Buff label byte ; for 512 byte space end Begin  src/boot/bp.com0100664000076500007650000004006407007540166013153 0ustar prool2prool2뚇.���0�!�.�,롖�3�3�3�.33�3����>3떿뗗��&�=87u&딼��=u�練�3��Yu�3池�aC&8u����槌�3�戴꺝껁��3뚗+��>�>��s��>�>곀똅r(>�>r"�刀G;�r�>�>t�>�>u�;�w뗾��뗟��+3�/3�3+�렳퀺W�!_袋�롌뗧�3�.���4A퉴F+蹶��&A窪屋���3�!3�*A�63�6 3�6 3�P�f.���[�(A뗭퀽둊�!�맳�2���5�!��2��2�5�!��2�3�5�!�3�3�5�!�3� 3�%뚇롖�6�!��%��2�!�%��2�!�%�3�!�%�3�!쳬3塏�@��!첫맳�2.��僥��P�J�U뗭9&%3r�z+딣=�v冗뗗洛.����)5A�MYeq}�������������������������������������������������� ��������������1%O11=I�����U����{�amm�mmm������y������������������������������������������������������ ����������������������!-��-�-9����������������D��O�����{�Z{������������ep�{������������&4P��뗥饒�.4P��뗥窯�64P��뗥���>4P�u뗥��퇕4P�i뗥�~퇞4P�]뗥�r퇦4P�Q뗥�f퇰4P�E뗥�Z퇺4P�9뗥�N툂4P�-뗥�B�~4P�!뗥�6툎4P�뗥�*툗4P� 뗥�툟4P瑤뗥�툧4P尿뗥�리4P猥뗥澐마4P往뗥彧맘4P琓뗥羽맥4P窪뗥尤맺4P壅뗥鎔메4P屋뗥榕멩4P��뗥縟몇4P��뗥腰몸4P��뗥���5P�y뗥���5P�m뗥���5P�a뗥�v�&5P�U뗥�j�.5P�I뗥�^�65P�=뗥�R퇕5P�1뗥�F퇞5P�%뗥�:퇦5P�뗥�.�^5P� 뗥�"퇰5P�뗥�퇺5P撓뗥� 뫼4P僥뗥蕓를4P王뗥煜툂5P翫뗥迂�~5P訛뗥牛�^4P癰뗥佑툎5P鈺뗥熔툗5P烏뗥傭툟5P��뗥謠툧5P��뗥��를5P�}뗥��리5P�q뗥��마5P�e뗥�z맘5P�Y뗥�o맥5P�N뗥�d�5P�C뗥�Y맺5P�8뗥�N멀5P�-뗥�C메5P�"뗥�8�>5P�뗥�-멀4P� 뗥�"멩5P�뗥�몇5P擾뗥� �v몸5P僚뗥]홛뗭껋VW9&%3r��&�^똅��^桓6P臥DD퇞6P癰DD3拖�떾�岱�^��&�옛u �,4P��DD� 툝4P��DD�,4P��DD떾�岱�^��&뒊��P獄�DD떾�岱�^��&뒊��P툆6P�P꺞떾�岱�^��&뒊��P툊6P�3꺞떾�岱�^��&뒊��뗹떿%?P툒6P�꺞떿%�邏邏뗹떾�岱�^��&뒊�� �P툗6P猥꺞떾�岱�^��&뒊��P툋6P宛꺞떾�岱�^��&뒊��뗹떿%?P툒6P筽꺞떿%�邏邏뗹떾�岱�^��&뒊�� �P툗6P�z꺞떾�岱�^��&�렸&�렵툜6P�[꺞떾�岱�^��&�롑&�례툦6P�<꺞떾�岱�^��&떁�&땱�� �$RP륵6P�꺞F껥}�W�_^뗥]홛뗭곸VW;�r9&%3r縕$3楕,뜂�P�v寥 꺞뗹 �u�P뜂�P�v了꺞3잼 F껥|玖��_^뗥]홛뗭VW9&%3r�e$3楕 �v �v �v�v�v僚 꺞 뗹 �u3잼 F껥|肪��_^]홛뗭9&%3r�($�~�u릇6�린6]홛뗭껋VW9&%3r�$�~�f"%�덯�3楕"떾F뗗�:F�u� P寮#DD� P了#DD떾�뗞�9u琉P腕#DD肉_^뗥]�9&%3r穩#링6P巍DD�9&%3r��#목6P梡DD홛뗭9&%3r��#둊� 픱�힓 � �~ s힓.둊�P�p#뗥]홝9&%3r�S#�>9P��DD�_9P�}DD3拖떾�透뗗꺙7Cu�V��9P�[꺞�*4P�QDD떾 픱=t� 툎9P�;DD愚떾�透뗗��5C툗6P�"꺞떾�透뗗��7C툜9P� 꺞떾�透뗗��9C툡9P搖꺞떾�透뗗뒊DC�P��DD떾�透뗗뒊DC�P륫9P訛꺞떾�透뗗�풠C tS떾�透뗗뒊CC�P릇9P��꺞떾�透뗗뒊4C� 픱=t �리9P�wDD�마9P�lDD� 맘9P�aDDF껥}禹�퇜6P�ODD^홛뗭껋 V9&%3r�"�^똅��^�&둋�P&둋�P&��P맥9P�꺞딽�딣�RP멨9P�꺞3楕떾F�^��&둋�P�:P巍꺞껥|遂^�&둋 �P&�w � :P完꺞�^�&둋�P&�w�]:P瑥꺞�^�&�w&�w릊:P��꺞�^�&�w&둋�P목:P��꺞�^�&�w&�w퇐;P�m꺞�^�&�w"&�w &�w&�w툗;P�P꺞 �^�&둋&�P&둋$�P머;P�5꺞�^�&�w'&�w)�" 4|�#떾�岱떈涍�&뒊��P� 4�透뗗X뎴5C떾�岱떈涍�&뒊��P� 4�透뗗X뎴7C떾�岱떈涍�&뒊��P� 4�透뗗X뎴9C떾�岱떈涍�&뒊�P� 4�透뗗X늾DC떾�岱떈涍�&뒊��=t =t=t�"� 4�透뗗��4C� � 4�透뗗��4C�� 4�透뗗��4C떾�岱휒涍�&뒊��=t=t�� 4�透뗗�놠C ��"4P� 4�透뗗X늾CC�"4떾�岱휒涍�&떁�&땱�꺬RP� 4�透뗗XZ돆=C뎴;C떾�岱떈涍�&떁�&땱�RP� 4�透뗗XZ�;C�=CRP� 4�透뗗XZ돆AC뎴?C� 4떾�岱떈涍�&�온t떾�岱떈涍�&�온u]뜂�P떾�岱휒涍�&뒊�P떾�岱떈涍�&뒊�P떾�岱떈涍�&뒊�P��P�덙꺞 픱 릴4�u穩拖��~�u�=P뛈촒�} 꺞�l翕痺�>4u瑢퇓DP�4�P猥�꺞=��u隅퇓DP�4�P�뢀꺞3楕��4AF괓|天�P뛈촒��꺞덯�=��u要�P�4AP�v澮� 꺞뗱떾=��u縟V퇧=P搖 꺞괓| 퇯=P巍 DD� 퇜6P往 DD괓~ 퇻=P椀 DD鏞괓�~ 툚=P甕 DD�v澮�DD�4�P鈺�DD 픱I3楕 뒆4A늻DDF괓�|��>$4|U�>$4}N�F�DD�$4�戴^��눧�퇓DP�4�P筽�꺞�&3楕 뒆4A늻DDF껥 |贄&� 뒆4A늻DDF괓�|綢BFU�CF��>4u=�4�P鰲�DDP�4�P�4�P�뺭DDP뛈촒린=P擾 꺞 며=P�쏎DD=t�6�4�P�4�P�d�DDP뛈촒멸=P訛 꺞퇓DP�4�P窩�꺞 픲傭耀�>4t浴뛈촒�4�P�4�P��DDP�>P�� 꺞�4AP�4�P曜�꺞=��u � =P�b DD�c�4AP�4�P�섢꺞��P�갥뛈촒蘊꺞덯�=��u뛈촒�3>P�' 꺞�'�P�4AP�v澮m꺞=t �[>P� DD��v澮*DD 픲熉鏞�>4u@�4�P�n�DDP�4�P�4�P�\�DDP뛈촒린=P饔 꺞 며=P�b�DD=t�褥�4�P�4�P�(�DDP뛈촒멸=P�� 꺞��P뛈촒尿꺞덯�=��u뛈촒�=P�e 꺞�f�P�4AP�v澮�꺞=t �@=P�C DD�E�4AP�4�P�z�꺞�v澮YDD 픱 퇿>P� DD��4AP�4�P��꺞 픱�>P燿 DD��3�_^뗥]홛뗭SQR딽�^랥����r3잼ZY[]홛뗭SQR딽�^랥����r3잼ZY[]홛뗭SQR둞둕둽둵 �^ ��r3잼ZY[]홛뗭SQR둞둕둽둵 �^ ��r3잼ZY[]홛뗭V땦 �|껥Xv푐�6�>뒆�>삏� 偸껥#w鉞�>��떾�3����^]�홛뗭� ��>洛�뾆F∫>��> 픲���>��>��>�v�n�Y]�.��.����3��2�&�@뚂뉁뱥63꺠��>3r�3뗿�2쟌��v��껋���%��뗽+�r`뗧뙽롔뚍렳QI懲2윌롙뉟뉄떸뗊C�wr@�w�< t< t< u�2잼� 픱B� 픲C녱2쟬�촇,"t"<\u�<"u촇 稚�Q�Y�.��� 3C�뗵뗭+�r�뗥�. 3�뎧꺟6� 잚�t�3핃F.�&��3Q�GY뗹 픱$�33琢懲뗹�63�)꺞뗗�3 픲藕�3윽���?꺝池&8u��홛뗭�>�> u��딣��>洛뎴DF��>3잼]홛뗭VW�~딢즴F;�u�낲�땥�낲뎩죫F덬_^]홛뗭VW�~딣)�5�딣@��|죩F;�u�6껮�뗿~뎦떾�_^]홛뗭V딣3�%��곣RP樂YY뗱껥�u3잼죩F덬딣@��6껮죩F�^]홛뗭V딣3�%��곣RP雍YY뗱껥�u3잼�6뉶�6껮딣@�떾�^]홛뗭VW�~ �t���v3잼Z떿 %��뗹�>뉶uW���Y�B�6낲떾 픱1�뗖꺜(;혇 WV��YY�$�;�rV玩�Y�떾�땤;6낲u�W��Y�_^]홛뗭딣뗓곴;혉�%33잼 �3����]홛뗭딣딽%3꺬뗁겵꺬 �u ;�s�%3� �3����]홛뗭�v���Y�]홛뗭딣셊P縕�뗥�]홛뗭딳�<딽�!r�P�U繪]�U뗭�^+�+年@�!�]�U뗭껋VW�~颱픲�\@%� 漂�u���^@!F딣��u�P��3픐�v��YY덯�=��u�F�t3잼�덯繪颱t 퇠P翫渾���>颱�t�v3픐�Q�뗱떾 �}떾傭V�WY� ��v�v澮2�뗱떾 �}떾���p먉F�W�v��YY뗱떾 �|Y3픐V婉YY덯���t!곋 颱�t딣�%� P�PV��꺞� 颱tV堯��~�t颱�t�P�P�v蘊꺞 �|颱t��3핆�곣�� 혢寺�뎴4@떾�_^뗥]홛뗭V�딳泰u �泰u�딽깎"N 졍=�!r뗱딣%�� �뗞洛뎴4@떾�P溫穴^]홛뗭퀱둊�^딳 딽�!r �~u떷��P�꾷�]홛뗭V땦 �|껥| �P�i穴뗞洛��4@��V�Y�^]홛뗭V땦�>뗞�!r 洛��4@��3잼P�4穴^]홛뗭껋VW딣@=r �^洛��4@t3잰��v�v�v��꺞덯�딣�@=r �^洛��4@�t딣繪f릩N�땦뗿뗞確<t-< tも請荀S�P뛈�P�v�>꺞[�둊��;�u�뺣 S�P槌픐Q�v��꺞�^洛걦4@[떿+취_^뗥]홛뗭�?�^딳딽�!r�P�[哈]홛뗭곸�VW딣@=s3잰��^洛��4@�t�v�v�v嵬꺞愚�^洛겎4@��딣뎳|�딣뎳x�뜺~��m�럛�떈|���|��늽{�< u� F뒉{��F뜂~�뗕+�괋�|>뜂~�뗿+�W뜂~�P�v�{꺞뎳v�;�t꺘v�s���� 딣+냮�냬�+헝O뜺~�꺘x�t���뜂~�뗿+�떿 픳.W뜂~�P�v�-꺞뎳v�;�t꺘v�s���� 딣냬�+헝딣�_^뗥]홛뗭�^洛��4@t�P3픐P�v�(뗥�@�^딳딽�!rP�^洛걦4@X�P�幅]홛뗭�^洛겎4@�塤B둊 �^딳딽�!r�P曰�숇]홛뗭껋"VW�~ �^껢$wX��rS딣 딳 �}�~t �-G槌堆꺳뛵砂�+菱�묟��F� 宜+菱��F 픲�뛐邪�俱N�, s:�Fも銓�딣 �_^뗥]� U뗭�~ u딣숇딣3�RP�v�v�P캻P�\��]홛뗭�v�v�v�v �P캻P�@��]홛뗭�v�v�v�v �~ u��3픐캻P���]홝뼊끐t鬪몗픱闖�뽻��^�U뗭VW��~2윽��池떶討H�_^]홛뗭VW��~뗸2윽��池慟�~懲딣�_^]홛뗭VW�~땦딳駱宖쩾쨱F�_^]홛뗭퀰둊딳딽�!r묐P�T楕]첬`@�튳@�맭@��!�'맳j@�@�!耀�U뗭VW땦딡;�t����f�<|-�Du 딡 뗕꺜;혋�딡 뗕꺜;혋딡덬 3잼4�|Av �>At��3웬A�A�>At�霽��RP�AP�/� 픲 �U� 픲��3웬A�>Au�곕�르A�A�� A� A�A��A�A]쳉�P�6 A�6 A�6A�6A�P�Q� A�6 A����홛뗭껋힓�燎�덯鋪��貸�덯顯��^�F�뉶塤-=w?뗗洛.�㎗+�+�+�+�+�+�+�+��鈺��v� A�;F�}�N幅g� A�덯幅]�F穴X�>Au.�>At'�&A둊�덯�딣�@P딣�@P玩RP뛈�P�P嵬�둞�둽駭��J��A둊塤 ���9��F幅�A�;F�} � A�덯��F��A�;F�}�P�6 A�6 A�6A�6A�P�<�N�딣�N 픱� �둞�둽駭�娃�둊塤�뗥]�U뗭퇮+P3픐�v뛈P�[幅]��>$At �$A�%A���!��홝�>$At旺�뗱� 腕�뗱떾P��Y떾�^홛뗭�>$At���� �$A딣�%A�]홛뗭VW�v�v�v�v �g 픲3잼/�~+~G땦��v �vV��RPW�떿邏F F;v ~綬�_^]홛뗭VW�~+~G땦��vV�^RP�v W碗떿邏F F;v ~綬�_^]���s뗚貸黛浸��戴 촉��떷3錄浣U뗭껋VW땦�vV�v�v 饔 픱 �v �v딣+FF P딣 +�FP�� 픲3잼\뎧�딣 덯徨F�;v}딣 덯�뎧徨F����~穴'�v 떿+�FP獄RP�vW熬RP딣+F@P�~�딣�F�;�u玖�_^뗥]홙tack overflow! $뚅롔튝.� �!褥�U뗭뛈P�P3픐畏繪]홛뗭�.A� � �^�긃�F딣;F~�]�U뗭곸��>At�8�>Au�.�~t�%�F �F �F�F�~t��둊 �P둊 �P둊�P둊�P둊 �@P둊 �P蜈�꺞 뜂`�P둊�P둊 �P둊�P둊 �P汪�꺞 뜂`�P둊 �P둊�P�B�뜂`�P둊�P둊�P둊�P둊 �P搖�꺞 ��둊 �@P둊 �P둊�HP둊�P둊 �P둊 �P��꺞 뜂`�P둊 �P둊 �P둊 �P둊 �P�S�꺞 뜂`�P둊 �P둊�P癰�뜂`�P둊 �P둊�P둊 �P둊 �P�k�꺞 ��>A둭둊둵 둕 둽둞�^�뗥]� U뗭껋V땦煖떾�A�뗚3菱�뉶�둊���A�透뗕*�늊�둭�둊��^뗥]�U뗭�^��^;t �����^��혡�:Ar�틀�^�]�U뗭껋 VW外뗹떿덯�딣 ;Au��3핃F� 픱 �v �v �\�덯�딣;Au��3핃F� 픱 �v�v�9�덯幅Q�~�t뛈�P뛈�P�c����t�뗱� �^&�7긃�~�t뛈�P뛈�P�=�떾듵��� �G哈 �^ &�7긃 딣�N 픲쪑瀏��(�_^뗥]� U뗭�>Au�>At�v �v �v�v�v����v �v �v�v�v��]� U뗭�A�뗁�A�뗊딣 ;햣*딣;햣#딣 ;F딣;혍딣;혍 딣;F��3잼]�U뗭딣H�A�透A딽J쫓��A�]�U뗭껋VW�A�덯�딳�[�~ 흚�;�s 떶H邏�飄�~�u澄�<붚뙽뚘;홺血瑾r忽瑾s灐顥衆 血瑾r忽瑾s逈�뗗血瑾r忽瑾s�떸�顥盛�_^뗥]� ��嶢�떷�췄���� A�+�@�췄���貸�� A�+�@��Turbo-C - Copyright (c) 1988 Borland Intl.Divide error Abnormal program termination 똅똅똅�C��none FAT-12 XENIX /XENIX uFAT-16 EXTEND LARGE HPFS/NTOS2 AIXAIX OS2 CohFAT-32 FAT32LBVFATLBAEXTENDLOPUS OS/2 Compaq WinSwapPhoton Hiden95Willow reserv NEC Theos PQMagicVENIX Linux LinuxSwOnTrackNOVEL CP/M EZ GoldenBPriam SpeedStSysV386Novell DiskSecPC/IX QNX Minix LinuxExWinNT Amoeba Phoenix386BSD NEXT BSDI CTOS DR DOS Syrinx CP/M-86DOS r/oStorageDOS secLANstepXENIX unkn %02X System ----Begin--- ----End----- Preceding sec Total sec Size,Mb head sec cyl head sec cyl (%02X) %4i %2i %4i %10lu %10lu %4i master bootBoot Processor 0.1.6 2-Nov-99 (C) 1993-1999, S.Pustovoitoff usage: bp -d [filename] [-r] [-i] [-a] [-y] -r - reverse copy (file->boot/master boot sector), DEFAULT (without '-r') - boot/master boot sector->file -i - install file to boot/master boot sector, BPB and partition table not change! -d - drive: @ - master boot record of 1st HDD Boot records: 0 - drive 0 (floppy drive A:) 1 - drive 1 (floppy drive B:) 2 - drive 2 (1st partition of 1st HDD) ... -a - set active partition (for extended partition only) -y - assume 'y' on all queries Dev Head Sec Trk/cyl Partition ------------------------------- %1i floppy drive%3i %3i (%02X) %c: FAT-12 FAT-16 no FATJump command %02X %02X %02X OEM name %-8s OEM name %02X Sector size %4i bytes Cluster size %1i sect Reserved sectors (before 1st FAT) %2i FAT counter %1i Root directory entries %4i Total sectors %7u Media descr %02X FAT size %5i sect Track size %2i sec Heads %2i Hidden sectors %7li Big Number Of Sectors %7li Physical Drive No %02X Extended Boot Signature %02X Volume Serial No %04X-%04X Volume Label (in boot) File system Id Disk size %li Mb Disk size %li Kb boot: extend boot sector read error test_devices: MBR read error Invalid switch/dev/nulDisk read error Boot image open error in file %s Boot image read error Read %i bytes or more Not enough memory in boot sector Warning! Last 1-2 bytes lost! File %s -> %s sector %i: Overwrite %s sector (y/n) ? YN File %s -> %s sector %i: ! Disk write error %s sector %i: -> file %s Boot image open/creat error in file %s Boot image write error Boot image close error �������������������������������#������������������#����#����� �> ??C$?B4?�D?�T?�d?�t?��?��?��?��?��?��?��?��?�@�@�$@   ��������������������������������@��print scanf : floating point formats not linked (null)0123456789ABCDEF       COMPAQ��t*�!�!�!�!src/command/0040775000076500007650000000000007725636522012535 5ustar prool2prool2src/command/font0100664000076500007650000000050506341510760013407 0ustar prool2prool2�嚬맬P玉꺞3핉立� �t��9<u�0��<u�7�� <u揷>�줗�PR�p꺞쥶@u�P�Y꺞�. �폟뗶3픐SV�6E�H꺞 �t�$慄;홻��+�u賻�>G�3�듳���!諭�6E�DD첩(���꽸�$矣�&懿Font loader for EGA & VGA Ver 0.0 (c) 1997 G.ShepelevIncorrect videomode!Disk error!Font installed08.fnt14.fnt16.fntsrc/command/p10100664000076500007650000000071706761506564013003 0ustar prool2prool2嚬X���. VW쑵た뻣獒뗹���u 맣P��YY�6 �t�퇠P�wY3楕GF괓0u|幅幽�퇭P�]Y3楕GF괓0u|幅�_^홓컄��컋���=��X堯�:���X倭� ��캾��컎���=��X窪V�4蛙^XP縕V�9擁^떸蜈V�>屋^떶��V퐺��^떷��V퐿��^떾�~V푆��^떿�qV푋�u^뚍�dV푐�h^떹�TV푔�X^뙽�GV푙�K^떺�:X� ax= bx= cx= dx= si= di= SS= SP= DS= ES= BP=P듒�X�홓V쒧� 픱��椅�^X홓QR듢�漏� 듏$�ZYX홓< w0�7��X���꽸��꽸툟�꽸fork errorsrc/command/p1.c0100664000076500007650000000073306663374046013221 0ustar prool2prool2#include #include #include void saycsip(void); void main (void) {int i=0xAAAA,j=0xBBBB; j=fork(); if (j==-1) puts("fork error"); else if (j) { /* parent */ while (1) { putch('P'); for (i=0;i<30000;i++) j++; /* L: goto L; */ } } else { /* child */ while (1) { putch('c'); for (i=0;i<30000;i++) j++; /* L1: goto L1; */ } } } src/command/banner.c0100664000076500007650000001755606312106762014146 0ustar prool2prool2/* banner - print a banner Author: Brian Wallis */ /***************************************************************** * * SYSVbanner.c * * This is a PD version of the SYS V banner program (at least I think * it is compatible to SYS V) which I wrote to use with the clock * program written by: ** DCF, Inc. ** 14623 North 49th Place ** Scottsdale, AZ 85254 * and published in the net comp.sources.misc newsgroup in early July * since the BSD banner program works quite differently. * * There is no copyright or responsibility accepted for the use * of this software. * * Brian Wallis, brw@jim.odr.oz, 4 July 1988 * *****************************************************************/ #include #include /* Make under MSDOS tcc -DMSDOS -mt -lt banner.c Serge Pustovoitoff, prool@infocom.kharkov.ua, 13-03-97�. 23:29:45 */ #if defined(MSDOS) || defined (Proolix) int main (int argc, char **argv); #else _PROTOTYPE(int main, (int argc, char **argv)); #endif char *glyphs[] = { " @@@ @@ @@ @ @ @@@@@ @@ @@@ ", " @@@ @@ @@ @ @ @ @ @@@ @ @ @ @@@ ", " @@@ @ @ @@@@@@@@ @ @@ @ @@ @ ", " @ @ @ @@@@@ @ @@@ @ ", " @@@@@@@ @ @ @ @ @ @ ", " @@@ @ @ @ @ @ @ @@ @ @ ", " @@@ @ @ @@@@@ @ @@ @@@@ @ ", " @@ @@ @", " @ @ @ @ @ @ ", " @ @ @ @ @ @ ", " @ @ @@@@@@@ @@@@@ @@@ @@@@@ @ ", " @ @ @ @ @ @@@ @ ", " @ @ @ @ @ @ @@@ @ ", " @@ @@ @ @@@ @ ", " @@@ @ @@@@@ @@@@@ @ @@@@@@@ @@@@@ @@@@@@@", " @ @ @@ @ @@ @@ @ @ @ @@ @ ", "@ @ @ @ @ @ @@ @ @ @ @ ", "@ @ @ @ @@@@@ @@@@@ @@@@@@@ @@@@@ @@@@@@ @ ", "@ @ @ @ @ @ @ @@ @ @ ", " @ @ @ @ @ @ @ @ @@ @ @ ", " @@@ @@@@@ @@@@@@@ @@@@@ @ @@@@@ @@@@@ @ ", " @@@@@ @@@@@ @@@ @ @ @@@@@ ", "@ @@ @ @@@ @@@ @ @ @ @", "@ @@ @ @@@ @ @@@@@ @ @", " @@@@@ @@@@@@ @@@ @ @ @@ ", "@ @ @ @@@ @ @@@@@ @ @ ", "@ @@ @ @@@ @ @ @ ", " @@@@@ @@@@@ @@@ @ @ @ @ ", " @@@@@ @ @@@@@@ @@@@@ @@@@@@ @@@@@@@@@@@@@@ @@@@@ ", "@ @ @ @ @ @@ @@ @@ @ @ @", "@ @@@ @ @ @ @ @@ @ @@ @ @ ", "@ @ @ @@ @@@@@@@ @ @ @@@@@@ @@@@@ @ @@@@", "@ @@@@ @@@@@@@@ @@ @ @@ @ @ @", "@ @@ @@ @@ @@ @@ @ @ @", " @@@@@ @ @@@@@@@ @@@@@ @@@@@@ @@@@@@@@ @@@@@ ", "@ @ @*@ @@ @ @ @ @@ @@@@@@@@", "@ @ @ @@ @ @ @@ @@@@ @@ @", "@ @ @ @@ @ @ @ @ @ @@ @ @@ @", "@@@@@@@ @ @@@@ @ @ @ @@ @ @@ @", "@ @ @ @ @@ @ @ @ @@ @ @@ @", "@ @ @ @ @@ @ @ @ @@ @@@ @", "@ @ @@@ @@@@@ @ @ @@@@@@@@ @@ @@@@@@@@", "@@@@@@ @@@@@ @@@@@@ @@@@@ @@@@@@@@ @@ @@ @", "@ @@ @@ @@ @ @ @ @@ @@ @ @", "@ @@ @@ @@ @ @ @@ @@ @ @", "@@@@@@ @ @@@@@@@ @@@@@ @ @ @@ @@ @ @", "@ @ @ @@ @ @ @ @ @ @ @ @ @ @", "@ @ @ @ @ @ @ @ @ @ @ @ @ @ @", "@ @@@@ @@ @ @@@@@ @ @@@@@ @ @@ @@ ", "@ @@ @@@@@@@@ @@@@@ @ @@@@@ @ ", " @ @ @ @ @ @ @ @ @ @ ", " @ @ @ @ @ @ @ @ @ @ ", " @ @ @ @ @ @ ", " @ @ @ @ @ @ @ ", " @ @ @ @ @ @ @ ", "@ @ @ @@@@@@@ @@@@@ @ @@@@@ @@@@@@@", " @@@ ", " @@@ @@ @@@@@ @@@@ @@@@@ @@@@@@ @@@@@@ @@@@ ", " @ @ @ @ @ @ @ @ @ @ @ @ @", " @ @ @ @@@@@ @ @ @ @@@@@ @@@@@ @ ", " @@@@@@ @ @ @ @ @ @ @ @ @@@", " @ @ @ @ @ @ @ @ @ @ @ @", " @ @ @@@@@ @@@@ @@@@@ @@@@@@ @ @@@@ ", " ", " @ @ @ @ @ @ @ @ @ @ @ @@@@ ", " @ @ @ @ @ @ @ @@ @@ @@ @ @ @", " @@@@@@ @ @ @@@@ @ @ @@ @ @ @ @ @ @", " @ @ @ @ @ @ @ @ @ @ @ @ @ @", " @ @ @ @ @ @ @ @ @ @ @ @@ @ @", " @ @ @ @@@@ @ @ @@@@@@ @ @ @ @ @@@@ ", " ", " @@@@@ @@@@ @@@@@ @@@@ @@@@@ @ @ @ @ @ @", " @ @ @ @ @ @ @ @ @ @ @ @ @ @", " @ @ @ @ @ @ @@@@ @ @ @ @ @ @ @", " @@@@@ @ @ @ @@@@@ @ @ @ @ @ @ @ @@ @", " @ @ @ @ @ @ @ @ @ @ @ @ @@ @@", " @ @@@ @ @ @ @@@@ @ @@@@ @@ @ @", " @@@ @ @@@ @@ @ @ @ @", " @ @ @ @ @@@@@@ @ @ @ @ @ @ @ @ @ ", " @ @ @ @ @ @ @ @ @@ @ @ @ @", " @@ @ @ @@ @@ @ @ @ ", " @@ @ @ @ @ @ @ @ @ @", " @ @ @ @ @ @ @ @ @ @ ", " @ @ @ @@@@@@ @@@ @ @@@ @ @ @ @" }; int main(argc, argv) int argc; char *argv[]; { int a, b, c, len, ind; char line[80]; for (argv++; --argc; argv++) { #ifdef Proolix len = (int) strlen(*argv); #else len = strlen(*argv); #endif if (len > 10) len = 10; for (a = 0; a < 7; a++) { for (b = 0; b < len; b++) { if ((ind = (*argv)[b] - ' ') < 0) ind = 0; for (c = 0; c < 7; c++) { line[b * 8 + c] = glyphs[(ind / 8 * 7) + a][(ind % 8 * 7) + c] == '@' ? ind + ' ' : ' '; } line[b * 8 + 7] = ' '; } for (b = len * 8 - 1; b >= 0; b--) { if (line[b] != ' ') break; line[b] = '\0'; } printf("%s\n", line); } printf("\n"); } return(0); } src/command/term0100664000076500007650000000120306421436416013410 0ustar prool2prool2/*---------------------------------------------------------------------------- T E R M I N A T O R ------------------------------------------------------------------------------ The terminal communication program for OS Proolix ------------------------------------------------------------------------------ Version 0.0.0 16-Oct-97 ------------------------------------------------------------------------------*/ #include int main (void) { int port; char str [80]; printf("terminator\n\n"); printf("Port no.? "); gets(str); scanf(str,"%i",&port); printf("port=%i\n",i); return 0; } src/command/mse0100664000076500007650000003337406661632452013247 0ustar prool2prool2嚬X��c�. U뗭VW�~ 땦퇜&P�v�v��"꺞 픲퇪&P�v�v��"꺞 픱떿셊P퇡&PV��"꺞 �9�^&�:u긃떿셊P�v�vV�_"꺞 V�Q"꺞� �<\u�/F�<u�_^]홛뗭껋� 둊��P穩!DD�^�F&�뉶�<$u�뗥]홓SQRVWU.��V4�� ]_^ZY[X�PSQRVWU.�3�뗙�R4좵4琓#t�>V4u�6R4�6P4嵬!꺞3픐�CP獒꺞]_^ZY[X�PSQRVWU.��_&P�(!꺞����]_^ZY[X�PSQRVWU.�퇱&P�!꺞��n�]_^ZY[X�PSQRVWU.�툁&P曰 꺞]_^ZY[X�PSQRVWU.�뗭껋4덯��^�덻�뎈�똅�뎧�딣덯�딣덯�딣峨貸%�덯�뗗��_9u辱 �>X4t#뗗��^:t� P�p DD�v打� DD�P�_ DD딣�=bv�U 뗗洛.��'� �s s s [[js {s s �s s s s s s s s s s ��s s s s s s s s s s �s s s *`gs s ���s s 4s w� s s ��lC�s � s � s s �  C ^ s � s � L s s s s s s s s � s s s s s s s s s e �P덯�P�aDD딣�뉶瑢 둊愿P�MDD俑 �~��u7�3 픱딣�%��덯�딣�덯�덯�딣�뉶�� 딣� @덯�딣�덯�x 둊愿P�DD�j 外덯�딣�뉶�[ 딽�딣�RP�!�꺞�J 琬 픱�F����F�딣�뉶�. 힓�' �F� 딽�딣���BｚB� 둊芽뗗��`8t/�>X4t둊芽P툋&P��꺞딽�딣�RP둊芽P��꺞友�>X4u蓉둊芽P툛&P�_꺞辱浴딽�딣�RP린&P�F꺞��뛈�P嶢꺞딣�덯�딣�덯 둊灌덯�딣�뉶 둊求덯�딣�뉶 �e힓�^뛈�P瑥꺞둊甄덯�딣�뉶 둊姑덯�딣�뉶 둊求덯�딣�뉶 둊灌덯�딣�뉶 �∪B덯�딣�덯∧B덯�딣�덯芸쟖4�� 透�岱�T4�혟F�딣�덯�F尤�V4말&P�m꺞�枉�둊芽 픱=t=t謠둊隕�B좤B뉶 ����힓 ���>X4t둊芽P툋&P�!꺞둊芽P�!DD뎈�덯�떷덯�딣�덯딣�덯�딣�덯�N둊芽 픱=t�힓 -�7둊芽P맛&P琬꺞�#� �>X4t딽�딣�RP멂&P溫꺞퇮P딽�딣�RP뫘7P�>�꺞뫘7P�#꺞=��tX�s맱dP딽�딣�RP뫘7P��꺞�>X4t!� P�dDD뫘7P멜&P�P꺞�P�LDD�P뫘7P�P꺞덯�=��u�F딣� 덯�딣�덯�q딣�덯딣�%��덯�딣�덯�Y�>X4t둊芽P며&P僥꺞퇮P딽�딣�RP뫘7P�y�꺞둊芽=t=t ��F�� �F���F��>X4t!� P筽DD뫘7P멜&P��꺞�P��DD�v�뫘7P��꺞덯�=��u�>�딣�덯�R�딣�=w뗗洛.��#####몽&P�?꺞�v鍊`DD 픲��芸����>X4t�v��v�� 'P�꺞딽�딣�뎈�덯�딣�=w_뗗洛.�쭂�==�=�F��&翁뉶�둊謳^�&�3��뚏뛈��F�~� t �F�딣�;F�r�딣�덯�쌏�z��'P��꺞딣�3�RP�v��v��v鍊�꺞 덯�=��u�N�딣�덯�b��>X4t�v��v��3'P�]꺞딽�딣�뎈�덯�딣�=wJ뗗洛.��- =: : c c ���F���^�&��P� DD�F�딣�;F�r�딣�덯暈�퇕'P��꺞딣�3�RP�v��v��v鍊 꺞 덯�=��u饒�딣�덯熔�딣�=w뗗洛.�㎥ =====�뉭둊芽P딽�딣�RP�v鍊�꺞뎈�덯�껡�u=��u�]�딣�덯�딣�덯딣�덯�딣�덯 �_��>X4t�v�둊芽P퇯'P�W꺞둊芽=v��뗗洛.��, L � � � � � � � � � � � � � � � 딣�=w+뗗洛.��] g g g o w �F ��雨徨F ��芋徨F 핣玗徨F 右桓 P外DD둊芽P��'P玩꺞�� P婉DD둊芽P툘'P瘟꺞�P玉DD�묥�@P뫘7P�%꺞 �t�^�뫘7P燎꺞�F���^��웠7/u�뉬7\�F��~�@r�딣�덯�H�딣�3耐瘟RP婉꺞뎈�덯�떷덯�딣� 혋��딣�덯���>X4u�x�v�를'P�꺞�g딣�3耐�dRP딽�3픒P�y꺞 �t玗渾샛寓��>X4t딽�딣�RP릴'P琬꺞퇮P딽�딣�RP뫘7P�^�꺞맡'P뫘7P�꺞뗹 �t�뫘7P搖꺞덯� 픱�N��~�t�^��웠7/u�뉬7�>�7u)�>X4t 맨'P�\꺞3恬RP맵'P뫘7P��꺞 뫘7P阮꺞뎈�덯� �u芸行�B덯議�B덯�딽�딣�뎈�덯��v��v峰�꺞뎈�덯� �u�v��v峰�꺞湧饗^�&�?t�&�?�u胤뫘7P�v��v殲e 꺞뫘7P�<꺞3恬 RP뫘7P딽�딣�RP�꺞 �^�&둋 �^�&뉷�껡�F��V4�樂��~�t_�~�t偶맸'P�l꺞딣� 픱 =t=t�*멓'P�N꺞繇멤'P�@꺞��멱'P�2꺞��몇'P�$꺞�z릡>X4t 목'P�꺞�F�`좷4덯�딣�덯�R� P擾DD�v���'P嵬꺞�v打KDD�P頑DD�(� P玩DD�v��(P癰꺞�v打!DD�P鈺DD�>Z4t�q뗥]_^ZY[X�U뗭�0(P��뗥둊�=�v�b뗗洛.��� � %2?LYfs����������)w6CP]wwjw���������� -:GTan{���������� $1>KXer���������(5BO\iv�����W�����'3?WWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWKKKKKKKK�2(P�d뗥�V퇓(P�W뗥�I�](P�J뗥�<퇷(P�=뗥�/툕(P�0뗥�"툦(P�#뗥�릍(P�뗥�맙(P� 뗥熉멸(P燿뗥彧�)P寥뗥紆�)P外뗥宇�3)P豌뗥茸퇟)P宛뗥墉�)P邕뗥邀툓)P溫뗥��툟)P烏뗥��릉)P��뗥��맙)P��뗥�y멘)P�z뗥�l�*P�m뗥�_�*P�`뗥�R�0*P�S뗥�E퇛*P�F뗥�8퇭*P�9뗥�+른*P�,뗥�맙*P�뗥�멉*P�뗥�뫄*P�뗥暈�(+P曜뗥隅툅*P堯뗥盂퇮+P倭뗥優툆+P翫뗥瑢툚+P蝸뗥傭릇+P瓮뗥要맷+P沃뗥��멘+P��뗥��뫈+P��뗥���,P��뗥�u�4,P�v뗥�h퇛,P�i뗥�[퇤,P�\뗥�N�],P�O뗥�A퇰,P�B뗥�4퇻,P�5뗥�'툏,P�(뗥�륫,P�뗥� 만,P�뗥�먹,P�뗥稶�-P搖뗥迂�8-P了뗥旴퇲-P旺뗥龍�}-P琓뗥涌툚-P窩뗥縟많-P蘊뗥耀멕-P誤뗥��뫈-P��뗥���.P��뗥�~�;.P�뗥�q퇤.P�r뗥�d퇶.P�e뗥�W툋.P�X뗥�J륵.P�K뗥�=맥.P�>뗥�0먕.P�1뗥�#목.P�$뗥��/P�뗥� �"/P� 뗥耘�8/P瑤뗥旭퇤/P寮뗥羽퇵/P嵬뗥寓툈/P阮뗥蓉툧/P梡뗥容맒/P雍뗥饒목/P瑥뗥窈�0P熬뗥���50P��뗥��퇞0P��뗥�z퇰0P�{뗥�m툕0P�n뗥�`림0P�a뗥�S멓0P�T뗥�F� 1P�G뗥�9�1P�:뗥�,�81P�-뗥�퇓1P� 뗥�퇷1P�뗥�륵1P�뗥橒맵1P樂뗥雨며1P夭뗥祐뫼1P娃뗥又�2P脘뗥用퇜2P訛뗥冗퇮2P甕뗥謠�2P獄뗥��릴2P��뗥��메2P��뗥��� 3P��뗥�v�=3P�w뗥�j퇯3P�k뗥�^툍3P�_뗥�R툦3P�S뗥�F릴3P�G뗥�:멧3P�;뗥�.뫘3P�/뗥�"� 4P�#뗥��%4P�뗥� 퇖4P� 뗥]홛뗭쏱SQRVW�^떺�똚딣�덲딣덲딣덲딣덲 � 딣�덲뎩�_딣�덲딣�덲덼뎉_^ZY[X�3�]�뗭�^��뗠딦롊��w�w�w�w �w �w�w�w�w�w�w�wZY[X^_]�U뗭껋 VW�~딣 Ft �u3잰��~闊^&딦 �貸�t\3恬 RP� P�vS�e 꺞 뎈�덯� 혋�F� �딣�3�+F꺴덯��~� v� �딣�3�RP�v�vW�2 꺞 �^���V3楕�^&�뉶�< t 둊��GF껥|穎^&� t"�.G���^&�뉶�< t 둊��GF껥 |羚�v澮� 꺞딣�_^뗥]홛뗭VW�~ �v�q 꺞3楕뚐렻�^�王RP�\4P�R 꺞F;�|�_^]츨3恬RPRR뫄>P�| 꺞 扈�3恬RP뫄>PRR�e 꺞 扈퇫4P� 꺞�U뗭껋XVW邕�멘덯�뚇딣�RP� P�� 꺞맒덯�뚇딣�RP�'P僚 꺞툨덯�뚇딣�RP�!P翫 꺞�|덯�뚇딣�RP�)P翁 꺞�F��:뛈쭾�v��A 꺞 픲%�P퇷4P�� 꺞뗱떾;F�t 껥uV�� DD� �F��~�|의F���^���_9��`8��^:�F��~��~渥_:�`:�d:�e:�f:�g:�i:��:�a>3恬RP퇺4P퇭>P�A 꺞 3恬RP퇿4P퇲>P�* 꺞 3恬RP툁4P퇵>P� 꺞 3恬RP툃4P퇷>P燿 꺞 3恬RP툅4P퇺>P猥 꺞 �p>�q>�r>뚇팕뚆떸�u>즧>�w>/3恬,RP凹 꺞�_>�]>�{4WRP縕 꺞W瘟 꺞�]>��C��B&���B��B&���B��B&���B_^뗥]췄汚�6_>�6]>�� 꺞�툖4P�� 꺞�퇻5P拗 꺞�U뗭� P堯 뗥�^&�w툌5P莞 뗥�^&�w툦5P蛙 뗥�^&�w릴5P縕 뗥�^&�w맡5P烏 뗥�^&�w 메5P�� 뗥�^&�w 몌5P� 뗥�^&�w&�w�6P�j 뗥�^&�w�6P�Y 뗥�^&�w&�w� 6P�D 뗥�^&�w�16P�3 뗥�^&�w퇝6P�" 뗥3�]홛뗭껋vVW�P�v�! 꺞뗱떾=��u寓V�, DD뎈쾳F� � |=s딣곕�덯츢RP�];PV凹꺞 RP딣츢[Y;�t�a;�t�Z�v��^6P鼇꺞�P�];P퇳6P��꺞3恬RP퇻6P�];P窩꺞 픱��힓�3恬RP�];P뛈랶筽꺞 뚐렻�^럩F��^��v��v�퇾6P�>꺞�v��v펨C�꺞 픱 V�QDD���^�&딦� 岱&딾�待+�&+G3�뎈�덯�RP툗6P搖꺞�F����F����힓��F��F얹��v��v얕L꺞�R4즂4 �u�v��v�를6P縕꺞�腰�R4좵43���� 뎈훸F��~�u�>R4꺡�P4똅��^�&�� X덯じ�덯쵉F첌뗊3픒P딣쵗[Y � �QS�^�XZ&뎉 &덲 X덯じ,덯쵉F첌뗊3픒P딣쵗[Y � �QS�^�XZ&뎉&덲X덯じT덯쵉F첌뗊3픒P딣쵗[Y � �QS�^�XZ&뎉&덲3�렻�&��岱덯旼^�&덲&힔�&�G腫퇻뚇&뎉&�GP�_>&덲,&�G:��&�G8���R4떹&뎉0&덲.�&뎉6&덲4&�G2&힔P�&힔Q!&힔R改F���^�^�&힔��F챶~�|邇P4겷���B��B�~u#�F��F�먈6P�R4좵4�RP��꺞�<�v�꺞솄V텎F� �|=v �F��F��v�R4좵4�RP�G꺞둊큁�R4좵43���枉뗗렺X&��R4좵4딳텑^�臥3�퍊癰뗗렺&� �~�t*딣츢RP�];P�v��v쮜�꺞 딣츢뗗뗃뚏뛈���,3픐�^�&딦�岱3�RPV��꺞껡�u=��u V�DD�P�~�t딽쾵F캲P딣츢[Y+��덻��^繪 딽�딣�뎈�덯�3恬RP�v��v�腕뎈틝F맨F��F��33恬RP�v��v헩�꺞 �u-=u(3��뚏뛈��X긃�긘�딽텑F�;V�|혋;F퇾�3恬RP�v��v��t덯츢RP�v��v헩癰꺞 �~�t��3픐�^�&딦3�RPV鈺꺞껡�u=��u���F��P3恬RP뛈�PV�t꺞 �t稶�=t雨�딣�덯�딣�덯�떿F�덯�뗗렻�^�&���^�렻�^�&��Fつ^�&딦;F챮짿�0DD 픱�6R4�6P4�꺞�釪�F��v�6C�6�B�2꺞�~�t 머6P完꺞�^�&�w&딦�P멋6P溫꺞�^�&딦&딾�뎈뙃F듖F���^��F�&��P목6P�}꺞�F챶~�|�퇹5P�i꺞�F�r�~�t뫼�+F펹F碧R4덯�덯銖F��#�^�&딦덯�&딦�덯�&딦�덯�&딦덯沈R4덯運R4덯�3픐뛈�P�`�꺞3�_^뗥]홛뗭껋VW畏�몹6P凹꺞�"7P娃꺞�CP琓�DD퇹5P椀꺞�97P瓦꺞툊>P��꺞�>�>t�3��힏�G�� |嗤 P툊>P倭꺞뗱떾 픲3恬 RP툊>P뛈�P王꺞 �(떾-�>덯�= ~�F� 딣�셊P툊>P뛈�P��꺞 �<7P뛈�P��꺞 픲-쟖4�P쟕4�P몹6P�@7P�꺞 �6Z4퇡7P� 꺞�Z퇿7P뛈�P�J꺞 픲猥巴"�툄7P뛈�P�0꺞 픲���}7P뛈�P�꺞 픲W �u/�P�]=P�>꺞 �u��7P��꺞友��]=P��꺞用�떾@P�꺞 픲縟�떾@P툓7P�m꺞�좤툣7P뛈�P溫꺞 픲H떾@P�E꺞줥4�.PV��꺞뗱 �t떾@P�%꺞줦4쟖4�P쟕4�P륫7P�꺞�D�릿7P뛈�P�R꺞 픲&�|0u�Z4��Z4�6Z4퇡7P頑꺞� �맒7P뛈�P�꺞 픲&�|0u�X4��X4�6X4퇫7P��꺞優�매7P��꺞V뛈�P�h�꺞=w;뗗洛.���"� �" ##맸7P�c꺞�뾁멂7P�U꺞�덢멤7P�G꺞�z�명7P�9꺞�l翕�_^뗥]첩�꽸��꽸��꽸��꽸��꽸��꽸� �꽸��꽸��꽸� �꽸�!�꽸�$�꽸�&�꽸�'�꽸�(�꽸�)�꽸�*�꽸�2�꽸�3�꽸�4�꽸�:�꽸�;�꽸�<�꽸�@�꽸퇐�꽸퇓�꽸퇜�꽸퇞�꽸�\�꽸�^�꽸�_�꽸툄�꽸툅�꽸툆�꽸�{�꽸��꽸툌�꽸툒�꽸툓�꽸3�� �����UVW뗭뗺딣 딽 �^딳 �u �ti �te颱u �y 腿堆꺴꺩 �y 槌褪꺳껞뗩� W3�3親蟬綠潞�;�r w;�r+��@洵[胎t떾뗖卵胎t腿堆꺴_^]�罷颱t떷3陋���s뗗岱待浸��宅 沓��뗊3임隨렺�&딾S&� �} 討慟꺫�B��s겶듻�壘2��딅宅�듓%[&�&뎉�렺�&딾S&� �} 討慟꺫肉+�s곴듻�壘2�+�딅宅�듓%[&�&뎉� �} 洞慟꺝꺫�-�홹겶딃�屢�딂貸�듓%� �} 洞慟꺝꺫戎+홹곴딓�淚2�+�딂貸�듓%�Q딂�貸�듓듽宅Y�듵%껁;�u;촉�&뗊r黛&W%&�&놵喀�&W겶%&�&놵畺&�+�떷r黛&W%&�&놵喀�&W곴%&�&놵�lpt1/dev/lptlpt2BREAK Fatal error Int29 called int %02X vec Disallow change int %02X vecParse=%Fs TSR DOS Fn 37, subfn=%02X chdir %Fs`%s' open. mode=%04X close handle 0-4 read h=%i len=%i read from stdaux !!! write h=%i len=%i write to stdprn or stdaux !!! IOCTL Fn=%02X handle=%04X IOCTL Fn=%02X IOCTL invalid Fn=%02X free %04X find first `%Fs'*.*L1. Set strategy - 1st best last ? Get strategy Not realized MSDOS Fn %02X Disallow fn %02X Program terminateKeyboard input with echoDisplay outputWait for auxiliary device inputAuxiliary outputPrinter outputDirect console I/OWait for direct console input without echoWait for console input without echoPrint stringBuffered keyboard inputCheck standard input statusClear keyboard buffer, invoke keyboard functionDisk resetSelect diskOpen file using FCBClose file using FCBSearch for first entry using FCBSearch for next entry using FCBDelete file using FCBSequential read using FCBSequential write using FCBCreate a file using FCBRename file using FCBDOS dummy function (CP/M) (not used/listed)Get current default driveSet disk transfer addressGet allocation table informationGet allocation table info for specific deviceGet pointer to default drive parameter table (undocumented)Random read using FCBRandom write using FCBGet file size using FCBSet relative record field for FCBSet interrupt vectorCreate new program segmentRandom block read using FCBRandom block write using FCBParse filename for FCBGet dateSet dateGet timeSet timeSet/reset verify switchGet disk transfer addressGet DOS version numberTerminate and stay residentGet pointer to drive parameter table (undocumented)Get/set Ctrl-Break check state & get boot driveGet address to DOS critical flag (undocumented)Get interrupt vectorGet disk free spaceGet/set switch character (undocumented)Get/set country dependent informationCreate subdirectory (mkdir)Remove subdirectory (rmdir)Change current subdirectory (chdir)Create file using handleOpen file using handleClose file using handleRead file or device using handleWrite file or device using handleDelete fileMove file pointer using handleChange file modeI/O control for devices (IOCTL)Duplicate file handleForce duplicate file handleGet current directoryAllocate memory blocksFree allocated memory blocksModify allocated memory blocksEXEC load and execute program (func 1 undocumented)Terminate process with return codeGet return code of a sub-processFind first matching fileFind next matching fileSet current process id (undocumented)Get current process id (undocumented)Get pointer to DOS 'INVARS' (undocumented)Generate drive parameter table (undocumented)Get verify settingCreate PSP (undocumented)Rename fileGet/set file date and time using handleGet/set memory allocation strategy (3.x+, undocumented)Get extended error information (3.x+)Create temporary file (3.x+)Create new file (3.x+)Lock/unlock file access (3.x+)Critical error information (undocumented 3.x+)Network services (3.1+)Network redirection (3.1+)Get fully qualified file name (undocumented 3.x+)Get address of program segment prefix (3.x+)Get system lead byte table (MSDOS 2.25 only)Set device driver look ahead (undocumented 3.3+)Get extended country information (3.3+)Get/set global code page (3.3+)Set handle count (3.3+)Flush buffer (3.3+)Get/set disk serial number (undocumented DOS 4.0+)DOS reserved (DOS 4.0+)DOS reservedExtended open/create (4.x+)OEM INT 21 handler (undocumented)unknown%02X===CASE===/karb,.-:COMSPEC=C:DSH.COM MSDOS emulator internal command: help - this help ver - version setver - set DOS version cd - print workdir cd - change dir setpause [0|1] - set MSDOS debuggin' pause verbose [0|1] - set MSDOS debuggin' verbose mode Called CP/M entry! Bytes on last page %04X Pages in file %04X Relocations %04X Paragraphe in header %04X MinMem %04X par MaxMem %04X par SS:SP %04X:%04X CheckSum %04X CS:IP %04X:%04X Relocation table addr %04X Overlay No. %1X restos=%i Sec1=MZ.EXE file. File length=%li Image length=%li bytes execdos: no memory. (Required %04X bytes) EXEC! Start point %04X:%04X %02X Proolix MSDOS emulator v. 0.0.23 14-Feb-99 Use `help` for help C>ver%s setver=%i.%i msdos_pause=%i msdos_verbose=%i helpexitcdpwd errorCan't chdir %s setverNew version %i.%i setpauseverbose mse: not found no memory I/O error invalid error src/command/pg.c0100664000076500007650000000154405742305660013301 0ustar prool2prool2#include #include #include #include #include #include #define MAX_S 256 void main(argc, argv) int argc; char *argv[]; {FILE *fp; char s[MAX_S]; long pos, oldpos; int i; if (argc==1) {printf("usage: pg filename\n"); exit(0); } #pragma warn -sus fp=fopen(argv[1],"r"); #pragma warn +sus L0: pos=ftell(fp); for(i=0;i<24;i++) { if (fgets(s,MAX_S,fp)==NULL) break; printf("%s",s); } oldpos=pos; pos=ftell(fp); L1: prin