diff options
Diffstat (limited to 'other/ssharp/sftp-int.c')
| -rw-r--r-- | other/ssharp/sftp-int.c | 915 |
1 files changed, 915 insertions, 0 deletions
diff --git a/other/ssharp/sftp-int.c b/other/ssharp/sftp-int.c new file mode 100644 index 0000000..46e405e --- /dev/null +++ b/other/ssharp/sftp-int.c | |||
| @@ -0,0 +1,915 @@ | |||
| 1 | /* | ||
| 2 | * Copyright (c) 2001 Damien Miller. All rights reserved. | ||
| 3 | * | ||
| 4 | * Redistribution and use in source and binary forms, with or without | ||
| 5 | * modification, are permitted provided that the following conditions | ||
| 6 | * are met: | ||
| 7 | * 1. Redistributions of source code must retain the above copyright | ||
| 8 | * notice, this list of conditions and the following disclaimer. | ||
| 9 | * 2. Redistributions in binary form must reproduce the above copyright | ||
| 10 | * notice, this list of conditions and the following disclaimer in the | ||
| 11 | * documentation and/or other materials provided with the distribution. | ||
| 12 | * | ||
| 13 | * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR | ||
| 14 | * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES | ||
| 15 | * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. | ||
| 16 | * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, | ||
| 17 | * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT | ||
| 18 | * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, | ||
| 19 | * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY | ||
| 20 | * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT | ||
| 21 | * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF | ||
| 22 | * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | ||
| 23 | */ | ||
| 24 | |||
| 25 | /* XXX: globbed ls */ | ||
| 26 | /* XXX: recursive operations */ | ||
| 27 | |||
| 28 | #include "includes.h" | ||
| 29 | RCSID("$OpenBSD: sftp-int.c,v 1.36 2001/04/15 08:43:46 markus Exp $"); | ||
| 30 | |||
| 31 | #include "buffer.h" | ||
| 32 | #include "xmalloc.h" | ||
| 33 | #include "log.h" | ||
| 34 | #include "pathnames.h" | ||
| 35 | |||
| 36 | #include "sftp.h" | ||
| 37 | #include "sftp-common.h" | ||
| 38 | #include "sftp-glob.h" | ||
| 39 | #include "sftp-client.h" | ||
| 40 | #include "sftp-int.h" | ||
| 41 | |||
| 42 | /* File to read commands from */ | ||
| 43 | extern FILE *infile; | ||
| 44 | |||
| 45 | /* Version of server we are speaking to */ | ||
| 46 | int version; | ||
| 47 | |||
| 48 | /* Seperators for interactive commands */ | ||
| 49 | #define WHITESPACE " \t\r\n" | ||
| 50 | |||
| 51 | /* Commands for interactive mode */ | ||
| 52 | #define I_CHDIR 1 | ||
| 53 | #define I_CHGRP 2 | ||
| 54 | #define I_CHMOD 3 | ||
| 55 | #define I_CHOWN 4 | ||
| 56 | #define I_GET 5 | ||
| 57 | #define I_HELP 6 | ||
| 58 | #define I_LCHDIR 7 | ||
| 59 | #define I_LLS 8 | ||
| 60 | #define I_LMKDIR 9 | ||
| 61 | #define I_LPWD 10 | ||
| 62 | #define I_LS 11 | ||
| 63 | #define I_LUMASK 12 | ||
| 64 | #define I_MKDIR 13 | ||
| 65 | #define I_PUT 14 | ||
| 66 | #define I_PWD 15 | ||
| 67 | #define I_QUIT 16 | ||
| 68 | #define I_RENAME 17 | ||
| 69 | #define I_RM 18 | ||
| 70 | #define I_RMDIR 19 | ||
| 71 | #define I_SHELL 20 | ||
| 72 | #define I_SYMLINK 21 | ||
| 73 | #define I_VERSION 22 | ||
| 74 | |||
| 75 | struct CMD { | ||
| 76 | const char *c; | ||
| 77 | const int n; | ||
| 78 | }; | ||
| 79 | |||
| 80 | const struct CMD cmds[] = { | ||
| 81 | { "cd", I_CHDIR }, | ||
| 82 | { "chdir", I_CHDIR }, | ||
| 83 | { "chgrp", I_CHGRP }, | ||
| 84 | { "chmod", I_CHMOD }, | ||
| 85 | { "chown", I_CHOWN }, | ||
| 86 | { "dir", I_LS }, | ||
| 87 | { "exit", I_QUIT }, | ||
| 88 | { "get", I_GET }, | ||
| 89 | { "mget", I_GET }, | ||
| 90 | { "help", I_HELP }, | ||
| 91 | { "lcd", I_LCHDIR }, | ||
| 92 | { "lchdir", I_LCHDIR }, | ||
| 93 | { "lls", I_LLS }, | ||
| 94 | { "lmkdir", I_LMKDIR }, | ||
| 95 | { "ln", I_SYMLINK }, | ||
| 96 | { "lpwd", I_LPWD }, | ||
| 97 | { "ls", I_LS }, | ||
| 98 | { "lumask", I_LUMASK }, | ||
| 99 | { "mkdir", I_MKDIR }, | ||
| 100 | { "put", I_PUT }, | ||
| 101 | { "mput", I_PUT }, | ||
| 102 | { "pwd", I_PWD }, | ||
| 103 | { "quit", I_QUIT }, | ||
| 104 | { "rename", I_RENAME }, | ||
| 105 | { "rm", I_RM }, | ||
| 106 | { "rmdir", I_RMDIR }, | ||
| 107 | { "symlink", I_SYMLINK }, | ||
| 108 | { "version", I_VERSION }, | ||
| 109 | { "!", I_SHELL }, | ||
| 110 | { "?", I_HELP }, | ||
| 111 | { NULL, -1} | ||
| 112 | }; | ||
| 113 | |||
| 114 | void | ||
| 115 | help(void) | ||
| 116 | { | ||
| 117 | printf("Available commands:\n"); | ||
| 118 | printf("cd path Change remote directory to 'path'\n"); | ||
| 119 | printf("lcd path Change local directory to 'path'\n"); | ||
| 120 | printf("chgrp grp path Change group of file 'path' to 'grp'\n"); | ||
| 121 | printf("chmod mode path Change permissions of file 'path' to 'mode'\n"); | ||
| 122 | printf("chown own path Change owner of file 'path' to 'own'\n"); | ||
| 123 | printf("help Display this help text\n"); | ||
| 124 | printf("get remote-path [local-path] Download file\n"); | ||
| 125 | printf("lls [ls-options [path]] Display local directory listing\n"); | ||
| 126 | printf("ln oldpath newpath Symlink remote file\n"); | ||
| 127 | printf("lmkdir path Create local directory\n"); | ||
| 128 | printf("lpwd Print local working directory\n"); | ||
| 129 | printf("ls [path] Display remote directory listing\n"); | ||
| 130 | printf("lumask umask Set local umask to 'umask'\n"); | ||
| 131 | printf("mkdir path Create remote directory\n"); | ||
| 132 | printf("put local-path [remote-path] Upload file\n"); | ||
| 133 | printf("pwd Display remote working directory\n"); | ||
| 134 | printf("exit Quit sftp\n"); | ||
| 135 | printf("quit Quit sftp\n"); | ||
| 136 | printf("rename oldpath newpath Rename remote file\n"); | ||
| 137 | printf("rmdir path Remove remote directory\n"); | ||
| 138 | printf("rm path Delete remote file\n"); | ||
| 139 | printf("symlink oldpath newpath Symlink remote file\n"); | ||
| 140 | printf("version Show SFTP version\n"); | ||
| 141 | printf("!command Execute 'command' in local shell\n"); | ||
| 142 | printf("! Escape to local shell\n"); | ||
| 143 | printf("? Synonym for help\n"); | ||
| 144 | } | ||
| 145 | |||
| 146 | void | ||
| 147 | local_do_shell(const char *args) | ||
| 148 | { | ||
| 149 | int status; | ||
| 150 | char *shell; | ||
| 151 | pid_t pid; | ||
| 152 | |||
| 153 | if (!*args) | ||
| 154 | args = NULL; | ||
| 155 | |||
| 156 | if ((shell = getenv("SHELL")) == NULL) | ||
| 157 | shell = _PATH_BSHELL; | ||
| 158 | |||
| 159 | if ((pid = fork()) == -1) | ||
| 160 | fatal("Couldn't fork: %s", strerror(errno)); | ||
| 161 | |||
| 162 | if (pid == 0) { | ||
| 163 | /* XXX: child has pipe fds to ssh subproc open - issue? */ | ||
| 164 | if (args) { | ||
| 165 | debug3("Executing %s -c \"%s\"", shell, args); | ||
| 166 | execl(shell, shell, "-c", args, NULL); | ||
| 167 | } else { | ||
| 168 | debug3("Executing %s", shell); | ||
| 169 | execl(shell, shell, NULL); | ||
| 170 | } | ||
| 171 | fprintf(stderr, "Couldn't execute \"%s\": %s\n", shell, | ||
| 172 | strerror(errno)); | ||
| 173 | _exit(1); | ||
| 174 | } | ||
| 175 | if (waitpid(pid, &status, 0) == -1) | ||
| 176 | fatal("Couldn't wait for child: %s", strerror(errno)); | ||
| 177 | if (!WIFEXITED(status)) | ||
| 178 | error("Shell exited abormally"); | ||
| 179 | else if (WEXITSTATUS(status)) | ||
| 180 | error("Shell exited with status %d", WEXITSTATUS(status)); | ||
| 181 | } | ||
| 182 | |||
| 183 | void | ||
| 184 | local_do_ls(const char *args) | ||
| 185 | { | ||
| 186 | if (!args || !*args) | ||
| 187 | local_do_shell(_PATH_LS); | ||
| 188 | else { | ||
| 189 | int len = strlen(_PATH_LS " ") + strlen(args) + 1; | ||
| 190 | char *buf = xmalloc(len); | ||
| 191 | |||
| 192 | /* XXX: quoting - rip quoting code from ftp? */ | ||
| 193 | snprintf(buf, len, _PATH_LS " %s", args); | ||
| 194 | local_do_shell(buf); | ||
| 195 | xfree(buf); | ||
| 196 | } | ||
| 197 | } | ||
| 198 | |||
| 199 | char * | ||
| 200 | path_append(char *p1, char *p2) | ||
| 201 | { | ||
| 202 | char *ret; | ||
| 203 | int len = strlen(p1) + strlen(p2) + 2; | ||
| 204 | |||
| 205 | ret = xmalloc(len); | ||
| 206 | strlcpy(ret, p1, len); | ||
| 207 | strlcat(ret, "/", len); | ||
| 208 | strlcat(ret, p2, len); | ||
| 209 | |||
| 210 | return(ret); | ||
| 211 | } | ||
| 212 | |||
| 213 | char * | ||
| 214 | make_absolute(char *p, char *pwd) | ||
| 215 | { | ||
| 216 | char *abs; | ||
| 217 | |||
| 218 | /* Derelativise */ | ||
| 219 | if (p && p[0] != '/') { | ||
| 220 | abs = path_append(pwd, p); | ||
| 221 | xfree(p); | ||
| 222 | return(abs); | ||
| 223 | } else | ||
| 224 | return(p); | ||
| 225 | } | ||
| 226 | |||
| 227 | int | ||
| 228 | infer_path(const char *p, char **ifp) | ||
| 229 | { | ||
| 230 | char *cp; | ||
| 231 | |||
| 232 | cp = strrchr(p, '/'); | ||
| 233 | if (cp == NULL) { | ||
| 234 | *ifp = xstrdup(p); | ||
| 235 | return(0); | ||
| 236 | } | ||
| 237 | |||
| 238 | if (!cp[1]) { | ||
| 239 | error("Invalid path"); | ||
| 240 | return(-1); | ||
| 241 | } | ||
| 242 | |||
| 243 | *ifp = xstrdup(cp + 1); | ||
| 244 | return(0); | ||
| 245 | } | ||
| 246 | |||
| 247 | int | ||
| 248 | parse_getput_flags(const char **cpp, int *pflag) | ||
| 249 | { | ||
| 250 | const char *cp = *cpp; | ||
| 251 | |||
| 252 | /* Check for flags */ | ||
| 253 | if (cp[0] == '-' && cp[1] && strchr(WHITESPACE, cp[2])) { | ||
| 254 | switch (cp[1]) { | ||
| 255 | case 'p': | ||
| 256 | case 'P': | ||
| 257 | *pflag = 1; | ||
| 258 | break; | ||
| 259 | default: | ||
| 260 | error("Invalid flag -%c", cp[1]); | ||
| 261 | return(-1); | ||
| 262 | } | ||
| 263 | cp += 2; | ||
| 264 | *cpp = cp + strspn(cp, WHITESPACE); | ||
| 265 | } | ||
| 266 | |||
| 267 | return(0); | ||
| 268 | } | ||
| 269 | |||
| 270 | int | ||
| 271 | get_pathname(const char **cpp, char **path) | ||
| 272 | { | ||
| 273 | const char *cp = *cpp, *end; | ||
| 274 | char quot; | ||
| 275 | int i; | ||
| 276 | |||
| 277 | cp += strspn(cp, WHITESPACE); | ||
| 278 | if (!*cp) { | ||
| 279 | *cpp = cp; | ||
| 280 | *path = NULL; | ||
| 281 | return (0); | ||
| 282 | } | ||
| 283 | |||
| 284 | /* Check for quoted filenames */ | ||
| 285 | if (*cp == '\"' || *cp == '\'') { | ||
| 286 | quot = *cp++; | ||
| 287 | |||
| 288 | end = strchr(cp, quot); | ||
| 289 | if (end == NULL) { | ||
| 290 | error("Unterminated quote"); | ||
| 291 | goto fail; | ||
| 292 | } | ||
| 293 | if (cp == end) { | ||
| 294 | error("Empty quotes"); | ||
| 295 | goto fail; | ||
| 296 | } | ||
| 297 | *cpp = end + 1 + strspn(end + 1, WHITESPACE); | ||
| 298 | } else { | ||
| 299 | /* Read to end of filename */ | ||
| 300 | end = strpbrk(cp, WHITESPACE); | ||
| 301 | if (end == NULL) | ||
| 302 | end = strchr(cp, '\0'); | ||
| 303 | *cpp = end + strspn(end, WHITESPACE); | ||
| 304 | } | ||
| 305 | |||
| 306 | i = end - cp; | ||
| 307 | |||
| 308 | *path = xmalloc(i + 1); | ||
| 309 | memcpy(*path, cp, i); | ||
| 310 | (*path)[i] = '\0'; | ||
| 311 | return(0); | ||
| 312 | |||
| 313 | fail: | ||
| 314 | *path = NULL; | ||
| 315 | return (-1); | ||
| 316 | } | ||
| 317 | |||
| 318 | int | ||
| 319 | is_dir(char *path) | ||
| 320 | { | ||
| 321 | struct stat sb; | ||
| 322 | |||
| 323 | /* XXX: report errors? */ | ||
| 324 | if (stat(path, &sb) == -1) | ||
| 325 | return(0); | ||
| 326 | |||
| 327 | return(sb.st_mode & S_IFDIR); | ||
| 328 | } | ||
| 329 | |||
| 330 | int | ||
| 331 | remote_is_dir(int in, int out, char *path) | ||
| 332 | { | ||
| 333 | Attrib *a; | ||
| 334 | |||
| 335 | /* XXX: report errors? */ | ||
| 336 | if ((a = do_stat(in, out, path, 1)) == NULL) | ||
| 337 | return(0); | ||
| 338 | if (!(a->flags & SSH2_FILEXFER_ATTR_PERMISSIONS)) | ||
| 339 | return(0); | ||
| 340 | return(a->perm & S_IFDIR); | ||
| 341 | } | ||
| 342 | |||
| 343 | int | ||
| 344 | process_get(int in, int out, char *src, char *dst, char *pwd, int pflag) | ||
| 345 | { | ||
| 346 | char *abs_src = NULL; | ||
| 347 | char *abs_dst = NULL; | ||
| 348 | char *tmp; | ||
| 349 | glob_t g; | ||
| 350 | int err = 0; | ||
| 351 | int i; | ||
| 352 | |||
| 353 | abs_src = xstrdup(src); | ||
| 354 | abs_src = make_absolute(abs_src, pwd); | ||
| 355 | |||
| 356 | memset(&g, 0, sizeof(g)); | ||
| 357 | debug3("Looking up %s", abs_src); | ||
| 358 | if (remote_glob(in, out, abs_src, 0, NULL, &g)) { | ||
| 359 | error("File \"%s\" not found.", abs_src); | ||
| 360 | err = -1; | ||
| 361 | goto out; | ||
| 362 | } | ||
| 363 | |||
| 364 | /* Only one match, dst may be file, directory or unspecified */ | ||
| 365 | if (g.gl_pathv[0] && g.gl_matchc == 1) { | ||
| 366 | if (dst) { | ||
| 367 | /* If directory specified, append filename */ | ||
| 368 | if (is_dir(dst)) { | ||
| 369 | if (infer_path(g.gl_pathv[0], &tmp)) { | ||
| 370 | err = 1; | ||
| 371 | goto out; | ||
| 372 | } | ||
| 373 | abs_dst = path_append(dst, tmp); | ||
| 374 | xfree(tmp); | ||
| 375 | } else | ||
| 376 | abs_dst = xstrdup(dst); | ||
| 377 | } else if (infer_path(g.gl_pathv[0], &abs_dst)) { | ||
| 378 | err = -1; | ||
| 379 | goto out; | ||
| 380 | } | ||
| 381 | printf("Fetching %s to %s\n", g.gl_pathv[0], abs_dst); | ||
| 382 | err = do_download(in, out, g.gl_pathv[0], abs_dst, pflag); | ||
| 383 | goto out; | ||
| 384 | } | ||
| 385 | |||
| 386 | /* Multiple matches, dst may be directory or unspecified */ | ||
| 387 | if (dst && !is_dir(dst)) { | ||
| 388 | error("Multiple files match, but \"%s\" is not a directory", | ||
| 389 | dst); | ||
| 390 | err = -1; | ||
| 391 | goto out; | ||
| 392 | } | ||
| 393 | |||
| 394 | for(i = 0; g.gl_pathv[i]; i++) { | ||
| 395 | if (infer_path(g.gl_pathv[i], &tmp)) { | ||
| 396 | err = -1; | ||
| 397 | goto out; | ||
| 398 | } | ||
| 399 | if (dst) { | ||
| 400 | abs_dst = path_append(dst, tmp); | ||
| 401 | xfree(tmp); | ||
| 402 | } else | ||
| 403 | abs_dst = tmp; | ||
| 404 | |||
| 405 | printf("Fetching %s to %s\n", g.gl_pathv[i], abs_dst); | ||
| 406 | if (do_download(in, out, g.gl_pathv[i], abs_dst, pflag) == -1) | ||
| 407 | err = -1; | ||
| 408 | xfree(abs_dst); | ||
| 409 | abs_dst = NULL; | ||
| 410 | } | ||
| 411 | |||
| 412 | out: | ||
| 413 | xfree(abs_src); | ||
| 414 | if (abs_dst) | ||
| 415 | xfree(abs_dst); | ||
| 416 | globfree(&g); | ||
| 417 | return(err); | ||
| 418 | } | ||
| 419 | |||
| 420 | int | ||
| 421 | process_put(int in, int out, char *src, char *dst, char *pwd, int pflag) | ||
| 422 | { | ||
| 423 | char *tmp_dst = NULL; | ||
| 424 | char *abs_dst = NULL; | ||
| 425 | char *tmp; | ||
| 426 | glob_t g; | ||
| 427 | int err = 0; | ||
| 428 | int i; | ||
| 429 | |||
| 430 | if (dst) { | ||
| 431 | tmp_dst = xstrdup(dst); | ||
| 432 | tmp_dst = make_absolute(tmp_dst, pwd); | ||
| 433 | } | ||
| 434 | |||
| 435 | memset(&g, 0, sizeof(g)); | ||
| 436 | debug3("Looking up %s", src); | ||
| 437 | if (glob(src, 0, NULL, &g)) { | ||
| 438 | error("File \"%s\" not found.", src); | ||
| 439 | err = -1; | ||
| 440 | goto out; | ||
| 441 | } | ||
| 442 | |||
| 443 | /* Only one match, dst may be file, directory or unspecified */ | ||
| 444 | if (g.gl_pathv[0] && g.gl_matchc == 1) { | ||
| 445 | if (tmp_dst) { | ||
| 446 | /* If directory specified, append filename */ | ||
| 447 | if (remote_is_dir(in, out, tmp_dst)) { | ||
| 448 | if (infer_path(g.gl_pathv[0], &tmp)) { | ||
| 449 | err = 1; | ||
| 450 | goto out; | ||
| 451 | } | ||
| 452 | abs_dst = path_append(tmp_dst, tmp); | ||
| 453 | xfree(tmp); | ||
| 454 | } else | ||
| 455 | abs_dst = xstrdup(tmp_dst); | ||
| 456 | } else { | ||
| 457 | if (infer_path(g.gl_pathv[0], &abs_dst)) { | ||
| 458 | err = -1; | ||
| 459 | goto out; | ||
| 460 | } | ||
| 461 | abs_dst = make_absolute(abs_dst, pwd); | ||
| 462 | } | ||
| 463 | printf("Uploading %s to %s\n", g.gl_pathv[0], abs_dst); | ||
| 464 | err = do_upload(in, out, g.gl_pathv[0], abs_dst, pflag); | ||
| 465 | goto out; | ||
| 466 | } | ||
| 467 | |||
| 468 | /* Multiple matches, dst may be directory or unspecified */ | ||
| 469 | if (tmp_dst && !remote_is_dir(in, out, tmp_dst)) { | ||
| 470 | error("Multiple files match, but \"%s\" is not a directory", | ||
| 471 | tmp_dst); | ||
| 472 | err = -1; | ||
| 473 | goto out; | ||
| 474 | } | ||
| 475 | |||
| 476 | for(i = 0; g.gl_pathv[i]; i++) { | ||
| 477 | if (infer_path(g.gl_pathv[i], &tmp)) { | ||
| 478 | err = -1; | ||
| 479 | goto out; | ||
| 480 | } | ||
| 481 | if (tmp_dst) { | ||
| 482 | abs_dst = path_append(tmp_dst, tmp); | ||
| 483 | xfree(tmp); | ||
| 484 | } else | ||
| 485 | abs_dst = make_absolute(tmp, pwd); | ||
| 486 | |||
| 487 | printf("Uploading %s to %s\n", g.gl_pathv[i], abs_dst); | ||
| 488 | if (do_upload(in, out, g.gl_pathv[i], abs_dst, pflag) == -1) | ||
| 489 | err = -1; | ||
| 490 | } | ||
| 491 | |||
| 492 | out: | ||
| 493 | if (abs_dst) | ||
| 494 | xfree(abs_dst); | ||
| 495 | if (tmp_dst) | ||
| 496 | xfree(tmp_dst); | ||
| 497 | return(err); | ||
| 498 | } | ||
| 499 | |||
| 500 | int | ||
| 501 | parse_args(const char **cpp, int *pflag, unsigned long *n_arg, | ||
| 502 | char **path1, char **path2) | ||
| 503 | { | ||
| 504 | const char *cmd, *cp = *cpp; | ||
| 505 | char *cp2; | ||
| 506 | int base = 0; | ||
| 507 | long l; | ||
| 508 | int i, cmdnum; | ||
| 509 | |||
| 510 | /* Skip leading whitespace */ | ||
| 511 | cp = cp + strspn(cp, WHITESPACE); | ||
| 512 | |||
| 513 | /* Ignore blank lines */ | ||
| 514 | if (!*cp) | ||
| 515 | return(-1); | ||
| 516 | |||
| 517 | /* Figure out which command we have */ | ||
| 518 | for(i = 0; cmds[i].c; i++) { | ||
| 519 | int cmdlen = strlen(cmds[i].c); | ||
| 520 | |||
| 521 | /* Check for command followed by whitespace */ | ||
| 522 | if (!strncasecmp(cp, cmds[i].c, cmdlen) && | ||
| 523 | strchr(WHITESPACE, cp[cmdlen])) { | ||
| 524 | cp += cmdlen; | ||
| 525 | cp = cp + strspn(cp, WHITESPACE); | ||
| 526 | break; | ||
| 527 | } | ||
| 528 | } | ||
| 529 | cmdnum = cmds[i].n; | ||
| 530 | cmd = cmds[i].c; | ||
| 531 | |||
| 532 | /* Special case */ | ||
| 533 | if (*cp == '!') { | ||
| 534 | cp++; | ||
| 535 | cmdnum = I_SHELL; | ||
| 536 | } else if (cmdnum == -1) { | ||
| 537 | error("Invalid command."); | ||
| 538 | return(-1); | ||
| 539 | } | ||
| 540 | |||
| 541 | /* Get arguments and parse flags */ | ||
| 542 | *pflag = *n_arg = 0; | ||
| 543 | *path1 = *path2 = NULL; | ||
| 544 | switch (cmdnum) { | ||
| 545 | case I_GET: | ||
| 546 | case I_PUT: | ||
| 547 | if (parse_getput_flags(&cp, pflag)) | ||
| 548 | return(-1); | ||
| 549 | /* Get first pathname (mandatory) */ | ||
| 550 | if (get_pathname(&cp, path1)) | ||
| 551 | return(-1); | ||
| 552 | if (*path1 == NULL) { | ||
| 553 | error("You must specify at least one path after a " | ||
| 554 | "%s command.", cmd); | ||
| 555 | return(-1); | ||
| 556 | } | ||
| 557 | /* Try to get second pathname (optional) */ | ||
| 558 | if (get_pathname(&cp, path2)) | ||
| 559 | return(-1); | ||
| 560 | break; | ||
| 561 | case I_RENAME: | ||
| 562 | case I_SYMLINK: | ||
| 563 | if (get_pathname(&cp, path1)) | ||
| 564 | return(-1); | ||
| 565 | if (get_pathname(&cp, path2)) | ||
| 566 | return(-1); | ||
| 567 | if (!*path1 || !*path2) { | ||
| 568 | error("You must specify two paths after a %s " | ||
| 569 | "command.", cmd); | ||
| 570 | return(-1); | ||
| 571 | } | ||
| 572 | break; | ||
| 573 | case I_RM: | ||
| 574 | case I_MKDIR: | ||
| 575 | case I_RMDIR: | ||
| 576 | case I_CHDIR: | ||
| 577 | case I_LCHDIR: | ||
| 578 | case I_LMKDIR: | ||
| 579 | /* Get pathname (mandatory) */ | ||
| 580 | if (get_pathname(&cp, path1)) | ||
| 581 | return(-1); | ||
| 582 | if (*path1 == NULL) { | ||
| 583 | error("You must specify a path after a %s command.", | ||
| 584 | cmd); | ||
| 585 | return(-1); | ||
| 586 | } | ||
| 587 | break; | ||
| 588 | case I_LS: | ||
| 589 | /* Path is optional */ | ||
| 590 | if (get_pathname(&cp, path1)) | ||
| 591 | return(-1); | ||
| 592 | break; | ||
| 593 | case I_LLS: | ||
| 594 | case I_SHELL: | ||
| 595 | /* Uses the rest of the line */ | ||
| 596 | break; | ||
| 597 | case I_LUMASK: | ||
| 598 | base = 8; | ||
| 599 | case I_CHMOD: | ||
| 600 | base = 8; | ||
| 601 | case I_CHOWN: | ||
| 602 | case I_CHGRP: | ||
| 603 | /* Get numeric arg (mandatory) */ | ||
| 604 | l = strtol(cp, &cp2, base); | ||
| 605 | if (cp2 == cp || ((l == LONG_MIN || l == LONG_MAX) && | ||
| 606 | errno == ERANGE) || l < 0) { | ||
| 607 | error("You must supply a numeric argument " | ||
| 608 | "to the %s command.", cmd); | ||
| 609 | return(-1); | ||
| 610 | } | ||
| 611 | cp = cp2; | ||
| 612 | *n_arg = l; | ||
| 613 | if (cmdnum == I_LUMASK && strchr(WHITESPACE, *cp)) | ||
| 614 | break; | ||
| 615 | if (cmdnum == I_LUMASK || !strchr(WHITESPACE, *cp)) { | ||
| 616 | error("You must supply a numeric argument " | ||
| 617 | "to the %s command.", cmd); | ||
| 618 | return(-1); | ||
| 619 | } | ||
| 620 | cp += strspn(cp, WHITESPACE); | ||
| 621 | |||
| 622 | /* Get pathname (mandatory) */ | ||
| 623 | if (get_pathname(&cp, path1)) | ||
| 624 | return(-1); | ||
| 625 | if (*path1 == NULL) { | ||
| 626 | error("You must specify a path after a %s command.", | ||
| 627 | cmd); | ||
| 628 | return(-1); | ||
| 629 | } | ||
| 630 | break; | ||
| 631 | case I_QUIT: | ||
| 632 | case I_PWD: | ||
| 633 | case I_LPWD: | ||
| 634 | case I_HELP: | ||
| 635 | case I_VERSION: | ||
| 636 | break; | ||
| 637 | default: | ||
| 638 | fatal("Command not implemented"); | ||
| 639 | } | ||
| 640 | |||
| 641 | *cpp = cp; | ||
| 642 | return(cmdnum); | ||
| 643 | } | ||
| 644 | |||
| 645 | int | ||
| 646 | parse_dispatch_command(int in, int out, const char *cmd, char **pwd) | ||
| 647 | { | ||
| 648 | char *path1, *path2, *tmp; | ||
| 649 | int pflag, cmdnum, i; | ||
| 650 | unsigned long n_arg; | ||
| 651 | Attrib a, *aa; | ||
| 652 | char path_buf[MAXPATHLEN]; | ||
| 653 | int err = 0; | ||
| 654 | glob_t g; | ||
| 655 | |||
| 656 | path1 = path2 = NULL; | ||
| 657 | cmdnum = parse_args(&cmd, &pflag, &n_arg, &path1, &path2); | ||
| 658 | |||
| 659 | memset(&g, 0, sizeof(g)); | ||
| 660 | |||
| 661 | /* Perform command */ | ||
| 662 | switch (cmdnum) { | ||
| 663 | case -1: | ||
| 664 | break; | ||
| 665 | case I_GET: | ||
| 666 | err = process_get(in, out, path1, path2, *pwd, pflag); | ||
| 667 | break; | ||
| 668 | case I_PUT: | ||
| 669 | err = process_put(in, out, path1, path2, *pwd, pflag); | ||
| 670 | break; | ||
| 671 | case I_RENAME: | ||
| 672 | path1 = make_absolute(path1, *pwd); | ||
| 673 | path2 = make_absolute(path2, *pwd); | ||
| 674 | err = do_rename(in, out, path1, path2); | ||
| 675 | break; | ||
| 676 | case I_SYMLINK: | ||
| 677 | if (version < 3) { | ||
| 678 | error("The server (version %d) does not support " | ||
| 679 | "this operation", version); | ||
| 680 | err = -1; | ||
| 681 | } else { | ||
| 682 | path2 = make_absolute(path2, *pwd); | ||
| 683 | err = do_symlink(in, out, path1, path2); | ||
| 684 | } | ||
| 685 | break; | ||
| 686 | case I_RM: | ||
| 687 | path1 = make_absolute(path1, *pwd); | ||
| 688 | remote_glob(in, out, path1, GLOB_NOCHECK, NULL, &g); | ||
| 689 | for(i = 0; g.gl_pathv[i]; i++) { | ||
| 690 | printf("Removing %s\n", g.gl_pathv[i]); | ||
| 691 | if (do_rm(in, out, g.gl_pathv[i]) == -1) | ||
| 692 | err = -1; | ||
| 693 | } | ||
| 694 | break; | ||
| 695 | case I_MKDIR: | ||
| 696 | path1 = make_absolute(path1, *pwd); | ||
| 697 | attrib_clear(&a); | ||
| 698 | a.flags |= SSH2_FILEXFER_ATTR_PERMISSIONS; | ||
| 699 | a.perm = 0777; | ||
| 700 | err = do_mkdir(in, out, path1, &a); | ||
| 701 | break; | ||
| 702 | case I_RMDIR: | ||
| 703 | path1 = make_absolute(path1, *pwd); | ||
| 704 | err = do_rmdir(in, out, path1); | ||
| 705 | break; | ||
| 706 | case I_CHDIR: | ||
| 707 | path1 = make_absolute(path1, *pwd); | ||
| 708 | if ((tmp = do_realpath(in, out, path1)) == NULL) { | ||
| 709 | err = 1; | ||
| 710 | break; | ||
| 711 | } | ||
| 712 | if ((aa = do_stat(in, out, tmp, 0)) == NULL) { | ||
| 713 | xfree(tmp); | ||
| 714 | err = 1; | ||
| 715 | break; | ||
| 716 | } | ||
| 717 | if (!(aa->flags & SSH2_FILEXFER_ATTR_PERMISSIONS)) { | ||
| 718 | error("Can't change directory: Can't check target"); | ||
| 719 | xfree(tmp); | ||
| 720 | err = 1; | ||
| 721 | break; | ||
| 722 | } | ||
| 723 | if (!S_ISDIR(aa->perm)) { | ||
| 724 | error("Can't change directory: \"%s\" is not " | ||
| 725 | "a directory", tmp); | ||
| 726 | xfree(tmp); | ||
| 727 | err = 1; | ||
| 728 | break; | ||
| 729 | } | ||
| 730 | xfree(*pwd); | ||
| 731 | *pwd = tmp; | ||
| 732 | break; | ||
| 733 | case I_LS: | ||
| 734 | if (!path1) { | ||
| 735 | do_ls(in, out, *pwd); | ||
| 736 | break; | ||
| 737 | } | ||
| 738 | path1 = make_absolute(path1, *pwd); | ||
| 739 | if ((tmp = do_realpath(in, out, path1)) == NULL) | ||
| 740 | break; | ||
| 741 | xfree(path1); | ||
| 742 | path1 = tmp; | ||
| 743 | if ((aa = do_stat(in, out, path1, 0)) == NULL) | ||
| 744 | break; | ||
| 745 | if ((aa->flags & SSH2_FILEXFER_ATTR_PERMISSIONS) && | ||
| 746 | !S_ISDIR(aa->perm)) { | ||
| 747 | error("Can't ls: \"%s\" is not a directory", path1); | ||
| 748 | break; | ||
| 749 | } | ||
| 750 | do_ls(in, out, path1); | ||
| 751 | break; | ||
| 752 | case I_LCHDIR: | ||
| 753 | if (chdir(path1) == -1) { | ||
| 754 | error("Couldn't change local directory to " | ||
| 755 | "\"%s\": %s", path1, strerror(errno)); | ||
| 756 | err = 1; | ||
| 757 | } | ||
| 758 | break; | ||
| 759 | case I_LMKDIR: | ||
| 760 | if (mkdir(path1, 0777) == -1) { | ||
| 761 | error("Couldn't create local directory " | ||
| 762 | "\"%s\": %s", path1, strerror(errno)); | ||
| 763 | err = 1; | ||
| 764 | } | ||
| 765 | break; | ||
| 766 | case I_LLS: | ||
| 767 | local_do_ls(cmd); | ||
| 768 | break; | ||
| 769 | case I_SHELL: | ||
| 770 | local_do_shell(cmd); | ||
| 771 | break; | ||
| 772 | case I_LUMASK: | ||
| 773 | umask(n_arg); | ||
| 774 | printf("Local umask: %03lo\n", n_arg); | ||
| 775 | break; | ||
| 776 | case I_CHMOD: | ||
| 777 | path1 = make_absolute(path1, *pwd); | ||
| 778 | attrib_clear(&a); | ||
| 779 | a.flags |= SSH2_FILEXFER_ATTR_PERMISSIONS; | ||
| 780 | a.perm = n_arg; | ||
| 781 | remote_glob(in, out, path1, GLOB_NOCHECK, NULL, &g); | ||
| 782 | for(i = 0; g.gl_pathv[i]; i++) { | ||
| 783 | printf("Changing mode on %s\n", g.gl_pathv[i]); | ||
| 784 | do_setstat(in, out, g.gl_pathv[i], &a); | ||
| 785 | } | ||
| 786 | break; | ||
| 787 | case I_CHOWN: | ||
| 788 | path1 = make_absolute(path1, *pwd); | ||
| 789 | remote_glob(in, out, path1, GLOB_NOCHECK, NULL, &g); | ||
| 790 | for(i = 0; g.gl_pathv[i]; i++) { | ||
| 791 | if (!(aa = do_stat(in, out, g.gl_pathv[i], 0))) | ||
| 792 | continue; | ||
| 793 | if (!(aa->flags & SSH2_FILEXFER_ATTR_UIDGID)) { | ||
| 794 | error("Can't get current ownership of " | ||
| 795 | "remote file \"%s\"", g.gl_pathv[i]); | ||
| 796 | continue; | ||
| 797 | } | ||
| 798 | printf("Changing owner on %s\n", g.gl_pathv[i]); | ||
| 799 | aa->flags &= SSH2_FILEXFER_ATTR_UIDGID; | ||
| 800 | aa->uid = n_arg; | ||
| 801 | do_setstat(in, out, g.gl_pathv[i], aa); | ||
| 802 | } | ||
| 803 | break; | ||
| 804 | case I_CHGRP: | ||
| 805 | path1 = make_absolute(path1, *pwd); | ||
| 806 | remote_glob(in, out, path1, GLOB_NOCHECK, NULL, &g); | ||
| 807 | for(i = 0; g.gl_pathv[i]; i++) { | ||
| 808 | if (!(aa = do_stat(in, out, g.gl_pathv[i], 0))) | ||
| 809 | continue; | ||
| 810 | if (!(aa->flags & SSH2_FILEXFER_ATTR_UIDGID)) { | ||
| 811 | error("Can't get current ownership of " | ||
| 812 | "remote file \"%s\"", g.gl_pathv[i]); | ||
| 813 | continue; | ||
| 814 | } | ||
| 815 | printf("Changing group on %s\n", g.gl_pathv[i]); | ||
| 816 | aa->flags &= SSH2_FILEXFER_ATTR_UIDGID; | ||
| 817 | aa->gid = n_arg; | ||
| 818 | do_setstat(in, out, g.gl_pathv[i], aa); | ||
| 819 | } | ||
| 820 | break; | ||
| 821 | case I_PWD: | ||
| 822 | printf("Remote working directory: %s\n", *pwd); | ||
| 823 | break; | ||
| 824 | case I_LPWD: | ||
| 825 | if (!getcwd(path_buf, sizeof(path_buf))) | ||
| 826 | error("Couldn't get local cwd: %s", | ||
| 827 | strerror(errno)); | ||
| 828 | else | ||
| 829 | printf("Local working directory: %s\n", | ||
| 830 | path_buf); | ||
| 831 | break; | ||
| 832 | case I_QUIT: | ||
| 833 | return(-1); | ||
| 834 | case I_HELP: | ||
| 835 | help(); | ||
| 836 | break; | ||
| 837 | case I_VERSION: | ||
| 838 | printf("SFTP protocol version %d\n", version); | ||
| 839 | break; | ||
| 840 | default: | ||
| 841 | fatal("%d is not implemented", cmdnum); | ||
| 842 | } | ||
| 843 | |||
| 844 | if (g.gl_pathc) | ||
| 845 | globfree(&g); | ||
| 846 | if (path1) | ||
| 847 | xfree(path1); | ||
| 848 | if (path2) | ||
| 849 | xfree(path2); | ||
| 850 | |||
| 851 | /* If an error occurs in batch mode we should abort. */ | ||
| 852 | if (infile != stdin && err > 0) | ||
| 853 | return -1; | ||
| 854 | |||
| 855 | return(0); | ||
| 856 | } | ||
| 857 | |||
| 858 | void | ||
| 859 | interactive_loop(int fd_in, int fd_out, char *file1, char *file2) | ||
| 860 | { | ||
| 861 | char *pwd; | ||
| 862 | char *dir = NULL; | ||
| 863 | char cmd[2048]; | ||
| 864 | |||
| 865 | version = do_init(fd_in, fd_out); | ||
| 866 | if (version == -1) | ||
| 867 | fatal("Couldn't initialise connection to server"); | ||
| 868 | |||
| 869 | pwd = do_realpath(fd_in, fd_out, "."); | ||
| 870 | if (pwd == NULL) | ||
| 871 | fatal("Need cwd"); | ||
| 872 | |||
| 873 | if (file1 != NULL) { | ||
| 874 | dir = xstrdup(file1); | ||
| 875 | dir = make_absolute(dir, pwd); | ||
| 876 | |||
| 877 | if (remote_is_dir(fd_in, fd_out, dir) && file2 == NULL) { | ||
| 878 | printf("Changing to: %s\n", dir); | ||
| 879 | snprintf(cmd, sizeof cmd, "cd \"%s\"", dir); | ||
| 880 | parse_dispatch_command(fd_in, fd_out, cmd, &pwd); | ||
| 881 | } else { | ||
| 882 | if (file2 == NULL) | ||
| 883 | snprintf(cmd, sizeof cmd, "get %s", dir); | ||
| 884 | else | ||
| 885 | snprintf(cmd, sizeof cmd, "get %s %s", dir, | ||
| 886 | file2); | ||
| 887 | |||
| 888 | parse_dispatch_command(fd_in, fd_out, cmd, &pwd); | ||
| 889 | return; | ||
| 890 | } | ||
| 891 | } | ||
| 892 | setvbuf(stdout, NULL, _IOLBF, 0); | ||
| 893 | setvbuf(infile, NULL, _IOLBF, 0); | ||
| 894 | |||
| 895 | for(;;) { | ||
| 896 | char *cp; | ||
| 897 | |||
| 898 | printf("sftp> "); | ||
| 899 | |||
| 900 | /* XXX: use libedit */ | ||
| 901 | if (fgets(cmd, sizeof(cmd), infile) == NULL) { | ||
| 902 | printf("\n"); | ||
| 903 | break; | ||
| 904 | } else if (infile != stdin) /* Bluff typing */ | ||
| 905 | printf("%s", cmd); | ||
| 906 | |||
| 907 | cp = strrchr(cmd, '\n'); | ||
| 908 | if (cp) | ||
| 909 | *cp = '\0'; | ||
| 910 | |||
| 911 | if (parse_dispatch_command(fd_in, fd_out, cmd, &pwd)) | ||
| 912 | break; | ||
| 913 | } | ||
| 914 | xfree(pwd); | ||
| 915 | } | ||
