merge from 2.2 removing the 'domain XXX' parameters.
[gd/samba/.git] / source3 / rpc_server / srv_util.c
1 /* 
2  *  Unix SMB/Netbios implementation.
3  *  Version 1.9.
4  *  RPC Pipe client / server routines
5  *  Copyright (C) Andrew Tridgell              1992-1998
6  *  Copyright (C) Luke Kenneth Casson Leighton 1996-1998,
7  *  Copyright (C) Paul Ashton                  1997-1998.
8  *  
9  *  This program is free software; you can redistribute it and/or modify
10  *  it under the terms of the GNU General Public License as published by
11  *  the Free Software Foundation; either version 2 of the License, or
12  *  (at your option) any later version.
13  *  
14  *  This program is distributed in the hope that it will be useful,
15  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
16  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17  *  GNU General Public License for more details.
18  *  
19  *  You should have received a copy of the GNU General Public License
20  *  along with this program; if not, write to the Free Software
21  *  Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
22  */
23
24 /*  this module apparently provides an implementation of DCE/RPC over a
25  *  named pipe (IPC$ connection using SMBtrans).  details of DCE/RPC
26  *  documentation are available (in on-line form) from the X-Open group.
27  *
28  *  this module should provide a level of abstraction between SMB
29  *  and DCE/RPC, while minimising the amount of mallocs, unnecessary
30  *  data copies, and network traffic.
31  *
32  *  in this version, which takes a "let's learn what's going on and
33  *  get something running" approach, there is additional network
34  *  traffic generated, but the code should be easier to understand...
35  *
36  *  ... if you read the docs.  or stare at packets for weeks on end.
37  *
38  */
39
40 #include "includes.h"
41
42 extern int DEBUGLEVEL;
43
44 /*
45  * A list of the rids of well known BUILTIN and Domain users
46  * and groups.
47  */
48
49 rid_name builtin_alias_rids[] =
50 {  
51     { BUILTIN_ALIAS_RID_ADMINS       , "Administrators" },
52     { BUILTIN_ALIAS_RID_USERS        , "Users" },
53     { BUILTIN_ALIAS_RID_GUESTS       , "Guests" },
54     { BUILTIN_ALIAS_RID_POWER_USERS  , "Power Users" },
55    
56     { BUILTIN_ALIAS_RID_ACCOUNT_OPS  , "Account Operators" },
57     { BUILTIN_ALIAS_RID_SYSTEM_OPS   , "System Operators" },
58     { BUILTIN_ALIAS_RID_PRINT_OPS    , "Print Operators" },
59     { BUILTIN_ALIAS_RID_BACKUP_OPS   , "Backup Operators" },
60     { BUILTIN_ALIAS_RID_REPLICATOR   , "Replicator" },
61     { 0                             , NULL }
62 };
63
64 /* array lookup of well-known Domain RID users. */
65 rid_name domain_user_rids[] =
66 {  
67     { DOMAIN_USER_RID_ADMIN         , "Administrator" },
68     { DOMAIN_USER_RID_GUEST         , "Guest" },
69     { 0                             , NULL }
70 };
71
72 /* array lookup of well-known Domain RID groups. */
73 rid_name domain_group_rids[] =
74 {  
75     { DOMAIN_GROUP_RID_ADMINS       , "Domain Admins" },
76     { DOMAIN_GROUP_RID_USERS        , "Domain Users" },
77     { DOMAIN_GROUP_RID_GUESTS       , "Domain Guests" },
78     { 0                             , NULL }
79 };
80
81 int make_dom_gids(TALLOC_CTX *ctx, char *gids_str, DOM_GID **ppgids)
82 {
83   char *ptr;
84   pstring s2;
85   int count;
86   DOM_GID *gids;
87
88   *ppgids = NULL;
89
90   DEBUG(4,("make_dom_gids: %s\n", gids_str));
91
92   if (gids_str == NULL || *gids_str == 0)
93     return 0;
94
95   for (count = 0, ptr = gids_str; 
96        next_token(&ptr, s2, NULL, sizeof(s2)); 
97        count++)
98     ;
99
100   gids = (DOM_GID *)talloc(ctx, sizeof(DOM_GID) * count );
101   if(!gids)
102   {
103     DEBUG(0,("make_dom_gids: talloc fail !\n"));
104     return 0;
105   }
106
107   for (count = 0, ptr = gids_str; 
108        next_token(&ptr, s2, NULL, sizeof(s2)) && 
109                count < LSA_MAX_GROUPS; 
110        count++) 
111   {
112     /* the entries are of the form GID/ATTR, ATTR being optional.*/
113     char *attr;
114     uint32 rid = 0;
115     int i;
116
117     attr = strchr(s2,'/');
118     if (attr)
119       *attr++ = 0;
120
121     if (!attr || !*attr)
122       attr = "7"; /* default value for attribute is 7 */
123
124     /* look up the RID string and see if we can turn it into a rid number */
125     for (i = 0; builtin_alias_rids[i].name != NULL; i++)
126     {
127       if (strequal(builtin_alias_rids[i].name, s2))
128       {
129         rid = builtin_alias_rids[i].rid;
130         break;
131       }
132     }
133
134     if (rid == 0)
135       rid = atoi(s2);
136
137     if (rid == 0)
138     {
139       DEBUG(1,("make_dom_gids: unknown well-known alias RID %s/%s\n", s2, attr));
140       count--;
141     }
142     else
143     {
144       gids[count].g_rid = rid;
145       gids[count].attr  = atoi(attr);
146
147       DEBUG(5,("group id: %d attr: %d\n", gids[count].g_rid, gids[count].attr));
148     }
149   }
150
151   *ppgids = gids;
152   return count;
153 }
154
155
156 /*******************************************************************
157  gets a domain user's groups
158  ********************************************************************/
159 void get_domain_user_groups(char *domain_groups, char *user)
160 {
161         pstring tmp;
162
163         if (domain_groups == NULL || user == NULL) return;
164
165         /* can only be a user or a guest.  cannot be guest _and_ admin */
166         if (user_in_list(user, lp_domain_guest_group()))
167         {
168                 slprintf(tmp, sizeof(tmp) - 1, " %ld/7 ", DOMAIN_GROUP_RID_GUESTS);
169                 pstrcat(domain_groups, tmp);
170
171                 DEBUG(3,("domain guest group access %s granted\n", tmp));
172         }
173         else
174         {
175                 slprintf(tmp, sizeof(tmp) -1, " %ld/7 ", DOMAIN_GROUP_RID_USERS);
176                 pstrcat(domain_groups, tmp);
177
178                 DEBUG(3,("domain group access %s granted\n", tmp));
179
180                 if (user_in_list(user, lp_domain_admin_group()))
181                 {
182                         slprintf(tmp, sizeof(tmp) - 1, " %ld/7 ", DOMAIN_GROUP_RID_ADMINS);
183                         pstrcat(domain_groups, tmp);
184
185                         DEBUG(3,("domain admin group access %s granted\n", tmp));
186                 }
187         }
188 }
189
190 /*******************************************************************
191  Look up a local (domain) rid and return a name and type.
192  ********************************************************************/
193 uint32 local_lookup_group_name(uint32 rid, char *group_name, uint32 *type)
194 {
195         int i = 0; 
196         (*type) = SID_NAME_DOM_GRP;
197
198         DEBUG(5,("lookup_group_name: rid: %d", rid));
199
200         while (domain_group_rids[i].rid != rid && domain_group_rids[i].rid != 0)
201         {
202                 i++;
203         }
204
205         if (domain_group_rids[i].rid != 0)
206         {
207                 fstrcpy(group_name, domain_group_rids[i].name);
208                 DEBUG(5,(" = %s\n", group_name));
209                 return 0x0;
210         }
211
212         DEBUG(5,(" none mapped\n"));
213         return NT_STATUS_NONE_MAPPED;
214 }
215
216 /*******************************************************************
217  Look up a local alias rid and return a name and type.
218  ********************************************************************/
219 uint32 local_lookup_alias_name(uint32 rid, char *alias_name, uint32 *type)
220 {
221         int i = 0; 
222         (*type) = SID_NAME_WKN_GRP;
223
224         DEBUG(5,("lookup_alias_name: rid: %d", rid));
225
226         while (builtin_alias_rids[i].rid != rid && builtin_alias_rids[i].rid != 0)
227         {
228                 i++;
229         }
230
231         if (builtin_alias_rids[i].rid != 0)
232         {
233                 fstrcpy(alias_name, builtin_alias_rids[i].name);
234                 DEBUG(5,(" = %s\n", alias_name));
235                 return 0x0;
236         }
237
238         DEBUG(5,(" none mapped\n"));
239         return NT_STATUS_NONE_MAPPED;
240 }
241
242 /*******************************************************************
243  Look up a local user rid and return a name and type.
244  ********************************************************************/
245 uint32 local_lookup_user_name(uint32 rid, char *user_name, uint32 *type)
246 {
247         SAM_ACCOUNT *sampwd=NULL;
248         int i = 0;
249         BOOL ret;
250         
251         (*type) = SID_NAME_USER;
252
253         DEBUG(5,("lookup_user_name: rid: %d", rid));
254
255         /* look up the well-known domain user rids first */
256         while (domain_user_rids[i].rid != rid && domain_user_rids[i].rid != 0)
257         {
258                 i++;
259         }
260
261         if (domain_user_rids[i].rid != 0) {
262                 fstrcpy(user_name, domain_user_rids[i].name);
263                 DEBUG(5,(" = %s\n", user_name));
264                 return 0x0;
265         }
266
267         pdb_init_sam(&sampwd);
268
269         /* ok, it's a user.  find the user account */
270         become_root();
271         ret = pdb_getsampwrid(sampwd, rid);
272         unbecome_root();
273
274         if (ret == True) {
275                 fstrcpy(user_name, pdb_get_username(sampwd) );
276                 DEBUG(5,(" = %s\n", user_name));
277                 pdb_free_sam(sampwd);
278                 return 0x0;
279         }
280
281         DEBUG(5,(" none mapped\n"));
282         pdb_free_sam(sampwd);
283         return NT_STATUS_NONE_MAPPED;
284 }
285
286 /*******************************************************************
287  Look up a local (domain) group name and return a rid
288  ********************************************************************/
289 uint32 local_lookup_group_rid(char *group_name, uint32 *rid)
290 {
291         char *grp_name;
292         int i = -1; /* start do loop at -1 */
293
294         do /* find, if it exists, a group rid for the group name*/
295         {
296                 i++;
297                 (*rid) = domain_group_rids[i].rid;
298                 grp_name = domain_group_rids[i].name;
299
300         } while (grp_name != NULL && !strequal(grp_name, group_name));
301
302         return (grp_name != NULL) ? 0 : NT_STATUS_NONE_MAPPED;
303 }
304
305 /*******************************************************************
306  Look up a local (BUILTIN) alias name and return a rid
307  ********************************************************************/
308 uint32 local_lookup_alias_rid(char *alias_name, uint32 *rid)
309 {
310         char *als_name;
311         int i = -1; /* start do loop at -1 */
312
313         do /* find, if it exists, a alias rid for the alias name*/
314         {
315                 i++;
316                 (*rid) = builtin_alias_rids[i].rid;
317                 als_name = builtin_alias_rids[i].name;
318
319         } while (als_name != NULL && !strequal(als_name, alias_name));
320
321         return (als_name != NULL) ? 0 : NT_STATUS_NONE_MAPPED;
322 }
323
324 /*******************************************************************
325  Look up a local user name and return a rid
326  ********************************************************************/
327 uint32 local_lookup_user_rid(char *user_name, uint32 *rid)
328 {
329         SAM_ACCOUNT *sampass=NULL;
330         BOOL ret;
331
332         (*rid) = 0;
333
334         pdb_init_sam(&sampass);
335
336         /* find the user account */
337         become_root();
338         ret = pdb_getsampwnam(sampass, user_name);
339         unbecome_root();
340
341         if (ret == True) {
342                 (*rid) = pdb_get_user_rid(sampass);
343                 pdb_free_sam(sampass);
344                 return 0x0;
345         }
346
347         pdb_free_sam(sampass);
348         return NT_STATUS_NONE_MAPPED;
349 }