?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Commit a fix to smbclient so that it will connect to EMCs and NetApp's machines.
[Samba/id10ts.git] / source3 / client / client.c
blobde6bf0e1b053f3c5aedcd2584b8e960e7545f8b8
1 /*
2 Unix SMB/CIFS implementation.
3 SMB client
4 Copyright (C) Andrew Tridgell 1994-1998
5 Copyright (C) Simo Sorce 2001-2002
6
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 2 of the License, or
10 (at your option) any later version.
11
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
16
17 You should have received a copy of the GNU General Public License
18 along with this program; if not, write to the Free Software
19 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
20 */
21
22 #define NO_SYSLOG
23
24 #include "includes.h"
25 #include "../client/client_proto.h"
26 #ifndef REGISTER
27 #define REGISTER 0
28 #endif
29
30 const char prog_name[] = "smbclient";
31
32 struct cli_state *cli;
33 extern BOOL in_client;
34 extern BOOL AllowDebugChange;
35 static int port = 0;
36 pstring cur_dir = "\\";
37 static pstring cd_path = "";
38 static pstring service;
39 static pstring desthost;
40 extern pstring global_myname;
41 static pstring password;
42 static pstring username;
43 static pstring workgroup;
44 static char *cmdstr;
45 static BOOL got_pass;
46 static int io_bufsize = 64512;
47 static BOOL use_kerberos;
48
49 static int name_type = 0x20;
50 static int max_protocol = PROTOCOL_NT1;
51 extern pstring user_socket_options;
52
53 static int process_tok(fstring tok);
54 static int cmd_help(void);
55
56 /* 30 second timeout on most commands */
57 #define CLIENT_TIMEOUT (30*1000)
58 #define SHORT_TIMEOUT (5*1000)
59
60 /* value for unused fid field in trans2 secondary request */
61 #define FID_UNUSED (0xFFFF)
62
63 time_t newer_than = 0;
64 static int archive_level = 0;
65
66 static BOOL translation = False;
67
68 static BOOL have_ip;
69
70 /* clitar bits insert */
71 extern int blocksize;
72 extern BOOL tar_inc;
73 extern BOOL tar_reset;
74 /* clitar bits end */
75
76
77 static mode_t myumask = 0755;
78
79 static BOOL prompt = True;
80
81 static int printmode = 1;
82
83 static BOOL recurse = False;
84 BOOL lowercase = False;
85
86 static struct in_addr dest_ip;
87
88 #define SEPARATORS " \t\n\r"
89
90 static BOOL abort_mget = True;
91
92 static pstring fileselection = "";
93
94 extern file_info def_finfo;
95
96 /* timing globals */
97 int get_total_size = 0;
98 int get_total_time_ms = 0;
99 static int put_total_size = 0;
100 static int put_total_time_ms = 0;
101
102 /* totals globals */
103 static double dir_total;
104
105 #define USENMB
106
107 /* some forward declarations */
108 static struct cli_state *do_connect(const char *server, const char *share);
109
110 /****************************************************************************
111 write to a local file with CR/LF->LF translation if appropriate. return the
112 number taken from the buffer. This may not equal the number written.
113 ****************************************************************************/
114 static int writefile(int f, char *b, int n)
115 {
116 int i;
117
118 if (!translation) {
119 return write(f,b,n);
120 }
121
122 i = 0;
123 while (i < n) {
124 if (*b == '\r' && (i<(n-1)) && *(b+1) == '\n') {
125 b++;i++;
126 }
127 if (write(f, b, 1) != 1) {
128 break;
129 }
130 b++;
131 i++;
132 }
133
134 return(i);
135 }
136
137 /****************************************************************************
138 read from a file with LF->CR/LF translation if appropriate. return the
139 number read. read approx n bytes.
140 ****************************************************************************/
141 static int readfile(char *b, int n, XFILE *f)
142 {
143 int i;
144 int c;
145
146 if (!translation)
147 return x_fread(b,1,n,f);
148
149 i = 0;
150 while (i < (n - 1) && (i < BUFFER_SIZE)) {
151 if ((c = x_getc(f)) == EOF) {
152 break;
153 }
154
155 if (c == '\n') { /* change all LFs to CR/LF */
156 b[i++] = '\r';
157 }
158
159 b[i++] = c;
160 }
161
162 return(i);
163 }
164
165
166 /****************************************************************************
167 send a message
168 ****************************************************************************/
169 static void send_message(void)
170 {
171 int total_len = 0;
172 int grp_id;
173
174 if (!cli_message_start(cli, desthost, username, &grp_id)) {
175 d_printf("message start: %s\n", cli_errstr(cli));
176 return;
177 }
178
179
180 d_printf("Connected. Type your message, ending it with a Control-D\n");
181
182 while (!feof(stdin) && total_len < 1600) {
183 int maxlen = MIN(1600 - total_len,127);
184 pstring msg;
185 int l=0;
186 int c;
187
188 ZERO_ARRAY(msg);
189
190 for (l=0;l<maxlen && (c=fgetc(stdin))!=EOF;l++) {
191 if (c == '\n')
192 msg[l++] = '\r';
193 msg[l] = c;
194 }
195
196 if (!cli_message_text(cli, msg, l, grp_id)) {
197 d_printf("SMBsendtxt failed (%s)\n",cli_errstr(cli));
198 return;
199 }
200
201 total_len += l;
202 }
203
204 if (total_len >= 1600)
205 d_printf("the message was truncated to 1600 bytes\n");
206 else
207 d_printf("sent %d bytes\n",total_len);
208
209 if (!cli_message_end(cli, grp_id)) {
210 d_printf("SMBsendend failed (%s)\n",cli_errstr(cli));
211 return;
212 }
213 }
214
215
216
217 /****************************************************************************
218 check the space on a device
219 ****************************************************************************/
220 static int do_dskattr(void)
221 {
222 int total, bsize, avail;
223
224 if (!cli_dskattr(cli, &bsize, &total, &avail)) {
225 d_printf("Error in dskattr: %s\n",cli_errstr(cli));
226 return 1;
227 }
228
229 d_printf("\n\t\t%d blocks of size %d. %d blocks available\n",
230 total, bsize, avail);
231
232 return 0;
233 }
234
235 /****************************************************************************
236 show cd/pwd
237 ****************************************************************************/
238 static int cmd_pwd(void)
239 {
240 d_printf("Current directory is %s",service);
241 d_printf("%s\n",cur_dir);
242 return 0;
243 }
244
245
246 /****************************************************************************
247 change directory - inner section
248 ****************************************************************************/
249 static int do_cd(char *newdir)
250 {
251 char *p = newdir;
252 pstring saved_dir;
253 pstring dname;
254
255 dos_format(newdir);
256
257 /* Save the current directory in case the
258 new directory is invalid */
259 pstrcpy(saved_dir, cur_dir);
260 if (*p == '\\')
261 pstrcpy(cur_dir,p);
262 else
263 pstrcat(cur_dir,p);
264 if (*(cur_dir+strlen(cur_dir)-1) != '\\') {
265 pstrcat(cur_dir, "\\");
266 }
267 dos_clean_name(cur_dir);
268 pstrcpy(dname,cur_dir);
269 pstrcat(cur_dir,"\\");
270 dos_clean_name(cur_dir);
271
272 if (!strequal(cur_dir,"\\")) {
273 if (!cli_chkpath(cli, dname)) {
274 d_printf("cd %s: %s\n", dname, cli_errstr(cli));
275 pstrcpy(cur_dir,saved_dir);
276 }
277 }
278
279 pstrcpy(cd_path,cur_dir);
280
281 return 0;
282 }
283
284 /****************************************************************************
285 change directory
286 ****************************************************************************/
287 static int cmd_cd(void)
288 {
289 fstring buf;
290 int rc = 0;
291
292 if (next_token_nr(NULL,buf,NULL,sizeof(buf)))
293 rc = do_cd(buf);
294 else
295 d_printf("Current directory is %s\n",cur_dir);
296
297 return rc;
298 }
299
300
301 /*******************************************************************
302 decide if a file should be operated on
303 ********************************************************************/
304 static BOOL do_this_one(file_info *finfo)
305 {
306 if (finfo->mode & aDIR) return(True);
307
308 if (*fileselection &&
309 !mask_match(finfo->name,fileselection,False)) {
310 DEBUG(3,("mask_match %s failed\n", finfo->name));
311 return False;
312 }
313
314 if (newer_than && finfo->mtime < newer_than) {
315 DEBUG(3,("newer_than %s failed\n", finfo->name));
316 return(False);
317 }
318
319 if ((archive_level==1 || archive_level==2) && !(finfo->mode & aARCH)) {
320 DEBUG(3,("archive %s failed\n", finfo->name));
321 return(False);
322 }
323
324 return(True);
325 }
326
327 /****************************************************************************
328 display info about a file
329 ****************************************************************************/
330 static void display_finfo(file_info *finfo)
331 {
332 if (do_this_one(finfo)) {
333 time_t t = finfo->mtime; /* the time is assumed to be passed as GMT */
334 d_printf(" %-30s%7.7s %8.0f %s",
335 finfo->name,
336 attrib_string(finfo->mode),
337 (double)finfo->size,
338 asctime(LocalTime(&t)));
339 dir_total += finfo->size;
340 }
341 }
342
343
344 /****************************************************************************
345 accumulate size of a file
346 ****************************************************************************/
347 static void do_du(file_info *finfo)
348 {
349 if (do_this_one(finfo)) {
350 dir_total += finfo->size;
351 }
352 }
353
354 static BOOL do_list_recurse;
355 static BOOL do_list_dirs;
356 static char *do_list_queue = 0;
357 static long do_list_queue_size = 0;
358 static long do_list_queue_start = 0;
359 static long do_list_queue_end = 0;
360 static void (*do_list_fn)(file_info *);
361
362 /****************************************************************************
363 functions for do_list_queue
364 ****************************************************************************/
365
366 /*
367 * The do_list_queue is a NUL-separated list of strings stored in a
368 * char*. Since this is a FIFO, we keep track of the beginning and
369 * ending locations of the data in the queue. When we overflow, we
370 * double the size of the char*. When the start of the data passes
371 * the midpoint, we move everything back. This is logically more
372 * complex than a linked list, but easier from a memory management
373 * angle. In any memory error condition, do_list_queue is reset.
374 * Functions check to ensure that do_list_queue is non-NULL before
375 * accessing it.
376 */
377 static void reset_do_list_queue(void)
378 {
379 SAFE_FREE(do_list_queue);
380 do_list_queue_size = 0;
381 do_list_queue_start = 0;
382 do_list_queue_end = 0;
383 }
384
385 static void init_do_list_queue(void)
386 {
387 reset_do_list_queue();
388 do_list_queue_size = 1024;
389 do_list_queue = malloc(do_list_queue_size);
390 if (do_list_queue == 0) {
391 d_printf("malloc fail for size %d\n",
392 (int)do_list_queue_size);
393 reset_do_list_queue();
394 } else {
395 memset(do_list_queue, 0, do_list_queue_size);
396 }
397 }
398
399 static void adjust_do_list_queue(void)
400 {
401 /*
402 * If the starting point of the queue is more than half way through,
403 * move everything toward the beginning.
404 */
405 if (do_list_queue && (do_list_queue_start == do_list_queue_end))
406 {
407 DEBUG(4,("do_list_queue is empty\n"));
408 do_list_queue_start = do_list_queue_end = 0;
409 *do_list_queue = '\0';
410 }
411 else if (do_list_queue_start > (do_list_queue_size / 2))
412 {
413 DEBUG(4,("sliding do_list_queue backward\n"));
414 memmove(do_list_queue,
415 do_list_queue + do_list_queue_start,
416 do_list_queue_end - do_list_queue_start);
417 do_list_queue_end -= do_list_queue_start;
418 do_list_queue_start = 0;
419 }
420
421 }
422
423 static void add_to_do_list_queue(const char* entry)
424 {
425 char *dlq;
426 long new_end = do_list_queue_end + ((long)strlen(entry)) + 1;
427 while (new_end > do_list_queue_size)
428 {
429 do_list_queue_size *= 2;
430 DEBUG(4,("enlarging do_list_queue to %d\n",
431 (int)do_list_queue_size));
432 dlq = Realloc(do_list_queue, do_list_queue_size);
433 if (! dlq) {
434 d_printf("failure enlarging do_list_queue to %d bytes\n",
435 (int)do_list_queue_size);
436 reset_do_list_queue();
437 }
438 else
439 {
440 do_list_queue = dlq;
441 memset(do_list_queue + do_list_queue_size / 2,
442 0, do_list_queue_size / 2);
443 }
444 }
445 if (do_list_queue)
446 {
447 pstrcpy(do_list_queue + do_list_queue_end, entry);
448 do_list_queue_end = new_end;
449 DEBUG(4,("added %s to do_list_queue (start=%d, end=%d)\n",
450 entry, (int)do_list_queue_start, (int)do_list_queue_end));
451 }
452 }
453
454 static char *do_list_queue_head(void)
455 {
456 return do_list_queue + do_list_queue_start;
457 }
458
459 static void remove_do_list_queue_head(void)
460 {
461 if (do_list_queue_end > do_list_queue_start)
462 {
463 do_list_queue_start += strlen(do_list_queue_head()) + 1;
464 adjust_do_list_queue();
465 DEBUG(4,("removed head of do_list_queue (start=%d, end=%d)\n",
466 (int)do_list_queue_start, (int)do_list_queue_end));
467 }
468 }
469
470 static int do_list_queue_empty(void)
471 {
472 return (! (do_list_queue && *do_list_queue));
473 }
474
475 /****************************************************************************
476 a helper for do_list
477 ****************************************************************************/
478 static void do_list_helper(file_info *f, const char *mask, void *state)
479 {
480 if (f->mode & aDIR) {
481 if (do_list_dirs && do_this_one(f)) {
482 do_list_fn(f);
483 }
484 if (do_list_recurse &&
485 !strequal(f->name,".") &&
486 !strequal(f->name,"..")) {
487 pstring mask2;
488 char *p;
489
490 pstrcpy(mask2, mask);
491 p = strrchr_m(mask2,'\\');
492 if (!p) return;
493 p[1] = 0;
494 pstrcat(mask2, f->name);
495 pstrcat(mask2,"\\*");
496 add_to_do_list_queue(mask2);
497 }
498 return;
499 }
500
501 if (do_this_one(f)) {
502 do_list_fn(f);
503 }
504 }
505
506
507 /****************************************************************************
508 a wrapper around cli_list that adds recursion
509 ****************************************************************************/
510 void do_list(const char *mask,uint16 attribute,void (*fn)(file_info *),BOOL rec, BOOL dirs)
511 {
512 static int in_do_list = 0;
513
514 if (in_do_list && rec)
515 {
516 fprintf(stderr, "INTERNAL ERROR: do_list called recursively when the recursive flag is true\n");
517 exit(1);
518 }
519
520 in_do_list = 1;
521
522 do_list_recurse = rec;
523 do_list_dirs = dirs;
524 do_list_fn = fn;
525
526 if (rec)
527 {
528 init_do_list_queue();
529 add_to_do_list_queue(mask);
530
531 while (! do_list_queue_empty())
532 {
533 /*
534 * Need to copy head so that it doesn't become
535 * invalid inside the call to cli_list. This
536 * would happen if the list were expanded
537 * during the call.
538 * Fix from E. Jay Berkenbilt (ejb@ql.org)
539 */
540 pstring head;
541 pstrcpy(head, do_list_queue_head());
542 cli_list(cli, head, attribute, do_list_helper, NULL);
543 remove_do_list_queue_head();
544 if ((! do_list_queue_empty()) && (fn == display_finfo))
545 {
546 char* next_file = do_list_queue_head();
547 char* save_ch = 0;
548 if ((strlen(next_file) >= 2) &&
549 (next_file[strlen(next_file) - 1] == '*') &&
550 (next_file[strlen(next_file) - 2] == '\\'))
551 {
552 save_ch = next_file +
553 strlen(next_file) - 2;
554 *save_ch = '\0';
555 }
556 d_printf("\n%s\n",next_file);
557 if (save_ch)
558 {
559 *save_ch = '\\';
560 }
561 }
562 }
563 }
564 else
565 {
566 if (cli_list(cli, mask, attribute, do_list_helper, NULL) == -1)
567 {
568 d_printf("%s listing %s\n", cli_errstr(cli), mask);
569 }
570 }
571
572 in_do_list = 0;
573 reset_do_list_queue();
574 }
575
576 /****************************************************************************
577 get a directory listing
578 ****************************************************************************/
579 static int cmd_dir(void)
580 {
581 uint16 attribute = aDIR | aSYSTEM | aHIDDEN;
582 pstring mask;
583 fstring buf;
584 char *p=buf;
585 int rc;
586
587 dir_total = 0;
588 pstrcpy(mask,cur_dir);
589 if(mask[strlen(mask)-1]!='\\')
590 pstrcat(mask,"\\");
591
592 if (next_token_nr(NULL,buf,NULL,sizeof(buf))) {
593 dos_format(p);
594 if (*p == '\\')
595 pstrcpy(mask,p);
596 else
597 pstrcat(mask,p);
598 }
599 else {
600 pstrcat(mask,"*");
601 }
602
603 do_list(mask, attribute, display_finfo, recurse, True);
604
605 rc = do_dskattr();
606
607 DEBUG(3, ("Total bytes listed: %.0f\n", dir_total));
608
609 return rc;
610 }
611
612
613 /****************************************************************************
614 get a directory listing
615 ****************************************************************************/
616 static int cmd_du(void)
617 {
618 uint16 attribute = aDIR | aSYSTEM | aHIDDEN;
619 pstring mask;
620 fstring buf;
621 char *p=buf;
622 int rc;
623
624 dir_total = 0;
625 pstrcpy(mask,cur_dir);
626 if(mask[strlen(mask)-1]!='\\')
627 pstrcat(mask,"\\");
628
629 if (next_token_nr(NULL,buf,NULL,sizeof(buf))) {
630 dos_format(p);
631 if (*p == '\\')
632 pstrcpy(mask,p);
633 else
634 pstrcat(mask,p);
635 } else {
636 pstrcat(mask,"*");
637 }
638
639 do_list(mask, attribute, do_du, recurse, True);
640
641 rc = do_dskattr();
642
643 d_printf("Total number of bytes: %.0f\n", dir_total);
644
645 return rc;
646 }
647
648
649 /****************************************************************************
650 get a file from rname to lname
651 ****************************************************************************/
652 static int do_get(char *rname, char *lname, BOOL reget)
653 {
654 int handle = 0, fnum;
655 BOOL newhandle = False;
656 char *data;
657 struct timeval tp_start;
658 int read_size = io_bufsize;
659 uint16 attr;
660 size_t size;
661 off_t start = 0;
662 off_t nread = 0;
663 int rc = 0;
664
665 GetTimeOfDay(&tp_start);
666
667 if (lowercase) {
668 strlower(lname);
669 }
670
671 fnum = cli_open(cli, rname, O_RDONLY, DENY_NONE);
672
673 if (fnum == -1) {
674 d_printf("%s opening remote file %s\n",cli_errstr(cli),rname);
675 return 1;
676 }
677
678 if(!strcmp(lname,"-")) {
679 handle = fileno(stdout);
680 } else {
681 if (reget) {
682 handle = sys_open(lname, O_WRONLY|O_CREAT, 0644);
683 if (handle >= 0) {
684 start = sys_lseek(handle, 0, SEEK_END);
685 if (start == -1) {
686 d_printf("Error seeking local file\n");
687 return 1;
688 }
689 }
690 } else {
691 handle = sys_open(lname, O_WRONLY|O_CREAT|O_TRUNC, 0644);
692 }
693 newhandle = True;
694 }
695 if (handle < 0) {
696 d_printf("Error opening local file %s\n",lname);
697 return 1;
698 }
699
700
701 if (!cli_qfileinfo(cli, fnum,
702 &attr, &size, NULL, NULL, NULL, NULL, NULL) &&
703 !cli_getattrE(cli, fnum,
704 &attr, &size, NULL, NULL, NULL)) {
705 d_printf("getattrib: %s\n",cli_errstr(cli));
706 return 1;
707 }
708
709 DEBUG(2,("getting file %s of size %.0f as %s ",
710 rname, (double)size, lname));
711
712 if(!(data = (char *)malloc(read_size))) {
713 d_printf("malloc fail for size %d\n", read_size);
714 cli_close(cli, fnum);
715 return 1;
716 }
717
718 while (1) {
719 int n = cli_read(cli, fnum, data, nread + start, read_size);
720
721 if (n <= 0) break;
722
723 if (writefile(handle,data, n) != n) {
724 d_printf("Error writing local file\n");
725 rc = 1;
726 break;
727 }
728
729 nread += n;
730 }
731
732 if (nread + start < size) {
733 DEBUG (0, ("Short read when getting file %s. Only got %ld bytes.\n",
734 rname, (long)nread));
735
736 rc = 1;
737 }
738
739 SAFE_FREE(data);
740
741 if (!cli_close(cli, fnum)) {
742 d_printf("Error %s closing remote file\n",cli_errstr(cli));
743 rc = 1;
744 }
745
746 if (newhandle) {
747 close(handle);
748 }
749
750 if (archive_level >= 2 && (attr & aARCH)) {
751 cli_setatr(cli, rname, attr & ~(uint16)aARCH, 0);
752 }
753
754 {
755 struct timeval tp_end;
756 int this_time;
757
758 GetTimeOfDay(&tp_end);
759 this_time =
760 (tp_end.tv_sec - tp_start.tv_sec)*1000 +
761 (tp_end.tv_usec - tp_start.tv_usec)/1000;
762 get_total_time_ms += this_time;
763 get_total_size += nread;
764
765 DEBUG(2,("(%3.1f kb/s) (average %3.1f kb/s)\n",
766 nread / (1.024*this_time + 1.0e-4),
767 get_total_size / (1.024*get_total_time_ms)));
768 }
769
770 return rc;
771 }
772
773
774 /****************************************************************************
775 get a file
776 ****************************************************************************/
777 static int cmd_get(void)
778 {
779 pstring lname;
780 pstring rname;
781 char *p;
782
783 pstrcpy(rname,cur_dir);
784 pstrcat(rname,"\\");
785
786 p = rname + strlen(rname);
787
788 if (!next_token_nr(NULL,p,NULL,sizeof(rname)-strlen(rname))) {
789 d_printf("get <filename>\n");
790 return 1;
791 }
792 pstrcpy(lname,p);
793 dos_clean_name(rname);
794
795 next_token_nr(NULL,lname,NULL,sizeof(lname));
796
797 return do_get(rname, lname, False);
798 }
799
800
801 /****************************************************************************
802 do a mget operation on one file
803 ****************************************************************************/
804 static void do_mget(file_info *finfo)
805 {
806 pstring rname;
807 pstring quest;
808 pstring saved_curdir;
809 pstring mget_mask;
810
811 if (strequal(finfo->name,".") || strequal(finfo->name,".."))
812 return;
813
814 if (abort_mget) {
815 d_printf("mget aborted\n");
816 return;
817 }
818
819 if (finfo->mode & aDIR)
820 slprintf(quest,sizeof(pstring)-1,
821 "Get directory %s? ",finfo->name);
822 else
823 slprintf(quest,sizeof(pstring)-1,
824 "Get file %s? ",finfo->name);
825
826 if (prompt && !yesno(quest)) return;
827
828 if (!(finfo->mode & aDIR)) {
829 pstrcpy(rname,cur_dir);
830 pstrcat(rname,finfo->name);
831 do_get(rname, finfo->name, False);
832 return;
833 }
834
835 /* handle directories */
836 pstrcpy(saved_curdir,cur_dir);
837
838 pstrcat(cur_dir,finfo->name);
839 pstrcat(cur_dir,"\\");
840
841 unix_format(finfo->name);
842 if (lowercase)
843 strlower(finfo->name);
844
845 if (!directory_exist(finfo->name,NULL) &&
846 mkdir(finfo->name,0777) != 0) {
847 d_printf("failed to create directory %s\n",finfo->name);
848 pstrcpy(cur_dir,saved_curdir);
849 return;
850 }
851
852 if (chdir(finfo->name) != 0) {
853 d_printf("failed to chdir to directory %s\n",finfo->name);
854 pstrcpy(cur_dir,saved_curdir);
855 return;
856 }
857
858 pstrcpy(mget_mask,cur_dir);
859 pstrcat(mget_mask,"*");
860
861 do_list(mget_mask, aSYSTEM | aHIDDEN | aDIR,do_mget,False, True);
862 chdir("..");
863 pstrcpy(cur_dir,saved_curdir);
864 }
865
866
867 /****************************************************************************
868 view the file using the pager
869 ****************************************************************************/
870 static int cmd_more(void)
871 {
872 fstring rname,lname,pager_cmd;
873 char *pager;
874 int fd;
875 int rc = 0;
876
877 fstrcpy(rname,cur_dir);
878 fstrcat(rname,"\\");
879
880 slprintf(lname,sizeof(lname)-1, "%s/smbmore.XXXXXX",tmpdir());
881 fd = smb_mkstemp(lname);
882 if (fd == -1) {
883 d_printf("failed to create temporary file for more\n");
884 return 1;
885 }
886 close(fd);
887
888 if (!next_token_nr(NULL,rname+strlen(rname),NULL,sizeof(rname)-strlen(rname))) {
889 d_printf("more <filename>\n");
890 unlink(lname);
891 return 1;
892 }
893 dos_clean_name(rname);
894
895 rc = do_get(rname, lname, False);
896
897 pager=getenv("PAGER");
898
899 slprintf(pager_cmd,sizeof(pager_cmd)-1,
900 "%s %s",(pager? pager:PAGER), lname);
901 system(pager_cmd);
902 unlink(lname);
903
904 return rc;
905 }
906
907
908
909 /****************************************************************************
910 do a mget command
911 ****************************************************************************/
912 static int cmd_mget(void)
913 {
914 uint16 attribute = aSYSTEM | aHIDDEN;
915 pstring mget_mask;
916 fstring buf;
917 char *p=buf;
918
919 *mget_mask = 0;
920
921 if (recurse)
922 attribute |= aDIR;
923
924 abort_mget = False;
925
926 while (next_token_nr(NULL,p,NULL,sizeof(buf))) {
927 pstrcpy(mget_mask,cur_dir);
928 if(mget_mask[strlen(mget_mask)-1]!='\\')
929 pstrcat(mget_mask,"\\");
930
931 if (*p == '\\')
932 pstrcpy(mget_mask,p);
933 else
934 pstrcat(mget_mask,p);
935 do_list(mget_mask, attribute,do_mget,False,True);
936 }
937
938 if (!*mget_mask) {
939 pstrcpy(mget_mask,cur_dir);
940 if(mget_mask[strlen(mget_mask)-1]!='\\')
941 pstrcat(mget_mask,"\\");
942 pstrcat(mget_mask,"*");
943 do_list(mget_mask, attribute,do_mget,False,True);
944 }
945
946 return 0;
947 }
948
949
950 /****************************************************************************
951 make a directory of name "name"
952 ****************************************************************************/
953 static BOOL do_mkdir(char *name)
954 {
955 if (!cli_mkdir(cli, name)) {
956 d_printf("%s making remote directory %s\n",
957 cli_errstr(cli),name);
958 return(False);
959 }
960
961 return(True);
962 }
963
964 /****************************************************************************
965 show 8.3 name of a file
966 ****************************************************************************/
967 static BOOL do_altname(char *name)
968 {
969 fstring altname;
970 if (!NT_STATUS_IS_OK(cli_qpathinfo_alt_name(cli, name, altname))) {
971 d_printf("%s getting alt name for %s\n",
972 cli_errstr(cli),name);
973 return(False);
974 }
975 d_printf("%s\n", altname);
976
977 return(True);
978 }
979
980
981 /****************************************************************************
982 Exit client.
983 ****************************************************************************/
984 static int cmd_quit(void)
985 {
986 cli_shutdown(cli);
987 exit(0);
988 /* NOTREACHED */
989 return 0;
990 }
991
992
993 /****************************************************************************
994 make a directory
995 ****************************************************************************/
996 static int cmd_mkdir(void)
997 {
998 pstring mask;
999 fstring buf;
1000 char *p=buf;
1001
1002 pstrcpy(mask,cur_dir);
1003
1004 if (!next_token_nr(NULL,p,NULL,sizeof(buf))) {
1005 if (!recurse)
1006 d_printf("mkdir <dirname>\n");
1007 return 1;
1008 }
1009 pstrcat(mask,p);
1010
1011 if (recurse) {
1012 pstring ddir;
1013 pstring ddir2;
1014 *ddir2 = 0;
1015
1016 pstrcpy(ddir,mask);
1017 trim_string(ddir,".",NULL);
1018 p = strtok(ddir,"/\\");
1019 while (p) {
1020 pstrcat(ddir2,p);
1021 if (!cli_chkpath(cli, ddir2)) {
1022 do_mkdir(ddir2);
1023 }
1024 pstrcat(ddir2,"\\");
1025 p = strtok(NULL,"/\\");
1026 }
1027 } else {
1028 do_mkdir(mask);
1029 }
1030
1031 return 0;
1032 }
1033
1034
1035 /****************************************************************************
1036 show alt name
1037 ****************************************************************************/
1038 static int cmd_altname(void)
1039 {
1040 pstring name;
1041 fstring buf;
1042 char *p=buf;
1043
1044 pstrcpy(name,cur_dir);
1045
1046 if (!next_token_nr(NULL,p,NULL,sizeof(buf))) {
1047 d_printf("altname <file>\n");
1048 return 1;
1049 }
1050 pstrcat(name,p);
1051
1052 do_altname(name);
1053
1054 return 0;
1055 }
1056
1057
1058 /****************************************************************************
1059 put a single file
1060 ****************************************************************************/
1061 static int do_put(char *rname, char *lname, BOOL reput)
1062 {
1063 int fnum;
1064 XFILE *f;
1065 int start = 0;
1066 int nread = 0;
1067 char *buf = NULL;
1068 int maxwrite = io_bufsize;
1069 int rc = 0;
1070
1071 struct timeval tp_start;
1072 GetTimeOfDay(&tp_start);
1073
1074 if (reput) {
1075 fnum = cli_open(cli, rname, O_RDWR|O_CREAT, DENY_NONE);
1076 if (fnum >= 0) {
1077 if (!cli_qfileinfo(cli, fnum, NULL, &start, NULL, NULL, NULL, NULL, NULL) &&
1078 !cli_getattrE(cli, fnum, NULL, &start, NULL, NULL, NULL)) {
1079 d_printf("getattrib: %s\n",cli_errstr(cli));
1080 return 1;
1081 }
1082 }
1083 } else {
1084 fnum = cli_open(cli, rname, O_RDWR|O_CREAT|O_TRUNC, DENY_NONE);
1085 }
1086
1087 if (fnum == -1) {
1088 d_printf("%s opening remote file %s\n",cli_errstr(cli),rname);
1089 return 1;
1090 }
1091
1092 /* allow files to be piped into smbclient
1093 jdblair 24.jun.98
1094
1095 Note that in this case this function will exit(0) rather
1096 than returning. */
1097 if (!strcmp(lname, "-")) {
1098 f = x_stdin;
1099 /* size of file is not known */
1100 } else {
1101 f = x_fopen(lname,O_RDONLY, 0);
1102 if (f && reput) {
1103 if (x_tseek(f, start, SEEK_SET) == -1) {
1104 d_printf("Error seeking local file\n");
1105 return 1;
1106 }
1107 }
1108 }
1109
1110 if (!f) {
1111 d_printf("Error opening local file %s\n",lname);
1112 return 1;
1113 }
1114
1115
1116 DEBUG(1,("putting file %s as %s ",lname,
1117 rname));
1118
1119 buf = (char *)malloc(maxwrite);
1120 if (!buf) {
1121 d_printf("ERROR: Not enough memory!\n");
1122 return 1;
1123 }
1124 while (!x_feof(f)) {
1125 int n = maxwrite;
1126 int ret;
1127
1128 if ((n = readfile(buf,n,f)) < 1) {
1129 if((n == 0) && x_feof(f))
1130 break; /* Empty local file. */
1131
1132 d_printf("Error reading local file: %s\n", strerror(errno));
1133 rc = 1;
1134 break;
1135 }
1136
1137 ret = cli_write(cli, fnum, 0, buf, nread + start, n);
1138
1139 if (n != ret) {
1140 d_printf("Error writing file: %s\n", cli_errstr(cli));
1141 rc = 1;
1142 break;
1143 }
1144
1145 nread += n;
1146 }
1147
1148 if (!cli_close(cli, fnum)) {
1149 d_printf("%s closing remote file %s\n",cli_errstr(cli),rname);
1150 x_fclose(f);
1151 SAFE_FREE(buf);
1152 return 1;
1153 }
1154
1155
1156 if (f != x_stdin) {
1157 x_fclose(f);
1158 }
1159
1160 SAFE_FREE(buf);
1161
1162 {
1163 struct timeval tp_end;
1164 int this_time;
1165
1166 GetTimeOfDay(&tp_end);
1167 this_time =
1168 (tp_end.tv_sec - tp_start.tv_sec)*1000 +
1169 (tp_end.tv_usec - tp_start.tv_usec)/1000;
1170 put_total_time_ms += this_time;
1171 put_total_size += nread;
1172
1173 DEBUG(1,("(%3.1f kb/s) (average %3.1f kb/s)\n",
1174 nread / (1.024*this_time + 1.0e-4),
1175 put_total_size / (1.024*put_total_time_ms)));
1176 }
1177
1178 if (f == x_stdin) {
1179 cli_shutdown(cli);
1180 exit(0);
1181 }
1182
1183 return rc;
1184 }
1185
1186
1187
1188 /****************************************************************************
1189 put a file
1190 ****************************************************************************/
1191 static int cmd_put(void)
1192 {
1193 pstring lname;
1194 pstring rname;
1195 fstring buf;
1196 char *p=buf;
1197
1198 pstrcpy(rname,cur_dir);
1199 pstrcat(rname,"\\");
1200
1201 if (!next_token_nr(NULL,p,NULL,sizeof(buf))) {
1202 d_printf("put <filename>\n");
1203 return 1;
1204 }
1205 pstrcpy(lname,p);
1206
1207 if (next_token_nr(NULL,p,NULL,sizeof(buf)))
1208 pstrcat(rname,p);
1209 else
1210 pstrcat(rname,lname);
1211
1212 dos_clean_name(rname);
1213
1214 {
1215 SMB_STRUCT_STAT st;
1216 /* allow '-' to represent stdin
1217 jdblair, 24.jun.98 */
1218 if (!file_exist(lname,&st) &&
1219 (strcmp(lname,"-"))) {
1220 d_printf("%s does not exist\n",lname);
1221 return 1;
1222 }
1223 }
1224
1225 return do_put(rname, lname, False);
1226 }
1227
1228 /*************************************
1229 File list structure
1230 *************************************/
1231
1232 static struct file_list {
1233 struct file_list *prev, *next;
1234 char *file_path;
1235 BOOL isdir;
1236 } *file_list;
1237
1238 /****************************************************************************
1239 Free a file_list structure
1240 ****************************************************************************/
1241
1242 static void free_file_list (struct file_list * list)
1243 {
1244 struct file_list *tmp;
1245
1246 while (list)
1247 {
1248 tmp = list;
1249 DLIST_REMOVE(list, list);
1250 SAFE_FREE(tmp->file_path);
1251 SAFE_FREE(tmp);
1252 }
1253 }
1254
1255 /****************************************************************************
1256 seek in a directory/file list until you get something that doesn't start with
1257 the specified name
1258 ****************************************************************************/
1259 static BOOL seek_list(struct file_list *list, char *name)
1260 {
1261 while (list) {
1262 trim_string(list->file_path,"./","\n");
1263 if (strncmp(list->file_path, name, strlen(name)) != 0) {
1264 return(True);
1265 }
1266 list = list->next;
1267 }
1268
1269 return(False);
1270 }
1271
1272 /****************************************************************************
1273 set the file selection mask
1274 ****************************************************************************/
1275 static int cmd_select(void)
1276 {
1277 pstrcpy(fileselection,"");
1278 next_token_nr(NULL,fileselection,NULL,sizeof(fileselection));
1279
1280 return 0;
1281 }
1282
1283 /****************************************************************************
1284 Recursive file matching function act as find
1285 match must be always set to True when calling this function
1286 ****************************************************************************/
1287 static int file_find(struct file_list **list, const char *directory,
1288 const char *expression, BOOL match)
1289 {
1290 DIR *dir;
1291 struct file_list *entry;
1292 struct stat statbuf;
1293 int ret;
1294 char *path;
1295 BOOL isdir;
1296 char *dname;
1297
1298 dir = opendir(directory);
1299 if (!dir) return -1;
1300
1301 while ((dname = readdirname(dir))) {
1302 if (!strcmp("..", dname)) continue;
1303 if (!strcmp(".", dname)) continue;
1304
1305 if (asprintf(&path, "%s/%s", directory, dname) <= 0) {
1306 continue;
1307 }
1308
1309 isdir = False;
1310 if (!match || !gen_fnmatch(expression, dname)) {
1311 if (recurse) {
1312 ret = stat(path, &statbuf);
1313 if (ret == 0) {
1314 if (S_ISDIR(statbuf.st_mode)) {
1315 isdir = True;
1316 ret = file_find(list, path, expression, False);
1317 }
1318 } else {
1319 d_printf("file_find: cannot stat file %s\n", path);
1320 }
1321
1322 if (ret == -1) {
1323 SAFE_FREE(path);
1324 closedir(dir);
1325 return -1;
1326 }
1327 }
1328 entry = (struct file_list *) malloc(sizeof (struct file_list));
1329 if (!entry) {
1330 d_printf("Out of memory in file_find\n");
1331 closedir(dir);
1332 return -1;
1333 }
1334 entry->file_path = path;
1335 entry->isdir = isdir;
1336 DLIST_ADD(*list, entry);
1337 } else {
1338 SAFE_FREE(path);
1339 }
1340 }
1341
1342 closedir(dir);
1343 return 0;
1344 }
1345
1346 /****************************************************************************
1347 mput some files
1348 ****************************************************************************/
1349 static int cmd_mput(void)
1350 {
1351 fstring buf;
1352 char *p=buf;
1353
1354 while (next_token_nr(NULL,p,NULL,sizeof(buf))) {
1355 int ret;
1356 struct file_list *temp_list;
1357 char *quest, *lname, *rname;
1358
1359 file_list = NULL;
1360
1361 ret = file_find(&file_list, ".", p, True);
1362 if (ret) {
1363 free_file_list(file_list);
1364 continue;
1365 }
1366
1367 quest = NULL;
1368 lname = NULL;
1369 rname = NULL;
1370
1371 for (temp_list = file_list; temp_list;
1372 temp_list = temp_list->next) {
1373
1374 SAFE_FREE(lname);
1375 if (asprintf(&lname, "%s/", temp_list->file_path) <= 0)
1376 continue;
1377 trim_string(lname, "./", "/");
1378
1379 /* check if it's a directory */
1380 if (temp_list->isdir) {
1381 /* if (!recurse) continue; */
1382
1383 SAFE_FREE(quest);
1384 if (asprintf(&quest, "Put directory %s? ", lname) < 0) break;
1385 if (prompt && !yesno(quest)) { /* No */
1386 /* Skip the directory */
1387 lname[strlen(lname)-1] = '/';
1388 if (!seek_list(temp_list, lname))
1389 break;
1390 } else { /* Yes */
1391 SAFE_FREE(rname);
1392 if(asprintf(&rname, "%s%s", cur_dir, lname) < 0) break;
1393 dos_format(rname);
1394 if (!cli_chkpath(cli, rname) &&
1395 !do_mkdir(rname)) {
1396 DEBUG (0, ("Unable to make dir, skipping..."));
1397 /* Skip the directory */
1398 lname[strlen(lname)-1] = '/';
1399 if (!seek_list(temp_list, lname))
1400 break;
1401 }
1402 }
1403 continue;
1404 } else {
1405 SAFE_FREE(quest);
1406 if (asprintf(&quest,"Put file %s? ", lname) < 0) break;
1407 if (prompt && !yesno(quest)) /* No */
1408 continue;
1409
1410 /* Yes */
1411 SAFE_FREE(rname);
1412 if (asprintf(&rname, "%s%s", cur_dir, lname) < 0) break;
1413 }
1414
1415 dos_format(rname);
1416
1417 do_put(rname, lname, False);
1418 }
1419 free_file_list(file_list);
1420 SAFE_FREE(quest);
1421 SAFE_FREE(lname);
1422 SAFE_FREE(rname);
1423 }
1424
1425 return 0;
1426 }
1427
1428
1429 /****************************************************************************
1430 cancel a print job
1431 ****************************************************************************/
1432 static int do_cancel(int job)
1433 {
1434 if (cli_printjob_del(cli, job)) {
1435 d_printf("Job %d cancelled\n",job);
1436 return 0;
1437 } else {
1438 d_printf("Error cancelling job %d : %s\n",job,cli_errstr(cli));
1439 return 1;
1440 }
1441 }
1442
1443
1444 /****************************************************************************
1445 cancel a print job
1446 ****************************************************************************/
1447 static int cmd_cancel(void)
1448 {
1449 fstring buf;
1450 int job;
1451
1452 if (!next_token_nr(NULL,buf,NULL,sizeof(buf))) {
1453 d_printf("cancel <jobid> ...\n");
1454 return 1;
1455 }
1456 do {
1457 job = atoi(buf);
1458 do_cancel(job);
1459 } while (next_token_nr(NULL,buf,NULL,sizeof(buf)));
1460
1461 return 0;
1462 }
1463
1464
1465 /****************************************************************************
1466 print a file
1467 ****************************************************************************/
1468 static int cmd_print(void)
1469 {
1470 pstring lname;
1471 pstring rname;
1472 char *p;
1473
1474 if (!next_token_nr(NULL,lname,NULL, sizeof(lname))) {
1475 d_printf("print <filename>\n");
1476 return 1;
1477 }
1478
1479 pstrcpy(rname,lname);
1480 p = strrchr_m(rname,'/');
1481 if (p) {
1482 slprintf(rname, sizeof(rname)-1, "%s-%d", p+1, (int)sys_getpid());
1483 }
1484
1485 if (strequal(lname,"-")) {
1486 slprintf(rname, sizeof(rname)-1, "stdin-%d", (int)sys_getpid());
1487 }
1488
1489 return do_put(rname, lname, False);
1490 }
1491
1492
1493 /****************************************************************************
1494 show a print queue entry
1495 ****************************************************************************/
1496 static void queue_fn(struct print_job_info *p)
1497 {
1498 d_printf("%-6d %-9d %s\n", (int)p->id, (int)p->size, p->name);
1499 }
1500
1501 /****************************************************************************
1502 show a print queue
1503 ****************************************************************************/
1504 static int cmd_queue(void)
1505 {
1506 cli_print_queue(cli, queue_fn);
1507
1508 return 0;
1509 }
1510
1511 /****************************************************************************
1512 delete some files
1513 ****************************************************************************/
1514 static void do_del(file_info *finfo)
1515 {
1516 pstring mask;
1517
1518 pstrcpy(mask,cur_dir);
1519 pstrcat(mask,finfo->name);
1520
1521 if (finfo->mode & aDIR)
1522 return;
1523
1524 if (!cli_unlink(cli, mask)) {
1525 d_printf("%s deleting remote file %s\n",cli_errstr(cli),mask);
1526 }
1527 }
1528
1529 /****************************************************************************
1530 delete some files
1531 ****************************************************************************/
1532 static int cmd_del(void)
1533 {
1534 pstring mask;
1535 fstring buf;
1536 uint16 attribute = aSYSTEM | aHIDDEN;
1537
1538 if (recurse)
1539 attribute |= aDIR;
1540
1541 pstrcpy(mask,cur_dir);
1542
1543 if (!next_token_nr(NULL,buf,NULL,sizeof(buf))) {
1544 d_printf("del <filename>\n");
1545 return 1;
1546 }
1547 pstrcat(mask,buf);
1548
1549 do_list(mask, attribute,do_del,False,False);
1550
1551 return 0;
1552 }
1553
1554 /****************************************************************************
1555 ****************************************************************************/
1556 static int cmd_open(void)
1557 {
1558 pstring mask;
1559 fstring buf;
1560
1561 pstrcpy(mask,cur_dir);
1562
1563 if (!next_token_nr(NULL,buf,NULL,sizeof(buf))) {
1564 d_printf("open <filename>\n");
1565 return 1;
1566 }
1567 pstrcat(mask,buf);
1568
1569 cli_open(cli, mask, O_RDWR, DENY_ALL);
1570
1571 return 0;
1572 }
1573
1574
1575 /****************************************************************************
1576 remove a directory
1577 ****************************************************************************/
1578 static int cmd_rmdir(void)
1579 {
1580 pstring mask;
1581 fstring buf;
1582
1583 pstrcpy(mask,cur_dir);
1584
1585 if (!next_token_nr(NULL,buf,NULL,sizeof(buf))) {
1586 d_printf("rmdir <dirname>\n");
1587 return 1;
1588 }
1589 pstrcat(mask,buf);
1590
1591 if (!cli_rmdir(cli, mask)) {
1592 d_printf("%s removing remote directory file %s\n",
1593 cli_errstr(cli),mask);
1594 }
1595
1596 return 0;
1597 }
1598
1599 /****************************************************************************
1600 UNIX hardlink.
1601 ****************************************************************************/
1602
1603 static int cmd_link(void)
1604 {
1605 pstring src,dest;
1606 fstring buf,buf2;
1607
1608 if (!SERVER_HAS_UNIX_CIFS(cli)) {
1609 d_printf("Server doesn't support UNIX CIFS calls.\n");
1610 return 1;
1611 }
1612
1613 pstrcpy(src,cur_dir);
1614 pstrcpy(dest,cur_dir);
1615
1616 if (!next_token(NULL,buf,NULL,sizeof(buf)) ||
1617 !next_token(NULL,buf2,NULL, sizeof(buf2))) {
1618 d_printf("link <src> <dest>\n");
1619 return 1;
1620 }
1621
1622 pstrcat(src,buf);
1623 pstrcat(dest,buf2);
1624
1625 if (!cli_unix_hardlink(cli, src, dest)) {
1626 d_printf("%s linking files (%s -> %s)\n", cli_errstr(cli), src, dest);
1627 return 1;
1628 }
1629
1630 return 0;
1631 }
1632
1633 /****************************************************************************
1634 UNIX symlink.
1635 ****************************************************************************/
1636
1637 static int cmd_symlink(void)
1638 {
1639 pstring src,dest;
1640 fstring buf,buf2;
1641
1642 if (!SERVER_HAS_UNIX_CIFS(cli)) {
1643 d_printf("Server doesn't support UNIX CIFS calls.\n");
1644 return 1;
1645 }
1646
1647 pstrcpy(src,cur_dir);
1648 pstrcpy(dest,cur_dir);
1649
1650 if (!next_token(NULL,buf,NULL,sizeof(buf)) ||
1651 !next_token(NULL,buf2,NULL, sizeof(buf2))) {
1652 d_printf("symlink <src> <dest>\n");
1653 return 1;
1654 }
1655
1656 pstrcat(src,buf);
1657 pstrcat(dest,buf2);
1658
1659 if (!cli_unix_symlink(cli, src, dest)) {
1660 d_printf("%s symlinking files (%s -> %s)\n",
1661 cli_errstr(cli), src, dest);
1662 return 1;
1663 }
1664
1665 return 0;
1666 }
1667
1668 /****************************************************************************
1669 UNIX chmod.
1670 ****************************************************************************/
1671
1672 static int cmd_chmod(void)
1673 {
1674 pstring src;
1675 mode_t mode;
1676 fstring buf, buf2;
1677
1678 if (!SERVER_HAS_UNIX_CIFS(cli)) {
1679 d_printf("Server doesn't support UNIX CIFS calls.\n");
1680 return 1;
1681 }
1682
1683 pstrcpy(src,cur_dir);
1684
1685 if (!next_token(NULL,buf,NULL,sizeof(buf)) ||
1686 !next_token(NULL,buf2,NULL, sizeof(buf2))) {
1687 d_printf("chmod mode file\n");
1688 return 1;
1689 }
1690
1691 mode = (mode_t)strtol(buf, NULL, 8);
1692 pstrcat(src,buf2);
1693
1694 if (!cli_unix_chmod(cli, src, mode)) {
1695 d_printf("%s chmod file %s 0%o\n",
1696 cli_errstr(cli), src, (unsigned int)mode);
1697 return 1;
1698 }
1699
1700 return 0;
1701 }
1702
1703 /****************************************************************************
1704 UNIX chown.
1705 ****************************************************************************/
1706
1707 static int cmd_chown(void)
1708 {
1709 pstring src;
1710 uid_t uid;
1711 gid_t gid;
1712 fstring buf, buf2, buf3;
1713
1714 if (!SERVER_HAS_UNIX_CIFS(cli)) {
1715 d_printf("Server doesn't support UNIX CIFS calls.\n");
1716 return 1;
1717 }
1718
1719 pstrcpy(src,cur_dir);
1720
1721 if (!next_token(NULL,buf,NULL,sizeof(buf)) ||
1722 !next_token(NULL,buf2,NULL, sizeof(buf2)) ||
1723 !next_token(NULL,buf3,NULL, sizeof(buf3))) {
1724 d_printf("chown uid gid file\n");
1725 return 1;
1726 }
1727
1728 uid = (uid_t)atoi(buf);
1729 gid = (gid_t)atoi(buf2);
1730 pstrcat(src,buf3);
1731
1732 if (!cli_unix_chown(cli, src, uid, gid)) {
1733 d_printf("%s chown file %s uid=%d, gid=%d\n",
1734 cli_errstr(cli), src, (int)uid, (int)gid);
1735 return 1;
1736 }
1737
1738 return 0;
1739 }
1740
1741 /****************************************************************************
1742 rename some files
1743 ****************************************************************************/
1744 static int cmd_rename(void)
1745 {
1746 pstring src,dest;
1747 fstring buf,buf2;
1748
1749 pstrcpy(src,cur_dir);
1750 pstrcpy(dest,cur_dir);
1751
1752 if (!next_token_nr(NULL,buf,NULL,sizeof(buf)) ||
1753 !next_token_nr(NULL,buf2,NULL, sizeof(buf2))) {
1754 d_printf("rename <src> <dest>\n");
1755 return 1;
1756 }
1757
1758 pstrcat(src,buf);
1759 pstrcat(dest,buf2);
1760
1761 if (!cli_rename(cli, src, dest)) {
1762 d_printf("%s renaming files\n",cli_errstr(cli));
1763 return 1;
1764 }
1765
1766 return 0;
1767 }
1768
1769
1770 /****************************************************************************
1771 toggle the prompt flag
1772 ****************************************************************************/
1773 static int cmd_prompt(void)
1774 {
1775 prompt = !prompt;
1776 DEBUG(2,("prompting is now %s\n",prompt?"on":"off"));
1777
1778 return 1;
1779 }
1780
1781
1782 /****************************************************************************
1783 set the newer than time
1784 ****************************************************************************/
1785 static int cmd_newer(void)
1786 {
1787 fstring buf;
1788 BOOL ok;
1789 SMB_STRUCT_STAT sbuf;
1790
1791 ok = next_token_nr(NULL,buf,NULL,sizeof(buf));
1792 if (ok && (sys_stat(buf,&sbuf) == 0)) {
1793 newer_than = sbuf.st_mtime;
1794 DEBUG(1,("Getting files newer than %s",
1795 asctime(LocalTime(&newer_than))));
1796 } else {
1797 newer_than = 0;
1798 }
1799
1800 if (ok && newer_than == 0) {
1801 d_printf("Error setting newer-than time\n");
1802 return 1;
1803 }
1804
1805 return 0;
1806 }
1807
1808 /****************************************************************************
1809 set the archive level
1810 ****************************************************************************/
1811 static int cmd_archive(void)
1812 {
1813 fstring buf;
1814
1815 if (next_token_nr(NULL,buf,NULL,sizeof(buf))) {
1816 archive_level = atoi(buf);
1817 } else
1818 d_printf("Archive level is %d\n",archive_level);
1819
1820 return 0;
1821 }
1822
1823 /****************************************************************************
1824 toggle the lowercaseflag
1825 ****************************************************************************/
1826 static int cmd_lowercase(void)
1827 {
1828 lowercase = !lowercase;
1829 DEBUG(2,("filename lowercasing is now %s\n",lowercase?"on":"off"));
1830
1831 return 0;
1832 }
1833
1834
1835
1836
1837 /****************************************************************************
1838 toggle the recurse flag
1839 ****************************************************************************/
1840 static int cmd_recurse(void)
1841 {
1842 recurse = !recurse;
1843 DEBUG(2,("directory recursion is now %s\n",recurse?"on":"off"));
1844
1845 return 0;
1846 }
1847
1848 /****************************************************************************
1849 toggle the translate flag
1850 ****************************************************************************/
1851 static int cmd_translate(void)
1852 {
1853 translation = !translation;
1854 DEBUG(2,("CR/LF<->LF and print text translation now %s\n",
1855 translation?"on":"off"));
1856
1857 return 0;
1858 }
1859
1860
1861 /****************************************************************************
1862 do a printmode command
1863 ****************************************************************************/
1864 static int cmd_printmode(void)
1865 {
1866 fstring buf;
1867 fstring mode;
1868
1869 if (next_token_nr(NULL,buf,NULL,sizeof(buf))) {
1870 if (strequal(buf,"text")) {
1871 printmode = 0;
1872 } else {
1873 if (strequal(buf,"graphics"))
1874 printmode = 1;
1875 else
1876 printmode = atoi(buf);
1877 }
1878 }
1879
1880 switch(printmode)
1881 {
1882 case 0:
1883 fstrcpy(mode,"text");
1884 break;
1885 case 1:
1886 fstrcpy(mode,"graphics");
1887 break;
1888 default:
1889 slprintf(mode,sizeof(mode)-1,"%d",printmode);
1890 break;
1891 }
1892
1893 DEBUG(2,("the printmode is now %s\n",mode));
1894
1895 return 0;
1896 }
1897
1898 /****************************************************************************
1899 do the lcd command
1900 ****************************************************************************/
1901 static int cmd_lcd(void)
1902 {
1903 fstring buf;
1904 pstring d;
1905
1906 if (next_token_nr(NULL,buf,NULL,sizeof(buf)))
1907 chdir(buf);
1908 DEBUG(2,("the local directory is now %s\n",sys_getwd(d)));
1909
1910 return 0;
1911 }
1912
1913 /****************************************************************************
1914 get a file restarting at end of local file
1915 ****************************************************************************/
1916 static int cmd_reget(void)
1917 {
1918 pstring local_name;
1919 pstring remote_name;
1920 char *p;
1921
1922 pstrcpy(remote_name, cur_dir);
1923 pstrcat(remote_name, "\\");
1924
1925 p = remote_name + strlen(remote_name);
1926
1927 if (!next_token_nr(NULL, p, NULL, sizeof(remote_name) - strlen(remote_name))) {
1928 d_printf("reget <filename>\n");
1929 return 1;
1930 }
1931 pstrcpy(local_name, p);
1932 dos_clean_name(remote_name);
1933
1934 next_token_nr(NULL, local_name, NULL, sizeof(local_name));
1935
1936 return do_get(remote_name, local_name, True);
1937 }
1938
1939 /****************************************************************************
1940 put a file restarting at end of local file
1941 ****************************************************************************/
1942 static int cmd_reput(void)
1943 {
1944 pstring local_name;
1945 pstring remote_name;
1946 fstring buf;
1947 char *p = buf;
1948 SMB_STRUCT_STAT st;
1949
1950 pstrcpy(remote_name, cur_dir);
1951 pstrcat(remote_name, "\\");
1952
1953 if (!next_token_nr(NULL, p, NULL, sizeof(buf))) {
1954 d_printf("reput <filename>\n");
1955 return 1;
1956 }
1957 pstrcpy(local_name, p);
1958
1959 if (!file_exist(local_name, &st)) {
1960 d_printf("%s does not exist\n", local_name);
1961 return 1;
1962 }
1963
1964 if (next_token_nr(NULL, p, NULL, sizeof(buf)))
1965 pstrcat(remote_name, p);
1966 else
1967 pstrcat(remote_name, local_name);
1968
1969 dos_clean_name(remote_name);
1970
1971 return do_put(remote_name, local_name, True);
1972 }
1973
1974
1975 /****************************************************************************
1976 list a share name
1977 ****************************************************************************/
1978 static void browse_fn(const char *name, uint32 m,
1979 const char *comment, void *state)
1980 {
1981 fstring typestr;
1982
1983 *typestr=0;
1984
1985 switch (m)
1986 {
1987 case STYPE_DISKTREE:
1988 fstrcpy(typestr,"Disk"); break;
1989 case STYPE_PRINTQ:
1990 fstrcpy(typestr,"Printer"); break;
1991 case STYPE_DEVICE:
1992 fstrcpy(typestr,"Device"); break;
1993 case STYPE_IPC:
1994 fstrcpy(typestr,"IPC"); break;
1995 }
1996 /* FIXME: If the remote machine returns non-ascii characters
1997 in any of these fields, they can corrupt the output. We
1998 should remove them. */
1999 d_printf("\t%-15.15s%-10.10s%s\n",
2000 name,typestr,comment);
2001 }
2002
2003
2004 /****************************************************************************
2005 try and browse available connections on a host
2006 ****************************************************************************/
2007 static BOOL browse_host(BOOL sort)
2008 {
2009 int ret;
2010
2011 d_printf("\n\tSharename Type Comment\n");
2012 d_printf("\t--------- ---- -------\n");
2013
2014 if((ret = cli_RNetShareEnum(cli, browse_fn, NULL)) == -1)
2015 d_printf("Error returning browse list: %s\n", cli_errstr(cli));
2016
2017 return (ret != -1);
2018 }
2019
2020 /****************************************************************************
2021 list a server name
2022 ****************************************************************************/
2023 static void server_fn(const char *name, uint32 m,
2024 const char *comment, void *state)
2025 {
2026 d_printf("\t%-16.16s %s\n", name, comment);
2027 }
2028
2029 /****************************************************************************
2030 try and browse available connections on a host
2031 ****************************************************************************/
2032 static BOOL list_servers(char *wk_grp)
2033 {
2034 if (!cli->server_domain) return False;
2035
2036 d_printf("\n\tServer Comment\n");
2037 d_printf("\t--------- -------\n");
2038
2039 cli_NetServerEnum(cli, cli->server_domain, SV_TYPE_ALL, server_fn, NULL);
2040
2041 d_printf("\n\tWorkgroup Master\n");
2042 d_printf("\t--------- -------\n");
2043
2044 cli_NetServerEnum(cli, cli->server_domain, SV_TYPE_DOMAIN_ENUM, server_fn, NULL);
2045 return True;
2046 }
2047
2048 /* Some constants for completing filename arguments */
2049
2050 #define COMPL_NONE 0 /* No completions */
2051 #define COMPL_REMOTE 1 /* Complete remote filename */
2052 #define COMPL_LOCAL 2 /* Complete local filename */
2053
2054 /* This defines the commands supported by this client.
2055 * NOTE: The "!" must be the last one in the list because it's fn pointer
2056 * field is NULL, and NULL in that field is used in process_tok()
2057 * (below) to indicate the end of the list. crh
2058 */
2059 static struct
2060 {
2061 char *name;
2062 int (*fn)(void);
2063 char *description;
2064 char compl_args[2]; /* Completion argument info */
2065 } commands[] =
2066 {
2067 {"?",cmd_help,"[command] give help on a command",{COMPL_NONE,COMPL_NONE}},
2068 {"altname",cmd_altname,"<file> show alt name",{COMPL_NONE,COMPL_NONE}},
2069 {"archive",cmd_archive,"<level>\n0=ignore archive bit\n1=only get archive files\n2=only get archive files and reset archive bit\n3=get all files and reset archive bit",{COMPL_NONE,COMPL_NONE}},
2070 {"blocksize",cmd_block,"blocksize <number> (default 20)",{COMPL_NONE,COMPL_NONE}},
2071 {"cancel",cmd_cancel,"<jobid> cancel a print queue entry",{COMPL_NONE,COMPL_NONE}},
2072 {"cd",cmd_cd,"[directory] change/report the remote directory",{COMPL_REMOTE,COMPL_NONE}},
2073 {"chmod",cmd_chmod,"<src> <mode> chmod a file using UNIX permission",{COMPL_REMOTE,COMPL_REMOTE}},
2074 {"chown",cmd_chown,"<src> <uid> <gid> chown a file using UNIX uids and gids",{COMPL_REMOTE,COMPL_REMOTE}},
2075 {"del",cmd_del,"<mask> delete all matching files",{COMPL_REMOTE,COMPL_NONE}},
2076 {"dir",cmd_dir,"<mask> list the contents of the current directory",{COMPL_REMOTE,COMPL_NONE}},
2077 {"du",cmd_du,"<mask> computes the total size of the current directory",{COMPL_REMOTE,COMPL_NONE}},
2078 {"exit",cmd_quit,"logoff the server",{COMPL_NONE,COMPL_NONE}},
2079 {"get",cmd_get,"<remote name> [local name] get a file",{COMPL_REMOTE,COMPL_LOCAL}},
2080 {"help",cmd_help,"[command] give help on a command",{COMPL_NONE,COMPL_NONE}},
2081 {"history",cmd_history,"displays the command history",{COMPL_NONE,COMPL_NONE}},
2082 {"lcd",cmd_lcd,"[directory] change/report the local current working directory",{COMPL_LOCAL,COMPL_NONE}},
2083 {"link",cmd_link,"<src> <dest> create a UNIX hard link",{COMPL_REMOTE,COMPL_REMOTE}},
2084 {"lowercase",cmd_lowercase,"toggle lowercasing of filenames for get",{COMPL_NONE,COMPL_NONE}},
2085 {"ls",cmd_dir,"<mask> list the contents of the current directory",{COMPL_REMOTE,COMPL_NONE}},
2086 {"mask",cmd_select,"<mask> mask all filenames against this",{COMPL_REMOTE,COMPL_NONE}},
2087 {"md",cmd_mkdir,"<directory> make a directory",{COMPL_NONE,COMPL_NONE}},
2088 {"mget",cmd_mget,"<mask> get all the matching files",{COMPL_REMOTE,COMPL_NONE}},
2089 {"mkdir",cmd_mkdir,"<directory> make a directory",{COMPL_NONE,COMPL_NONE}},
2090 {"more",cmd_more,"<remote name> view a remote file with your pager",{COMPL_REMOTE,COMPL_NONE}},
2091 {"mput",cmd_mput,"<mask> put all matching files",{COMPL_REMOTE,COMPL_NONE}},
2092 {"newer",cmd_newer,"<file> only mget files newer than the specified local file",{COMPL_LOCAL,COMPL_NONE}},
2093 {"open",cmd_open,"<mask> open a file",{COMPL_REMOTE,COMPL_NONE}},
2094 {"print",cmd_print,"<file name> print a file",{COMPL_NONE,COMPL_NONE}},
2095 {"printmode",cmd_printmode,"<graphics or text> set the print mode",{COMPL_NONE,COMPL_NONE}},
2096 {"prompt",cmd_prompt,"toggle prompting for filenames for mget and mput",{COMPL_NONE,COMPL_NONE}},
2097 {"put",cmd_put,"<local name> [remote name] put a file",{COMPL_LOCAL,COMPL_REMOTE}},
2098 {"pwd",cmd_pwd,"show current remote directory (same as 'cd' with no args)",{COMPL_NONE,COMPL_NONE}},
2099 {"q",cmd_quit,"logoff the server",{COMPL_NONE,COMPL_NONE}},
2100 {"queue",cmd_queue,"show the print queue",{COMPL_NONE,COMPL_NONE}},
2101 {"quit",cmd_quit,"logoff the server",{COMPL_NONE,COMPL_NONE}},
2102 {"rd",cmd_rmdir,"<directory> remove a directory",{COMPL_NONE,COMPL_NONE}},
2103 {"recurse",cmd_recurse,"toggle directory recursion for mget and mput",{COMPL_NONE,COMPL_NONE}},
2104 {"reget",cmd_reget,"<remote name> [local name] get a file restarting at end of local file",{COMPL_REMOTE,COMPL_LOCAL}},
2105 {"rename",cmd_rename,"<src> <dest> rename some files",{COMPL_REMOTE,COMPL_REMOTE}},
2106 {"reput",cmd_reput,"<local name> [remote name] put a file restarting at end of remote file",{COMPL_LOCAL,COMPL_REMOTE}},
2107 {"rm",cmd_del,"<mask> delete all matching files",{COMPL_REMOTE,COMPL_NONE}},
2108 {"rmdir",cmd_rmdir,"<directory> remove a directory",{COMPL_NONE,COMPL_NONE}},
2109 {"setmode",cmd_setmode,"filename <setmode string> change modes of file",{COMPL_REMOTE,COMPL_NONE}},
2110 {"symlink",cmd_symlink,"<src> <dest> create a UNIX symlink",{COMPL_REMOTE,COMPL_REMOTE}},
2111 {"tar",cmd_tar,"tar <c|x>[IXFqbgNan] current directory to/from <file name>",{COMPL_NONE,COMPL_NONE}},
2112 {"tarmode",cmd_tarmode,"<full|inc|reset|noreset> tar's behaviour towards archive bits",{COMPL_NONE,COMPL_NONE}},
2113 {"translate",cmd_translate,"toggle text translation for printing",{COMPL_NONE,COMPL_NONE}},
2114
2115 /* Yes, this must be here, see crh's comment above. */
2116 {"!",NULL,"run a shell command on the local system",{COMPL_NONE,COMPL_NONE}},
2117 {"",NULL,NULL,{COMPL_NONE,COMPL_NONE}}
2118 };
2119
2120
2121 /*******************************************************************
2122 lookup a command string in the list of commands, including
2123 abbreviations
2124 ******************************************************************/
2125 static int process_tok(fstring tok)
2126 {
2127 int i = 0, matches = 0;
2128 int cmd=0;
2129 int tok_len = strlen(tok);
2130
2131 while (commands[i].fn != NULL) {
2132 if (strequal(commands[i].name,tok)) {
2133 matches = 1;
2134 cmd = i;
2135 break;
2136 } else if (strnequal(commands[i].name, tok, tok_len)) {
2137 matches++;
2138 cmd = i;
2139 }
2140 i++;
2141 }
2142
2143 if (matches == 0)
2144 return(-1);
2145 else if (matches == 1)
2146 return(cmd);
2147 else
2148 return(-2);
2149 }
2150
2151 /****************************************************************************
2152 help
2153 ****************************************************************************/
2154 static int cmd_help(void)
2155 {
2156 int i=0,j;
2157 fstring buf;
2158
2159 if (next_token_nr(NULL,buf,NULL,sizeof(buf))) {
2160 if ((i = process_tok(buf)) >= 0)
2161 d_printf("HELP %s:\n\t%s\n\n",commands[i].name,commands[i].description);
2162 } else {
2163 while (commands[i].description) {
2164 for (j=0; commands[i].description && (j<5); j++) {
2165 d_printf("%-15s",commands[i].name);
2166 i++;
2167 }
2168 d_printf("\n");
2169 }
2170 }
2171 return 0;
2172 }
2173
2174 /****************************************************************************
2175 process a -c command string
2176 ****************************************************************************/
2177 static int process_command_string(char *cmd)
2178 {
2179 pstring line;
2180 char *ptr;
2181 int rc = 0;
2182
2183 /* establish the connection if not already */
2184
2185 if (!cli) {
2186 cli = do_connect(desthost, service);
2187 if (!cli)
2188 return 0;
2189 }
2190
2191 while (cmd[0] != '\0') {
2192 char *p;
2193 fstring tok;
2194 int i;
2195
2196 if ((p = strchr_m(cmd, ';')) == 0) {
2197 strncpy(line, cmd, 999);
2198 line[1000] = '\0';
2199 cmd += strlen(cmd);
2200 } else {
2201 if (p - cmd > 999) p = cmd + 999;
2202 strncpy(line, cmd, p - cmd);
2203 line[p - cmd] = '\0';
2204 cmd = p + 1;
2205 }
2206
2207 /* and get the first part of the command */
2208 ptr = line;
2209 if (!next_token_nr(&ptr,tok,NULL,sizeof(tok))) continue;
2210
2211 if ((i = process_tok(tok)) >= 0) {
2212 rc = commands[i].fn();
2213 } else if (i == -2) {
2214 d_printf("%s: command abbreviation ambiguous\n",tok);
2215 } else {
2216 d_printf("%s: command not found\n",tok);
2217 }
2218 }
2219
2220 return rc;
2221 }
2222
2223 /****************************************************************************
2224 handle completion of commands for readline
2225 ****************************************************************************/
2226 static char **completion_fn(char *text, int start, int end)
2227 {
2228 #define MAX_COMPLETIONS 100
2229 char **matches;
2230 int i, count=0;
2231
2232 /* for words not at the start of the line fallback to filename completion */
2233 if (start) return NULL;
2234
2235 matches = (char **)malloc(sizeof(matches[0])*MAX_COMPLETIONS);
2236 if (!matches) return NULL;
2237
2238 matches[count++] = strdup(text);
2239 if (!matches[0]) return NULL;
2240
2241 for (i=0;commands[i].fn && count < MAX_COMPLETIONS-1;i++) {
2242 if (strncmp(text, commands[i].name, strlen(text)) == 0) {
2243 matches[count] = strdup(commands[i].name);
2244 if (!matches[count]) return NULL;
2245 count++;
2246 }
2247 }
2248
2249 if (count == 2) {
2250 SAFE_FREE(matches[0]);
2251 matches[0] = strdup(matches[1]);
2252 }
2253 matches[count] = NULL;
2254 return matches;
2255 }
2256
2257
2258 /****************************************************************************
2259 make sure we swallow keepalives during idle time
2260 ****************************************************************************/
2261 static void readline_callback(void)
2262 {
2263 fd_set fds;
2264 struct timeval timeout;
2265 static time_t last_t;
2266 time_t t;
2267
2268 t = time(NULL);
2269
2270 if (t - last_t < 5) return;
2271
2272 last_t = t;
2273
2274 again:
2275 FD_ZERO(&fds);
2276 FD_SET(cli->fd,&fds);
2277
2278 timeout.tv_sec = 0;
2279 timeout.tv_usec = 0;
2280 sys_select_intr(cli->fd+1,&fds,NULL,NULL,&timeout);
2281
2282 /* We deliberately use receive_smb instead of
2283 client_receive_smb as we want to receive
2284 session keepalives and then drop them here.
2285 */
2286 if (FD_ISSET(cli->fd,&fds)) {
2287 receive_smb(cli->fd,cli->inbuf,0);
2288 goto again;
2289 }
2290
2291 cli_chkpath(cli, "\\");
2292 }
2293
2294
2295 /****************************************************************************
2296 process commands on stdin
2297 ****************************************************************************/
2298 static void process_stdin(void)
2299 {
2300 char *ptr;
2301
2302 while (1) {
2303 fstring tok;
2304 fstring the_prompt;
2305 char *cline;
2306 pstring line;
2307 int i;
2308
2309 /* display a prompt */
2310 slprintf(the_prompt, sizeof(the_prompt)-1, "smb: %s> ", cur_dir);
2311 cline = smb_readline(the_prompt, readline_callback, completion_fn);
2312
2313 if (!cline) break;
2314
2315 pstrcpy(line, cline);
2316
2317 /* special case - first char is ! */
2318 if (*line == '!') {
2319 system(line + 1);
2320 continue;
2321 }
2322
2323 /* and get the first part of the command */
2324 ptr = line;
2325 if (!next_token_nr(&ptr,tok,NULL,sizeof(tok))) continue;
2326
2327 if ((i = process_tok(tok)) >= 0) {
2328 commands[i].fn();
2329 } else if (i == -2) {
2330 d_printf("%s: command abbreviation ambiguous\n",tok);
2331 } else {
2332 d_printf("%s: command not found\n",tok);
2333 }
2334 }
2335 }
2336
2337
2338 /*****************************************************
2339 return a connection to a server
2340 *******************************************************/
2341 static struct cli_state *do_connect(const char *server, const char *share)
2342 {
2343 struct cli_state *c;
2344 struct nmb_name called, calling;
2345 const char *server_n;
2346 struct in_addr ip;
2347 fstring servicename;
2348 char *sharename;
2349
2350 /* make a copy so we don't modify the global string 'service' */
2351 safe_strcpy(servicename, share, sizeof(servicename)-1);
2352 sharename = servicename;
2353 if (*sharename == '\\') {
2354 server = sharename+2;
2355 sharename = strchr_m(server,'\\');
2356 if (!sharename) return NULL;
2357 *sharename = 0;
2358 sharename++;
2359 }
2360
2361 server_n = server;
2362
2363 zero_ip(&ip);
2364
2365 make_nmb_name(&calling, global_myname, 0x0);
2366 make_nmb_name(&called , server, name_type);
2367
2368 again:
2369 zero_ip(&ip);
2370 if (have_ip) ip = dest_ip;
2371
2372 /* have to open a new connection */
2373 if (!(c=cli_initialise(NULL)) || (cli_set_port(c, port) != port) ||
2374 !cli_connect(c, server_n, &ip)) {
2375 d_printf("Connection to %s failed\n", server_n);
2376 return NULL;
2377 }
2378
2379 c->protocol = max_protocol;
2380 c->use_kerberos = use_kerberos;
2381
2382 if (!cli_session_request(c, &calling, &called)) {
2383 char *p;
2384 d_printf("session request to %s failed (%s)\n",
2385 called.name, cli_errstr(c));
2386 cli_shutdown(c);
2387 if ((p=strchr_m(called.name, '.'))) {
2388 *p = 0;
2389 goto again;
2390 }
2391 if (strcmp(called.name, "*SMBSERVER")) {
2392 make_nmb_name(&called , "*SMBSERVER", 0x20);
2393 goto again;
2394 }
2395 return NULL;
2396 }
2397
2398 DEBUG(4,(" session request ok\n"));
2399
2400 if (!cli_negprot(c)) {
2401 d_printf("protocol negotiation failed\n");
2402 cli_shutdown(c);
2403 return NULL;
2404 }
2405
2406 if (!got_pass) {
2407 char *pass = getpass("Password: ");
2408 if (pass) {
2409 pstrcpy(password, pass);
2410 }
2411 }
2412
2413 if (!cli_session_setup(c, username,
2414 password, strlen(password),
2415 password, strlen(password),
2416 workgroup)) {
2417 /* if a password was not supplied then try again with a null username */
2418 if (password[0] || !username[0] || use_kerberos ||
2419 !cli_session_setup(c, "", "", 0, "", 0, workgroup)) {
2420 d_printf("session setup failed: %s\n", cli_errstr(c));
2421 cli_shutdown(c);
2422 return NULL;
2423 }
2424 d_printf("Anonymous login successful\n");
2425 }
2426
2427 if (*c->server_domain) {
2428 DEBUG(1,("Domain=[%s] OS=[%s] Server=[%s]\n",
2429 c->server_domain,c->server_os,c->server_type));
2430 } else if (*c->server_os || *c->server_type){
2431 DEBUG(1,("OS=[%s] Server=[%s]\n",
2432 c->server_os,c->server_type));
2433 }
2434
2435 DEBUG(4,(" session setup ok\n"));
2436
2437 if (!cli_send_tconX(c, sharename, "?????",
2438 password, strlen(password)+1)) {
2439 pstring share;
2440
2441 /*
2442 * Some servers require \\server\share for the share
2443 * while others are happy with share as we gave above
2444 * Lets see if we give it the long form if it works
2445 */
2446 pstrcpy(share, "\\\\");
2447 pstrcat(share, server);
2448 pstrcat(share, "\\");
2449 pstrcat(share, sharename);
2450 if (!cli_send_tconX(c, share, "?????", password,
2451 strlen(password) + 1)) {
2452
2453 d_printf("tree connect failed: %s\n", cli_errstr(c));
2454 cli_shutdown(c);
2455 return NULL;
2456 }
2457 }
2458
2459 DEBUG(4,(" tconx ok\n"));
2460
2461 return c;
2462 }
2463
2464
2465 /****************************************************************************
2466 process commands from the client
2467 ****************************************************************************/
2468 static int process(char *base_directory)
2469 {
2470 int rc = 0;
2471
2472 cli = do_connect(desthost, service);
2473 if (!cli) {
2474 return 1;
2475 }
2476
2477 if (*base_directory) do_cd(base_directory);
2478
2479 if (cmdstr) {
2480 rc = process_command_string(cmdstr);
2481 } else {
2482 process_stdin();
2483 }
2484
2485 cli_shutdown(cli);
2486 return rc;
2487 }
2488
2489 /****************************************************************************
2490 usage on the program
2491 ****************************************************************************/
2492 static void usage(char *pname)
2493 {
2494 d_printf("Usage: %s service <password> [options]", pname);
2495
2496 d_printf("\nVersion %s\n",VERSION);
2497 d_printf("\t-s smb.conf pathname to smb.conf file\n");
2498 d_printf("\t-O socket_options socket options to use\n");
2499 d_printf("\t-R name resolve order use these name resolution services only\n");
2500 d_printf("\t-M host send a winpopup message to the host\n");
2501 d_printf("\t-i scope use this NetBIOS scope\n");
2502 d_printf("\t-N don't ask for a password\n");
2503 d_printf("\t-n netbios name. Use this name as my netbios name\n");
2504 d_printf("\t-d debuglevel set the debuglevel\n");
2505 d_printf("\t-P connect to service as a printer\n");
2506 d_printf("\t-p port connect to the specified port\n");
2507 d_printf("\t-l log basename. Basename for log/debug files\n");
2508 d_printf("\t-h Print this help message.\n");
2509 d_printf("\t-I dest IP use this IP to connect to\n");
2510 d_printf("\t-E write messages to stderr instead of stdout\n");
2511 d_printf("\t-k use kerberos (active directory) authentication\n");
2512 d_printf("\t-U username set the network username\n");
2513 d_printf("\t-L host get a list of shares available on a host\n");
2514 d_printf("\t-t terminal code terminal i/o code {sjis|euc|jis7|jis8|junet|hex}\n");
2515 d_printf("\t-m max protocol set the max protocol level\n");
2516 d_printf("\t-A filename get the credentials from a file\n");
2517 d_printf("\t-W workgroup set the workgroup name\n");
2518 d_printf("\t-T<c|x>IXFqgbNan command line tar\n");
2519 d_printf("\t-D directory start from directory\n");
2520 d_printf("\t-c command string execute semicolon separated commands\n");
2521 d_printf("\t-b xmit/send buffer changes the transmit/send buffer (default: 65520)\n");
2522 d_printf("\n");
2523 }
2524
2525
2526 /****************************************************************************
2527 get a password from a a file or file descriptor
2528 exit on failure
2529 ****************************************************************************/
2530 static void get_password_file(void)
2531 {
2532 int fd = -1;
2533 char *p;
2534 BOOL close_it = False;
2535 pstring spec;
2536 char pass[128];
2537
2538 if ((p = getenv("PASSWD_FD")) != NULL) {
2539 pstrcpy(spec, "descriptor ");
2540 pstrcat(spec, p);
2541 sscanf(p, "%d", &fd);
2542 close_it = False;
2543 } else if ((p = getenv("PASSWD_FILE")) != NULL) {
2544 fd = sys_open(p, O_RDONLY, 0);
2545 pstrcpy(spec, p);
2546 if (fd < 0) {
2547 fprintf(stderr, "Error opening PASSWD_FILE %s: %s\n",
2548 spec, strerror(errno));
2549 exit(1);
2550 }
2551 close_it = True;
2552 }
2553
2554 for(p = pass, *p = '\0'; /* ensure that pass is null-terminated */
2555 p && p - pass < sizeof(pass);) {
2556 switch (read(fd, p, 1)) {
2557 case 1:
2558 if (*p != '\n' && *p != '\0') {
2559 *++p = '\0'; /* advance p, and null-terminate pass */
2560 break;
2561 }
2562 case 0:
2563 if (p - pass) {
2564 *p = '\0'; /* null-terminate it, just in case... */
2565 p = NULL; /* then force the loop condition to become false */
2566 break;
2567 } else {
2568 fprintf(stderr, "Error reading password from file %s: %s\n",
2569 spec, "empty password\n");
2570 exit(1);
2571 }
2572
2573 default:
2574 fprintf(stderr, "Error reading password from file %s: %s\n",
2575 spec, strerror(errno));
2576 exit(1);
2577 }
2578 }
2579 pstrcpy(password, pass);
2580 if (close_it)
2581 close(fd);
2582 }
2583
2584
2585
2586 /****************************************************************************
2587 handle a -L query
2588 ****************************************************************************/
2589 static int do_host_query(char *query_host)
2590 {
2591 cli = do_connect(query_host, "IPC$");
2592 if (!cli)
2593 return 1;
2594
2595 browse_host(True);
2596 list_servers(workgroup);
2597
2598 cli_shutdown(cli);
2599
2600 return(0);
2601 }
2602
2603
2604 /****************************************************************************
2605 handle a tar operation
2606 ****************************************************************************/
2607 static int do_tar_op(char *base_directory)
2608 {
2609 int ret;
2610
2611 /* do we already have a connection? */
2612 if (!cli) {
2613 cli = do_connect(desthost, service);
2614 if (!cli)
2615 return 1;
2616 }
2617
2618 recurse=True;
2619
2620 if (*base_directory) do_cd(base_directory);
2621
2622 ret=process_tar();
2623
2624 cli_shutdown(cli);
2625
2626 return(ret);
2627 }
2628
2629 /****************************************************************************
2630 handle a message operation
2631 ****************************************************************************/
2632 static int do_message_op(void)
2633 {
2634 struct in_addr ip;
2635 struct nmb_name called, calling;
2636 fstring server_name;
2637 char name_type_hex[10];
2638
2639 make_nmb_name(&calling, global_myname, 0x0);
2640 make_nmb_name(&called , desthost, name_type);
2641
2642 safe_strcpy(server_name, desthost, sizeof(server_name));
2643 snprintf(name_type_hex, sizeof(name_type_hex), "#%X", name_type);
2644 safe_strcat(server_name, name_type_hex, sizeof(server_name));
2645
2646 zero_ip(&ip);
2647 if (have_ip) ip = dest_ip;
2648
2649 if (!(cli=cli_initialise(NULL)) || (cli_set_port(cli, port) != port) ||
2650 !cli_connect(cli, server_name, &ip)) {
2651 d_printf("Connection to %s failed\n", desthost);
2652 return 1;
2653 }
2654
2655 if (!cli_session_request(cli, &calling, &called)) {
2656 d_printf("session request failed\n");
2657 cli_shutdown(cli);
2658 return 1;
2659 }
2660
2661 send_message();
2662 cli_shutdown(cli);
2663
2664 return 0;
2665 }
2666
2667
2668 /**
2669 * Process "-L hostname" option.
2670 *
2671 * We don't actually do anything yet -- we just stash the name in a
2672 * global variable and do the query when all options have been read.
2673 **/
2674 static void remember_query_host(const char *arg,
2675 pstring query_host)
2676 {
2677 char *slash;
2678
2679 while (*arg == '\\' || *arg == '/')
2680 arg++;
2681 pstrcpy(query_host, arg);
2682 if ((slash = strchr(query_host, '/'))
2683 || (slash = strchr(query_host, '\\'))) {
2684 *slash = 0;
2685 }
2686 }
2687
2688
2689 /****************************************************************************
2690 main program
2691 ****************************************************************************/
2692 int main(int argc,char *argv[])
2693 {
2694 fstring base_directory;
2695 char *pname = argv[0];
2696 int opt;
2697 extern char *optarg;
2698 extern int optind;
2699 int old_debug;
2700 pstring query_host;
2701 BOOL message = False;
2702 extern char tar_type;
2703 pstring term_code;
2704 pstring new_name_resolve_order;
2705 pstring logfile;
2706 char *p;
2707 int rc = 0;
2708
2709 #ifdef KANJI
2710 pstrcpy(term_code, KANJI);
2711 #else /* KANJI */
2712 *term_code = 0;
2713 #endif /* KANJI */
2714
2715 *query_host = 0;
2716 *base_directory = 0;
2717
2718 *new_name_resolve_order = 0;
2719
2720 DEBUGLEVEL = 2;
2721 AllowDebugChange = False;
2722
2723 setup_logging(pname,True);
2724
2725 /*
2726 * If the -E option is given, be careful not to clobber stdout
2727 * before processing the options. 28.Feb.99, richard@hacom.nl.
2728 * Also pre-parse the -s option to get the service file name.
2729 */
2730
2731 for (opt = 1; opt < argc; opt++) {
2732 if (strcmp(argv[opt], "-E") == 0)
2733 dbf = x_stderr;
2734 else if(strncmp(argv[opt], "-s", 2) == 0) {
2735 if(argv[opt][2] != '\0')
2736 pstrcpy(dyn_CONFIGFILE, &argv[opt][2]);
2737 else if(argv[opt+1] != NULL) {
2738 /*
2739 * At least one more arg left.
2740 */
2741 pstrcpy(dyn_CONFIGFILE, argv[opt+1]);
2742 } else {
2743 usage(pname);
2744 exit(1);
2745 }
2746 }
2747 }
2748
2749 in_client = True; /* Make sure that we tell lp_load we are */
2750
2751 old_debug = DEBUGLEVEL;
2752 if (!lp_load(dyn_CONFIGFILE,True,False,False)) {
2753 fprintf(stderr, "%s: Can't load %s - run testparm to debug it\n",
2754 prog_name, dyn_CONFIGFILE);
2755 }
2756 DEBUGLEVEL = old_debug;
2757
2758 pstrcpy(workgroup,lp_workgroup());
2759
2760 load_interfaces();
2761 myumask = umask(0);
2762 umask(myumask);
2763
2764 if (getenv("USER")) {
2765 pstrcpy(username,getenv("USER"));
2766
2767 /* modification to support userid%passwd syntax in the USER var
2768 25.Aug.97, jdblair@uab.edu */
2769
2770 if ((p=strchr_m(username,'%'))) {
2771 *p = 0;
2772 pstrcpy(password,p+1);
2773 got_pass = True;
2774 memset(strchr_m(getenv("USER"),'%')+1,'X',strlen(password));
2775 }
2776 }
2777
2778 /* modification to support PASSWD environmental var
2779 25.Aug.97, jdblair@uab.edu */
2780 if (getenv("PASSWD")) {
2781 pstrcpy(password,getenv("PASSWD"));
2782 got_pass = True;
2783 }
2784
2785 if (getenv("PASSWD_FD") || getenv("PASSWD_FILE")) {
2786 get_password_file();
2787 got_pass = True;
2788 }
2789
2790 if (*username == 0 && getenv("LOGNAME")) {
2791 pstrcpy(username,getenv("LOGNAME"));
2792 }
2793
2794 if (*username == 0) {
2795 pstrcpy(username,"GUEST");
2796 }
2797
2798 if (argc < 2) {
2799 usage(pname);
2800 exit(1);
2801 }
2802
2803 /* FIXME: At the moment, if the user should happen to give the
2804 * options ahead of the service name (in standard Unix
2805 * fashion) then smbclient just spits out the usage message
2806 * with no explanation of what in particular was wrong. Is
2807 * there any reason we can't just parse out the service name
2808 * and password after running getopt?? -- mbp */
2809 if (*argv[1] != '-') {
2810 pstrcpy(service,argv[1]);
2811 /* Convert any '/' characters in the service name to '\' characters */
2812 string_replace( service, '/','\\');
2813 argc--;
2814 argv++;
2815
2816 if (count_chars(service,'\\') < 3) {
2817 usage(pname);
2818 d_printf("\n%s: Not enough '\\' characters in service\n",service);
2819 exit(1);
2820 }
2821
2822 if (argc > 1 && (*argv[1] != '-')) {
2823 got_pass = True;
2824 pstrcpy(password,argv[1]);
2825 memset(argv[1],'X',strlen(argv[1]));
2826 argc--;
2827 argv++;
2828 }
2829 }
2830
2831 while ((opt =
2832 getopt(argc, argv,"s:O:R:M:i:Nn:d:Pp:l:hI:EU:L:t:m:W:T:D:c:b:A:k")) != EOF) {
2833 switch (opt) {
2834 case 's':
2835 pstrcpy(dyn_CONFIGFILE, optarg);
2836 break;
2837 case 'O':
2838 pstrcpy(user_socket_options,optarg);
2839 break;
2840 case 'R':
2841 pstrcpy(new_name_resolve_order, optarg);
2842 break;
2843 case 'M':
2844 name_type = 0x03; /* messages are sent to NetBIOS name type 0x3 */
2845 pstrcpy(desthost,optarg);
2846 message = True;
2847 break;
2848 case 'i':
2849 {
2850 extern pstring global_scope;
2851 pstrcpy(global_scope,optarg);
2852 strupper(global_scope);
2853 }
2854 break;
2855 case 'N':
2856 got_pass = True;
2857 break;
2858 case 'n':
2859 pstrcpy(global_myname,optarg);
2860 break;
2861 case 'd':
2862 if (*optarg == 'A')
2863 DEBUGLEVEL = 10000;
2864 else
2865 DEBUGLEVEL = atoi(optarg);
2866 break;
2867 case 'P':
2868 /* not needed anymore */
2869 break;
2870 case 'p':
2871 port = atoi(optarg);
2872 break;
2873 case 'l':
2874 slprintf(logfile,sizeof(logfile)-1, "%s.client",optarg);
2875 lp_set_logfile(logfile);
2876 break;
2877 case 'h':
2878 usage(pname);
2879 exit(0);
2880 break;
2881 case 'I':
2882 {
2883 dest_ip = *interpret_addr2(optarg);
2884 if (is_zero_ip(dest_ip))
2885 exit(1);
2886 have_ip = True;
2887 }
2888 break;
2889 case 'E':
2890 display_set_stderr();
2891 dbf = x_stderr;
2892 break;
2893 case 'U':
2894 {
2895 char *lp;
2896 pstrcpy(username,optarg);
2897 if ((lp=strchr_m(username,'%'))) {
2898 *lp = 0;
2899 pstrcpy(password,lp+1);
2900 got_pass = True;
2901 memset(strchr_m(optarg,'%')+1,'X',strlen(password));
2902 }
2903 }
2904 break;
2905
2906 case 'A':
2907 {
2908 XFILE *auth;
2909 fstring buf;
2910 uint16 len = 0;
2911 char *ptr, *val, *param;
2912
2913 if ((auth=x_fopen(optarg, O_RDONLY, 0)) == NULL)
2914 {
2915 /* fail if we can't open the credentials file */
2916 d_printf("ERROR: Unable to open credentials file!\n");
2917 exit (-1);
2918 }
2919
2920 while (!x_feof(auth))
2921 {
2922 /* get a line from the file */
2923 if (!x_fgets(buf, sizeof(buf), auth))
2924 continue;
2925 len = strlen(buf);
2926
2927 if ((len) && (buf[len-1]=='\n'))
2928 {
2929 buf[len-1] = '\0';
2930 len--;
2931 }
2932 if (len == 0)
2933 continue;
2934
2935 /* break up the line into parameter & value.
2936 will need to eat a little whitespace possibly */
2937 param = buf;
2938 if (!(ptr = strchr_m (buf, '=')))
2939 continue;
2940 val = ptr+1;
2941 *ptr = '\0';
2942
2943 /* eat leading white space */
2944 while ((*val!='\0') && ((*val==' ') || (*val=='\t')))
2945 val++;
2946
2947 if (strwicmp("password", param) == 0)
2948 {
2949 pstrcpy(password, val);
2950 got_pass = True;
2951 }
2952 else if (strwicmp("username", param) == 0)
2953 pstrcpy(username, val);
2954 else if (strwicmp("domain", param) == 0)
2955 pstrcpy(workgroup,val);
2956 memset(buf, 0, sizeof(buf));
2957 }
2958 x_fclose(auth);
2959 }
2960 break;
2961
2962 case 'L':
2963 remember_query_host(optarg, query_host);
2964 break;
2965 case 't':
2966 pstrcpy(term_code, optarg);
2967 break;
2968 case 'm':
2969 max_protocol = interpret_protocol(optarg, max_protocol);
2970 break;
2971 case 'W':
2972 pstrcpy(workgroup,optarg);
2973 break;
2974 case 'T':
2975 if (!tar_parseargs(argc, argv, optarg, optind)) {
2976 usage(pname);
2977 exit(1);
2978 }
2979 break;
2980 case 'D':
2981 pstrcpy(base_directory,optarg);
2982 break;
2983 case 'c':
2984 cmdstr = optarg;
2985 break;
2986 case 'b':
2987 io_bufsize = MAX(1, atoi(optarg));
2988 break;
2989 case 'k':
2990 #ifdef HAVE_KRB5
2991 use_kerberos = True;
2992 got_pass = True;
2993 #else
2994 d_printf("No kerberos support compiled in\n");
2995 exit(1);
2996 #endif
2997 break;
2998 default:
2999 usage(pname);
3000 exit(1);
3001 }
3002 }
3003
3004 get_myname((*global_myname)?NULL:global_myname);
3005
3006 if(*new_name_resolve_order)
3007 lp_set_name_resolve_order(new_name_resolve_order);
3008
3009 if (!tar_type && !*query_host && !*service && !message) {
3010 usage(pname);
3011 exit(1);
3012 }
3013
3014 DEBUG( 3, ( "Client started (version %s).\n", VERSION ) );
3015
3016 if (tar_type) {
3017 if (cmdstr)
3018 process_command_string(cmdstr);
3019 return do_tar_op(base_directory);
3020 }
3021
3022 if ((p=strchr_m(query_host,'#'))) {
3023 *p = 0;
3024 p++;
3025 sscanf(p, "%x", &name_type);
3026 }
3027
3028 if (*query_host) {
3029 return do_host_query(query_host);
3030 }
3031
3032 if (message) {
3033 return do_message_op();
3034 }
3035
3036 if (process(base_directory)) {
3037 return 1;
3038 }
3039
3040 return rc;
3041 }
Working branch of Samba for id10ts