2 Unix SMB/Netbios implementation.
5 Copyright (C) Andrew Tridgell 1994-1998
6 Copyright (C) Simo Sorce 2001
8 This program is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 2 of the License, or
11 (at your option) any later version.
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with this program; if not, write to the Free Software
20 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
31 struct cli_state *cli;
32 extern BOOL in_client;
34 pstring cur_dir = "\\";
36 static pstring service;
37 static pstring desthost;
38 extern pstring global_myname;
39 static pstring password;
40 static pstring username;
41 static pstring workgroup;
44 static int io_bufsize = 64512;
45 extern struct in_addr ipzero;
47 static int name_type = 0x20;
48 static int max_protocol = PROTOCOL_NT1;
49 extern pstring user_socket_options;
51 static int process_tok(fstring tok);
52 static int cmd_help(void);
54 /* 30 second timeout on most commands */
55 #define CLIENT_TIMEOUT (30*1000)
56 #define SHORT_TIMEOUT (5*1000)
58 /* value for unused fid field in trans2 secondary request */
59 #define FID_UNUSED (0xFFFF)
61 time_t newer_than = 0;
62 int archive_level = 0;
64 extern pstring debugf;
66 BOOL translation = False;
70 /* clitar bits insert */
73 extern BOOL tar_reset;
77 mode_t myumask = 0755;
83 static BOOL recurse = False;
84 BOOL lowercase = False;
86 struct in_addr dest_ip;
88 #define SEPARATORS " \t\n\r"
90 BOOL abort_mget = True;
92 pstring fileselection = "";
94 extern file_info def_finfo;
97 int get_total_size = 0;
98 int get_total_time_ms = 0;
99 int put_total_size = 0;
100 int put_total_time_ms = 0;
103 static double dir_total;
107 /****************************************************************************
108 write to a local file with CR/LF->LF translation if appropriate. return the
109 number taken from the buffer. This may not equal the number written.
110 ****************************************************************************/
111 static int writefile(int f, char *b, int n)
121 if (*b == '\r' && (i<(n-1)) && *(b+1) == '\n') {
124 if (write(f, b, 1) != 1) {
134 /****************************************************************************
135 read from a file with LF->CR/LF translation if appropriate. return the
136 number read. read approx n bytes.
137 ****************************************************************************/
138 static int readfile(char *b, int n, XFILE *f)
144 return x_fread(b,1,n,f);
147 while (i < (n - 1) && (i < BUFFER_SIZE)) {
148 if ((c = x_getc(f)) == EOF) {
152 if (c == '\n') { /* change all LFs to CR/LF */
163 /****************************************************************************
165 ****************************************************************************/
166 static void send_message(void)
171 if (!cli_message_start(cli, desthost, username, &grp_id)) {
172 d_printf("message start: %s\n", cli_errstr(cli));
177 d_printf("Connected. Type your message, ending it with a Control-D\n");
179 while (!feof(stdin) && total_len < 1600) {
180 int maxlen = MIN(1600 - total_len,127);
187 for (l=0;l<maxlen && (c=fgetc(stdin))!=EOF;l++) {
193 if (!cli_message_text(cli, msg, l, grp_id)) {
194 d_printf("SMBsendtxt failed (%s)\n",cli_errstr(cli));
201 if (total_len >= 1600)
202 d_printf("the message was truncated to 1600 bytes\n");
204 d_printf("sent %d bytes\n",total_len);
206 if (!cli_message_end(cli, grp_id)) {
207 d_printf("SMBsendend failed (%s)\n",cli_errstr(cli));
214 /****************************************************************************
215 check the space on a device
216 ****************************************************************************/
217 static int do_dskattr(void)
219 int total, bsize, avail;
221 if (!cli_dskattr(cli, &bsize, &total, &avail)) {
222 d_printf("Error in dskattr: %s\n",cli_errstr(cli));
226 d_printf("\n\t\t%d blocks of size %d. %d blocks available\n",
227 total, bsize, avail);
232 /****************************************************************************
234 ****************************************************************************/
235 static int cmd_pwd(void)
237 d_printf("Current directory is %s",service);
238 d_printf("%s\n",cur_dir);
243 /****************************************************************************
244 change directory - inner section
245 ****************************************************************************/
246 static int do_cd(char *newdir)
254 /* Save the current directory in case the
255 new directory is invalid */
256 pstrcpy(saved_dir, cur_dir);
261 if (*(cur_dir+strlen(cur_dir)-1) != '\\') {
262 pstrcat(cur_dir, "\\");
264 dos_clean_name(cur_dir);
265 pstrcpy(dname,cur_dir);
266 pstrcat(cur_dir,"\\");
267 dos_clean_name(cur_dir);
269 if (!strequal(cur_dir,"\\")) {
270 if (!cli_chkpath(cli, dname)) {
271 d_printf("cd %s: %s\n", dname, cli_errstr(cli));
272 pstrcpy(cur_dir,saved_dir);
276 pstrcpy(cd_path,cur_dir);
281 /****************************************************************************
283 ****************************************************************************/
284 static int cmd_cd(void)
289 if (next_token_nr(NULL,buf,NULL,sizeof(buf)))
292 d_printf("Current directory is %s\n",cur_dir);
298 /*******************************************************************
299 decide if a file should be operated on
300 ********************************************************************/
301 static BOOL do_this_one(file_info *finfo)
303 if (finfo->mode & aDIR) return(True);
305 if (*fileselection &&
306 !mask_match(finfo->name,fileselection,False)) {
307 DEBUG(3,("match_match %s failed\n", finfo->name));
311 if (newer_than && finfo->mtime < newer_than) {
312 DEBUG(3,("newer_than %s failed\n", finfo->name));
316 if ((archive_level==1 || archive_level==2) && !(finfo->mode & aARCH)) {
317 DEBUG(3,("archive %s failed\n", finfo->name));
324 /****************************************************************************
325 display info about a file
326 ****************************************************************************/
327 static void display_finfo(file_info *finfo)
329 if (do_this_one(finfo)) {
330 time_t t = finfo->mtime; /* the time is assumed to be passed as GMT */
331 d_printf(" %-30s%7.7s %8.0f %s",
333 attrib_string(finfo->mode),
335 asctime(LocalTime(&t)));
336 dir_total += finfo->size;
341 /****************************************************************************
342 accumulate size of a file
343 ****************************************************************************/
344 static void do_du(file_info *finfo)
346 if (do_this_one(finfo)) {
347 dir_total += finfo->size;
351 static BOOL do_list_recurse;
352 static BOOL do_list_dirs;
353 static char *do_list_queue = 0;
354 static long do_list_queue_size = 0;
355 static long do_list_queue_start = 0;
356 static long do_list_queue_end = 0;
357 static void (*do_list_fn)(file_info *);
359 /****************************************************************************
360 functions for do_list_queue
361 ****************************************************************************/
364 * The do_list_queue is a NUL-separated list of strings stored in a
365 * char*. Since this is a FIFO, we keep track of the beginning and
366 * ending locations of the data in the queue. When we overflow, we
367 * double the size of the char*. When the start of the data passes
368 * the midpoint, we move everything back. This is logically more
369 * complex than a linked list, but easier from a memory management
370 * angle. In any memory error condition, do_list_queue is reset.
371 * Functions check to ensure that do_list_queue is non-NULL before
374 static void reset_do_list_queue(void)
376 SAFE_FREE(do_list_queue);
377 do_list_queue_size = 0;
378 do_list_queue_start = 0;
379 do_list_queue_end = 0;
382 static void init_do_list_queue(void)
384 reset_do_list_queue();
385 do_list_queue_size = 1024;
386 do_list_queue = malloc(do_list_queue_size);
387 if (do_list_queue == 0) {
388 d_printf("malloc fail for size %d\n",
389 (int)do_list_queue_size);
390 reset_do_list_queue();
392 memset(do_list_queue, 0, do_list_queue_size);
396 static void adjust_do_list_queue(void)
399 * If the starting point of the queue is more than half way through,
400 * move everything toward the beginning.
402 if (do_list_queue && (do_list_queue_start == do_list_queue_end))
404 DEBUG(4,("do_list_queue is empty\n"));
405 do_list_queue_start = do_list_queue_end = 0;
406 *do_list_queue = '\0';
408 else if (do_list_queue_start > (do_list_queue_size / 2))
410 DEBUG(4,("sliding do_list_queue backward\n"));
411 memmove(do_list_queue,
412 do_list_queue + do_list_queue_start,
413 do_list_queue_end - do_list_queue_start);
414 do_list_queue_end -= do_list_queue_start;
415 do_list_queue_start = 0;
420 static void add_to_do_list_queue(const char* entry)
423 long new_end = do_list_queue_end + ((long)strlen(entry)) + 1;
424 while (new_end > do_list_queue_size)
426 do_list_queue_size *= 2;
427 DEBUG(4,("enlarging do_list_queue to %d\n",
428 (int)do_list_queue_size));
429 dlq = Realloc(do_list_queue, do_list_queue_size);
431 d_printf("failure enlarging do_list_queue to %d bytes\n",
432 (int)do_list_queue_size);
433 reset_do_list_queue();
438 memset(do_list_queue + do_list_queue_size / 2,
439 0, do_list_queue_size / 2);
444 pstrcpy(do_list_queue + do_list_queue_end, entry);
445 do_list_queue_end = new_end;
446 DEBUG(4,("added %s to do_list_queue (start=%d, end=%d)\n",
447 entry, (int)do_list_queue_start, (int)do_list_queue_end));
451 static char *do_list_queue_head(void)
453 return do_list_queue + do_list_queue_start;
456 static void remove_do_list_queue_head(void)
458 if (do_list_queue_end > do_list_queue_start)
460 do_list_queue_start += strlen(do_list_queue_head()) + 1;
461 adjust_do_list_queue();
462 DEBUG(4,("removed head of do_list_queue (start=%d, end=%d)\n",
463 (int)do_list_queue_start, (int)do_list_queue_end));
467 static int do_list_queue_empty(void)
469 return (! (do_list_queue && *do_list_queue));
472 /****************************************************************************
474 ****************************************************************************/
475 static void do_list_helper(file_info *f, const char *mask, void *state)
477 if (f->mode & aDIR) {
478 if (do_list_dirs && do_this_one(f)) {
481 if (do_list_recurse &&
482 !strequal(f->name,".") &&
483 !strequal(f->name,"..")) {
487 pstrcpy(mask2, mask);
488 p = strrchr_m(mask2,'\\');
491 pstrcat(mask2, f->name);
492 pstrcat(mask2,"\\*");
493 add_to_do_list_queue(mask2);
498 if (do_this_one(f)) {
504 /****************************************************************************
505 a wrapper around cli_list that adds recursion
506 ****************************************************************************/
507 void do_list(const char *mask,uint16 attribute,void (*fn)(file_info *),BOOL rec, BOOL dirs)
509 static int in_do_list = 0;
511 if (in_do_list && rec)
513 fprintf(stderr, "INTERNAL ERROR: do_list called recursively when the recursive flag is true\n");
519 do_list_recurse = rec;
525 init_do_list_queue();
526 add_to_do_list_queue(mask);
528 while (! do_list_queue_empty())
531 * Need to copy head so that it doesn't become
532 * invalid inside the call to cli_list. This
533 * would happen if the list were expanded
535 * Fix from E. Jay Berkenbilt (ejb@ql.org)
538 pstrcpy(head, do_list_queue_head());
539 cli_list(cli, head, attribute, do_list_helper, NULL);
540 remove_do_list_queue_head();
541 if ((! do_list_queue_empty()) && (fn == display_finfo))
543 char* next_file = do_list_queue_head();
545 if ((strlen(next_file) >= 2) &&
546 (next_file[strlen(next_file) - 1] == '*') &&
547 (next_file[strlen(next_file) - 2] == '\\'))
549 save_ch = next_file +
550 strlen(next_file) - 2;
553 d_printf("\n%s\n",next_file);
563 if (cli_list(cli, mask, attribute, do_list_helper, NULL) == -1)
565 d_printf("%s listing %s\n", cli_errstr(cli), mask);
570 reset_do_list_queue();
573 /****************************************************************************
574 get a directory listing
575 ****************************************************************************/
576 static int cmd_dir(void)
578 uint16 attribute = aDIR | aSYSTEM | aHIDDEN;
585 pstrcpy(mask,cur_dir);
586 if(mask[strlen(mask)-1]!='\\')
589 if (next_token_nr(NULL,buf,NULL,sizeof(buf))) {
600 do_list(mask, attribute, display_finfo, recurse, True);
604 DEBUG(3, ("Total bytes listed: %.0f\n", dir_total));
610 /****************************************************************************
611 get a directory listing
612 ****************************************************************************/
613 static int cmd_du(void)
615 uint16 attribute = aDIR | aSYSTEM | aHIDDEN;
622 pstrcpy(mask,cur_dir);
623 if(mask[strlen(mask)-1]!='\\')
626 if (next_token_nr(NULL,buf,NULL,sizeof(buf))) {
636 do_list(mask, attribute, do_du, recurse, True);
640 d_printf("Total number of bytes: %.0f\n", dir_total);
646 /****************************************************************************
647 get a file from rname to lname
648 ****************************************************************************/
649 static int do_get(char *rname,char *lname)
652 BOOL newhandle = False;
654 struct timeval tp_start;
655 int read_size = io_bufsize;
661 GetTimeOfDay(&tp_start);
667 fnum = cli_open(cli, rname, O_RDONLY, DENY_NONE);
670 d_printf("%s opening remote file %s\n",cli_errstr(cli),rname);
674 if(!strcmp(lname,"-")) {
675 handle = fileno(stdout);
677 handle = sys_open(lname,O_WRONLY|O_CREAT|O_TRUNC,0644);
681 d_printf("Error opening local file %s\n",lname);
686 if (!cli_qfileinfo(cli, fnum,
687 &attr, &size, NULL, NULL, NULL, NULL, NULL) &&
688 !cli_getattrE(cli, fnum,
689 &attr, &size, NULL, NULL, NULL)) {
690 d_printf("getattrib: %s\n",cli_errstr(cli));
694 DEBUG(2,("getting file %s of size %.0f as %s ",
695 lname, (double)size, lname));
697 if(!(data = (char *)malloc(read_size))) {
698 d_printf("malloc fail for size %d\n", read_size);
699 cli_close(cli, fnum);
704 int n = cli_read(cli, fnum, data, nread, read_size);
708 if (writefile(handle,data, n) != n) {
709 d_printf("Error writing local file\n");
718 DEBUG (0, ("Short read when getting file %s. Only got %ld bytes.\n",
719 rname, (long)nread));
726 if (!cli_close(cli, fnum)) {
727 d_printf("Error %s closing remote file\n",cli_errstr(cli));
735 if (archive_level >= 2 && (attr & aARCH)) {
736 cli_setatr(cli, rname, attr & ~(uint16)aARCH, 0);
740 struct timeval tp_end;
743 GetTimeOfDay(&tp_end);
745 (tp_end.tv_sec - tp_start.tv_sec)*1000 +
746 (tp_end.tv_usec - tp_start.tv_usec)/1000;
747 get_total_time_ms += this_time;
748 get_total_size += nread;
750 DEBUG(2,("(%3.1f kb/s) (average %3.1f kb/s)\n",
751 nread / (1.024*this_time + 1.0e-4),
752 get_total_size / (1.024*get_total_time_ms)));
759 /****************************************************************************
761 ****************************************************************************/
762 static int cmd_get(void)
768 pstrcpy(rname,cur_dir);
771 p = rname + strlen(rname);
773 if (!next_token_nr(NULL,p,NULL,sizeof(rname)-strlen(rname))) {
774 d_printf("get <filename>\n");
778 dos_clean_name(rname);
780 next_token_nr(NULL,lname,NULL,sizeof(lname));
782 return do_get(rname, lname);
786 /****************************************************************************
787 do a mget operation on one file
788 ****************************************************************************/
789 static void do_mget(file_info *finfo)
793 pstring saved_curdir;
796 if (strequal(finfo->name,".") || strequal(finfo->name,".."))
800 d_printf("mget aborted\n");
804 if (finfo->mode & aDIR)
805 slprintf(quest,sizeof(pstring)-1,
806 "Get directory %s? ",finfo->name);
808 slprintf(quest,sizeof(pstring)-1,
809 "Get file %s? ",finfo->name);
811 if (prompt && !yesno(quest)) return;
813 if (!(finfo->mode & aDIR)) {
814 pstrcpy(rname,cur_dir);
815 pstrcat(rname,finfo->name);
816 do_get(rname,finfo->name);
820 /* handle directories */
821 pstrcpy(saved_curdir,cur_dir);
823 pstrcat(cur_dir,finfo->name);
824 pstrcat(cur_dir,"\\");
826 unix_format(finfo->name);
828 strlower(finfo->name);
830 if (!directory_exist(finfo->name,NULL) &&
831 mkdir(finfo->name,0777) != 0) {
832 d_printf("failed to create directory %s\n",finfo->name);
833 pstrcpy(cur_dir,saved_curdir);
837 if (chdir(finfo->name) != 0) {
838 d_printf("failed to chdir to directory %s\n",finfo->name);
839 pstrcpy(cur_dir,saved_curdir);
843 pstrcpy(mget_mask,cur_dir);
844 pstrcat(mget_mask,"*");
846 do_list(mget_mask, aSYSTEM | aHIDDEN | aDIR,do_mget,False, True);
848 pstrcpy(cur_dir,saved_curdir);
852 /****************************************************************************
853 view the file using the pager
854 ****************************************************************************/
855 static int cmd_more(void)
857 fstring rname,lname,pager_cmd;
862 fstrcpy(rname,cur_dir);
865 slprintf(lname,sizeof(lname)-1, "%s/smbmore.XXXXXX",tmpdir());
866 fd = smb_mkstemp(lname);
868 d_printf("failed to create temporary file for more\n");
873 if (!next_token_nr(NULL,rname+strlen(rname),NULL,sizeof(rname)-strlen(rname))) {
874 d_printf("more <filename>\n");
878 dos_clean_name(rname);
880 rc = do_get(rname,lname);
882 pager=getenv("PAGER");
884 slprintf(pager_cmd,sizeof(pager_cmd)-1,
885 "%s %s",(pager? pager:PAGER), lname);
894 /****************************************************************************
896 ****************************************************************************/
897 static int cmd_mget(void)
899 uint16 attribute = aSYSTEM | aHIDDEN;
911 while (next_token_nr(NULL,p,NULL,sizeof(buf))) {
912 pstrcpy(mget_mask,cur_dir);
913 if(mget_mask[strlen(mget_mask)-1]!='\\')
914 pstrcat(mget_mask,"\\");
917 pstrcpy(mget_mask,p);
919 pstrcat(mget_mask,p);
920 do_list(mget_mask, attribute,do_mget,False,True);
924 pstrcpy(mget_mask,cur_dir);
925 if(mget_mask[strlen(mget_mask)-1]!='\\')
926 pstrcat(mget_mask,"\\");
927 pstrcat(mget_mask,"*");
928 do_list(mget_mask, attribute,do_mget,False,True);
935 /****************************************************************************
936 make a directory of name "name"
937 ****************************************************************************/
938 static BOOL do_mkdir(char *name)
940 if (!cli_mkdir(cli, name)) {
941 d_printf("%s making remote directory %s\n",
942 cli_errstr(cli),name);
950 /****************************************************************************
952 ****************************************************************************/
953 static int cmd_quit(void)
960 /****************************************************************************
962 ****************************************************************************/
963 static int cmd_mkdir(void)
969 pstrcpy(mask,cur_dir);
971 if (!next_token_nr(NULL,p,NULL,sizeof(buf))) {
973 d_printf("mkdir <dirname>\n");
984 trim_string(ddir,".",NULL);
985 p = strtok(ddir,"/\\");
988 if (!cli_chkpath(cli, ddir2)) {
992 p = strtok(NULL,"/\\");
1002 /****************************************************************************
1004 ****************************************************************************/
1005 static int do_put(char *rname,char *lname)
1011 int maxwrite=io_bufsize;
1014 struct timeval tp_start;
1015 GetTimeOfDay(&tp_start);
1017 fnum = cli_open(cli, rname, O_RDWR|O_CREAT|O_TRUNC, DENY_NONE);
1020 d_printf("%s opening remote file %s\n",cli_errstr(cli),rname);
1024 /* allow files to be piped into smbclient
1025 jdblair 24.jun.98 */
1026 if (!strcmp(lname, "-")) {
1028 /* size of file is not known */
1030 f = x_fopen(lname,O_RDONLY, 0);
1034 d_printf("Error opening local file %s\n",lname);
1039 DEBUG(1,("putting file %s as %s ",lname,
1042 buf = (char *)malloc(maxwrite);
1044 d_printf("ERROR: Not enough memory!\n");
1047 while (!x_feof(f)) {
1051 if ((n = readfile(buf,n,f)) < 1) {
1052 if((n == 0) && x_feof(f))
1053 break; /* Empty local file. */
1055 d_printf("Error reading local file: %s\n", strerror(errno));
1060 ret = cli_write(cli, fnum, 0, buf, nread, n);
1063 d_printf("Error writing file: %s\n", cli_errstr(cli));
1071 if (!cli_close(cli, fnum)) {
1072 d_printf("%s closing remote file %s\n",cli_errstr(cli),rname);
1083 struct timeval tp_end;
1086 GetTimeOfDay(&tp_end);
1088 (tp_end.tv_sec - tp_start.tv_sec)*1000 +
1089 (tp_end.tv_usec - tp_start.tv_usec)/1000;
1090 put_total_time_ms += this_time;
1091 put_total_size += nread;
1093 DEBUG(1,("(%3.1f kb/s) (average %3.1f kb/s)\n",
1094 nread / (1.024*this_time + 1.0e-4),
1095 put_total_size / (1.024*put_total_time_ms)));
1108 /****************************************************************************
1110 ****************************************************************************/
1111 static int cmd_put(void)
1118 pstrcpy(rname,cur_dir);
1119 pstrcat(rname,"\\");
1121 if (!next_token_nr(NULL,p,NULL,sizeof(buf))) {
1122 d_printf("put <filename>\n");
1127 if (next_token_nr(NULL,p,NULL,sizeof(buf)))
1130 pstrcat(rname,lname);
1132 dos_clean_name(rname);
1136 /* allow '-' to represent stdin
1137 jdblair, 24.jun.98 */
1138 if (!file_exist(lname,&st) &&
1139 (strcmp(lname,"-"))) {
1140 d_printf("%s does not exist\n",lname);
1145 return do_put(rname,lname);
1148 /*************************************
1150 *************************************/
1152 static struct file_list {
1153 struct file_list *prev, *next;
1158 /****************************************************************************
1159 Free a file_list structure
1160 ****************************************************************************/
1162 static void free_file_list (struct file_list * list)
1164 struct file_list *tmp;
1169 DLIST_REMOVE(list, list);
1170 SAFE_FREE(tmp->file_path);
1175 /****************************************************************************
1176 seek in a directory/file list until you get something that doesn't start with
1178 ****************************************************************************/
1179 static BOOL seek_list(struct file_list *list, char *name)
1182 trim_string(list->file_path,"./","\n");
1183 if (strncmp(list->file_path, name, strlen(name)) != 0) {
1192 /****************************************************************************
1193 set the file selection mask
1194 ****************************************************************************/
1195 static int cmd_select(void)
1197 pstrcpy(fileselection,"");
1198 next_token_nr(NULL,fileselection,NULL,sizeof(fileselection));
1203 /****************************************************************************
1204 Recursive file matching function act as find
1205 match must be always set to True when calling this function
1206 ****************************************************************************/
1207 static int file_find(struct file_list **list, const char *directory,
1208 const char *expression, BOOL match)
1211 struct file_list *entry;
1212 struct stat statbuf;
1218 dir = opendir(directory);
1219 if (!dir) return -1;
1221 while ((dname = readdirname(dir))) {
1222 if (!strcmp("..", dname)) continue;
1223 if (!strcmp(".", dname)) continue;
1225 if (asprintf(&path, "%s/%s", directory, dname) <= 0) {
1230 if (!match || !gen_fnmatch(expression, dname)) {
1232 ret = stat(path, &statbuf);
1234 if (S_ISDIR(statbuf.st_mode)) {
1236 ret = file_find(list, path, expression, False);
1239 d_printf("file_find: cannot stat file %s\n", path);
1248 entry = (struct file_list *) malloc(sizeof (struct file_list));
1250 d_printf("Out of memory in file_find\n");
1254 entry->file_path = path;
1255 entry->isdir = isdir;
1256 DLIST_ADD(*list, entry);
1266 /****************************************************************************
1268 ****************************************************************************/
1269 static int cmd_mput(void)
1274 while (next_token_nr(NULL,p,NULL,sizeof(buf))) {
1276 struct file_list *temp_list;
1277 char *quest, *lname, *rname;
1281 ret = file_find(&file_list, ".", p, True);
1283 free_file_list(file_list);
1291 for (temp_list = file_list; temp_list;
1292 temp_list = temp_list->next) {
1295 if (asprintf(&lname, "%s/", temp_list->file_path) <= 0)
1297 trim_string(lname, "./", "/");
1299 /* check if it's a directory */
1300 if (temp_list->isdir) {
1301 /* if (!recurse) continue; */
1304 asprintf(&quest, "Put directory %s? ", lname);
1305 if (prompt && !yesno(quest)) { /* No */
1306 /* Skip the directory */
1307 lname[strlen(lname)-1] = '/';
1308 if (!seek_list(temp_list, lname))
1312 asprintf(&rname, "%s%s", cur_dir, lname);
1314 if (!cli_chkpath(cli, rname) &&
1316 DEBUG (0, ("Unable to make dir, skipping..."));
1317 /* Skip the directory */
1318 lname[strlen(lname)-1] = '/';
1319 if (!seek_list(temp_list, lname))
1326 asprintf(&quest,"Put file %s? ", lname);
1327 if (prompt && !yesno(quest)) /* No */
1332 asprintf(&rname, "%s%s", cur_dir, lname);
1337 do_put(rname, lname);
1339 free_file_list(file_list);
1349 /****************************************************************************
1351 ****************************************************************************/
1352 static int do_cancel(int job)
1354 if (cli_printjob_del(cli, job)) {
1355 d_printf("Job %d cancelled\n",job);
1358 d_printf("Error cancelling job %d : %s\n",job,cli_errstr(cli));
1364 /****************************************************************************
1366 ****************************************************************************/
1367 static int cmd_cancel(void)
1372 if (!next_token_nr(NULL,buf,NULL,sizeof(buf))) {
1373 d_printf("cancel <jobid> ...\n");
1379 } while (next_token_nr(NULL,buf,NULL,sizeof(buf)));
1385 /****************************************************************************
1387 ****************************************************************************/
1388 static int cmd_print(void)
1394 if (!next_token_nr(NULL,lname,NULL, sizeof(lname))) {
1395 d_printf("print <filename>\n");
1399 pstrcpy(rname,lname);
1400 p = strrchr_m(rname,'/');
1402 slprintf(rname, sizeof(rname)-1, "%s-%d", p+1, (int)sys_getpid());
1405 if (strequal(lname,"-")) {
1406 slprintf(rname, sizeof(rname)-1, "stdin-%d", (int)sys_getpid());
1409 return do_put(rname, lname);
1413 /****************************************************************************
1414 show a print queue entry
1415 ****************************************************************************/
1416 static void queue_fn(struct print_job_info *p)
1418 d_printf("%-6d %-9d %s\n", (int)p->id, (int)p->size, p->name);
1421 /****************************************************************************
1423 ****************************************************************************/
1424 static int cmd_queue(void)
1426 cli_print_queue(cli, queue_fn);
1431 /****************************************************************************
1433 ****************************************************************************/
1434 static void do_del(file_info *finfo)
1438 pstrcpy(mask,cur_dir);
1439 pstrcat(mask,finfo->name);
1441 if (finfo->mode & aDIR)
1444 if (!cli_unlink(cli, mask)) {
1445 d_printf("%s deleting remote file %s\n",cli_errstr(cli),mask);
1449 /****************************************************************************
1451 ****************************************************************************/
1452 static int cmd_del(void)
1456 uint16 attribute = aSYSTEM | aHIDDEN;
1461 pstrcpy(mask,cur_dir);
1463 if (!next_token_nr(NULL,buf,NULL,sizeof(buf))) {
1464 d_printf("del <filename>\n");
1469 do_list(mask, attribute,do_del,False,False);
1474 /****************************************************************************
1475 ****************************************************************************/
1476 static int cmd_open(void)
1481 pstrcpy(mask,cur_dir);
1483 if (!next_token_nr(NULL,buf,NULL,sizeof(buf))) {
1484 d_printf("open <filename>\n");
1489 cli_open(cli, mask, O_RDWR, DENY_ALL);
1495 /****************************************************************************
1497 ****************************************************************************/
1498 static int cmd_rmdir(void)
1503 pstrcpy(mask,cur_dir);
1505 if (!next_token_nr(NULL,buf,NULL,sizeof(buf))) {
1506 d_printf("rmdir <dirname>\n");
1511 if (!cli_rmdir(cli, mask)) {
1512 d_printf("%s removing remote directory file %s\n",
1513 cli_errstr(cli),mask);
1519 /****************************************************************************
1521 ****************************************************************************/
1522 static int cmd_rename(void)
1527 pstrcpy(src,cur_dir);
1528 pstrcpy(dest,cur_dir);
1530 if (!next_token_nr(NULL,buf,NULL,sizeof(buf)) ||
1531 !next_token_nr(NULL,buf2,NULL, sizeof(buf2))) {
1532 d_printf("rename <src> <dest>\n");
1539 if (!cli_rename(cli, src, dest)) {
1540 d_printf("%s renaming files\n",cli_errstr(cli));
1548 /****************************************************************************
1549 toggle the prompt flag
1550 ****************************************************************************/
1551 static int cmd_prompt(void)
1554 DEBUG(2,("prompting is now %s\n",prompt?"on":"off"));
1560 /****************************************************************************
1561 set the newer than time
1562 ****************************************************************************/
1563 static int cmd_newer(void)
1567 SMB_STRUCT_STAT sbuf;
1569 ok = next_token_nr(NULL,buf,NULL,sizeof(buf));
1570 if (ok && (sys_stat(buf,&sbuf) == 0)) {
1571 newer_than = sbuf.st_mtime;
1572 DEBUG(1,("Getting files newer than %s",
1573 asctime(LocalTime(&newer_than))));
1578 if (ok && newer_than == 0) {
1579 d_printf("Error setting newer-than time\n");
1586 /****************************************************************************
1587 set the archive level
1588 ****************************************************************************/
1589 static int cmd_archive(void)
1593 if (next_token_nr(NULL,buf,NULL,sizeof(buf))) {
1594 archive_level = atoi(buf);
1596 d_printf("Archive level is %d\n",archive_level);
1601 /****************************************************************************
1602 toggle the lowercaseflag
1603 ****************************************************************************/
1604 static int cmd_lowercase(void)
1606 lowercase = !lowercase;
1607 DEBUG(2,("filename lowercasing is now %s\n",lowercase?"on":"off"));
1615 /****************************************************************************
1616 toggle the recurse flag
1617 ****************************************************************************/
1618 static int cmd_recurse(void)
1621 DEBUG(2,("directory recursion is now %s\n",recurse?"on":"off"));
1626 /****************************************************************************
1627 toggle the translate flag
1628 ****************************************************************************/
1629 static int cmd_translate(void)
1631 translation = !translation;
1632 DEBUG(2,("CR/LF<->LF and print text translation now %s\n",
1633 translation?"on":"off"));
1639 /****************************************************************************
1640 do a printmode command
1641 ****************************************************************************/
1642 static int cmd_printmode(void)
1647 if (next_token_nr(NULL,buf,NULL,sizeof(buf))) {
1648 if (strequal(buf,"text")) {
1651 if (strequal(buf,"graphics"))
1654 printmode = atoi(buf);
1661 fstrcpy(mode,"text");
1664 fstrcpy(mode,"graphics");
1667 slprintf(mode,sizeof(mode)-1,"%d",printmode);
1671 DEBUG(2,("the printmode is now %s\n",mode));
1676 /****************************************************************************
1678 ****************************************************************************/
1679 static int cmd_lcd(void)
1684 if (next_token_nr(NULL,buf,NULL,sizeof(buf)))
1686 DEBUG(2,("the local directory is now %s\n",sys_getwd(d)));
1691 /****************************************************************************
1693 ****************************************************************************/
1694 static void browse_fn(const char *name, uint32 m,
1695 const char *comment, void *state)
1703 case STYPE_DISKTREE:
1704 fstrcpy(typestr,"Disk"); break;
1706 fstrcpy(typestr,"Printer"); break;
1708 fstrcpy(typestr,"Device"); break;
1710 fstrcpy(typestr,"IPC"); break;
1712 d_printf("\t%-15.15s%-10.10s%s\n",
1713 name,typestr,comment);
1717 /****************************************************************************
1718 try and browse available connections on a host
1719 ****************************************************************************/
1720 static BOOL browse_host(BOOL sort)
1724 d_printf("\n\tSharename Type Comment\n");
1725 d_printf("\t--------- ---- -------\n");
1727 if((ret = cli_RNetShareEnum(cli, browse_fn, NULL)) == -1)
1728 d_printf("Error returning browse list: %s\n", cli_errstr(cli));
1733 /****************************************************************************
1735 ****************************************************************************/
1736 static void server_fn(const char *name, uint32 m,
1737 const char *comment, void *state)
1739 d_printf("\t%-16.16s %s\n", name, comment);
1742 /****************************************************************************
1743 try and browse available connections on a host
1744 ****************************************************************************/
1745 static BOOL list_servers(char *wk_grp)
1747 if (!cli->server_domain) return False;
1749 d_printf("\n\tServer Comment\n");
1750 d_printf("\t--------- -------\n");
1752 cli_NetServerEnum(cli, cli->server_domain, SV_TYPE_ALL, server_fn, NULL);
1754 d_printf("\n\tWorkgroup Master\n");
1755 d_printf("\t--------- -------\n");
1757 cli_NetServerEnum(cli, cli->server_domain, SV_TYPE_DOMAIN_ENUM, server_fn, NULL);
1761 /* Some constants for completing filename arguments */
1763 #define COMPL_NONE 0 /* No completions */
1764 #define COMPL_REMOTE 1 /* Complete remote filename */
1765 #define COMPL_LOCAL 2 /* Complete local filename */
1767 /* This defines the commands supported by this client.
1768 * NOTE: The "!" must be the last one in the list because it's fn pointer
1769 * field is NULL, and NULL in that field is used in process_tok()
1770 * (below) to indicate the end of the list. crh
1777 char compl_args[2]; /* Completion argument info */
1780 {"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}},
1781 {"blocksize",cmd_block,"blocksize <number> (default 20)",{COMPL_NONE,COMPL_NONE}},
1782 {"cancel",cmd_cancel,"<jobid> cancel a print queue entry",{COMPL_NONE,COMPL_NONE}},
1783 {"cd",cmd_cd,"[directory] change/report the remote directory",{COMPL_REMOTE,COMPL_NONE}},
1784 {"del",cmd_del,"<mask> delete all matching files",{COMPL_REMOTE,COMPL_NONE}},
1785 {"dir",cmd_dir,"<mask> list the contents of the current directory",{COMPL_REMOTE,COMPL_NONE}},
1786 {"du",cmd_du,"<mask> computes the total size of the current directory",{COMPL_REMOTE,COMPL_NONE}},
1787 {"exit",cmd_quit,"logoff the server",{COMPL_NONE,COMPL_NONE}},
1788 {"get",cmd_get,"<remote name> [local name] get a file",{COMPL_REMOTE,COMPL_LOCAL}},
1789 {"help",cmd_help,"[command] give help on a command",{COMPL_NONE,COMPL_NONE}},
1790 {"history",cmd_history,"displays the command history",{COMPL_NONE,COMPL_NONE}},
1791 {"lcd",cmd_lcd,"[directory] change/report the local current working directory",{COMPL_LOCAL,COMPL_NONE}},
1792 {"lowercase",cmd_lowercase,"toggle lowercasing of filenames for get",{COMPL_NONE,COMPL_NONE}},
1793 {"ls",cmd_dir,"<mask> list the contents of the current directory",{COMPL_REMOTE,COMPL_NONE}},
1794 {"mask",cmd_select,"<mask> mask all filenames against this",{COMPL_REMOTE,COMPL_NONE}},
1795 {"md",cmd_mkdir,"<directory> make a directory",{COMPL_NONE,COMPL_NONE}},
1796 {"mget",cmd_mget,"<mask> get all the matching files",{COMPL_REMOTE,COMPL_NONE}},
1797 {"mkdir",cmd_mkdir,"<directory> make a directory",{COMPL_NONE,COMPL_NONE}},
1798 {"more",cmd_more,"<remote name> view a remote file with your pager",{COMPL_REMOTE,COMPL_NONE}},
1799 {"mput",cmd_mput,"<mask> put all matching files",{COMPL_REMOTE,COMPL_NONE}},
1800 {"newer",cmd_newer,"<file> only mget files newer than the specified local file",{COMPL_LOCAL,COMPL_NONE}},
1801 {"open",cmd_open,"<mask> open a file",{COMPL_REMOTE,COMPL_NONE}},
1802 {"print",cmd_print,"<file name> print a file",{COMPL_NONE,COMPL_NONE}},
1803 {"printmode",cmd_printmode,"<graphics or text> set the print mode",{COMPL_NONE,COMPL_NONE}},
1804 {"prompt",cmd_prompt,"toggle prompting for filenames for mget and mput",{COMPL_NONE,COMPL_NONE}},
1805 {"put",cmd_put,"<local name> [remote name] put a file",{COMPL_LOCAL,COMPL_REMOTE}},
1806 {"pwd",cmd_pwd,"show current remote directory (same as 'cd' with no args)",{COMPL_NONE,COMPL_NONE}},
1807 {"q",cmd_quit,"logoff the server",{COMPL_NONE,COMPL_NONE}},
1808 {"queue",cmd_queue,"show the print queue",{COMPL_NONE,COMPL_NONE}},
1809 {"quit",cmd_quit,"logoff the server",{COMPL_NONE,COMPL_NONE}},
1810 {"rd",cmd_rmdir,"<directory> remove a directory",{COMPL_NONE,COMPL_NONE}},
1811 {"recurse",cmd_recurse,"toggle directory recursion for mget and mput",{COMPL_NONE,COMPL_NONE}},
1812 {"rename",cmd_rename,"<src> <dest> rename some files",{COMPL_REMOTE,COMPL_REMOTE}},
1813 {"rm",cmd_del,"<mask> delete all matching files",{COMPL_REMOTE,COMPL_NONE}},
1814 {"rmdir",cmd_rmdir,"<directory> remove a directory",{COMPL_NONE,COMPL_NONE}},
1815 {"setmode",cmd_setmode,"filename <setmode string> change modes of file",{COMPL_REMOTE,COMPL_NONE}},
1816 {"tar",cmd_tar,"tar <c|x>[IXFqbgNan] current directory to/from <file name>",{COMPL_NONE,COMPL_NONE}},
1817 {"tarmode",cmd_tarmode,"<full|inc|reset|noreset> tar's behaviour towards archive bits",{COMPL_NONE,COMPL_NONE}},
1818 {"translate",cmd_translate,"toggle text translation for printing",{COMPL_NONE,COMPL_NONE}},
1819 {"?",cmd_help,"[command] give help on a command",{COMPL_NONE,COMPL_NONE}},
1820 {"!",NULL,"run a shell command on the local system",{COMPL_NONE,COMPL_NONE}},
1821 {"",NULL,NULL,{COMPL_NONE,COMPL_NONE}}
1825 /*******************************************************************
1826 lookup a command string in the list of commands, including
1828 ******************************************************************/
1829 static int process_tok(fstring tok)
1831 int i = 0, matches = 0;
1833 int tok_len = strlen(tok);
1835 while (commands[i].fn != NULL) {
1836 if (strequal(commands[i].name,tok)) {
1840 } else if (strnequal(commands[i].name, tok, tok_len)) {
1849 else if (matches == 1)
1855 /****************************************************************************
1857 ****************************************************************************/
1858 static int cmd_help(void)
1863 if (next_token_nr(NULL,buf,NULL,sizeof(buf))) {
1864 if ((i = process_tok(buf)) >= 0)
1865 d_printf("HELP %s:\n\t%s\n\n",commands[i].name,commands[i].description);
1867 while (commands[i].description) {
1868 for (j=0; commands[i].description && (j<5); j++) {
1869 d_printf("%-15s",commands[i].name);
1878 /****************************************************************************
1879 process a -c command string
1880 ****************************************************************************/
1881 static int process_command_string(char *cmd)
1887 while (cmd[0] != '\0') {
1892 if ((p = strchr_m(cmd, ';')) == 0) {
1893 strncpy(line, cmd, 999);
1897 if (p - cmd > 999) p = cmd + 999;
1898 strncpy(line, cmd, p - cmd);
1899 line[p - cmd] = '\0';
1903 /* and get the first part of the command */
1905 if (!next_token_nr(&ptr,tok,NULL,sizeof(tok))) continue;
1907 if ((i = process_tok(tok)) >= 0) {
1908 rc = commands[i].fn();
1909 } else if (i == -2) {
1910 d_printf("%s: command abbreviation ambiguous\n",tok);
1912 d_printf("%s: command not found\n",tok);
1919 /****************************************************************************
1920 handle completion of commands for readline
1921 ****************************************************************************/
1922 static char **completion_fn(char *text, int start, int end)
1924 #define MAX_COMPLETIONS 100
1928 /* for words not at the start of the line fallback to filename completion */
1929 if (start) return NULL;
1931 matches = (char **)malloc(sizeof(matches[0])*MAX_COMPLETIONS);
1932 if (!matches) return NULL;
1934 matches[count++] = strdup(text);
1935 if (!matches[0]) return NULL;
1937 for (i=0;commands[i].fn && count < MAX_COMPLETIONS-1;i++) {
1938 if (strncmp(text, commands[i].name, strlen(text)) == 0) {
1939 matches[count] = strdup(commands[i].name);
1940 if (!matches[count]) return NULL;
1946 SAFE_FREE(matches[0]);
1947 matches[0] = strdup(matches[1]);
1949 matches[count] = NULL;
1954 /****************************************************************************
1955 make sure we swallow keepalives during idle time
1956 ****************************************************************************/
1957 static void readline_callback(void)
1960 struct timeval timeout;
1961 static time_t last_t;
1966 if (t - last_t < 5) return;
1972 FD_SET(cli->fd,&fds);
1975 timeout.tv_usec = 0;
1976 sys_select_intr(cli->fd+1,&fds,&timeout);
1978 /* We deliberately use receive_smb instead of
1979 client_receive_smb as we want to receive
1980 session keepalives and then drop them here.
1982 if (FD_ISSET(cli->fd,&fds)) {
1983 receive_smb(cli->fd,cli->inbuf,0);
1987 cli_chkpath(cli, "\\");
1991 /****************************************************************************
1992 process commands on stdin
1993 ****************************************************************************/
1994 static void process_stdin(void)
2005 /* display a prompt */
2006 slprintf(the_prompt, sizeof(the_prompt)-1, "smb: %s> ", cur_dir);
2007 cline = smb_readline(the_prompt, readline_callback, completion_fn);
2011 pstrcpy(line, cline);
2013 /* special case - first char is ! */
2019 /* and get the first part of the command */
2021 if (!next_token_nr(&ptr,tok,NULL,sizeof(tok))) continue;
2023 if ((i = process_tok(tok)) >= 0) {
2025 } else if (i == -2) {
2026 d_printf("%s: command abbreviation ambiguous\n",tok);
2028 d_printf("%s: command not found\n",tok);
2034 /*****************************************************
2035 return a connection to a server
2036 *******************************************************/
2037 struct cli_state *do_connect(const char *server, const char *share)
2039 struct cli_state *c;
2040 struct nmb_name called, calling;
2041 const char *server_n;
2043 extern struct in_addr ipzero;
2044 fstring servicename;
2047 /* make a copy so we don't modify the global string 'service' */
2048 safe_strcpy(servicename, share, sizeof(servicename)-1);
2049 sharename = servicename;
2050 if (*sharename == '\\') {
2051 server = sharename+2;
2052 sharename = strchr_m(server,'\\');
2053 if (!sharename) return NULL;
2062 make_nmb_name(&calling, global_myname, 0x0);
2063 make_nmb_name(&called , server, name_type);
2067 if (have_ip) ip = dest_ip;
2069 /* have to open a new connection */
2070 if (!(c=cli_initialise(NULL)) || (cli_set_port(c, port) != port) ||
2071 !cli_connect(c, server_n, &ip)) {
2072 d_printf("Connection to %s failed\n", server_n);
2076 c->protocol = max_protocol;
2078 if (!cli_session_request(c, &calling, &called)) {
2080 d_printf("session request to %s failed (%s)\n",
2081 called.name, cli_errstr(c));
2084 if ((p=strchr_m(called.name, '.'))) {
2088 if (strcmp(called.name, "*SMBSERVER")) {
2089 make_nmb_name(&called , "*SMBSERVER", 0x20);
2095 DEBUG(4,(" session request ok\n"));
2097 if (!cli_negprot(c)) {
2098 d_printf("protocol negotiation failed\n");
2105 char *pass = getpass("Password: ");
2107 pstrcpy(password, pass);
2111 if (!cli_session_setup(c, username,
2112 password, strlen(password),
2113 password, strlen(password),
2115 /* if a password was not supplied then try again with a null username */
2116 if (password[0] || !username[0] ||
2117 !cli_session_setup(c, "", "", 0, "", 0, workgroup)) {
2118 d_printf("session setup failed: %s\n", cli_errstr(c));
2123 d_printf("Anonymous login successful\n");
2127 * These next two lines are needed to emulate
2128 * old client behaviour for people who have
2129 * scripts based on client output.
2130 * QUESTION ? Do we want to have a 'client compatibility
2131 * mode to turn these on/off ? JRA.
2134 if (*c->server_domain || *c->server_os || *c->server_type){
2135 DEBUG(1,("Domain=[%s] OS=[%s] Server=[%s]\n",
2136 c->server_domain,c->server_os,c->server_type));
2139 DEBUG(4,(" session setup ok\n"));
2141 if (!cli_send_tconX(c, sharename, "?????",
2142 password, strlen(password)+1)) {
2143 d_printf("tree connect failed: %s\n", cli_errstr(c));
2149 DEBUG(4,(" tconx ok\n"));
2155 /****************************************************************************
2156 process commands from the client
2157 ****************************************************************************/
2158 static int process(char *base_directory)
2162 cli = do_connect(desthost, service);
2167 if (*base_directory) do_cd(base_directory);
2170 rc = process_command_string(cmdstr);
2179 /****************************************************************************
2180 usage on the program
2181 ****************************************************************************/
2182 static void usage(char *pname)
2184 d_printf("Usage: %s service <password> [options]", pname);
2186 d_printf("\nVersion %s\n",VERSION);
2187 d_printf("\t-s smb.conf pathname to smb.conf file\n");
2188 d_printf("\t-O socket_options socket options to use\n");
2189 d_printf("\t-R name resolve order use these name resolution services only\n");
2190 d_printf("\t-M host send a winpopup message to the host\n");
2191 d_printf("\t-i scope use this NetBIOS scope\n");
2192 d_printf("\t-N don't ask for a password\n");
2193 d_printf("\t-n netbios name. Use this name as my netbios name\n");
2194 d_printf("\t-d debuglevel set the debuglevel\n");
2195 d_printf("\t-P connect to service as a printer\n");
2196 d_printf("\t-p port connect to the specified port\n");
2197 d_printf("\t-l log basename. Basename for log/debug files\n");
2198 d_printf("\t-h Print this help message.\n");
2199 d_printf("\t-I dest IP use this IP to connect to\n");
2200 d_printf("\t-E write messages to stderr instead of stdout\n");
2201 d_printf("\t-U username set the network username\n");
2202 d_printf("\t-L host get a list of shares available on a host\n");
2203 d_printf("\t-t terminal code terminal i/o code {sjis|euc|jis7|jis8|junet|hex}\n");
2204 d_printf("\t-m max protocol set the max protocol level\n");
2205 d_printf("\t-A filename get the credentials from a file\n");
2206 d_printf("\t-W workgroup set the workgroup name\n");
2207 d_printf("\t-T<c|x>IXFqgbNan command line tar\n");
2208 d_printf("\t-D directory start from directory\n");
2209 d_printf("\t-c command string execute semicolon separated commands\n");
2210 d_printf("\t-b xmit/send buffer changes the transmit/send buffer (default: 65520)\n");
2215 /****************************************************************************
2216 get a password from a a file or file descriptor
2218 ****************************************************************************/
2219 static void get_password_file(void)
2223 BOOL close_it = False;
2227 if ((p = getenv("PASSWD_FD")) != NULL) {
2228 pstrcpy(spec, "descriptor ");
2230 sscanf(p, "%d", &fd);
2232 } else if ((p = getenv("PASSWD_FILE")) != NULL) {
2233 fd = sys_open(p, O_RDONLY, 0);
2236 fprintf(stderr, "Error opening PASSWD_FILE %s: %s\n",
2237 spec, strerror(errno));
2243 for(p = pass, *p = '\0'; /* ensure that pass is null-terminated */
2244 p && p - pass < sizeof(pass);) {
2245 switch (read(fd, p, 1)) {
2247 if (*p != '\n' && *p != '\0') {
2248 *++p = '\0'; /* advance p, and null-terminate pass */
2253 *p = '\0'; /* null-terminate it, just in case... */
2254 p = NULL; /* then force the loop condition to become false */
2257 fprintf(stderr, "Error reading password from file %s: %s\n",
2258 spec, "empty password\n");
2263 fprintf(stderr, "Error reading password from file %s: %s\n",
2264 spec, strerror(errno));
2268 pstrcpy(password, pass);
2275 /****************************************************************************
2277 ****************************************************************************/
2278 static int do_host_query(char *query_host)
2280 cli = do_connect(query_host, "IPC$");
2285 list_servers(workgroup);
2293 /****************************************************************************
2294 handle a tar operation
2295 ****************************************************************************/
2296 static int do_tar_op(char *base_directory)
2299 cli = do_connect(desthost, service);
2305 if (*base_directory) do_cd(base_directory);
2314 /****************************************************************************
2315 handle a message operation
2316 ****************************************************************************/
2317 static int do_message_op(void)
2320 struct nmb_name called, calling;
2324 make_nmb_name(&calling, global_myname, 0x0);
2325 make_nmb_name(&called , desthost, name_type);
2328 if (have_ip) ip = dest_ip;
2330 if (!(cli=cli_initialise(NULL)) || (cli_set_port(cli, port) != port) || !cli_connect(cli, desthost, &ip)) {
2331 d_printf("Connection to %s failed\n", desthost);
2335 if (!cli_session_request(cli, &calling, &called)) {
2336 d_printf("session request failed\n");
2348 /****************************************************************************
2350 ****************************************************************************/
2351 int main(int argc,char *argv[])
2353 fstring base_directory;
2354 char *pname = argv[0];
2356 extern char *optarg;
2360 BOOL message = False;
2361 extern char tar_type;
2362 static pstring servicesf = CONFIGFILE;
2364 pstring new_name_resolve_order;
2369 pstrcpy(term_code, KANJI);
2375 *base_directory = 0;
2377 *new_name_resolve_order = 0;
2381 setup_logging(pname,True);
2384 * If the -E option is given, be careful not to clobber stdout
2385 * before processing the options. 28.Feb.99, richard@hacom.nl.
2386 * Also pre-parse the -s option to get the service file name.
2389 for (opt = 1; opt < argc; opt++) {
2390 if (strcmp(argv[opt], "-E") == 0)
2392 else if(strncmp(argv[opt], "-s", 2) == 0) {
2393 if(argv[opt][2] != '\0')
2394 pstrcpy(servicesf, &argv[opt][2]);
2395 else if(argv[opt+1] != NULL) {
2397 * At least one more arg left.
2399 pstrcpy(servicesf, argv[opt+1]);
2409 in_client = True; /* Make sure that we tell lp_load we are */
2411 old_debug = DEBUGLEVEL;
2412 if (!lp_load(servicesf,True,False,False)) {
2413 fprintf(stderr, "Can't load %s - run testparm to debug it\n", servicesf);
2415 DEBUGLEVEL = old_debug;
2421 pstrcpy(workgroup,lp_workgroup());
2427 if (getenv("USER")) {
2428 pstrcpy(username,getenv("USER"));
2430 /* modification to support userid%passwd syntax in the USER var
2431 25.Aug.97, jdblair@uab.edu */
2433 if ((p=strchr_m(username,'%'))) {
2435 pstrcpy(password,p+1);
2437 memset(strchr_m(getenv("USER"),'%')+1,'X',strlen(password));
2442 /* modification to support PASSWD environmental var
2443 25.Aug.97, jdblair@uab.edu */
2444 if (getenv("PASSWD")) {
2445 pstrcpy(password,getenv("PASSWD"));
2449 if (getenv("PASSWD_FD") || getenv("PASSWD_FILE")) {
2450 get_password_file();
2454 if (*username == 0 && getenv("LOGNAME")) {
2455 pstrcpy(username,getenv("LOGNAME"));
2459 if (*username == 0) {
2460 pstrcpy(username,"GUEST");
2468 if (*argv[1] != '-') {
2469 pstrcpy(service,argv[1]);
2470 /* Convert any '/' characters in the service name to '\' characters */
2471 string_replace( service, '/','\\');
2475 if (count_chars(service,'\\') < 3) {
2477 d_printf("\n%s: Not enough '\\' characters in service\n",service);
2481 if (argc > 1 && (*argv[1] != '-')) {
2483 pstrcpy(password,argv[1]);
2484 memset(argv[1],'X',strlen(argv[1]));
2491 getopt(argc, argv,"s:O:R:M:i:Nn:d:Pp:l:hI:EU:L:t:m:W:T:D:c:b:A:")) != EOF) {
2494 pstrcpy(servicesf, optarg);
2497 pstrcpy(user_socket_options,optarg);
2500 pstrcpy(new_name_resolve_order, optarg);
2503 name_type = 0x03; /* messages are sent to NetBIOS name type 0x3 */
2504 pstrcpy(desthost,optarg);
2509 extern pstring global_scope;
2510 pstrcpy(global_scope,optarg);
2511 strupper(global_scope);
2518 pstrcpy(global_myname,optarg);
2524 DEBUGLEVEL = atoi(optarg);
2527 /* not needed anymore */
2530 port = atoi(optarg);
2533 slprintf(debugf,sizeof(debugf)-1, "%s.client",optarg);
2541 dest_ip = *interpret_addr2(optarg);
2542 if (zero_ip(dest_ip))
2548 display_set_stderr();
2554 pstrcpy(username,optarg);
2555 if ((lp=strchr_m(username,'%'))) {
2557 pstrcpy(password,lp+1);
2559 memset(strchr_m(optarg,'%')+1,'X',strlen(password));
2569 char *ptr, *val, *param;
2571 if ((auth=x_fopen(optarg, O_RDONLY, 0)) == NULL)
2573 /* fail if we can't open the credentials file */
2574 d_printf("ERROR: Unable to open credentials file!\n");
2578 while (!x_feof(auth))
2580 /* get a line from the file */
2581 if (!x_fgets(buf, sizeof(buf), auth))
2585 if ((len) && (buf[len-1]=='\n'))
2593 /* break up the line into parameter & value.
2594 will need to eat a little whitespace possibly */
2596 if (!(ptr = strchr_m (buf, '=')))
2601 /* eat leading white space */
2602 while ((*val!='\0') && ((*val==' ') || (*val=='\t')))
2605 if (strwicmp("password", param) == 0)
2607 pstrcpy(password, val);
2610 else if (strwicmp("username", param) == 0)
2611 pstrcpy(username, val);
2613 memset(buf, 0, sizeof(buf));
2621 while(*p == '\\' || *p == '/')
2623 pstrcpy(query_host,p);
2626 pstrcpy(term_code, optarg);
2629 max_protocol = interpret_protocol(optarg, max_protocol);
2632 pstrcpy(workgroup,optarg);
2635 if (!tar_parseargs(argc, argv, optarg, optind)) {
2641 pstrcpy(base_directory,optarg);
2647 io_bufsize = MAX(1, atoi(optarg));
2651 printf("########## mangle test code ###########\n");
2659 get_myname((*global_myname)?NULL:global_myname);
2661 if(*new_name_resolve_order)
2662 lp_set_name_resolve_order(new_name_resolve_order);
2664 if (!tar_type && !*query_host && !*service && !message) {
2669 DEBUG( 3, ( "Client started (version %s).\n", VERSION ) );
2673 process_command_string(cmdstr);
2674 return do_tar_op(base_directory);
2677 if ((p=strchr_m(query_host,'#'))) {
2680 sscanf(p, "%x", &name_type);
2684 return do_host_query(query_host);
2688 return do_message_op();
2691 if (process(base_directory)) {