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 begin_session(void) { }
78 void logevent(char *string) { }
80 void verify_ssh_host_key(char *host, int port, char *keytype,
81 char *keystr, char *fingerprint) {
84 static const char absentmsg[] =
85 "The server's host key is not cached in the registry. You\n"
86 "have no guarantee that the server is the computer you\n"
88 "The server's key fingerprint is:\n"
90 "If you trust this host, enter \"y\" to add the key to\n"
91 "PuTTY's cache and carry on connecting.\n"
92 "If you do not trust this host, enter \"n\" to abandon the\n"
94 "Continue connecting? (y/n) ";
96 static const char wrongmsg[] =
97 "WARNING - POTENTIAL SECURITY BREACH!\n"
98 "The server's host key does not match the one PuTTY has\n"
99 "cached in the registry. This means that either the\n"
100 "server administrator has changed the host key, or you\n"
101 "have actually connected to another computer pretending\n"
102 "to be the server.\n"
103 "The new key fingerprint is:\n"
105 "If you were expecting this change and trust the new key,\n"
106 "enter Yes to update PuTTY's cache and continue connecting.\n"
107 "If you want to carry on connecting but without updating\n"
108 "the cache, enter No.\n"
109 "If you want to abandon the connection completely, press\n"
110 "Return to cancel. Pressing Return is the ONLY guaranteed\n"
112 "Update cached key? (y/n, Return cancels connection) ";
114 static const char abandoned[] = "Connection abandoned.\n";
119 * Verify the key against the registry.
121 ret = verify_host_key(host, port, keytype, keystr);
123 if (ret == 0) /* success - key matched OK */
125 if (ret == 2) { /* key was different */
126 fprintf(stderr, wrongmsg, fingerprint);
127 if (fgets(line, sizeof(line), stdin) &&
128 line[0] != '\0' && line[0] != '\n') {
129 if (line[0] == 'y' || line[0] == 'Y')
130 store_host_key(host, port, keytype, keystr);
132 fprintf(stderr, abandoned);
136 if (ret == 1) { /* key was absent */
137 fprintf(stderr, absentmsg, fingerprint);
138 if (fgets(line, sizeof(line), stdin) &&
139 (line[0] == 'y' || line[0] == 'Y'))
140 store_host_key(host, port, keytype, keystr);
142 fprintf(stderr, abandoned);
148 /* GUI Adaptation - Sept 2000 */
149 static void send_msg(HWND h, UINT message, WPARAM wParam)
151 while (!PostMessage( h, message, wParam, 0))
155 static void tell_char(FILE *stream, char c)
161 unsigned int msg_id = WM_STD_OUT_CHAR;
162 if (stream == stderr) msg_id = WM_STD_ERR_CHAR;
163 send_msg( (HWND)atoi(gui_hwnd), msg_id, (WPARAM)c );
167 static void tell_str(FILE *stream, char *str)
171 for( i = 0; i < strlen(str); ++i )
172 tell_char(stream, str[i]);
175 static void tell_user(FILE *stream, char *fmt, ...)
177 char str[0x100]; /* Make the size big enough */
180 vsprintf(str, fmt, ap);
183 tell_str(stream, str);
186 static void gui_update_stats(char *name, unsigned long size, int percentage, unsigned long elapsed)
190 if (strcmp(name,statname) != 0)
192 for( i = 0; i < strlen(name); ++i )
193 send_msg( (HWND)atoi(gui_hwnd), WM_STATS_CHAR, (WPARAM)name[i]);
194 send_msg( (HWND)atoi(gui_hwnd), WM_STATS_CHAR, (WPARAM)'\n' );
195 strcpy(statname,name);
197 if (statsize != size)
199 send_msg( (HWND)atoi(gui_hwnd), WM_STATS_SIZE, (WPARAM)size );
202 if (statelapsed != elapsed)
204 send_msg( (HWND)atoi(gui_hwnd), WM_STATS_ELAPSED, (WPARAM)elapsed );
205 statelapsed = elapsed;
207 if (statperct != percentage)
209 send_msg( (HWND)atoi(gui_hwnd), WM_STATS_PERCENT, (WPARAM)percentage );
210 statperct = percentage;
215 * Print an error message and perform a fatal exit.
217 void fatalbox(char *fmt, ...)
219 char str[0x100]; /* Make the size big enough */
222 strcpy(str, "Fatal:");
223 vsprintf(str+strlen(str), fmt, ap);
226 tell_str(stderr, str);
230 void connection_fatal(char *fmt, ...)
232 char str[0x100]; /* Make the size big enough */
235 strcpy(str, "Fatal:");
236 vsprintf(str+strlen(str), fmt, ap);
239 tell_str(stderr, str);
245 * Be told what socket we're supposed to be using.
247 static SOCKET scp_ssh_socket;
248 char *do_select(SOCKET skt, int startup) {
250 scp_ssh_socket = skt;
252 scp_ssh_socket = INVALID_SOCKET;
255 extern int select_result(WPARAM, LPARAM);
258 * Receive a block of data from the SSH link. Block until all data
261 * To do this, we repeatedly call the SSH protocol module, with our
262 * own trap in from_backend() to catch the data that comes back. We
263 * do this until we have enough data.
266 static unsigned char *outptr; /* where to put the data */
267 static unsigned outlen; /* how much data required */
268 static unsigned char *pending = NULL; /* any spare data */
269 static unsigned pendlen=0, pendsize=0; /* length and phys. size of buffer */
270 void from_backend(int is_stderr, char *data, int datalen) {
271 unsigned char *p = (unsigned char *)data;
272 unsigned len = (unsigned)datalen;
275 * stderr data is just spouted to local stderr and otherwise
279 fwrite(data, 1, len, stderr);
286 * If this is before the real session begins, just return.
292 unsigned used = outlen;
293 if (used > len) used = len;
294 memcpy(outptr, p, used);
295 outptr += used; outlen -= used;
296 p += used; len -= used;
300 if (pendsize < pendlen + len) {
301 pendsize = pendlen + len + 4096;
302 pending = (pending ? srealloc(pending, pendsize) :
305 fatalbox("Out of memory");
307 memcpy(pending+pendlen, p, len);
311 static int ssh_scp_recv(unsigned char *buf, int len) {
316 * See if the pending-input block contains some of what we
320 unsigned pendused = pendlen;
321 if (pendused > outlen)
323 memcpy(outptr, pending, pendused);
324 memmove(pending, pending+pendused, pendlen-pendused);
341 FD_SET(scp_ssh_socket, &readfds);
342 if (select(1, &readfds, NULL, NULL, NULL) < 0)
344 select_result((WPARAM)scp_ssh_socket, (LPARAM)FD_READ);
351 * Loop through the ssh connection and authentication process.
353 static void ssh_scp_init(void) {
354 if (scp_ssh_socket == INVALID_SOCKET)
356 while (!back->sendok()) {
359 FD_SET(scp_ssh_socket, &readfds);
360 if (select(1, &readfds, NULL, NULL, NULL) < 0)
362 select_result((WPARAM)scp_ssh_socket, (LPARAM)FD_READ);
367 * Print an error message and exit after closing the SSH link.
369 static void bump(char *fmt, ...)
371 char str[0x100]; /* Make the size big enough */
374 strcpy(str, "Fatal:");
375 vsprintf(str+strlen(str), fmt, ap);
378 tell_str(stderr, str);
380 if (back != NULL && back->socket() != NULL) {
382 back->special(TS_EOF);
383 ssh_scp_recv(&ch, 1);
388 static int get_password(const char *prompt, char *str, int maxlen)
394 static int tried_once = 0;
399 strncpy(str, password, maxlen);
400 str[maxlen-1] = '\0';
406 /* GUI Adaptation - Sept 2000 */
408 if (maxlen>0) str[0] = '\0';
410 hin = GetStdHandle(STD_INPUT_HANDLE);
411 hout = GetStdHandle(STD_OUTPUT_HANDLE);
412 if (hin == INVALID_HANDLE_VALUE || hout == INVALID_HANDLE_VALUE)
413 bump("Cannot get standard input/output handles");
415 GetConsoleMode(hin, &savemode);
416 SetConsoleMode(hin, (savemode & (~ENABLE_ECHO_INPUT)) |
417 ENABLE_PROCESSED_INPUT | ENABLE_LINE_INPUT);
419 WriteFile(hout, prompt, strlen(prompt), &i, NULL);
420 ReadFile(hin, str, maxlen-1, &i, NULL);
422 SetConsoleMode(hin, savemode);
424 if ((int)i > maxlen) i = maxlen-1; else i = i - 2;
427 WriteFile(hout, "\r\n", 2, &i, NULL);
434 * Open an SSH connection to user@host and execute cmd.
436 static void do_cmd(char *host, char *user, char *cmd)
438 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') {
458 bump("Empty user name");
461 if (cfg.protocol != PROT_SSH)
465 cfg.port = portnumber;
467 strncpy(cfg.remote_cmd, cmd, sizeof(cfg.remote_cmd));
468 cfg.remote_cmd[sizeof(cfg.remote_cmd)-1] = '\0';
473 err = back->init(cfg.host, cfg.port, &realhost);
475 bump("ssh_init: %s", err);
477 if (verbose && realhost != NULL)
478 tell_user(stderr, "Connected to %s\n", realhost);
482 * Update statistic information about current file.
484 static void print_stats(char *name, unsigned long size, unsigned long done,
485 time_t start, time_t now)
492 /* GUI Adaptation - Sept 2000 */
494 gui_update_stats(name, size, (int)(100 * (done*1.0/size)),
495 (unsigned long)difftime(now, start));
498 ratebs = (float) done / (now - start);
500 ratebs = (float) done;
505 eta = (unsigned long) ((size - done) / ratebs);
506 sprintf(etastr, "%02ld:%02ld:%02ld",
507 eta / 3600, (eta % 3600) / 60, eta % 60);
509 pct = (int) (100.0 * (float) done / size);
511 printf("\r%-25.25s | %10ld kB | %5.1f kB/s | ETA: %8s | %3d%%",
512 name, done / 1024, ratebs / 1024.0,
521 * Find a colon in str and return a pointer to the colon.
522 * This is used to separate hostname from filename.
524 static char * colon(char *str)
526 /* We ignore a leading colon, since the hostname cannot be
527 empty. We also ignore a colon as second character because
528 of filenames like f:myfile.txt. */
529 if (str[0] == '\0' ||
533 while (*str != '\0' &&
545 * Wait for a response from the other side.
546 * Return 0 if ok, -1 if error.
548 static int response(void)
550 char ch, resp, rbuf[2048];
553 if (ssh_scp_recv(&resp, 1) <= 0)
554 bump("Lost connection");
564 case 2: /* fatal error */
566 if (ssh_scp_recv(&ch, 1) <= 0)
567 bump("Protocol error: Lost connection");
569 } while (p < sizeof(rbuf) && ch != '\n');
572 tell_user(stderr, "%s\n", rbuf);
581 * Send an error message to the other side and to the screen.
582 * Increment error counter.
584 static void run_err(const char *fmt, ...)
590 strcpy(str, "scp: ");
591 vsprintf(str+strlen(str), fmt, ap);
593 back->send(str, strlen(str));
594 tell_user(stderr, "%s",str);
599 * Execute the source part of the SCP protocol.
601 static void source(char *src)
609 unsigned long stat_bytes;
610 time_t stat_starttime, stat_lasttime;
612 attr = GetFileAttributes(src);
613 if (attr == (DWORD)-1) {
614 run_err("%s: No such file or directory", src);
618 if ((attr & FILE_ATTRIBUTE_DIRECTORY) != 0) {
621 * Avoid . and .. directories.
624 p = strrchr(src, '/');
626 p = strrchr(src, '\\');
631 if (!strcmp(p, ".") || !strcmp(p, ".."))
636 run_err("%s: not a regular file", src);
641 if ((last = strrchr(src, '/')) == NULL)
645 if (strrchr(last, '\\') != NULL)
646 last = strrchr(last, '\\') + 1;
647 if (last == src && strchr(src, ':') != NULL)
648 last = strchr(src, ':') + 1;
650 f = CreateFile(src, GENERIC_READ, FILE_SHARE_READ, NULL,
651 OPEN_EXISTING, 0, 0);
652 if (f == INVALID_HANDLE_VALUE) {
653 run_err("%s: Cannot open file", src);
658 FILETIME actime, wrtime;
659 unsigned long mtime, atime;
660 GetFileTime(f, NULL, &actime, &wrtime);
661 TIME_WIN_TO_POSIX(actime, atime);
662 TIME_WIN_TO_POSIX(wrtime, mtime);
663 sprintf(buf, "T%lu 0 %lu 0\n", mtime, atime);
664 back->send(buf, strlen(buf));
669 size = GetFileSize(f, NULL);
670 sprintf(buf, "C0644 %lu %s\n", size, last);
672 tell_user(stderr, "Sending file modes: %s", buf);
673 back->send(buf, strlen(buf));
679 stat_starttime = time(NULL);
683 for (i = 0; i < size; i += 4096) {
686 if (i + k > size) k = size - i;
687 if (! ReadFile(f, transbuf, k, &j, NULL) || j != k) {
688 if (statistics) printf("\n");
689 bump("%s: Read error", src);
691 back->send(transbuf, k);
694 if (time(NULL) != stat_lasttime ||
696 stat_lasttime = time(NULL);
697 print_stats(last, size, stat_bytes,
698 stat_starttime, stat_lasttime);
709 * Recursively send the contents of a directory.
711 static void rsource(char *src)
716 WIN32_FIND_DATA fdat;
719 if ((last = strrchr(src, '/')) == NULL)
723 if (strrchr(last, '\\') != NULL)
724 last = strrchr(last, '\\') + 1;
725 if (last == src && strchr(src, ':') != NULL)
726 last = strchr(src, ':') + 1;
728 /* maybe send filetime */
730 sprintf(buf, "D0755 0 %s\n", last);
732 tell_user(stderr, "Entering directory: %s", buf);
733 back->send(buf, strlen(buf));
737 sprintf(buf, "%s/*", src);
738 dir = FindFirstFile(buf, &fdat);
739 ok = (dir != INVALID_HANDLE_VALUE);
741 if (strcmp(fdat.cFileName, ".") == 0 ||
742 strcmp(fdat.cFileName, "..") == 0) {
743 } else if (strlen(src) + 1 + strlen(fdat.cFileName) >=
745 run_err("%s/%s: Name too long", src, fdat.cFileName);
747 sprintf(buf, "%s/%s", src, fdat.cFileName);
750 ok = FindNextFile(dir, &fdat);
755 back->send(buf, strlen(buf));
760 * Execute the sink part of the SCP protocol.
762 static void sink(char *targ, char *src)
772 unsigned long mtime, atime;
774 unsigned long size, i;
776 unsigned long stat_bytes;
777 time_t stat_starttime, stat_lasttime;
780 attr = GetFileAttributes(targ);
781 if (attr != (DWORD)-1 && (attr & FILE_ATTRIBUTE_DIRECTORY) != 0)
784 if (targetshouldbedirectory && !targisdir)
785 bump("%s: Not a directory", targ);
791 if (ssh_scp_recv(&ch, 1) <= 0)
794 bump("Protocol error: Unexpected newline");
798 if (ssh_scp_recv(&ch, 1) <= 0)
799 bump("Lost connection");
801 } while (i < sizeof(buf) && ch != '\n');
804 case '\01': /* error */
805 tell_user(stderr, "%s\n", buf+1);
808 case '\02': /* fatal error */
814 if (sscanf(buf, "T%ld %*d %ld %*d",
815 &mtime, &atime) == 2) {
820 bump("Protocol error: Illegal time format");
825 bump("Protocol error: Expected control record");
828 if (sscanf(buf+1, "%u %lu %[^\n]", &mode, &size, namebuf) != 3)
829 bump("Protocol error: Illegal file descriptor format");
830 /* Security fix: ensure the file ends up where we asked for it. */
837 p = namebuf + strlen(namebuf);
838 while (p > namebuf && p[-1] != '/' && p[-1] != '\\')
843 strcpy(namebuf, targ);
845 attr = GetFileAttributes(namebuf);
846 exists = (attr != (DWORD)-1);
849 if (exists && (attr & FILE_ATTRIBUTE_DIRECTORY) == 0) {
850 run_err("%s: Not a directory", namebuf);
854 if (! CreateDirectory(namebuf, NULL)) {
855 run_err("%s: Cannot create directory",
861 /* can we set the timestamp for directories ? */
865 f = CreateFile(namebuf, GENERIC_WRITE, 0, NULL,
866 CREATE_ALWAYS, FILE_ATTRIBUTE_NORMAL, 0);
867 if (f == INVALID_HANDLE_VALUE) {
868 run_err("%s: Cannot create file", namebuf);
876 stat_starttime = time(NULL);
878 if ((stat_name = strrchr(namebuf, '/')) == NULL)
882 if (strrchr(stat_name, '\\') != NULL)
883 stat_name = strrchr(stat_name, '\\') + 1;
886 for (i = 0; i < size; i += 4096) {
889 if (i + k > size) k = size - i;
890 if (ssh_scp_recv(transbuf, k) == 0)
891 bump("Lost connection");
892 if (wrerror) continue;
893 if (! WriteFile(f, transbuf, k, &j, NULL) || j != k) {
896 printf("\r%-25.25s | %50s\n",
898 "Write error.. waiting for end of file");
903 if (time(NULL) > stat_lasttime ||
905 stat_lasttime = time(NULL);
906 print_stats(stat_name, size, stat_bytes,
907 stat_starttime, stat_lasttime);
914 FILETIME actime, wrtime;
915 TIME_POSIX_TO_WIN(atime, actime);
916 TIME_POSIX_TO_WIN(mtime, wrtime);
917 SetFileTime(f, NULL, &actime, &wrtime);
922 run_err("%s: Write error", namebuf);
930 * We will copy local files to a remote server.
932 static void toremote(int argc, char *argv[])
934 char *src, *targ, *host, *user;
940 /* Separate host from filename */
944 bump("targ == NULL in toremote()");
948 /* Substitute "." for emtpy target */
950 /* Separate host and username */
952 host = strrchr(host, '@');
963 /* Find out if the source filespec covers multiple files
964 if so, we should set the targetshouldbedirectory flag */
966 WIN32_FIND_DATA fdat;
967 if (colon(argv[0]) != NULL)
968 bump("%s: Remote to remote not supported", argv[0]);
969 fh = FindFirstFile(argv[0], &fdat);
970 if (fh == INVALID_HANDLE_VALUE)
971 bump("%s: No such file or directory\n", argv[0]);
972 if (FindNextFile(fh, &fdat))
973 targetshouldbedirectory = 1;
977 cmd = smalloc(strlen(targ) + 100);
978 sprintf(cmd, "scp%s%s%s%s -t %s",
979 verbose ? " -v" : "",
980 recursive ? " -r" : "",
981 preserve ? " -p" : "",
982 targetshouldbedirectory ? " -d" : "",
984 do_cmd(host, user, cmd);
989 for (i = 0; i < argc - 1; i++) {
991 WIN32_FIND_DATA fdat;
993 if (colon(src) != NULL) {
994 tell_user(stderr, "%s: Remote to remote not supported\n", src);
998 dir = FindFirstFile(src, &fdat);
999 if (dir == INVALID_HANDLE_VALUE) {
1000 run_err("%s: No such file or directory", src);
1007 * Ensure that . and .. are never matched by wildcards,
1008 * but only by deliberate action.
1010 if (!strcmp(fdat.cFileName, ".") ||
1011 !strcmp(fdat.cFileName, "..")) {
1013 * Find*File has returned a special dir. We require
1014 * that _either_ `src' ends in a backslash followed
1015 * by that string, _or_ `src' is precisely that
1018 int len = strlen(src), dlen = strlen(fdat.cFileName);
1019 if (len == dlen && !strcmp(src, fdat.cFileName)) {
1021 } else if (len > dlen+1 && src[len-dlen-1] == '\\' &&
1022 !strcmp(src+len-dlen, fdat.cFileName)) {
1025 continue; /* ignore this one */
1027 if (strlen(src) + strlen(fdat.cFileName) >=
1029 tell_user(stderr, "%s: Name too long", src);
1032 strcpy(namebuf, src);
1033 if ((last = strrchr(namebuf, '/')) == NULL)
1037 if (strrchr(last, '\\') != NULL)
1038 last = strrchr(last, '\\') + 1;
1039 if (last == namebuf && strrchr(namebuf, ':') != NULL)
1040 last = strchr(namebuf, ':') + 1;
1041 strcpy(last, fdat.cFileName);
1043 } while (FindNextFile(dir, &fdat));
1049 * We will copy files from a remote server to the local machine.
1051 static void tolocal(int argc, char *argv[])
1053 char *src, *targ, *host, *user;
1057 bump("More than one remote source not supported");
1062 /* Separate host from filename */
1066 bump("Local to local copy not supported");
1070 /* Substitute "." for empty filename */
1072 /* Separate username and hostname */
1074 host = strrchr(host, '@');
1084 cmd = smalloc(strlen(src) + 100);
1085 sprintf(cmd, "scp%s%s%s%s -f %s",
1086 verbose ? " -v" : "",
1087 recursive ? " -r" : "",
1088 preserve ? " -p" : "",
1089 targetshouldbedirectory ? " -d" : "",
1091 do_cmd(host, user, cmd);
1098 * We will issue a list command to get a remote directory.
1100 static void get_dir_list(int argc, char *argv[])
1102 char *src, *host, *user;
1108 /* Separate host from filename */
1112 bump("Local to local copy not supported");
1116 /* Substitute "." for empty filename */
1118 /* Separate username and hostname */
1120 host = strrchr(host, '@');
1130 cmd = smalloc(4*strlen(src) + 100);
1131 strcpy(cmd, "ls -la '");
1132 p = cmd + strlen(cmd);
1133 for (q = src; *q; q++) {
1135 *p++ = '\''; *p++ = '\\'; *p++ = '\''; *p++ = '\'';
1143 do_cmd(host, user, cmd);
1146 while (ssh_scp_recv(&c, 1) > 0)
1147 tell_char(stdout, c);
1151 * Initialize the Win$ock driver.
1153 static void init_winsock(void)
1158 winsock_ver = MAKEWORD(1, 1);
1159 if (WSAStartup(winsock_ver, &wsadata))
1160 bump("Unable to initialise WinSock");
1161 if (LOBYTE(wsadata.wVersion) != 1 ||
1162 HIBYTE(wsadata.wVersion) != 1)
1163 bump("WinSock version is incompatible with 1.1");
1167 * Short description of parameters.
1169 static void usage(void)
1171 printf("PuTTY Secure Copy client\n");
1172 printf("%s\n", ver);
1173 printf("Usage: pscp [options] [user@]host:source target\n");
1174 printf(" pscp [options] source [source...] [user@]host:target\n");
1175 printf(" pscp [options] -ls user@host:filespec\n");
1176 printf("Options:\n");
1177 printf(" -p preserve file attributes\n");
1178 printf(" -q quiet, don't show statistics\n");
1179 printf(" -r copy directories recursively\n");
1180 printf(" -v show verbose messages\n");
1181 printf(" -P port connect to specified port\n");
1182 printf(" -pw passw login with specified password\n");
1183 /* GUI Adaptation - Sept 2000 */
1184 printf(" -gui hWnd GUI mode with the windows handle for receiving messages\n");
1189 * Main program (no, really?)
1191 int main(int argc, char *argv[])
1196 default_protocol = PROT_TELNET;
1198 flags = FLAG_STDERR;
1199 ssh_get_password = &get_password;
1203 for (i = 1; i < argc; i++) {
1204 if (argv[i][0] != '-')
1206 if (strcmp(argv[i], "-v") == 0)
1207 verbose = 1, flags |= FLAG_VERBOSE;
1208 else if (strcmp(argv[i], "-r") == 0)
1210 else if (strcmp(argv[i], "-p") == 0)
1212 else if (strcmp(argv[i], "-q") == 0)
1214 else if (strcmp(argv[i], "-h") == 0 ||
1215 strcmp(argv[i], "-?") == 0)
1217 else if (strcmp(argv[i], "-P") == 0 && i+1 < argc)
1218 portnumber = atoi(argv[++i]);
1219 else if (strcmp(argv[i], "-pw") == 0 && i+1 < argc)
1220 password = argv[++i];
1221 else if (strcmp(argv[i], "-gui") == 0 && i+1 < argc) {
1222 gui_hwnd = argv[++i];
1224 } else if (strcmp(argv[i], "-ls") == 0)
1226 else if (strcmp(argv[i], "--") == 0)
1238 get_dir_list(argc, argv);
1245 targetshouldbedirectory = 1;
1247 if (colon(argv[argc-1]) != NULL)
1248 toremote(argc, argv);
1250 tolocal(argc, argv);
1253 if (back != NULL && back->socket() != NULL) {
1255 back->special(TS_EOF);
1256 ssh_scp_recv(&ch, 1);
1261 /* GUI Adaptation - August 2000 */
1263 unsigned int msg_id = WM_RET_ERR_CNT;
1264 if (list) msg_id = WM_LS_RET_ERR_CNT;
1265 while (!PostMessage( (HWND)atoi(gui_hwnd), msg_id, (WPARAM)errs, 0/*lParam*/ ) )
1268 return (errs == 0 ? 0 : 1);