This is the netlogon schannel client code. Try a
[sfrench/samba-autobuild/.git] / source3 / rpcclient / rpcclient.c
index a62c3d83653548c21ebf0d8cbd1c753528c75dfd..1de181f77c9a20eb5363a20c5d9b9dc00c87bbbc 100644 (file)
@@ -3,6 +3,7 @@
    RPC pipe client
 
    Copyright (C) Tim Potter 2000-2001
+   Copyright (C) Martin Pool 2003
 
    This program is free software; you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
 
 DOM_SID domain_sid;
 
-/* List to hold groups of commands */
+
+/* List to hold groups of commands.
+ *
+ * Commands are defined in a list of arrays: arrays are easy to
+ * statically declare, and lists are easier to dynamically extend.
+ */
 
 static struct cmd_list {
        struct cmd_list *prev, *next;
@@ -67,7 +73,10 @@ static char **completion_fn(char *text, int start, int end)
                for (i=0; commands->cmd_set[i].name; i++)
                {
                        if ((strncmp(text, commands->cmd_set[i].name, strlen(text)) == 0) &&
-                               commands->cmd_set[i].fn) 
+                               (( commands->cmd_set[i].returntype == RPC_RTYPE_NTSTATUS &&
+                        commands->cmd_set[i].ntfn ) || 
+                      ( commands->cmd_set[i].returntype == RPC_RTYPE_WERROR &&
+                        commands->cmd_set[i].wfn)))
                        {
                                matches[count] = strdup(commands->cmd_set[i].name);
                                if (!matches[count]) 
@@ -88,70 +97,6 @@ static char **completion_fn(char *text, int start, int end)
        return matches;
 }
 
-/***********************************************************************
- * read in username/password credentials from a file
- */
-static void read_authfile (
-       char *filename, 
-       char* username, 
-       char* password, 
-       char* domain
-)
-{
-       FILE *auth;
-        fstring buf;
-        uint16 len = 0;
-       char *ptr, *val, *param;
-                               
-       if ((auth=sys_fopen(filename, "r")) == NULL)
-       {
-               printf ("ERROR: Unable to open credentials file!\n");
-               return;
-       }
-                                
-       while (!feof(auth))
-       {  
-               /* get a line from the file */
-               if (!fgets (buf, sizeof(buf), auth))
-                       continue;
-               
-               len = strlen(buf);
-               
-               /* skip empty lines */                  
-               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)
-                       fstrcpy (password, val);
-               else if (strwicmp("username", param) == 0)
-                       fstrcpy (username, val);
-               else if (strwicmp("domain", param) == 0)
-                       fstrcpy (domain, val);
-                                               
-               memset(buf, 0, sizeof(buf));
-       }
-       fclose(auth);
-       
-       return;
-}
-
 static char* next_command (char** cmdstr)
 {
        static pstring          command;
@@ -164,26 +109,14 @@ static char* next_command (char** cmdstr)
        if (p)
                *p = '\0';
        pstrcpy(command, *cmdstr);
-       *cmdstr = p;
+       if (p)
+               *cmdstr = p + 1;
+       else
+               *cmdstr = NULL;
        
        return command;
 }
 
-static void get_username (char *username)
-{
-        if (getenv("USER"))
-                pstrcpy(username,getenv("USER"));
-        if (*username == 0 && getenv("LOGNAME"))
-                pstrcpy(username,getenv("LOGNAME"));
-        if (*username == 0) {
-                pstrcpy(username,"GUEST");
-        }
-
-       return;
-}
-
 /* Fetch the SID for this computer */
 
 static void fetch_machine_sid(struct cli_state *cli)
@@ -197,14 +130,14 @@ static void fetch_machine_sid(struct cli_state *cli)
 
        if (got_domain_sid) return;
 
-       if (!(mem_ctx=talloc_init()))
+       if (!(mem_ctx=talloc_init("fetch_machine_sid")))
        {
                DEBUG(0,("fetch_machine_sid: talloc_init returned NULL!\n"));
                goto error;
        }
 
 
-       if (!cli_nt_session_open (cli, PIPE_LSARPC)) {
+       if (!cli_nt_session_open (cli, PI_LSARPC)) {
                fprintf(stderr, "could not initialise lsa pipe\n");
                goto error;
        }
@@ -243,7 +176,7 @@ static void fetch_machine_sid(struct cli_state *cli)
 /* List the available commands on a given pipe */
 
 static NTSTATUS cmd_listcommands(struct cli_state *cli, TALLOC_CTX *mem_ctx,
-                         int argc, char **argv)
+                                int argc, const char **argv)
 {
        struct cmd_list *tmp;
         struct cmd_set *tmp_set;
@@ -288,7 +221,7 @@ static NTSTATUS cmd_listcommands(struct cli_state *cli, TALLOC_CTX *mem_ctx,
 /* Display help on commands */
 
 static NTSTATUS cmd_help(struct cli_state *cli, TALLOC_CTX *mem_ctx,
-                         int argc, char **argv)
+                         int argc, const char **argv)
 {
        struct cmd_list *tmp;
         struct cmd_set *tmp_set;
@@ -348,7 +281,7 @@ static NTSTATUS cmd_help(struct cli_state *cli, TALLOC_CTX *mem_ctx,
 /* Change the debug level */
 
 static NTSTATUS cmd_debuglevel(struct cli_state *cli, TALLOC_CTX *mem_ctx,
-                               int argc, char **argv)
+                               int argc, const char **argv)
 {
        if (argc > 2) {
                printf("Usage: %s [debuglevel]\n", argv[0]);
@@ -365,30 +298,30 @@ static NTSTATUS cmd_debuglevel(struct cli_state *cli, TALLOC_CTX *mem_ctx,
 }
 
 static NTSTATUS cmd_quit(struct cli_state *cli, TALLOC_CTX *mem_ctx,
-                         int argc, char **argv)
+                         int argc, const char **argv)
 {
        exit(0);
        return NT_STATUS_OK; /* NOTREACHED */
 }
 
-/* Build in rpcclient commands */
+/* Built in rpcclient commands */
 
 static struct cmd_set rpcclient_commands[] = {
 
        { "GENERAL OPTIONS" },
 
-       { "help",       cmd_help,       NULL,   "Get help on commands", "[command]" },
-       { "?",          cmd_help,       NULL,   "Get help on commands", "[command]" },
-       { "debuglevel", cmd_debuglevel, NULL,   "Set debug level", "level" },
-       { "list",       cmd_listcommands, NULL, "List available commands on <pipe>", "pipe" },
-       { "exit",       cmd_quit,       NULL,   "Exit program", "" },
-       { "quit",       cmd_quit,       NULL,   "Exit program", "" },
+       { "help", RPC_RTYPE_NTSTATUS, cmd_help, NULL,     -1,   "Get help on commands", "[command]" },
+       { "?",  RPC_RTYPE_NTSTATUS, cmd_help, NULL,       -1,   "Get help on commands", "[command]" },
+       { "debuglevel", RPC_RTYPE_NTSTATUS, cmd_debuglevel, NULL,   -1, "Set debug level", "level" },
+       { "list",       RPC_RTYPE_NTSTATUS, cmd_listcommands, NULL, -1, "List available commands on <pipe>", "pipe" },
+       { "exit", RPC_RTYPE_NTSTATUS, cmd_quit, NULL,   -1,     "Exit program", "" },
+       { "quit", RPC_RTYPE_NTSTATUS, cmd_quit, NULL,     -1,   "Exit program", "" },
 
        { NULL }
 };
 
 static struct cmd_set separator_command[] = {
-       { "---------------", NULL,      NULL,   "----------------------" },
+       { "---------------", MAX_RPC_RETURN_TYPE, NULL, NULL,   -1,     "----------------------" },
        { NULL }
 };
 
@@ -402,10 +335,12 @@ extern struct cmd_set netlogon_commands[];
 extern struct cmd_set srvsvc_commands[];
 extern struct cmd_set dfs_commands[];
 extern struct cmd_set reg_commands[];
+extern struct cmd_set ds_commands[];
 
 static struct cmd_set *rpcclient_command_list[] = {
        rpcclient_commands,
        lsarpc_commands,
+       ds_commands,
        samr_commands,
        spoolss_commands,
        netlogon_commands,
@@ -430,281 +365,193 @@ static void add_command_set(struct cmd_set *cmd_set)
        DLIST_ADD(cmd_list, entry);
 }
 
-static NTSTATUS do_cmd(struct cli_state *cli, struct cmd_set *cmd_entry, 
-                       char *cmd)
-{
-       char *p = cmd, **argv = NULL;
-       NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
-       pstring buf;
-       int argc = 0, i;
-
-       /* Count number of arguments first time through the loop then
-          allocate memory and strdup them. */
-
- again:
-       while(next_token(&p, buf, " ", sizeof(buf))) {
-               if (argv) {
-                       argv[argc] = strdup(buf);
-               }
-               
-               argc++;
-       }
-                               
-       if (!argv) {
 
-               /* Create argument list */
+/**
+ * Call an rpcclient function, passing an argv array.
+ *
+ * @param cmd Command to run, as a single string.
+ **/
+static NTSTATUS do_cmd(struct cli_state *cli,
+                      struct cmd_set *cmd_entry,
+                      int argc, char **argv)
+{
+     NTSTATUS ntresult;
+     WERROR wresult;
+       
+       TALLOC_CTX *mem_ctx;
 
-               argv = (char **)malloc(sizeof(char *) * argc);
-                memset(argv, 0, sizeof(char *) * argc);
+       /* Create mem_ctx */
 
-               if (!argv) {
-                       fprintf(stderr, "out of memory\n");
-                       result = NT_STATUS_NO_MEMORY;
-                        goto done;
-               }
-                                       
-               p = cmd;
-               argc = 0;
-                                       
-               goto again;
+       if (!(mem_ctx = talloc_init("do_cmd"))) {
+               DEBUG(0, ("talloc_init() failed\n"));
+               return NT_STATUS_UNSUCCESSFUL;
        }
 
-       /* Call the function */
-
-       if (cmd_entry->fn) {
-                TALLOC_CTX *mem_ctx;
-
-                /* Create mem_ctx */
-
-                if (!(mem_ctx = talloc_init())) {
-                        DEBUG(0, ("talloc_init() failed\n"));
-                        goto done;
-                }
+       /* Open pipe */
 
-                /* Open pipe */
+       if (cmd_entry->pipe_idx == PI_NETLOGON) {
+               uchar trust_password[16];
 
-                if (cmd_entry->pipe)
-                        if (!cli_nt_session_open(cli, cmd_entry->pipe)) {
-                                DEBUG(0, ("Could not initialise %s\n",
-                                          cmd_entry->pipe));
-                                goto done;
-                        }
-
-                /* Run command */
-
-                result = cmd_entry->fn(cli, mem_ctx, argc, argv);
+               if (!secrets_fetch_trust_account_password(lp_workgroup(),
+                                                         trust_password,
+                                                         NULL)) {
+                       return NT_STATUS_UNSUCCESSFUL;
+               }
 
-                /* Cleanup */
+               if (!cli_nt_open_netlogon(cli, trust_password,
+                                         SEC_CHAN_WKSTA)) {
+                       DEBUG(0, ("Could not initialize NETLOGON pipe\n"));
+                       return NT_STATUS_UNSUCCESSFUL;
+               }
+       } else {
+               if (cmd_entry->pipe_idx != -1) {
+                       if (!cli_nt_session_open(cli, cmd_entry->pipe_idx)) {
+                               DEBUG(0, ("Could not initialize pipe\n"));
+                               return NT_STATUS_UNSUCCESSFUL;
+                       }
+               }
+       }
 
-                if (cmd_entry->pipe)
-                        cli_nt_session_close(cli);
+     /* Run command */
+
+     if ( cmd_entry->returntype == RPC_RTYPE_NTSTATUS ) {
+          ntresult = cmd_entry->ntfn(cli, mem_ctx, argc, (const char **) argv);
+          if (!NT_STATUS_IS_OK(ntresult)) {
+              printf("result was %s\n", nt_errstr(ntresult));
+          }
+     } else {
+          wresult = cmd_entry->wfn( cli, mem_ctx, argc, (const char **) argv);
+          /* print out the DOS error */
+          if (!W_ERROR_IS_OK(wresult)) {
+                  printf( "result was %s\n", dos_errstr(wresult));
+          }
+          ntresult = W_ERROR_IS_OK(wresult)?NT_STATUS_OK:NT_STATUS_UNSUCCESSFUL;
+     }
+            
 
-                talloc_destroy(mem_ctx);
+       /* Cleanup */
 
-       } else {
-               fprintf (stderr, "Invalid command\n");
-                goto done;
-        }
+       if (cmd_entry->pipe_idx != -1)
+               cli_nt_session_close(cli);
 
- done:
-                                               
-       /* Cleanup */
+       talloc_destroy(mem_ctx);
 
-        if (argv) {
-                for (i = 0; i < argc; i++)
-                        SAFE_FREE(argv[i]);
-       
-                SAFE_FREE(argv);
-        }
-       
-       return result;
+       return ntresult;
 }
 
-/* Process a command entered at the prompt or as part of -c */
 
+/**
+ * Process a command entered at the prompt or as part of -c
+ *
+ * @returns The NTSTATUS from running the command.
+ **/
 static NTSTATUS process_cmd(struct cli_state *cli, char *cmd)
 {
        struct cmd_list *temp_list;
-       BOOL found = False;
-       pstring buf;
-       char *p = cmd;
        NTSTATUS result = NT_STATUS_OK;
-       int len = 0;
-
-       if (cmd[strlen(cmd) - 1] == '\n')
-               cmd[strlen(cmd) - 1] = '\0';
+       int ret;
+       int argc;
+       char **argv = NULL;
 
-       if (!next_token(&p, buf, " ", sizeof(buf))) {
-               return NT_STATUS_OK;
+       if ((ret = poptParseArgvString(cmd, &argc, (const char ***) &argv)) != 0) {
+               fprintf(stderr, "rpcclient: %s\n", poptStrerror(ret));
+               return NT_STATUS_UNSUCCESSFUL;
        }
 
-        /* strip the trainly \n if it exsists */
-       len = strlen(buf);
-       if (buf[len-1] == '\n')
-               buf[len-1] = '\0';
-
-       /* Search for matching commands */
 
+       /* Walk through a dlist of arrays of commands. */
        for (temp_list = cmd_list; temp_list; temp_list = temp_list->next) {
                struct cmd_set *temp_set = temp_list->cmd_set;
 
-               while(temp_set->name) {
-                       if (strequal(buf, temp_set->name)) {
-                                found = True;
-                               result = do_cmd(cli, temp_set, cmd);
+               while (temp_set->name) {
+                       if (strequal(argv[0], temp_set->name)) {
+                               if (!(temp_set->returntype == RPC_RTYPE_NTSTATUS && temp_set->ntfn ) &&
+                         !(temp_set->returntype == RPC_RTYPE_WERROR && temp_set->wfn )) {
+                                       fprintf (stderr, "Invalid command\n");
+                                       goto out_free;
+                               }
+
+                               result = do_cmd(cli, temp_set, argc, argv);
 
-                               goto done;
+                               goto out_free;
                        }
                        temp_set++;
                }
        }
 
- done:
-       if (!found && buf[0]) {
-               printf("command not found: %s\n", buf);
-               return NT_STATUS_OK;
+       if (argv[0]) {
+               printf("command not found: %s\n", argv[0]);
        }
 
+out_free:
+/* moved to do_cmd()
        if (!NT_STATUS_IS_OK(result)) {
                printf("result was %s\n", nt_errstr(result));
        }
+*/
 
+       if (argv) {
+               /* NOTE: popt allocates the whole argv, including the
+                * strings, as a single block.  So a single free is
+                * enough to release it -- we don't free the
+                * individual strings.  rtfm. */
+               free(argv);
+       }
+       
        return result;
 }
 
 
-/* Print usage information */
-static void usage(void)
-{
-       printf("Usage: rpcclient [options] server\n");
-
-       printf("\t-A or --authfile authfile          File containing user credentials\n");
-       printf("\t-c or --command \"command string\"   Execute semicolon separated cmds\n");
-       printf("\t-d or --debug debuglevel           Set the debuglevel\n");
-       printf("\t-l or --logfile logfile            Logfile to use instead of stdout\n");
-       printf("\t-h or --help                       Print this help message.\n");
-       printf("\t-N or --nopass                     Don't ask for a password\n");
-       printf("\t-s or --conf configfile            Specify an alternative config file\n");
-       printf("\t-U or --user username              Set the network username\n");
-       printf("\t-W or --workgroup domain           Set the domain name for user account\n");
-       printf("\t-I or --dest-ip ip                 Specify destination IP address\n");
-       printf("\n");
-}
-
 /* Main function */
 
  int main(int argc, char *argv[])
 {
-       extern pstring          global_myname;
-       static int              got_pass = 0;
        BOOL                    interactive = True;
        int                     opt;
-       int                     olddebug;
-       static char             *cmdstr = "";
+       static char             *cmdstr = NULL;
        const char *server;
        struct cli_state        *cli;
-       fstring                 password="",
-                               username="",
-               domain="";
-       static char             *opt_authfile=NULL,
-                               *opt_username=NULL,
-                               *opt_domain=NULL,
-                               *opt_configfile=NULL,
-                               *opt_logfile=NULL,
-                               *opt_ipaddr=NULL;
-       static int              opt_debuglevel;
-       pstring                 logfile;
+       static char             *opt_ipaddr=NULL;
        struct cmd_set          **cmd_set;
        struct in_addr          server_ip;
        NTSTATUS                nt_status;
-       extern BOOL             AllowDebugChange;
 
        /* make sure the vars that get altered (4th field) are in
           a fixed location or certain compilers complain */
        poptContext pc;
        struct poptOption long_options[] = {
-               {"authfile",    'A', POPT_ARG_STRING,   &opt_authfile, 'A'},
-               {"conf",        's', POPT_ARG_STRING,   &opt_configfile, 's'},
-               {"nopass",      'N', POPT_ARG_NONE,     &got_pass},
-               {"debug",       'd', POPT_ARG_INT,      &opt_debuglevel, 'd'},
-               {"debuglevel",  'd', POPT_ARG_INT,      &opt_debuglevel, 'd'},
-               {"user",        'U', POPT_ARG_STRING,   &opt_username, 'U'},
-               {"workgroup",   'W', POPT_ARG_STRING,   &opt_domain, 'W'},
-               {"command",     'c', POPT_ARG_STRING,   &cmdstr},
-               {"logfile",     'l', POPT_ARG_STRING,   &opt_logfile, 'l'},
-               {"help",        'h', POPT_ARG_NONE,     0, 'h'},
-               {"dest-ip",     'I', POPT_ARG_STRING,   &opt_ipaddr, 'I'},
-               { NULL }
+               POPT_AUTOHELP
+               {"command",     'c', POPT_ARG_STRING,   &cmdstr, 'c', "Execute semicolon separated cmds", "COMMANDS"},
+               {"dest-ip", 'I', POPT_ARG_STRING,   &opt_ipaddr, 'I', "Specify destination IP address", "IP"},
+               POPT_COMMON_SAMBA
+               POPT_COMMON_CONNECTION
+               POPT_COMMON_CREDENTIALS
+               POPT_TABLEEND
        };
 
+       ZERO_STRUCT(server_ip);
 
        setlinebuf(stdout);
 
-       DEBUGLEVEL = 1;
-       AllowDebugChange = False;
-
        /* Parse options */
 
+       pc = poptGetContext("rpcclient", argc, (const char **) argv,
+                           long_options, 0);
+
        if (argc == 1) {
-               usage();
+               poptPrintHelp(pc, stderr, 0);
                return 0;
        }
        
-       pc = poptGetContext("rpcclient", argc, (const char **) argv,
-                           long_options, 0);
-       
        while((opt = poptGetNextOpt(pc)) != -1) {
                switch (opt) {
-               case 'A':
-                       /* only get the username, password, and domain from the file */
-                       read_authfile (opt_authfile, username, password, domain);
-                       if (strlen (password))
-                               got_pass = 1;
-                       break;
-                       
-               case 'l':
-                       slprintf(logfile, sizeof(logfile) - 1, "%s.client", 
-                                opt_logfile);
-                       lp_set_logfile(logfile);
-                       interactive = False;
-                       break;
-                       
-               case 's':
-                       pstrcpy(dyn_CONFIGFILE, opt_configfile);
-                       break;
-                       
-               case 'd':
-                       DEBUGLEVEL = opt_debuglevel;
-                       break;
-                       
-               case 'U': {
-                       char *lp;
 
-                       pstrcpy(username,opt_username);
-
-                       if ((lp=strchr_m(username,'%'))) {
-                               *lp = 0;
-                               pstrcpy(password,lp+1);
-                               got_pass = 1;
-                               memset(strchr_m(opt_username,'%') + 1, 'X',
-                                      strlen(password));
-                       }
-                       break;
-               }
                case 'I':
-                       if (!inet_aton(opt_ipaddr, &server_ip)) {
+                       if ( (server_ip.s_addr=inet_addr(opt_ipaddr)) == INADDR_NONE ) {
                                fprintf(stderr, "%s not a valid IP address\n",
                                        opt_ipaddr);
                                return 1;
                        }
-               case 'W':
-                       pstrcpy(domain, opt_domain);
-                       break;
-                       
-               case 'h':
-               default:
-                       usage();
-                       exit(1);
                }
        }
 
@@ -714,7 +561,7 @@ static void usage(void)
        server = poptGetArg(pc);
        
        if (!server || poptGetArg(pc)) {
-               usage();
+               poptPrintHelp(pc, stderr, 0);
                return 1;
        }
 
@@ -727,52 +574,39 @@ static void usage(void)
                reopen_logs();
        
        /* Load smb.conf file */
-       /* FIXME!  How to get this DEBUGLEVEL to last over lp_load()? */
-       olddebug = DEBUGLEVEL;
-       if (!lp_load(dyn_CONFIGFILE,True,False,False)) {
+
+       if (!lp_load(dyn_CONFIGFILE,True,False,False))
                fprintf(stderr, "Can't load %s\n", dyn_CONFIGFILE);
-       }
-       DEBUGLEVEL = olddebug;
 
        load_interfaces();
 
-       get_myname((*global_myname)?NULL:global_myname);
-       strupper(global_myname);
-
-       /* Resolve the IP address */
-
-       if (!opt_ipaddr && !resolve_name(server, &server_ip, 0x20))  {
-               DEBUG(1,("Unable to resolve %s\n", server));
+       if (!init_names())
                return 1;
-       }
-       
+
        /*
         * Get password
         * from stdin if necessary
         */
 
-       if (!got_pass) {
+       if (!cmdline_auth_info.got_pass) {
                char *pass = getpass("Password:");
                if (pass) {
-                       fstrcpy(password, pass);
+                       pstrcpy(cmdline_auth_info.password, pass);
                }
        }
        
-       if (!strlen(username) && !got_pass)
-               get_username(username);
-               
-       nt_status = cli_full_connection(&cli, global_myname, server, 
-                                       &server_ip, 0,
+       nt_status = cli_full_connection(&cli, global_myname(), server, 
+                                       opt_ipaddr ? &server_ip : NULL, 0,
                                        "IPC$", "IPC",  
-                                       username, domain,
-                                       password, 0);
+                                       cmdline_auth_info.username, lp_workgroup(),
+                                       cmdline_auth_info.password, 0, NULL);
        
        if (!NT_STATUS_IS_OK(nt_status)) {
-               DEBUG(1,("Cannot connect to server.  Error was %s\n", nt_errstr(nt_status)));
+               DEBUG(0,("Cannot connect to server.  Error was %s\n", nt_errstr(nt_status)));
                return 1;
        }
 
-       memset(password,'X',sizeof(password));
+       memset(cmdline_auth_info.password,'X',sizeof(cmdline_auth_info.password));
 
        /* Load command lists */
 
@@ -787,7 +621,7 @@ static void usage(void)
        fetch_machine_sid(cli);
  
        /* Do anything specified with -c */
-        if (cmdstr[0]) {
+        if (cmdstr && cmdstr[0]) {
                 char    *cmd;
                 char    *p = cmdstr;