WebSVN – Kolibri OS – Diff – /programs/cmm/Calypte/Calypte.c

 #ifndef AUTOBUILD
 	#include "lang.h--"
 #endif
 #define MEMSIZE 0x100000
 #include "..\lib\kolibri.h"
 #include "..\lib\strings.h"
 #include "..\lib\mem.h"
 #include "..\lib\file_system.h"
 #include "..\lib\dll.h"
 #include "..\lib\gui.h"
+#include "..\lib\list_box.h"
 #include "..\lib\obj\box_lib.h"
 #include "..\lib\obj\proc_lib.h"
 #include "..\lib\obj\libio_lib.h"
 #ifdef LANG_RUS
 	?define T_FILE " ©«"
 	?define T_TYPE "¨¯"
 	?define T_SIZE " §¬¥à"
 	?define MENU1 " ©«"
 	?define MENU1_SUBMENU1 "âªàëâì"
 	?define MENU1_SUBMENU2 " ªàëâì"
 	?define MENU1_SUBMENU3 "¢®©áâ¢ "
 	?define MENU1_SUBMENU4 "ëå®¤"
 	?define ERROR_LOAD_BOX_LIB "è¨¡ª  ¯à¨ § £àã§ª¥ ¡¨¡«¨®â¥ª¨ - box_lib.obj"
 	?define ERROR_LOAD_LIBIO "è¨¡ª  ¯à¨ § £àã§ª¥ ¡¨¡«¨®â¥ª¨ - libio.obj"
 	?define ERROR_LOAD_PROC_LIB "è¨¡ª  ¯à¨ § £àã§ª¥ ¡¨¡«¨®â¥ª¨ - proc_lib.obj"
 #else
 	?define T_FILE "File"
 	?define T_TYPE "Type"
 	?define T_SIZE "Size"
 	?define MENU1 "File"
 	?define MENU1_SUBMENU1 "Open"
 	?define MENU1_SUBMENU2 "Close"
 	?define MENU1_SUBMENU3 "Properties"
 	?define MENU1_SUBMENU4 "Exit"
 	?define ERROR_LOAD_BOX_LIB "Error while loading library - box_lib.obj"
 	?define ERROR_LOAD_LIBIO "Error while loading library - libio.obj"
 	?define ERROR_LOAD_PROC_LIB "Error while loading library - proc_lib.obj"
 #endif
 #ifdef LANG_RUS
 struct menu_text_struct
+{
 	char menu[5];
 	char sub_menu1[8];
 	char sub_menu2[8];
 	//char sub_menu3[9];
 	char sub_menu4[6];
 	byte end;
 };
 #else
 struct menu_text_struct
+{
 	char menu[5];
 	char sub_menu1[5];
 	char sub_menu2[6];
 	//char sub_menu3[11];
 	char sub_menu4[5];
 	byte end;
 };
 #endif
-#define TITLE "Calypte v0.11"
 #define TOPPANELH 19
 #define BOTPANELH 10
 #define WIN_W 600
 #define WIN_H 400
+#define TITLE "Calypte v0.12"
 char win_title[4096] = TITLE;
 proc_info Form;
+system_colors sc;
+dword old_width,old_height;
-system_colors sc;
+llist tview;
 byte active_properties = 0;
 dword properties_window;
 #include "include\gui.h"
 #include "include\properties.h"
+// #include "include\top_menu.h"
+// #include "include\open_dial.h"
 struct filter
+{
 	dword size;
 	char ext1[4];
 	//char ext2[4];
 	//char ext3[4];
 	//char ext4[4];
 	byte end;
 };
 filter filter2;
 menu_text_struct menu_text_area1;
-char win_title[4096] = "Calypte v0.11";
-int
-	cur_row=0,
-	read=0,
-	pos=0,
-	row_num=0,
-	col_count=0,
-	row_count=0;
 int read=0;
 dword old_width,old_height;
 proc_info pr_inf;
 char communication_area_name[] = "FFFFFFFF_open_dialog";
 byte plugin_path[4096];
 char default_dir[] = "/rd/1";
 char open_dialog_path[] = "/rd/1/File managers/opendial"; //opendial
 byte openfile_path[2048];
 byte filename_area[4096];
 opendialog o_dialog = {0, #pr_inf, #communication_area_name, 0, #plugin_path, #default_dir, #open_dialog_path, #draw_window, 0, #openfile_path, #filename_area, #filter2, 420, 200, 320, 120};
 dword bufpointer;
 dword bufsize;
 dword draw_sruct;
 menu_data menudata1 = {0, 40, 2, 15, 2, #menu_text_area1.menu, #menu_text_area1.sub_menu1, #menu_text_area1.end, 0, 0, 80, 2, 100, 18, 0xEEEEEE, 0xFF, 0xEEEEEE, 0, 0, 0, #Form, 0, 0, 0, 16, 0, 0, 0x00CC00, 0, 0xFFFFFF, 0, 8, 0, 0};
 void main()
+{
 	int id, key;
+	mouse m;
 	strcpy(#filter2.ext1, "TXT");
 	//strcpy(#filter2.ext2, "ASM");
 	//strcpy(#filter2.ext3, "INC\0");
 	//strcpy(#filter2.ext4, "\0");
 	filter2.size = 8;
 	filter2.end = 0;
 	strcpy(#menu_text_area1.menu, MENU1);
 	strcpy(#menu_text_area1.sub_menu1, MENU1_SUBMENU1);
 	strcpy(#menu_text_area1.sub_menu2, MENU1_SUBMENU2);
 	//strcpy(#menu_text_area1.sub_menu3, MENU1_SUBMENU3);
 	strcpy(#menu_text_area1.sub_menu4, MENU1_SUBMENU4);
 	menu_text_area1.end = 0;
 	mem_Init();
 	if (load_dll2(boxlib, #box_lib_init,0)!=0) notify(ERROR_LOAD_BOX_LIB);
 	if (load_dll2(libio, #libio_init,1)!=0) notify(ERROR_LOAD_LIBIO);
 	if (load_dll2(Proc_lib, #OpenDialog_init,0)!=0) notify(ERROR_LOAD_PROC_LIB);
 	OpenDialog_init stdcall (#o_dialog);
 	SetEventMask(0x27);
 	loop()
+	{
       switch(WaitEvent())
+      {
 		case evMouse:
+			m.get();
+			if (tview.MouseScrollNoSelection(m.vert)) DrawText();
 			menu_bar_mouse stdcall (#menudata1);
-			if (menudata1.click==1)
+			if (menudata1.click)
+			{
 				switch(menudata1.cursor_out)
+				{
 					case 1:
 						OpenDialog_start stdcall (#o_dialog);
 						OpenFile(#openfile_path);
 						Prepare();
 						draw_window();
 						break;
 					case 2:
 						read = 0;
 						strcpy(#win_title, TITLE);
 						FreeBuf();
 						draw_window();
 						break;
 					case 3:
 						if (!active_properties)
+						{
 							SwitchToAnotherThread();
 							properties_window = CreateThread(#properties_dialog, #properties_stak+4092);
 							break;
+						}
 						else
+						{
 							ActivateWindow(GetProcessSlot(properties_window));
+						}
 						break;
 					case 4:
 						ExitProcess();
+				}
+			}
 			break;
         case evButton:
             id=GetButtonID();
-            if (id==1) || (id==10) ExitProcess();
+            if (id==1) ExitProcess();
 			break;
         case evKey:
+			if (Form.status_window>2) break;
 			key = GetKey();
 			switch (key)
+			{
-				if (Form.status_window>2) break;
-				case 015:               //Ctrl+O
+				case 015:  //Ctrl+O
 					OpenDialog_start stdcall (#o_dialog);
 					OpenFile(#openfile_path);
 					Prepare();
 					draw_window();
 					break;
 				case ASCII_KEY_HOME:
-					cur_row = 0;
-					DrawText();
-					break;
 				case ASCII_KEY_END:
-					cur_row = row_num - row_count - 1;
-					DrawText();
-					break;
 				case ASCII_KEY_UP:
-					if (!cur_row) break;
-					else cur_row = cur_row-1;
-					DrawText();
-					break;
 				case ASCII_KEY_DOWN:
-					if (cur_row+row_count>=row_num) break;
+					if (tview.ProcessKey(key)) DrawText();
-					cur_row = cur_row+1;
-					DrawText();
 					break;
 				case ASCII_KEY_PGUP:
-					if (!cur_row) break;
+					if (!tview.current) break;
-					if (cur_row
+					if (tview.current
-					else cur_row = cur_row-row_count;
+					else tview.current = tview.current-tview.visible;
 					DrawText();
 					break;
 				case ASCII_KEY_PGDN:
-					if (cur_row+row_count>row_num) break;
+					if (tview.current+tview.visible>tview.count) break;
-					cur_row = cur_row+row_count;
+					tview.current = tview.current+tview.visible;
 					DrawText();
 					break;
+			}
 			break;
          case evReDraw:
 			draw_window();
 			break;
+      }
+   }
+}
 void draw_window()
+{
 	sc.get();
 	DefineAndDrawWindow(GetScreenWidth()-WIN_W/2,GetScreenHeight()-WIN_H/2,WIN_W,WIN_H,0x73,0xFFFFFF,#win_title);
 	GetProcessInfo(#Form, SelfInfo);
+	if (Form.status_window>2) return;
+	tview.SetSizes(0, TOPPANELH, Form.cwidth, Form.cheight-BOTPANELH-TOPPANELH, 200, 12);
 	DrawBar(0, 0, Form.cwidth, TOPPANELH, sc.work);
 	DrawBar(0, Form.cheight-BOTPANELH, Form.cwidth, BOTPANELH, sc.work);
 	menudata1.bckg_col = sc.work;
 	menu_bar_draw stdcall (#menudata1);
 	if (old_width!=Form.width) || (old_height!=Form.height)
+	{
 		old_width = Form.width;
 		old_height = Form.height;
-		col_count = Form.cwidth/6;
-		row_count = Form.cheight-BOTPANELH-TOPPANELH-2;
-		row_count = row_count/10;
 		if (read==1) Prepare();
+		tview.debug_values();
+	}
 	if (read==1)
+	{
 		DrawText();
+	}
-	else DrawBar(0, TOPPANELH, Form.cwidth, Form.cheight-BOTPANELH-TOPPANELH, 0xFFFFFF);
+	else DrawBar(tview.x, tview.y, tview.w, tview.h, 0xFFFFFF);
+}
 void OpenFile(dword path)
+{
 	strcpy(#win_title, TITLE);
 	strcat(#win_title, " - ");
 	strcat(#win_title, path);
 	file_size stdcall (path);
 	bufsize = EBX;
 	if (bufsize)
+	{
 		mem_Free(bufpointer);
 		bufpointer = mem_Alloc(bufsize);
 		ReadFile(0, bufsize, bufpointer, path);
 		read=1;
+	}
+}
 void FreeBuf()
+{
 	int i;
 	for (i=0; i
+	{
 		mem_Free(DSDWORD[i*4+draw_sruct]);
+	}
 	mem_Free(draw_sruct);
 	mem_Free(bufpointer);
+}
 void Prepare()
+{
 	int i, sub_pos;
+	static int cur_pos;
 	int len_str = 0;
 	byte do_eof = 0;
 	word bukva[2];
 	dword address;
-	row_num = 0;
+	tview.count = 0;
 	while(1)
+	{
 		while(1)
+		{
-			bukva = DSBYTE[bufpointer+pos+len_str];
+			bukva = DSBYTE[bufpointer+cur_pos+len_str];
 			if (bukva=='\0')
+			{
 				do_eof = 1;
 				break;
+			}
 			if (bukva==0x0a) break;
 			else len_str++;
+		}
-		if (len_str<=col_count)
+		if (len_str<=tview.column_max)
+		{
-			pos=pos+len_str+1;
+			cur_pos=cur_pos+len_str+1;
-			row_num++;
+			tview.count++;
+		}
 		else
+		{
-			pos=pos+col_count;
+			cur_pos=cur_pos+tview.column_max;
-			row_num++;
+			tview.count++;
+		}
 		len_str = 0;
 		if (do_eof) break;
+	}
 	mem_Free(draw_sruct);
-	draw_sruct = mem_Alloc(row_num*4);
+	draw_sruct = mem_Alloc(tview.count*4);
-	pos=0;
+	cur_pos=0;
 	sub_pos=0;
 	len_str = 0;
 	do_eof = 0;
 	while(1)
+	{
 		while(1)
+		{
-			bukva = DSBYTE[bufpointer+pos+len_str];
+			bukva = DSBYTE[bufpointer+cur_pos+len_str];
 			if (bukva=='\0')
+			{
 				do_eof = 1;
 				break;
+			}
 			if (bukva==0x0a) break;
 			else len_str++;
+		}
-		if (len_str<=col_count)
+		if (len_str<=tview.column_max)
+		{
 			address = mem_Alloc(len_str+1);
 			ESDWORD[sub_pos*4+draw_sruct] = address;
-			strlcpy(DSDWORD[sub_pos*4+draw_sruct], bufpointer+pos, len_str);
+			strlcpy(DSDWORD[sub_pos*4+draw_sruct], bufpointer+cur_pos, len_str);
-			pos=pos+len_str+1;
+			cur_pos=cur_pos+len_str+1;
 			sub_pos++;
+		}
 		else
+		{
 			address = mem_Alloc(len_str+1);
 			ESDWORD[sub_pos*4+draw_sruct] = address;
-			strlcpy(DSDWORD[sub_pos*4+draw_sruct], bufpointer+pos, col_count);
+			strlcpy(DSDWORD[sub_pos*4+draw_sruct], bufpointer+cur_pos, tview.column_max);
-			pos=pos+col_count;
+			cur_pos=cur_pos+tview.column_max;
 			sub_pos++;
+		}
 		len_str = 0;
-		if (pos>=bufsize-1) break;
+		if (cur_pos>=bufsize-1) break;
+	}
-	pos=0;
+	cur_pos=0;
+}
 void DrawText()
+{
 	int i, top, num_line;
-	if (row_num
+	if (tview.count
 	else
+	{
-		if (row_num-cur_row<=row_count) top = row_num-cur_row-1;
+		if (tview.count-tview.current<=tview.visible) top = tview.count-tview.current-1;
-		else top = row_count;
+		else top = tview.visible;
+	}
-	DrawBar(0, TOPPANELH, Form.cwidth, 3, 0xFFFFFF);
+	DrawBar(tview.x, tview.y, tview.w, 3, 0xFFFFFF);
-	for (i=0, num_line = cur_row; i
+	for (i=0, num_line = tview.current; i
+	{
-		DrawBar(0, i*10+TOPPANELH+3, Form.cwidth, 10, 0xFFFFFF);
+		DrawBar(tview.x, i * tview.line_h + tview.y + 3, tview.w, tview.line_h, 0xFFFFFF);
-		WriteText(2, i*10+TOPPANELH+3, 0x80, 0x000000, DSDWORD[num_line*4+draw_sruct]);
+		WriteText(tview.x + 2, i * tview.line_h + tview.y + 3, 0x80, 0x000000, DSDWORD[num_line*4+draw_sruct]);
+	}
-	DrawBar(0, i*10+TOPPANELH+3, Form.cwidth, -i*10-TOPPANELH-BOTPANELH+Form.cheight, 0xFFFFFF);
+	DrawBar(0, i * tview.line_h + tview.y + 3, tview.w, -i* tview.line_h + tview.h, 0xFFFFFF);
+}
 stop:
 char properties_stak[4096];
+>
+>

Subversion Repositories Kolibri OS

(root)/programs/cmm/Calypte/Calypte.c @ 5674 – Rev 5614 → 5615