WebSVN – Kolibri OS – Diff – /kernel/trunk/kernel32.inc


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;                                                            ;;
;; KERNEL32.INC                                               ;;
;;                                                            ;;
;; Included 32 bit kernel files for MenuetOS                  ;;
;;                                                            ;;
;; This file is kept separate as it will be easier to         ;;
;; maintain and compile with an automated SETUP program       ;;
;; in the future.                                             ;;
;;                                                            ;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
; structure definition helper
macro struct name, [arg]
 {
  common
   name@struct equ name
   struc name arg {
 }
 
macro struct_helper name
 {
  match xname,name
  \{
   virtual at 0
   xname xname
   sizeof.#xname = $ - xname
   name equ sizeof.#xname
   end virtual
  \}
 }
 
ends fix } struct_helper name@struct
 
;// mike.dld, 2006-29-01 [
 
; macros definition
macro diff16 title,l1,l2
{
  local s,d
  s = l2-l1
  display title,': 0x'
  repeat 8
    d = 48 + s shr ((8-%) shl 2) and $0F
    if d > 57
      d = d + 65-57-1
    end if
    display d
  end repeat
  display 13,10
}
 
; \begin{diamond}[29.09.2006]
; may be useful for kernel debugging
; example 1:
;       dbgstr 'Hello, World!'
; example 2:
;       dbgstr 'Hello, World!', save_flags
macro dbgstr string*, f
{
local a
iglobal_nested
a db 'K : ',string,13,10,0
endg_nested
if ~ f eq
        pushfd
end if
        push    esi
        mov     esi, a
        call    sys_msg_board_str
        pop     esi
if ~ f eq
        popfd
end if
}
; \end{diamond}[29.09.2006]
 
struc db [a] { common . db a
  if ~used .
    display 'not used db: ',`.,13,10
  end if }
struc dw [a] { common . dw a
  if ~used .
    display 'not used dw: ',`.,13,10
  end if }
struc dd [a] { common . dd a
  if ~used .
    display 'not used dd: ',`.,13,10
  end if }
struc dp [a] { common . dp a
  if ~used .
    display 'not used dp: ',`.,13,10
  end if }
struc dq [a] { common . dq a
  if ~used .
    display 'not used dq: ',`.,13,10
  end if }
struc dt [a] { common . dt a
  if ~used .
    display 'not used dt: ',`.,13,10
  end if }
 
struc RECT {
  .left   dd ?
  .top    dd ?
  .right  dd ?
  .bottom dd ?
}
virtual at 0
 RECT RECT
end virtual
 
struc BOX {
  .left   dd ?
  .top    dd ?
  .width  dd ?
  .height dd ?
}
virtual at 0
 BOX BOX
end virtual
 
; constants definition
WSTATE_NORMAL    = 00000000b
WSTATE_MAXIMIZED = 00000001b
WSTATE_MINIMIZED = 00000010b
WSTATE_ROLLEDUP  = 00000100b
 
WSTATE_REDRAW	 = 00000001b
WSTATE_WNDDRAWN  = 00000010b
 
WSTYLE_HASCAPTION     = 00010000b
WSTYLE_CLIENTRELATIVE = 00100000b
 
struc TASKDATA
{
  .event_mask  dd ?
  .pid	       dd ?
	       dw ?
  .state       db ?
               db ?
	       dw ?
  .wnd_number  db ?
	       db ?
  .mem_start   dd ?
  .counter_sum dd ?
  .counter_add dd ?
  .cpu_usage   dd ?
}
virtual at 0
 TASKDATA TASKDATA
end virtual
 
; structures definition
struc WDATA {
  .box		   BOX
  .cl_workarea	   dd ?
  .cl_titlebar	   dd ?
  .cl_frames	   dd ?
  .reserved	   db ?
  .fl_wstate	   db ?
  .fl_wdrawn	   db ?
  .fl_redraw	   db ?
}
virtual at 0
 WDATA WDATA
end virtual
label WDATA.fl_wstyle byte at 0x13
 
struc APPDATA
{
  .app_name	   db 11  dup(?)
		   db 5   dup(?)
 
  .fpu_state       dd ?            ;+16
  .ev_count        dd ?            ;+20
  .fpu_handler     dd ?            ;+24
  .sse_handler     dd ?            ;+28
  .event           dd ?            ;+32
  .heap_base       dd ?            ;+36
  .heap_top        dd ?            ;+40
  .cursor          dd ?            ;+44
  .ev_first        dd ?            ;+48
  .ev_last         dd ?            ;+52
 
                   db 72 dup(?)    ;+56
 
  .wnd_shape       dd ?            ;+128
  .wnd_shape_scale dd ?            ;+132
                   dd ?            ;+136
  .mem_size        dd ?            ;+140
  .saved_box	   BOX
  .ipc_start	   dd ?
  .ipc_size	   dd ?
  .event_mask	   dd ?
  .debugger_slot   dd ?
		   dd ?
  .keyboard_mode   db ?
		   db 3   dup(?)
  .dir_table	   dd ?
  .dbg_event_mem   dd ?
  .dbg_regs:
  .dbg_regs.dr0    dd ?
  .dbg_regs.dr1    dd ?
  .dbg_regs.dr2    dd ?
  .dbg_regs.dr3    dd ?
  .dbg_regs.dr7    dd ?
  .wnd_caption	   dd ?
  .wnd_clientbox   BOX
}
virtual at 0
 APPDATA APPDATA
end virtual
 
;// mike.dld, 2006-29-01 ]
 
 
; Core functions
include "core/sync.inc"     ; macros for synhronization objects
include "core/sys32.inc"    ; process management
include "core/sched.inc"    ; process scheduling
include "core/syscall.inc"  ; system call
include "core/fpu.inc"      ; all fpu/sse support
include "core/memory.inc"
include "core/heap.inc"     ; kernel and app heap
include "core/taskman.inc"
include "core/dll.inc"
include "core/exports.inc"
 
; GUI stuff
include "gui/window.inc"
include "gui/event.inc"
include "gui/font.inc"
include "gui/button.inc"
 
; shutdown
 
include "boot/shutdown.inc" ; shutdown or restart
 
; file system
 
include "fs/fs.inc"       ; syscall
include "fs/fat32.inc"    ; read / write for fat32 filesystem
include "fs/ntfs.inc"     ; read / write for ntfs filesystem
include "fs/fat12.inc"    ; read / write for fat12 filesystem
include "blkdev/rd.inc"   ; ramdisk read /write
include "fs/fs_lfn.inc"    ; syscall, version 2
include "fs/iso9660.inc"  ; read for iso9660 filesystem CD
 
; sound
 
include "sound/sb16.inc"     ; playback for Sound Blaster 16
include "sound/playnote.inc" ; player Note for Speaker PC
 
; display
 
include "video/vesa12.inc"   ; Vesa 1.2 functions
include "video/vesa20.inc"   ; Vesa 2.0 functions
include "video/vga.inc"      ; VGA 16 color functions
include "video/cursors.inc"  ; cursors functions
 
; Network Interface & TCPIP Stack
 
include "network/stack.inc"
 
; Mouse pointer
 
include "gui/mouse.inc"
 
; Window skinning
 
include "gui/skincode.inc"
 
; Pci functions
 
include "bus/pci/pci32.inc"
 
; Floppy drive controller
 
include "blkdev/fdc.inc"
include "blkdev/flp_drv.inc"
 
; HD drive controller
include "blkdev/hd_drv.inc"
 
; CD drive controller
 
include "blkdev/cdrom.inc"
include "blkdev/cd_drv.inc"
 
; Character devices
 
include "hid/keyboard.inc"
include "hid/mousedrv.inc"
 
; setting date,time,clock and alarm-clock
 
include "hid/set_dtc.inc"
 
;% -include

Rev 227	Rev 256
1	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;	1	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2	;; ;;	2	;; ;;
3	;; KERNEL32.INC ;;	3	;; KERNEL32.INC ;;
4	;; ;;	4	;; ;;
5	;; Included 32 bit kernel files for MenuetOS ;;	5	;; Included 32 bit kernel files for MenuetOS ;;
6	;; ;;	6	;; ;;
7	;; This file is kept separate as it will be easier to ;;	7	;; This file is kept separate as it will be easier to ;;
8	;; maintain and compile with an automated SETUP program ;;	8	;; maintain and compile with an automated SETUP program ;;
9	;; in the future. ;;	9	;; in the future. ;;
10	;; ;;	10	;; ;;
11	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;	11	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
12		12
13	; structure definition helper	13	; structure definition helper
14	macro struct name, [arg]	14	macro struct name, [arg]
15	{	15	{
16	common	16	common
17	name@struct equ name	17	name@struct equ name
18	struc name arg {	18	struc name arg {
19	}	19	}
20		20
21	macro struct_helper name	21	macro struct_helper name
22	{	22	{
23	match xname,name	23	match xname,name
24	\{	24	\{
25	virtual at 0	25	virtual at 0
26	xname xname	26	xname xname
27	sizeof.#xname = $ - xname	27	sizeof.#xname = $ - xname
28	name equ sizeof.#xname	28	name equ sizeof.#xname
29	end virtual	29	end virtual
30	\}	30	\}
31	}	31	}
32		32
33	ends fix } struct_helper name@struct	33	ends fix } struct_helper name@struct
34		34
35	;// mike.dld, 2006-29-01 [	35	;// mike.dld, 2006-29-01 [
36		36
37	; macros definition	37	; macros definition
38	macro diff16 title,l1,l2	38	macro diff16 title,l1,l2
39	{	39	{
40	local s,d	40	local s,d
41	s = l2-l1	41	s = l2-l1
42	display title,': 0x'	42	display title,': 0x'
43	repeat 8	43	repeat 8
44	d = 48 + s shr ((8-%) shl 2) and $0F	44	d = 48 + s shr ((8-%) shl 2) and $0F
45	if d > 57	45	if d > 57
46	d = d + 65-57-1	46	d = d + 65-57-1
47	end if	47	end if
48	display d	48	display d
49	end repeat	49	end repeat
50	display 13,10	50	display 13,10
51	}	51	}
52		52
53	; \begin{diamond}[29.09.2006]	53	; \begin{diamond}[29.09.2006]
54	; may be useful for kernel debugging	54	; may be useful for kernel debugging
55	; example 1:	55	; example 1:
56	; dbgstr 'Hello, World!'	56	; dbgstr 'Hello, World!'
57	; example 2:	57	; example 2:
58	; dbgstr 'Hello, World!', save_flags	58	; dbgstr 'Hello, World!', save_flags
59	macro dbgstr string*, f	59	macro dbgstr string*, f
60	{	60	{
61	local a	61	local a
62	iglobal_nested	62	iglobal_nested
63	a db 'K : ',string,13,10,0	63	a db 'K : ',string,13,10,0
64	endg_nested	64	endg_nested
65	if ~ f eq	65	if ~ f eq
66	pushfd	66	pushfd
67	end if	67	end if
68	push esi	68	push esi
69	mov esi, a	69	mov esi, a
70	call sys_msg_board_str	70	call sys_msg_board_str
71	pop esi	71	pop esi
72	if ~ f eq	72	if ~ f eq
73	popfd	73	popfd
74	end if	74	end if
75	}	75	}
76	; \end{diamond}[29.09.2006]	76	; \end{diamond}[29.09.2006]
77		77
78	struc db [a] { common . db a	78	struc db [a] { common . db a
79	if ~used .	79	if ~used .
80	display 'not used db: ',`.,13,10	80	display 'not used db: ',`.,13,10
81	end if }	81	end if }
82	struc dw [a] { common . dw a	82	struc dw [a] { common . dw a
83	if ~used .	83	if ~used .
84	display 'not used dw: ',`.,13,10	84	display 'not used dw: ',`.,13,10
85	end if }	85	end if }
86	struc dd [a] { common . dd a	86	struc dd [a] { common . dd a
87	if ~used .	87	if ~used .
88	display 'not used dd: ',`.,13,10	88	display 'not used dd: ',`.,13,10
89	end if }	89	end if }
90	struc dp [a] { common . dp a	90	struc dp [a] { common . dp a
91	if ~used .	91	if ~used .
92	display 'not used dp: ',`.,13,10	92	display 'not used dp: ',`.,13,10
93	end if }	93	end if }
94	struc dq [a] { common . dq a	94	struc dq [a] { common . dq a
95	if ~used .	95	if ~used .
96	display 'not used dq: ',`.,13,10	96	display 'not used dq: ',`.,13,10
97	end if }	97	end if }
98	struc dt [a] { common . dt a	98	struc dt [a] { common . dt a
99	if ~used .	99	if ~used .
100	display 'not used dt: ',`.,13,10	100	display 'not used dt: ',`.,13,10
101	end if }	101	end if }
102		102
103	struc RECT {	103	struc RECT {
104	.left dd ?	104	.left dd ?
105	.top dd ?	105	.top dd ?
106	.right dd ?	106	.right dd ?
107	.bottom dd ?	107	.bottom dd ?
108	}	108	}
109	virtual at 0	109	virtual at 0
110	RECT RECT	110	RECT RECT
111	end virtual	111	end virtual
112		112
113	struc BOX {	113	struc BOX {
114	.left dd ?	114	.left dd ?
115	.top dd ?	115	.top dd ?
116	.width dd ?	116	.width dd ?
117	.height dd ?	117	.height dd ?
118	}	118	}
119	virtual at 0	119	virtual at 0
120	BOX BOX	120	BOX BOX
121	end virtual	121	end virtual
122		122
123	; constants definition	123	; constants definition
124	WSTATE_NORMAL = 00000000b	124	WSTATE_NORMAL = 00000000b
125	WSTATE_MAXIMIZED = 00000001b	125	WSTATE_MAXIMIZED = 00000001b
126	WSTATE_MINIMIZED = 00000010b	126	WSTATE_MINIMIZED = 00000010b
127	WSTATE_ROLLEDUP = 00000100b	127	WSTATE_ROLLEDUP = 00000100b
128		128
129	WSTATE_REDRAW = 00000001b	129	WSTATE_REDRAW = 00000001b
130	WSTATE_WNDDRAWN = 00000010b	130	WSTATE_WNDDRAWN = 00000010b
131		131
132	WSTYLE_HASCAPTION = 00010000b	132	WSTYLE_HASCAPTION = 00010000b
133	WSTYLE_CLIENTRELATIVE = 00100000b	133	WSTYLE_CLIENTRELATIVE = 00100000b
134		134
135	struc TASKDATA	135	struc TASKDATA
136	{	136	{
137	.event_mask dd ?	137	.event_mask dd ?
138	.pid dd ?	138	.pid dd ?
139	dw ?	139	dw ?
140	.state db ?	140	.state db ?
141	db ?	141	db ?
142	dw ?	142	dw ?
143	.wnd_number db ?	143	.wnd_number db ?
144	db ?	144	db ?
145	.mem_start dd ?	145	.mem_start dd ?
146	.counter_sum dd ?	146	.counter_sum dd ?
147	.counter_add dd ?	147	.counter_add dd ?
148	.cpu_usage dd ?	148	.cpu_usage dd ?
149	}	149	}
150	virtual at 0	150	virtual at 0
151	TASKDATA TASKDATA	151	TASKDATA TASKDATA
152	end virtual	152	end virtual
153		153
154	; structures definition	154	; structures definition
155	struc WDATA {	155	struc WDATA {
156	.box BOX	156	.box BOX
157	.cl_workarea dd ?	157	.cl_workarea dd ?
158	.cl_titlebar dd ?	158	.cl_titlebar dd ?
159	.cl_frames dd ?	159	.cl_frames dd ?
160	.reserved db ?	160	.reserved db ?
161	.fl_wstate db ?	161	.fl_wstate db ?
162	.fl_wdrawn db ?	162	.fl_wdrawn db ?
163	.fl_redraw db ?	163	.fl_redraw db ?
164	}	164	}
165	virtual at 0	165	virtual at 0
166	WDATA WDATA	166	WDATA WDATA
167	end virtual	167	end virtual
168	label WDATA.fl_wstyle byte at 0x13	168	label WDATA.fl_wstyle byte at 0x13
169		169
170	struc APPDATA	170	struc APPDATA
171	{	171	{
172	.app_name db 11 dup(?)	172	.app_name db 11 dup(?)
173	db 5 dup(?)	173	db 5 dup(?)
174		174
175	.fpu_state dd ? ;+16	175	.fpu_state dd ? ;+16
176	.ev_count dd ? ;+20	176	.ev_count dd ? ;+20
177	.fpu_handler dd ? ;+24	177	.fpu_handler dd ? ;+24
178	.sse_handler dd ? ;+28	178	.sse_handler dd ? ;+28
179	.event dd ? ;+32	179	.event dd ? ;+32
180	.heap_base dd ? ;+36	180	.heap_base dd ? ;+36
181	.heap_top dd ? ;+40	181	.heap_top dd ? ;+40
182	.cursor dd ? ;+44	182	.cursor dd ? ;+44
183	.ev_first dd ? ;+48	183	.ev_first dd ? ;+48
184	.ev_last dd ? ;+52	184	.ev_last dd ? ;+52
185		185
186	db 72 dup(?) ;+56	186	db 72 dup(?) ;+56
187		187
188	.wnd_shape dd ? ;+128	188	.wnd_shape dd ? ;+128
189	.wnd_shape_scale dd ? ;+132	189	.wnd_shape_scale dd ? ;+132
190	dd ? ;+136	190	dd ? ;+136
191	.mem_size dd ? ;+140	191	.mem_size dd ? ;+140
192	.saved_box BOX	192	.saved_box BOX
193	.ipc_start dd ?	193	.ipc_start dd ?
194	.ipc_size dd ?	194	.ipc_size dd ?
195	.event_mask dd ?	195	.event_mask dd ?
196	.debugger_slot dd ?	196	.debugger_slot dd ?
197	dd ?	197	dd ?
198	.keyboard_mode db ?	198	.keyboard_mode db ?
199	db 3 dup(?)	199	db 3 dup(?)
200	.dir_table dd ?	200	.dir_table dd ?
201	.dbg_event_mem dd ?	201	.dbg_event_mem dd ?
202	.dbg_regs:	202	.dbg_regs:
203	.dbg_regs.dr0 dd ?	203	.dbg_regs.dr0 dd ?
204	.dbg_regs.dr1 dd ?	204	.dbg_regs.dr1 dd ?
205	.dbg_regs.dr2 dd ?	205	.dbg_regs.dr2 dd ?
206	.dbg_regs.dr3 dd ?	206	.dbg_regs.dr3 dd ?
207	.dbg_regs.dr7 dd ?	207	.dbg_regs.dr7 dd ?
208	.wnd_caption dd ?	208	.wnd_caption dd ?
209	.wnd_clientbox BOX	209	.wnd_clientbox BOX
210	}	210	}
211	virtual at 0	211	virtual at 0
212	APPDATA APPDATA	212	APPDATA APPDATA
213	end virtual	213	end virtual
214		214
215	;// mike.dld, 2006-29-01 ]	215	;// mike.dld, 2006-29-01 ]
216		216
217		217
218	; Core functions	218	; Core functions
219	include "core/sync.inc" ; macros for synhronization objects	219	include "core/sync.inc" ; macros for synhronization objects
220	include "core/sys32.inc" ; process management	220	include "core/sys32.inc" ; process management
221	include "core/sched.inc" ; process scheduling	221	include "core/sched.inc" ; process scheduling
222	include "core/syscall.inc" ; system call	222	include "core/syscall.inc" ; system call
223	include "core/fpu.inc" ; all fpu/sse support	223	include "core/fpu.inc" ; all fpu/sse support
224	include "core/memory.inc"	224	include "core/memory.inc"
225	include "core/heap.inc" ; kernel and app heap	225	include "core/heap.inc" ; kernel and app heap
226	include "core/taskman.inc"	226	include "core/taskman.inc"
227	include "core/dll.inc"	227	include "core/dll.inc"
228	include "core/exports.inc"	228	include "core/exports.inc"
229		229
230	; GUI stuff	230	; GUI stuff
231	include "gui/window.inc"	231	include "gui/window.inc"
232	include "gui/event.inc"	232	include "gui/event.inc"
233	include "gui/font.inc"	233	include "gui/font.inc"
234	include "gui/button.inc"	234	include "gui/button.inc"
235		235
236	; shutdown	236	; shutdown
237		237
238	include "boot/shutdown.inc" ; shutdown or restart	238	include "boot/shutdown.inc" ; shutdown or restart
239		239
240	; file system	240	; file system
241		241
242	include "fs/fs.inc" ; syscall	242	include "fs/fs.inc" ; syscall
243	include "fs/fat32.inc" ; read / write for fat32 filesystem	243	include "fs/fat32.inc" ; read / write for fat32 filesystem
-		244	include "fs/ntfs.inc" ; read / write for ntfs filesystem
244	include "fs/fat12.inc" ; read / write for fat12 filesystem	245	include "fs/fat12.inc" ; read / write for fat12 filesystem
245	include "blkdev/rd.inc" ; ramdisk read /write	246	include "blkdev/rd.inc" ; ramdisk read /write
246	include "fs/fs_lfn.inc" ; syscall, version 2	247	include "fs/fs_lfn.inc" ; syscall, version 2
247	include "fs/iso9660.inc" ; read for iso9660 filesystem CD	248	include "fs/iso9660.inc" ; read for iso9660 filesystem CD
248		249
249	; sound	250	; sound
250		251
251	include "sound/sb16.inc" ; playback for Sound Blaster 16	252	include "sound/sb16.inc" ; playback for Sound Blaster 16
252	include "sound/playnote.inc" ; player Note for Speaker PC	253	include "sound/playnote.inc" ; player Note for Speaker PC
253		254
254	; display	255	; display
255		256
256	include "video/vesa12.inc" ; Vesa 1.2 functions	257	include "video/vesa12.inc" ; Vesa 1.2 functions
257	include "video/vesa20.inc" ; Vesa 2.0 functions	258	include "video/vesa20.inc" ; Vesa 2.0 functions
258	include "video/vga.inc" ; VGA 16 color functions	259	include "video/vga.inc" ; VGA 16 color functions
259	include "video/cursors.inc" ; cursors functions	260	include "video/cursors.inc" ; cursors functions
260		261
261	; Network Interface & TCPIP Stack	262	; Network Interface & TCPIP Stack
262		263
263	include "network/stack.inc"	264	include "network/stack.inc"
264		265
265	; Mouse pointer	266	; Mouse pointer
266		267
267	include "gui/mouse.inc"	268	include "gui/mouse.inc"
268		269
269	; Window skinning	270	; Window skinning
270		271
271	include "gui/skincode.inc"	272	include "gui/skincode.inc"
272		273
273	; Pci functions	274	; Pci functions
274		275
275	include "bus/pci/pci32.inc"	276	include "bus/pci/pci32.inc"
276		277
277	; Floppy drive controller	278	; Floppy drive controller
278		279
279	include "blkdev/fdc.inc"	280	include "blkdev/fdc.inc"
280	include "blkdev/flp_drv.inc"	281	include "blkdev/flp_drv.inc"
281		282
282	; HD drive controller	283	; HD drive controller
283	include "blkdev/hd_drv.inc"	284	include "blkdev/hd_drv.inc"
284		285
285	; CD drive controller	286	; CD drive controller
286		287
287	include "blkdev/cdrom.inc"	288	include "blkdev/cdrom.inc"
288	include "blkdev/cd_drv.inc"	289	include "blkdev/cd_drv.inc"
289		290
290	; Character devices	291	; Character devices
291		292
292	include "hid/keyboard.inc"	293	include "hid/keyboard.inc"
293	include "hid/mousedrv.inc"	294	include "hid/mousedrv.inc"
294		295
295	; setting date,time,clock and alarm-clock	296	; setting date,time,clock and alarm-clock
296		297
297	include "hid/set_dtc.inc"	298	include "hid/set_dtc.inc"
298		299
299	;% -include	300	;% -include

Subversion Repositories Kolibri OS

(root)/kernel/trunk/kernel32.inc – Rev 227 → 256