244ba684f5
git-svn-id: svn://kolibrios.org@4870 a494cfbc-eb01-0410-851d-a64ba20cac60
47 lines
1.1 KiB
C
47 lines
1.1 KiB
C
#define MEMSIZE 0x9000
|
||
#include "..\lib\kolibri.h"
|
||
#include "..\lib\strings.h"
|
||
#include "..\lib\mem.h"
|
||
#include "..\lib\file_system.h"
|
||
|
||
|
||
void main()
|
||
{
|
||
dword dirbuf, fcount, filename, i;
|
||
dword dirbuf2, fcount2, filename2, j;
|
||
char cd_path[4096];
|
||
char install_path[4096];
|
||
signed int result;
|
||
|
||
mem_Init();
|
||
GetDir(#dirbuf, #fcount, "/", DIRS_ONLYREAL);
|
||
|
||
for (i=0; i<fcount; i++)
|
||
{
|
||
filename = i*304+dirbuf+72;
|
||
if (!strstr(filename, "fd"))
|
||
{
|
||
strcpy(#cd_path, "/");
|
||
strcat(#cd_path, filename);
|
||
free(dirbuf2);
|
||
GetDir(#dirbuf2, #fcount2, #cd_path, DIRS_ONLYREAL);
|
||
|
||
for (j=0; j<fcount2; j++)
|
||
{
|
||
filename2 = j*304+dirbuf2+72;
|
||
strcpy(#install_path, #cd_path);
|
||
strcat(#install_path, "/");
|
||
strcat(#install_path, filename2);
|
||
strcat(#install_path, "/installer.kex");
|
||
result = RunProgram(#install_path, NULL);
|
||
if (result>0) ExitProcess();
|
||
}
|
||
}
|
||
}
|
||
notify("'<27>¥ ¬®£ã ©â¨ installer.kex ¨ ¢ ®¤®¬ ª®à¥ ¤¨áª !\n<EFBFBD>®¯à®¡ã©â¥ ©â¨ ¨ § ¯ãáâ¨âì ¥£® ¢àãçãî.' -dE");
|
||
ExitProcess();
|
||
}
|
||
|
||
|
||
stop:
|