s3-registry: only include registry headers when really needed.
[amitay/samba.git] / source3 / rpc_server / srv_svcctl_nt.c
1 /*
2  *  Unix SMB/CIFS implementation.
3  *  RPC Pipe client / server routines
4  *
5  *  Copyright (C) Marcin Krzysztof Porwit           2005.
6  *
7  *  Largely Rewritten (Again) by:
8  *  Copyright (C) Gerald (Jerry) Carter             2005.
9  *  Copyright (C) Guenther Deschner                 2008,2009.
10  *
11  *  This program is free software; you can redistribute it and/or modify
12  *  it under the terms of the GNU General Public License as published by
13  *  the Free Software Foundation; either version 3 of the License, or
14  *  (at your option) any later version.
15  *
16  *  This program is distributed in the hope that it will be useful,
17  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
18  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
19  *  GNU General Public License for more details.
20  *
21  *  You should have received a copy of the GNU General Public License
22  *  along with this program; if not, see <http://www.gnu.org/licenses/>.
23  */
24
25 #include "includes.h"
26 #include "../librpc/gen_ndr/srv_svcctl.h"
27 #include "services.h"
28 #include "registry.h"
29
30 #undef DBGC_CLASS
31 #define DBGC_CLASS DBGC_RPC_SRV
32
33 struct service_control_op {
34         const char *name;
35         SERVICE_CONTROL_OPS *ops;
36 };
37
38 /* handle external services */
39 extern SERVICE_CONTROL_OPS rcinit_svc_ops;
40
41 /* builtin services (see service_db.c and services/svc_*.c */
42 extern SERVICE_CONTROL_OPS spoolss_svc_ops;
43 extern SERVICE_CONTROL_OPS netlogon_svc_ops;
44 extern SERVICE_CONTROL_OPS winreg_svc_ops;
45 extern SERVICE_CONTROL_OPS wins_svc_ops;
46
47 /* make sure this number patches the number of builtin
48    SERVICE_CONTROL_OPS structure listed above */
49
50 #define SVCCTL_NUM_INTERNAL_SERVICES    4
51
52 struct service_control_op *svcctl_ops;
53
54 static const struct generic_mapping scm_generic_map =
55         { SC_MANAGER_READ_ACCESS, SC_MANAGER_WRITE_ACCESS, SC_MANAGER_EXECUTE_ACCESS, SC_MANAGER_ALL_ACCESS };
56 static const struct generic_mapping svc_generic_map =
57         { SERVICE_READ_ACCESS, SERVICE_WRITE_ACCESS, SERVICE_EXECUTE_ACCESS, SERVICE_ALL_ACCESS };
58
59
60 /********************************************************************
61 ********************************************************************/
62
63 bool init_service_op_table( void )
64 {
65         const char **service_list = lp_svcctl_list();
66         int num_services = SVCCTL_NUM_INTERNAL_SERVICES + str_list_length( service_list );
67         int i;
68
69         if ( !(svcctl_ops = TALLOC_ARRAY( NULL, struct service_control_op, num_services+1)) ) {
70                 DEBUG(0,("init_service_op_table: talloc() failed!\n"));
71                 return False;
72         }
73
74         /* services listed in smb.conf get the rc.init interface */
75
76         for ( i=0; service_list && service_list[i]; i++ ) {
77                 svcctl_ops[i].name = talloc_strdup( svcctl_ops, service_list[i] );
78                 svcctl_ops[i].ops  = &rcinit_svc_ops;
79         }
80
81         /* add builtin services */
82
83         svcctl_ops[i].name = talloc_strdup( svcctl_ops, "Spooler" );
84         svcctl_ops[i].ops  = &spoolss_svc_ops;
85         i++;
86
87         svcctl_ops[i].name = talloc_strdup( svcctl_ops, "NETLOGON" );
88         svcctl_ops[i].ops  = &netlogon_svc_ops;
89         i++;
90
91         svcctl_ops[i].name = talloc_strdup( svcctl_ops, "RemoteRegistry" );
92         svcctl_ops[i].ops  = &winreg_svc_ops;
93         i++;
94
95         svcctl_ops[i].name = talloc_strdup( svcctl_ops, "WINS" );
96         svcctl_ops[i].ops  = &wins_svc_ops;
97         i++;
98
99         /* NULL terminate the array */
100
101         svcctl_ops[i].name = NULL;
102         svcctl_ops[i].ops  = NULL;
103
104         return True;
105 }
106
107 /********************************************************************
108 ********************************************************************/
109
110 static struct service_control_op* find_service_by_name( const char *name )
111 {
112         int i;
113
114         for ( i=0; svcctl_ops[i].name; i++ ) {
115                 if ( strequal( name, svcctl_ops[i].name ) )
116                         return &svcctl_ops[i];
117         }
118
119         return NULL;
120 }
121 /********************************************************************
122 ********************************************************************/
123
124 static NTSTATUS svcctl_access_check( SEC_DESC *sec_desc, NT_USER_TOKEN *token,
125                                      uint32 access_desired, uint32 *access_granted )
126 {
127         if ( geteuid() == sec_initial_uid() ) {
128                 DEBUG(5,("svcctl_access_check: using root's token\n"));
129                 token = get_root_nt_token();
130         }
131
132         return se_access_check( sec_desc, token, access_desired, access_granted);
133 }
134
135 /********************************************************************
136 ********************************************************************/
137
138 static SEC_DESC* construct_scm_sd( TALLOC_CTX *ctx )
139 {
140         SEC_ACE ace[2];
141         size_t i = 0;
142         SEC_DESC *sd;
143         SEC_ACL *theacl;
144         size_t sd_size;
145
146         /* basic access for Everyone */
147
148         init_sec_ace(&ace[i++], &global_sid_World,
149                 SEC_ACE_TYPE_ACCESS_ALLOWED, SC_MANAGER_READ_ACCESS, 0);
150
151         /* Full Access 'BUILTIN\Administrators' */
152
153         init_sec_ace(&ace[i++], &global_sid_Builtin_Administrators,
154                 SEC_ACE_TYPE_ACCESS_ALLOWED, SC_MANAGER_ALL_ACCESS, 0);
155
156
157         /* create the security descriptor */
158
159         if ( !(theacl = make_sec_acl(ctx, NT4_ACL_REVISION, i, ace)) )
160                 return NULL;
161
162         if ( !(sd = make_sec_desc(ctx, SECURITY_DESCRIPTOR_REVISION_1,
163                                   SEC_DESC_SELF_RELATIVE, NULL, NULL, NULL,
164                                   theacl, &sd_size)) )
165                 return NULL;
166
167         return sd;
168 }
169
170 /******************************************************************
171  Find a registry key handle and return a SERVICE_INFO
172  *****************************************************************/
173
174 static SERVICE_INFO *find_service_info_by_hnd(pipes_struct *p, struct policy_handle *hnd)
175 {
176         SERVICE_INFO *service_info = NULL;
177
178         if( !find_policy_by_hnd( p, hnd, (void **)(void *)&service_info) ) {
179                 DEBUG(2,("find_service_info_by_hnd: handle not found\n"));
180                 return NULL;
181         }
182
183         return service_info;
184 }
185
186 /******************************************************************
187  *****************************************************************/
188
189 static WERROR create_open_service_handle( pipes_struct *p, struct policy_handle *handle, uint32 type,
190                                           const char *service, uint32 access_granted )
191 {
192         SERVICE_INFO *info = NULL;
193         WERROR result = WERR_OK;
194         struct service_control_op *s_op;
195
196         if ( !(info = TALLOC_ZERO_P( NULL, SERVICE_INFO )) )
197                 return WERR_NOMEM;
198
199         /* the Service Manager has a NULL name */
200
201         info->type = SVC_HANDLE_IS_SCM;
202
203         switch ( type ) {
204         case SVC_HANDLE_IS_SCM:
205                 info->type = SVC_HANDLE_IS_SCM;
206                 break;
207
208         case SVC_HANDLE_IS_DBLOCK:
209                 info->type = SVC_HANDLE_IS_DBLOCK;
210                 break;
211
212         case SVC_HANDLE_IS_SERVICE:
213                 info->type = SVC_HANDLE_IS_SERVICE;
214
215                 /* lookup the SERVICE_CONTROL_OPS */
216
217                 if ( !(s_op = find_service_by_name( service )) ) {
218                         result = WERR_NO_SUCH_SERVICE;
219                         goto done;
220                 }
221
222                 info->ops = s_op->ops;
223
224                 if ( !(info->name  = talloc_strdup( info, s_op->name )) ) {
225                         result = WERR_NOMEM;
226                         goto done;
227                 }
228                 break;
229
230         default:
231                 result = WERR_NO_SUCH_SERVICE;
232                 goto done;
233         }
234
235         info->access_granted = access_granted;
236
237         /* store the SERVICE_INFO and create an open handle */
238
239         if ( !create_policy_hnd( p, handle, info ) ) {
240                 result = WERR_ACCESS_DENIED;
241                 goto done;
242         }
243
244 done:
245         if ( !W_ERROR_IS_OK(result) )
246                 TALLOC_FREE(info);
247
248         return result;
249 }
250
251 /********************************************************************
252  _svcctl_OpenSCManagerW
253 ********************************************************************/
254
255 WERROR _svcctl_OpenSCManagerW(pipes_struct *p,
256                               struct svcctl_OpenSCManagerW *r)
257 {
258         SEC_DESC *sec_desc;
259         uint32 access_granted = 0;
260         NTSTATUS status;
261
262         /* perform access checks */
263
264         if ( !(sec_desc = construct_scm_sd( p->mem_ctx )) )
265                 return WERR_NOMEM;
266
267         se_map_generic( &r->in.access_mask, &scm_generic_map );
268         status = svcctl_access_check( sec_desc, p->server_info->ptok,
269                                       r->in.access_mask, &access_granted );
270         if ( !NT_STATUS_IS_OK(status) )
271                 return ntstatus_to_werror( status );
272
273         return create_open_service_handle( p, r->out.handle, SVC_HANDLE_IS_SCM, NULL, access_granted );
274 }
275
276 /********************************************************************
277  _svcctl_OpenServiceW
278 ********************************************************************/
279
280 WERROR _svcctl_OpenServiceW(pipes_struct *p,
281                             struct svcctl_OpenServiceW *r)
282 {
283         SEC_DESC *sec_desc;
284         uint32 access_granted = 0;
285         NTSTATUS status;
286         const char *service = NULL;
287
288         service = r->in.ServiceName;
289         if (!service) {
290                 return WERR_NOMEM;
291         }
292         DEBUG(5, ("_svcctl_OpenServiceW: Attempting to open Service [%s], \n", service));
293
294         /* based on my tests you can open a service if you have a valid scm handle */
295
296         if ( !find_service_info_by_hnd( p, r->in.scmanager_handle) )
297                 return WERR_BADFID;
298
299         /* perform access checks.  Use the root token in order to ensure that we
300            retrieve the security descriptor */
301
302         if ( !(sec_desc = svcctl_get_secdesc( p->mem_ctx, service, get_root_nt_token() )) )
303                 return WERR_NOMEM;
304
305         se_map_generic( &r->in.access_mask, &svc_generic_map );
306         status = svcctl_access_check( sec_desc, p->server_info->ptok,
307                                       r->in.access_mask, &access_granted );
308         if ( !NT_STATUS_IS_OK(status) )
309                 return ntstatus_to_werror( status );
310
311         return create_open_service_handle( p, r->out.handle, SVC_HANDLE_IS_SERVICE, service, access_granted );
312 }
313
314 /********************************************************************
315  _svcctl_CloseServiceHandle
316 ********************************************************************/
317
318 WERROR _svcctl_CloseServiceHandle(pipes_struct *p,
319                                   struct svcctl_CloseServiceHandle *r)
320 {
321         if ( !close_policy_hnd( p, r->in.handle ) )
322                 return  WERR_BADFID;
323
324         ZERO_STRUCTP(r->out.handle);
325
326         return WERR_OK;
327 }
328
329 /********************************************************************
330  _svcctl_GetServiceDisplayNameW
331 ********************************************************************/
332
333 WERROR _svcctl_GetServiceDisplayNameW(pipes_struct *p,
334                                       struct svcctl_GetServiceDisplayNameW *r)
335 {
336         const char *service;
337         const char *display_name;
338         SERVICE_INFO *info = find_service_info_by_hnd( p, r->in.handle );
339
340         /* can only use an SCM handle here */
341
342         if ( !info || (info->type != SVC_HANDLE_IS_SCM) )
343                 return WERR_BADFID;
344
345         service = r->in.service_name;
346
347         display_name = svcctl_lookup_dispname(p->mem_ctx, service,
348                                               p->server_info->ptok);
349         if (!display_name) {
350                 display_name = "";
351         }
352
353         *r->out.display_name = display_name;
354         *r->out.display_name_length = strlen(display_name);
355
356         return WERR_OK;
357 }
358
359 /********************************************************************
360  _svcctl_QueryServiceStatus
361 ********************************************************************/
362
363 WERROR _svcctl_QueryServiceStatus(pipes_struct *p,
364                                   struct svcctl_QueryServiceStatus *r)
365 {
366         SERVICE_INFO *info = find_service_info_by_hnd( p, r->in.handle );
367
368         /* perform access checks */
369
370         if ( !info || (info->type != SVC_HANDLE_IS_SERVICE) )
371                 return WERR_BADFID;
372
373         if ( !(info->access_granted & SC_RIGHT_SVC_QUERY_STATUS) )
374                 return WERR_ACCESS_DENIED;
375
376         /* try the service specific status call */
377
378         return info->ops->service_status( info->name, r->out.service_status );
379 }
380
381 /********************************************************************
382 ********************************************************************/
383
384 static int enumerate_status( TALLOC_CTX *ctx, struct ENUM_SERVICE_STATUSW **status, NT_USER_TOKEN *token )
385 {
386         int num_services = 0;
387         int i;
388         struct ENUM_SERVICE_STATUSW *st;
389         const char *display_name;
390
391         /* just count */
392         while ( svcctl_ops[num_services].name )
393                 num_services++;
394
395         if ( !(st = TALLOC_ARRAY( ctx, struct ENUM_SERVICE_STATUSW, num_services )) ) {
396                 DEBUG(0,("enumerate_status: talloc() failed!\n"));
397                 return -1;
398         }
399
400         for ( i=0; i<num_services; i++ ) {
401                 st[i].service_name = talloc_strdup(st, svcctl_ops[i].name );
402
403                 display_name = svcctl_lookup_dispname(ctx, svcctl_ops[i].name, token );
404                 st[i].display_name = talloc_strdup(st, display_name ? display_name : "");
405
406                 svcctl_ops[i].ops->service_status( svcctl_ops[i].name, &st[i].status );
407         }
408
409         *status = st;
410
411         return num_services;
412 }
413
414 /********************************************************************
415  _svcctl_EnumServicesStatusW
416 ********************************************************************/
417
418 WERROR _svcctl_EnumServicesStatusW(pipes_struct *p,
419                                    struct svcctl_EnumServicesStatusW *r)
420 {
421         struct ENUM_SERVICE_STATUSW *services = NULL;
422         int num_services;
423         int i = 0;
424         size_t buffer_size = 0;
425         WERROR result = WERR_OK;
426         SERVICE_INFO *info = find_service_info_by_hnd( p, r->in.handle );
427         NT_USER_TOKEN *token = p->server_info->ptok;
428         DATA_BLOB blob = data_blob_null;
429
430         /* perform access checks */
431
432         if ( !info || (info->type != SVC_HANDLE_IS_SCM) )
433                 return WERR_BADFID;
434
435         if ( !(info->access_granted & SC_RIGHT_MGR_ENUMERATE_SERVICE) ) {
436                 return WERR_ACCESS_DENIED;
437         }
438
439         num_services = enumerate_status( p->mem_ctx, &services, token );
440         if (num_services == -1 ) {
441                 return WERR_NOMEM;
442         }
443
444         for ( i=0; i<num_services; i++ ) {
445                 buffer_size += ndr_size_ENUM_SERVICE_STATUSW(&services[i], NULL, 0);
446         }
447
448         buffer_size += buffer_size % 4;
449
450         if (buffer_size > r->in.offered) {
451                 num_services = 0;
452                 result = WERR_MORE_DATA;
453         }
454
455         if ( W_ERROR_IS_OK(result) ) {
456
457                 enum ndr_err_code ndr_err;
458                 struct ndr_push *ndr;
459
460                 ndr = ndr_push_init_ctx(p->mem_ctx, NULL);
461                 if (ndr == NULL) {
462                         return WERR_INVALID_PARAM;
463                 }
464
465                 ndr_err = ndr_push_ENUM_SERVICE_STATUSW_array(
466                         ndr, num_services, services);
467                 if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err)) {
468                         return ntstatus_to_werror(ndr_map_error2ntstatus(ndr_err));
469                 }
470                 blob = ndr_push_blob(ndr);
471                 memcpy(r->out.service, blob.data, MIN(blob.length, r->in.offered));
472         }
473
474         *r->out.needed                  = (buffer_size > r->in.offered) ? buffer_size : r->in.offered;
475         *r->out.services_returned       = (uint32)num_services;
476         if (r->out.resume_handle) {
477                 *r->out.resume_handle   = 0;
478         }
479
480         return result;
481 }
482
483 /********************************************************************
484  _svcctl_StartServiceW
485 ********************************************************************/
486
487 WERROR _svcctl_StartServiceW(pipes_struct *p,
488                              struct svcctl_StartServiceW *r)
489 {
490         SERVICE_INFO *info = find_service_info_by_hnd( p, r->in.handle );
491
492         /* perform access checks */
493
494         if ( !info || (info->type != SVC_HANDLE_IS_SERVICE) )
495                 return WERR_BADFID;
496
497         if ( !(info->access_granted & SC_RIGHT_SVC_START) )
498                 return WERR_ACCESS_DENIED;
499
500         return info->ops->start_service( info->name );
501 }
502
503 /********************************************************************
504  _svcctl_ControlService
505 ********************************************************************/
506
507 WERROR _svcctl_ControlService(pipes_struct *p,
508                               struct svcctl_ControlService *r)
509 {
510         SERVICE_INFO *info = find_service_info_by_hnd( p, r->in.handle );
511
512         /* perform access checks */
513
514         if ( !info || (info->type != SVC_HANDLE_IS_SERVICE) )
515                 return WERR_BADFID;
516
517         switch ( r->in.control ) {
518         case SVCCTL_CONTROL_STOP:
519                 if ( !(info->access_granted & SC_RIGHT_SVC_STOP) )
520                         return WERR_ACCESS_DENIED;
521
522                 return info->ops->stop_service( info->name,
523                                                 r->out.service_status );
524
525         case SVCCTL_CONTROL_INTERROGATE:
526                 if ( !(info->access_granted & SC_RIGHT_SVC_QUERY_STATUS) )
527                         return WERR_ACCESS_DENIED;
528
529                 return info->ops->service_status( info->name,
530                                                   r->out.service_status );
531         default:
532                 return WERR_INVALID_PARAM;
533         }
534 }
535
536 /********************************************************************
537  _svcctl_EnumDependentServicesW
538 ********************************************************************/
539
540 WERROR _svcctl_EnumDependentServicesW(pipes_struct *p,
541                                       struct svcctl_EnumDependentServicesW *r)
542 {
543         SERVICE_INFO *info = find_service_info_by_hnd( p, r->in.service );
544
545         /* perform access checks */
546
547         if ( !info || (info->type != SVC_HANDLE_IS_SERVICE) )
548                 return WERR_BADFID;
549
550         if ( !(info->access_granted & SC_RIGHT_SVC_ENUMERATE_DEPENDENTS) )
551                 return WERR_ACCESS_DENIED;
552
553         switch (r->in.state) {
554         case SERVICE_STATE_ACTIVE:
555         case SERVICE_STATE_INACTIVE:
556         case SERVICE_STATE_ALL:
557                 break;
558         default:
559                 return WERR_INVALID_PARAM;
560         }
561
562         /* we have to set the outgoing buffer size to the same as the
563            incoming buffer size (even in the case of failure */
564         /* this is done in the autogenerated server already - gd */
565
566         *r->out.needed = r->in.offered;
567
568         /* no dependent services...basically a stub function */
569         *r->out.services_returned = 0;
570
571         return WERR_OK;
572 }
573
574 /********************************************************************
575  _svcctl_QueryServiceStatusEx
576 ********************************************************************/
577
578 WERROR _svcctl_QueryServiceStatusEx(pipes_struct *p,
579                                     struct svcctl_QueryServiceStatusEx *r)
580 {
581         SERVICE_INFO *info = find_service_info_by_hnd( p, r->in.handle );
582         uint32 buffer_size;
583
584         /* perform access checks */
585
586         if ( !info || (info->type != SVC_HANDLE_IS_SERVICE) )
587                 return WERR_BADFID;
588
589         if ( !(info->access_granted & SC_RIGHT_SVC_QUERY_STATUS) )
590                 return WERR_ACCESS_DENIED;
591
592         /* we have to set the outgoing buffer size to the same as the
593            incoming buffer size (even in the case of failure) */
594         *r->out.needed = r->in.offered;
595
596         switch ( r->in.info_level ) {
597                 case SVC_STATUS_PROCESS_INFO:
598                 {
599                         struct SERVICE_STATUS_PROCESS svc_stat_proc;
600                         enum ndr_err_code ndr_err;
601                         DATA_BLOB blob;
602
603                         /* Get the status of the service.. */
604                         info->ops->service_status( info->name, &svc_stat_proc.status );
605                         svc_stat_proc.process_id     = sys_getpid();
606                         svc_stat_proc.service_flags  = 0x0;
607
608                         ndr_err = ndr_push_struct_blob(&blob, p->mem_ctx, NULL,
609                                                        &svc_stat_proc,
610                                                        (ndr_push_flags_fn_t)ndr_push_SERVICE_STATUS_PROCESS);
611                         if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err)) {
612                                 return WERR_INVALID_PARAM;
613                         }
614
615                         r->out.buffer = blob.data;
616                         buffer_size = sizeof(struct SERVICE_STATUS_PROCESS);
617                         break;
618                 }
619
620                 default:
621                         return WERR_UNKNOWN_LEVEL;
622         }
623
624
625         buffer_size += buffer_size % 4;
626         *r->out.needed = (buffer_size > r->in.offered) ? buffer_size : r->in.offered;
627
628         if (buffer_size > r->in.offered ) {
629                 return WERR_INSUFFICIENT_BUFFER;
630         }
631
632         return WERR_OK;
633 }
634
635 /********************************************************************
636 ********************************************************************/
637
638 static WERROR fill_svc_config( TALLOC_CTX *ctx, const char *name,
639                                struct QUERY_SERVICE_CONFIG *config,
640                                NT_USER_TOKEN *token )
641 {
642         struct regval_ctr *values;
643         struct regval_blob *val;
644
645         /* retrieve the registry values for this service */
646
647         if ( !(values = svcctl_fetch_regvalues( name, token )) )
648                 return WERR_REG_CORRUPT;
649
650         /* now fill in the individual values */
651
652         if ( (val = regval_ctr_getvalue( values, "DisplayName" )) != NULL )
653                 config->displayname = regval_sz(val);
654         else
655                 config->displayname = name;
656
657         if ( (val = regval_ctr_getvalue( values, "ObjectName" )) != NULL ) {
658                 config->startname = regval_sz(val);
659         }
660
661         if ( (val = regval_ctr_getvalue( values, "ImagePath" )) != NULL ) {
662                 config->executablepath = regval_sz(val);
663         }
664
665         /* a few hard coded values */
666         /* loadordergroup and dependencies are empty */
667
668         config->tag_id           = 0x00000000;                  /* unassigned loadorder group */
669         config->service_type     = SERVICE_TYPE_WIN32_OWN_PROCESS;
670         config->error_control    = SVCCTL_SVC_ERROR_NORMAL;
671
672         /* set the start type.  NetLogon and WINS are disabled to prevent
673            the client from showing the "Start" button (if of course the services
674            are not running */
675
676         if ( strequal( name, "NETLOGON" ) && ( lp_servicenumber(name) == -1 ) )
677                 config->start_type = SVCCTL_DISABLED;
678         else if ( strequal( name, "WINS" ) && ( !lp_wins_support() ))
679                 config->start_type = SVCCTL_DISABLED;
680         else
681                 config->start_type = SVCCTL_DEMAND_START;
682
683
684         TALLOC_FREE( values );
685
686         return WERR_OK;
687 }
688
689 /********************************************************************
690  _svcctl_QueryServiceConfigW
691 ********************************************************************/
692
693 WERROR _svcctl_QueryServiceConfigW(pipes_struct *p,
694                                    struct svcctl_QueryServiceConfigW *r)
695 {
696         SERVICE_INFO *info = find_service_info_by_hnd( p, r->in.handle );
697         uint32 buffer_size;
698         WERROR wresult;
699
700         /* perform access checks */
701
702         if ( !info || (info->type != SVC_HANDLE_IS_SERVICE) )
703                 return WERR_BADFID;
704
705         if ( !(info->access_granted & SC_RIGHT_SVC_QUERY_CONFIG) )
706                 return WERR_ACCESS_DENIED;
707
708         /* we have to set the outgoing buffer size to the same as the
709            incoming buffer size (even in the case of failure */
710
711         *r->out.needed = r->in.offered;
712
713         wresult = fill_svc_config( p->mem_ctx, info->name, r->out.query,
714                                    p->server_info->ptok);
715         if ( !W_ERROR_IS_OK(wresult) )
716                 return wresult;
717
718         buffer_size = ndr_size_QUERY_SERVICE_CONFIG(r->out.query, NULL, 0);
719         *r->out.needed = (buffer_size > r->in.offered) ? buffer_size : r->in.offered;
720
721         if (buffer_size > r->in.offered ) {
722                 ZERO_STRUCTP(r->out.query);
723                 return WERR_INSUFFICIENT_BUFFER;
724         }
725
726         return WERR_OK;
727 }
728
729 /********************************************************************
730  _svcctl_QueryServiceConfig2W
731 ********************************************************************/
732
733 WERROR _svcctl_QueryServiceConfig2W(pipes_struct *p,
734                                     struct svcctl_QueryServiceConfig2W *r)
735 {
736         SERVICE_INFO *info = find_service_info_by_hnd( p, r->in.handle );
737         uint32 buffer_size;
738
739         /* perform access checks */
740
741         if ( !info || (info->type != SVC_HANDLE_IS_SERVICE) )
742                 return WERR_BADFID;
743
744         if ( !(info->access_granted & SC_RIGHT_SVC_QUERY_CONFIG) )
745                 return WERR_ACCESS_DENIED;
746
747         /* we have to set the outgoing buffer size to the same as the
748            incoming buffer size (even in the case of failure */
749         *r->out.needed = r->in.offered;
750
751         switch ( r->in.info_level ) {
752         case SERVICE_CONFIG_DESCRIPTION:
753                 {
754                         struct SERVICE_DESCRIPTION desc_buf;
755                         const char *description;
756                         enum ndr_err_code ndr_err;
757                         DATA_BLOB blob;
758
759                         description = svcctl_lookup_description(
760                                 p->mem_ctx, info->name, p->server_info->ptok);
761
762                         desc_buf.description = description;
763
764                         ndr_err = ndr_push_struct_blob(&blob, p->mem_ctx, NULL,
765                                                        &desc_buf,
766                                                        (ndr_push_flags_fn_t)ndr_push_SERVICE_DESCRIPTION);
767                         if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err)) {
768                                 return WERR_INVALID_PARAM;
769                         }
770
771                         buffer_size = ndr_size_SERVICE_DESCRIPTION(&desc_buf, NULL, 0);
772                         r->out.buffer = blob.data;
773
774                         break;
775                 }
776                 break;
777         case SERVICE_CONFIG_FAILURE_ACTIONS:
778                 {
779                         struct SERVICE_FAILURE_ACTIONS actions;
780                         enum ndr_err_code ndr_err;
781                         DATA_BLOB blob;
782
783                         /* nothing to say...just service the request */
784
785                         ZERO_STRUCT( actions );
786
787                         ndr_err = ndr_push_struct_blob(&blob, p->mem_ctx, NULL,
788                                                        &actions,
789                                                        (ndr_push_flags_fn_t)ndr_push_SERVICE_FAILURE_ACTIONS);
790                         if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err)) {
791                                 return WERR_INVALID_PARAM;
792                         }
793
794                         buffer_size = ndr_size_SERVICE_FAILURE_ACTIONS(&actions, NULL, 0);
795                         r->out.buffer = blob.data;
796
797                         break;
798                 }
799                 break;
800
801         default:
802                 return WERR_UNKNOWN_LEVEL;
803         }
804
805         buffer_size += buffer_size % 4;
806         *r->out.needed = (buffer_size > r->in.offered) ? buffer_size : r->in.offered;
807
808         if (buffer_size > r->in.offered)
809                 return WERR_INSUFFICIENT_BUFFER;
810
811         return WERR_OK;
812 }
813
814 /********************************************************************
815  _svcctl_LockServiceDatabase
816 ********************************************************************/
817
818 WERROR _svcctl_LockServiceDatabase(pipes_struct *p,
819                                    struct svcctl_LockServiceDatabase *r)
820 {
821         SERVICE_INFO *info = find_service_info_by_hnd( p, r->in.handle );
822
823         /* perform access checks */
824
825         if ( !info || (info->type != SVC_HANDLE_IS_SCM) )
826                 return WERR_BADFID;
827
828         if ( !(info->access_granted & SC_RIGHT_MGR_LOCK) )
829                 return WERR_ACCESS_DENIED;
830
831         /* Just open a handle.  Doesn't actually lock anything */
832
833         return create_open_service_handle( p, r->out.lock, SVC_HANDLE_IS_DBLOCK, NULL, 0 );
834 }
835
836 /********************************************************************
837  _svcctl_UnlockServiceDatabase
838 ********************************************************************/
839
840 WERROR _svcctl_UnlockServiceDatabase(pipes_struct *p,
841                                      struct svcctl_UnlockServiceDatabase *r)
842 {
843         SERVICE_INFO *info = find_service_info_by_hnd( p, r->in.lock );
844
845
846         if ( !info || (info->type != SVC_HANDLE_IS_DBLOCK) )
847                 return WERR_BADFID;
848
849         return close_policy_hnd( p, r->out.lock) ? WERR_OK : WERR_BADFID;
850 }
851
852 /********************************************************************
853  _svcctl_QueryServiceObjectSecurity
854 ********************************************************************/
855
856 WERROR _svcctl_QueryServiceObjectSecurity(pipes_struct *p,
857                                           struct svcctl_QueryServiceObjectSecurity *r)
858 {
859         SERVICE_INFO *info = find_service_info_by_hnd( p, r->in.handle );
860         SEC_DESC *sec_desc;
861         NTSTATUS status;
862         uint8_t *buffer = NULL;
863         size_t len = 0;
864
865
866         /* only support the SCM and individual services */
867
868         if ( !info || !(info->type & (SVC_HANDLE_IS_SERVICE|SVC_HANDLE_IS_SCM)) )
869                 return WERR_BADFID;
870
871         /* check access reights (according to MSDN) */
872
873         if ( !(info->access_granted & STD_RIGHT_READ_CONTROL_ACCESS) )
874                 return WERR_ACCESS_DENIED;
875
876         /* TODO: handle something besides DACL_SECURITY_INFORMATION */
877
878         if ( (r->in.security_flags & DACL_SECURITY_INFORMATION) != DACL_SECURITY_INFORMATION )
879                 return WERR_INVALID_PARAM;
880
881         /* lookup the security descriptor and marshall it up for a reply */
882
883         if ( !(sec_desc = svcctl_get_secdesc( p->mem_ctx, info->name, get_root_nt_token() )) )
884                 return WERR_NOMEM;
885
886         *r->out.needed = ndr_size_security_descriptor( sec_desc, NULL, 0 );
887
888         if ( *r->out.needed > r->in.offered) {
889                 return WERR_INSUFFICIENT_BUFFER;
890         }
891
892         status = marshall_sec_desc(p->mem_ctx, sec_desc, &buffer, &len);
893         if (!NT_STATUS_IS_OK(status)) {
894                 return ntstatus_to_werror(status);
895         }
896
897         *r->out.needed = len;
898         r->out.buffer = buffer;
899
900         return WERR_OK;
901 }
902
903 /********************************************************************
904  _svcctl_SetServiceObjectSecurity
905 ********************************************************************/
906
907 WERROR _svcctl_SetServiceObjectSecurity(pipes_struct *p,
908                                         struct svcctl_SetServiceObjectSecurity *r)
909 {
910         SERVICE_INFO *info = find_service_info_by_hnd( p, r->in.handle );
911         SEC_DESC *sec_desc = NULL;
912         uint32 required_access;
913         NTSTATUS status;
914
915         if ( !info || !(info->type & (SVC_HANDLE_IS_SERVICE|SVC_HANDLE_IS_SCM))  )
916                 return WERR_BADFID;
917
918         /* can't set the security de4scriptor on the ServiceControlManager */
919
920         if ( info->type == SVC_HANDLE_IS_SCM )
921                 return WERR_ACCESS_DENIED;
922
923         /* check the access on the open handle */
924
925         switch ( r->in.security_flags ) {
926                 case DACL_SECURITY_INFORMATION:
927                         required_access = STD_RIGHT_WRITE_DAC_ACCESS;
928                         break;
929
930                 case OWNER_SECURITY_INFORMATION:
931                 case GROUP_SECURITY_INFORMATION:
932                         required_access = STD_RIGHT_WRITE_OWNER_ACCESS;
933                         break;
934
935                 case SACL_SECURITY_INFORMATION:
936                         return WERR_INVALID_PARAM;
937                 default:
938                         return WERR_INVALID_PARAM;
939         }
940
941         if ( !(info->access_granted & required_access) )
942                 return WERR_ACCESS_DENIED;
943
944         /* read the security descfriptor */
945
946         status = unmarshall_sec_desc(p->mem_ctx,
947                                      r->in.buffer,
948                                      r->in.offered,
949                                      &sec_desc);
950         if (!NT_STATUS_IS_OK(status)) {
951                 return ntstatus_to_werror(status);
952         }
953
954         /* store the new SD */
955
956         if ( !svcctl_set_secdesc( p->mem_ctx, info->name, sec_desc,
957                                   p->server_info->ptok) )
958                 return WERR_ACCESS_DENIED;
959
960         return WERR_OK;
961 }
962
963
964 WERROR _svcctl_DeleteService(pipes_struct *p, struct svcctl_DeleteService *r)
965 {
966         p->rng_fault_state = True;
967         return WERR_NOT_SUPPORTED;
968 }
969
970 WERROR _svcctl_SetServiceStatus(pipes_struct *p, struct svcctl_SetServiceStatus *r)
971 {
972         p->rng_fault_state = True;
973         return WERR_NOT_SUPPORTED;
974 }
975
976 WERROR _svcctl_NotifyBootConfigStatus(pipes_struct *p, struct svcctl_NotifyBootConfigStatus *r)
977 {
978         p->rng_fault_state = True;
979         return WERR_NOT_SUPPORTED;
980 }
981
982 WERROR _svcctl_SCSetServiceBitsW(pipes_struct *p, struct svcctl_SCSetServiceBitsW *r)
983 {
984         p->rng_fault_state = True;
985         return WERR_NOT_SUPPORTED;
986 }
987
988 WERROR _svcctl_ChangeServiceConfigW(pipes_struct *p, struct svcctl_ChangeServiceConfigW *r)
989 {
990         p->rng_fault_state = True;
991         return WERR_NOT_SUPPORTED;
992 }
993
994 WERROR _svcctl_CreateServiceW(pipes_struct *p, struct svcctl_CreateServiceW *r)
995 {
996         p->rng_fault_state = True;
997         return WERR_NOT_SUPPORTED;
998 }
999
1000 WERROR _svcctl_QueryServiceLockStatusW(pipes_struct *p, struct svcctl_QueryServiceLockStatusW *r)
1001 {
1002         p->rng_fault_state = True;
1003         return WERR_NOT_SUPPORTED;
1004 }
1005
1006 WERROR _svcctl_GetServiceKeyNameW(pipes_struct *p, struct svcctl_GetServiceKeyNameW *r)
1007 {
1008         p->rng_fault_state = True;
1009         return WERR_NOT_SUPPORTED;
1010 }
1011
1012 WERROR _svcctl_SCSetServiceBitsA(pipes_struct *p, struct svcctl_SCSetServiceBitsA *r)
1013 {
1014         p->rng_fault_state = True;
1015         return WERR_NOT_SUPPORTED;
1016 }
1017
1018 WERROR _svcctl_ChangeServiceConfigA(pipes_struct *p, struct svcctl_ChangeServiceConfigA *r)
1019 {
1020         p->rng_fault_state = True;
1021         return WERR_NOT_SUPPORTED;
1022 }
1023
1024 WERROR _svcctl_CreateServiceA(pipes_struct *p, struct svcctl_CreateServiceA *r)
1025 {
1026         p->rng_fault_state = True;
1027         return WERR_NOT_SUPPORTED;
1028 }
1029
1030 WERROR _svcctl_EnumDependentServicesA(pipes_struct *p, struct svcctl_EnumDependentServicesA *r)
1031 {
1032         p->rng_fault_state = True;
1033         return WERR_NOT_SUPPORTED;
1034 }
1035
1036 WERROR _svcctl_EnumServicesStatusA(pipes_struct *p, struct svcctl_EnumServicesStatusA *r)
1037 {
1038         p->rng_fault_state = True;
1039         return WERR_NOT_SUPPORTED;
1040 }
1041
1042 WERROR _svcctl_OpenSCManagerA(pipes_struct *p, struct svcctl_OpenSCManagerA *r)
1043 {
1044         p->rng_fault_state = True;
1045         return WERR_NOT_SUPPORTED;
1046 }
1047
1048 WERROR _svcctl_OpenServiceA(pipes_struct *p, struct svcctl_OpenServiceA *r)
1049 {
1050         p->rng_fault_state = True;
1051         return WERR_NOT_SUPPORTED;
1052 }
1053
1054 WERROR _svcctl_QueryServiceConfigA(pipes_struct *p, struct svcctl_QueryServiceConfigA *r)
1055 {
1056         p->rng_fault_state = True;
1057         return WERR_NOT_SUPPORTED;
1058 }
1059
1060 WERROR _svcctl_QueryServiceLockStatusA(pipes_struct *p, struct svcctl_QueryServiceLockStatusA *r)
1061 {
1062         p->rng_fault_state = True;
1063         return WERR_NOT_SUPPORTED;
1064 }
1065
1066 WERROR _svcctl_StartServiceA(pipes_struct *p, struct svcctl_StartServiceA *r)
1067 {
1068         p->rng_fault_state = True;
1069         return WERR_NOT_SUPPORTED;
1070 }
1071
1072 WERROR _svcctl_GetServiceDisplayNameA(pipes_struct *p, struct svcctl_GetServiceDisplayNameA *r)
1073 {
1074         p->rng_fault_state = True;
1075         return WERR_NOT_SUPPORTED;
1076 }
1077
1078 WERROR _svcctl_GetServiceKeyNameA(pipes_struct *p, struct svcctl_GetServiceKeyNameA *r)
1079 {
1080         p->rng_fault_state = True;
1081         return WERR_NOT_SUPPORTED;
1082 }
1083
1084 WERROR _svcctl_GetCurrentGroupeStateW(pipes_struct *p, struct svcctl_GetCurrentGroupeStateW *r)
1085 {
1086         p->rng_fault_state = True;
1087         return WERR_NOT_SUPPORTED;
1088 }
1089
1090 WERROR _svcctl_EnumServiceGroupW(pipes_struct *p, struct svcctl_EnumServiceGroupW *r)
1091 {
1092         p->rng_fault_state = True;
1093         return WERR_NOT_SUPPORTED;
1094 }
1095
1096 WERROR _svcctl_ChangeServiceConfig2A(pipes_struct *p, struct svcctl_ChangeServiceConfig2A *r)
1097 {
1098         p->rng_fault_state = True;
1099         return WERR_NOT_SUPPORTED;
1100 }
1101
1102 WERROR _svcctl_ChangeServiceConfig2W(pipes_struct *p, struct svcctl_ChangeServiceConfig2W *r)
1103 {
1104         p->rng_fault_state = True;
1105         return WERR_NOT_SUPPORTED;
1106 }
1107
1108 WERROR _svcctl_QueryServiceConfig2A(pipes_struct *p, struct svcctl_QueryServiceConfig2A *r)
1109 {
1110         p->rng_fault_state = True;
1111         return WERR_NOT_SUPPORTED;
1112 }
1113
1114 WERROR _EnumServicesStatusExA(pipes_struct *p, struct EnumServicesStatusExA *r)
1115 {
1116         p->rng_fault_state = True;
1117         return WERR_NOT_SUPPORTED;
1118 }
1119
1120 WERROR _EnumServicesStatusExW(pipes_struct *p, struct EnumServicesStatusExW *r)
1121 {
1122         p->rng_fault_state = True;
1123         return WERR_NOT_SUPPORTED;
1124 }
1125
1126 WERROR _svcctl_SCSendTSMessage(pipes_struct *p, struct svcctl_SCSendTSMessage *r)
1127 {
1128         p->rng_fault_state = True;
1129         return WERR_NOT_SUPPORTED;
1130 }
1131