Subversion Repositories Kolibri OS

Rev

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

Rev Author Line No. Line
2502 Albom 1
 
2
3
 
4
 
5
{
6
7
 
8
char *buffer;
9
int result;
10
int i;
11
char command;
12
int size;
13
int is_end;
14
15
 
2735 Albom 16
strcat(name, "-SHELL");
2502 Albom 17
18
 
19
20
 
21
 
22
	{
23
	result = kol_buffer_open(name, SHM_OPEN | SHM_WRITE, 0, &buffer);
24
	if (buffer != NULL)
25
		break;
26
27
 
28
	}
29
30
 
31
		return 0;
32
	else
33
		size = result;
34
35
 
36
	for (;;)
37
		{
38
39
 
40
41
 
42
			{
43
44
 
45
				*buffer = SC_OK;
46
				is_end = 1;
47
				break;
48
49
 
50
				kol_sleep(5);
51
				break;
52
53
 
54
				con_cls();
55
				*buffer = SC_OK;
56
				break;
57
58
 
59
				printf("%c", *(buffer+1));
60
				*buffer = SC_OK;
61
				break;
62
63
 
64
				printf("%s", buffer+1 );
65
				*buffer = SC_OK;
66
				break;
67
68
 
69
				*(buffer+1) = (char) getch() ;
70
				*buffer = SC_OK;
71
				break;
72
73
 
74
				gets(buffer+1, size-2);
75
				*buffer = SC_OK;
76
				break;
77
78
 
79
				#if LANG_ENG
80
					printf ("  Error in console application.\n\r");
81
				#elif LANG_RUS
82
					printf ("  Ошибка в консольном приложении.\n\r");
3245 Albom 83
				#endif
2502 Albom 84
				return 0;
85
			};
86
		if (is_end)
87
			{
88
			printf("\n\r");
89
			return 1;
90
			}
91
		}
92
93
 
94
}
2735 Albom 95