I told Jeremy at the CIFS conference that I would sort the command list
[sfrench/samba-autobuild/.git] / source3 / client / client.c
index 4abb812e89be91247679967e728d20966af776d3..448f4314c814040aa74242bf6c4ee68f7aee473e 100644 (file)
 
 struct cli_state *cli;
 extern BOOL in_client;
+static int port = 0;
 pstring cur_dir = "\\";
 pstring cd_path = "";
 static pstring service;
 static pstring desthost;
 extern pstring global_myname;
-extern pstring myhostname;
 static pstring password;
 static pstring username;
 static pstring workgroup;
 static char *cmdstr;
 static BOOL got_pass;
+static int io_bufsize = 64512;
 extern struct in_addr ipzero;
-extern pstring scope;
 
 static int name_type = 0x20;
-
+static int max_protocol = PROTOCOL_NT1;
 extern pstring user_socket_options;
 
 static int process_tok(fstring tok);
@@ -100,14 +100,10 @@ int put_total_size = 0;
 int put_total_time_ms = 0;
 
 /* totals globals */
-int dir_total = 0;
+static double dir_total;
 
 #define USENMB
 
-#define CNV_LANG(s) dos_to_unix(s,False)
-#define CNV_INPUT(s) unix_to_dos(s,True)
-
-
 /****************************************************************************
 write to a local file with CR/LF->LF translation if appropriate. return the 
 number taken from the buffer. This may not equal the number written.
@@ -139,27 +135,25 @@ static int writefile(int f, char *b, int n)
   read from a file with LF->CR/LF translation if appropriate. return the 
   number read. read approx n bytes.
 ****************************************************************************/
-static int readfile(char *b, int size, int n, FILE *f)
+static int readfile(char *b, int n, XFILE *f)
 {
        int i;
        int c;
 
-       if (!translation || (size != 1))
-               return(fread(b,size,n,f));
+       if (!translation)
+               return x_fread(b,1,n,f);
   
        i = 0;
-       while (i < n) {
-               if ((c = getc(f)) == EOF) {
+       while (i < (n - 1) && (i < BUFFER_SIZE)) {
+               if ((c = x_getc(f)) == EOF) {
                        break;
                }
       
                if (c == '\n') { /* change all LFs to CR/LF */
                        b[i++] = '\r';
-                       n++;
                }
       
-               if(i < n)
-                       b[i++] = c;
+               b[i++] = c;
        }
   
        return(i);
@@ -175,12 +169,12 @@ static void send_message(void)
        int grp_id;
 
        if (!cli_message_start(cli, desthost, username, &grp_id)) {
-               DEBUG(0,("message start: %s\n", cli_errstr(cli)));
+               d_printf("message start: %s\n", cli_errstr(cli));
                return;
        }
 
 
-       printf("Connected. Type your message, ending it with a Control-D\n");
+       d_printf("Connected. Type your message, ending it with a Control-D\n");
 
        while (!feof(stdin) && total_len < 1600) {
                int maxlen = MIN(1600 - total_len,127);
@@ -197,7 +191,7 @@ static void send_message(void)
                }
 
                if (!cli_message_text(cli, msg, l, grp_id)) {
-                       printf("SMBsendtxt failed (%s)\n",cli_errstr(cli));
+                       d_printf("SMBsendtxt failed (%s)\n",cli_errstr(cli));
                        return;
                }      
                
@@ -205,12 +199,12 @@ static void send_message(void)
        }
 
        if (total_len >= 1600)
-               printf("the message was truncated to 1600 bytes\n");
+               d_printf("the message was truncated to 1600 bytes\n");
        else
-               printf("sent %d bytes\n",total_len);
+               d_printf("sent %d bytes\n",total_len);
 
        if (!cli_message_end(cli, grp_id)) {
-               printf("SMBsendend failed (%s)\n",cli_errstr(cli));
+               d_printf("SMBsendend failed (%s)\n",cli_errstr(cli));
                return;
        }      
 }
@@ -225,12 +219,12 @@ static void do_dskattr(void)
        int total, bsize, avail;
 
        if (!cli_dskattr(cli, &bsize, &total, &avail)) {
-               DEBUG(0,("Error in dskattr: %s\n",cli_errstr(cli))); 
+               d_printf("Error in dskattr: %s\n",cli_errstr(cli)); 
                return;
        }
 
-       DEBUG(0,("\n\t\t%d blocks of size %d. %d blocks available\n",
-                total, bsize, avail));
+       d_printf("\n\t\t%d blocks of size %d. %d blocks available\n",
+                total, bsize, avail);
 }
 
 /****************************************************************************
@@ -238,8 +232,8 @@ show cd/pwd
 ****************************************************************************/
 static void cmd_pwd(void)
 {
-       DEBUG(0,("Current directory is %s",CNV_LANG(service)));
-       DEBUG(0,("%s\n",CNV_LANG(cur_dir)));
+       d_printf("Current directory is %s",service);
+       d_printf("%s\n",cur_dir);
 }
 
 
@@ -271,7 +265,7 @@ static void do_cd(char *newdir)
        
        if (!strequal(cur_dir,"\\")) {
                if (!cli_chkpath(cli, dname)) {
-                       DEBUG(0,("cd %s: %s\n", dname, cli_errstr(cli)));
+                       d_printf("cd %s: %s\n", dname, cli_errstr(cli));
                        pstrcpy(cur_dir,saved_dir);
                }
        }
@@ -286,10 +280,10 @@ static void cmd_cd(void)
 {
        fstring buf;
 
-       if (next_token(NULL,buf,NULL,sizeof(buf)))
+       if (next_token_nr(NULL,buf,NULL,sizeof(buf)))
                do_cd(buf);
        else
-               DEBUG(0,("Current directory is %s\n",CNV_LANG(cur_dir)));
+               d_printf("Current directory is %s\n",cur_dir);
 }
 
 
@@ -301,7 +295,7 @@ static BOOL do_this_one(file_info *finfo)
        if (finfo->mode & aDIR) return(True);
 
        if (*fileselection && 
-           !mask_match(finfo->name,fileselection,False,False)) {
+           !mask_match(finfo->name,fileselection,False)) {
                DEBUG(3,("match_match %s failed\n", finfo->name));
                return False;
        }
@@ -326,11 +320,11 @@ static void display_finfo(file_info *finfo)
 {
        if (do_this_one(finfo)) {
                time_t t = finfo->mtime; /* the time is assumed to be passed as GMT */
-               DEBUG(0,("  %-30s%7.7s%8.0f  %s",
-                        CNV_LANG(finfo->name),
+               d_printf("  %-30s%7.7s %8.0f  %s",
+                        finfo->name,
                         attrib_string(finfo->mode),
                         (double)finfo->size,
-                        asctime(LocalTime(&t))));
+                        asctime(LocalTime(&t)));
                dir_total += finfo->size;
        }
 }
@@ -348,13 +342,129 @@ static void do_du(file_info *finfo)
 
 static BOOL do_list_recurse;
 static BOOL do_list_dirs;
-static int do_list_attr;
+static char *do_list_queue = 0;
+static long do_list_queue_size = 0;
+static long do_list_queue_start = 0;
+static long do_list_queue_end = 0;
 static void (*do_list_fn)(file_info *);
 
+/****************************************************************************
+functions for do_list_queue
+  ****************************************************************************/
+
+/*
+ * The do_list_queue is a NUL-separated list of strings stored in a
+ * char*.  Since this is a FIFO, we keep track of the beginning and
+ * ending locations of the data in the queue.  When we overflow, we
+ * double the size of the char*.  When the start of the data passes
+ * the midpoint, we move everything back.  This is logically more
+ * complex than a linked list, but easier from a memory management
+ * angle.  In any memory error condition, do_list_queue is reset.
+ * Functions check to ensure that do_list_queue is non-NULL before
+ * accessing it.
+ */
+static void reset_do_list_queue(void)
+{
+       SAFE_FREE(do_list_queue);
+       do_list_queue_size = 0;
+       do_list_queue_start = 0;
+       do_list_queue_end = 0;
+}
+
+static void init_do_list_queue(void)
+{
+       reset_do_list_queue();
+       do_list_queue_size = 1024;
+       do_list_queue = malloc(do_list_queue_size);
+       if (do_list_queue == 0) { 
+               d_printf("malloc fail for size %d\n",
+                        (int)do_list_queue_size);
+               reset_do_list_queue();
+       } else {
+               memset(do_list_queue, 0, do_list_queue_size);
+       }
+}
+
+static void adjust_do_list_queue(void)
+{
+       /*
+        * If the starting point of the queue is more than half way through,
+        * move everything toward the beginning.
+        */
+       if (do_list_queue && (do_list_queue_start == do_list_queue_end))
+       {
+               DEBUG(4,("do_list_queue is empty\n"));
+               do_list_queue_start = do_list_queue_end = 0;
+               *do_list_queue = '\0';
+       }
+       else if (do_list_queue_start > (do_list_queue_size / 2))
+       {
+               DEBUG(4,("sliding do_list_queue backward\n"));
+               memmove(do_list_queue,
+                       do_list_queue + do_list_queue_start,
+                       do_list_queue_end - do_list_queue_start);
+               do_list_queue_end -= do_list_queue_start;
+               do_list_queue_start = 0;
+       }
+          
+}
+
+static void add_to_do_list_queue(const char* entry)
+{
+       char *dlq;
+       long new_end = do_list_queue_end + ((long)strlen(entry)) + 1;
+       while (new_end > do_list_queue_size)
+       {
+               do_list_queue_size *= 2;
+               DEBUG(4,("enlarging do_list_queue to %d\n",
+                        (int)do_list_queue_size));
+               dlq = Realloc(do_list_queue, do_list_queue_size);
+               if (! dlq) {
+                       d_printf("failure enlarging do_list_queue to %d bytes\n",
+                                (int)do_list_queue_size);
+                       reset_do_list_queue();
+               }
+               else
+               {
+                       do_list_queue = dlq;
+                       memset(do_list_queue + do_list_queue_size / 2,
+                              0, do_list_queue_size / 2);
+               }
+       }
+       if (do_list_queue)
+       {
+               pstrcpy(do_list_queue + do_list_queue_end, entry);
+               do_list_queue_end = new_end;
+               DEBUG(4,("added %s to do_list_queue (start=%d, end=%d)\n",
+                        entry, (int)do_list_queue_start, (int)do_list_queue_end));
+       }
+}
+
+static char *do_list_queue_head(void)
+{
+       return do_list_queue + do_list_queue_start;
+}
+
+static void remove_do_list_queue_head(void)
+{
+       if (do_list_queue_end > do_list_queue_start)
+       {
+               do_list_queue_start += strlen(do_list_queue_head()) + 1;
+               adjust_do_list_queue();
+               DEBUG(4,("removed head of do_list_queue (start=%d, end=%d)\n",
+                        (int)do_list_queue_start, (int)do_list_queue_end));
+       }
+}
+
+static int do_list_queue_empty(void)
+{
+       return (! (do_list_queue && *do_list_queue));
+}
+
 /****************************************************************************
 a helper for do_list
   ****************************************************************************/
-static void do_list_helper(file_info *f, const char *mask)
+static void do_list_helper(file_info *f, const char *mask, void *state)
 {
        if (f->mode & aDIR) {
                if (do_list_dirs && do_this_one(f)) {
@@ -367,15 +477,12 @@ static void do_list_helper(file_info *f, const char *mask)
                        char *p;
 
                        pstrcpy(mask2, mask);
-                       p = strrchr(mask2,'\\');
+                       p = strrchr_m(mask2,'\\');
                        if (!p) return;
                        p[1] = 0;
                        pstrcat(mask2, f->name);
-                       if (do_list_fn == display_finfo) {
-                               DEBUG(0,("\n%s\n",CNV_LANG(mask2)));
-                       }
                        pstrcat(mask2,"\\*");
-                       do_list(mask2, do_list_attr, do_list_fn, True, True);
+                       add_to_do_list_queue(mask2);
                }
                return;
        }
@@ -391,12 +498,68 @@ a wrapper around cli_list that adds recursion
   ****************************************************************************/
 void do_list(const char *mask,uint16 attribute,void (*fn)(file_info *),BOOL rec, BOOL dirs)
 {
+       static int in_do_list = 0;
+
+       if (in_do_list && rec)
+       {
+               fprintf(stderr, "INTERNAL ERROR: do_list called recursively when the recursive flag is true\n");
+               exit(1);
+       }
+
+       in_do_list = 1;
+
        do_list_recurse = rec;
        do_list_dirs = dirs;
        do_list_fn = fn;
-       do_list_attr = attribute;
 
-       cli_list(cli, mask, attribute, do_list_helper);
+       if (rec)
+       {
+               init_do_list_queue();
+               add_to_do_list_queue(mask);
+               
+               while (! do_list_queue_empty())
+               {
+                       /*
+                        * Need to copy head so that it doesn't become
+                        * invalid inside the call to cli_list.  This
+                        * would happen if the list were expanded
+                        * during the call.
+                        * Fix from E. Jay Berkenbilt (ejb@ql.org)
+                        */
+                       pstring head;
+                       pstrcpy(head, do_list_queue_head());
+                       cli_list(cli, head, attribute, do_list_helper, NULL);
+                       remove_do_list_queue_head();
+                       if ((! do_list_queue_empty()) && (fn == display_finfo))
+                       {
+                               char* next_file = do_list_queue_head();
+                               char* save_ch = 0;
+                               if ((strlen(next_file) >= 2) &&
+                                   (next_file[strlen(next_file) - 1] == '*') &&
+                                   (next_file[strlen(next_file) - 2] == '\\'))
+                               {
+                                       save_ch = next_file +
+                                               strlen(next_file) - 2;
+                                       *save_ch = '\0';
+                               }
+                               d_printf("\n%s\n",next_file);
+                               if (save_ch)
+                               {
+                                       *save_ch = '\\';
+                               }
+                       }
+               }
+       }
+       else
+       {
+               if (cli_list(cli, mask, attribute, do_list_helper, NULL) == -1)
+               {
+                       d_printf("%s listing %s\n", cli_errstr(cli), mask);
+               }
+       }
+
+       in_do_list = 0;
+       reset_do_list_queue();
 }
 
 /****************************************************************************
@@ -414,7 +577,7 @@ static void cmd_dir(void)
        if(mask[strlen(mask)-1]!='\\')
                pstrcat(mask,"\\");
        
-       if (next_token(NULL,buf,NULL,sizeof(buf))) {
+       if (next_token_nr(NULL,buf,NULL,sizeof(buf))) {
                dos_format(p);
                if (*p == '\\')
                        pstrcpy(mask,p);
@@ -429,7 +592,7 @@ static void cmd_dir(void)
 
        do_dskattr();
 
-       DEBUG(3, ("Total bytes listed: %d\n", dir_total));
+       DEBUG(3, ("Total bytes listed: %.0f\n", dir_total));
 }
 
 
@@ -448,7 +611,7 @@ static void cmd_du(void)
        if(mask[strlen(mask)-1]!='\\')
                pstrcat(mask,"\\");
        
-       if (next_token(NULL,buf,NULL,sizeof(buf))) {
+       if (next_token_nr(NULL,buf,NULL,sizeof(buf))) {
                dos_format(p);
                if (*p == '\\')
                        pstrcpy(mask,p);
@@ -462,7 +625,7 @@ static void cmd_du(void)
 
        do_dskattr();
 
-       DEBUG(0, ("Total number of bytes: %d\n", dir_total));
+       d_printf("Total number of bytes: %.0f\n", dir_total);
 }
 
 
@@ -475,7 +638,7 @@ static void do_get(char *rname,char *lname)
        BOOL newhandle = False;
        char *data;
        struct timeval tp_start;
-       int read_size = 65520;
+       int read_size = io_bufsize;
        uint16 attr;
        size_t size;
        off_t nread = 0;
@@ -489,32 +652,38 @@ static void do_get(char *rname,char *lname)
        fnum = cli_open(cli, rname, O_RDONLY, DENY_NONE);
 
        if (fnum == -1) {
-               DEBUG(0,("%s opening remote file %s\n",cli_errstr(cli),CNV_LANG(rname)));
+               d_printf("%s opening remote file %s\n",cli_errstr(cli),rname);
                return;
        }
 
        if(!strcmp(lname,"-")) {
                handle = fileno(stdout);
        } else {
-               handle = open(lname,O_WRONLY|O_CREAT|O_TRUNC,0644);
+               handle = sys_open(lname,O_WRONLY|O_CREAT|O_TRUNC,0644);
                newhandle = True;
        }
        if (handle < 0) {
-               DEBUG(0,("Error opening local file %s\n",lname));
+               d_printf("Error opening local file %s\n",lname);
                return;
        }
 
 
-       if (!cli_getattrE(cli, fnum, &attr, &size, NULL, NULL, NULL)) {
-               DEBUG(0,("getattrE: %s\n",cli_errstr(cli)));
+       if (!cli_qfileinfo(cli, fnum, 
+                          &attr, &size, NULL, NULL, NULL, NULL, NULL) &&
+           !cli_getattrE(cli, fnum, 
+                         &attr, &size, NULL, NULL, NULL)) {
+               d_printf("getattrib: %s\n",cli_errstr(cli));
                return;
        }
 
-
        DEBUG(2,("getting file %s of size %.0f as %s ", 
                 lname, (double)size, lname));
 
-       data = (char *)malloc(read_size);
+       if(!(data = (char *)malloc(read_size))) { 
+               d_printf("malloc fail for size %d\n", read_size);
+               cli_close(cli, fnum);
+               return;
+       }
 
        while (1) {
                int n = cli_read(cli, fnum, data, nread, read_size);
@@ -522,15 +691,22 @@ static void do_get(char *rname,char *lname)
                if (n <= 0) break;
  
                if (writefile(handle,data, n) != n) {
-                       DEBUG(0,("Error writing local file\n"));
+                       d_printf("Error writing local file\n");
                        break;
                }
       
                nread += n;
        }
+
+       if (nread < size) {
+               DEBUG (0, ("Short read when getting file %s. Only got %ld bytes.\n",
+               rname, (long)nread));
+       }
+
+       SAFE_FREE(data);
        
        if (!cli_close(cli, fnum)) {
-               DEBUG(0,("Error %s closing remote file\n",cli_errstr(cli)));
+               d_printf("Error %s closing remote file\n",cli_errstr(cli));
        }
 
        if (newhandle) {
@@ -552,7 +728,7 @@ static void do_get(char *rname,char *lname)
                get_total_time_ms += this_time;
                get_total_size += nread;
                
-               DEBUG(2,("(%g kb/s) (average %g kb/s)\n",
+               DEBUG(2,("(%3.1f kb/s) (average %3.1f kb/s)\n",
                         nread / (1.024*this_time + 1.0e-4),
                         get_total_size / (1.024*get_total_time_ms)));
        }
@@ -573,14 +749,14 @@ static void cmd_get(void)
        
        p = rname + strlen(rname);
        
-       if (!next_token(NULL,p,NULL,sizeof(rname)-strlen(rname))) {
-               DEBUG(0,("get <filename>\n"));
+       if (!next_token_nr(NULL,p,NULL,sizeof(rname)-strlen(rname))) {
+               d_printf("get <filename>\n");
                return;
        }
        pstrcpy(lname,p);
        dos_clean_name(rname);
        
-       next_token(NULL,lname,NULL,sizeof(lname));
+       next_token_nr(NULL,lname,NULL,sizeof(lname));
        
        do_get(rname, lname);
 }
@@ -600,16 +776,16 @@ static void do_mget(file_info *finfo)
                return;
 
        if (abort_mget) {
-               DEBUG(0,("mget aborted\n"));
+               d_printf("mget aborted\n");
                return;
        }
 
        if (finfo->mode & aDIR)
                slprintf(quest,sizeof(pstring)-1,
-                        "Get directory %s? ",CNV_LANG(finfo->name));
+                        "Get directory %s? ",finfo->name);
        else
                slprintf(quest,sizeof(pstring)-1,
-                        "Get file %s? ",CNV_LANG(finfo->name));
+                        "Get file %s? ",finfo->name);
 
        if (prompt && !yesno(quest)) return;
 
@@ -631,14 +807,14 @@ static void do_mget(file_info *finfo)
                strlower(finfo->name);
        
        if (!directory_exist(finfo->name,NULL) && 
-           dos_mkdir(finfo->name,0777) != 0) {
-               DEBUG(0,("failed to create directory %s\n",CNV_LANG(finfo->name)));
+           mkdir(finfo->name,0777) != 0) {
+               d_printf("failed to create directory %s\n",finfo->name);
                pstrcpy(cur_dir,saved_curdir);
                return;
        }
        
-       if (dos_chdir(finfo->name) != 0) {
-               DEBUG(0,("failed to chdir to directory %s\n",CNV_LANG(finfo->name)));
+       if (chdir(finfo->name) != 0) {
+               d_printf("failed to chdir to directory %s\n",finfo->name);
                pstrcpy(cur_dir,saved_curdir);
                return;
        }
@@ -657,18 +833,24 @@ view the file using the pager
 ****************************************************************************/
 static void cmd_more(void)
 {
-       fstring rname,lname,tmpname,pager_cmd;
+       fstring rname,lname,pager_cmd;
        char *pager;
+       int fd;
 
        fstrcpy(rname,cur_dir);
        fstrcat(rname,"\\");
-       slprintf(tmpname,
-                sizeof(fstring)-1,
-                "%s/smbmore.%d",tmpdir(),(int)getpid());
-       fstrcpy(lname,tmpname);
        
-       if (!next_token(NULL,rname+strlen(rname),NULL,sizeof(rname)-strlen(rname))) {
-               DEBUG(0,("more <filename>\n"));
+       slprintf(lname,sizeof(lname)-1, "%s/smbmore.XXXXXX",tmpdir());
+       fd = smb_mkstemp(lname);
+       if (fd == -1) {
+               d_printf("failed to create temporary file for more\n");
+               return;
+       }
+       close(fd);
+
+       if (!next_token_nr(NULL,rname+strlen(rname),NULL,sizeof(rname)-strlen(rname))) {
+               d_printf("more <filename>\n");
+               unlink(lname);
                return;
        }
        dos_clean_name(rname);
@@ -678,9 +860,9 @@ static void cmd_more(void)
        pager=getenv("PAGER");
 
        slprintf(pager_cmd,sizeof(pager_cmd)-1,
-                "%s %s",(pager? pager:PAGER), tmpname);
+                "%s %s",(pager? pager:PAGER), lname);
        system(pager_cmd);
-       unlink(tmpname);
+       unlink(lname);
 }
 
 
@@ -702,7 +884,7 @@ static void cmd_mget(void)
        
        abort_mget = False;
 
-       while (next_token(NULL,p,NULL,sizeof(buf))) {
+       while (next_token_nr(NULL,p,NULL,sizeof(buf))) {
                pstrcpy(mget_mask,cur_dir);
                if(mget_mask[strlen(mget_mask)-1]!='\\')
                        pstrcat(mget_mask,"\\");
@@ -730,8 +912,8 @@ make a directory of name "name"
 static BOOL do_mkdir(char *name)
 {
        if (!cli_mkdir(cli, name)) {
-               DEBUG(0,("%s making remote directory %s\n",
-                        cli_errstr(cli),CNV_LANG(name)));
+               d_printf("%s making remote directory %s\n",
+                        cli_errstr(cli),name);
                return(False);
        }
 
@@ -740,7 +922,7 @@ static BOOL do_mkdir(char *name)
 
 
 /****************************************************************************
-make a directory of name "name"
+ Exit client.
 ****************************************************************************/
 static void cmd_quit(void)
 {
@@ -760,9 +942,9 @@ static void cmd_mkdir(void)
   
        pstrcpy(mask,cur_dir);
 
-       if (!next_token(NULL,p,NULL,sizeof(buf))) {
+       if (!next_token_nr(NULL,p,NULL,sizeof(buf))) {
                if (!recurse)
-                       DEBUG(0,("mkdir <dirname>\n"));
+                       d_printf("mkdir <dirname>\n");
                return;
        }
        pstrcat(mask,p);
@@ -795,53 +977,60 @@ static void cmd_mkdir(void)
 static void do_put(char *rname,char *lname)
 {
        int fnum;
-       FILE *f;
+       XFILE *f;
        int nread=0;
        char *buf=NULL;
-       int maxwrite=65520;
+       int maxwrite=io_bufsize;
        
        struct timeval tp_start;
        GetTimeOfDay(&tp_start);
 
-       fnum = cli_open(cli, rname, O_WRONLY|O_CREAT|O_TRUNC, DENY_NONE);
+       fnum = cli_open(cli, rname, O_RDWR|O_CREAT|O_TRUNC, DENY_NONE);
   
        if (fnum == -1) {
-               DEBUG(0,("%s opening remote file %s\n",cli_errstr(cli),CNV_LANG(rname)));
+               d_printf("%s opening remote file %s\n",cli_errstr(cli),rname);
                return;
        }
 
        /* allow files to be piped into smbclient
           jdblair 24.jun.98 */
        if (!strcmp(lname, "-")) {
-               f = stdin;
+               f = x_stdin;
                /* size of file is not known */
        } else {
-               f = fopen(lname,"r");
+               f = x_fopen(lname,O_RDONLY, 0);
        }
 
        if (!f) {
-               DEBUG(0,("Error opening local file %s\n",lname));
+               d_printf("Error opening local file %s\n",lname);
                return;
        }
 
   
        DEBUG(1,("putting file %s as %s ",lname,
-                CNV_LANG(rname)));
+                rname));
   
        buf = (char *)malloc(maxwrite);
-       while (!feof(f)) {
+       if (!buf) {
+               d_printf("ERROR: Not enough memory!\n");
+               return;
+       }
+       while (!x_feof(f)) {
                int n = maxwrite;
                int ret;
 
-               if ((n = readfile(buf,1,n,f)) < 1) {
-                       DEBUG(0,("Error reading local file\n"));
+               if ((n = readfile(buf,n,f)) < 1) {
+                       if((n == 0) && x_feof(f))
+                               break; /* Empty local file. */
+
+                       d_printf("Error reading local file: %s\n", strerror(errno));
                        break;
                }
 
                ret = cli_write(cli, fnum, 0, buf, nread, n);
 
                if (n != ret) {
-                       DEBUG(0,("Error writing file: %s\n", cli_errstr(cli)));
+                       d_printf("Error writing file: %s\n", cli_errstr(cli));
                        break;
                } 
 
@@ -849,15 +1038,15 @@ static void do_put(char *rname,char *lname)
        }
 
        if (!cli_close(cli, fnum)) {
-               DEBUG(0,("%s closing remote file %s\n",cli_errstr(cli),CNV_LANG(rname)));
-               fclose(f);
-               if (buf) free(buf);
+               d_printf("%s closing remote file %s\n",cli_errstr(cli),rname);
+               x_fclose(f);
+               SAFE_FREE(buf);
                return;
        }
 
        
-       fclose(f);
-       if (buf) free(buf);
+       x_fclose(f);
+       SAFE_FREE(buf);
 
        {
                struct timeval tp_end;
@@ -870,12 +1059,12 @@ static void do_put(char *rname,char *lname)
                put_total_time_ms += this_time;
                put_total_size += nread;
                
-               DEBUG(1,("(%g kb/s) (average %g kb/s)\n",
+               DEBUG(1,("(%3.1f kb/s) (average %3.1f kb/s)\n",
                         nread / (1.024*this_time + 1.0e-4),
                         put_total_size / (1.024*put_total_time_ms)));
        }
 
-       if (f == stdin) {
+       if (f == x_stdin) {
                cli_shutdown(cli);
                exit(0);
        }
@@ -896,13 +1085,13 @@ static void cmd_put(void)
        pstrcpy(rname,cur_dir);
        pstrcat(rname,"\\");
   
-       if (!next_token(NULL,p,NULL,sizeof(buf))) {
-               DEBUG(0,("put <filename>\n"));
+       if (!next_token_nr(NULL,p,NULL,sizeof(buf))) {
+               d_printf("put <filename>\n");
                return;
        }
        pstrcpy(lname,p);
   
-       if (next_token(NULL,p,NULL,sizeof(buf)))
+       if (next_token_nr(NULL,p,NULL,sizeof(buf)))
                pstrcat(rname,p);      
        else
                pstrcat(rname,lname);
@@ -915,7 +1104,7 @@ static void cmd_put(void)
                   jdblair, 24.jun.98 */
                if (!file_exist(lname,&st) &&
                    (strcmp(lname,"-"))) {
-                       DEBUG(0,("%s does not exist\n",lname));
+                       d_printf("%s does not exist\n",lname);
                        return;
                }
        }
@@ -923,110 +1112,199 @@ static void cmd_put(void)
        do_put(rname,lname);
 }
 
+/*************************************
+  File list structure
+*************************************/
+
+static struct file_list {
+       struct file_list *prev, *next;
+       char *file_path;
+       BOOL isdir;
+} *file_list;
+
+/****************************************************************************
+  Free a file_list structure
+****************************************************************************/
+
+static void free_file_list (struct file_list * list)
+{
+       struct file_list *tmp;
+       
+       while (list)
+       {
+               tmp = list;
+               DLIST_REMOVE(list, list);
+               SAFE_FREE(tmp->file_path);
+               SAFE_FREE(tmp);
+       }
+}
 
 /****************************************************************************
   seek in a directory/file list until you get something that doesn't start with
   the specified name
   ****************************************************************************/
-static BOOL seek_list(FILE *f,char *name)
-{
-       pstring s;
-       while (!feof(f)) {
-               if (fscanf(f,"%s",s) != 1) return(False);
-               trim_string(s,"./",NULL);
-               if (strncmp(s,name,strlen(name)) != 0) {
-                       pstrcpy(name,s);
+static BOOL seek_list(struct file_list *list, char *name)
+{
+       while (list) {
+               trim_string(list->file_path,"./","\n");
+               if (strncmp(list->file_path, name, strlen(name)) != 0) {
                        return(True);
                }
+               list = list->next;
        }
       
        return(False);
 }
 
-
 /****************************************************************************
   set the file selection mask
   ****************************************************************************/
 static void cmd_select(void)
 {
        pstrcpy(fileselection,"");
-       next_token(NULL,fileselection,NULL,sizeof(fileselection));
+       next_token_nr(NULL,fileselection,NULL,sizeof(fileselection));
 }
 
+/****************************************************************************
+  Recursive file matching function act as find
+  match must be always set to True when calling this function
+****************************************************************************/
+static int file_find(struct file_list **list, const char *directory, 
+                     const char *expression, BOOL match)
+{
+       DIR *dir;
+       struct file_list *entry;
+        struct stat statbuf;
+        int ret;
+        char *path;
+       BOOL isdir;
+       char *dname;
+
+        dir = opendir(directory);
+       if (!dir) return -1;
+       
+        while ((dname = readdirname(dir))) {
+               if (!strcmp("..", dname)) continue;
+               if (!strcmp(".", dname)) continue;
+               
+               if (asprintf(&path, "%s/%s", directory, dname) <= 0) {
+                       continue;
+               }
+
+               isdir = False;
+               if (!match || !gen_fnmatch(expression, dname)) {
+                       if (recurse) {
+                               ret = stat(path, &statbuf);
+                               if (ret == 0) {
+                                       if (S_ISDIR(statbuf.st_mode)) {
+                                               isdir = True;
+                                               ret = file_find(list, path, expression, False);
+                                       }
+                               } else {
+                                       d_printf("file_find: cannot stat file %s\n", path);
+                               }
+                               
+                               if (ret == -1) {
+                                       SAFE_FREE(path);
+                                       closedir(dir);
+                                       return -1;
+                               }
+                       }
+                       entry = (struct file_list *) malloc(sizeof (struct file_list));
+                       if (!entry) {
+                               d_printf("Out of memory in file_find\n");
+                               closedir(dir);
+                               return -1;
+                       }
+                       entry->file_path = path;
+                       entry->isdir = isdir;
+                        DLIST_ADD(*list, entry);
+               } else {
+                       SAFE_FREE(path);
+               }
+        }
+
+       closedir(dir);
+       return 0;
+}
 
 /****************************************************************************
   mput some files
   ****************************************************************************/
 static void cmd_mput(void)
 {
-       pstring lname;
-       pstring rname;
        fstring buf;
        char *p=buf;
        
-       while (next_token(NULL,p,NULL,sizeof(buf))) {
-               SMB_STRUCT_STAT st;
-               pstring cmd;
-               pstring tmpname;
-               FILE *f;
-               
-               slprintf(tmpname,sizeof(pstring)-1,
-                        "%s/ls.smb.%d",tmpdir(),(int)getpid());
-               if (recurse)
-                       slprintf(cmd,sizeof(pstring)-1,
-                                "find . -name \"%s\" -print > %s",p,tmpname);
-               else
-                       slprintf(cmd,sizeof(pstring)-1,
-                                "/bin/ls %s > %s",p,tmpname);
-               system(cmd);
+       while (next_token_nr(NULL,p,NULL,sizeof(buf))) {
+               int ret;
+               struct file_list *temp_list;
+               char *quest, *lname, *rname;
+       
+               file_list = NULL;
 
-               f = fopen(tmpname,"r");
-               if (!f) continue;
+               ret = file_find(&file_list, ".", p, True);
+               if (ret) {
+                       free_file_list(file_list);
+                       continue;
+               }
                
-               while (!feof(f)) {
-                       pstring quest;
+               quest = NULL;
+               lname = NULL;
+               rname = NULL;
+                               
+               for (temp_list = file_list; temp_list; 
+                    temp_list = temp_list->next) {
 
-                       if (fscanf(f,"%s",lname) != 1) break;
-                       trim_string(lname,"./",NULL);
-                       
-               again1:
+                       SAFE_FREE(lname);
+                       if (asprintf(&lname, "%s/", temp_list->file_path) <= 0)
+                               continue;
+                       trim_string(lname, "./", "/");
                        
                        /* check if it's a directory */
-                       if (directory_exist(lname,&st)) {
-                               if (!recurse) continue;
-                               slprintf(quest,sizeof(pstring)-1,
-                                        "Put directory %s? ",lname);
-                               if (prompt && !yesno(quest)) {
-                                       pstrcat(lname,"/");
-                                       if (!seek_list(f,lname))
-                                               break;
-                                       goto again1;                
-                               }
-             
-                               pstrcpy(rname,cur_dir);
-                               pstrcat(rname,lname);
-                               if (!cli_chkpath(cli, rname) && !do_mkdir(rname)) {
-                                       pstrcat(lname,"/");
-                                       if (!seek_list(f,lname))
-                                               break;
-                                       goto again1;
+                       if (temp_list->isdir) {
+                               /* if (!recurse) continue; */
+                               
+                               SAFE_FREE(quest);
+                               asprintf(&quest, "Put directory %s? ", lname);
+                               if (prompt && !yesno(quest)) { /* No */
+                                       /* Skip the directory */
+                                       lname[strlen(lname)-1] = '/';
+                                       if (!seek_list(temp_list, lname))
+                                               break;              
+                               } else { /* Yes */
+                                       SAFE_FREE(rname);
+                                       asprintf(&rname, "%s%s", cur_dir, lname);
+                                       dos_format(rname);
+                                       if (!cli_chkpath(cli, rname) && 
+                                           !do_mkdir(rname)) {
+                                               DEBUG (0, ("Unable to make dir, skipping..."));
+                                               /* Skip the directory */
+                                               lname[strlen(lname)-1] = '/';
+                                               if (!seek_list(temp_list, lname))
+                                                       break;
+                                       }
                                }
                                continue;
                        } else {
-                               slprintf(quest,sizeof(quest)-1,
-                                        "Put file %s? ",lname);
-                               if (prompt && !yesno(quest)) continue;
+                               SAFE_FREE(quest);
+                               asprintf(&quest,"Put file %s? ", lname);
+                               if (prompt && !yesno(quest)) /* No */
+                                       continue;
                                
-                               pstrcpy(rname,cur_dir);
-                               pstrcat(rname,lname);
+                               /* Yes */
+                               SAFE_FREE(rname);
+                               asprintf(&rname, "%s%s", cur_dir, lname);
                        }
 
                        dos_format(rname);
 
-                       do_put(rname,lname);
+                       do_put(rname, lname);
                }
-               fclose(f);
-               unlink(tmpname);
+               free_file_list(file_list);
+               SAFE_FREE(quest);
+               SAFE_FREE(lname);
+               SAFE_FREE(rname);
        }
 }
 
@@ -1037,9 +1315,9 @@ static void cmd_mput(void)
 static void do_cancel(int job)
 {
        if (cli_printjob_del(cli, job)) {
-               printf("Job %d cancelled\n",job);
+               d_printf("Job %d cancelled\n",job);
        } else {
-               printf("Error calcelling job %d : %s\n",job,cli_errstr(cli));
+               d_printf("Error cancelling job %d : %s\n",job,cli_errstr(cli));
        }
 }
 
@@ -1052,14 +1330,14 @@ static void cmd_cancel(void)
        fstring buf;
        int job; 
 
-       if (!next_token(NULL,buf,NULL,sizeof(buf))) {
-               printf("cancel <jobid> ...\n");
+       if (!next_token_nr(NULL,buf,NULL,sizeof(buf))) {
+               d_printf("cancel <jobid> ...\n");
                return;
        }
        do {
                job = atoi(buf);
                do_cancel(job);
-       } while (next_token(NULL,buf,NULL,sizeof(buf)));
+       } while (next_token_nr(NULL,buf,NULL,sizeof(buf)));
 }
 
 
@@ -1072,19 +1350,19 @@ static void cmd_print(void)
        pstring rname;
        char *p;
 
-       if (!next_token(NULL,lname,NULL, sizeof(lname))) {
-               DEBUG(0,("print <filename>\n"));
+       if (!next_token_nr(NULL,lname,NULL, sizeof(lname))) {
+               d_printf("print <filename>\n");
                return;
        }
 
        pstrcpy(rname,lname);
-       p = strrchr(rname,'/');
+       p = strrchr_m(rname,'/');
        if (p) {
-               slprintf(rname, sizeof(rname)-1, "%s-%d", p+1, (int)getpid());
+               slprintf(rname, sizeof(rname)-1, "%s-%d", p+1, (int)sys_getpid());
        }
 
        if (strequal(lname,"-")) {
-               slprintf(rname, sizeof(rname)-1, "stdin-%d", (int)getpid());
+               slprintf(rname, sizeof(rname)-1, "stdin-%d", (int)sys_getpid());
        }
 
        do_put(rname, lname);
@@ -1096,7 +1374,7 @@ static void cmd_print(void)
 ****************************************************************************/
 static void queue_fn(struct print_job_info *p)
 {
-       DEBUG(0,("%-6d   %-9d    %s\n", (int)p->id, (int)p->size, p->name));
+       d_printf("%-6d   %-9d    %s\n", (int)p->id, (int)p->size, p->name);
 }
 
 /****************************************************************************
@@ -1121,7 +1399,7 @@ static void do_del(file_info *finfo)
                return;
 
        if (!cli_unlink(cli, mask)) {
-               DEBUG(0,("%s deleting remote file %s\n",cli_errstr(cli),CNV_LANG(mask)));
+               d_printf("%s deleting remote file %s\n",cli_errstr(cli),mask);
        }
 }
 
@@ -1139,8 +1417,8 @@ static void cmd_del(void)
        
        pstrcpy(mask,cur_dir);
        
-       if (!next_token(NULL,buf,NULL,sizeof(buf))) {
-               DEBUG(0,("del <filename>\n"));
+       if (!next_token_nr(NULL,buf,NULL,sizeof(buf))) {
+               d_printf("del <filename>\n");
                return;
        }
        pstrcat(mask,buf);
@@ -1148,6 +1426,24 @@ static void cmd_del(void)
        do_list(mask, attribute,do_del,False,False);
 }
 
+/****************************************************************************
+****************************************************************************/
+static void cmd_open(void)
+{
+       pstring mask;
+       fstring buf;
+       
+       pstrcpy(mask,cur_dir);
+       
+       if (!next_token_nr(NULL,buf,NULL,sizeof(buf))) {
+               d_printf("del <filename>\n");
+               return;
+       }
+       pstrcat(mask,buf);
+
+       cli_open(cli, mask, O_RDWR, DENY_ALL);
+}
+
 
 /****************************************************************************
 remove a directory
@@ -1159,15 +1455,15 @@ static void cmd_rmdir(void)
   
        pstrcpy(mask,cur_dir);
        
-       if (!next_token(NULL,buf,NULL,sizeof(buf))) {
-               DEBUG(0,("rmdir <dirname>\n"));
+       if (!next_token_nr(NULL,buf,NULL,sizeof(buf))) {
+               d_printf("rmdir <dirname>\n");
                return;
        }
        pstrcat(mask,buf);
 
        if (!cli_rmdir(cli, mask)) {
-               DEBUG(0,("%s removing remote directory file %s\n",
-                        cli_errstr(cli),CNV_LANG(mask)));
+               d_printf("%s removing remote directory file %s\n",
+                        cli_errstr(cli),mask);
        }  
 }
 
@@ -1182,9 +1478,9 @@ static void cmd_rename(void)
        pstrcpy(src,cur_dir);
        pstrcpy(dest,cur_dir);
        
-       if (!next_token(NULL,buf,NULL,sizeof(buf)) || 
-           !next_token(NULL,buf2,NULL, sizeof(buf2))) {
-               DEBUG(0,("rename <src> <dest>\n"));
+       if (!next_token_nr(NULL,buf,NULL,sizeof(buf)) || 
+           !next_token_nr(NULL,buf2,NULL, sizeof(buf2))) {
+               d_printf("rename <src> <dest>\n");
                return;
        }
 
@@ -1192,7 +1488,7 @@ static void cmd_rename(void)
        pstrcat(dest,buf2);
 
        if (!cli_rename(cli, src, dest)) {
-               DEBUG(0,("%s renaming files\n",cli_errstr(cli)));
+               d_printf("%s renaming files\n",cli_errstr(cli));
                return;
        }  
 }
@@ -1217,8 +1513,8 @@ static void cmd_newer(void)
        BOOL ok;
        SMB_STRUCT_STAT sbuf;
 
-       ok = next_token(NULL,buf,NULL,sizeof(buf));
-       if (ok && (dos_stat(buf,&sbuf) == 0)) {
+       ok = next_token_nr(NULL,buf,NULL,sizeof(buf));
+       if (ok && (sys_stat(buf,&sbuf) == 0)) {
                newer_than = sbuf.st_mtime;
                DEBUG(1,("Getting files newer than %s",
                         asctime(LocalTime(&newer_than))));
@@ -1227,7 +1523,7 @@ static void cmd_newer(void)
        }
 
        if (ok && newer_than == 0)
-               DEBUG(0,("Error setting newer-than time\n"));
+               d_printf("Error setting newer-than time\n");
 }
 
 /****************************************************************************
@@ -1237,10 +1533,10 @@ static void cmd_archive(void)
 {
        fstring buf;
 
-       if (next_token(NULL,buf,NULL,sizeof(buf))) {
+       if (next_token_nr(NULL,buf,NULL,sizeof(buf))) {
                archive_level = atoi(buf);
        } else
-               DEBUG(0,("Archive level is %d\n",archive_level));
+               d_printf("Archive level is %d\n",archive_level);
 }
 
 /****************************************************************************
@@ -1283,7 +1579,7 @@ static void cmd_printmode(void)
        fstring buf;
        fstring mode;
 
-       if (next_token(NULL,buf,NULL,sizeof(buf))) {
+       if (next_token_nr(NULL,buf,NULL,sizeof(buf))) {
                if (strequal(buf,"text")) {
                        printmode = 0;      
                } else {
@@ -1318,17 +1614,19 @@ static void cmd_lcd(void)
        fstring buf;
        pstring d;
        
-       if (next_token(NULL,buf,NULL,sizeof(buf)))
-               dos_chdir(buf);
-       DEBUG(2,("the local directory is now %s\n",GetWd(d)));
+       if (next_token_nr(NULL,buf,NULL,sizeof(buf)))
+               chdir(buf);
+       DEBUG(2,("the local directory is now %s\n",sys_getwd(d)));
 }
 
 /****************************************************************************
 list a share name
 ****************************************************************************/
-static void browse_fn(const char *name, uint32 m, const char *comment)
+static void browse_fn(const char *name, uint32 m, 
+                      const char *comment, void *state)
 {
         fstring typestr;
+
         *typestr=0;
 
         switch (m)
@@ -1342,9 +1640,8 @@ static void browse_fn(const char *name, uint32 m, const char *comment)
           case STYPE_IPC:
             fstrcpy(typestr,"IPC"); break;
         }
-
-        printf("\t%-15.15s%-10.10s%s\n",
-               name, typestr,comment);
+       d_printf("\t%-15.15s%-10.10s%s\n",
+               name,typestr,comment);
 }
 
 
@@ -1353,18 +1650,24 @@ try and browse available connections on a host
 ****************************************************************************/
 static BOOL browse_host(BOOL sort)
 {
-        printf("\n\tSharename      Type      Comment\n");
-        printf("\t---------      ----      -------\n");
+       int ret;
 
-       return cli_RNetShareEnum(cli, browse_fn);
+        d_printf("\n\tSharename      Type      Comment\n");
+        d_printf("\t---------      ----      -------\n");
+
+       if((ret = cli_RNetShareEnum(cli, browse_fn, NULL)) == -1)
+               d_printf("Error returning browse list: %s\n", cli_errstr(cli));
+
+       return (ret != -1);
 }
 
 /****************************************************************************
 list a server name
 ****************************************************************************/
-static void server_fn(const char *name, uint32 m, const char *comment)
+static void server_fn(const char *name, uint32 m, 
+                      const char *comment, void *state)
 {
-        printf("\t%-16.16s     %s\n", name, comment);
+        d_printf("\t%-16.16s     %s\n", name, comment);
 }
 
 /****************************************************************************
@@ -1372,26 +1675,31 @@ try and browse available connections on a host
 ****************************************************************************/
 static BOOL list_servers(char *wk_grp)
 {
-        printf("\n\tServer               Comment\n");
-        printf("\t---------            -------\n");
+       if (!cli->server_domain) return False;
+       
+        d_printf("\n\tServer               Comment\n");
+        d_printf("\t---------            -------\n");
 
-       cli_NetServerEnum(cli, workgroup, SV_TYPE_ALL, server_fn);
+       cli_NetServerEnum(cli, cli->server_domain, SV_TYPE_ALL, server_fn, NULL);
 
-        printf("\n\tWorkgroup            Master\n");
-        printf("\t---------            -------\n");
+        d_printf("\n\tWorkgroup            Master\n");
+        d_printf("\t---------            -------\n");
 
-       cli_NetServerEnum(cli, workgroup, SV_TYPE_DOMAIN_ENUM, server_fn);
+       cli_NetServerEnum(cli, cli->server_domain, SV_TYPE_DOMAIN_ENUM, server_fn, NULL);
        return True;
 }
 
-
 /* Some constants for completing filename arguments */
 
 #define COMPL_NONE        0          /* No completions */
 #define COMPL_REMOTE      1          /* Complete remote filename */
 #define COMPL_LOCAL       2          /* Complete local filename */
 
-/* This defines the commands supported by this client */
+/* This defines the commands supported by this client.
+ * NOTE: The "!" must be the last one in the list because it's fn pointer
+ *       field is NULL, and NULL in that field is used in process_tok()
+ *       (below) to indicate the end of the list.  crh
+ */
 struct
 {
   char *name;
@@ -1400,44 +1708,45 @@ struct
   char compl_args[2];      /* Completion argument info */
 } commands[] = 
 {
-  {"ls",cmd_dir,"<mask> list the contents of the current directory",{COMPL_REMOTE,COMPL_NONE}},
+  {"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}},
+  {"blocksize",cmd_block,"blocksize <number> (default 20)",{COMPL_NONE,COMPL_NONE}},
+  {"cancel",cmd_cancel,"<jobid> cancel a print queue entry",{COMPL_NONE,COMPL_NONE}},
+  {"cd",cmd_cd,"[directory] change/report the remote directory",{COMPL_REMOTE,COMPL_NONE}},
+  {"del",cmd_del,"<mask> delete all matching files",{COMPL_REMOTE,COMPL_NONE}},
   {"dir",cmd_dir,"<mask> list the contents of the current directory",{COMPL_REMOTE,COMPL_NONE}},
   {"du",cmd_du,"<mask> computes the total size of the current directory",{COMPL_REMOTE,COMPL_NONE}},
-  {"lcd",cmd_lcd,"[directory] change/report the local current working directory",{COMPL_LOCAL,COMPL_NONE}},
-  {"cd",cmd_cd,"[directory] change/report the remote directory",{COMPL_REMOTE,COMPL_NONE}},
-  {"pwd",cmd_pwd,"show current remote directory (same as 'cd' with no args)",{COMPL_NONE,COMPL_NONE}},
+  {"exit",cmd_quit,"logoff the server",{COMPL_NONE,COMPL_NONE}},
   {"get",cmd_get,"<remote name> [local name] get a file",{COMPL_REMOTE,COMPL_LOCAL}},
-  {"mget",cmd_mget,"<mask> get all the matching files",{COMPL_REMOTE,COMPL_NONE}},
-  {"put",cmd_put,"<local name> [remote name] put a file",{COMPL_LOCAL,COMPL_REMOTE}},
-  {"mput",cmd_mput,"<mask> put all matching files",{COMPL_REMOTE,COMPL_NONE}},
-  {"rename",cmd_rename,"<src> <dest> rename some files",{COMPL_REMOTE,COMPL_REMOTE}},
-  {"more",cmd_more,"<remote name> view a remote file with your pager",{COMPL_REMOTE,COMPL_NONE}},  
+  {"help",cmd_help,"[command] give help on a command",{COMPL_NONE,COMPL_NONE}},
+  {"history",cmd_history,"displays the command history",{COMPL_NONE,COMPL_NONE}},
+  {"lcd",cmd_lcd,"[directory] change/report the local current working directory",{COMPL_LOCAL,COMPL_NONE}},
+  {"lowercase",cmd_lowercase,"toggle lowercasing of filenames for get",{COMPL_NONE,COMPL_NONE}},  
+  {"ls",cmd_dir,"<mask> list the contents of the current directory",{COMPL_REMOTE,COMPL_NONE}},
   {"mask",cmd_select,"<mask> mask all filenames against this",{COMPL_REMOTE,COMPL_NONE}},
-  {"del",cmd_del,"<mask> delete all matching files",{COMPL_REMOTE,COMPL_NONE}},
-  {"rm",cmd_del,"<mask> delete all matching files",{COMPL_REMOTE,COMPL_NONE}},
-  {"mkdir",cmd_mkdir,"<directory> make a directory",{COMPL_NONE,COMPL_NONE}},
   {"md",cmd_mkdir,"<directory> make a directory",{COMPL_NONE,COMPL_NONE}},
-  {"rmdir",cmd_rmdir,"<directory> remove a directory",{COMPL_NONE,COMPL_NONE}},
-  {"rd",cmd_rmdir,"<directory> remove a directory",{COMPL_NONE,COMPL_NONE}},
-  {"prompt",cmd_prompt,"toggle prompting for filenames for mget and mput",{COMPL_NONE,COMPL_NONE}},  
-  {"recurse",cmd_recurse,"toggle directory recursion for mget and mput",{COMPL_NONE,COMPL_NONE}},  
-  {"translate",cmd_translate,"toggle text translation for printing",{COMPL_NONE,COMPL_NONE}},  
-  {"lowercase",cmd_lowercase,"toggle lowercasing of filenames for get",{COMPL_NONE,COMPL_NONE}},  
+  {"mget",cmd_mget,"<mask> get all the matching files",{COMPL_REMOTE,COMPL_NONE}},
+  {"mkdir",cmd_mkdir,"<directory> make a directory",{COMPL_NONE,COMPL_NONE}},
+  {"more",cmd_more,"<remote name> view a remote file with your pager",{COMPL_REMOTE,COMPL_NONE}},  
+  {"mput",cmd_mput,"<mask> put all matching files",{COMPL_REMOTE,COMPL_NONE}},
+  {"newer",cmd_newer,"<file> only mget files newer than the specified local file",{COMPL_LOCAL,COMPL_NONE}},
+  {"open",cmd_open,"<mask> open a file",{COMPL_REMOTE,COMPL_NONE}},
   {"print",cmd_print,"<file name> print a file",{COMPL_NONE,COMPL_NONE}},
   {"printmode",cmd_printmode,"<graphics or text> set the print mode",{COMPL_NONE,COMPL_NONE}},
+  {"prompt",cmd_prompt,"toggle prompting for filenames for mget and mput",{COMPL_NONE,COMPL_NONE}},  
+  {"put",cmd_put,"<local name> [remote name] put a file",{COMPL_LOCAL,COMPL_REMOTE}},
+  {"pwd",cmd_pwd,"show current remote directory (same as 'cd' with no args)",{COMPL_NONE,COMPL_NONE}},
+  {"q",cmd_quit,"logoff the server",{COMPL_NONE,COMPL_NONE}},
   {"queue",cmd_queue,"show the print queue",{COMPL_NONE,COMPL_NONE}},
-  {"cancel",cmd_cancel,"<jobid> cancel a print queue entry",{COMPL_NONE,COMPL_NONE}},
   {"quit",cmd_quit,"logoff the server",{COMPL_NONE,COMPL_NONE}},
-  {"q",cmd_quit,"logoff the server",{COMPL_NONE,COMPL_NONE}},
-  {"exit",cmd_quit,"logoff the server",{COMPL_NONE,COMPL_NONE}},
-  {"newer",cmd_newer,"<file> only mget files newer than the specified local file",{COMPL_LOCAL,COMPL_NONE}},
-  {"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}},
-  {"tar",cmd_tar,"tar <c|x>[IXFqbgNan] current directory to/from <file name>",{COMPL_NONE,COMPL_NONE}},
-  {"blocksize",cmd_block,"blocksize <number> (default 20)",{COMPL_NONE,COMPL_NONE}},
-  {"tarmode",cmd_tarmode,
-     "<full|inc|reset|noreset> tar's behaviour towards archive bits",{COMPL_NONE,COMPL_NONE}},
+  {"rd",cmd_rmdir,"<directory> remove a directory",{COMPL_NONE,COMPL_NONE}},
+  {"recurse",cmd_recurse,"toggle directory recursion for mget and mput",{COMPL_NONE,COMPL_NONE}},  
+  {"rename",cmd_rename,"<src> <dest> rename some files",{COMPL_REMOTE,COMPL_REMOTE}},
+  {"rm",cmd_del,"<mask> delete all matching files",{COMPL_REMOTE,COMPL_NONE}},
+  {"rmdir",cmd_rmdir,"<directory> remove a directory",{COMPL_NONE,COMPL_NONE}},
   {"setmode",cmd_setmode,"filename <setmode string> change modes of file",{COMPL_REMOTE,COMPL_NONE}},
-  {"help",cmd_help,"[command] give help on a command",{COMPL_NONE,COMPL_NONE}},
+  {"tar",cmd_tar,"tar <c|x>[IXFqbgNan] current directory to/from <file name>",{COMPL_NONE,COMPL_NONE}},
+  {"tarmode",cmd_tarmode,"<full|inc|reset|noreset> tar's behaviour towards archive bits",{COMPL_NONE,COMPL_NONE}},
+  {"translate",cmd_translate,"toggle text translation for printing",{COMPL_NONE,COMPL_NONE}},
   {"?",cmd_help,"[command] give help on a command",{COMPL_NONE,COMPL_NONE}},
   {"!",NULL,"run a shell command on the local system",{COMPL_NONE,COMPL_NONE}},
   {"",NULL,NULL,{COMPL_NONE,COMPL_NONE}}
@@ -1482,49 +1791,19 @@ static void cmd_help(void)
        int i=0,j;
        fstring buf;
        
-       if (next_token(NULL,buf,NULL,sizeof(buf))) {
+       if (next_token_nr(NULL,buf,NULL,sizeof(buf))) {
                if ((i = process_tok(buf)) >= 0)
-                       DEBUG(0,("HELP %s:\n\t%s\n\n",commands[i].name,commands[i].description));                   
+                       d_printf("HELP %s:\n\t%s\n\n",commands[i].name,commands[i].description);
        } else {
                while (commands[i].description) {
                        for (j=0; commands[i].description && (j<5); j++) {
-                               DEBUG(0,("%-15s",commands[i].name));
+                               d_printf("%-15s",commands[i].name);
                                i++;
                        }
-                       DEBUG(0,("\n"));
+                       d_printf("\n");
                }
        }
-}
-
-/****************************************************************************
-wait for keyboard activity, swallowing network packets
-****************************************************************************/
-static void wait_keyboard(void)
-{
-       fd_set fds;
-       struct timeval timeout;
-  
-       while (1) {
-               FD_ZERO(&fds);
-               FD_SET(cli->fd,&fds);
-               FD_SET(fileno(stdin),&fds);
-
-               timeout.tv_sec = 20;
-               timeout.tv_usec = 0;
-               sys_select(MAX(cli->fd,fileno(stdin))+1,&fds,&timeout);
-      
-               if (FD_ISSET(fileno(stdin),&fds))
-                       return;
-
-               /* We deliberately use receive_smb instead of
-                  client_receive_smb as we want to receive
-                  session keepalives and then drop them here.
-               */
-               if (FD_ISSET(cli->fd,&fds))
-                       receive_smb(cli->fd,cli->inbuf,0);
-      
-               cli_chkpath(cli, "\\");
-       }  
+       return;
 }
 
 /****************************************************************************
@@ -1540,7 +1819,7 @@ static void process_command_string(char *cmd)
                fstring tok;
                int i;
                
-               if ((p = strchr(cmd, ';')) == 0) {
+               if ((p = strchr_m(cmd, ';')) == 0) {
                        strncpy(line, cmd, 999);
                        line[1000] = '\0';
                        cmd += strlen(cmd);
@@ -1551,48 +1830,114 @@ static void process_command_string(char *cmd)
                        cmd = p + 1;
                }
                
-               /* input language code to internal one */
-               CNV_INPUT (line);
-               
                /* and get the first part of the command */
                ptr = line;
-               if (!next_token(&ptr,tok,NULL,sizeof(tok))) continue;
+               if (!next_token_nr(&ptr,tok,NULL,sizeof(tok))) continue;
                
                if ((i = process_tok(tok)) >= 0) {
                        commands[i].fn();
                } else if (i == -2) {
-                       DEBUG(0,("%s: command abbreviation ambiguous\n",CNV_LANG(tok)));
+                       d_printf("%s: command abbreviation ambiguous\n",tok);
                } else {
-                       DEBUG(0,("%s: command not found\n",CNV_LANG(tok)));
+                       d_printf("%s: command not found\n",tok);
                }
        }
 }      
 
+/****************************************************************************
+handle completion of commands for readline
+****************************************************************************/
+static char **completion_fn(char *text, int start, int end)
+{
+#define MAX_COMPLETIONS 100
+       char **matches;
+       int i, count=0;
+
+       /* for words not at the start of the line fallback to filename completion */
+       if (start) return NULL;
+
+       matches = (char **)malloc(sizeof(matches[0])*MAX_COMPLETIONS);
+       if (!matches) return NULL;
+
+       matches[count++] = strdup(text);
+       if (!matches[0]) return NULL;
+
+       for (i=0;commands[i].fn && count < MAX_COMPLETIONS-1;i++) {
+               if (strncmp(text, commands[i].name, strlen(text)) == 0) {
+                       matches[count] = strdup(commands[i].name);
+                       if (!matches[count]) return NULL;
+                       count++;
+               }
+       }
+
+       if (count == 2) {
+               SAFE_FREE(matches[0]);
+               matches[0] = strdup(matches[1]);
+       }
+       matches[count] = NULL;
+       return matches;
+}
+
+
+/****************************************************************************
+make sure we swallow keepalives during idle time
+****************************************************************************/
+static void readline_callback(void)
+{
+       fd_set fds;
+       struct timeval timeout;
+       static time_t last_t;
+       time_t t;
+
+       t = time(NULL);
+
+       if (t - last_t < 5) return;
+
+       last_t = t;
+
+ again:
+       FD_ZERO(&fds);
+       FD_SET(cli->fd,&fds);
+
+       timeout.tv_sec = 0;
+       timeout.tv_usec = 0;
+       sys_select_intr(cli->fd+1,&fds,&timeout);
+               
+       /* We deliberately use receive_smb instead of
+          client_receive_smb as we want to receive
+          session keepalives and then drop them here.
+       */
+       if (FD_ISSET(cli->fd,&fds)) {
+               receive_smb(cli->fd,cli->inbuf,0);
+               goto again;
+       }
+      
+       cli_chkpath(cli, "\\");
+}
+
+
 /****************************************************************************
 process commands on stdin
 ****************************************************************************/
 static void process_stdin(void)
 {
-       pstring line;
        char *ptr;
 
-       while (!feof(stdin)) {
+       while (1) {
                fstring tok;
+               fstring the_prompt;
+               char *cline;
+               pstring line;
                int i;
-
-               /* display a prompt */
-               DEBUG(0,("smb: %s> ", CNV_LANG(cur_dir)));
-               dbgflush( );
                
-               wait_keyboard();
+               /* display a prompt */
+               slprintf(the_prompt, sizeof(the_prompt)-1, "smb: %s> ", cur_dir);
+               cline = smb_readline(the_prompt, readline_callback, completion_fn);
+                       
+               if (!cline) break;
                
-               /* and get a response */
-               if (!fgets(line,1000,stdin))
-                       break;
+               pstrcpy(line, cline);
 
-               /* input language code to internal one */
-               CNV_INPUT (line);
-               
                /* special case - first char is ! */
                if (*line == '!') {
                        system(line + 1);
@@ -1601,14 +1946,14 @@ static void process_stdin(void)
       
                /* and get the first part of the command */
                ptr = line;
-               if (!next_token(&ptr,tok,NULL,sizeof(tok))) continue;
+               if (!next_token_nr(&ptr,tok,NULL,sizeof(tok))) continue;
 
                if ((i = process_tok(tok)) >= 0) {
                        commands[i].fn();
                } else if (i == -2) {
-                       DEBUG(0,("%s: command abbreviation ambiguous\n",CNV_LANG(tok)));
+                       d_printf("%s: command abbreviation ambiguous\n",tok);
                } else {
-                       DEBUG(0,("%s: command not found\n",CNV_LANG(tok)));
+                       d_printf("%s: command not found\n",tok);
                }
        }
 }
@@ -1617,46 +1962,59 @@ static void process_stdin(void)
 /***************************************************** 
 return a connection to a server
 *******************************************************/
-struct cli_state *do_connect(char *server, char *share)
+struct cli_state *do_connect(const char *server, const char *share)
 {
        struct cli_state *c;
        struct nmb_name called, calling;
-       char *server_n;
+       const char *server_n;
        struct in_addr ip;
        extern struct in_addr ipzero;
-
-       if (*share == '\\') {
-               server = share+2;
-               share = strchr(server,'\\');
-               if (!share) return NULL;
-               *share = 0;
-               share++;
+       fstring servicename;
+       char *sharename;
+       
+       /* make a copy so we don't modify the global string 'service' */
+       safe_strcpy(servicename, share, sizeof(servicename)-1);
+       sharename = servicename;
+       if (*sharename == '\\') {
+               server = sharename+2;
+               sharename = strchr_m(server,'\\');
+               if (!sharename) return NULL;
+               *sharename = 0;
+               sharename++;
        }
 
        server_n = server;
        
        ip = ipzero;
 
-       strupper(server);
-
-       make_nmb_name(&calling, global_myname, 0x0, "");
-       make_nmb_name(&called , server, name_type, "");
+       make_nmb_name(&calling, global_myname, 0x0);
+       make_nmb_name(&called , server, name_type);
 
  again:
        ip = ipzero;
        if (have_ip) ip = dest_ip;
 
        /* have to open a new connection */
-       if (!(c=cli_initialise(NULL)) || !cli_connect(c, server_n, &ip)) {
-               DEBUG(0,("Connection to %s failed\n", server_n));
+       if (!(c=cli_initialise(NULL)) || (cli_set_port(c, port) != port) ||
+           !cli_connect(c, server_n, &ip)) {
+               d_printf("Connection to %s failed\n", server_n);
                return NULL;
        }
 
+       c->protocol = max_protocol;
+
        if (!cli_session_request(c, &calling, &called)) {
-               DEBUG(0,("session request to %s failed\n", called.name));
+               char *p;
+               d_printf("session request to %s failed (%s)\n", 
+                        called.name, cli_errstr(c));
                cli_shutdown(c);
+               SAFE_FREE(c);
+               if ((p=strchr_m(called.name, '.'))) {
+                       *p = 0;
+                       goto again;
+               }
                if (strcmp(called.name, "*SMBSERVER")) {
-                       make_nmb_name(&called , "*SMBSERVER", 0x20, "");
+                       make_nmb_name(&called , "*SMBSERVER", 0x20);
                        goto again;
                }
                return NULL;
@@ -1665,8 +2023,9 @@ struct cli_state *do_connect(char *server, char *share)
        DEBUG(4,(" session request ok\n"));
 
        if (!cli_negprot(c)) {
-               DEBUG(0,("protocol negotiation failed\n"));
+               d_printf("protocol negotiation failed\n");
                cli_shutdown(c);
+               SAFE_FREE(c);
                return NULL;
        }
 
@@ -1681,8 +2040,15 @@ struct cli_state *do_connect(char *server, char *share)
                               password, strlen(password),
                               password, strlen(password),
                               workgroup)) {
-               DEBUG(0,("session setup failed: %s\n", cli_errstr(c)));
-               return NULL;
+               /* if a password was not supplied then try again with a null username */
+               if (password[0] || !username[0] || 
+                   !cli_session_setup(c, "", "", 0, "", 0, workgroup)) { 
+                       d_printf("session setup failed: %s\n", cli_errstr(c));
+                       cli_shutdown(c);
+                       SAFE_FREE(c);
+                       return NULL;
+               }
+               d_printf("Anonymous login successful\n");
        }
 
        /*
@@ -1693,16 +2059,18 @@ struct cli_state *do_connect(char *server, char *share)
         * mode to turn these on/off ? JRA.
         */
 
-       if (*c->server_domain || *c->server_os || *c->server_type)
+       if (*c->server_domain || *c->server_os || *c->server_type){
                DEBUG(1,("Domain=[%s] OS=[%s] Server=[%s]\n",
                        c->server_domain,c->server_os,c->server_type));
+       }               
        
        DEBUG(4,(" session setup ok\n"));
 
-       if (!cli_send_tconX(c, share, "?????",
+       if (!cli_send_tconX(c, sharename, "?????",
                            password, strlen(password)+1)) {
-               DEBUG(0,("tree connect failed: %s\n", cli_errstr(c)));
+               d_printf("tree connect failed: %s\n", cli_errstr(c));
                cli_shutdown(c);
+               SAFE_FREE(c);
                return NULL;
        }
 
@@ -1718,7 +2086,6 @@ struct cli_state *do_connect(char *server, char *share)
 static BOOL process(char *base_directory)
 {
        cli = do_connect(desthost, service);
-       
        if (!cli) {
                return(False);
        }
@@ -1740,33 +2107,34 @@ usage on the program
 ****************************************************************************/
 static void usage(char *pname)
 {
-  DEBUG(0,("Usage: %s service <password> ", pname));
-
-  DEBUG(0,("\nVersion %s\n",VERSION));
-  DEBUG(0,("\t-s smb.conf           pathname to smb.conf file\n"));
-  DEBUG(0,("\t-B IP addr            broadcast IP address to use\n"));
-  DEBUG(0,("\t-O socket_options     socket options to use\n"));
-  DEBUG(0,("\t-R name resolve order use these name resolution services only\n"));
-  DEBUG(0,("\t-M host               send a winpopup message to the host\n"));
-  DEBUG(0,("\t-i scope              use this NetBIOS scope\n"));
-  DEBUG(0,("\t-N                    don't ask for a password\n"));
-  DEBUG(0,("\t-n netbios name.      Use this name as my netbios name\n"));
-  DEBUG(0,("\t-d debuglevel         set the debuglevel\n"));
-  DEBUG(0,("\t-P                    connect to service as a printer\n"));
-  DEBUG(0,("\t-p port               connect to the specified port\n"));
-  DEBUG(0,("\t-l log basename.      Basename for log/debug files\n"));
-  DEBUG(0,("\t-h                    Print this help message.\n"));
-  DEBUG(0,("\t-I dest IP            use this IP to connect to\n"));
-  DEBUG(0,("\t-E                    write messages to stderr instead of stdout\n"));
-  DEBUG(0,("\t-U username           set the network username\n"));
-  DEBUG(0,("\t-L host               get a list of shares available on a host\n"));
-  DEBUG(0,("\t-t terminal code      terminal i/o code {sjis|euc|jis7|jis8|junet|hex}\n"));
-  DEBUG(0,("\t-m max protocol       set the max protocol level\n"));
-  DEBUG(0,("\t-W workgroup          set the workgroup name\n"));
-  DEBUG(0,("\t-T<c|x>IXFqgbNan      command line tar\n"));
-  DEBUG(0,("\t-D directory          start from directory\n"));
-  DEBUG(0,("\t-c command string     execute semicolon separated commands\n"));
-  DEBUG(0,("\n"));
+  d_printf("Usage: %s service <password> [options]", pname);
+
+  d_printf("\nVersion %s\n",VERSION);
+  d_printf("\t-s smb.conf           pathname to smb.conf file\n");
+  d_printf("\t-O socket_options     socket options to use\n");
+  d_printf("\t-R name resolve order use these name resolution services only\n");
+  d_printf("\t-M host               send a winpopup message to the host\n");
+  d_printf("\t-i scope              use this NetBIOS scope\n");
+  d_printf("\t-N                    don't ask for a password\n");
+  d_printf("\t-n netbios name.      Use this name as my netbios name\n");
+  d_printf("\t-d debuglevel         set the debuglevel\n");
+  d_printf("\t-P                    connect to service as a printer\n");
+  d_printf("\t-p port               connect to the specified port\n");
+  d_printf("\t-l log basename.      Basename for log/debug files\n");
+  d_printf("\t-h                    Print this help message.\n");
+  d_printf("\t-I dest IP            use this IP to connect to\n");
+  d_printf("\t-E                    write messages to stderr instead of stdout\n");
+  d_printf("\t-U username           set the network username\n");
+  d_printf("\t-L host               get a list of shares available on a host\n");
+  d_printf("\t-t terminal code      terminal i/o code {sjis|euc|jis7|jis8|junet|hex}\n");
+  d_printf("\t-m max protocol       set the max protocol level\n");
+  d_printf("\t-A filename           get the credentials from a file\n");
+  d_printf("\t-W workgroup          set the workgroup name\n");
+  d_printf("\t-T<c|x>IXFqgbNan      command line tar\n");
+  d_printf("\t-D directory          start from directory\n");
+  d_printf("\t-c command string     execute semicolon separated commands\n");
+  d_printf("\t-b xmit/send buffer   changes the transmit/send buffer (default: 65520)\n");
+  d_printf("\n");
 }
 
 
@@ -1788,7 +2156,7 @@ static void get_password_file(void)
                sscanf(p, "%d", &fd);
                close_it = False;
        } else if ((p = getenv("PASSWD_FILE")) != NULL) {
-               fd = open(p, O_RDONLY);
+               fd = sys_open(p, O_RDONLY, 0);
                pstrcpy(spec, p);
                if (fd < 0) {
                        fprintf(stderr, "Error opening PASSWD_FILE %s: %s\n",
@@ -1833,10 +2201,11 @@ static void get_password_file(void)
 /****************************************************************************
 handle a -L query
 ****************************************************************************/
-static int do_host_query(char *query_host, int port)
+static int do_host_query(char *query_host)
 {
        cli = do_connect(query_host, "IPC$");
-       if (!cli) return 1;
+       if (!cli)
+               return 1;
 
        browse_host(True);
        list_servers(workgroup);
@@ -1850,10 +2219,12 @@ static int do_host_query(char *query_host, int port)
 /****************************************************************************
 handle a tar operation
 ****************************************************************************/
-static int do_tar_op(int port, char *base_directory)
+static int do_tar_op(char *base_directory)
 {
        int ret;
        cli = do_connect(desthost, service);
+       if (!cli)
+               return 1;
 
        recurse=True;
 
@@ -1876,21 +2247,19 @@ static int do_message_op(void)
 
        ip = ipzero;
 
-       strupper(desthost);
-
-       make_nmb_name(&calling, global_myname, 0x0, "");
-       make_nmb_name(&called , desthost, name_type, "");
+       make_nmb_name(&calling, global_myname, 0x0);
+       make_nmb_name(&called , desthost, name_type);
 
        ip = ipzero;
        if (have_ip) ip = dest_ip;
 
-       if (!(cli=cli_initialise(NULL)) || !cli_connect(cli, desthost, &ip)) {
-               DEBUG(0,("Connection to %s failed\n", desthost));
+       if (!(cli=cli_initialise(NULL)) || (cli_set_port(cli, port) != port) || !cli_connect(cli, desthost, &ip)) {
+               d_printf("Connection to %s failed\n", desthost);
                return 1;
        }
 
        if (!cli_session_request(cli, &calling, &called)) {
-               DEBUG(0,("session request failed\n"));
+               d_printf("session request failed\n");
                cli_shutdown(cli);
                return 1;
        }
@@ -1909,14 +2278,12 @@ static int do_message_op(void)
 {
        fstring base_directory;
        char *pname = argv[0];
-       int port = SMB_PORT;
        int opt;
-       extern FILE *dbf;
        extern char *optarg;
        extern int optind;
+       int old_debug;
        pstring query_host;
        BOOL message = False;
-       BOOL explicit_user = False;
        extern char tar_type;
        static pstring servicesf = CONFIGFILE;
        pstring term_code;
@@ -1935,26 +2302,43 @@ static int do_message_op(void)
        *new_name_resolve_order = 0;
 
        DEBUGLEVEL = 2;
-
        setup_logging(pname,True);
 
-       TimeInit();
-       charset_initialise();
+       /*
+        * If the -E option is given, be careful not to clobber stdout
+        * before processing the options.  28.Feb.99, richard@hacom.nl.
+        * Also pre-parse the -s option to get the service file name.
+        */
 
-       if(!get_myname(myhostname,NULL)) {
-               DEBUG(0,("Failed to get my hostname.\n"));
+       for (opt = 1; opt < argc; opt++) {
+               if (strcmp(argv[opt], "-E") == 0)
+                       dbf = x_stderr;
+               else if(strncmp(argv[opt], "-s", 2) == 0) {
+                       if(argv[opt][2] != '\0')
+                               pstrcpy(servicesf, &argv[opt][2]);
+                       else if(argv[opt+1] != NULL) {
+                               /*
+                                * At least one more arg left.
+                                */
+                               pstrcpy(servicesf, argv[opt+1]);
+                       } else {
+                               usage(pname);
+                               exit(1);
+                       }
+               }
        }
 
+       TimeInit();
+
        in_client = True;   /* Make sure that we tell lp_load we are */
 
+       old_debug = DEBUGLEVEL;
        if (!lp_load(servicesf,True,False,False)) {
                fprintf(stderr, "Can't load %s - run testparm to debug it\n", servicesf);
        }
+       DEBUGLEVEL = old_debug;
        
-       codepage_initialise(lp_client_code_page());
-
-       interpret_coding_system(term_code);
-
 #ifdef WITH_SSL
        sslutil_init(0);
 #endif
@@ -1971,11 +2355,11 @@ static int do_message_op(void)
                /* modification to support userid%passwd syntax in the USER var
                   25.Aug.97, jdblair@uab.edu */
 
-               if ((p=strchr(username,'%'))) {
+               if ((p=strchr_m(username,'%'))) {
                        *p = 0;
                        pstrcpy(password,p+1);
                        got_pass = True;
-                       memset(strchr(getenv("USER"),'%')+1,'X',strlen(password));
+                       memset(strchr_m(getenv("USER"),'%')+1,'X',strlen(password));
                }
                strupper(username);
        }
@@ -2015,7 +2399,7 @@ static int do_message_op(void)
                
                if (count_chars(service,'\\') < 3) {
                        usage(pname);
-                       printf("\n%s: Not enough '\\' characters in service\n",service);
+                       d_printf("\n%s: Not enough '\\' characters in service\n",service);
                        exit(1);
                }
 
@@ -2029,14 +2413,11 @@ static int do_message_op(void)
        }
 
        while ((opt = 
-               getopt(argc, argv,"s:B:O:R:M:i:Nn:d:Pp:l:hI:EU:L:t:m:W:T:D:c:")) != EOF) {
+               getopt(argc, argv,"s:O:R:M:i:Nn:d:Pp:l:hI:EU:L:t:m:W:T:D:c:b:A:")) != EOF) {
                switch (opt) {
                case 's':
                        pstrcpy(servicesf, optarg);
                        break;
-               case 'B':
-                       iface_set_default(NULL,optarg,NULL);
-                       break;
                case 'O':
                        pstrcpy(user_socket_options,optarg);
                        break;  
@@ -2046,11 +2427,14 @@ static int do_message_op(void)
                case 'M':
                        name_type = 0x03; /* messages are sent to NetBIOS name type 0x3 */
                        pstrcpy(desthost,optarg);
-                       strupper(desthost);
                        message = True;
                        break;
                case 'i':
-                       pstrcpy(scope,optarg);
+                       {
+                               extern pstring global_scope;
+                               pstrcpy(global_scope,optarg);
+                               strupper(global_scope);
+                       }
                        break;
                case 'N':
                        got_pass = True;
@@ -2086,31 +2470,88 @@ static int do_message_op(void)
                        }
                        break;
                case 'E':
-                       dbf = stderr;
+                       display_set_stderr();
+                       dbf = x_stderr;
                        break;
                case 'U':
                        {
                                char *lp;
-                               explicit_user = True;
                                pstrcpy(username,optarg);
-                               if ((lp=strchr(username,'%'))) {
+                               if ((lp=strchr_m(username,'%'))) {
                                        *lp = 0;
                                        pstrcpy(password,lp+1);
                                        got_pass = True;
-                                       memset(strchr(optarg,'%')+1,'X',strlen(password));
+                                       memset(strchr_m(optarg,'%')+1,'X',strlen(password));
+                               }
+                       }
+                       break;
+
+               case 'A':
+                       {
+                               XFILE *auth;
+                               fstring buf;
+                               uint16 len = 0;
+                               char *ptr, *val, *param;
+                               
+                               if ((auth=x_fopen(optarg, O_RDONLY, 0)) == NULL)
+                               {
+                                       /* fail if we can't open the credentials file */
+                                       d_printf("ERROR: Unable to open credentials file!\n");
+                                       exit (-1);
                                }
+                                
+                               while (!x_feof(auth))
+                               {  
+                                       /* get a line from the file */
+                                       if (!x_fgets(buf, sizeof(buf), auth))
+                                               continue;
+                                       len = strlen(buf);
+                                       
+                                       if ((len) && (buf[len-1]=='\n'))
+                                       {
+                                               buf[len-1] = '\0';
+                                               len--;
+                                       }       
+                                       if (len == 0)
+                                               continue;
+                                       
+                                       /* break up the line into parameter & value.
+                                          will need to eat a little whitespace possibly */
+                                       param = buf;
+                                       if (!(ptr = strchr_m (buf, '=')))
+                                               continue;
+                                       val = ptr+1;
+                                       *ptr = '\0';
+                                       
+                                       /* eat leading white space */
+                                       while ((*val!='\0') && ((*val==' ') || (*val=='\t')))
+                                               val++;
+                                       
+                                       if (strwicmp("password", param) == 0)
+                                       {
+                                               pstrcpy(password, val);
+                                               got_pass = True;
+                                       }
+                                       else if (strwicmp("username", param) == 0)
+                                               pstrcpy(username, val);
+                                               
+                                       memset(buf, 0, sizeof(buf));
+                               }
+                               x_fclose(auth);
                        }
                        break;
+
                case 'L':
-                       pstrcpy(query_host,optarg);
-                       if(!explicit_user)
-                               *username = '\0';
+                       p = optarg;
+                       while(*p == '\\' || *p == '/')
+                               p++;
+                       pstrcpy(query_host,p);
                        break;
                case 't':
                        pstrcpy(term_code, optarg);
                        break;
                case 'm':
-                       /* no longer supported */
+                       max_protocol = interpret_protocol(optarg, max_protocol);
                        break;
                case 'W':
                        pstrcpy(workgroup,optarg);
@@ -2126,7 +2567,9 @@ static int do_message_op(void)
                        break;
                case 'c':
                        cmdstr = optarg;
-                       got_pass = True;
+                       break;
+               case 'b':
+                       io_bufsize = MAX(1, atoi(optarg));
                        break;
                default:
                        usage(pname);
@@ -2134,8 +2577,7 @@ static int do_message_op(void)
                }
        }
 
-       get_myname((*global_myname)?NULL:global_myname,NULL);  
-       strupper(global_myname);
+       get_myname((*global_myname)?NULL:global_myname);  
 
        if(*new_name_resolve_order)
                lp_set_name_resolve_order(new_name_resolve_order);
@@ -2148,28 +2590,28 @@ static int do_message_op(void)
        DEBUG( 3, ( "Client started (version %s).\n", VERSION ) );
 
        if (tar_type) {
-               return do_tar_op(port, base_directory);
+               if (cmdstr)
+                       process_command_string(cmdstr);
+               return do_tar_op(base_directory);
        }
 
-       if ((p=strchr(query_host,'#'))) {
+       if ((p=strchr_m(query_host,'#'))) {
                *p = 0;
                p++;
                sscanf(p, "%x", &name_type);
        }
   
        if (*query_host) {
-               return do_host_query(query_host, port);
+               return do_host_query(query_host);
        }
 
        if (message) {
                return do_message_op();
        }
-
+       
        if (!process(base_directory)) {
-               close_sockets();
                return(1);
        }
-       close_sockets();
 
        return(0);
 }