deca8b884f
git-svn-id: svn://kolibrios.org@3247 a494cfbc-eb01-0410-851d-a64ba20cac60
50 lines
671 B
C
50 lines
671 B
C
|
|
int cmd_mkdir(char dir[])
|
|
{
|
|
|
|
char temp[256];
|
|
kol_struct70 k70;
|
|
unsigned result;
|
|
|
|
if (NULL == dir)
|
|
{
|
|
#if LANG_ENG
|
|
printf(" mkdir <directory>\n\r");
|
|
#elif LANG_RUS
|
|
printf(" mkdir <¤¨à¥ªâ®à¨ï>\n\r");
|
|
#endif
|
|
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);
|
|
strcat(temp, dir);
|
|
k70.p21 = temp;
|
|
}
|
|
|
|
result = kol_file_70(&k70);
|
|
|
|
if (0 == result)
|
|
return TRUE;
|
|
else
|
|
return FALSE;
|
|
|
|
}
|
|
|