56a0749776c476c2f03ca38be4425a4aa5a087a1
[samba.git] / source3 / rpc_server / srv_svcctl.c
1
2 /* 
3  *  Unix SMB/Netbios implementation.
4  *  Version 1.9.
5  *  RPC Pipe client / server routines
6  *  Copyright (C) Andrew Tridgell              1992-1997,
7  *  Copyright (C) Luke Kenneth Casson Leighton 1996-1997,
8  *  Copyright (C) Paul Ashton                       1997.
9  *  
10  *  This program is free software; you can redistribute it and/or modify
11  *  it under the terms of the GNU General Public License as published by
12  *  the Free Software Foundation; either version 2 of the License, or
13  *  (at your option) any later version.
14  *  
15  *  This program is distributed in the hope that it will be useful,
16  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
17  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18  *  GNU General Public License for more details.
19  *  
20  *  You should have received a copy of the GNU General Public License
21  *  along with this program; if not, write to the Free Software
22  *  Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
23  */
24
25
26 #include "includes.h"
27 #include "nterr.h"
28
29 extern int DEBUGLEVEL;
30
31
32 /*******************************************************************
33  svc_reply_unknown_1
34  ********************************************************************/
35 static void svc_reply_close(SVC_Q_CLOSE *q_r,
36                                 prs_struct *rdata)
37 {
38         SVC_R_CLOSE r_u;
39
40         /* set up the REG unknown_1 response */
41         bzero(r_u.pol.data, POL_HND_SIZE);
42
43         /* close the policy handle */
44         if (close_lsa_policy_hnd(&(q_r->pol)))
45         {
46                 r_u.status = 0;
47         }
48         else
49         {
50                 r_u.status = 0xC0000000 | NT_STATUS_OBJECT_NAME_INVALID;
51         }
52
53         DEBUG(5,("svc_unknown_1: %d\n", __LINE__));
54
55         /* store the response in the SMB stream */
56         svc_io_r_close("", &r_u, rdata, 0);
57
58         DEBUG(5,("svc_unknown_1: %d\n", __LINE__));
59 }
60
61 /*******************************************************************
62  api_svc_close
63  ********************************************************************/
64 static void api_svc_close( uint16 vuid, prs_struct *data,
65                                     prs_struct *rdata )
66 {
67         SVC_Q_CLOSE q_r;
68         svc_io_q_close("", &q_r, data, 0);
69         svc_reply_close(&q_r, rdata);
70 }
71
72
73 /*******************************************************************
74  svc_reply_open_service
75  ********************************************************************/
76 static void svc_reply_open_service(SVC_Q_OPEN_SERVICE *q_u,
77                                 prs_struct *rdata)
78 {
79         uint32 status     = 0;
80         POLICY_HND pol;
81         SVC_R_OPEN_SERVICE r_u;
82         fstring name;
83
84         DEBUG(5,("svc_open_service: %d\n", __LINE__));
85
86         if (status == 0x0 && find_lsa_policy_by_hnd(&q_u->scman_pol) == -1)
87         {
88                 status = 0xC000000 | NT_STATUS_INVALID_HANDLE;
89         }
90
91         if (status == 0x0 && !open_lsa_policy_hnd(&pol))
92         {
93                 status = 0xC000000 | NT_STATUS_TOO_MANY_SECRETS; /* ha ha very droll */
94         }
95
96         unistr2_to_ascii(name, &q_u->uni_svc_name, sizeof(name)-1);
97
98         if (status == 0x0)
99         {
100                 DEBUG(5,("svc_open_service: %s\n", name));
101                 /* lkcl XXXX do a check on the name, here */
102         }
103
104         if (status == 0x0 && !set_lsa_policy_reg_name(&pol, name))
105         {
106                 status = 0xC000000 | NT_STATUS_TOO_MANY_SECRETS; /* ha ha very droll */
107         }
108
109         make_svc_r_open_service(&r_u, &pol, status);
110
111         /* store the response in the SMB stream */
112         svc_io_r_open_service("", &r_u, rdata, 0);
113
114         DEBUG(5,("svc_open_service: %d\n", __LINE__));
115 }
116
117 /*******************************************************************
118  api_svc_open_service
119  ********************************************************************/
120 static void api_svc_open_service( uint16 vuid, prs_struct *data,
121                                     prs_struct *rdata )
122 {
123         SVC_Q_OPEN_SERVICE q_u;
124         svc_io_q_open_service("", &q_u, data, 0);
125         svc_reply_open_service(&q_u, rdata);
126 }
127
128 /*******************************************************************
129  svc_reply_open_sc_man
130  ********************************************************************/
131 static void svc_reply_open_sc_man(SVC_Q_OPEN_SC_MAN *q_u,
132                                 prs_struct *rdata)
133 {
134         uint32 status     = 0;
135         POLICY_HND pol;
136         SVC_R_OPEN_SC_MAN r_u;
137         fstring name;
138
139         DEBUG(5,("svc_open_sc_man: %d\n", __LINE__));
140
141         if (status == 0x0 && !open_lsa_policy_hnd(&pol))
142         {
143                 status = 0xC000000 | NT_STATUS_TOO_MANY_SECRETS; /* ha ha very droll */
144         }
145
146         unistr2_to_ascii(name, &q_u->uni_srv_name, sizeof(name)-1);
147
148         if (status == 0x0)
149         {
150                 DEBUG(5,("svc_open_sc_man: %s\n", name));
151                 /* lkcl XXXX do a check on the name, here */
152         }
153
154         if (status == 0x0 && !set_lsa_policy_reg_name(&pol, name))
155         {
156                 status = 0xC000000 | NT_STATUS_TOO_MANY_SECRETS; /* ha ha very droll */
157         }
158
159         make_svc_r_open_sc_man(&r_u, &pol, status);
160
161         /* store the response in the SMB stream */
162         svc_io_r_open_sc_man("", &r_u, rdata, 0);
163
164         DEBUG(5,("svc_open_sc_man: %d\n", __LINE__));
165 }
166
167 /*******************************************************************
168  api_svc_open_sc_man
169  ********************************************************************/
170 static void api_svc_open_sc_man( uint16 vuid, prs_struct *data,
171                                     prs_struct *rdata )
172 {
173         SVC_Q_OPEN_SC_MAN q_u;
174         svc_io_q_open_sc_man("", &q_u, data, 0);
175         svc_reply_open_sc_man(&q_u, rdata);
176 }
177
178 static char *dummy_services[] =
179 {
180         "imapd",
181         "popd",
182         "smbd",
183         "nmbd",
184         "httpd",
185         "inetd",
186         "syslogd",
187         NULL
188 };
189
190 /*******************************************************************
191  svc_reply_enum_svcs_status
192  ********************************************************************/
193 static void svc_reply_enum_svcs_status(SVC_Q_ENUM_SVCS_STATUS *q_u,
194                                 prs_struct *rdata)
195 {
196         uint32 dos_status = 0;
197         SVC_R_ENUM_SVCS_STATUS r_u;
198         ENUM_SRVC_STATUS *svcs = NULL;
199         int num_svcs = 0;
200         int buf_size = 0;
201         int i = get_enum_hnd(&q_u->resume_hnd);
202         uint32 resume_hnd = 0;
203         int max_buf_size = 0x10000;
204
205         ZERO_STRUCT(r_u);
206
207         DEBUG(5,("svc_enum_svcs_status: %d\n", __LINE__));
208
209         if (dos_status == 0x0 && find_lsa_policy_by_hnd(&q_u->pol) == -1)
210         {
211                 dos_status = 0xC000000 | NT_STATUS_INVALID_HANDLE;
212         }
213
214         if (dos_status == 0x0)
215         {
216                 DEBUG(5,("svc_enum_svcs_status:\n"));
217                 while (dummy_services[i] != NULL)
218                 {
219                         ENUM_SRVC_STATUS *svc = NULL;
220
221                         buf_size += strlen(dummy_services[i] + 1) * 2;
222                         buf_size += 9 * sizeof(uint32);
223
224                         DEBUG(10,("buf_size: %d q_u->buf_size: %d\n",
225                                    buf_size, q_u->buf_size));
226
227                         if (buf_size >= max_buf_size)
228                         {
229                                 resume_hnd = i;
230                                 break;
231                         }
232
233                         if (buf_size > q_u->buf_size)
234                         {
235                                 dos_status = ERRmoredata;
236                                 break;
237                         }
238
239                         num_svcs++;
240                         svcs = Realloc(svcs, num_svcs * sizeof(ENUM_SRVC_STATUS));
241                         if (svcs == NULL)
242                         {
243                                 dos_status = ERRnomem;
244                                 num_svcs = 0;
245                                 break;
246                         }
247
248                         svc = &svcs[num_svcs-1];
249                         ZERO_STRUCTP(svc);
250
251                         make_unistr(&svc->uni_srvc_name, dummy_services[i]);
252                         make_unistr(&svc->uni_disp_name, dummy_services[i]);
253
254                         DEBUG(10,("show service: %s\n", dummy_services[i]));
255                         i++;
256                 }
257         }
258
259         /*
260          * check for finished condition: no resume handle and last buffer fits
261          */
262
263         if (resume_hnd == 0 && buf_size <= q_u->buf_size)
264         {
265                 /* this indicates, along with resume_hnd of 0, an end. */
266                 max_buf_size = 0;
267         }
268
269         make_svc_r_enum_svcs_status(&r_u, svcs, max_buf_size, num_svcs, resume_hnd, dos_status);
270
271         /* store the response in the SMB stream */
272         svc_io_r_enum_svcs_status("", &r_u, rdata, 0);
273
274         if (svcs != NULL)
275         {
276                 free(svcs);
277         }
278
279         DEBUG(5,("svc_enum_svcs_status: %d\n", __LINE__));
280 }
281
282 /*******************************************************************
283  api_svc_enum_svcs_status
284  ********************************************************************/
285 static void api_svc_enum_svcs_status( uint16 vuid, prs_struct *data,
286                                     prs_struct *rdata )
287 {
288         SVC_Q_ENUM_SVCS_STATUS q_u;
289         svc_io_q_enum_svcs_status("", &q_u, data, 0);
290         svc_reply_enum_svcs_status(&q_u, rdata);
291 }
292
293 /*******************************************************************
294  array of \PIPE\svcctl operations
295  ********************************************************************/
296 static struct api_struct api_svc_cmds[] =
297 {
298         { "SVC_CLOSE"           , SVC_CLOSE           , api_svc_close            },
299         { "SVC_OPEN_SC_MAN"     , SVC_OPEN_SC_MAN     , api_svc_open_sc_man      },
300         { "SVC_OPEN_SERVICE"    , SVC_OPEN_SERVICE    , api_svc_open_service     },
301         { "SVC_ENUM_SVCS_STATUS", SVC_ENUM_SVCS_STATUS, api_svc_enum_svcs_status },
302         { NULL                  , 0                   , NULL                     }
303 };
304
305 /*******************************************************************
306  receives a svcctl pipe and responds.
307  ********************************************************************/
308 BOOL api_svcctl_rpc(pipes_struct *p, prs_struct *data)
309 {
310         return api_rpcTNP(p, "api_svc_rpc", api_svc_cmds, data);
311 }
312