forked from KolibriOS/kolibrios
195 lines
4.2 KiB
Plaintext
195 lines
4.2 KiB
Plaintext
|
struct f70{
|
|||
|
dword func;
|
|||
|
dword param1;
|
|||
|
dword param2;
|
|||
|
dword param3;
|
|||
|
dword param4;
|
|||
|
char rezerv;
|
|||
|
dword name;
|
|||
|
};
|
|||
|
|
|||
|
struct BDVK{
|
|||
|
dword attr;
|
|||
|
byte type_name;
|
|||
|
byte rez1, rez2, rez3;
|
|||
|
dword timecreate;
|
|||
|
dword datecreate;
|
|||
|
dword timelastaccess;
|
|||
|
dword datelastaccess;
|
|||
|
dword timelastedit;
|
|||
|
dword datelastedit;
|
|||
|
dword sizelo;
|
|||
|
dword sizehi;
|
|||
|
char name[518];
|
|||
|
};
|
|||
|
|
|||
|
|
|||
|
///////////////////////////
|
|||
|
// <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> //
|
|||
|
///////////////////////////
|
|||
|
f70 getinfo_file_70;
|
|||
|
BDVK getinfo_file_info;
|
|||
|
dword GetFileInfo(dword file_name)
|
|||
|
{
|
|||
|
getinfo_file_70.func = 5;
|
|||
|
getinfo_file_70.param1 =
|
|||
|
getinfo_file_70.param2 =
|
|||
|
getinfo_file_70.param3 =
|
|||
|
getinfo_file_70.param4 = #getinfo_file_info;
|
|||
|
getinfo_file_70.rezerv = 0;
|
|||
|
getinfo_file_70.name = file_name;
|
|||
|
$mov eax,70
|
|||
|
$mov ebx,#getinfo_file_70.func
|
|||
|
$int 0x40
|
|||
|
IF (EAX == 0) {
|
|||
|
EAX = #getinfo_file_info;
|
|||
|
}
|
|||
|
}
|
|||
|
|
|||
|
|
|||
|
///////////////////////////
|
|||
|
// <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> //
|
|||
|
///////////////////////////
|
|||
|
f70 run_file_70;
|
|||
|
void RunProgram(dword run_path, run_param)
|
|||
|
{
|
|||
|
run_file_70.func = 7;
|
|||
|
run_file_70.param1 =
|
|||
|
run_file_70.param3 =
|
|||
|
run_file_70.param4 =
|
|||
|
run_file_70.rezerv = 0;
|
|||
|
run_file_70.param2 = run_param;
|
|||
|
run_file_70.name = run_path;
|
|||
|
$mov eax,70
|
|||
|
$mov ebx,#run_file_70.func
|
|||
|
$int 0x40
|
|||
|
}
|
|||
|
|
|||
|
///////////////////////////
|
|||
|
// <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> //
|
|||
|
///////////////////////////
|
|||
|
f70 create_dir_70;
|
|||
|
void CreateFolder(dword new_folder_path)
|
|||
|
{
|
|||
|
create_dir_70.func = 9;
|
|||
|
create_dir_70.param1 =
|
|||
|
create_dir_70.param2 =
|
|||
|
create_dir_70.param3 =
|
|||
|
create_dir_70.param4 =
|
|||
|
create_dir_70.rezerv = 0;
|
|||
|
create_dir_70.name = new_folder_path;
|
|||
|
$mov eax,70
|
|||
|
$mov ebx,#create_dir_70.func
|
|||
|
$int 0x40
|
|||
|
}
|
|||
|
|
|||
|
////////////////////////////
|
|||
|
// <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>/<2F><><EFBFBD><EFBFBD><EFBFBD> //
|
|||
|
////////////////////////////
|
|||
|
f70 del_file_70;
|
|||
|
void DeleteFile(dword del_file_path)
|
|||
|
{
|
|||
|
del_file_70.func = 8;
|
|||
|
del_file_70.param1 =
|
|||
|
del_file_70.param2 =
|
|||
|
del_file_70.param3 =
|
|||
|
del_file_70.param4 =
|
|||
|
del_file_70.rezerv = 0;
|
|||
|
del_file_70.name = del_file_path;
|
|||
|
$mov eax,70
|
|||
|
$mov ebx,#del_file_70.func
|
|||
|
$int 0x40
|
|||
|
}
|
|||
|
|
|||
|
////////////////////////////
|
|||
|
// <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> //
|
|||
|
////////////////////////////
|
|||
|
f70 read_file_70;
|
|||
|
void ReadFile(dword pos, file_size, read_buffer, file_path)
|
|||
|
{
|
|||
|
read_file_70.func = 0;
|
|||
|
read_file_70.param1 = pos;
|
|||
|
read_file_70.param2 = 0;
|
|||
|
read_file_70.param3 = file_size;
|
|||
|
read_file_70.param4 = read_buffer;
|
|||
|
read_file_70.rezerv = 0;
|
|||
|
read_file_70.name = file_path;
|
|||
|
$mov eax,70
|
|||
|
$mov ebx,#read_file_70.func
|
|||
|
$int 0x40
|
|||
|
}
|
|||
|
|
|||
|
///////////////////////////
|
|||
|
// <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> //
|
|||
|
///////////////////////////
|
|||
|
f70 read_dir_70;
|
|||
|
void ReadDir(dword file_count, read_buffer, dir_path)
|
|||
|
{
|
|||
|
read_dir_70.func = 1;
|
|||
|
read_dir_70.param1 =
|
|||
|
read_dir_70.param2 =
|
|||
|
read_dir_70.rezerv = 0;
|
|||
|
read_dir_70.param3 = file_count;
|
|||
|
read_dir_70.param4 = read_buffer;
|
|||
|
read_dir_70.name = dir_path;
|
|||
|
$mov eax,70
|
|||
|
$mov ebx,#read_dir_70.func
|
|||
|
$int 0x40
|
|||
|
}
|
|||
|
|
|||
|
///////////////////////////
|
|||
|
// <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> //
|
|||
|
///////////////////////////
|
|||
|
f70 CopyFile_f;
|
|||
|
inline fastcall dword CopyFile(dword EBX,ECX)
|
|||
|
{
|
|||
|
BDVK CopyFile_atr;
|
|||
|
dword s=EBX, d=ECX, cBufer=0;
|
|||
|
CopyFile_f.func = 5;
|
|||
|
CopyFile_f.param1 = 0;
|
|||
|
CopyFile_f.param2 = 0;
|
|||
|
CopyFile_f.param3 = 0;
|
|||
|
CopyFile_f.param4 = #CopyFile_atr;
|
|||
|
CopyFile_f.rezerv = 0;
|
|||
|
CopyFile_f.name = s;
|
|||
|
$mov eax, 70
|
|||
|
$mov ebx, #CopyFile_f
|
|||
|
$int 0x40
|
|||
|
|
|||
|
if (!EAX)
|
|||
|
{
|
|||
|
cBufer = malloc(CopyFile_atr.sizelo);
|
|||
|
ReadFile(dword 0, CopyFile_atr.sizelo, cBufer, s);
|
|||
|
|
|||
|
IF (!EAX)
|
|||
|
{
|
|||
|
CopyFile_f.func = 2;
|
|||
|
CopyFile_f.param1 = 0;
|
|||
|
CopyFile_f.param2 = 0;
|
|||
|
CopyFile_f.param3 = CopyFile_atr.sizelo;
|
|||
|
CopyFile_f.param4 = cBufer;
|
|||
|
CopyFile_f.rezerv = 0;
|
|||
|
CopyFile_f.name = d;
|
|||
|
$mov eax, 70
|
|||
|
$mov ebx, #CopyFile_f
|
|||
|
$int 0x40
|
|||
|
}
|
|||
|
}
|
|||
|
}
|
|||
|
|
|||
|
|
|||
|
//Asper
|
|||
|
void ReadAttributes(dword read_buffer, file_path)
|
|||
|
{
|
|||
|
read_file_70.func = 5;
|
|||
|
read_file_70.param1 = 0;
|
|||
|
read_file_70.param2 = 0;
|
|||
|
read_file_70.param3 = 0;
|
|||
|
read_file_70.param4 = read_buffer;
|
|||
|
read_file_70.rezerv = 0;
|
|||
|
read_file_70.name = file_path;
|
|||
|
$mov eax,70
|
|||
|
$mov ebx,#read_file_70.func
|
|||
|
$int 0x40
|
|||
|
}
|