Subversion Repositories SvarDOS

Rev

Rev 501 | Rev 538 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 501 Rev 533
Line 24... Line 24...
24 
 
 24 
 
25 
/*
25 
/*
26 
 * rename/ren
26 
 * rename/ren
27 
 */
 27 
 */
28 
 
 28 
 
29 
static int cmd_rename(struct cmd_funcparam *p) {
 29 
static enum cmd_result cmd_rename(struct cmd_funcparam *p) {
30 
  char *src = p->BUFFER;
 30 
  char *src = p->BUFFER;
31 
  char *dst = p->BUFFER + 256;
 31 
  char *dst = p->BUFFER + 256;
32 
  char *buff1 = p->BUFFER + 512;
 32 
  char *buff1 = p->BUFFER + 512;
33 
  char *buff2 = p->BUFFER + 1024;
 33 
  char *buff2 = p->BUFFER + 1024;
34 
  unsigned short i, fnameoffset;
 34 
  unsigned short i, fnameoffset;
Line 40... Line 40...
40 
    outputnl("RENAME [drive:][path]filename1 filename2");
 40 
    outputnl("RENAME [drive:][path]filename1 filename2");
41 
    outputnl("REN [drive:][path]filename1 filename2");
 41 
    outputnl("REN [drive:][path]filename1 filename2");
42 
    outputnl("");
 42 
    outputnl("");
43 
    outputnl("Note that you cannot specify a new drive or path for your destination file.");
 43 
    outputnl("Note that you cannot specify a new drive or path for your destination file.");
44 
    outputnl("Use MOVE to rename a directory, or to move files from one directory to another.");
 44 
    outputnl("Use MOVE to rename a directory, or to move files from one directory to another.");
45 
    return(-1);
 45 
    return(CMD_OK);
46 
  }
 46 
  }
47 
 
 47 
 
48 
  /* I expect exactly two arguments */
 48 
  /* I expect exactly two arguments */
49 
  if (p->argc != 2) {
 49 
  if (p->argc != 2) {
50 
    outputnl("Invalid syntax");
 50 
    outputnl("Invalid syntax");
51 
    return(-1);
 51 
    return(CMD_FAIL);
52 
  }
 52 
  }
53 
 
 53 
 
54 
  /* convert src to truename format */
 54 
  /* convert src to truename format */
55 
  i = file_truename(p->argv[0], src);
 55 
  i = file_truename(p->argv[0], src);
56 
  if (i != 0) {
 56 
  if (i != 0) {
57 
    outputnl(doserr(i));
 57 
    outputnl(doserr(i));
58 
    return(-1);
 58 
    return(CMD_FAIL);
59 
  }
 59 
  }
60 
 
 60 
 
61 
  /* copy src path to buffers and remember where the filename starts */
 61 
  /* copy src path to buffers and remember where the filename starts */
62 
  fnameoffset = 0;
 62 
  fnameoffset = 0;
63 
  for (i = 0;; i++) {
 63 
  for (i = 0;; i++) {
Line 72... Line 72...
72 
    switch (p->argv[1][i]) {
 72 
    switch (p->argv[1][i]) {
73 
      case ':':
 73 
      case ':':
74 
      case '\\':
 74 
      case '\\':
75 
      case '/':
 75 
      case '/':
76 
        outputnl("Invalid destination");
 76 
        outputnl("Invalid destination");
77 
        return(-1);
 77 
        return(CMD_FAIL);
78 
    }
 78 
    }
79 
    buff1[fnameoffset + i] = p->argv[1][i];
 79 
    buff1[fnameoffset + i] = p->argv[1][i];
80 
    if (buff1[fnameoffset + i] == 0) break;
 80 
    if (buff1[fnameoffset + i] == 0) break;
81 
  }
 81 
  }
82 
 
 82 
 
83 
  /* apply truename to dest to normalize wildcards into ? chars */
 83 
  /* apply truename to dest to normalize wildcards into ? chars */
84 
  i = file_truename(buff1, dst);
 84 
  i = file_truename(buff1, dst);
85 
  if (i != 0) {
 85 
  if (i != 0) {
86 
    outputnl(doserr(i));
 86 
    outputnl(doserr(i));
87 
    return(-1);
 87 
    return(CMD_FAIL);
88 
  }
 88 
  }
89 
 
 89 
 
90 
  /* we're good to go, src and dst should look somehow like that now:
90 
  /* we're good to go, src and dst should look somehow like that now:
91 
   * src   =   C:\TEMP\PATH\FILE????.TXT
91 
   * src   =   C:\TEMP\PATH\FILE????.TXT
92 
   * dst   =   C:\TEMP\PATH\FILE????.DOC
92 
   * dst   =   C:\TEMP\PATH\FILE????.DOC
Line 157... Line 157...
157 
    }
 157 
    }
158 
    /* next please */
 158 
    /* next please */
159 
    i = findnext(dta);
 159 
    i = findnext(dta);
160 
  }
 160 
  }
161 
 
 161 
 
162 
  return(-1);
 162 
  return(CMD_OK);
163 
}
 163 
}