Subversion Repositories Kolibri OS

Rev

Rev 5651 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
3363 leency 1
#define MEMSIZE 0x9000
2
#include "..\lib\strings.h"
3
#include "..\lib\mem.h"
7219 leency 4
#include "..\lib\fs.h"
3363 leency 5
 
6
 
7
void main()
8
{
9
	dword dirbuf, fcount, filename, i;
10
	dword dirbuf2, fcount2, filename2, j;
11
	char cd_path[4096];
12
	char install_path[4096];
13
	signed int result;
14
 
5152 leency 15
	pause(200);
3444 leency 16
	GetDir(#dirbuf, #fcount, "/", DIRS_ONLYREAL);
3363 leency 17
 
18
	for (i=0; i
19
	{
20
		filename = i*304+dirbuf+72;
21
		if (!strstr(filename, "fd"))
22
		{
23
			strcpy(#cd_path, "/");
24
			strcat(#cd_path, filename);
25
			free(dirbuf2);
3444 leency 26
			GetDir(#dirbuf2, #fcount2, #cd_path, DIRS_ONLYREAL);
3363 leency 27
 
28
			for (j=0; j
29
			{
30
				filename2 = j*304+dirbuf2+72;
31
				strcpy(#install_path, #cd_path);
32
				strcat(#install_path, "/");
33
				strcat(#install_path, filename2);
34
				strcat(#install_path, "/installer.kex");
35
				result = RunProgram(#install_path, NULL);
36
				if (result>0) ExitProcess();
37
			}
38
		}
39
	}
4885 leency 40
	notify("'KolibriN\nНе могу найти installer.kex ни в одном корне диска!\nПопробуйте найти и запустить его вручную.' -dtE");
3363 leency 41
	ExitProcess();
42
}
43
 
44
 
45
stop: