forked from KolibriOS/kolibrios
Rustem Gimadutdinov (rgimad)
68cf3e4293
- big refactoring, now uses libc.obj - added kfetch command git-svn-id: svn://kolibrios.org@8827 a494cfbc-eb01-0410-851d-a64ba20cac60
52 lines
722 B
C
52 lines
722 B
C
|
|
int cmd_rm(char file[]) {
|
|
|
|
kol_struct70 k70;
|
|
char temp[FILENAME_MAX];
|
|
unsigned result;
|
|
|
|
if (NULL == file || strlen(file) == 0) {
|
|
printf (CMD_RM_USAGE);
|
|
return TRUE;
|
|
}
|
|
|
|
if ( '/' == file[0])
|
|
{
|
|
strcpy(temp, file);
|
|
|
|
if ( !file_check(temp) )
|
|
{
|
|
return FALSE;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
strcpy(temp, cur_dir);
|
|
if (temp[strlen(temp)-1] != '/')
|
|
strcat(temp, "/"); // add slash
|
|
strcat(temp, file);
|
|
|
|
if ( !file_check(temp) )
|
|
{
|
|
return FALSE;
|
|
}
|
|
}
|
|
|
|
k70.p00 = 8;
|
|
k70.p04 = 0;
|
|
//k70.p08 = 0;
|
|
k70.p12 = 0;
|
|
k70.p16 = 0;
|
|
k70.p20 = 0;
|
|
k70.p21 = temp;
|
|
|
|
result = kol_file_70(&k70);
|
|
|
|
if (0 == result)
|
|
return TRUE;
|
|
else
|
|
return FALSE;
|
|
|
|
}
|
|
|