next_token() was supposed to be a reentrant replacement for strtok(),
[kai/samba.git] / source3 / rpcclient / cmd_wkssvc.c
1 /* 
2    Unix SMB/Netbios implementation.
3    Version 1.9.
4    NT Domain Authentication SMB / MSRPC client
5    Copyright (C) Andrew Tridgell 1994-1997
6    Copyright (C) Luke Kenneth Casson Leighton 1996-1997
7    
8    This program is free software; you can redistribute it and/or modify
9    it under the terms of the GNU General Public License as published by
10    the Free Software Foundation; either version 2 of the License, or
11    (at your option) any later version.
12    
13    This program is distributed in the hope that it will be useful,
14    but WITHOUT ANY WARRANTY; without even the implied warranty of
15    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16    GNU General Public License for more details.
17    
18    You should have received a copy of the GNU General Public License
19    along with this program; if not, write to the Free Software
20    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
21 */
22
23
24
25 #ifdef SYSLOG
26 #undef SYSLOG
27 #endif
28
29 #include "includes.h"
30
31 extern int DEBUGLEVEL;
32
33 #define DEBUG_TESTING
34
35 extern struct cli_state *smb_cli;
36
37 extern FILE* out_hnd;
38
39
40 /****************************************************************************
41 workstation get info query
42 ****************************************************************************/
43 void cmd_wks_query_info(struct client_info *info)
44 {
45         fstring dest_wks;
46         fstring tmp;
47         WKS_INFO_100 ctr;
48         uint32 info_level = 100;
49
50         BOOL res = True;
51
52         memset((char *)&ctr, '\0', sizeof(ctr));
53
54         fstrcpy(dest_wks, "\\\\");
55         fstrcat(dest_wks, info->dest_host);
56         strupper(dest_wks);
57
58         if (next_token_nr(NULL, tmp, NULL, sizeof(tmp)))
59         {
60                 info_level = (uint32)strtol(tmp, (char**)NULL, 10);
61         }
62
63         DEBUG(4,("cmd_wks_query_info: server:%s info level: %d\n",
64                                 dest_wks, info_level));
65
66         DEBUG(5, ("cmd_wks_query_info: smb_cli->fd:%d\n", smb_cli->fd));
67
68         /* open LSARPC session. */
69         res = res ? cli_nt_session_open(smb_cli, PIPE_WKSSVC) : False;
70
71         /* send info level: receive requested info.  hopefully. */
72         res = res ? do_wks_query_info(smb_cli, 
73                                 dest_wks, info_level, &ctr) : False;
74
75         /* close the session */
76         cli_nt_session_close(smb_cli);
77
78         if (res)
79         {
80                 DEBUG(5,("cmd_wks_query_info: query succeeded\n"));
81
82 #if 0
83                 display_wks_info_100(out_hnd, ACTION_HEADER   , &ctr);
84                 display_wks_info_100(out_hnd, ACTION_ENUMERATE, &ctr);
85                 display_wks_info_100(out_hnd, ACTION_FOOTER   , &ctr);
86 #endif
87
88         }
89         else
90         {
91                 DEBUG(5,("cmd_wks_query_info: query failed\n"));
92         }
93 }
94