1 /* $OpenBSD: sftp-client.c,v 1.94 2010/12/04 00:18:01 djm Exp $ */ 2 /* 3 * Copyright (c) 2001-2004 Damien Miller <djm (at) openbsd.org> 4 * 5 * Permission to use, copy, modify, and distribute this software for any 6 * purpose with or without fee is hereby granted, provided that the above 7 * copyright notice and this permission notice appear in all copies. 8 * 9 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES 10 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF 11 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR 12 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES 13 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN 14 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF 15 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. 16 */ 17 18 /* XXX: memleaks */ 19 /* XXX: signed vs unsigned */ 20 /* XXX: remove all logging, only return status codes */ 21 /* XXX: copy between two remote sites */ 22 23 #include "includes.h" 24 25 #include <sys/types.h> 26 #include <sys/param.h> 27 #ifdef HAVE_SYS_STATVFS_H 28 #include <sys/statvfs.h> 29 #endif 30 #include "openbsd-compat/sys-queue.h" 31 #ifdef HAVE_SYS_STAT_H 32 # include <sys/stat.h> 33 #endif 34 #ifdef HAVE_SYS_TIME_H 35 # include <sys/time.h> 36 #endif 37 #include <sys/uio.h> 38 39 #include <dirent.h> 40 #include <errno.h> 41 #include <fcntl.h> 42 #include <signal.h> 43 #include <stdarg.h> 44 #include <stdio.h> 45 #include <string.h> 46 #include <unistd.h> 47 48 #include "xmalloc.h" 49 #include "buffer.h" 50 #include "log.h" 51 #include "atomicio.h" 52 #include "progressmeter.h" 53 #include "misc.h" 54 55 #include "sftp.h" 56 #include "sftp-common.h" 57 #include "sftp-client.h" 58 59 extern volatile sig_atomic_t interrupted; 60 extern int showprogress; 61 62 /* Minimum amount of data to read at a time */ 63 #define MIN_READ_SIZE 512 64 65 /* Maximum depth to descend in directory trees */ 66 #define MAX_DIR_DEPTH 64 67 68 struct sftp_conn { 69 int fd_in; 70 int fd_out; 71 u_int transfer_buflen; 72 u_int num_requests; 73 u_int version; 74 u_int msg_id; 75 #define SFTP_EXT_POSIX_RENAME 0x00000001 76 #define SFTP_EXT_STATVFS 0x00000002 77 #define SFTP_EXT_FSTATVFS 0x00000004 78 #define SFTP_EXT_HARDLINK 0x00000008 79 u_int exts; 80 u_int64_t limit_kbps; 81 struct bwlimit bwlimit_in, bwlimit_out; 82 }; 83 84 static char * 85 get_handle(struct sftp_conn *conn, u_int expected_id, u_int *len, 86 const char *errfmt, ...) __attribute__((format(printf, 4, 5))); 87 88 /* ARGSUSED */ 89 static int 90 sftpio(void *_bwlimit, size_t amount) 91 { 92 struct bwlimit *bwlimit = (struct bwlimit *)_bwlimit; 93 94 bandwidth_limit(bwlimit, amount); 95 return 0; 96 } 97 98 static void 99 send_msg(struct sftp_conn *conn, Buffer *m) 100 { 101 u_char mlen[4]; 102 struct iovec iov[2]; 103 104 if (buffer_len(m) > SFTP_MAX_MSG_LENGTH) 105 fatal("Outbound message too long %u", buffer_len(m)); 106 107 /* Send length first */ 108 put_u32(mlen, buffer_len(m)); 109 iov[0].iov_base = mlen; 110 iov[0].iov_len = sizeof(mlen); 111 iov[1].iov_base = buffer_ptr(m); 112 iov[1].iov_len = buffer_len(m); 113 114 if (atomiciov6(writev, conn->fd_out, iov, 2, 115 conn->limit_kbps > 0 ? sftpio : NULL, &conn->bwlimit_out) != 116 buffer_len(m) + sizeof(mlen)) 117 fatal("Couldn't send packet: %s", strerror(errno)); 118 119 buffer_clear(m); 120 } 121 122 static void 123 get_msg(struct sftp_conn *conn, Buffer *m) 124 { 125 u_int msg_len; 126 127 buffer_append_space(m, 4); 128 if (atomicio6(read, conn->fd_in, buffer_ptr(m), 4, 129 conn->limit_kbps > 0 ? sftpio : NULL, &conn->bwlimit_in) != 4) { 130 if (errno == EPIPE) 131 fatal("Connection closed"); 132 else 133 fatal("Couldn't read packet: %s", strerror(errno)); 134 } 135 136 msg_len = buffer_get_int(m); 137 if (msg_len > SFTP_MAX_MSG_LENGTH) 138 fatal("Received message too long %u", msg_len); 139 140 buffer_append_space(m, msg_len); 141 if (atomicio6(read, conn->fd_in, buffer_ptr(m), msg_len, 142 conn->limit_kbps > 0 ? sftpio : NULL, &conn->bwlimit_in) 143 != msg_len) { 144 if (errno == EPIPE) 145 fatal("Connection closed"); 146 else 147 fatal("Read packet: %s", strerror(errno)); 148 } 149 } 150 151 static void 152 send_string_request(struct sftp_conn *conn, u_int id, u_int code, char *s, 153 u_int len) 154 { 155 Buffer msg; 156 157 buffer_init(&msg); 158 buffer_put_char(&msg, code); 159 buffer_put_int(&msg, id); 160 buffer_put_string(&msg, s, len); 161 send_msg(conn, &msg); 162 debug3("Sent message fd %d T:%u I:%u", conn->fd_out, code, id); 163 buffer_free(&msg); 164 } 165 166 static void 167 send_string_attrs_request(struct sftp_conn *conn, u_int id, u_int code, 168 char *s, u_int len, Attrib *a) 169 { 170 Buffer msg; 171 172 buffer_init(&msg); 173 buffer_put_char(&msg, code); 174 buffer_put_int(&msg, id); 175 buffer_put_string(&msg, s, len); 176 encode_attrib(&msg, a); 177 send_msg(conn, &msg); 178 debug3("Sent message fd %d T:%u I:%u", conn->fd_out, code, id); 179 buffer_free(&msg); 180 } 181 182 static u_int 183 get_status(struct sftp_conn *conn, u_int expected_id) 184 { 185 Buffer msg; 186 u_int type, id, status; 187 188 buffer_init(&msg); 189 get_msg(conn, &msg); 190 type = buffer_get_char(&msg); 191 id = buffer_get_int(&msg); 192 193 if (id != expected_id) 194 fatal("ID mismatch (%u != %u)", id, expected_id); 195 if (type != SSH2_FXP_STATUS) 196 fatal("Expected SSH2_FXP_STATUS(%u) packet, got %u", 197 SSH2_FXP_STATUS, type); 198 199 status = buffer_get_int(&msg); 200 buffer_free(&msg); 201 202 debug3("SSH2_FXP_STATUS %u", status); 203 204 return status; 205 } 206 207 static char * 208 get_handle(struct sftp_conn *conn, u_int expected_id, u_int *len, 209 const char *errfmt, ...) 210 { 211 Buffer msg; 212 u_int type, id; 213 char *handle, errmsg[256]; 214 va_list args; 215 int status; 216 217 va_start(args, errfmt); 218 if (errfmt != NULL) 219 vsnprintf(errmsg, sizeof(errmsg), errfmt, args); 220 va_end(args); 221 222 buffer_init(&msg); 223 get_msg(conn, &msg); 224 type = buffer_get_char(&msg); 225 id = buffer_get_int(&msg); 226 227 if (id != expected_id) 228 fatal("%s: ID mismatch (%u != %u)", 229 errfmt == NULL ? __func__ : errmsg, id, expected_id); 230 if (type == SSH2_FXP_STATUS) { 231 status = buffer_get_int(&msg); 232 if (errfmt != NULL) 233 error("%s: %s", errmsg, fx2txt(status)); 234 buffer_free(&msg); 235 return(NULL); 236 } else if (type != SSH2_FXP_HANDLE) 237 fatal("%s: Expected SSH2_FXP_HANDLE(%u) packet, got %u", 238 errfmt == NULL ? __func__ : errmsg, SSH2_FXP_HANDLE, type); 239 240 handle = buffer_get_string(&msg, len); 241 buffer_free(&msg); 242 243 return(handle); 244 } 245 246 static Attrib * 247 get_decode_stat(struct sftp_conn *conn, u_int expected_id, int quiet) 248 { 249 Buffer msg; 250 u_int type, id; 251 Attrib *a; 252 253 buffer_init(&msg); 254 get_msg(conn, &msg); 255 256 type = buffer_get_char(&msg); 257 id = buffer_get_int(&msg); 258 259 debug3("Received stat reply T:%u I:%u", type, id); 260 if (id != expected_id) 261 fatal("ID mismatch (%u != %u)", id, expected_id); 262 if (type == SSH2_FXP_STATUS) { 263 int status = buffer_get_int(&msg); 264 265 if (quiet) 266 debug("Couldn't stat remote file: %s", fx2txt(status)); 267 else 268 error("Couldn't stat remote file: %s", fx2txt(status)); 269 buffer_free(&msg); 270 return(NULL); 271 } else if (type != SSH2_FXP_ATTRS) { 272 fatal("Expected SSH2_FXP_ATTRS(%u) packet, got %u", 273 SSH2_FXP_ATTRS, type); 274 } 275 a = decode_attrib(&msg); 276 buffer_free(&msg); 277 278 return(a); 279 } 280 281 static int 282 get_decode_statvfs(struct sftp_conn *conn, struct sftp_statvfs *st, 283 u_int expected_id, int quiet) 284 { 285 Buffer msg; 286 u_int type, id, flag; 287 288 buffer_init(&msg); 289 get_msg(conn, &msg); 290 291 type = buffer_get_char(&msg); 292 id = buffer_get_int(&msg); 293 294 debug3("Received statvfs reply T:%u I:%u", type, id); 295 if (id != expected_id) 296 fatal("ID mismatch (%u != %u)", id, expected_id); 297 if (type == SSH2_FXP_STATUS) { 298 int status = buffer_get_int(&msg); 299 300 if (quiet) 301 debug("Couldn't statvfs: %s", fx2txt(status)); 302 else 303 error("Couldn't statvfs: %s", fx2txt(status)); 304 buffer_free(&msg); 305 return -1; 306 } else if (type != SSH2_FXP_EXTENDED_REPLY) { 307 fatal("Expected SSH2_FXP_EXTENDED_REPLY(%u) packet, got %u", 308 SSH2_FXP_EXTENDED_REPLY, type); 309 } 310 311 bzero(st, sizeof(*st)); 312 st->f_bsize = buffer_get_int64(&msg); 313 st->f_frsize = buffer_get_int64(&msg); 314 st->f_blocks = buffer_get_int64(&msg); 315 st->f_bfree = buffer_get_int64(&msg); 316 st->f_bavail = buffer_get_int64(&msg); 317 st->f_files = buffer_get_int64(&msg); 318 st->f_ffree = buffer_get_int64(&msg); 319 st->f_favail = buffer_get_int64(&msg); 320 st->f_fsid = buffer_get_int64(&msg); 321 flag = buffer_get_int64(&msg); 322 st->f_namemax = buffer_get_int64(&msg); 323 324 st->f_flag = (flag & SSH2_FXE_STATVFS_ST_RDONLY) ? ST_RDONLY : 0; 325 st->f_flag |= (flag & SSH2_FXE_STATVFS_ST_NOSUID) ? ST_NOSUID : 0; 326 327 buffer_free(&msg); 328 329 return 0; 330 } 331 332 struct sftp_conn * 333 do_init(int fd_in, int fd_out, u_int transfer_buflen, u_int num_requests, 334 u_int64_t limit_kbps) 335 { 336 u_int type; 337 Buffer msg; 338 struct sftp_conn *ret; 339 340 ret = xmalloc(sizeof(*ret)); 341 ret->fd_in = fd_in; 342 ret->fd_out = fd_out; 343 ret->transfer_buflen = transfer_buflen; 344 ret->num_requests = num_requests; 345 ret->exts = 0; 346 ret->limit_kbps = 0; 347 348 buffer_init(&msg); 349 buffer_put_char(&msg, SSH2_FXP_INIT); 350 buffer_put_int(&msg, SSH2_FILEXFER_VERSION); 351 send_msg(ret, &msg); 352 353 buffer_clear(&msg); 354 355 get_msg(ret, &msg); 356 357 /* Expecting a VERSION reply */ 358 if ((type = buffer_get_char(&msg)) != SSH2_FXP_VERSION) { 359 error("Invalid packet back from SSH2_FXP_INIT (type %u)", 360 type); 361 buffer_free(&msg); 362 return(NULL); 363 } 364 ret->version = buffer_get_int(&msg); 365 366 debug2("Remote version: %u", ret->version); 367 368 /* Check for extensions */ 369 while (buffer_len(&msg) > 0) { 370 char *name = buffer_get_string(&msg, NULL); 371 char *value = buffer_get_string(&msg, NULL); 372 int known = 0; 373 374 if (strcmp(name, "posix-rename (at) openssh.com") == 0 && 375 strcmp(value, "1") == 0) { 376 ret->exts |= SFTP_EXT_POSIX_RENAME; 377 known = 1; 378 } else if (strcmp(name, "statvfs (at) openssh.com") == 0 && 379 strcmp(value, "2") == 0) { 380 ret->exts |= SFTP_EXT_STATVFS; 381 known = 1; 382 } else if (strcmp(name, "fstatvfs (at) openssh.com") == 0 && 383 strcmp(value, "2") == 0) { 384 ret->exts |= SFTP_EXT_FSTATVFS; 385 known = 1; 386 } else if (strcmp(name, "hardlink (at) openssh.com") == 0 && 387 strcmp(value, "1") == 0) { 388 ret->exts |= SFTP_EXT_HARDLINK; 389 known = 1; 390 } 391 if (known) { 392 debug2("Server supports extension \"%s\" revision %s", 393 name, value); 394 } else { 395 debug2("Unrecognised server extension \"%s\"", name); 396 } 397 xfree(name); 398 xfree(value); 399 } 400 401 buffer_free(&msg); 402 403 /* Some filexfer v.0 servers don't support large packets */ 404 if (ret->version == 0) 405 ret->transfer_buflen = MIN(ret->transfer_buflen, 20480); 406 407 ret->limit_kbps = limit_kbps; 408 if (ret->limit_kbps > 0) { 409 bandwidth_limit_init(&ret->bwlimit_in, ret->limit_kbps, 410 ret->transfer_buflen); 411 bandwidth_limit_init(&ret->bwlimit_out, ret->limit_kbps, 412 ret->transfer_buflen); 413 } 414 415 return ret; 416 } 417 418 u_int 419 sftp_proto_version(struct sftp_conn *conn) 420 { 421 return conn->version; 422 } 423 424 int 425 do_close(struct sftp_conn *conn, char *handle, u_int handle_len) 426 { 427 u_int id, status; 428 Buffer msg; 429 430 buffer_init(&msg); 431 432 id = conn->msg_id++; 433 buffer_put_char(&msg, SSH2_FXP_CLOSE); 434 buffer_put_int(&msg, id); 435 buffer_put_string(&msg, handle, handle_len); 436 send_msg(conn, &msg); 437 debug3("Sent message SSH2_FXP_CLOSE I:%u", id); 438 439 status = get_status(conn, id); 440 if (status != SSH2_FX_OK) 441 error("Couldn't close file: %s", fx2txt(status)); 442 443 buffer_free(&msg); 444 445 return status; 446 } 447 448 449 static int 450 do_lsreaddir(struct sftp_conn *conn, char *path, int printflag, 451 SFTP_DIRENT ***dir) 452 { 453 Buffer msg; 454 u_int count, type, id, handle_len, i, expected_id, ents = 0; 455 char *handle; 456 457 id = conn->msg_id++; 458 459 buffer_init(&msg); 460 buffer_put_char(&msg, SSH2_FXP_OPENDIR); 461 buffer_put_int(&msg, id); 462 buffer_put_cstring(&msg, path); 463 send_msg(conn, &msg); 464 465 buffer_clear(&msg); 466 467 handle = get_handle(conn, id, &handle_len, 468 "remote readdir(\"%s\")", path); 469 if (handle == NULL) 470 return -1; 471 472 if (dir) { 473 ents = 0; 474 *dir = xmalloc(sizeof(**dir)); 475 (*dir)[0] = NULL; 476 } 477 478 for (; !interrupted;) { 479 id = expected_id = conn->msg_id++; 480 481 debug3("Sending SSH2_FXP_READDIR I:%u", id); 482 483 buffer_clear(&msg); 484 buffer_put_char(&msg, SSH2_FXP_READDIR); 485 buffer_put_int(&msg, id); 486 buffer_put_string(&msg, handle, handle_len); 487 send_msg(conn, &msg); 488 489 buffer_clear(&msg); 490 491 get_msg(conn, &msg); 492 493 type = buffer_get_char(&msg); 494 id = buffer_get_int(&msg); 495 496 debug3("Received reply T:%u I:%u", type, id); 497 498 if (id != expected_id) 499 fatal("ID mismatch (%u != %u)", id, expected_id); 500 501 if (type == SSH2_FXP_STATUS) { 502 int status = buffer_get_int(&msg); 503 504 debug3("Received SSH2_FXP_STATUS %d", status); 505 506 if (status == SSH2_FX_EOF) { 507 break; 508 } else { 509 error("Couldn't read directory: %s", 510 fx2txt(status)); 511 do_close(conn, handle, handle_len); 512 xfree(handle); 513 return(status); 514 } 515 } else if (type != SSH2_FXP_NAME) 516 fatal("Expected SSH2_FXP_NAME(%u) packet, got %u", 517 SSH2_FXP_NAME, type); 518 519 count = buffer_get_int(&msg); 520 if (count == 0) 521 break; 522 debug3("Received %d SSH2_FXP_NAME responses", count); 523 for (i = 0; i < count; i++) { 524 char *filename, *longname; 525 Attrib *a; 526 527 filename = buffer_get_string(&msg, NULL); 528 longname = buffer_get_string(&msg, NULL); 529 a = decode_attrib(&msg); 530 531 if (printflag) 532 printf("%s\n", longname); 533 534 /* 535 * Directory entries should never contain '/' 536 * These can be used to attack recursive ops 537 * (e.g. send '../../../../etc/passwd') 538 */ 539 if (strchr(filename, '/') != NULL) { 540 error("Server sent suspect path \"%s\" " 541 "during readdir of \"%s\"", filename, path); 542 goto next; 543 } 544 545 if (dir) { 546 *dir = xrealloc(*dir, ents + 2, sizeof(**dir)); 547 (*dir)[ents] = xmalloc(sizeof(***dir)); 548 (*dir)[ents]->filename = xstrdup(filename); 549 (*dir)[ents]->longname = xstrdup(longname); 550 memcpy(&(*dir)[ents]->a, a, sizeof(*a)); 551 (*dir)[++ents] = NULL; 552 } 553 next: 554 xfree(filename); 555 xfree(longname); 556 } 557 } 558 559 buffer_free(&msg); 560 do_close(conn, handle, handle_len); 561 xfree(handle); 562 563 /* Don't return partial matches on interrupt */ 564 if (interrupted && dir != NULL && *dir != NULL) { 565 free_sftp_dirents(*dir); 566 *dir = xmalloc(sizeof(**dir)); 567 **dir = NULL; 568 } 569 570 return 0; 571 } 572 573 int 574 do_readdir(struct sftp_conn *conn, char *path, SFTP_DIRENT ***dir) 575 { 576 return(do_lsreaddir(conn, path, 0, dir)); 577 } 578 579 void free_sftp_dirents(SFTP_DIRENT **s) 580 { 581 int i; 582 583 for (i = 0; s[i]; i++) { 584 xfree(s[i]->filename); 585 xfree(s[i]->longname); 586 xfree(s[i]); 587 } 588 xfree(s); 589 } 590 591 int 592 do_rm(struct sftp_conn *conn, char *path) 593 { 594 u_int status, id; 595 596 debug2("Sending SSH2_FXP_REMOVE \"%s\"", path); 597 598 id = conn->msg_id++; 599 send_string_request(conn, id, SSH2_FXP_REMOVE, path, strlen(path)); 600 status = get_status(conn, id); 601 if (status != SSH2_FX_OK) 602 error("Couldn't delete file: %s", fx2txt(status)); 603 return(status); 604 } 605 606 int 607 do_mkdir(struct sftp_conn *conn, char *path, Attrib *a, int printflag) 608 { 609 u_int status, id; 610 611 id = conn->msg_id++; 612 send_string_attrs_request(conn, id, SSH2_FXP_MKDIR, path, 613 strlen(path), a); 614 615 status = get_status(conn, id); 616 if (status != SSH2_FX_OK && printflag) 617 error("Couldn't create directory: %s", fx2txt(status)); 618 619 return(status); 620 } 621 622 int 623 do_rmdir(struct sftp_conn *conn, char *path) 624 { 625 u_int status, id; 626 627 id = conn->msg_id++; 628 send_string_request(conn, id, SSH2_FXP_RMDIR, path, 629 strlen(path)); 630 631 status = get_status(conn, id); 632 if (status != SSH2_FX_OK) 633 error("Couldn't remove directory: %s", fx2txt(status)); 634 635 return(status); 636 } 637 638 Attrib * 639 do_stat(struct sftp_conn *conn, char *path, int quiet) 640 { 641 u_int id; 642 643 id = conn->msg_id++; 644 645 send_string_request(conn, id, 646 conn->version == 0 ? SSH2_FXP_STAT_VERSION_0 : SSH2_FXP_STAT, 647 path, strlen(path)); 648 649 return(get_decode_stat(conn, id, quiet)); 650 } 651 652 Attrib * 653 do_lstat(struct sftp_conn *conn, char *path, int quiet) 654 { 655 u_int id; 656 657 if (conn->version == 0) { 658 if (quiet) 659 debug("Server version does not support lstat operation"); 660 else 661 logit("Server version does not support lstat operation"); 662 return(do_stat(conn, path, quiet)); 663 } 664 665 id = conn->msg_id++; 666 send_string_request(conn, id, SSH2_FXP_LSTAT, path, 667 strlen(path)); 668 669 return(get_decode_stat(conn, id, quiet)); 670 } 671 672 #ifdef notyet 673 Attrib * 674 do_fstat(struct sftp_conn *conn, char *handle, u_int handle_len, int quiet) 675 { 676 u_int id; 677 678 id = conn->msg_id++; 679 send_string_request(conn, id, SSH2_FXP_FSTAT, handle, 680 handle_len); 681 682 return(get_decode_stat(conn, id, quiet)); 683 } 684 #endif 685 686 int 687 do_setstat(struct sftp_conn *conn, char *path, Attrib *a) 688 { 689 u_int status, id; 690 691 id = conn->msg_id++; 692 send_string_attrs_request(conn, id, SSH2_FXP_SETSTAT, path, 693 strlen(path), a); 694 695 status = get_status(conn, id); 696 if (status != SSH2_FX_OK) 697 error("Couldn't setstat on \"%s\": %s", path, 698 fx2txt(status)); 699 700 return(status); 701 } 702 703 int 704 do_fsetstat(struct sftp_conn *conn, char *handle, u_int handle_len, 705 Attrib *a) 706 { 707 u_int status, id; 708 709 id = conn->msg_id++; 710 send_string_attrs_request(conn, id, SSH2_FXP_FSETSTAT, handle, 711 handle_len, a); 712 713 status = get_status(conn, id); 714 if (status != SSH2_FX_OK) 715 error("Couldn't fsetstat: %s", fx2txt(status)); 716 717 return(status); 718 } 719 720 char * 721 do_realpath(struct sftp_conn *conn, char *path) 722 { 723 Buffer msg; 724 u_int type, expected_id, count, id; 725 char *filename, *longname; 726 Attrib *a; 727 728 expected_id = id = conn->msg_id++; 729 send_string_request(conn, id, SSH2_FXP_REALPATH, path, 730 strlen(path)); 731 732 buffer_init(&msg); 733 734 get_msg(conn, &msg); 735 type = buffer_get_char(&msg); 736 id = buffer_get_int(&msg); 737 738 if (id != expected_id) 739 fatal("ID mismatch (%u != %u)", id, expected_id); 740 741 if (type == SSH2_FXP_STATUS) { 742 u_int status = buffer_get_int(&msg); 743 744 error("Couldn't canonicalise: %s", fx2txt(status)); 745 buffer_free(&msg); 746 return NULL; 747 } else if (type != SSH2_FXP_NAME) 748 fatal("Expected SSH2_FXP_NAME(%u) packet, got %u", 749 SSH2_FXP_NAME, type); 750 751 count = buffer_get_int(&msg); 752 if (count != 1) 753 fatal("Got multiple names (%d) from SSH_FXP_REALPATH", count); 754 755 filename = buffer_get_string(&msg, NULL); 756 longname = buffer_get_string(&msg, NULL); 757 a = decode_attrib(&msg); 758 759 debug3("SSH_FXP_REALPATH %s -> %s", path, filename); 760 761 xfree(longname); 762 763 buffer_free(&msg); 764 765 return(filename); 766 } 767 768 int 769 do_rename(struct sftp_conn *conn, char *oldpath, char *newpath) 770 { 771 Buffer msg; 772 u_int status, id; 773 774 buffer_init(&msg); 775 776 /* Send rename request */ 777 id = conn->msg_id++; 778 if ((conn->exts & SFTP_EXT_POSIX_RENAME)) { 779 buffer_put_char(&msg, SSH2_FXP_EXTENDED); 780 buffer_put_int(&msg, id); 781 buffer_put_cstring(&msg, "posix-rename (at) openssh.com"); 782 } else { 783 buffer_put_char(&msg, SSH2_FXP_RENAME); 784 buffer_put_int(&msg, id); 785 } 786 buffer_put_cstring(&msg, oldpath); 787 buffer_put_cstring(&msg, newpath); 788 send_msg(conn, &msg); 789 debug3("Sent message %s \"%s\" -> \"%s\"", 790 (conn->exts & SFTP_EXT_POSIX_RENAME) ? "posix-rename (at) openssh.com" : 791 "SSH2_FXP_RENAME", oldpath, newpath); 792 buffer_free(&msg); 793 794 status = get_status(conn, id); 795 if (status != SSH2_FX_OK) 796 error("Couldn't rename file \"%s\" to \"%s\": %s", oldpath, 797 newpath, fx2txt(status)); 798 799 return(status); 800 } 801 802 int 803 do_hardlink(struct sftp_conn *conn, char *oldpath, char *newpath) 804 { 805 Buffer msg; 806 u_int status, id; 807 808 buffer_init(&msg); 809 810 /* Send link request */ 811 id = conn->msg_id++; 812 if ((conn->exts & SFTP_EXT_HARDLINK) == 0) { 813 error("Server does not support hardlink (at) openssh.com extension"); 814 return -1; 815 } 816 817 buffer_put_char(&msg, SSH2_FXP_EXTENDED); 818 buffer_put_int(&msg, id); 819 buffer_put_cstring(&msg, "hardlink (at) openssh.com"); 820 buffer_put_cstring(&msg, oldpath); 821 buffer_put_cstring(&msg, newpath); 822 send_msg(conn, &msg); 823 debug3("Sent message hardlink (at) openssh.com \"%s\" -> \"%s\"", 824 oldpath, newpath); 825 buffer_free(&msg); 826 827 status = get_status(conn, id); 828 if (status != SSH2_FX_OK) 829 error("Couldn't link file \"%s\" to \"%s\": %s", oldpath, 830 newpath, fx2txt(status)); 831 832 return(status); 833 } 834 835 int 836 do_symlink(struct sftp_conn *conn, char *oldpath, char *newpath) 837 { 838 Buffer msg; 839 u_int status, id; 840 841 if (conn->version < 3) { 842 error("This server does not support the symlink operation"); 843 return(SSH2_FX_OP_UNSUPPORTED); 844 } 845 846 buffer_init(&msg); 847 848 /* Send symlink request */ 849 id = conn->msg_id++; 850 buffer_put_char(&msg, SSH2_FXP_SYMLINK); 851 buffer_put_int(&msg, id); 852 buffer_put_cstring(&msg, oldpath); 853 buffer_put_cstring(&msg, newpath); 854 send_msg(conn, &msg); 855 debug3("Sent message SSH2_FXP_SYMLINK \"%s\" -> \"%s\"", oldpath, 856 newpath); 857 buffer_free(&msg); 858 859 status = get_status(conn, id); 860 if (status != SSH2_FX_OK) 861 error("Couldn't symlink file \"%s\" to \"%s\": %s", oldpath, 862 newpath, fx2txt(status)); 863 864 return(status); 865 } 866 867 #ifdef notyet 868 char * 869 do_readlink(struct sftp_conn *conn, char *path) 870 { 871 Buffer msg; 872 u_int type, expected_id, count, id; 873 char *filename, *longname; 874 Attrib *a; 875 876 expected_id = id = conn->msg_id++; 877 send_string_request(conn, id, SSH2_FXP_READLINK, path, strlen(path)); 878 879 buffer_init(&msg); 880 881 get_msg(conn, &msg); 882 type = buffer_get_char(&msg); 883 id = buffer_get_int(&msg); 884 885 if (id != expected_id) 886 fatal("ID mismatch (%u != %u)", id, expected_id); 887 888 if (type == SSH2_FXP_STATUS) { 889 u_int status = buffer_get_int(&msg); 890 891 error("Couldn't readlink: %s", fx2txt(status)); 892 return(NULL); 893 } else if (type != SSH2_FXP_NAME) 894 fatal("Expected SSH2_FXP_NAME(%u) packet, got %u", 895 SSH2_FXP_NAME, type); 896 897 count = buffer_get_int(&msg); 898 if (count != 1) 899 fatal("Got multiple names (%d) from SSH_FXP_READLINK", count); 900 901 filename = buffer_get_string(&msg, NULL); 902 longname = buffer_get_string(&msg, NULL); 903 a = decode_attrib(&msg); 904 905 debug3("SSH_FXP_READLINK %s -> %s", path, filename); 906 907 xfree(longname); 908 909 buffer_free(&msg); 910 911 return(filename); 912 } 913 #endif 914 915 int 916 do_statvfs(struct sftp_conn *conn, const char *path, struct sftp_statvfs *st, 917 int quiet) 918 { 919 Buffer msg; 920 u_int id; 921 922 if ((conn->exts & SFTP_EXT_STATVFS) == 0) { 923 error("Server does not support statvfs (at) openssh.com extension"); 924 return -1; 925 } 926 927 id = conn->msg_id++; 928 929 buffer_init(&msg); 930 buffer_clear(&msg); 931 buffer_put_char(&msg, SSH2_FXP_EXTENDED); 932 buffer_put_int(&msg, id); 933 buffer_put_cstring(&msg, "statvfs (at) openssh.com"); 934 buffer_put_cstring(&msg, path); 935 send_msg(conn, &msg); 936 buffer_free(&msg); 937 938 return get_decode_statvfs(conn, st, id, quiet); 939 } 940 941 #ifdef notyet 942 int 943 do_fstatvfs(struct sftp_conn *conn, const char *handle, u_int handle_len, 944 struct sftp_statvfs *st, int quiet) 945 { 946 Buffer msg; 947 u_int id; 948 949 if ((conn->exts & SFTP_EXT_FSTATVFS) == 0) { 950 error("Server does not support fstatvfs (at) openssh.com extension"); 951 return -1; 952 } 953 954 id = conn->msg_id++; 955 956 buffer_init(&msg); 957 buffer_clear(&msg); 958 buffer_put_char(&msg, SSH2_FXP_EXTENDED); 959 buffer_put_int(&msg, id); 960 buffer_put_cstring(&msg, "fstatvfs (at) openssh.com"); 961 buffer_put_string(&msg, handle, handle_len); 962 send_msg(conn, &msg); 963 buffer_free(&msg); 964 965 return get_decode_statvfs(conn, st, id, quiet); 966 } 967 #endif 968 969 static void 970 send_read_request(struct sftp_conn *conn, u_int id, u_int64_t offset, 971 u_int len, char *handle, u_int handle_len) 972 { 973 Buffer msg; 974 975 buffer_init(&msg); 976 buffer_clear(&msg); 977 buffer_put_char(&msg, SSH2_FXP_READ); 978 buffer_put_int(&msg, id); 979 buffer_put_string(&msg, handle, handle_len); 980 buffer_put_int64(&msg, offset); 981 buffer_put_int(&msg, len); 982 send_msg(conn, &msg); 983 buffer_free(&msg); 984 } 985 986 int 987 do_download(struct sftp_conn *conn, char *remote_path, char *local_path, 988 Attrib *a, int pflag) 989 { 990 Attrib junk; 991 Buffer msg; 992 char *handle; 993 int local_fd, status = 0, write_error; 994 int read_error, write_errno; 995 u_int64_t offset, size; 996 u_int handle_len, mode, type, id, buflen, num_req, max_req; 997 off_t progress_counter; 998 struct request { 999 u_int id; 1000 u_int len; 1001 u_int64_t offset; 1002 TAILQ_ENTRY(request) tq; 1003 }; 1004 TAILQ_HEAD(reqhead, request) requests; 1005 struct request *req; 1006 1007 TAILQ_INIT(&requests); 1008 1009 if (a == NULL && (a = do_stat(conn, remote_path, 0)) == NULL) 1010 return -1; 1011 1012 /* Do not preserve set[ug]id here, as we do not preserve ownership */ 1013 if (a->flags & SSH2_FILEXFER_ATTR_PERMISSIONS) 1014 mode = a->perm & 0777; 1015 else 1016 mode = 0666; 1017 1018 if ((a->flags & SSH2_FILEXFER_ATTR_PERMISSIONS) && 1019 (!S_ISREG(a->perm))) { 1020 error("Cannot download non-regular file: %s", remote_path); 1021 return(-1); 1022 } 1023 1024 if (a->flags & SSH2_FILEXFER_ATTR_SIZE) 1025 size = a->size; 1026 else 1027 size = 0; 1028 1029 buflen = conn->transfer_buflen; 1030 buffer_init(&msg); 1031 1032 /* Send open request */ 1033 id = conn->msg_id++; 1034 buffer_put_char(&msg, SSH2_FXP_OPEN); 1035 buffer_put_int(&msg, id); 1036 buffer_put_cstring(&msg, remote_path); 1037 buffer_put_int(&msg, SSH2_FXF_READ); 1038 attrib_clear(&junk); /* Send empty attributes */ 1039 encode_attrib(&msg, &junk); 1040 send_msg(conn, &msg); 1041 debug3("Sent message SSH2_FXP_OPEN I:%u P:%s", id, remote_path); 1042 1043 handle = get_handle(conn, id, &handle_len, 1044 "remote open(\"%s\")", remote_path); 1045 if (handle == NULL) { 1046 buffer_free(&msg); 1047 return(-1); 1048 } 1049 1050 local_fd = open(local_path, O_WRONLY | O_CREAT | O_TRUNC, 1051 mode | S_IWUSR); 1052 if (local_fd == -1) { 1053 error("Couldn't open local file \"%s\" for writing: %s", 1054 local_path, strerror(errno)); 1055 do_close(conn, handle, handle_len); 1056 buffer_free(&msg); 1057 xfree(handle); 1058 return(-1); 1059 } 1060 1061 /* Read from remote and write to local */ 1062 write_error = read_error = write_errno = num_req = offset = 0; 1063 max_req = 1; 1064 progress_counter = 0; 1065 1066 if (showprogress && size != 0) 1067 start_progress_meter(remote_path, size, &progress_counter); 1068 1069 while (num_req > 0 || max_req > 0) { 1070 char *data; 1071 u_int len; 1072 1073 /* 1074 * Simulate EOF on interrupt: stop sending new requests and 1075 * allow outstanding requests to drain gracefully 1076 */ 1077 if (interrupted) { 1078 if (num_req == 0) /* If we haven't started yet... */ 1079 break; 1080 max_req = 0; 1081 } 1082 1083 /* Send some more requests */ 1084 while (num_req < max_req) { 1085 debug3("Request range %llu -> %llu (%d/%d)", 1086 (unsigned long long)offset, 1087 (unsigned long long)offset + buflen - 1, 1088 num_req, max_req); 1089 req = xmalloc(sizeof(*req)); 1090 req->id = conn->msg_id++; 1091 req->len = buflen; 1092 req->offset = offset; 1093 offset += buflen; 1094 num_req++; 1095 TAILQ_INSERT_TAIL(&requests, req, tq); 1096 send_read_request(conn, req->id, req->offset, 1097 req->len, handle, handle_len); 1098 } 1099 1100 buffer_clear(&msg); 1101 get_msg(conn, &msg); 1102 type = buffer_get_char(&msg); 1103 id = buffer_get_int(&msg); 1104 debug3("Received reply T:%u I:%u R:%d", type, id, max_req); 1105 1106 /* Find the request in our queue */ 1107 for (req = TAILQ_FIRST(&requests); 1108 req != NULL && req->id != id; 1109 req = TAILQ_NEXT(req, tq)) 1110 ; 1111 if (req == NULL) 1112 fatal("Unexpected reply %u", id); 1113 1114 switch (type) { 1115 case SSH2_FXP_STATUS: 1116 status = buffer_get_int(&msg); 1117 if (status != SSH2_FX_EOF) 1118 read_error = 1; 1119 max_req = 0; 1120 TAILQ_REMOVE(&requests, req, tq); 1121 xfree(req); 1122 num_req--; 1123 break; 1124 case SSH2_FXP_DATA: 1125 data = buffer_get_string(&msg, &len); 1126 debug3("Received data %llu -> %llu", 1127 (unsigned long long)req->offset, 1128 (unsigned long long)req->offset + len - 1); 1129 if (len > req->len) 1130 fatal("Received more data than asked for " 1131 "%u > %u", len, req->len); 1132 if ((lseek(local_fd, req->offset, SEEK_SET) == -1 || 1133 atomicio(vwrite, local_fd, data, len) != len) && 1134 !write_error) { 1135 write_errno = errno; 1136 write_error = 1; 1137 max_req = 0; 1138 } 1139 progress_counter += len; 1140 xfree(data); 1141 1142 if (len == req->len) { 1143 TAILQ_REMOVE(&requests, req, tq); 1144 xfree(req); 1145 num_req--; 1146 } else { 1147 /* Resend the request for the missing data */ 1148 debug3("Short data block, re-requesting " 1149 "%llu -> %llu (%2d)", 1150 (unsigned long long)req->offset + len, 1151 (unsigned long long)req->offset + 1152 req->len - 1, num_req); 1153 req->id = conn->msg_id++; 1154 req->len -= len; 1155 req->offset += len; 1156 send_read_request(conn, req->id, 1157 req->offset, req->len, handle, handle_len); 1158 /* Reduce the request size */ 1159 if (len < buflen) 1160 buflen = MAX(MIN_READ_SIZE, len); 1161 } 1162 if (max_req > 0) { /* max_req = 0 iff EOF received */ 1163 if (size > 0 && offset > size) { 1164 /* Only one request at a time 1165 * after the expected EOF */ 1166 debug3("Finish at %llu (%2d)", 1167 (unsigned long long)offset, 1168 num_req); 1169 max_req = 1; 1170 } else if (max_req <= conn->num_requests) { 1171 ++max_req; 1172 } 1173 } 1174 break; 1175 default: 1176 fatal("Expected SSH2_FXP_DATA(%u) packet, got %u", 1177 SSH2_FXP_DATA, type); 1178 } 1179 } 1180 1181 if (showprogress && size) 1182 stop_progress_meter(); 1183 1184 /* Sanity check */ 1185 if (TAILQ_FIRST(&requests) != NULL) 1186 fatal("Transfer complete, but requests still in queue"); 1187 1188 if (read_error) { 1189 error("Couldn't read from remote file \"%s\" : %s", 1190 remote_path, fx2txt(status)); 1191 do_close(conn, handle, handle_len); 1192 } else if (write_error) { 1193 error("Couldn't write to \"%s\": %s", local_path, 1194 strerror(write_errno)); 1195 status = -1; 1196 do_close(conn, handle, handle_len); 1197 } else { 1198 status = do_close(conn, handle, handle_len); 1199 1200 /* Override umask and utimes if asked */ 1201 #ifdef HAVE_FCHMOD 1202 if (pflag && fchmod(local_fd, mode) == -1) 1203 #else 1204 if (pflag && chmod(local_path, mode) == -1) 1205 #endif /* HAVE_FCHMOD */ 1206 error("Couldn't set mode on \"%s\": %s", local_path, 1207 strerror(errno)); 1208 if (pflag && (a->flags & SSH2_FILEXFER_ATTR_ACMODTIME)) { 1209 struct timeval tv[2]; 1210 tv[0].tv_sec = a->atime; 1211 tv[1].tv_sec = a->mtime; 1212 tv[0].tv_usec = tv[1].tv_usec = 0; 1213 if (utimes(local_path, tv) == -1) 1214 error("Can't set times on \"%s\": %s", 1215 local_path, strerror(errno)); 1216 } 1217 } 1218 close(local_fd); 1219 buffer_free(&msg); 1220 xfree(handle); 1221 1222 return(status); 1223 } 1224 1225 static int 1226 download_dir_internal(struct sftp_conn *conn, char *src, char *dst, 1227 Attrib *dirattrib, int pflag, int printflag, int depth) 1228 { 1229 int i, ret = 0; 1230 SFTP_DIRENT **dir_entries; 1231 char *filename, *new_src, *new_dst; 1232 mode_t mode = 0777; 1233 1234 if (depth >= MAX_DIR_DEPTH) { 1235 error("Maximum directory depth exceeded: %d levels", depth); 1236 return -1; 1237 } 1238 1239 if (dirattrib == NULL && 1240 (dirattrib = do_stat(conn, src, 1)) == NULL) { 1241 error("Unable to stat remote directory \"%s\"", src); 1242 return -1; 1243 } 1244 if (!S_ISDIR(dirattrib->perm)) { 1245 error("\"%s\" is not a directory", src); 1246 return -1; 1247 } 1248 if (printflag) 1249 printf("Retrieving %s\n", src); 1250 1251 if (dirattrib->flags & SSH2_FILEXFER_ATTR_PERMISSIONS) 1252 mode = dirattrib->perm & 01777; 1253 else { 1254 debug("Server did not send permissions for " 1255 "directory \"%s\"", dst); 1256 } 1257 1258 if (mkdir(dst, mode) == -1 && errno != EEXIST) { 1259 error("mkdir %s: %s", dst, strerror(errno)); 1260 return -1; 1261 } 1262 1263 if (do_readdir(conn, src, &dir_entries) == -1) { 1264 error("%s: Failed to get directory contents", src); 1265 return -1; 1266 } 1267 1268 for (i = 0; dir_entries[i] != NULL && !interrupted; i++) { 1269 filename = dir_entries[i]->filename; 1270 1271 new_dst = path_append(dst, filename); 1272 new_src = path_append(src, filename); 1273 1274 if (S_ISDIR(dir_entries[i]->a.perm)) { 1275 if (strcmp(filename, ".") == 0 || 1276 strcmp(filename, "..") == 0) 1277 continue; 1278 if (download_dir_internal(conn, new_src, new_dst, 1279 &(dir_entries[i]->a), pflag, printflag, 1280 depth + 1) == -1) 1281 ret = -1; 1282 } else if (S_ISREG(dir_entries[i]->a.perm) ) { 1283 if (do_download(conn, new_src, new_dst, 1284 &(dir_entries[i]->a), pflag) == -1) { 1285 error("Download of file %s to %s failed", 1286 new_src, new_dst); 1287 ret = -1; 1288 } 1289 } else 1290 logit("%s: not a regular file\n", new_src); 1291 1292 xfree(new_dst); 1293 xfree(new_src); 1294 } 1295 1296 if (pflag) { 1297 if (dirattrib->flags & SSH2_FILEXFER_ATTR_ACMODTIME) { 1298 struct timeval tv[2]; 1299 tv[0].tv_sec = dirattrib->atime; 1300 tv[1].tv_sec = dirattrib->mtime; 1301 tv[0].tv_usec = tv[1].tv_usec = 0; 1302 if (utimes(dst, tv) == -1) 1303 error("Can't set times on \"%s\": %s", 1304 dst, strerror(errno)); 1305 } else 1306 debug("Server did not send times for directory " 1307 "\"%s\"", dst); 1308 } 1309 1310 free_sftp_dirents(dir_entries); 1311 1312 return ret; 1313 } 1314 1315 int 1316 download_dir(struct sftp_conn *conn, char *src, char *dst, 1317 Attrib *dirattrib, int pflag, int printflag) 1318 { 1319 char *src_canon; 1320 int ret; 1321 1322 if ((src_canon = do_realpath(conn, src)) == NULL) { 1323 error("Unable to canonicalise path \"%s\"", src); 1324 return -1; 1325 } 1326 1327 ret = download_dir_internal(conn, src_canon, dst, 1328 dirattrib, pflag, printflag, 0); 1329 xfree(src_canon); 1330 return ret; 1331 } 1332 1333 int 1334 do_upload(struct sftp_conn *conn, char *local_path, char *remote_path, 1335 int pflag) 1336 { 1337 int local_fd; 1338 int status = SSH2_FX_OK; 1339 u_int handle_len, id, type; 1340 off_t offset; 1341 char *handle, *data; 1342 Buffer msg; 1343 struct stat sb; 1344 Attrib a; 1345 u_int32_t startid; 1346 u_int32_t ackid; 1347 struct outstanding_ack { 1348 u_int id; 1349 u_int len; 1350 off_t offset; 1351 TAILQ_ENTRY(outstanding_ack) tq; 1352 }; 1353 TAILQ_HEAD(ackhead, outstanding_ack) acks; 1354 struct outstanding_ack *ack = NULL; 1355 1356 TAILQ_INIT(&acks); 1357 1358 if ((local_fd = open(local_path, O_RDONLY, 0)) == -1) { 1359 error("Couldn't open local file \"%s\" for reading: %s", 1360 local_path, strerror(errno)); 1361 return(-1); 1362 } 1363 if (fstat(local_fd, &sb) == -1) { 1364 error("Couldn't fstat local file \"%s\": %s", 1365 local_path, strerror(errno)); 1366 close(local_fd); 1367 return(-1); 1368 } 1369 if (!S_ISREG(sb.st_mode)) { 1370 error("%s is not a regular file", local_path); 1371 close(local_fd); 1372 return(-1); 1373 } 1374 stat_to_attrib(&sb, &a); 1375 1376 a.flags &= ~SSH2_FILEXFER_ATTR_SIZE; 1377 a.flags &= ~SSH2_FILEXFER_ATTR_UIDGID; 1378 a.perm &= 0777; 1379 if (!pflag) 1380 a.flags &= ~SSH2_FILEXFER_ATTR_ACMODTIME; 1381 1382 buffer_init(&msg); 1383 1384 /* Send open request */ 1385 id = conn->msg_id++; 1386 buffer_put_char(&msg, SSH2_FXP_OPEN); 1387 buffer_put_int(&msg, id); 1388 buffer_put_cstring(&msg, remote_path); 1389 buffer_put_int(&msg, SSH2_FXF_WRITE|SSH2_FXF_CREAT|SSH2_FXF_TRUNC); 1390 encode_attrib(&msg, &a); 1391 send_msg(conn, &msg); 1392 debug3("Sent message SSH2_FXP_OPEN I:%u P:%s", id, remote_path); 1393 1394 buffer_clear(&msg); 1395 1396 handle = get_handle(conn, id, &handle_len, 1397 "remote open(\"%s\")", remote_path); 1398 if (handle == NULL) { 1399 close(local_fd); 1400 buffer_free(&msg); 1401 return -1; 1402 } 1403 1404 startid = ackid = id + 1; 1405 data = xmalloc(conn->transfer_buflen); 1406 1407 /* Read from local and write to remote */ 1408 offset = 0; 1409 if (showprogress) 1410 start_progress_meter(local_path, sb.st_size, &offset); 1411 1412 for (;;) { 1413 int len; 1414 1415 /* 1416 * Can't use atomicio here because it returns 0 on EOF, 1417 * thus losing the last block of the file. 1418 * Simulate an EOF on interrupt, allowing ACKs from the 1419 * server to drain. 1420 */ 1421 if (interrupted || status != SSH2_FX_OK) 1422 len = 0; 1423 else do 1424 len = read(local_fd, data, conn->transfer_buflen); 1425 while ((len == -1) && 1426 (errno == EINTR || errno == EAGAIN || errno == EWOULDBLOCK)); 1427 1428 if (len == -1) 1429 fatal("Couldn't read from \"%s\": %s", local_path, 1430 strerror(errno)); 1431 1432 if (len != 0) { 1433 ack = xmalloc(sizeof(*ack)); 1434 ack->id = ++id; 1435 ack->offset = offset; 1436 ack->len = len; 1437 TAILQ_INSERT_TAIL(&acks, ack, tq); 1438 1439 buffer_clear(&msg); 1440 buffer_put_char(&msg, SSH2_FXP_WRITE); 1441 buffer_put_int(&msg, ack->id); 1442 buffer_put_string(&msg, handle, handle_len); 1443 buffer_put_int64(&msg, offset); 1444 buffer_put_string(&msg, data, len); 1445 send_msg(conn, &msg); 1446 debug3("Sent message SSH2_FXP_WRITE I:%u O:%llu S:%u", 1447 id, (unsigned long long)offset, len); 1448 } else if (TAILQ_FIRST(&acks) == NULL) 1449 break; 1450 1451 if (ack == NULL) 1452 fatal("Unexpected ACK %u", id); 1453 1454 if (id == startid || len == 0 || 1455 id - ackid >= conn->num_requests) { 1456 u_int r_id; 1457 1458 buffer_clear(&msg); 1459 get_msg(conn, &msg); 1460 type = buffer_get_char(&msg); 1461 r_id = buffer_get_int(&msg); 1462 1463 if (type != SSH2_FXP_STATUS) 1464 fatal("Expected SSH2_FXP_STATUS(%d) packet, " 1465 "got %d", SSH2_FXP_STATUS, type); 1466 1467 status = buffer_get_int(&msg); 1468 debug3("SSH2_FXP_STATUS %d", status); 1469 1470 /* Find the request in our queue */ 1471 for (ack = TAILQ_FIRST(&acks); 1472 ack != NULL && ack->id != r_id; 1473 ack = TAILQ_NEXT(ack, tq)) 1474 ; 1475 if (ack == NULL) 1476 fatal("Can't find request for ID %u", r_id); 1477 TAILQ_REMOVE(&acks, ack, tq); 1478 debug3("In write loop, ack for %u %u bytes at %lld", 1479 ack->id, ack->len, (long long)ack->offset); 1480 ++ackid; 1481 xfree(ack); 1482 } 1483 offset += len; 1484 if (offset < 0) 1485 fatal("%s: offset < 0", __func__); 1486 } 1487 buffer_free(&msg); 1488 1489 if (showprogress) 1490 stop_progress_meter(); 1491 xfree(data); 1492 1493 if (status != SSH2_FX_OK) { 1494 error("Couldn't write to remote file \"%s\": %s", 1495 remote_path, fx2txt(status)); 1496 status = -1; 1497 } 1498 1499 if (close(local_fd) == -1) { 1500 error("Couldn't close local file \"%s\": %s", local_path, 1501 strerror(errno)); 1502 status = -1; 1503 } 1504 1505 /* Override umask and utimes if asked */ 1506 if (pflag) 1507 do_fsetstat(conn, handle, handle_len, &a); 1508 1509 if (do_close(conn, handle, handle_len) != SSH2_FX_OK) 1510 status = -1; 1511 xfree(handle); 1512 1513 return status; 1514 } 1515 1516 static int 1517 upload_dir_internal(struct sftp_conn *conn, char *src, char *dst, 1518 int pflag, int printflag, int depth) 1519 { 1520 int ret = 0, status; 1521 DIR *dirp; 1522 struct dirent *dp; 1523 char *filename, *new_src, *new_dst; 1524 struct stat sb; 1525 Attrib a; 1526 1527 if (depth >= MAX_DIR_DEPTH) { 1528 error("Maximum directory depth exceeded: %d levels", depth); 1529 return -1; 1530 } 1531 1532 if (stat(src, &sb) == -1) { 1533 error("Couldn't stat directory \"%s\": %s", 1534 src, strerror(errno)); 1535 return -1; 1536 } 1537 if (!S_ISDIR(sb.st_mode)) { 1538 error("\"%s\" is not a directory", src); 1539 return -1; 1540 } 1541 if (printflag) 1542 printf("Entering %s\n", src); 1543 1544 attrib_clear(&a); 1545 stat_to_attrib(&sb, &a); 1546 a.flags &= ~SSH2_FILEXFER_ATTR_SIZE; 1547 a.flags &= ~SSH2_FILEXFER_ATTR_UIDGID; 1548 a.perm &= 01777; 1549 if (!pflag) 1550 a.flags &= ~SSH2_FILEXFER_ATTR_ACMODTIME; 1551 1552 status = do_mkdir(conn, dst, &a, 0); 1553 /* 1554 * we lack a portable status for errno EEXIST, 1555 * so if we get a SSH2_FX_FAILURE back we must check 1556 * if it was created successfully. 1557 */ 1558 if (status != SSH2_FX_OK) { 1559 if (status != SSH2_FX_FAILURE) 1560 return -1; 1561 if (do_stat(conn, dst, 0) == NULL) 1562 return -1; 1563 } 1564 1565 if ((dirp = opendir(src)) == NULL) { 1566 error("Failed to open dir \"%s\": %s", src, strerror(errno)); 1567 return -1; 1568 } 1569 1570 while (((dp = readdir(dirp)) != NULL) && !interrupted) { 1571 if (dp->d_ino == 0) 1572 continue; 1573 filename = dp->d_name; 1574 new_dst = path_append(dst, filename); 1575 new_src = path_append(src, filename); 1576 1577 if (lstat(new_src, &sb) == -1) { 1578 logit("%s: lstat failed: %s", filename, 1579 strerror(errno)); 1580 ret = -1; 1581 } else if (S_ISDIR(sb.st_mode)) { 1582 if (strcmp(filename, ".") == 0 || 1583 strcmp(filename, "..") == 0) 1584 continue; 1585 1586 if (upload_dir_internal(conn, new_src, new_dst, 1587 pflag, printflag, depth + 1) == -1) 1588 ret = -1; 1589 } else if (S_ISREG(sb.st_mode)) { 1590 if (do_upload(conn, new_src, new_dst, pflag) == -1) { 1591 error("Uploading of file %s to %s failed!", 1592 new_src, new_dst); 1593 ret = -1; 1594 } 1595 } else 1596 logit("%s: not a regular file\n", filename); 1597 xfree(new_dst); 1598 xfree(new_src); 1599 } 1600 1601 do_setstat(conn, dst, &a); 1602 1603 (void) closedir(dirp); 1604 return ret; 1605 } 1606 1607 int 1608 upload_dir(struct sftp_conn *conn, char *src, char *dst, int printflag, 1609 int pflag) 1610 { 1611 char *dst_canon; 1612 int ret; 1613 1614 if ((dst_canon = do_realpath(conn, dst)) == NULL) { 1615 error("Unable to canonicalise path \"%s\"", dst); 1616 return -1; 1617 } 1618 1619 ret = upload_dir_internal(conn, src, dst_canon, pflag, printflag, 0); 1620 xfree(dst_canon); 1621 return ret; 1622 } 1623 1624 char * 1625 path_append(char *p1, char *p2) 1626 { 1627 char *ret; 1628 size_t len = strlen(p1) + strlen(p2) + 2; 1629 1630 ret = xmalloc(len); 1631 strlcpy(ret, p1, len); 1632 if (p1[0] != '\0' && p1[strlen(p1) - 1] != '/') 1633 strlcat(ret, "/", len); 1634 strlcat(ret, p2, len); 1635 1636 return(ret); 1637 } 1638 1639