forked from KolibriOS/kolibrios
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);
|
||
}
|
||
|