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
42 lines
677 B
C
42 lines
677 B
C
|
|
int cmd_mkdir(char dir[]) {
|
|
char temp[FILENAME_MAX];
|
|
kol_struct70 k70;
|
|
unsigned result;
|
|
|
|
if (NULL == dir) {
|
|
printf(CMD_MKDIR_USAGE);
|
|
return TRUE;
|
|
}
|
|
|
|
if ( 0 == strcmp(dir, ".") || ( 0 == strcmp(dir, "..") ) || ( 0 == strcmp(cur_dir, "/")) ) {
|
|
return FALSE;
|
|
}
|
|
|
|
k70.p00 = 9;
|
|
k70.p04 = 0;
|
|
//k70.p08 = 0;
|
|
k70.p12 = 0;
|
|
k70.p16 = 0;
|
|
k70.p20 = 0;
|
|
|
|
if ( '/' == dir[0])
|
|
k70.p21 = dir;
|
|
else {
|
|
strcpy(temp, cur_dir);
|
|
if (temp[strlen(temp)-1] != '/')
|
|
strcat(temp, "/"); // add slash
|
|
strcat(temp, dir);
|
|
k70.p21 = temp;
|
|
}
|
|
|
|
result = kol_file_70(&k70);
|
|
|
|
if (0 == result)
|
|
return TRUE;
|
|
else
|
|
return FALSE;
|
|
|
|
}
|
|
|