Subversion Repositories Kolibri OS

/*

    Sphinx C-- header file for MenuetOS applications.

    Based on msys.h-- written by Alexey Sugonyaev and modified by Barry Kauler.

    This extended version is written by Ivan Poddubny.

    e-mail: ivan-yar@bk.ru

*/

// KeyCode constant

#define UP_KEY		130+48

#define DOWN_KEY	129+48

#define LEFT_KEY	128+48

#define RIGHT_KEY	131+48

#define RETURN_KEY	13

#define BACKSPACE_KEY	8

// Color constant

#define clWhite		0x00ffffff

#define clGray		0x00808080

#define clLightGray	0x00c0c0c0

#define clDarkGray	0x00707070

#define clBlack		0x00000000

#define clRed		0x00ff0000

#define clGreen		0x0000ff00

#define clBlue		0x000000ff

#define evReDraw	1

#define evKey		2

#define evButton	3

#define evMouse		6

#define evIPC		7

struct FileInfo

{

  dword	read,

	firstBlock,

	qnBlockRead,

	retPtr,

	Work;

  byte	filedir;

};

struct ProcessInfo

{

  dword cpu_usage;

  word  winstackpos;

  word  winstackval;

  word  not_used1;

  byte  name[12];

  dword memstart,

        memory_used,

        PID,

        xstart,

        ystart,

        xsize,

        ysize;

  byte  not_used2[974];

};

#define SystemColors SystemColours // usa/british

struct SystemColours

{

  dword w_frames,

        w_grab,

        w_grab_button,

        w_grab_button_text,

        w_grab_text,

        w_work,

        w_work_button,

        w_work_button_text,

        w_work_text,

        w_work_graph;

};

/*

  {x_start|y_start}, {x_size|y_size}, color_back, color_title, color_frames

             EBX = [x_start][x_size]

             ECX = [y_start][y_size]

             EDX, ESI, EDI = [00RRGGBB]

*/

inline fastcall void sys_draw_window(dword EBX, ECX, EDX, ESI, EDI)

{

 EAX = 0;               // function 0 : define and draw window

 $int 0x40

}

/*

01 = PUTPIXEL

     ebx [x]

     ecx [y]

     edx pixel color 0x0XRRGGBB

                        ^ 0 normal put, 1 negative

     ret: nothing changed

*/

inline fastcall void sys_put_pixel(dword EBX,ECX,EDX)

{

  EAX=1;

  $int 0x40

}

/*

02 = GET KEY

     ret: al 0 successful -> ah = key

          al 1 no key in buffer

     MODIFIED, see below...

*/

inline fastcall dword sys_get_key()

{

  EAX = 2;              // just read it key from buffer

  $int  0x40

  $shr eax,8

}            //return eax=key code.

/*

03 = GET SYSTEM CLOCK

        ret: eax 0x00SSMMHH sec,min,hour

*/

inline fastcall dword sys_get_clock()

{

  EAX=3;

  $int 0x40

}

/*

04 = WRITE TEXT TO WINDOW

     ebx [x start]*65536 + [y start]

     ecx text color 0x00RRGGBB

     edx pointer to text beginning

     esi text length

     ret: nothing changed

*/

inline fastcall void sys_write_text(dword EBX, ECX, EDX, ESI)

{

  EAX = 4;

  $int 0x40;

}

/*

05 = DELAY X/100 SECS

     ebx delay in 1/100 secs

     ret: nothing changed

*/

inline fastcall void sys_delay(dword EBX)

{

  EAX = 5;

  $int 0x40

}

/*

06 = OPEN FILE FROM FLOPPY

     ebx pointer to filename -> 11 capital letters

     ecx set 0x00000000 - reserved

     edx set 0xffffffff - reserved

     esi read to mem position

     ret: nothing changed

*/

inline fastcall void sys_open_file_floppy(dword EBX, ESI)

{

  $xor ecx,ecx

  EDX = -1;

  EAX = 6;

  $int 0x40

}

/*

07 = PUTIMAGE

     ebx pointer to image in memory - RRGGBBRRGGBB..

     ecx image size [x]*65536+[y]

     edx image position in window [x]*65536+[y]

     ret: eax 0 succesful, 1 overlapped

*/

inline fastcall dword sys_put_image(dword EBX, ECX, EDX)

{

  EAX = 7;

  $int 0x40

}

/*

08 = DEFINE BUTTON

     ebx [x start]*65536 + [x size]

     ecx [y start]*65536 + [y size]

     edx button id number

     esi button color 0x 00 RR GG BB

     ret: nothing changed

*/

inline fastcall void sys_draw_button(dword EBX, ECX, EDX, ESI)

{

  EAX = 8;

  $int 0x40

}

/*

09 = PROCESS INFO

     ebx pointer to 1024 bytes table

     ecx process number or -1 = who am I

     ret: eax number of processes

          table :  +00  dword   cpu usage

                   +04   word   processes position in windowing stack

                   +06   word   window stack value at ecx

                   +10  12 db   name of the process

                   +22  dword   start of processes memory

                   +26  dword   memory used by process

                   +30  dword   PID of the process

                   +34  dword   window x start

                   +38  dword   window y start

                   +42  dword   window x size

                   +46  dword   window y size

*/

inline fastcall dword sys_process_info(dword EBX, ECX)

{

  EAX = 9;

  $int 0x40

}

/*

10 = WAIT FOR EVENT

     ret: eax event type, 1 window redraw, 2 key in buffer, 3 button pressed

*/

inline fastcall dword sys_wait_event()

{

  EAX = 10;              // wait here for event

  $int 0x40

}

/*

11 = CHECK FOR EVENT, NO WAIT

     ret: eax 0 no event, 1 window redraw, 2 key in buffer, 3 button pressed

*/

inline fastcall dword sys_nowait_event()

{

  EAX = 11;

  $int 0x40

}

/* 12 = WINDOW REDRAW

  EBX=1 start of draw, =2 end of draw.

*/

inline fastcall void sys_window_redraw(dword EBX)

{

  EAX = 12;              // function 12:tell os about windowdraw

  $int 0x40

}

/*

13 = DRAW BAR

DrawBar(EBX=[xstart][xsize],ECX=[ystart][ysize],EDX=[0x00RRGGBB])

     ebx [x start]*65536 + [x size]

     ecx [y start]*65536 + [y size]

     edx color 0x00RRGGBB

     ret: nothing changed

*/

inline fastcall void sys_draw_bar(dword EBX, ECX, EDX)

{

  EAX = 13;

  $int 0x40

}

/*

14 = GET SCREEN MAX

     ret: eax [screen x max]*65536 + [screen y max]

*/

inline fastcall dword sys_get_screen_size()

{

  EAX = 14;

  $int 0x40

}

/*

15 = BACKGROUND

     ebx 1 : set background size

             ecx x size

             edx y size

     ebx 2 : write to background memory - max (0x100000-16)

             ecx position in memory in bytes

             edx color 0x00RRGGBB

     ebx 3 : draw background

     ebx 4 : type of background draw

             ecx 1 - tile

             ecx 2 - stretch

     ebx 5 : blockmove image to os bgr memory

             ecx - from

             edx - to where in os bgr memory

             esi - count of bytes to move

*/

inline fastcall void sys_set_background(dword EBX, ECX, EDX, ESI)

{

  EAX = 15;

  $int 0x40

}

/*

17 = GET PRESSED BUTTON ID

  ret: al 0 successful -> ah = id number al 1 no key in buffer.

  MODIFIED, see below.

*/

inline fastcall dword sys_get_button_id()

{

  EAX = 17;            // Get ID

  $int  0x40

  $shr eax,8

}      //eax=id, eax=0 no id.

/*

18 = SYSTEM SERVICE

     ebx 1 - system boot

     ebx 2 - force terminate , ecx process no

     ebx 4 - idle clock cycles / second

     ebx 5 - time stamp counter / second - cpu speed

HD-> ebx 6 - save ramdisk to /hd/1/menuet.img

*/

inline fastcall dword sys_service(dword EBX, ECX)

{

  EAX = 18;

  $int 0x40

}

/*

19 = START PROGRAM from RAMDISK

     ebx point to 11 char filename

     ecx 0, or point to ASCIIZ start parameters - max 256 bytes

     ret: eax 0      successful

          eax other  error code

*/

inline fastcall dword sys_exec_app_ramdisk(dword EBX, ECX)

{

  EAX = 19;

  $int 0x40

}

/*

20 = MIDI INTERFACE - MPU401

     ebx  1 - reset device

     ebx  2 - cl midi data to output

*/

inline fastcall void sys_midi(dword EBX)

{

  EAX = 20;

  $int 0x40

}

/*

21 = SETUP FOR DEVICES

     ebx 1=roland mpu midi base , base io address

     ebx 2=keyboard 1 base keymap  2 shift keymap (ecx pointer to keymap)

                    9 country 1eng 2fi 3ger 4rus

     ebx 3=cd base  1 pri.master  2 pri slave,

                    3 sec master  4 sec slave

     ebx 4=sb16 base, base io address

     ebx 5=system language, 1eng 2fi 3ger 4rus

     ebx 6=wss base, base io address

     ebx 7=hd base, 1 pri.master  2 pri slave

                    3 sec master  4 sec slave

     ebx 8=fat32 partition in hd

*/

inline fastcall void sys_setup_devices(dword EBX, ECX)

{

  EAX = 21;

  $int 0x40

}

/*

23 = WAIT FOR EVENT WITH TIMEOUT

     ebx time to delay in hs

     ret: eax event type: 0 no event, 1 window redraw,

                          2 key in buffer, 3 button

*/

inline fastcall dword sys_wait_event_timeout(dword EBX)

{

  EAX = 23;

  $int 0x40

}

/*

24 = CD AUDIO

     ebx 1 - play from ecx 00 FR SS MM

     ebx 2 - get playlist size of ecx to [edx]

     ebx 3 - stop/pause play

*/

inline fastcall void sys_cd_audio(dword EBX, ECX, EDX)

{

  EAX = 24;

  $int 0x40

}

/*

25 = SB16 - mixer I

     ebx 1 - set main volume cl [L]*16+[R]

     ebx 2 - set cd   volume cl [L]*16+[R]

*/

inline fastcall void sys_sb16_mixer_1(dword EBX, ECX)

{

  EAX = 25;

  $int 0x40

}

/*

26 = GET SETUP FOR DEVICES

     ebx 1=roland mpu midi base , base io address

     ebx 2=keyboard 1 base keymap  2 shift keymap

                    9 country 1eng 2fi 3ger 4rus

     ebx 3=cd base  1 pri.master  2 pri slave,

                    3 sec master  4 sec slave

     ebx 4=sb16 base, base io address

     ebx 5=system language, 1eng 2fi 3ger 4rus

     ebx 6=wss base, base io address

     ebx 7=hd base, 1 pri.master  2 pri slave

                    3 sec master  4 sec slave

     ebx 8=fat32 partition in hd

     ebx 9=1/100 timer tics from stard -> eax

     return value in eax

*/

inline fastcall dword sys_get_setup_devices(dword EBX)

{

  EAX = 26;

  $int 0x40

}

/*

27 = WINDOWS SOUND SYSTEM

     ebx 1 - set main volume to cl 0-255

     ebx 2 - set cd   volume to cl 0-255

*/

inline fastcall void sys_windows_sound_system(dword EBX, ECX)

{

  EAX = 27;

  $int 0x40

}

/*

28 = SB16 - mixer II

     ebx 1 - set main volume to cl 0-255

     ebx 2 - set cd   volume to cl 0-255

*/

inline fastcall void sys_sb16_mixer_2(dword EBX, ECX)

{

  EAX = 28;

  $int 0x40

}

/*

29 = GET DATE

     ret: eax 0x00YYDDMM year date month

*/

inline fastcall dword sys_get_date()

{

  EAX = 29;

  $int 0x40

}

/*

30 = READ HD

     ebx  pointer to file

     ecx  file lenght

     edx  block to read, starts from 1, blocksize = 512 bytes

     esi  reserved, set as 1

     edi  pointer to return/work area (atleast 20 000 bytes)

     return: work_area+1024 <- requested block of 512 bytes

*/

inline fastcall dword sys_read_hd(dword EBX, ECX, EDX, ESI, EDI)

{

  EAX = 30;

  $int 0x40

}

/*

31 = START APP FROM HD

     ebx  pointer to file

     ecx  file lenght

     edx  pointer to return/work area (atleast 20 000 bytes)

     ret  eax=0 successful, eax<>0 errorcode

*/

inline fastcall dword sys_exec_app_hd()

{

  EAX = 31;

  $int 0x40

}

/*

32 = DELETE FILE FROM FLOPPY IMAGE IN MEMORY

     ebx  pointer to filename

*/

inline fastcall dword sys_floppy_delete(EBX)

{

  EAX = 32;

  $int 0x40

}

/*

33 = SAVE FILE TO FLOPPY IMAGE IN MEMORY

     ebx  pointer to file name

     ecx  pointer to data

     edx  count to write in bytes

     esi  0 create new , ( 1 append - not implemented yet )

*/

inline fastcall dword sys_floppy_save(EBX,ECX,EDX)

{

  EAX = 33;

  ESI = 0;

  $int 0x40

}

/*

34 = READ DIRECTORY FROM FLOPPY

     ebx  reserved : set as zero

     ecx  reserved : set as zero

     edx  start 512 block to read

     esi  reserved : set as 1

     edi  pointer to return area

35 = READ SCREEN PIXEL

     ebx = pixel count from top left of the screen

     return : eax = 0x00RRGGBB

*/

/*

37 = READ MOUSE POSITION

     ebx=0 screen relative

     ebx=1 window relative

     ebx=2 buttons pressed

     return in eax

*/

inline fastcall dword sys_read_mouse(dword EBX)

{

  EAX = 37;

  $int 0x40

}

/*

38 = DRAW LINE

     ebx  [x start] shl 16 + [x end]

     ecx  [y start] shl 16 + [y end]

     edx  colour 0x00RRGGBB

     return : nothing changed

*/

inline fastcall void sys_draw_line(dword EBX, ECX, EDX)

{

  EAX = 38;

  $int 0x40

}

/*

39 = GET BACKGROUND

     ebx=1 -> eax=[bgr x size] shl 16 + [bgr y size]

     ebx=2

       ecx= postition of backgrounds memorymap to return in eax

     ebx=4 -> eax=1 tiled, eax=2 stretched

*/

inline fastcall dword sys_get_background(dword EBX, ECX)

{

  EAX = 39;

  $int 0x40

}

/*

40 = SET BITFIELD FOR WANTED EVENTS

     as default:

     ebx = 00000000 00000000 00000000 00000111b  events:

                                             I   window draw

                                            I    key in buffer

                                           I     button in buffer

                                          I      (end request)

                                         I       desktop background draw

                                        I        (mouse change)

           I---------------I                     get irqs data

41 = GET IRQ OWNER

     ebx = irq

     return : PID of the process

42 = GET DATA READ BY IRQ

     ebx  IRQ number

     return :  eax  number of bytes in buffer

                bl  data

               ecx  0 = successful data read

                    1 = no data in buffer

                    2 = incorrect IRQ owner

43 = SEND DATA TO DEVICE

     bx  : port

     cl  : data

     return : eax = if 0 successful, other = error

44 = PROGRAM IRQ's

     ebx  pointer to table

     ecx  irq number

45 = RESERVE/FREE IRQ

     ebx  0 reserve  1 free

     ecx  IRQ number

     ret  eax 0 successful,  1 error

46 = RESERVE/FREE PORT AREA

     ebx  0 reserve  1 free

     ecx  port area start

     edx  port area end

     ret  eax 0 successful,  1 error

*/

/*

47 = DISPLAY NUMBER TO WINDOW

     ebx = print type, bl=0 -> ecx is number

                       bl=1 -> ecx is pointer

                       bh=0 -> display decimal

                       bh=1 -> display hexadecimal

                       bh=2 -> display binary

           bits 16-21 = number of digits to display (0-32)

           bits 22-31 = reserved

     ecx = number or pointer

     edx = x shl 16 + y

     esi = color

*/

inline fastcall void sys_write_number(dword EBX, ECX, EDX, ESI)

{

  EAX = 47;

  $int 0x40

}

/*

48 = DEFINE GENERAL WINDOW PROPERTIES

     ebx = 0      apply/redraw

        ecx = 0 , apply/redraw desktop

     ebx = 1      define button style

        ecx = 0 , set flat buttons

        ecx = 1 , set 3d buttons

     ebx = 2      define window colors

        ecx = pointer to table

        edx = number of bytes defined

     ebx = 3      get define window colors

        ecx = pointer to table

        edx = number of bytes to get

*/

inline fastcall void sys_redraw_desktop()

{

  EAX = 48;

  EBX = ECX = 0;

  $int 0x40

}

inline fastcall void sys_set_button_style(dword ECX)

{

  EAX = 48;

  EBX = 1;

  $int 0x40

}

inline fastcall void sys_set_colors(dword ECX,EDX)

{

  EAX = 48;

  EBX = 2;

  $int 0x40

}

inline fastcall void sys_get_colors(dword ECX,EDX)

{

  EAX = 48;

  EBX = 3;

  $int 0x40

}

/*

49 = DEFINE APPLICATIONS INTERNAL INTERRUPTS

     ebx = 0

      ecx  point to dword x 256 table of interrupt entries

           inside the application

     return : nothing changed

50 = FREE FORM WINDOW SHAPE AND SCALE

     ebx = 0 ; shape reference area

       ecx = pointer to reference area

             byte per pixel, 0 not used, 1=used, other = reserved

     ebx = 1 ; scale of reference area (default 1:1)

       ecx : scale is set to 2^ecx

     return: nothing changed

51 = CREATE THREAD

     ebx = 1  ; create

       ecx    ; = thread entry point

       edx    ; = thread stack position

     return : eax = pid or 0xfffffff0+ for error

*/

inline fastcall dword sys_create_thread(dword ECX,EDX)

{

  EAX = 51;

  EBX = 1;

  $int 0x40

}

/*

52 = STACK DRIVER STATUS

     - see stack.txt

53 = SOCKET INTERFACE

     - see stack.txt

54 = USER EVENTS

     - not ready yet

55 = SOUND INTERFACE

     ebx = 0     ; load 44 khz 8 bit mono sound block

       ecx       ; = pointer to 65536 byte soundblock

     ebx = 1     ; play 44 khz 8 bit mono sound block

56 = WRITE FILE TO HD

     ebx  pointer to 12 char filename

     ecx  bytes to write

     edx  pointer to data to write

     esi  pointer to path

          path db 0

57 = DELETE FILE FROM HD

     ebx   pointer to filename : 11 capital letters

     edx   pointer to path : path db 0

*/

/*

58 = SYSTEM TREE ACCESS

     ebx    pointer to fileinfo block

     fileinfo:

     dd   0x0                  ; 0=read (/write/delete/append)

     dd   0x0                  ; 512 block to read 0+

     dd   0x1                  ; blocks to read (/bytes to write/append)

     dd   0x20000              ; return data pointer

     dd   0x10000              ; work area for os - 16384 bytes

     db   '/RAMDISK/FIRST/KERNEL.ASM',0  ; ASCIIZ dir & filename

*/

inline fastcall void sys_tree_access(dword EBX)

{

  EAX = 58;

  $int 0x40

}

/*

59 = TRACE FOR SYSTEM CALLS FROM PROCESSES

     ebx = 0   ; get system events

       ecx     ; pointer to table  -> ; 64 bytes/system call descriptor

                                      ; +00 PID

                                      ; +32 EDI

                                      ; +36 ESI

                                      ; +40 EBP

                                      ; +44 ESP

                                      ; +48 EBX

                                      ; +52 EDX

                                      ; +56 ECX

                                      ; +60 EAX

       edx     ; number of bytes to return to table (currently max 16*64)

     return:  eax = number of system calls from start

                     latest call is saved to (eax mod 16)*64 in table

               ebx = 0 : above format

*/

/*

60 = IPC

	ebx = 1 ; define receive area

		ecx = pointer to start

		edx = size of area

	ebx = 2 ; send message

		ecx = PID

		edx = pointer to message

		esi = length

*/

inline fastcall void sys_ipc_init(dword ECX, EDX)

{

  EAX = 60;

  EBX = 1;

  $int 0x40

}

inline fastcall void sys_ipc_send(dword ECX, EDX, ESI)

{

  EAX = 60;

  EBX = 2;

  $int 0x40

}

/* -1 = EXIT PROCESS */

inline fastcall void sys_exit_process()

{

 $xor eax,eax

 $dec eax

 $int 0x40

}