2 * scp.c - Scp (Secure Copy) client for PuTTY.
3 * Joris van Rantwijk, Simon Tatham
5 * This is mainly based on ssh-1.2.26/scp.c by Timo Rinne & Tatu Ylonen.
6 * They, in turn, used stuff from BSD rcp.
8 * Adaptations to enable connecting a GUI by L. Gunnarsson - Sept 2000
23 /* GUI Adaptation - Sept 2000 */
27 #define PUTTY_DO_GLOBALS
32 #define TIME_POSIX_TO_WIN(t, ft) (*(LONGLONG*)&(ft) = \
33 ((LONGLONG) (t) + (LONGLONG) 11644473600) * (LONGLONG) 10000000)
34 #define TIME_WIN_TO_POSIX(ft, t) ((t) = (unsigned long) \
35 ((*(LONGLONG*)&(ft)) / (LONGLONG) 10000000 - (LONGLONG) 11644473600))
37 /* GUI Adaptation - Sept 2000 */
38 #define WM_APP_BASE 0x8000
39 #define WM_STD_OUT_CHAR ( WM_APP_BASE+400 )
40 #define WM_STD_ERR_CHAR ( WM_APP_BASE+401 )
41 #define WM_STATS_CHAR ( WM_APP_BASE+402 )
42 #define WM_STATS_SIZE ( WM_APP_BASE+403 )
43 #define WM_STATS_PERCENT ( WM_APP_BASE+404 )
44 #define WM_STATS_ELAPSED ( WM_APP_BASE+405 )
45 #define WM_RET_ERR_CNT ( WM_APP_BASE+406 )
46 #define WM_LS_RET_ERR_CNT ( WM_APP_BASE+407 )
48 static int verbose = 0;
49 static int recursive = 0;
50 static int preserve = 0;
51 static int targetshouldbedirectory = 0;
52 static int statistics = 1;
53 static int portnumber = 0;
54 static char *password = NULL;
56 /* GUI Adaptation - Sept 2000 */
57 #define NAME_STR_MAX 2048
58 static char statname[NAME_STR_MAX+1];
59 static unsigned long statsize = 0;
60 static int statperct = 0;
61 static unsigned long statelapsed = 0;
62 static int gui_mode = 0;
63 static char *gui_hwnd = NULL;
65 static void source(char *src);
66 static void rsource(char *src);
67 static void sink(char *targ, char *src);
68 /* GUI Adaptation - Sept 2000 */
69 static void tell_char(FILE *stream, char c);
70 static void tell_str(FILE *stream, char *str);
71 static void tell_user(FILE *stream, char *fmt, ...);
72 static void send_char_msg(unsigned int msg_id, char c);
73 static void send_str_msg(unsigned int msg_id, char *str);
74 static void gui_update_stats(char *name, unsigned long size,
75 int percentage, unsigned long elapsed);
77 void logevent(char *string) { }
79 void verify_ssh_host_key(char *host, int port, char *keytype,
80 char *keystr, char *fingerprint) {
83 static const char absentmsg[] =
84 "The server's host key is not cached in the registry. You\n"
85 "have no guarantee that the server is the computer you\n"
87 "The server's key fingerprint is:\n"
89 "If you trust this host, enter \"y\" to add the key to\n"
90 "PuTTY's cache and carry on connecting.\n"
91 "If you do not trust this host, enter \"n\" to abandon the\n"
93 "Continue connecting? (y/n) ";
95 static const char wrongmsg[] =
96 "WARNING - POTENTIAL SECURITY BREACH!\n"
97 "The server's host key does not match the one PuTTY has\n"
98 "cached in the registry. This means that either the\n"
99 "server administrator has changed the host key, or you\n"
100 "have actually connected to another computer pretending\n"
101 "to be the server.\n"
102 "The new key fingerprint is:\n"
104 "If you were expecting this change and trust the new key,\n"
105 "enter Yes to update PuTTY's cache and continue connecting.\n"
106 "If you want to carry on connecting but without updating\n"
107 "the cache, enter No.\n"
108 "If you want to abandon the connection completely, press\n"
109 "Return to cancel. Pressing Return is the ONLY guaranteed\n"
111 "Update cached key? (y/n, Return cancels connection) ";
113 static const char abandoned[] = "Connection abandoned.\n";
118 * Verify the key against the registry.
120 ret = verify_host_key(host, port, keytype, keystr);
122 if (ret == 0) /* success - key matched OK */
124 if (ret == 2) { /* key was different */
125 fprintf(stderr, wrongmsg, fingerprint);
126 if (fgets(line, sizeof(line), stdin) &&
127 line[0] != '\0' && line[0] != '\n') {
128 if (line[0] == 'y' || line[0] == 'Y')
129 store_host_key(host, port, keytype, keystr);
131 fprintf(stderr, abandoned);
135 if (ret == 1) { /* key was absent */
136 fprintf(stderr, absentmsg, fingerprint);
137 if (fgets(line, sizeof(line), stdin) &&
138 (line[0] == 'y' || line[0] == 'Y'))
139 store_host_key(host, port, keytype, keystr);
141 fprintf(stderr, abandoned);
147 /* GUI Adaptation - Sept 2000 */
148 static void send_msg(HWND h, UINT message, WPARAM wParam)
150 while (!PostMessage( h, message, wParam, 0))
154 static void tell_char(FILE *stream, char c)
160 unsigned int msg_id = WM_STD_OUT_CHAR;
161 if (stream == stderr) msg_id = WM_STD_ERR_CHAR;
162 send_msg( (HWND)atoi(gui_hwnd), msg_id, (WPARAM)c );
166 static void tell_str(FILE *stream, char *str)
170 for( i = 0; i < strlen(str); ++i )
171 tell_char(stream, str[i]);
174 static void tell_user(FILE *stream, char *fmt, ...)
176 char str[0x100]; /* Make the size big enough */
179 vsprintf(str, fmt, ap);
182 tell_str(stream, str);
185 static void gui_update_stats(char *name, unsigned long size, int percentage, unsigned long elapsed)
189 if (strcmp(name,statname) != 0)
191 for( i = 0; i < strlen(name); ++i )
192 send_msg( (HWND)atoi(gui_hwnd), WM_STATS_CHAR, (WPARAM)name[i]);
193 send_msg( (HWND)atoi(gui_hwnd), WM_STATS_CHAR, (WPARAM)'\n' );
194 strcpy(statname,name);
196 if (statsize != size)
198 send_msg( (HWND)atoi(gui_hwnd), WM_STATS_SIZE, (WPARAM)size );
201 if (statelapsed != elapsed)
203 send_msg( (HWND)atoi(gui_hwnd), WM_STATS_ELAPSED, (WPARAM)elapsed );
204 statelapsed = elapsed;
206 if (statperct != percentage)
208 send_msg( (HWND)atoi(gui_hwnd), WM_STATS_PERCENT, (WPARAM)percentage );
209 statperct = percentage;
214 * Print an error message and perform a fatal exit.
216 void fatalbox(char *fmt, ...)
218 char str[0x100]; /* Make the size big enough */
221 strcpy(str, "Fatal:");
222 vsprintf(str+strlen(str), fmt, ap);
225 tell_str(stderr, str);
229 void connection_fatal(char *fmt, ...)
231 char str[0x100]; /* Make the size big enough */
234 strcpy(str, "Fatal:");
235 vsprintf(str+strlen(str), fmt, ap);
238 tell_str(stderr, str);
244 * Be told what socket we're supposed to be using.
246 static SOCKET scp_ssh_socket;
247 char *do_select(SOCKET skt, int startup) {
249 scp_ssh_socket = skt;
251 scp_ssh_socket = INVALID_SOCKET;
254 extern int select_result(WPARAM, LPARAM);
257 * Receive a block of data from the SSH link. Block until all data
260 * To do this, we repeatedly call the SSH protocol module, with our
261 * own trap in from_backend() to catch the data that comes back. We
262 * do this until we have enough data.
265 static unsigned char *outptr; /* where to put the data */
266 static unsigned outlen; /* how much data required */
267 static unsigned char *pending = NULL; /* any spare data */
268 static unsigned pendlen=0, pendsize=0; /* length and phys. size of buffer */
269 void from_backend(int is_stderr, char *data, int datalen) {
270 unsigned char *p = (unsigned char *)data;
271 unsigned len = (unsigned)datalen;
274 * stderr data is just spouted to local stderr and otherwise
278 fwrite(data, 1, len, stderr);
285 * If this is before the real session begins, just return.
291 unsigned used = outlen;
292 if (used > len) used = len;
293 memcpy(outptr, p, used);
294 outptr += used; outlen -= used;
295 p += used; len -= used;
299 if (pendsize < pendlen + len) {
300 pendsize = pendlen + len + 4096;
301 pending = (pending ? srealloc(pending, pendsize) :
304 fatalbox("Out of memory");
306 memcpy(pending+pendlen, p, len);
310 static int ssh_scp_recv(unsigned char *buf, int len) {
315 * See if the pending-input block contains some of what we
319 unsigned pendused = pendlen;
320 if (pendused > outlen)
322 memcpy(outptr, pending, pendused);
323 memmove(pending, pending+pendused, pendlen-pendused);
340 FD_SET(scp_ssh_socket, &readfds);
341 if (select(1, &readfds, NULL, NULL, NULL) < 0)
343 select_result((WPARAM)scp_ssh_socket, (LPARAM)FD_READ);
350 * Loop through the ssh connection and authentication process.
352 static void ssh_scp_init(void) {
353 if (scp_ssh_socket == INVALID_SOCKET)
355 while (!back->sendok()) {
358 FD_SET(scp_ssh_socket, &readfds);
359 if (select(1, &readfds, NULL, NULL, NULL) < 0)
361 select_result((WPARAM)scp_ssh_socket, (LPARAM)FD_READ);
366 * Print an error message and exit after closing the SSH link.
368 static void bump(char *fmt, ...)
370 char str[0x100]; /* Make the size big enough */
373 strcpy(str, "Fatal:");
374 vsprintf(str+strlen(str), fmt, ap);
377 tell_str(stderr, str);
379 if (back != NULL && back->socket() != NULL) {
381 back->special(TS_EOF);
382 ssh_scp_recv(&ch, 1);
387 static int get_password(const char *prompt, char *str, int maxlen)
393 static int tried_once = 0;
398 strncpy(str, password, maxlen);
399 str[maxlen-1] = '\0';
405 /* GUI Adaptation - Sept 2000 */
407 if (maxlen>0) str[0] = '\0';
409 hin = GetStdHandle(STD_INPUT_HANDLE);
410 hout = GetStdHandle(STD_OUTPUT_HANDLE);
411 if (hin == INVALID_HANDLE_VALUE || hout == INVALID_HANDLE_VALUE)
412 bump("Cannot get standard input/output handles");
414 GetConsoleMode(hin, &savemode);
415 SetConsoleMode(hin, (savemode & (~ENABLE_ECHO_INPUT)) |
416 ENABLE_PROCESSED_INPUT | ENABLE_LINE_INPUT);
418 WriteFile(hout, prompt, strlen(prompt), &i, NULL);
419 ReadFile(hin, str, maxlen-1, &i, NULL);
421 SetConsoleMode(hin, savemode);
423 if ((int)i > maxlen) i = maxlen-1; else i = i - 2;
426 WriteFile(hout, "\r\n", 2, &i, NULL);
433 * Open an SSH connection to user@host and execute cmd.
435 static void do_cmd(char *host, char *user, char *cmd)
437 char *err, *realhost;
440 if (host == NULL || host[0] == '\0')
441 bump("Empty host name");
443 /* Try to load settings for this host */
444 do_defaults(host, &cfg);
445 if (cfg.host[0] == '\0') {
446 /* No settings for this host; use defaults */
447 do_defaults(NULL, &cfg);
448 strncpy(cfg.host, host, sizeof(cfg.host)-1);
449 cfg.host[sizeof(cfg.host)-1] = '\0';
454 if (user != NULL && user[0] != '\0') {
455 strncpy(cfg.username, user, sizeof(cfg.username)-1);
456 cfg.username[sizeof(cfg.username)-1] = '\0';
457 } else if (cfg.username[0] == '\0') {
459 if (GetUserName(user, &namelen) == FALSE)
460 bump("Empty user name");
461 user = smalloc(namelen * sizeof(char));
462 GetUserName(user, &namelen);
463 if (verbose) tell_user(stderr, "Guessing user name: %s", user);
464 strncpy(cfg.username, user, sizeof(cfg.username)-1);
465 cfg.username[sizeof(cfg.username)-1] = '\0';
469 if (cfg.protocol != PROT_SSH)
473 cfg.port = portnumber;
475 strncpy(cfg.remote_cmd, cmd, sizeof(cfg.remote_cmd));
476 cfg.remote_cmd[sizeof(cfg.remote_cmd)-1] = '\0';
481 err = back->init(cfg.host, cfg.port, &realhost);
483 bump("ssh_init: %s", err);
485 if (verbose && realhost != NULL)
486 tell_user(stderr, "Connected to %s\n", realhost);
490 * Update statistic information about current file.
492 static void print_stats(char *name, unsigned long size, unsigned long done,
493 time_t start, time_t now)
500 /* GUI Adaptation - Sept 2000 */
502 gui_update_stats(name, size, (int)(100 * (done*1.0/size)),
503 (unsigned long)difftime(now, start));
506 ratebs = (float) done / (now - start);
508 ratebs = (float) done;
513 eta = (unsigned long) ((size - done) / ratebs);
514 sprintf(etastr, "%02ld:%02ld:%02ld",
515 eta / 3600, (eta % 3600) / 60, eta % 60);
517 pct = (int) (100.0 * (float) done / size);
519 printf("\r%-25.25s | %10ld kB | %5.1f kB/s | ETA: %8s | %3d%%",
520 name, done / 1024, ratebs / 1024.0,
529 * Find a colon in str and return a pointer to the colon.
530 * This is used to separate hostname from filename.
532 static char * colon(char *str)
534 /* We ignore a leading colon, since the hostname cannot be
535 empty. We also ignore a colon as second character because
536 of filenames like f:myfile.txt. */
537 if (str[0] == '\0' ||
541 while (*str != '\0' &&
553 * Wait for a response from the other side.
554 * Return 0 if ok, -1 if error.
556 static int response(void)
558 char ch, resp, rbuf[2048];
561 if (ssh_scp_recv(&resp, 1) <= 0)
562 bump("Lost connection");
572 case 2: /* fatal error */
574 if (ssh_scp_recv(&ch, 1) <= 0)
575 bump("Protocol error: Lost connection");
577 } while (p < sizeof(rbuf) && ch != '\n');
580 tell_user(stderr, "%s\n", rbuf);
589 * Send an error message to the other side and to the screen.
590 * Increment error counter.
592 static void run_err(const char *fmt, ...)
598 strcpy(str, "scp: ");
599 vsprintf(str+strlen(str), fmt, ap);
601 back->send(str, strlen(str));
602 tell_user(stderr, "%s",str);
607 * Execute the source part of the SCP protocol.
609 static void source(char *src)
617 unsigned long stat_bytes;
618 time_t stat_starttime, stat_lasttime;
620 attr = GetFileAttributes(src);
621 if (attr == (DWORD)-1) {
622 run_err("%s: No such file or directory", src);
626 if ((attr & FILE_ATTRIBUTE_DIRECTORY) != 0) {
629 * Avoid . and .. directories.
632 p = strrchr(src, '/');
634 p = strrchr(src, '\\');
639 if (!strcmp(p, ".") || !strcmp(p, ".."))
644 run_err("%s: not a regular file", src);
649 if ((last = strrchr(src, '/')) == NULL)
653 if (strrchr(last, '\\') != NULL)
654 last = strrchr(last, '\\') + 1;
655 if (last == src && strchr(src, ':') != NULL)
656 last = strchr(src, ':') + 1;
658 f = CreateFile(src, GENERIC_READ, FILE_SHARE_READ, NULL,
659 OPEN_EXISTING, 0, 0);
660 if (f == INVALID_HANDLE_VALUE) {
661 run_err("%s: Cannot open file", src);
666 FILETIME actime, wrtime;
667 unsigned long mtime, atime;
668 GetFileTime(f, NULL, &actime, &wrtime);
669 TIME_WIN_TO_POSIX(actime, atime);
670 TIME_WIN_TO_POSIX(wrtime, mtime);
671 sprintf(buf, "T%lu 0 %lu 0\n", mtime, atime);
672 back->send(buf, strlen(buf));
677 size = GetFileSize(f, NULL);
678 sprintf(buf, "C0644 %lu %s\n", size, last);
680 tell_user(stderr, "Sending file modes: %s", buf);
681 back->send(buf, strlen(buf));
687 stat_starttime = time(NULL);
691 for (i = 0; i < size; i += 4096) {
694 if (i + k > size) k = size - i;
695 if (! ReadFile(f, transbuf, k, &j, NULL) || j != k) {
696 if (statistics) printf("\n");
697 bump("%s: Read error", src);
699 back->send(transbuf, k);
702 if (time(NULL) != stat_lasttime ||
704 stat_lasttime = time(NULL);
705 print_stats(last, size, stat_bytes,
706 stat_starttime, stat_lasttime);
717 * Recursively send the contents of a directory.
719 static void rsource(char *src)
724 WIN32_FIND_DATA fdat;
727 if ((last = strrchr(src, '/')) == NULL)
731 if (strrchr(last, '\\') != NULL)
732 last = strrchr(last, '\\') + 1;
733 if (last == src && strchr(src, ':') != NULL)
734 last = strchr(src, ':') + 1;
736 /* maybe send filetime */
738 sprintf(buf, "D0755 0 %s\n", last);
740 tell_user(stderr, "Entering directory: %s", buf);
741 back->send(buf, strlen(buf));
745 sprintf(buf, "%s/*", src);
746 dir = FindFirstFile(buf, &fdat);
747 ok = (dir != INVALID_HANDLE_VALUE);
749 if (strcmp(fdat.cFileName, ".") == 0 ||
750 strcmp(fdat.cFileName, "..") == 0) {
751 } else if (strlen(src) + 1 + strlen(fdat.cFileName) >=
753 run_err("%s/%s: Name too long", src, fdat.cFileName);
755 sprintf(buf, "%s/%s", src, fdat.cFileName);
758 ok = FindNextFile(dir, &fdat);
763 back->send(buf, strlen(buf));
768 * Execute the sink part of the SCP protocol.
770 static void sink(char *targ, char *src)
780 unsigned long mtime, atime;
782 unsigned long size, i;
784 unsigned long stat_bytes;
785 time_t stat_starttime, stat_lasttime;
788 attr = GetFileAttributes(targ);
789 if (attr != (DWORD)-1 && (attr & FILE_ATTRIBUTE_DIRECTORY) != 0)
792 if (targetshouldbedirectory && !targisdir)
793 bump("%s: Not a directory", targ);
799 if (ssh_scp_recv(&ch, 1) <= 0)
802 bump("Protocol error: Unexpected newline");
806 if (ssh_scp_recv(&ch, 1) <= 0)
807 bump("Lost connection");
809 } while (i < sizeof(buf) && ch != '\n');
812 case '\01': /* error */
813 tell_user(stderr, "%s\n", buf+1);
816 case '\02': /* fatal error */
822 if (sscanf(buf, "T%ld %*d %ld %*d",
823 &mtime, &atime) == 2) {
828 bump("Protocol error: Illegal time format");
833 bump("Protocol error: Expected control record");
836 if (sscanf(buf+1, "%u %lu %[^\n]", &mode, &size, namebuf) != 3)
837 bump("Protocol error: Illegal file descriptor format");
838 /* Security fix: ensure the file ends up where we asked for it. */
845 p = namebuf + strlen(namebuf);
846 while (p > namebuf && p[-1] != '/' && p[-1] != '\\')
851 strcpy(namebuf, targ);
853 attr = GetFileAttributes(namebuf);
854 exists = (attr != (DWORD)-1);
857 if (exists && (attr & FILE_ATTRIBUTE_DIRECTORY) == 0) {
858 run_err("%s: Not a directory", namebuf);
862 if (! CreateDirectory(namebuf, NULL)) {
863 run_err("%s: Cannot create directory",
869 /* can we set the timestamp for directories ? */
873 f = CreateFile(namebuf, GENERIC_WRITE, 0, NULL,
874 CREATE_ALWAYS, FILE_ATTRIBUTE_NORMAL, 0);
875 if (f == INVALID_HANDLE_VALUE) {
876 run_err("%s: Cannot create file", namebuf);
884 stat_starttime = time(NULL);
886 if ((stat_name = strrchr(namebuf, '/')) == NULL)
890 if (strrchr(stat_name, '\\') != NULL)
891 stat_name = strrchr(stat_name, '\\') + 1;
894 for (i = 0; i < size; i += 4096) {
897 if (i + k > size) k = size - i;
898 if (ssh_scp_recv(transbuf, k) == 0)
899 bump("Lost connection");
900 if (wrerror) continue;
901 if (! WriteFile(f, transbuf, k, &j, NULL) || j != k) {
904 printf("\r%-25.25s | %50s\n",
906 "Write error.. waiting for end of file");
911 if (time(NULL) > stat_lasttime ||
913 stat_lasttime = time(NULL);
914 print_stats(stat_name, size, stat_bytes,
915 stat_starttime, stat_lasttime);
922 FILETIME actime, wrtime;
923 TIME_POSIX_TO_WIN(atime, actime);
924 TIME_POSIX_TO_WIN(mtime, wrtime);
925 SetFileTime(f, NULL, &actime, &wrtime);
930 run_err("%s: Write error", namebuf);
938 * We will copy local files to a remote server.
940 static void toremote(int argc, char *argv[])
942 char *src, *targ, *host, *user;
948 /* Separate host from filename */
952 bump("targ == NULL in toremote()");
956 /* Substitute "." for emtpy target */
958 /* Separate host and username */
960 host = strrchr(host, '@');
971 /* Find out if the source filespec covers multiple files
972 if so, we should set the targetshouldbedirectory flag */
974 WIN32_FIND_DATA fdat;
975 if (colon(argv[0]) != NULL)
976 bump("%s: Remote to remote not supported", argv[0]);
977 fh = FindFirstFile(argv[0], &fdat);
978 if (fh == INVALID_HANDLE_VALUE)
979 bump("%s: No such file or directory\n", argv[0]);
980 if (FindNextFile(fh, &fdat))
981 targetshouldbedirectory = 1;
985 cmd = smalloc(strlen(targ) + 100);
986 sprintf(cmd, "scp%s%s%s%s -t %s",
987 verbose ? " -v" : "",
988 recursive ? " -r" : "",
989 preserve ? " -p" : "",
990 targetshouldbedirectory ? " -d" : "",
992 do_cmd(host, user, cmd);
997 for (i = 0; i < argc - 1; i++) {
999 WIN32_FIND_DATA fdat;
1001 if (colon(src) != NULL) {
1002 tell_user(stderr, "%s: Remote to remote not supported\n", src);
1006 dir = FindFirstFile(src, &fdat);
1007 if (dir == INVALID_HANDLE_VALUE) {
1008 run_err("%s: No such file or directory", src);
1015 * Ensure that . and .. are never matched by wildcards,
1016 * but only by deliberate action.
1018 if (!strcmp(fdat.cFileName, ".") ||
1019 !strcmp(fdat.cFileName, "..")) {
1021 * Find*File has returned a special dir. We require
1022 * that _either_ `src' ends in a backslash followed
1023 * by that string, _or_ `src' is precisely that
1026 int len = strlen(src), dlen = strlen(fdat.cFileName);
1027 if (len == dlen && !strcmp(src, fdat.cFileName)) {
1029 } else if (len > dlen+1 && src[len-dlen-1] == '\\' &&
1030 !strcmp(src+len-dlen, fdat.cFileName)) {
1033 continue; /* ignore this one */
1035 if (strlen(src) + strlen(fdat.cFileName) >=
1037 tell_user(stderr, "%s: Name too long", src);
1040 strcpy(namebuf, src);
1041 if ((last = strrchr(namebuf, '/')) == NULL)
1045 if (strrchr(last, '\\') != NULL)
1046 last = strrchr(last, '\\') + 1;
1047 if (last == namebuf && strrchr(namebuf, ':') != NULL)
1048 last = strchr(namebuf, ':') + 1;
1049 strcpy(last, fdat.cFileName);
1051 } while (FindNextFile(dir, &fdat));
1057 * We will copy files from a remote server to the local machine.
1059 static void tolocal(int argc, char *argv[])
1061 char *src, *targ, *host, *user;
1065 bump("More than one remote source not supported");
1070 /* Separate host from filename */
1074 bump("Local to local copy not supported");
1078 /* Substitute "." for empty filename */
1080 /* Separate username and hostname */
1082 host = strrchr(host, '@');
1092 cmd = smalloc(strlen(src) + 100);
1093 sprintf(cmd, "scp%s%s%s%s -f %s",
1094 verbose ? " -v" : "",
1095 recursive ? " -r" : "",
1096 preserve ? " -p" : "",
1097 targetshouldbedirectory ? " -d" : "",
1099 do_cmd(host, user, cmd);
1106 * We will issue a list command to get a remote directory.
1108 static void get_dir_list(int argc, char *argv[])
1110 char *src, *host, *user;
1116 /* Separate host from filename */
1120 bump("Local to local copy not supported");
1124 /* Substitute "." for empty filename */
1126 /* Separate username and hostname */
1128 host = strrchr(host, '@');
1138 cmd = smalloc(4*strlen(src) + 100);
1139 strcpy(cmd, "ls -la '");
1140 p = cmd + strlen(cmd);
1141 for (q = src; *q; q++) {
1143 *p++ = '\''; *p++ = '\\'; *p++ = '\''; *p++ = '\'';
1151 do_cmd(host, user, cmd);
1154 while (ssh_scp_recv(&c, 1) > 0)
1155 tell_char(stdout, c);
1159 * Initialize the Win$ock driver.
1161 static void init_winsock(void)
1166 winsock_ver = MAKEWORD(1, 1);
1167 if (WSAStartup(winsock_ver, &wsadata))
1168 bump("Unable to initialise WinSock");
1169 if (LOBYTE(wsadata.wVersion) != 1 ||
1170 HIBYTE(wsadata.wVersion) != 1)
1171 bump("WinSock version is incompatible with 1.1");
1175 * Short description of parameters.
1177 static void usage(void)
1179 printf("PuTTY Secure Copy client\n");
1180 printf("%s\n", ver);
1181 printf("Usage: pscp [options] [user@]host:source target\n");
1182 printf(" pscp [options] source [source...] [user@]host:target\n");
1183 printf(" pscp [options] -ls user@host:filespec\n");
1184 printf("Options:\n");
1185 printf(" -p preserve file attributes\n");
1186 printf(" -q quiet, don't show statistics\n");
1187 printf(" -r copy directories recursively\n");
1188 printf(" -v show verbose messages\n");
1189 printf(" -P port connect to specified port\n");
1190 printf(" -pw passw login with specified password\n");
1191 /* GUI Adaptation - Sept 2000 */
1192 printf(" -gui hWnd GUI mode with the windows handle for receiving messages\n");
1197 * Main program (no, really?)
1199 int main(int argc, char *argv[])
1204 default_protocol = PROT_TELNET;
1206 flags = FLAG_STDERR;
1207 ssh_get_password = &get_password;
1211 for (i = 1; i < argc; i++) {
1212 if (argv[i][0] != '-')
1214 if (strcmp(argv[i], "-v") == 0)
1215 verbose = 1, flags |= FLAG_VERBOSE;
1216 else if (strcmp(argv[i], "-r") == 0)
1218 else if (strcmp(argv[i], "-p") == 0)
1220 else if (strcmp(argv[i], "-q") == 0)
1222 else if (strcmp(argv[i], "-h") == 0 ||
1223 strcmp(argv[i], "-?") == 0)
1225 else if (strcmp(argv[i], "-P") == 0 && i+1 < argc)
1226 portnumber = atoi(argv[++i]);
1227 else if (strcmp(argv[i], "-pw") == 0 && i+1 < argc)
1228 password = argv[++i];
1229 else if (strcmp(argv[i], "-gui") == 0 && i+1 < argc) {
1230 gui_hwnd = argv[++i];
1232 } else if (strcmp(argv[i], "-ls") == 0)
1234 else if (strcmp(argv[i], "--") == 0)
1246 get_dir_list(argc, argv);
1253 targetshouldbedirectory = 1;
1255 if (colon(argv[argc-1]) != NULL)
1256 toremote(argc, argv);
1258 tolocal(argc, argv);
1261 if (back != NULL && back->socket() != NULL) {
1263 back->special(TS_EOF);
1264 ssh_scp_recv(&ch, 1);
1269 /* GUI Adaptation - August 2000 */
1271 unsigned int msg_id = WM_RET_ERR_CNT;
1272 if (list) msg_id = WM_LS_RET_ERR_CNT;
1273 while (!PostMessage( (HWND)atoi(gui_hwnd), msg_id, (WPARAM)errs, 0/*lParam*/ ) )
1276 return (errs == 0 ? 0 : 1);