forked from KolibriOS/kolibrios
siemargl
145 lines
3.1 KiB
C
145 lines
3.1 KiB
C
|
|
int cmd_cp(char param[])
|
|
{
|
|
|
|
char* argv[100];
|
|
int argc;
|
|
char *filename_in = NULL;
|
|
char *filename_out = NULL;
|
|
char *buffer = NULL;
|
|
|
|
kol_struct70 k70_in;
|
|
kol_struct70 k70_out;
|
|
|
|
kol_struct_BDVK bdvk;
|
|
|
|
unsigned long long filesize;
|
|
unsigned result, buf_size;
|
|
|
|
argc = parameters_prepare(param, argv);
|
|
|
|
if (argc != 2)
|
|
{
|
|
#if LANG_ENG
|
|
printf(" cp <file_in> <file_out>\n\r");
|
|
#elif LANG_RUS
|
|
printf(" cp <¨áâ®ç¨ª> <१ã«ìâ â>\n\r");
|
|
#endif
|
|
|
|
parameters_free(argc, argv);
|
|
|
|
return TRUE;
|
|
}
|
|
|
|
filename_in = (char*) malloc(FILENAME_MAX);
|
|
filename_out = (char*) malloc(FILENAME_MAX);
|
|
|
|
if (argv[0][0] != '/')
|
|
{
|
|
strcpy(filename_in, cur_dir);
|
|
if (filename_in[strlen(filename_in)-1] != '/')
|
|
strcat(filename_in, "/"); // add slash
|
|
strcat(filename_in, argv[0]);
|
|
}
|
|
else
|
|
{
|
|
strcpy(filename_in, argv[0]);
|
|
}
|
|
|
|
if (argv[1][0] != '/')
|
|
{
|
|
strcpy(filename_out, cur_dir);
|
|
if (filename_out[strlen(filename_out)-1] != '/')
|
|
strcat(filename_out, "/"); // add slash
|
|
strcat(filename_out, argv[1]);
|
|
}
|
|
else
|
|
{
|
|
strcpy(filename_out, argv[1]);
|
|
}
|
|
|
|
// add ability to use directory as destination
|
|
if ( dir_check(filename_out) )
|
|
{
|
|
char *fname = strrchr(filename_in, '/') + 1; // always exist, as we add curdir
|
|
if (filename_out[strlen(filename_out)-1] != '/')
|
|
strcat(filename_out, "/"); // add slash
|
|
strcat(filename_out, fname);
|
|
}
|
|
|
|
|
|
k70_in.p00 = 5;
|
|
k70_in.p04 = 0LL;
|
|
k70_in.p12 = 0;
|
|
k70_in.p16 = (unsigned) &bdvk;
|
|
k70_in.p20 = 0;
|
|
k70_in.p21 = filename_in;
|
|
|
|
result = kol_file_70(&k70_in); // ¯®«ãç ¥¬ ¨ä®à¬ æ¨î ® ä ©«¥
|
|
if ( 0 != result )
|
|
goto lbl_exit;
|
|
|
|
// count buffer size up to 1Mb, but no more than 1/2 of free memory
|
|
buf_size = 1 << 20; // 1Mb
|
|
while( ((buf_size >> 10) > kol_system_memfree()) && (buf_size > 4096) )
|
|
buf_size /= 2;
|
|
|
|
filesize = bdvk.p32; // ¯®«ãç ¥¬ à §¬¥à ä ©« (®£à ¨ç¥¨¥ - 4 ƒ¡ ©â ⮫쪮 ¤«ï FAT)
|
|
if (buf_size > filesize)
|
|
buf_size = (unsigned)filesize; // may be zero!
|
|
if (buf_size == 0) buf_size = 4096; // ...
|
|
|
|
buffer = (char*) malloc(buf_size);
|
|
if (!buffer)
|
|
{
|
|
result = E_NOMEM;
|
|
goto lbl_exit;
|
|
}
|
|
|
|
k70_in.p00 = 0;
|
|
//k70_in.p08 = 0;
|
|
k70_in.p12 = buf_size;
|
|
k70_in.p16 = (unsigned) buffer;
|
|
k70_in.p20 = 0;
|
|
k70_in.p21 = filename_in;
|
|
|
|
k70_out.p00 = 2;
|
|
//k70_out.p08 = 0;
|
|
k70_out.p12 = buf_size;
|
|
k70_out.p16 = (unsigned) buffer;
|
|
k70_out.p20 = 0;
|
|
k70_out.p21 = filename_out;
|
|
|
|
unsigned long long offset = 0;
|
|
do {
|
|
k70_in.p04 = offset;
|
|
if (offset + buf_size > filesize) // last chunk
|
|
{
|
|
k70_in.p12 = k70_out.p12 = (unsigned)(filesize - offset); // filesize % buf_size;
|
|
}
|
|
|
|
result = kol_file_70(&k70_in); // ç⥨¥
|
|
if (result != 0)
|
|
goto lbl_exit;
|
|
|
|
k70_out.p04 = offset;
|
|
result = kol_file_70(&k70_out); // § ¯¨áì
|
|
if (result != 0)
|
|
goto lbl_exit;
|
|
|
|
if (k70_out.p00 == 2)
|
|
k70_out.p00 = 3; // ¬¥ï¥¬ äãªæ¨î á ᮧ¤ ¨ï (2) ¤®§ ¯¨áì (3)
|
|
offset += buf_size;
|
|
} while (offset < filesize);
|
|
|
|
lbl_exit:
|
|
|
|
parameters_free(argc, argv);
|
|
free(filename_in);
|
|
free(filename_out);
|
|
free(buffer);
|
|
|
|
return (result == 0);
|
|
}
|
|
|