X-Git-Url: https://git.distorted.org.uk/u/mdw/putty/blobdiff_plain/ed89e8a5144545e78b782a98e5c93d8c99baa901..6f34e365eed04c1b4ebcf6d90511dd9e4400880a:/scp.c diff --git a/scp.c b/scp.c index 3ea2c353..7466e433 100644 --- a/scp.c +++ b/scp.c @@ -1,9 +1,11 @@ /* * scp.c - Scp (Secure Copy) client for PuTTY. - * Joris van Rantwijk, Aug 1999, Nov 1999. + * Joris van Rantwijk, Simon Tatham * * This is mainly based on ssh-1.2.26/scp.c by Timo Rinne & Tatu Ylonen. * They, in turn, used stuff from BSD rcp. + * + * Adaptations to enable connecting a GUI by L. Gunnarsson - Sept 2000 */ #include @@ -12,6 +14,9 @@ #include #include #include +/* GUI Adaptation - Sept 2000 */ +#include +#include #define PUTTY_DO_GLOBALS #include "putty.h" @@ -22,7 +27,18 @@ #define TIME_WIN_TO_POSIX(ft, t) ((t) = (unsigned long) \ ((*(LONGLONG*)&(ft)) / (LONGLONG) 10000000 - (LONGLONG) 11644473600)) -int verbose = 0; +/* GUI Adaptation - Sept 2000 */ +#define WM_APP_BASE 0x8000 +#define WM_STD_OUT_CHAR ( WM_APP_BASE+400 ) +#define WM_STD_ERR_CHAR ( WM_APP_BASE+401 ) +#define WM_STATS_CHAR ( WM_APP_BASE+402 ) +#define WM_STATS_SIZE ( WM_APP_BASE+403 ) +#define WM_STATS_PERCENT ( WM_APP_BASE+404 ) +#define WM_STATS_ELAPSED ( WM_APP_BASE+405 ) +#define WM_RET_ERR_CNT ( WM_APP_BASE+406 ) +#define WM_LS_RET_ERR_CNT ( WM_APP_BASE+407 ) + +static int verbose = 0; static int recursive = 0; static int preserve = 0; static int targetshouldbedirectory = 0; @@ -31,22 +47,129 @@ static int portnumber = 0; static char *password = NULL; static int errs = 0; static int connection_open = 0; +/* GUI Adaptation - Sept 2000 */ +#define NAME_STR_MAX 2048 +static char statname[NAME_STR_MAX+1]; +static unsigned long statsize = 0; +static int statperct = 0; +static time_t statelapsed = 0; +static int gui_mode = 0; +static char *gui_hwnd = NULL; static void source(char *src); static void rsource(char *src); static void sink(char *targ); +/* GUI Adaptation - Sept 2000 */ +static void tell_char(FILE *stream, char c); +static void tell_str(FILE *stream, char *str); +static void tell_user(FILE *stream, char *fmt, ...); +static void send_char_msg(unsigned int msg_id, char c); +static void send_str_msg(unsigned int msg_id, char *str); +static void gui_update_stats(char *name, unsigned long size, int percentage, time_t elapsed); + +/* + * These functions are needed to link with ssh.c, but never get called. + */ +void term_out(void) +{ + abort(); +} +void begin_session(void) { +} + +/* GUI Adaptation - Sept 2000 */ +void send_msg(HWND h, UINT message, WPARAM wParam) +{ + while (!PostMessage( h, message, wParam, 0)) + SleepEx(1000,TRUE); +} + +void tell_char(FILE *stream, char c) +{ + if (!gui_mode) + fputc(c, stream); + else + { + unsigned int msg_id = WM_STD_OUT_CHAR; + if (stream = stderr) msg_id = WM_STD_ERR_CHAR; + send_msg( (HWND)atoi(gui_hwnd), msg_id, (WPARAM)c ); + } +} + +void tell_str(FILE *stream, char *str) +{ + unsigned int i; + + for( i = 0; i < strlen(str); ++i ) + tell_char(stream, str[i]); +} + +void tell_user(FILE *stream, char *fmt, ...) +{ + char str[0x100]; /* Make the size big enough */ + va_list ap; + va_start(ap, fmt); + vsprintf(str, fmt, ap); + va_end(ap); + strcat(str, "\n"); + tell_str(stream, str); +} + +void gui_update_stats(char *name, unsigned long size, int percentage, time_t elapsed) +{ + unsigned int i; + + if (strcmp(name,statname) != 0) + { + for( i = 0; i < strlen(name); ++i ) + send_msg( (HWND)atoi(gui_hwnd), WM_STATS_CHAR, (WPARAM)name[i]); + send_msg( (HWND)atoi(gui_hwnd), WM_STATS_CHAR, (WPARAM)'\n' ); + strcpy(statname,name); + } + if (statsize != size) + { + send_msg( (HWND)atoi(gui_hwnd), WM_STATS_SIZE, (WPARAM)size ); + statsize = size; + } + if (statelapsed != elapsed) + { + send_msg( (HWND)atoi(gui_hwnd), WM_STATS_ELAPSED, (WPARAM)elapsed ); + statelapsed = elapsed; + } + if (statperct != percentage) + { + send_msg( (HWND)atoi(gui_hwnd), WM_STATS_PERCENT, (WPARAM)percentage ); + statperct = percentage; + } +} /* * Print an error message and perform a fatal exit. */ void fatalbox(char *fmt, ...) { + char str[0x100]; /* Make the size big enough */ + va_list ap; + va_start(ap, fmt); + strcpy(str, "Fatal:"); + vsprintf(str+strlen(str), fmt, ap); + va_end(ap); + strcat(str, "\n"); + tell_str(stderr, str); + + exit(1); +} +void connection_fatal(char *fmt, ...) +{ + char str[0x100]; /* Make the size big enough */ va_list ap; va_start(ap, fmt); - fprintf(stderr, "Fatal: "); - vfprintf(stderr, fmt, ap); - fprintf(stderr, "\n"); + strcpy(str, "Fatal:"); + vsprintf(str+strlen(str), fmt, ap); va_end(ap); + strcat(str, "\n"); + tell_str(stderr, str); + exit(1); } @@ -55,50 +178,66 @@ void fatalbox(char *fmt, ...) */ static void bump(char *fmt, ...) { + char str[0x100]; /* Make the size big enough */ va_list ap; va_start(ap, fmt); - fprintf(stderr, "Fatal: "); - vfprintf(stderr, fmt, ap); - fprintf(stderr, "\n"); + strcpy(str, "Fatal:"); + vsprintf(str+strlen(str), fmt, ap); va_end(ap); + strcat(str, "\n"); + tell_str(stderr, str); + if (connection_open) { char ch; - ssh_send_eof(); - ssh_recv(&ch, 1); + ssh_scp_send_eof(); + ssh_scp_recv(&ch, 1); } exit(1); } -void ssh_get_password(char *prompt, char *str, int maxlen) +static int get_password(const char *prompt, char *str, int maxlen) { HANDLE hin, hout; DWORD savemode, i; if (password) { - strncpy(str, password, maxlen); - str[maxlen-1] = '\0'; - password = NULL; - return; + static int tried_once = 0; + + if (tried_once) { + return 0; + } else { + strncpy(str, password, maxlen); + str[maxlen-1] = '\0'; + tried_once = 1; + return 1; + } } - hin = GetStdHandle(STD_INPUT_HANDLE); - hout = GetStdHandle(STD_OUTPUT_HANDLE); - if (hin == INVALID_HANDLE_VALUE || hout == INVALID_HANDLE_VALUE) - bump("Cannot get standard input/output handles"); + /* GUI Adaptation - Sept 2000 */ + if (gui_mode) { + if (maxlen>0) str[0] = '\0'; + } else { + hin = GetStdHandle(STD_INPUT_HANDLE); + hout = GetStdHandle(STD_OUTPUT_HANDLE); + if (hin == INVALID_HANDLE_VALUE || hout == INVALID_HANDLE_VALUE) + bump("Cannot get standard input/output handles"); + + GetConsoleMode(hin, &savemode); + SetConsoleMode(hin, (savemode & (~ENABLE_ECHO_INPUT)) | + ENABLE_PROCESSED_INPUT | ENABLE_LINE_INPUT); - GetConsoleMode(hin, &savemode); - SetConsoleMode(hin, (savemode & (~ENABLE_ECHO_INPUT)) | - ENABLE_PROCESSED_INPUT | ENABLE_LINE_INPUT); + WriteFile(hout, prompt, strlen(prompt), &i, NULL); + ReadFile(hin, str, maxlen-1, &i, NULL); - WriteFile(hout, prompt, strlen(prompt), &i, NULL); - ReadFile(hin, str, maxlen-1, &i, NULL); + SetConsoleMode(hin, savemode); - SetConsoleMode(hin, savemode); + if ((int)i > maxlen) i = maxlen-1; else i = i - 2; + str[i] = '\0'; - if ((int)i > maxlen) i = maxlen-1; else i = i - 2; - str[i] = '\0'; + WriteFile(hout, "\r\n", 2, &i, NULL); + } - WriteFile(hout, "\r\n", 2, &i, NULL); + return 1; } /* @@ -134,11 +273,11 @@ static void do_cmd(char *host, char *user, char *cmd) if (portnumber) cfg.port = portnumber; - err = ssh_init(cfg.host, cfg.port, cmd, &realhost); + err = ssh_scp_init(cfg.host, cfg.port, cmd, &realhost); if (err != NULL) bump("ssh_init: %s", err); if (verbose && realhost != NULL) - fprintf(stderr, "Connected to %s\n", realhost); + tell_user(stderr, "Connected to %s\n", realhost); connection_open = 1; } @@ -154,31 +293,36 @@ static void print_stats(char *name, unsigned long size, unsigned long done, char etastr[10]; int pct; - if (now > start) - ratebs = (float) done / (now - start); - else - ratebs = (float) done; + /* GUI Adaptation - Sept 2000 */ + if (gui_mode) + gui_update_stats(name, size, ((done *100) / size), now-start); + else { + if (now > start) + ratebs = (float) done / (now - start); + else + ratebs = (float) done; - if (ratebs < 1.0) - eta = size - done; - else - eta = (unsigned long) ((size - done) / ratebs); - sprintf(etastr, "%02ld:%02ld:%02ld", - eta / 3600, (eta % 3600) / 60, eta % 60); + if (ratebs < 1.0) + eta = size - done; + else + eta = (unsigned long) ((size - done) / ratebs); + sprintf(etastr, "%02ld:%02ld:%02ld", + eta / 3600, (eta % 3600) / 60, eta % 60); - pct = (int) (100.0 * (float) done / size); + pct = (int) (100.0 * (float) done / size); - printf("\r%-25.25s | %10ld kB | %5.1f kB/s | ETA: %8s | %3d%%", - name, done / 1024, ratebs / 1024.0, - etastr, pct); + printf("\r%-25.25s | %10ld kB | %5.1f kB/s | ETA: %8s | %3d%%", + name, done / 1024, ratebs / 1024.0, + etastr, pct); - if (done == size) - printf("\n"); + if (done == size) + printf("\n"); + } } /* * Find a colon in str and return a pointer to the colon. - * This is used to seperate hostname from filename. + * This is used to separate hostname from filename. */ static char * colon(char *str) { @@ -209,7 +353,7 @@ static int response(void) char ch, resp, rbuf[2048]; int p; - if (ssh_recv(&resp, 1) <= 0) + if (ssh_scp_recv(&resp, 1) <= 0) bump("Lost connection"); p = 0; @@ -222,13 +366,13 @@ static int response(void) case 1: /* error */ case 2: /* fatal error */ do { - if (ssh_recv(&ch, 1) <= 0) + if (ssh_scp_recv(&ch, 1) <= 0) bump("Protocol error: Lost connection"); rbuf[p++] = ch; } while (p < sizeof(rbuf) && ch != '\n'); rbuf[p-1] = '\0'; if (resp == 1) - fprintf(stderr, "%s\n", rbuf); + tell_user(stderr, "%s\n", rbuf); else bump("%s", rbuf); errs++; @@ -249,9 +393,8 @@ static void run_err(const char *fmt, ...) strcpy(str, "\01scp: "); vsprintf(str+strlen(str), fmt, ap); strcat(str, "\n"); - ssh_send(str, strlen(str)); - vfprintf(stderr, fmt, ap); - fprintf(stderr, "\n"); + ssh_scp_send(str, strlen(str)); + tell_user(stderr, "%s",str); va_end(ap); } @@ -270,7 +413,7 @@ static void source(char *src) time_t stat_starttime, stat_lasttime; attr = GetFileAttributes(src); - if (attr == -1) { + if (attr == (DWORD)-1) { run_err("%s: No such file or directory", src); return; } @@ -310,7 +453,7 @@ static void source(char *src) f = CreateFile(src, GENERIC_READ, FILE_SHARE_READ, NULL, OPEN_EXISTING, 0, 0); if (f == INVALID_HANDLE_VALUE) { - run_err("%s: Cannot open file"); + run_err("%s: Cannot open file", src); return; } @@ -321,7 +464,7 @@ static void source(char *src) TIME_WIN_TO_POSIX(actime, atime); TIME_WIN_TO_POSIX(wrtime, mtime); sprintf(buf, "T%lu 0 %lu 0\n", mtime, atime); - ssh_send(buf, strlen(buf)); + ssh_scp_send(buf, strlen(buf)); if (response()) return; } @@ -329,8 +472,8 @@ static void source(char *src) size = GetFileSize(f, NULL); sprintf(buf, "C0644 %lu %s\n", size, last); if (verbose) - fprintf(stderr, "Sending file modes: %s", buf); - ssh_send(buf, strlen(buf)); + tell_user(stderr, "Sending file modes: %s", buf); + ssh_scp_send(buf, strlen(buf)); if (response()) return; @@ -348,7 +491,7 @@ static void source(char *src) if (statistics) printf("\n"); bump("%s: Read error", src); } - ssh_send(transbuf, k); + ssh_scp_send(transbuf, k); if (statistics) { stat_bytes += k; if (time(NULL) != stat_lasttime || @@ -361,7 +504,7 @@ static void source(char *src) } CloseHandle(f); - ssh_send("", 1); + ssh_scp_send("", 1); (void) response(); } @@ -389,8 +532,8 @@ static void rsource(char *src) sprintf(buf, "D0755 0 %s\n", last); if (verbose) - fprintf(stderr, "Entering directory: %s", buf); - ssh_send(buf, strlen(buf)); + tell_user(stderr, "Entering directory: %s", buf); + ssh_scp_send(buf, strlen(buf)); if (response()) return; @@ -412,7 +555,7 @@ static void rsource(char *src) FindClose(dir); sprintf(buf, "E\n"); - ssh_send(buf, strlen(buf)); + ssh_scp_send(buf, strlen(buf)); (void) response(); } @@ -425,7 +568,7 @@ static void sink(char *targ) char namebuf[2048]; char ch; int targisdir = 0; - int settime = 0; + int settime; int exists; DWORD attr; HANDLE f; @@ -438,43 +581,43 @@ static void sink(char *targ) char *stat_name; attr = GetFileAttributes(targ); - if (attr != -1 && (attr & FILE_ATTRIBUTE_DIRECTORY) != 0) + if (attr != (DWORD)-1 && (attr & FILE_ATTRIBUTE_DIRECTORY) != 0) targisdir = 1; if (targetshouldbedirectory && !targisdir) bump("%s: Not a directory", targ); - ssh_send("", 1); + ssh_scp_send("", 1); while (1) { settime = 0; gottime: - if (ssh_recv(&ch, 1) <= 0) + if (ssh_scp_recv(&ch, 1) <= 0) return; if (ch == '\n') bump("Protocol error: Unexpected newline"); i = 0; buf[i++] = ch; do { - if (ssh_recv(&ch, 1) <= 0) + if (ssh_scp_recv(&ch, 1) <= 0) bump("Lost connection"); buf[i++] = ch; } while (i < sizeof(buf) && ch != '\n'); buf[i-1] = '\0'; switch (buf[0]) { case '\01': /* error */ - fprintf(stderr, "%s\n", buf+1); + tell_user(stderr, "%s\n", buf+1); errs++; continue; case '\02': /* fatal error */ bump("%s", buf+1); case 'E': - ssh_send("", 1); + ssh_scp_send("", 1); return; case 'T': if (sscanf(buf, "T%ld %*d %ld %*d", &mtime, &atime) == 2) { settime = 1; - ssh_send("", 1); + ssh_scp_send("", 1); goto gottime; } bump("Protocol error: Illegal time format"); @@ -498,7 +641,7 @@ static void sink(char *targ) strcpy(namebuf, targ); } attr = GetFileAttributes(namebuf); - exists = (attr != -1); + exists = (attr != (DWORD)-1); if (buf[0] == 'D') { if (exists && (attr & FILE_ATTRIBUTE_DIRECTORY) == 0) { @@ -524,7 +667,7 @@ static void sink(char *targ) continue; } - ssh_send("", 1); + ssh_scp_send("", 1); if (statistics) { stat_bytes = 0; @@ -540,9 +683,9 @@ static void sink(char *targ) for (i = 0; i < size; i += 4096) { char transbuf[4096]; - int j, k = 4096; + DWORD j, k = 4096; if (i + k > size) k = size - i; - if (ssh_recv(transbuf, k) == 0) + if (ssh_scp_recv(transbuf, k) == 0) bump("Lost connection"); if (wrerror) continue; if (! WriteFile(f, transbuf, k, &j, NULL) || j != k) { @@ -577,7 +720,7 @@ static void sink(char *targ) run_err("%s: Write error", namebuf); continue; } - ssh_send("", 1); + ssh_scp_send("", 1); } } @@ -592,7 +735,7 @@ static void toremote(int argc, char *argv[]) targ = argv[argc-1]; - /* Seperate host from filename */ + /* Separate host from filename */ host = targ; targ = colon(targ); if (targ == NULL) @@ -602,7 +745,7 @@ static void toremote(int argc, char *argv[]) targ = "."; /* Substitute "." for emtpy target */ - /* Seperate host and username */ + /* Separate host and username */ user = host; host = strrchr(host, '@'); if (host == NULL) { @@ -646,8 +789,7 @@ static void toremote(int argc, char *argv[]) WIN32_FIND_DATA fdat; src = argv[i]; if (colon(src) != NULL) { - fprintf(stderr, - "%s: Remote to remote not supported\n", src); + tell_user(stderr, "%s: Remote to remote not supported\n", src); errs++; continue; } @@ -661,7 +803,7 @@ static void toremote(int argc, char *argv[]) char namebuf[2048]; if (strlen(src) + strlen(fdat.cFileName) >= sizeof(namebuf)) { - fprintf(stderr, "%s: Name too long", src); + tell_user(stderr, "%s: Name too long", src); continue; } strcpy(namebuf, src); @@ -694,7 +836,7 @@ static void tolocal(int argc, char *argv[]) src = argv[0]; targ = argv[1]; - /* Seperate host from filename */ + /* Separate host from filename */ host = src; src = colon(src); if (src == NULL) @@ -704,7 +846,7 @@ static void tolocal(int argc, char *argv[]) src = "."; /* Substitute "." for empty filename */ - /* Seperate username and hostname */ + /* Separate username and hostname */ user = host; host = strrchr(host, '@'); if (host == NULL) { @@ -730,9 +872,62 @@ static void tolocal(int argc, char *argv[]) } /* + * We will issue a list command to get a remote directory. + */ +static void get_dir_list(int argc, char *argv[]) +{ + char *src, *host, *user; + char *cmd, *p, *q; + char c; + + src = argv[0]; + + /* Separate host from filename */ + host = src; + src = colon(src); + if (src == NULL) + bump("Local to local copy not supported"); + *src++ = '\0'; + if (*src == '\0') + src = "."; + /* Substitute "." for empty filename */ + + /* Separate username and hostname */ + user = host; + host = strrchr(host, '@'); + if (host == NULL) { + host = user; + user = NULL; + } else { + *host++ = '\0'; + if (*user == '\0') + user = NULL; + } + + cmd = smalloc(4*strlen(src) + 100); + strcpy(cmd, "ls -la '"); + p = cmd + strlen(cmd); + for (q = src; *q; q++) { + if (*q == '\'') { + *p++ = '\''; *p++ = '\\'; *p++ = '\''; *p++ = '\''; + } else { + *p++ = *q; + } + } + *p++ = '\''; + *p = '\0'; + + do_cmd(host, user, cmd); + sfree(cmd); + + while (ssh_scp_recv(&c, 1) > 0) + tell_char(stdout, c); +} + +/* * Initialize the Win$ock driver. */ -static void init_winsock() +static void init_winsock(void) { WORD winsock_ver; WSADATA wsadata; @@ -748,12 +943,13 @@ static void init_winsock() /* * Short description of parameters. */ -static void usage() +static void usage(void) { printf("PuTTY Secure Copy client\n"); printf("%s\n", ver); - printf("Usage: scp [options] [user@]host:source target\n"); - printf(" scp [options] source [source...] [user@]host:target\n"); + printf("Usage: pscp [options] [user@]host:source target\n"); + printf(" pscp [options] source [source...] [user@]host:target\n"); + printf(" pscp [options] -ls user@host:filespec\n"); printf("Options:\n"); printf(" -p preserve file attributes\n"); printf(" -q quiet, don't show statistics\n"); @@ -761,6 +957,8 @@ static void usage() printf(" -v show verbose messages\n"); printf(" -P port connect to specified port\n"); printf(" -pw passw login with specified password\n"); + /* GUI Adaptation - Sept 2000 */ + printf(" -gui hWnd GUI mode with the windows handle for receiving messages\n"); exit(1); } @@ -770,14 +968,19 @@ static void usage() int main(int argc, char *argv[]) { int i; + int list = 0; + default_protocol = PROT_TELNET; + + flags = FLAG_STDERR; + ssh_get_password = &get_password; init_winsock(); for (i = 1; i < argc; i++) { if (argv[i][0] != '-') break; if (strcmp(argv[i], "-v") == 0) - verbose = 1; + verbose = 1, flags |= FLAG_VERBOSE; else if (strcmp(argv[i], "-r") == 0) recursive = 1; else if (strcmp(argv[i], "-p") == 0) @@ -791,6 +994,11 @@ int main(int argc, char *argv[]) portnumber = atoi(argv[++i]); else if (strcmp(argv[i], "-pw") == 0 && i+1 < argc) password = argv[++i]; + else if (strcmp(argv[i], "-gui") == 0 && i+1 < argc) { + gui_hwnd = argv[++i]; + gui_mode = 1; + } else if (strcmp(argv[i], "-ls") == 0) + list = 1; else if (strcmp(argv[i], "--") == 0) { i++; break; } else @@ -799,24 +1007,39 @@ int main(int argc, char *argv[]) argc -= i; argv += i; - if (argc < 2) - usage(); - if (argc > 2) - targetshouldbedirectory = 1; + if (list) { + if (argc != 1) + usage(); + get_dir_list(argc, argv); - if (colon(argv[argc-1]) != NULL) - toremote(argc, argv); - else - tolocal(argc, argv); + } else { + + if (argc < 2) + usage(); + if (argc > 2) + targetshouldbedirectory = 1; + + if (colon(argv[argc-1]) != NULL) + toremote(argc, argv); + else + tolocal(argc, argv); + } if (connection_open) { char ch; - ssh_send_eof(); - ssh_recv(&ch, 1); + ssh_scp_send_eof(); + ssh_scp_recv(&ch, 1); } WSACleanup(); random_save_seed(); + /* GUI Adaptation - August 2000 */ + if (gui_mode) { + unsigned int msg_id = WM_RET_ERR_CNT; + if (list) msg_id = WM_LS_RET_ERR_CNT; + while (!PostMessage( (HWND)atoi(gui_hwnd), msg_id, (WPARAM)errs, 0/*lParam*/ ) ) + SleepEx(1000,TRUE); + } return (errs == 0 ? 0 : 1); }