Subversion Repositories Kolibri OS

Rev

Rev 1665 | Rev 3247 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed

  1.  
  2. int cmd_mkdir(char dir[])
  3. {
  4.  
  5. char            temp[256];
  6. kol_struct70    k70;
  7. unsigned        result;
  8.  
  9. if (NULL == dir)
  10.         {
  11.         #if LANG_ENG
  12.                 printf("  mkdir <directory>\n\r");
  13.         #elif LANG_RUS
  14.                 printf("  mkdir <¤¨à¥ªâ®à¨ï>\n\r");
  15.         #endif 
  16.         return FALSE;
  17.         }
  18.  
  19.  
  20. if ( 0 == strcmp(dir, ".") || ( 0 == strcmp(dir, "..") ) || ( 0 == strcmp(cur_dir, "/")) )
  21.         {
  22.         return FALSE;
  23.         }
  24.  
  25. k70.p00 = 9;
  26. k70.p04 = 0;
  27. k70.p08 = 0;
  28. k70.p12 = 0;
  29. k70.p16 = 0;
  30. k70.p20 = 0;
  31.  
  32. if ( '/' == dir[0])
  33.         k70.p21 = dir;
  34. else
  35.         {
  36.         strcpy(temp, cur_dir);
  37.         strcat(temp, dir);
  38.         k70.p21 = temp;
  39.         }
  40.  
  41. result = kol_file_70(&k70);
  42.  
  43. if (0 == result)
  44.         return TRUE;
  45. else
  46.         return FALSE;
  47.  
  48. }
  49.