Subversion Repositories Kolibri OS

Compare Revisions

Regard whitespace Rev 6695 → Rev 6696

/programs/cmm/process/Tupfile.lua
0,0 → 1,6
if tup.getconfig("NO_CMM") ~= "" then return end
if tup.getconfig("LANG") == "ru"
then C_LANG = "LANG_RUS"
else C_LANG = "LANG_ENG" -- this includes default case without config
end
tup.rule("process.c", "c-- /D=AUTOBUILD /D=$(C_LANG) %f" .. tup.getconfig("KPACK_CMD"), "process.com")
/programs/cmm/process/compile.bat
0,0 → 1,9
@del lang.h--
@echo #define LANG_RUS 1 >lang.h--
 
C-- process.c
@del process
@rename process.com process
@pause
@del lang.h--
@del warning.txt
/programs/cmm/process/process.c
0,0 → 1,187
#define MEMSIZE 4096*20
 
//===================================================//
// //
// LIB //
// //
//===================================================//
 
#include "../lib/gui.h"
#include "../lib/list_box.h"
#include "../lib/obj/box_lib.h"
#include "../lib/io.h"
#include "../lib/patterns/select_list.h"
 
//===================================================//
// //
// DATA //
// //
//===================================================//
 
#define T_WINDOW_TITLE "Process Manager"
#define T_SHOW_SYSTEM_PROCESSES "Show system"
#define T_DETAILS "Details"
#define T_END_PROCESS "End process"
 
 
#define BOTPANEL_H 34
proc_info Form;
proc_info Process;
 
enum {
BTN_ID_SHOW_SYSTEM_PROCESSES=20,
BTN_ID_KILL_PROCESS,
BTN_ID_SHOW_PROCESS_INFO
};
 
int current_process_id = 0;
int show_system;
unsigned maxcpu;
int proc_list[256];
 
//===================================================//
// //
// CODE //
// //
//===================================================//
 
void GetCpuFrequency() {
EAX = 18;
EBX = 5;
$int 0x40
maxcpu = EAX;
}
 
void main()
{
byte btn;
load_dll(boxlib, #box_lib_init,0);
SetEventMask(10000000000000000000000001100111b);
debugi(3);
GetCpuFrequency();
debugi(4);
loop()
{
WaitEventTimeout(50);
switch(EAX & 0xFF)
{
case evMouse:
if (!CheckActiveProcess(Form.ID)) break;
SelectList_ProcessMouse();
break;
case evKey:
GetKeys();
if (select_list.ProcessKey(key_scancode)) SelectList_LineChanged();
break;
case evButton:
btn = GetButtonID();
if (1 == btn)
{
ExitProcess();
}
if (BTN_ID_SHOW_SYSTEM_PROCESSES == btn)
{
show_system ^= 1;
Draw_ShowSystemProcessesCheckbox();
SelectList_LineChanged();
}
if (BTN_ID_KILL_PROCESS == btn)
{
KillProcess(current_process_id);
pause(10);
SelectList_LineChanged();
}
if (BTN_ID_SHOW_PROCESS_INFO == btn)
{
io.run("/sys/tinfo", itoa(GetProcessSlot(current_process_id)));
}
break;
case evReDraw:
system.color.get();
DefineAndDrawWindow(screen.width-400/2,screen.height-450/2,400,454,0x73,0,T_WINDOW_TITLE);
GetProcessInfo(#Form, SelfInfo);
if (Form.status_window>2) break;
if (Form.width < 300) { MoveSize(OLD,OLD,300,OLD); break; }
if (Form.height < 200) { MoveSize(OLD,OLD,OLD,200); break; }
SelectList_Init(6, 6, Form.cwidth-12 - scroll1.size_x, Form.cheight-12-BOTPANEL_H, false);
SelectList_DrawBorder();
DrawWideRectangle(0, 0, Form.cwidth, Form.cheight, 4, system.color.work);
DrawBar(select_list.x-2, select_list.y+select_list.h+2,
select_list.w+scroll1.size_x+4, BOTPANEL_H, system.color.work);
DrawCaptButton(Form.cwidth-116,
select_list.y+select_list.h+5,
110,25,BTN_ID_KILL_PROCESS,0xF38181, 0xFFFfff, T_END_PROCESS);
DrawCaptButton(Form.cwidth-236,
select_list.y+select_list.h+5,
110,25,BTN_ID_SHOW_PROCESS_INFO,
system.color.work_button, system.color.work_button_text, T_DETAILS);
Draw_ShowSystemProcessesCheckbox();
default:
SelectList_LineChanged();
}
}
}
 
void SelectList_LineChanged()
{
GetProcessList();
SelectList_Draw();
}
 
 
void GetProcessList()
{
int i, j;
select_list.count=0;
for (i=0; i<65535; i++)
{
GetProcessInfo(#Process, i);
if (Process.name)
{
for (j=0; j<11; j++) if (Process.name[j]!=' ') {
if (show_system==false) {
//do not show system process
if (Process.name[0]=='@') break;
if (!strcmp(#Process.name, "IDLE")) break;
if (!strcmp(#Process.name, "OS")) break;
}
proc_list[select_list.count] = i;
select_list.count++;
break;
}
}
}
}
 
void SelectList_DrawLine(dword i)
{
int posy;
char cpu_use[16];
dword bg_color;
GetProcessInfo(#Process, proc_list[i+select_list.first]);
posy = i *select_list.item_h + select_list.y;
if (i % 2) bg_color = 0xFFFfff; else bg_color = 0xF0F0F0;
if (i+select_list.first == select_list.cur_y) {
current_process_id = Process.ID;
bg_color = 0x67CCEB;
}
DrawBar(select_list.x, posy, select_list.w, select_list.item_h, bg_color);
WriteText(select_list.x+005, posy+select_list.text_y, select_list.font_type, 0, #Process.name);
WriteText(select_list.w/10*5+select_list.x, posy+select_list.text_y, select_list.font_type, 0x444444, ConvertSizeToKb(Process.use_memory));
sprintf(#cpu_use, "%i %%", Process.use_cpu*100/maxcpu);
if (maxcpu) WriteText(select_list.w/10*8+select_list.x - calc(strlen(#cpu_use)-4*8),
posy+select_list.text_y, select_list.font_type, 0x444444, #cpu_use);
}
 
 
void Draw_ShowSystemProcessesCheckbox() {
CheckBox(select_list.x + 3, select_list.y+select_list.h+10, 20,
T_SHOW_SYSTEM_PROCESSES, show_system);
}
 
 
 
 
 
stop: