Subversion Repositories Kolibri OS

Rev

Rev 3045 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 3045 Rev 3057
Line 132... Line 132...
132 
	$mov ebx,#del_file_70.func
 132 
	$mov ebx,#del_file_70.func
133 
	$int 0x40
 133 
	$int 0x40
134 
}
134 
}
Line 135... Line 135...
135 
 
 135 
 
- 
 
 136 
///////////////////////////
- 
 
 137 
//   Ïàðàìåòðû ôàéëà    //
- 
 
 138 
///////////////////////////
- 
 
 139 
/*f70 getinfo_file_70;
- 
 
 140 
BDVK getinfo_file_info;
- 
 
 141 
:dword GetFileInfo(dword file_path)
- 
 
 142 
{
- 
 
 143 
    getinfo_file_70.func = 5;
- 
 
 144 
    getinfo_file_70.param1 =
- 
 
 145 
    getinfo_file_70.param2 =
- 
 
 146 
    getinfo_file_70.param3 = 0;
- 
 
 147 
    getinfo_file_70.param4 = #getinfo_file_info;
- 
 
 148 
    getinfo_file_70.rezerv = 0;
- 
 
 149 
    getinfo_file_70.name = file_path;
- 
 
 150 
    $mov eax,70
- 
 
 151 
    $mov ebx,#getinfo_file_70.func
- 
 
 152 
    $int 0x40
- 
 
 153 
}*/
- 
 
 154 
 
136 
///////////////////////////
 155 
///////////////////////////
137 
//   Ñêîïèðîâàòü ôàéë    //
 156 
//   Ñêîïèðîâàòü ôàéë    //
138 
///////////////////////////
 157 
///////////////////////////
139 
f70	CopyFile_f;
 158 
f70	CopyFile_f;
140 
inline fastcall int CopyFile(dword EBX,ECX)
 159 
inline fastcall int CopyFile(dword EBX,ECX)
141 
{
 160 
{
142 
	BDVK CopyFile_atr;
 161 
	BDVK CopyFile_atr;
143 
	dword s=EBX, d=ECX, cBufer=0;
 162 
	dword s=EBX, d=ECX, cBufer=0, rezult;
144 
	CopyFile_f.func = 5;
 163 
	CopyFile_f.func = 5;
145 
	CopyFile_f.param1 = 0;
 164 
	CopyFile_f.param1 = 0;
146 
	CopyFile_f.param2 = 0;
 165 
	CopyFile_f.param2 = 0;
147 
	CopyFile_f.param3 = 0;
 166 
	CopyFile_f.param3 = 0;
Line 153... Line 172...
153 
	$int 0x40
 172 
	$int 0x40
Line 154... Line 173...
154
173
155 
	if (!EAX)
 174 
	if (!EAX)
156 
	{
175 
	{
157 
		cBufer = malloc(2*CopyFile_atr.sizelo);
176 
		cBufer = malloc(2*CopyFile_atr.sizelo);
158 
		ReadFile(dword 0, CopyFile_atr.sizelo, cBufer, s);
 - 
 
159
- 
 
160 
		IF (!EAX)
 - 
 
161 
		{
 - 
 
162 
			CopyFile_f.func = 2;
 - 
 
163 
			CopyFile_f.param1 = 0;
 - 
 
164 
			CopyFile_f.param2 = 0;
 177 
		if (!ReadFile(0, CopyFile_atr.sizelo, cBufer, s))
165 
			CopyFile_f.param3 = CopyFile_atr.sizelo;
 - 
 
166 
			CopyFile_f.param4 = cBufer;
 - 
 
167 
			CopyFile_f.rezerv = 0;
 - 
 
168 
			CopyFile_f.name = d;
 178 
			rezult = CreateFile(CopyFile_atr.sizelo, cBufer, d);
169 
			$mov eax, 70
 - 
 
170 
			$mov ebx, #CopyFile_f
 - 
 
171 
			$int 0x40
 - 
 
172 
		}
 179 
		free(cBufer);
173 
	}
 180 
	}
Line 174... Line 181...
174 
	return EAX;
 181 
	return rezult;
Line 175... Line 182...
175 
 
 182 
 
176 
}
 183 
}