forked from KolibriOS/kolibrios
small SDK for libGUI
git-svn-id: svn://kolibrios.org@699 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
andrew_programmer
parent
25713b7524
commit
b66406549f
2
programs/develop/sdk/trunk/libGUI_SDK/README.txt
Normal file
2
programs/develop/sdk/trunk/libGUI_SDK/README.txt
Normal file
@ -0,0 +1,2 @@
|
|||||||
|
C file compile by GCC.
|
||||||
|
asm file compile by FASM
|
||||||
73
programs/develop/sdk/trunk/libGUI_SDK/cofflib.asm
Normal file
73
programs/develop/sdk/trunk/libGUI_SDK/cofflib.asm
Normal file
@ -0,0 +1,73 @@
|
|||||||
|
format ELF
|
||||||
|
include 'proc32.inc'
|
||||||
|
section '.text' executable
|
||||||
|
|
||||||
|
public _ksys_cofflib_load
|
||||||
|
public _ksys_cofflib_getproc
|
||||||
|
|
||||||
|
proc _ksys_cofflib_load stdcall, name:dword
|
||||||
|
|
||||||
|
mov eax, 68
|
||||||
|
mov ebx, 19
|
||||||
|
mov ecx, [name]
|
||||||
|
int 0x40
|
||||||
|
ret
|
||||||
|
endp
|
||||||
|
|
||||||
|
proc _ksys_cofflib_getproc stdcall, export:dword,name:dword
|
||||||
|
|
||||||
|
mov ebx,[export]
|
||||||
|
|
||||||
|
next_name_check:
|
||||||
|
|
||||||
|
mov ecx,[ebx]
|
||||||
|
test ecx,ecx
|
||||||
|
jz end_export
|
||||||
|
|
||||||
|
;cmp export string with name
|
||||||
|
mov esi,[name]
|
||||||
|
xor edi,edi
|
||||||
|
next_simbol_check:
|
||||||
|
|
||||||
|
xor eax,eax
|
||||||
|
mov al,[ecx]
|
||||||
|
test al,al
|
||||||
|
jz exit_check_simbol
|
||||||
|
|
||||||
|
xor edx,edx
|
||||||
|
mov dl,[esi]
|
||||||
|
cmp al,dl
|
||||||
|
je simbols_equvalent
|
||||||
|
add edi,1
|
||||||
|
jmp exit_check_simbol
|
||||||
|
simbols_equvalent:
|
||||||
|
|
||||||
|
;pushad
|
||||||
|
|
||||||
|
;mov cl,al
|
||||||
|
;mov ebx,1
|
||||||
|
;mov eax,63
|
||||||
|
;int 0x40
|
||||||
|
|
||||||
|
;popad
|
||||||
|
|
||||||
|
add ecx,1
|
||||||
|
add esi,1
|
||||||
|
jmp next_simbol_check
|
||||||
|
exit_check_simbol:
|
||||||
|
|
||||||
|
test edi,edi
|
||||||
|
jnz function_not_finded
|
||||||
|
mov eax,[ebx+4]
|
||||||
|
jmp end_export
|
||||||
|
function_not_finded:
|
||||||
|
|
||||||
|
add ebx,8
|
||||||
|
|
||||||
|
jmp next_name_check
|
||||||
|
|
||||||
|
end_export:
|
||||||
|
|
||||||
|
ret
|
||||||
|
endp
|
||||||
|
|
||||||
195
programs/develop/sdk/trunk/libGUI_SDK/kolibrisys.h
Normal file
195
programs/develop/sdk/trunk/libGUI_SDK/kolibrisys.h
Normal file
@ -0,0 +1,195 @@
|
|||||||
|
#ifndef kolibrisys_h
|
||||||
|
#define kolibrisys_h
|
||||||
|
/*
|
||||||
|
#ifdef GNUC
|
||||||
|
#define stdcall __stdcall
|
||||||
|
#define cdecl __cdecl
|
||||||
|
#else
|
||||||
|
#define stdcall ((__stdcall))
|
||||||
|
#define cdecl ((__cdecl))
|
||||||
|
#endif
|
||||||
|
*/
|
||||||
|
//#ifdef GNUC
|
||||||
|
//#define stdcall __stdcall
|
||||||
|
//#else
|
||||||
|
#define cdecl __attribute__ ((cdecl))
|
||||||
|
#define stdcall __attribute__ ((stdcall))
|
||||||
|
//#endif
|
||||||
|
|
||||||
|
typedef unsigned int dword;
|
||||||
|
typedef unsigned char byte;
|
||||||
|
typedef unsigned short word;
|
||||||
|
|
||||||
|
typedef unsigned int fpos_t;
|
||||||
|
typedef unsigned int size_t;
|
||||||
|
|
||||||
|
typedef struct process_table_entry{
|
||||||
|
int cpu_usage; //+0
|
||||||
|
int window_pos_info; //+4
|
||||||
|
short int reserved1; //+8
|
||||||
|
char name[12]; //+10
|
||||||
|
int memstart; //+22
|
||||||
|
int memused; //+26
|
||||||
|
int pid; //+30
|
||||||
|
int winx_start; //+34
|
||||||
|
int winy_start; //+38
|
||||||
|
int winx_size; //+42
|
||||||
|
int winy_size; //+46
|
||||||
|
short int slot_info; //+50
|
||||||
|
short int reserved2; //+52
|
||||||
|
int clientx; //+54
|
||||||
|
int clienty; //+58
|
||||||
|
int clientwidth; //+62
|
||||||
|
int clientheight; //+66
|
||||||
|
unsigned char window_state;//+70
|
||||||
|
char reserved3[1024-71]; //+71
|
||||||
|
}__attribute__((packed));
|
||||||
|
|
||||||
|
//-----------------------------------------------------------------------------------
|
||||||
|
//------------------------KolibriOS system acces to files----------------------------
|
||||||
|
//-----------------------------------------------------------------------------------
|
||||||
|
extern dword stdcall _ksys_get_filesize(char *filename);
|
||||||
|
extern dword stdcall _ksys_readfile(char *filename,dword pos,dword blocksize,void *data);
|
||||||
|
extern dword stdcall _ksys_rewritefile(char *filename,dword blocksize,void *data);
|
||||||
|
extern dword stdcall _ksys_appendtofile(char *filename,dword pos,dword blocksize,void *data);
|
||||||
|
//-----------------------------------------------------------------------------------
|
||||||
|
|
||||||
|
//----------------------Run program---------------------------------------------------
|
||||||
|
extern void stdcall _ksys_run_program(char* filename,char* parameters);
|
||||||
|
//------------------------------------------------------------------------------------
|
||||||
|
|
||||||
|
//--------------------Debug output---------------------------------------------------
|
||||||
|
extern void stdcall _ksys_debug_out(int c);
|
||||||
|
extern void stdcall debug_out_str(char* str);
|
||||||
|
//-----------------------------------------------------------------------------------
|
||||||
|
|
||||||
|
//--------------------------Mouse state----------------------------------------------
|
||||||
|
extern int stdcall _ksys_GetMouseXY(void);
|
||||||
|
extern int stdcall _ksys_GetMouseButtonsState(void);
|
||||||
|
//-----------------------------------------------------------------------------------
|
||||||
|
|
||||||
|
//--------------------------get skin height------------------------------------------
|
||||||
|
extern int stdcall _ksys_get_skin_height(void);
|
||||||
|
//-----------------------------------------------------------------------------------
|
||||||
|
|
||||||
|
//----------------------------background---------------------------------------------
|
||||||
|
extern void stdcall _ksys_set_background_size(int xsize,int ysize);
|
||||||
|
extern void stdcall _ksys_write_background_mem(int pos,int color);
|
||||||
|
extern void stdcall _ksys_draw_background(void);
|
||||||
|
extern void stdcall _ksys_set_background_draw_type(int type);
|
||||||
|
extern void stdcall _ksys_background_blockmove(void* src,int bgr_pos, int count);
|
||||||
|
//-----------------------------------------------------------------------------------
|
||||||
|
|
||||||
|
//----------------------------functionf for draw window,lines.bar,etc.---------------
|
||||||
|
extern void stdcall _ksys_draw_window(int xcoord,int ycoord, int xsize,
|
||||||
|
int ysize,int workcolor,int type,
|
||||||
|
int captioncolor,int windowtype,int bordercolor);
|
||||||
|
extern void stdcall _ksys_window_redraw(int status);
|
||||||
|
extern int stdcall _ksys_putpixel(int x,int y,int color);
|
||||||
|
extern void stdcall _ksys_draw_bar(int x, int y, int xsize, int ysize, int color);
|
||||||
|
extern void stdcall _ksys_line(int x1,int y1,int x2,int y2,int color);
|
||||||
|
extern void stdcall _ksys_putimage(int x, int y, int xsize, int ysize, void* image);
|
||||||
|
//-----------------------------------------------------------------------------------
|
||||||
|
|
||||||
|
//--------------------------write text(system fonts 6x9)-----------------------------
|
||||||
|
extern void stdcall _ksys_write_text(int x,int y,int color,char* text,int len);
|
||||||
|
//-----------------------------------------------------------------------------------
|
||||||
|
|
||||||
|
//------------------ get screen size and bytes per pixel---------------------------
|
||||||
|
extern int stdcall _ksys_get_screen_size(int* x,int* y);
|
||||||
|
extern void stdcall _ksys_dga_get_resolution(int* xres, int* yres, int* bpp, int* bpscan);
|
||||||
|
//-----------------------------------------------------------------------------------
|
||||||
|
|
||||||
|
//-------------------------------craete thread---------------------------------------
|
||||||
|
extern void* stdcall _ksys_start_thread(void (* func_ptr)(void),int stack_size,int* pid);
|
||||||
|
//-----------------------------------------------------------------------------------
|
||||||
|
|
||||||
|
//------------------system button(Old function. Better use libGUI functions.)--------
|
||||||
|
extern void stdcall _ksys_make_button(int x, int y, int xsize, int ysize, int id, int color);
|
||||||
|
extern int stdcall _ksys_get_button_id(void); //get state of system button
|
||||||
|
//------------------------------------------------------------------------------------
|
||||||
|
|
||||||
|
//----------------------system clock(in 1/100 sec.) and date--------------------------
|
||||||
|
extern int stdcall _ksys_get_system_clock(void);
|
||||||
|
extern int stdcall _ksys_get_date(void);
|
||||||
|
//------------------------------------------------------------------------------------
|
||||||
|
|
||||||
|
//-------------------------system delay(in 1/100 sec.)-------------------------------
|
||||||
|
extern void stdcall _ksys_delay(int m);
|
||||||
|
//-----------------------------------------------------------------------------------
|
||||||
|
|
||||||
|
//------------------------system events----------------------------------------------
|
||||||
|
extern int stdcall _ksys_wait_for_event_infinite(void);
|
||||||
|
extern int stdcall _ksys_check_for_event(void);
|
||||||
|
extern int stdcall _ksys_wait_for_event(int time);
|
||||||
|
extern void stdcall _ksys_set_wanted_events(int ev);
|
||||||
|
//-----------------------------------------------------------------------------------
|
||||||
|
|
||||||
|
//----------------------------system exit program------------------------------------
|
||||||
|
extern void stdcall _ksys_exit(void);
|
||||||
|
//-----------------------------------------------------------------------------------
|
||||||
|
|
||||||
|
//-----------------------------system IPC send message-------------------------------
|
||||||
|
extern void stdcall _ksys_send_message(int pid, void* msg, int size);
|
||||||
|
//-----------------------------------------------------------------------------------
|
||||||
|
|
||||||
|
//---------------------------system work with IRQ from user mode---------------------
|
||||||
|
extern void stdcall _ksys_define_receive_area(void* area, int size);
|
||||||
|
extern int stdcall _ksys_get_irq_owner(int irq);
|
||||||
|
extern int stdcall _ksys_get_data_read_by_irq(int irq, int* size, void* data);
|
||||||
|
extern int stdcall _ksys_send_data_to_device(int port, unsigned char val);
|
||||||
|
extern int stdcall _ksys_receive_data_from_device(int port,unsigned char* data);
|
||||||
|
extern void stdcall _ksys_program_irq(void* intrtable, int irq);
|
||||||
|
extern void stdcall _ksys_reserve_irq(int irq);
|
||||||
|
extern void stdcall _ksys_free_irq(int irq);
|
||||||
|
//----------------------------------------------------------------------------------
|
||||||
|
|
||||||
|
//----------------------------system reserve diapason of ports----------------------
|
||||||
|
extern int stdcall _ksys_reserve_port_area(int start,int end);
|
||||||
|
extern int stdcall _ksys_free_port_area(int start,int end);
|
||||||
|
//----------------------------------------------------------------------------------
|
||||||
|
|
||||||
|
//-------------functions get key and set keyboard mode------------------------------
|
||||||
|
extern int stdcall _ksys_get_key(void);
|
||||||
|
extern void stdcall _ksys_set_keyboard_mode(int mode);
|
||||||
|
//----------------------------------------------------------------------------------
|
||||||
|
|
||||||
|
//--------------simple work with MPU401 sound device---------------------------------
|
||||||
|
extern void stdcall _ksys_midi_reset(void);
|
||||||
|
extern void stdcall _ksys_midi_send(int data);
|
||||||
|
//-----------------------------------------------------------------------------------
|
||||||
|
|
||||||
|
//--------------------------acces to PCI BUS from user mode---------------------------
|
||||||
|
extern int stdcall _ksys_get_pci_version(void);
|
||||||
|
extern int stdcall _ksys_get_last_pci_bus(void);
|
||||||
|
extern int stdcall _ksys_get_pci_access_mechanism(void);
|
||||||
|
extern int stdcall _ksys_pci_read_config_byte(int bus,int dev,int fn,int reg);
|
||||||
|
extern int stdcall _ksys_pci_read_config_word(int bus,int dev,int fn,int reg);
|
||||||
|
extern int stdcall _ksys_pci_read_config_dword(int bus,int dev,int fn,int reg);
|
||||||
|
extern int stdcall _ksys_pci_write_config_byte(int bus,int dev,int fn,int reg,int value);
|
||||||
|
extern int stdcall _ksys_pci_write_config_word(int bus,int dev,int fn,int reg,int value);
|
||||||
|
extern int stdcall _ksys_pci_write_config_value(int bus,int dev,int fn,int reg,int value);
|
||||||
|
//--------------------------------------------------------------------------------------
|
||||||
|
|
||||||
|
//------------------------Process information--------------------------------------
|
||||||
|
extern int stdcall _ksys_get_process_table(struct process_table_entry *proctab,int pid); //if pid=-1 than get info about him.
|
||||||
|
//---------------------------------------------------------------------------------
|
||||||
|
|
||||||
|
//-----------------Old functions for work with sound(Sound Blaster only).---------
|
||||||
|
extern void stdcall _ksys_sound_load_block(void* blockptr);
|
||||||
|
extern void stdcall _ksys_sound_play_block(void);
|
||||||
|
extern void stdcall _ksys_sound_set_channels(int channels);
|
||||||
|
extern void stdcall _ksys_sound_set_data_size(int size);
|
||||||
|
extern void stdcall _ksys_sound_set_frequency(int frequency);
|
||||||
|
//--------------------------------------------------------------------------------
|
||||||
|
|
||||||
|
//------------------------------system speaker(integrated speaker)----------------
|
||||||
|
extern void stdcall _ksys_sound_speaker_play(void* data);
|
||||||
|
//--------------------------------------------------------------------------------
|
||||||
|
|
||||||
|
//------------------function for work with Dinamic Link Librarys(DLL)--------------
|
||||||
|
extern dword* stdcall _ksys_cofflib_load(char* name);
|
||||||
|
extern char* stdcall _ksys_cofflib_getproc(void* exp,char* sz_name);
|
||||||
|
//---------------------------------------------------------------------------------
|
||||||
|
|
||||||
|
#endif
|
||||||
69
programs/develop/sdk/trunk/libGUI_SDK/libGUI.c
Normal file
69
programs/develop/sdk/trunk/libGUI_SDK/libGUI.c
Normal file
@ -0,0 +1,69 @@
|
|||||||
|
|
||||||
|
#include "kolibrisys.h"
|
||||||
|
#include "libGUI.h"
|
||||||
|
|
||||||
|
char* sys_libGUI_path="/sys/lib/libGUI.obj";
|
||||||
|
|
||||||
|
void link_libGUI(char *exp){
|
||||||
|
|
||||||
|
char name_DestroyControl[]={"DestroyControl"};
|
||||||
|
char name_SendMessage[]={"SendMessage"};
|
||||||
|
char name_Version[]={"Version"};
|
||||||
|
char name_ResizeComponent[]={"ResizeComponent"};
|
||||||
|
char name_MoveComponent[]={"MoveComponent"};
|
||||||
|
char name_ActivateTrapForSpecializedMessage[]={"ActivateTrapForSpecializedMessage"};
|
||||||
|
char name_CraeteButton[]={"CraeteButton"};
|
||||||
|
char name_CraeteScroller[]={"CraeteScroller"};
|
||||||
|
char name_CraeteBookmark[]={"CraeteBookmark"};
|
||||||
|
char name_CraeteImage[]={"CraeteImage"};
|
||||||
|
char name_CraeteText[]={"CraeteText"};
|
||||||
|
char name_CraeteNumber[]={"CraeteNumber"};
|
||||||
|
char name_CraeteCheckbox[]={"CraeteCheckbox"};
|
||||||
|
char name_CraeteEditbox[]={"CraeteEditbox"};
|
||||||
|
char name_CraeteProgressbar[]={"CraeteProgressbar"};
|
||||||
|
|
||||||
|
DestroyControl=(void stdcall (*)(void *control))
|
||||||
|
_ksys_cofflib_getproc(exp,name_DestroyControl);
|
||||||
|
SendMessage=(void stdcall (*)(struct HEADER *Parend,struct MESSAGE *Message))
|
||||||
|
_ksys_cofflib_getproc(exp,name_SendMessage);
|
||||||
|
Version=(int stdcall (*)(void))
|
||||||
|
_ksys_cofflib_getproc(exp,name_Version);
|
||||||
|
ResizeComponent=(void stdcall(*)(void *Control,int new_sizex,int new_sizey))
|
||||||
|
_ksys_cofflib_getproc(exp,name_ResizeComponent);
|
||||||
|
MoveComponent=(void stdcall(*)(void *Control,int new_x,int new_y))
|
||||||
|
_ksys_cofflib_getproc(exp,name_MoveComponent);
|
||||||
|
ActivateTrapForSpecializedMessage=(void stdcall(*)(void *Control,int new_x,int new_y))
|
||||||
|
_ksys_cofflib_getproc(exp,name_ActivateTrapForSpecializedMessage);
|
||||||
|
CraeteButton=(void* stdcall (*)(struct HEADER *Parend,void *Control))
|
||||||
|
_ksys_cofflib_getproc(exp,name_CraeteButton);
|
||||||
|
CraeteScroller=(void* stdcall (*)(struct HEADER *Parend,void *Control))
|
||||||
|
_ksys_cofflib_getproc(exp,name_CraeteScroller);
|
||||||
|
CraeteBookmark=(void* stdcall (*)(struct HEADER *Parend,void *Control))
|
||||||
|
_ksys_cofflib_getproc(exp,name_CraeteBookmark);
|
||||||
|
CraeteImage=(void* stdcall (*)(struct HEADER *Parend,void *Control))
|
||||||
|
_ksys_cofflib_getproc(exp,name_CraeteImage);
|
||||||
|
CraeteText=(void* stdcall (*)(struct HEADER *Parend,void *Control))
|
||||||
|
_ksys_cofflib_getproc(exp,name_CraeteText);
|
||||||
|
CraeteNumber=(void* stdcall (*)(struct HEADER *Parend,void *Control))
|
||||||
|
_ksys_cofflib_getproc(exp,name_CraeteNumber);
|
||||||
|
CraeteCheckbox=(void* stdcall (*)(struct HEADER *Parend,void *Control))
|
||||||
|
_ksys_cofflib_getproc(exp,name_CraeteCheckbox);
|
||||||
|
CraeteEditbox=(void* stdcall (*)(struct HEADER *Parend,void *Control))
|
||||||
|
_ksys_cofflib_getproc(exp,name_CraeteEditbox);
|
||||||
|
CraeteProgressbar=(void* stdcall (*)(struct HEADER *Parend,void *Control))
|
||||||
|
_ksys_cofflib_getproc(exp,name_CraeteProgressbar);
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
|
int Init_libGUI(void)
|
||||||
|
{
|
||||||
|
char *Export;
|
||||||
|
|
||||||
|
Export=(char *)_ksys_cofflib_load(sys_libGUI_path);
|
||||||
|
if (Export==0) return CANNOT_LOAD_LIBGUI;
|
||||||
|
|
||||||
|
link_libGUI(Export);
|
||||||
|
return(0);
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
369
programs/develop/sdk/trunk/libGUI_SDK/libGUI.h
Normal file
369
programs/develop/sdk/trunk/libGUI_SDK/libGUI.h
Normal file
@ -0,0 +1,369 @@
|
|||||||
|
/*
|
||||||
|
structures for work with libGUI
|
||||||
|
*/
|
||||||
|
|
||||||
|
/////////////////////////////////////////////////////////////////
|
||||||
|
|
||||||
|
#define CANNOT_LOAD_LIBGUI 100
|
||||||
|
#define PAREND_SIZE 44
|
||||||
|
#define MESSAGE_SIZE 16
|
||||||
|
|
||||||
|
#define MESSAGE_FULL_REDRAW_ALL 1
|
||||||
|
#define MESSAGE_KEYS_EVENTS 2
|
||||||
|
#define MESSAGE_SPECIALIZED 3
|
||||||
|
#define MESSAGE_MOUSE_EVENTS 6
|
||||||
|
|
||||||
|
#define BUTTON_TYPE_2D_WITH_TEXT (1+128)
|
||||||
|
#define BUTTON_TYPE_2D_WITH_PICTURE (2+128)
|
||||||
|
#define BUTTON_TYPE_2D_WITH_TEXT_PICTURE (4+128)
|
||||||
|
#define BUTTON_TYPE_NO_DRAW (8+128)
|
||||||
|
#define BUTTON_TYPE_3D_WITH_TEXT (1+16+128)
|
||||||
|
#define BUTTON_TYPE_3D_WITH_PICTURE (2+16+128)
|
||||||
|
#define BUTTON_TYPE_3D_WITH_TEXT_PICTURE (4+16+128)
|
||||||
|
|
||||||
|
#define TEXT_TYPE_NO_DRAW (1)
|
||||||
|
#define TEXT_TYPE_WITH_BACKGROUND (128+2)
|
||||||
|
#define TEXT_TYPE_SYSTEM_6X9 (128)
|
||||||
|
|
||||||
|
#define NUMBER_NO_DRAW (1)
|
||||||
|
#define NUMBER_INTEGER (128)
|
||||||
|
#define NUMBER_FLOAT (128+2)
|
||||||
|
|
||||||
|
#define IMAGE_TYPE_1 (128)
|
||||||
|
|
||||||
|
#define PROGRESS_BAR_TYPE_1 (128)
|
||||||
|
|
||||||
|
#define BOOKMARK_TYPE_1 (128)
|
||||||
|
|
||||||
|
///////////////////////////////////////////////////////////////////
|
||||||
|
#define BUTTON_STATE_CROSS (1)
|
||||||
|
#define BUTTON_STATE_CROSS_PRESS (3)
|
||||||
|
|
||||||
|
|
||||||
|
////////////////////////////////////////////////////////////////
|
||||||
|
// header of control
|
||||||
|
////////////////////////////////////////////////////////////////
|
||||||
|
|
||||||
|
struct HEADER
|
||||||
|
{
|
||||||
|
dword ctrl_proc;
|
||||||
|
dword *ctrl_fd;
|
||||||
|
dword *ctrl_bk;
|
||||||
|
dword *child_fd;
|
||||||
|
dword *child_bk;
|
||||||
|
dword *parend;
|
||||||
|
dword ctrl_x;
|
||||||
|
dword ctrl_y;
|
||||||
|
dword ctrl_sizex;
|
||||||
|
dword ctrl_sizey;
|
||||||
|
dword ctrl_ID;
|
||||||
|
|
||||||
|
}__attribute__((packed));
|
||||||
|
|
||||||
|
////////////////////////////////////////////////////////////////
|
||||||
|
// message
|
||||||
|
////////////////////////////////////////////////////////////////
|
||||||
|
|
||||||
|
struct MESSAGE
|
||||||
|
{
|
||||||
|
dword type;
|
||||||
|
dword arg1;
|
||||||
|
dword arg2;
|
||||||
|
dword arg3;
|
||||||
|
}__attribute__((packed));
|
||||||
|
|
||||||
|
////////////////////////////////////////////////////////////////
|
||||||
|
// button
|
||||||
|
////////////////////////////////////////////////////////////////
|
||||||
|
|
||||||
|
struct ControlButton
|
||||||
|
{
|
||||||
|
dword ctrl_proc;
|
||||||
|
dword *ctrl_fd;
|
||||||
|
dword *ctrl_bk;
|
||||||
|
dword *child_fd;
|
||||||
|
dword *child_bk;
|
||||||
|
dword *parend;
|
||||||
|
dword ctrl_x;
|
||||||
|
dword ctrl_y;
|
||||||
|
dword ctrl_sizex;
|
||||||
|
dword ctrl_sizey;
|
||||||
|
dword ctrl_ID;
|
||||||
|
|
||||||
|
byte type;
|
||||||
|
byte flag;
|
||||||
|
word x;
|
||||||
|
word y;
|
||||||
|
word width;
|
||||||
|
word height;
|
||||||
|
dword image;
|
||||||
|
word imageX;
|
||||||
|
word imageY;
|
||||||
|
word imageSizeX;
|
||||||
|
word imageSizeY;
|
||||||
|
dword transparentColor;
|
||||||
|
dword text;
|
||||||
|
word textX;
|
||||||
|
word textY;
|
||||||
|
dword textcolor;
|
||||||
|
dword color1;
|
||||||
|
dword color2;
|
||||||
|
word mouseX;
|
||||||
|
word mouseY;
|
||||||
|
}__attribute__((packed));
|
||||||
|
|
||||||
|
typedef struct InfoForButton
|
||||||
|
{
|
||||||
|
byte type; //0
|
||||||
|
byte flag; //1
|
||||||
|
word x; //2
|
||||||
|
word y; //4
|
||||||
|
word width; //6
|
||||||
|
word height; //8
|
||||||
|
dword image; //10
|
||||||
|
word imageX; //14
|
||||||
|
word imageY; //16
|
||||||
|
word imageSizeX; //18
|
||||||
|
word imageSizeY; //20
|
||||||
|
dword transparentColor;//24
|
||||||
|
dword text; //28
|
||||||
|
word textX; //32
|
||||||
|
word textY; //34
|
||||||
|
dword textcolor; //36
|
||||||
|
dword color1; //40
|
||||||
|
dword color2;
|
||||||
|
word mouseX;
|
||||||
|
word mouseY;
|
||||||
|
}__attribute__((packed));
|
||||||
|
|
||||||
|
////////////////////////////////////////////////////////////////
|
||||||
|
// scroller
|
||||||
|
////////////////////////////////////////////////////////////////
|
||||||
|
|
||||||
|
struct ControlScroller
|
||||||
|
{
|
||||||
|
dword ctrl_proc;
|
||||||
|
dword *ctrl_fd;
|
||||||
|
dword *ctrl_bk;
|
||||||
|
dword *child_fd;
|
||||||
|
dword *child_bk;
|
||||||
|
dword *parend;
|
||||||
|
dword ctrl_x;
|
||||||
|
dword ctrl_y;
|
||||||
|
dword ctrl_sizex;
|
||||||
|
dword ctrl_sizey;
|
||||||
|
dword ctrl_ID;
|
||||||
|
|
||||||
|
byte type;
|
||||||
|
word x;
|
||||||
|
word y;
|
||||||
|
word length;
|
||||||
|
dword color1;
|
||||||
|
float size;
|
||||||
|
float pos;
|
||||||
|
word buttons_flags;
|
||||||
|
dword ChildButton1;
|
||||||
|
dword ChildButton2;
|
||||||
|
word MouseX;
|
||||||
|
word MouseY;
|
||||||
|
}__attribute__((packed));
|
||||||
|
|
||||||
|
struct InfoForScroller
|
||||||
|
{
|
||||||
|
byte type;
|
||||||
|
word x;
|
||||||
|
word y;
|
||||||
|
word length;
|
||||||
|
dword color1;
|
||||||
|
float size;
|
||||||
|
float pos;
|
||||||
|
word buttons_flags;
|
||||||
|
dword ChildButton1;
|
||||||
|
dword ChildButton2;
|
||||||
|
word MouseX;
|
||||||
|
word MouseY;
|
||||||
|
}__attribute__((packed));
|
||||||
|
|
||||||
|
////////////////////////////////////////////////////////////////
|
||||||
|
// progressbar
|
||||||
|
////////////////////////////////////////////////////////////////
|
||||||
|
|
||||||
|
struct ControlProgressbar
|
||||||
|
{
|
||||||
|
dword ctrl_proc;
|
||||||
|
dword *ctrl_fd;
|
||||||
|
dword *ctrl_bk;
|
||||||
|
dword *child_fd;
|
||||||
|
dword *child_bk;
|
||||||
|
dword *parend;
|
||||||
|
dword ctrl_x;
|
||||||
|
dword ctrl_y;
|
||||||
|
dword ctrl_sizex;
|
||||||
|
dword ctrl_sizey;
|
||||||
|
dword ctrl_ID;
|
||||||
|
|
||||||
|
byte type;
|
||||||
|
byte flag;
|
||||||
|
dword color1;
|
||||||
|
dword color2;
|
||||||
|
dword x;
|
||||||
|
dword y;
|
||||||
|
dword sizex;
|
||||||
|
dword sizey;
|
||||||
|
float progress;
|
||||||
|
dword color3;
|
||||||
|
}__attribute__((packed));
|
||||||
|
|
||||||
|
struct InfoForProgressbar
|
||||||
|
{
|
||||||
|
byte type;
|
||||||
|
byte flag;
|
||||||
|
dword color1;
|
||||||
|
dword color2;
|
||||||
|
dword x;
|
||||||
|
dword y;
|
||||||
|
dword sizex;
|
||||||
|
dword sizey;
|
||||||
|
float progress;
|
||||||
|
dword color3;
|
||||||
|
}__attribute__((packed));
|
||||||
|
|
||||||
|
////////////////////////////////////////////////////////////////
|
||||||
|
// image
|
||||||
|
////////////////////////////////////////////////////////////////
|
||||||
|
|
||||||
|
struct ControlImage
|
||||||
|
{
|
||||||
|
dword ctrl_proc;
|
||||||
|
dword *ctrl_fd;
|
||||||
|
dword *ctrl_bk;
|
||||||
|
dword *child_fd;
|
||||||
|
dword *child_bk;
|
||||||
|
dword *parend;
|
||||||
|
dword ctrl_x;
|
||||||
|
dword ctrl_y;
|
||||||
|
dword ctrl_sizex;
|
||||||
|
dword ctrl_sizey;
|
||||||
|
dword ctrl_ID;
|
||||||
|
|
||||||
|
byte type;
|
||||||
|
byte flag;
|
||||||
|
dword color1;
|
||||||
|
dword x;
|
||||||
|
dword y;
|
||||||
|
dword sizex;
|
||||||
|
dword sizey;
|
||||||
|
dword pointer;
|
||||||
|
}__attribute__((packed));
|
||||||
|
|
||||||
|
struct InfoForImage
|
||||||
|
{
|
||||||
|
byte type;
|
||||||
|
byte flag;
|
||||||
|
dword color1;
|
||||||
|
dword x;
|
||||||
|
dword y;
|
||||||
|
dword sizex;
|
||||||
|
dword sizey;
|
||||||
|
dword pointer;
|
||||||
|
}__attribute__((packed));
|
||||||
|
|
||||||
|
////////////////////////////////////////////////////////////////
|
||||||
|
// text
|
||||||
|
////////////////////////////////////////////////////////////////
|
||||||
|
|
||||||
|
struct ControlText
|
||||||
|
{
|
||||||
|
dword ctrl_proc;
|
||||||
|
dword *ctrl_fd;
|
||||||
|
dword *ctrl_bk;
|
||||||
|
dword *child_fd;
|
||||||
|
dword *child_bk;
|
||||||
|
dword *parend;
|
||||||
|
dword ctrl_x;
|
||||||
|
dword ctrl_y;
|
||||||
|
dword ctrl_sizex;
|
||||||
|
dword ctrl_sizey;
|
||||||
|
dword ctrl_ID;
|
||||||
|
|
||||||
|
byte type;
|
||||||
|
byte flag;
|
||||||
|
dword color1;
|
||||||
|
dword x;
|
||||||
|
dword y;
|
||||||
|
dword length;
|
||||||
|
dword text;
|
||||||
|
dword background_color;
|
||||||
|
}__attribute__((packed));
|
||||||
|
|
||||||
|
struct InfoForText
|
||||||
|
{
|
||||||
|
byte type;
|
||||||
|
byte flag;
|
||||||
|
dword color1;
|
||||||
|
dword x;
|
||||||
|
dword y;
|
||||||
|
dword length;
|
||||||
|
dword text;
|
||||||
|
dword background_color;
|
||||||
|
}__attribute__((packed));
|
||||||
|
|
||||||
|
////////////////////////////////////////////////////////////////
|
||||||
|
// number
|
||||||
|
////////////////////////////////////////////////////////////////
|
||||||
|
|
||||||
|
struct ControlNumber
|
||||||
|
{
|
||||||
|
dword ctrl_proc;
|
||||||
|
dword *ctrl_fd;
|
||||||
|
dword *ctrl_bk;
|
||||||
|
dword *child_fd;
|
||||||
|
dword *child_bk;
|
||||||
|
dword *parend;
|
||||||
|
dword ctrl_x;
|
||||||
|
dword ctrl_y;
|
||||||
|
dword ctrl_sizex;
|
||||||
|
dword ctrl_sizey;
|
||||||
|
dword ctrl_ID;
|
||||||
|
|
||||||
|
byte type;
|
||||||
|
byte flag;
|
||||||
|
dword color1;
|
||||||
|
dword x;
|
||||||
|
dword y;
|
||||||
|
float number;
|
||||||
|
dword format;
|
||||||
|
}__attribute__((packed));
|
||||||
|
|
||||||
|
struct InfoForNumber
|
||||||
|
{
|
||||||
|
byte type;
|
||||||
|
byte flag;
|
||||||
|
dword color1;
|
||||||
|
dword x;
|
||||||
|
dword y;
|
||||||
|
float number;
|
||||||
|
dword format;
|
||||||
|
}__attribute__((packed));
|
||||||
|
|
||||||
|
|
||||||
|
/////////////////////////////////////////////////////////////////
|
||||||
|
// libGUI functions
|
||||||
|
/////////////////////////////////////////////////////////////////
|
||||||
|
|
||||||
|
void stdcall (*DestroyControl)(void *control);
|
||||||
|
void stdcall (*SendMessage)(struct HEADER *Parend,struct MESSAGE *Message);
|
||||||
|
int stdcall (*Version)(void);
|
||||||
|
void stdcall (*ResizeComponent)(void *Control,int new_sizex,int new_sizey);
|
||||||
|
void stdcall (*MoveComponent)(void *Control,int new_x,int new_y);
|
||||||
|
void stdcall (*ActivateTrapForSpecializedMessage)(void *Control);
|
||||||
|
void* stdcall (*CraeteButton)(struct HEADER *Parend,void *Control);
|
||||||
|
void* stdcall (*CraeteScroller)(struct HEADER *Parend,void *Control);
|
||||||
|
void* stdcall (*CraeteBookmark)(struct HEADER *Parend,void *Control);
|
||||||
|
void* stdcall (*CraeteImage)(struct HEADER *Parend,void *Control);
|
||||||
|
void* stdcall (*CraeteText)(struct HEADER *Parend,void *Control);
|
||||||
|
void* stdcall (*CraeteNumber)(struct HEADER *Parend,void *Control);
|
||||||
|
void* stdcall (*CraeteCheckbox)(struct HEADER *Parend,void *Control);
|
||||||
|
void* stdcall (*CraeteEditbox)(struct HEADER *Parend,void *Control);
|
||||||
|
void* stdcall (*CraeteProgressbar)(struct HEADER *Parend,void *Control);
|
||||||
|
|
||||||
268
programs/develop/sdk/trunk/libGUI_SDK/proc32.inc
Normal file
268
programs/develop/sdk/trunk/libGUI_SDK/proc32.inc
Normal file
@ -0,0 +1,268 @@
|
|||||||
|
|
||||||
|
; Macroinstructions for defining and calling procedures
|
||||||
|
|
||||||
|
macro stdcall proc,[arg] ; directly call STDCALL procedure
|
||||||
|
{ common
|
||||||
|
if ~ arg eq
|
||||||
|
reverse
|
||||||
|
pushd arg
|
||||||
|
common
|
||||||
|
end if
|
||||||
|
call proc }
|
||||||
|
|
||||||
|
macro invoke proc,[arg] ; indirectly call STDCALL procedure
|
||||||
|
{ common
|
||||||
|
if ~ arg eq
|
||||||
|
reverse
|
||||||
|
pushd arg
|
||||||
|
common
|
||||||
|
end if
|
||||||
|
call [proc] }
|
||||||
|
|
||||||
|
macro ccall proc,[arg] ; directly call CDECL procedure
|
||||||
|
{ common
|
||||||
|
size@ccall = 0
|
||||||
|
if ~ arg eq
|
||||||
|
reverse
|
||||||
|
pushd arg
|
||||||
|
size@ccall = size@ccall+4
|
||||||
|
common
|
||||||
|
end if
|
||||||
|
call proc
|
||||||
|
if size@ccall
|
||||||
|
add esp,size@ccall
|
||||||
|
end if }
|
||||||
|
|
||||||
|
macro cinvoke proc,[arg] ; indirectly call CDECL procedure
|
||||||
|
{ common
|
||||||
|
size@ccall = 0
|
||||||
|
if ~ arg eq
|
||||||
|
reverse
|
||||||
|
pushd arg
|
||||||
|
size@ccall = size@ccall+4
|
||||||
|
common
|
||||||
|
end if
|
||||||
|
call [proc]
|
||||||
|
if size@ccall
|
||||||
|
add esp,size@ccall
|
||||||
|
end if }
|
||||||
|
|
||||||
|
macro proc [args] ; define procedure
|
||||||
|
{ common
|
||||||
|
match name params, args>
|
||||||
|
\{ define@proc name,<params \} }
|
||||||
|
|
||||||
|
prologue@proc equ prologuedef
|
||||||
|
|
||||||
|
macro prologuedef procname,flag,parmbytes,localbytes,reglist
|
||||||
|
{ if parmbytes | localbytes
|
||||||
|
push ebp
|
||||||
|
mov ebp,esp
|
||||||
|
if localbytes
|
||||||
|
sub esp,localbytes
|
||||||
|
end if
|
||||||
|
end if
|
||||||
|
irps reg, reglist \{ push reg \} }
|
||||||
|
|
||||||
|
epilogue@proc equ epiloguedef
|
||||||
|
|
||||||
|
macro epiloguedef procname,flag,parmbytes,localbytes,reglist
|
||||||
|
{ irps reg, reglist \{ reverse pop reg \}
|
||||||
|
if parmbytes | localbytes
|
||||||
|
leave
|
||||||
|
end if
|
||||||
|
if (flag and 10000b) | (parmbytes=0)
|
||||||
|
retn
|
||||||
|
else
|
||||||
|
retn parmbytes
|
||||||
|
end if }
|
||||||
|
|
||||||
|
macro define@proc name,statement
|
||||||
|
{ local params,flag,regs,parmbytes,localbytes,current
|
||||||
|
if used name
|
||||||
|
name:
|
||||||
|
match =stdcall args, statement \{ params equ args
|
||||||
|
flag = 11b \}
|
||||||
|
match =stdcall, statement \{ params equ
|
||||||
|
flag = 11b \}
|
||||||
|
match =c args, statement \{ params equ args
|
||||||
|
flag = 10001b \}
|
||||||
|
match =c, statement \{ params equ
|
||||||
|
flag = 10001b \}
|
||||||
|
match =params, params \{ params equ statement
|
||||||
|
flag = 0 \}
|
||||||
|
virtual at ebp+8
|
||||||
|
match =uses reglist=,args, params \{ regs equ reglist
|
||||||
|
params equ args \}
|
||||||
|
match =regs =uses reglist, regs params \{ regs equ reglist
|
||||||
|
params equ \}
|
||||||
|
match =regs, regs \{ regs equ \}
|
||||||
|
match =,args, params \{ defargs@proc args \}
|
||||||
|
match =args@proc args, args@proc params \{ defargs@proc args \}
|
||||||
|
parmbytes = $ - (ebp+8)
|
||||||
|
end virtual
|
||||||
|
name # % = parmbytes/4
|
||||||
|
all@vars equ
|
||||||
|
current = 0
|
||||||
|
match prologue:reglist, prologue@proc:<regs> \{ prologue name,flag,parmbytes,localbytes,reglist \}
|
||||||
|
macro locals
|
||||||
|
\{ virtual at ebp-localbytes+current
|
||||||
|
macro label . \\{ deflocal@proc .,:, \\}
|
||||||
|
struc db [val] \\{ \common deflocal@proc .,db,val \\}
|
||||||
|
struc dw [val] \\{ \common deflocal@proc .,dw,val \\}
|
||||||
|
struc dp [val] \\{ \common deflocal@proc .,dp,val \\}
|
||||||
|
struc dd [val] \\{ \common deflocal@proc .,dd,val \\}
|
||||||
|
struc dt [val] \\{ \common deflocal@proc .,dt,val \\}
|
||||||
|
struc dq [val] \\{ \common deflocal@proc .,dq,val \\}
|
||||||
|
struc rb cnt \\{ deflocal@proc .,rb cnt, \\}
|
||||||
|
struc rw cnt \\{ deflocal@proc .,rw cnt, \\}
|
||||||
|
struc rp cnt \\{ deflocal@proc .,rp cnt, \\}
|
||||||
|
struc rd cnt \\{ deflocal@proc .,rd cnt, \\}
|
||||||
|
struc rt cnt \\{ deflocal@proc .,rt cnt, \\}
|
||||||
|
struc rq cnt \\{ deflocal@proc .,rq cnt, \\} \}
|
||||||
|
macro endl
|
||||||
|
\{ purge label
|
||||||
|
restruc db,dw,dp,dd,dt,dq
|
||||||
|
restruc rb,rw,rp,rd,rt,rq
|
||||||
|
restruc byte,word,dword,pword,tword,qword
|
||||||
|
current = $-(ebp-localbytes)
|
||||||
|
end virtual \}
|
||||||
|
macro ret operand
|
||||||
|
\{ match any, operand \\{ retn operand \\}
|
||||||
|
match , operand \\{ match epilogue:reglist, epilogue@proc:<regs>
|
||||||
|
\\\{ epilogue name,flag,parmbytes,localbytes,reglist \\\} \\} \}
|
||||||
|
macro finish@proc \{ localbytes = (((current-1) shr 2)+1) shl 2
|
||||||
|
end if \} }
|
||||||
|
|
||||||
|
macro defargs@proc [arg]
|
||||||
|
{ common
|
||||||
|
if ~ arg eq
|
||||||
|
forward
|
||||||
|
local ..arg,current@arg
|
||||||
|
match argname:type, arg
|
||||||
|
\{ current@arg equ argname
|
||||||
|
label ..arg type
|
||||||
|
argname equ ..arg
|
||||||
|
if dqword eq type
|
||||||
|
dd ?,?,?,?
|
||||||
|
else if tbyte eq type
|
||||||
|
dd ?,?,?
|
||||||
|
else if qword eq type | pword eq type
|
||||||
|
dd ?,?
|
||||||
|
else
|
||||||
|
dd ?
|
||||||
|
end if \}
|
||||||
|
match =current@arg,current@arg
|
||||||
|
\{ current@arg equ arg
|
||||||
|
arg equ ..arg
|
||||||
|
..arg dd ? \}
|
||||||
|
common
|
||||||
|
args@proc equ current@arg
|
||||||
|
forward
|
||||||
|
restore current@arg
|
||||||
|
common
|
||||||
|
end if }
|
||||||
|
|
||||||
|
macro deflocal@proc name,def,[val]
|
||||||
|
{ common
|
||||||
|
match vars, all@vars \{ all@vars equ all@vars, \}
|
||||||
|
all@vars equ all@vars name
|
||||||
|
forward
|
||||||
|
local ..var,..tmp
|
||||||
|
..var def val
|
||||||
|
match =?, val \{ ..tmp equ \}
|
||||||
|
match any =dup (=?), val \{ ..tmp equ \}
|
||||||
|
match tmp : value, ..tmp : val
|
||||||
|
\{ tmp: end virtual
|
||||||
|
initlocal@proc ..var,def value
|
||||||
|
virtual at tmp\}
|
||||||
|
common
|
||||||
|
match first rest, ..var, \{ name equ first \} }
|
||||||
|
|
||||||
|
macro initlocal@proc name,def
|
||||||
|
{ virtual at name
|
||||||
|
def
|
||||||
|
size@initlocal = $ - name
|
||||||
|
end virtual
|
||||||
|
position@initlocal = 0
|
||||||
|
while size@initlocal > position@initlocal
|
||||||
|
virtual at name
|
||||||
|
def
|
||||||
|
if size@initlocal - position@initlocal < 2
|
||||||
|
current@initlocal = 1
|
||||||
|
load byte@initlocal byte from name+position@initlocal
|
||||||
|
else if size@initlocal - position@initlocal < 4
|
||||||
|
current@initlocal = 2
|
||||||
|
load word@initlocal word from name+position@initlocal
|
||||||
|
else
|
||||||
|
current@initlocal = 4
|
||||||
|
load dword@initlocal dword from name+position@initlocal
|
||||||
|
end if
|
||||||
|
end virtual
|
||||||
|
if current@initlocal = 1
|
||||||
|
mov byte [name+position@initlocal],byte@initlocal
|
||||||
|
else if current@initlocal = 2
|
||||||
|
mov word [name+position@initlocal],word@initlocal
|
||||||
|
else
|
||||||
|
mov dword [name+position@initlocal],dword@initlocal
|
||||||
|
end if
|
||||||
|
position@initlocal = position@initlocal + current@initlocal
|
||||||
|
end while }
|
||||||
|
|
||||||
|
macro endp
|
||||||
|
{ purge ret,locals,endl
|
||||||
|
finish@proc
|
||||||
|
purge finish@proc
|
||||||
|
restore regs@proc
|
||||||
|
match all,args@proc \{ restore all \}
|
||||||
|
restore args@proc
|
||||||
|
match all,all@vars \{ restore all \} }
|
||||||
|
|
||||||
|
macro local [var]
|
||||||
|
{ common
|
||||||
|
locals
|
||||||
|
forward done@local equ
|
||||||
|
match varname[count]:vartype, var
|
||||||
|
\{ match =BYTE, vartype \\{ varname rb count
|
||||||
|
restore done@local \\}
|
||||||
|
match =WORD, vartype \\{ varname rw count
|
||||||
|
restore done@local \\}
|
||||||
|
match =DWORD, vartype \\{ varname rd count
|
||||||
|
restore done@local \\}
|
||||||
|
match =PWORD, vartype \\{ varname rp count
|
||||||
|
restore done@local \\}
|
||||||
|
match =QWORD, vartype \\{ varname rq count
|
||||||
|
restore done@local \\}
|
||||||
|
match =TBYTE, vartype \\{ varname rt count
|
||||||
|
restore done@local \\}
|
||||||
|
match =DQWORD, vartype \\{ label varname dqword
|
||||||
|
rq count+count
|
||||||
|
restore done@local \\}
|
||||||
|
match , done@local \\{ virtual
|
||||||
|
varname vartype
|
||||||
|
end virtual
|
||||||
|
rb count*sizeof.\#vartype
|
||||||
|
restore done@local \\} \}
|
||||||
|
match :varname:vartype, done@local:var
|
||||||
|
\{ match =BYTE, vartype \\{ varname db ?
|
||||||
|
restore done@local \\}
|
||||||
|
match =WORD, vartype \\{ varname dw ?
|
||||||
|
restore done@local \\}
|
||||||
|
match =DWORD, vartype \\{ varname dd ?
|
||||||
|
restore done@local \\}
|
||||||
|
match =PWORD, vartype \\{ varname dp ?
|
||||||
|
restore done@local \\}
|
||||||
|
match =QWORD, vartype \\{ varname dq ?
|
||||||
|
restore done@local \\}
|
||||||
|
match =TBYTE, vartype \\{ varname dt ?
|
||||||
|
restore done@local \\}
|
||||||
|
match =DQWORD, vartype \\{ label varname dqword
|
||||||
|
dq ?,?
|
||||||
|
restore done@local \\}
|
||||||
|
match , done@local \\{ varname vartype
|
||||||
|
restore done@local \\} \}
|
||||||
|
match ,done@local
|
||||||
|
\{ var
|
||||||
|
restore done@local \}
|
||||||
|
common
|
||||||
|
endl }
|
||||||
Loading…
Reference in New Issue
Block a user