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

Rev	Author	Line No.	Line
1665	Nasarus	1
		2
		3
		4	{
		5
		6
		7	char buf[4];
		8
		9
		10	k70.p04 = 0;
		11	k70.p08 = 0;
		12	k70.p12 = 4; // �� 4 ��
		13	k70.p16 = (unsigned) buf;
3245	Albom	14	k70.p20 = 0;
1665	Nasarus	15	k70.p21 = file;
		16
		17
		18
		19
		20	return TRUE;
		21	else
		22	return FALSE;
		23	}
		24
		25
		26
		27
		28	{
		29
		30
		31	kol_struct_BDVK bdvk;
		32	unsigned result, filesize, pos, i;
		33	char *buf; //��, ��
		34
		35
		36	k70.p04 = k70.p08 = k70.p12 = 0;
		37	k70.p16 = (unsigned) &bdvk;
3245	Albom	38	k70.p20 = 0;
1665	Nasarus	39	k70.p21 = exec;
		40
		41
		42	if ( 0 != result )
		43	return FALSE;
		44
		45
		46
		47
		48	if (NULL == buf)
		49	return FALSE;
		50
		51
		52
		53
		54	k70.p04 = k70.p08 = 0;
		55	k70.p12 = filesize;
		56	k70.p16 = (unsigned) buf;
3245	Albom	57	k70.p20 = 0;
1665	Nasarus	58	k70.p21 = exec;
		59
		60
		61	if ( 0 != result )
		62	{
		63	free(buf);
		64	return FALSE;
		65	}
		66
		67
		68
		69
		70	{
		71
		72
		73	break;
		74
		75
		76	{
		77	if ((0x0A == buf[pos])\|\|(0x0D == buf[pos])\|\|(0 == buf[pos]))
		78	{
		79	pos++;
		80	CMD[i] = '\0';
		81	break;
		82	}
		83	CMD[i] = buf[pos];
		84	pos++;
		85	}
		86
		87
		88	continue;
		89
		90
		91	continue;
		92
		93
		94
		95
		96
		97
		98	return TRUE;
		99	}
		100
		101
		102

Subversion Repositories Kolibri OS