WebSVN – Kolibri OS – Blame – /programs/system/shell/shell.c

Rev	Author	Line No.	Line
959	leency	1
		2
		3
		4
		5
		6	{
		7	kol_struct70 k70;
		8	int result;
		9
		10
		11	k70.p04 = 0;
		12	k70.p08 = 0;
		13	k70.p12 = 210241024; // 2 MB
		14	k70.p16 = malloc(210241024);
		15	k70.p20 = 0;
		16	k70.p21 = dir;
		17
		18
		19
		20
		21
		22
		23	return TRUE;
		24	else
		25	return FALSE;
		26
		27
		28
		29
		30
		31
		32	{
		33	int i;
		34	i = strlen(dir)-1;
		35	for (;;i--)
		36	if ('/' == dir[i])
		37	{
		38	dir[i+1] = 0;
		39	break;
		40	}
		41	}
		42
		43
		44
		45
		46	{
		47	kol_struct70 k70;
		48	int result;
		49
		50
		51	k70.p04 = 0;
		52	k70.p08 = 0;
		53	k70.p12 = 0;
		54	k70.p16 = 0;
		55	k70.p20 = 0;
		56	k70.p21 = file;
		57
		58
		59
		60
		61	return TRUE;
		62	else
		63	return FALSE;
		64	}
		65
		66
		67
		68
2617	Albom	69	{
		70	#if LANG_ENG
		71	printf (" File '%s' not found.\n\r", file);
		72	#elif LANG_RUS
		73	printf (" �� '%s' �� .\n\r", file);
		74	#endif
		75	}
		76
		77
		78
		79
959	leency	80	{
		81	return ((' ' == c) \|\| ('\t' == c) \|\| (13 == c) \|\| (10 == c));
		82	}
		83
		84
		85
		86
		87	{
		88	int i, j;
		89
		90
		91	if ( !iswhite(string[i]) )
		92	break;
		93	j = 0;
		94	for (;;i++, j++)
		95	{
		96	string[j] = string[i];
		97	if ('\0' == string[i] )
		98	break;
		99	}
		100
		101
		102	if ('\0' == string[i])
		103	break;
		104	i--;
		105	for (;i>0;--i)
		106	if ( iswhite(string[i]) )
		107	string[i] = '\0';
		108	else
		109	break;
		110	}
		111
		112
		113
		114
		115	{
		116
		117
1647	Nasarus	118
		119
959	leency	120	strcat(title, SHELL_VERSION);
		121	CONSOLE_INIT(title);
		122
		123
		124	dir_truncate(cur_dir);
		125
		126
		127
		128
1647	Nasarus	129
		130
959	leency	131	strcpy(CMD, PARAM);
		132	else
		133	strcpy(CMD, ".shell");
		134
		135
		136
		137
		138	{
		139	printf ("# ");
		140	command_get();
		141	command_execute();
		142	}
		143
		144
		145	kol_exit();
		146	}
		147
		148
		149

Subversion Repositories Kolibri OS