source3/rpc_server/srv_lsa.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  *  Copyright (C) Jeremy Allison                    1998.
  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 2 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, write to the Free Software
  23  *  Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  24  */
  25
  26
  27 #include "includes.h"
  28 #include "nterr.h"
  29
  30 extern int DEBUGLEVEL;
  31 extern DOM_SID global_machine_sid;
  32
  33 /***************************************************************************
  34 lsa_reply_open_policy
  35  ***************************************************************************/
  36 static void lsa_reply_open_policy(prs_struct *rdata)
  37 {
  38         int i;
  39         LSA_R_OPEN_POL r_o;
  40
  41         ZERO_STRUCT(r_o);
  42
  43         /* set up the LSA QUERY INFO response */
  44
  45         for (i = 4; i < POL_HND_SIZE; i++)
  46         {
  47                 r_o.pol.data[i] = i;
  48         }
  49         r_o.status = 0x0;
  50
  51         /* store the response in the SMB stream */
  52         lsa_io_r_open_pol("", &r_o, rdata, 0);
  53 }
  54
  55 /***************************************************************************
  56 make_dom_query
  57  ***************************************************************************/
  58 static void make_dom_query(DOM_QUERY *d_q, char *dom_name, DOM_SID *dom_sid)
  59 {
  60         int domlen = strlen(dom_name);
  61
  62         d_q->uni_dom_max_len = domlen * 2;
  63         d_q->uni_dom_str_len = domlen * 2;
  64
  65         d_q->buffer_dom_name = 4; /* domain buffer pointer */
  66         d_q->buffer_dom_sid  = 2; /* domain sid pointer */
  67
  68         /* this string is supposed to be character short */
  69         make_unistr2(&(d_q->uni_domain_name), dom_name, domlen);
  70
  71         make_dom_sid2(&(d_q->dom_sid), dom_sid);
  72 }
  73
  74 /***************************************************************************
  75 lsa_reply_query_info
  76  ***************************************************************************/
  77 static void lsa_reply_enum_trust_dom(LSA_Q_ENUM_TRUST_DOM *q_e,
  78                                 prs_struct *rdata,
  79                                 uint32 enum_context, char *dom_name, DOM_SID *dom_sid)
  80 {
  81         LSA_R_ENUM_TRUST_DOM r_e;
  82
  83         ZERO_STRUCT(r_e);
  84
  85         /* set up the LSA QUERY INFO response */
  86         make_r_enum_trust_dom(&r_e, enum_context, dom_name, dom_sid,
  87               dom_name != NULL ? 0x0 : 0x80000000 | NT_STATUS_UNABLE_TO_FREE_VM);
  88
  89         /* store the response in the SMB stream */
  90         lsa_io_r_enum_trust_dom("", &r_e, rdata, 0);
  91 }
  92
  93 /***************************************************************************
  94 lsa_reply_query_info
  95  ***************************************************************************/
  96 static void lsa_reply_query_info(LSA_Q_QUERY_INFO *q_q, prs_struct *rdata,
  97                                 char *dom_name, DOM_SID *dom_sid)
  98 {
  99         LSA_R_QUERY_INFO r_q;
 100
 101         ZERO_STRUCT(r_q);
 102
 103         /* set up the LSA QUERY INFO response */
 104
 105         r_q.undoc_buffer = 0x22000000; /* bizarre */
 106         r_q.info_class = q_q->info_class;
 107
 108         make_dom_query(&r_q.dom.id5, dom_name, dom_sid);
 109
 110         r_q.status = 0x0;
 111
 112         /* store the response in the SMB stream */
 113         lsa_io_r_query("", &r_q, rdata, 0);
 114 }
 115
 116
 117 /***************************************************************************
 118 make_dom_ref
 119  ***************************************************************************/
 120 static void make_dom_ref(DOM_R_REF *ref, int num_domains,
 121                                 char **dom_names, DOM_SID **dom_sids)
 122
 123 {
 124         int i;
 125
 126         if (num_domains > MAX_REF_DOMAINS)
 127         {
 128                 num_domains = MAX_REF_DOMAINS;
 129         }
 130
 131         ref->undoc_buffer = 1;
 132         ref->num_ref_doms_1 = num_domains;
 133         ref->undoc_buffer2 = 1;
 134         ref->max_entries = MAX_REF_DOMAINS;
 135         ref->num_ref_doms_2 = num_domains;
 136
 137         for (i = 0; i < num_domains; i++)
 138         {
 139                 int len = dom_names[i] != NULL ? strlen(dom_names[i]) : 0;
 140
 141                 make_uni_hdr(&(ref->hdr_ref_dom[i].hdr_dom_name), len, len, len != 0 ? 1 : 0);
 142                 ref->hdr_ref_dom[i].ptr_dom_sid = dom_sids[i] != NULL ? 1 : 0;
 143
 144                 make_unistr2 (&(ref->ref_dom[i].uni_dom_name), dom_names[i], len);
 145                 make_dom_sid2(&(ref->ref_dom[i].ref_dom     ), dom_sids [i]);
 146         }
 147
 148 }
 149
 150 /***************************************************************************
 151 make_reply_lookup_rids
 152  ***************************************************************************/
 153 static void make_reply_lookup_rids(LSA_R_LOOKUP_RIDS *r_l,
 154                                 int num_entries, uint32 dom_rids[MAX_LOOKUP_SIDS],
 155                                 int num_ref_doms,
 156                                 char **dom_names, DOM_SID **dom_sids)
 157 {
 158         int i;
 159
 160         make_dom_ref(&(r_l->dom_ref), num_ref_doms, dom_names, dom_sids);
 161
 162         r_l->num_entries = num_entries;
 163         r_l->undoc_buffer = 1;
 164         r_l->num_entries2 = num_entries;
 165
 166         SMB_ASSERT_ARRAY(r_l->dom_rid, num_entries);
 167
 168         for (i = 0; i < num_entries; i++)
 169         {
 170                 make_dom_rid2(&(r_l->dom_rid[i]), dom_rids[i]);
 171         }
 172
 173         r_l->num_entries3 = num_entries;
 174 }
 175
 176 /***************************************************************************
 177 make_lsa_trans_names
 178  ***************************************************************************/
 179 static void make_lsa_trans_names(LSA_TRANS_NAME_ENUM *trn,
 180                                 int num_entries, DOM_SID2 sid[MAX_LOOKUP_SIDS],
 181                                 uint32 *total)
 182 {
 183         uint32 status = 0x0;
 184         int i;
 185         (*total) = 0;
 186
 187         SMB_ASSERT(num_entries <= MAX_LOOKUP_SIDS);
 188
 189         for (i = 0; i < num_entries; i++)
 190         {
 191                 uint32 rid = 0xffffffff;
 192                 uint8 num_auths = sid[i].sid.num_auths;
 193                 fstring name;
 194                 uint32 type;
 195
 196                 SMB_ASSERT_ARRAY(sid[i].sid.sub_auths, num_auths);
 197
 198                 /* find the rid to look up */
 199                 if (num_auths != 0)
 200                 {
 201                         rid = sid[i].sid.sub_auths[num_auths-1];
 202
 203                         status = 0xC0000000 | NT_STATUS_NONE_MAPPED;
 204
 205                         status = (status != 0x0) ? lookup_user_name (rid, name, &type) : status;
 206                         status = (status != 0x0) ? lookup_group_name(rid, name, &type) : status;
 207                         status = (status != 0x0) ? lookup_alias_name(rid, name, &type) : status;
 208                 }
 209
 210                 if (status == 0x0)
 211                 {
 212                         make_lsa_trans_name(&(trn->name[(*total)]), type, name, (*total));
 213                         (*total)++;
 214                 }
 215         }
 216
 217         trn->num_entries = (*total);
 218         trn->ptr_trans_names = 1;
 219         trn->num_entries2 = (*total);
 220 }
 221
 222 /***************************************************************************
 223 make_reply_lookup_sids
 224  ***************************************************************************/
 225 static void make_reply_lookup_sids(LSA_R_LOOKUP_SIDS *r_l,
 226                                 DOM_R_REF *ref, LSA_TRANS_NAME_ENUM *names,
 227                                 uint32 mapped_count, uint32 status)
 228 {
 229         r_l->dom_ref      = ref;
 230         r_l->names        = names;
 231         r_l->mapped_count = mapped_count;
 232         r_l->status       = status;
 233 }
 234
 235 /***************************************************************************
 236 lsa_reply_lookup_sids
 237  ***************************************************************************/
 238 static void lsa_reply_lookup_sids(prs_struct *rdata,
 239                                 int num_entries, DOM_SID2 sid[MAX_LOOKUP_SIDS],
 240                                 int num_ref_doms,
 241                                 char **dom_names, DOM_SID **dom_sids)
 242 {
 243         LSA_R_LOOKUP_SIDS r_l;
 244         DOM_R_REF ref;
 245         LSA_TRANS_NAME_ENUM names;
 246         uint32 mapped_count = 0;
 247
 248         ZERO_STRUCT(r_l);
 249         ZERO_STRUCT(ref);
 250         ZERO_STRUCT(names);
 251
 252         /* set up the LSA Lookup SIDs response */
 253         make_dom_ref(&ref, num_ref_doms, dom_names, dom_sids);
 254         make_lsa_trans_names(&names, num_entries, sid, &mapped_count);
 255         make_reply_lookup_sids(&r_l, &ref, &names, mapped_count, 0x0);
 256
 257         /* store the response in the SMB stream */
 258         lsa_io_r_lookup_sids("", &r_l, rdata, 0);
 259 }
 260
 261 /***************************************************************************
 262 lsa_reply_lookup_rids
 263  ***************************************************************************/
 264 static void lsa_reply_lookup_rids(prs_struct *rdata,
 265                                 int num_entries, uint32 dom_rids[MAX_LOOKUP_SIDS],
 266                                 int num_ref_doms,
 267                                 char **dom_names, DOM_SID **dom_sids)
 268 {
 269         LSA_R_LOOKUP_RIDS r_l;
 270
 271         ZERO_STRUCT(r_l);
 272
 273         /* set up the LSA Lookup RIDs response */
 274         make_reply_lookup_rids(&r_l, num_entries, dom_rids,
 275                                 num_ref_doms, dom_names, dom_sids);
 276         r_l.status = 0x0;
 277
 278         /* store the response in the SMB stream */
 279         lsa_io_r_lookup_rids("", &r_l, rdata, 0);
 280 }
 281
 282 /***************************************************************************
 283 api_lsa_open_policy
 284  ***************************************************************************/
 285 static void api_lsa_open_policy( uint16 vuid, prs_struct *data,
 286                              prs_struct *rdata )
 287 {
 288         LSA_Q_OPEN_POL q_o;
 289
 290         ZERO_STRUCT(q_o);
 291
 292         /* grab the server, object attributes and desired access flag...*/
 293         lsa_io_q_open_pol("", &q_o, data, 0);
 294
 295         /* lkclXXXX having decoded it, ignore all fields in the open policy! */
 296
 297         /* return a 20 byte policy handle */
 298         lsa_reply_open_policy(rdata);
 299 }
 300
 301 /***************************************************************************
 302 api_lsa_enum_trust_dom
 303  ***************************************************************************/
 304 static void api_lsa_enum_trust_dom( uint16 vuid, prs_struct *data,
 305                                     prs_struct *rdata )
 306 {
 307         LSA_Q_ENUM_TRUST_DOM q_e;
 308
 309         ZERO_STRUCT(q_e);
 310
 311         /* grab the enum trust domain context etc. */
 312         lsa_io_q_enum_trust_dom("", &q_e, data, 0);
 313
 314         /* construct reply.  return status is always 0x0 */
 315         lsa_reply_enum_trust_dom(&q_e, rdata, 0, NULL, NULL);
 316 }
 317
 318 /***************************************************************************
 319 api_lsa_query_info
 320  ***************************************************************************/
 321 static void api_lsa_query_info( uint16 vuid, prs_struct *data,
 322                                 prs_struct *rdata )
 323 {
 324         LSA_Q_QUERY_INFO q_i;
 325         pstring dom_name;
 326
 327         ZERO_STRUCT(q_i);
 328
 329         /* grab the info class and policy handle */
 330         lsa_io_q_query("", &q_i, data, 0);
 331
 332         pstrcpy(dom_name, lp_workgroup());
 333
 334         /* construct reply.  return status is always 0x0 */
 335         lsa_reply_query_info(&q_i, rdata, dom_name, &global_machine_sid);
 336 }
 337
 338 /***************************************************************************
 339 api_lsa_lookup_sids
 340  ***************************************************************************/
 341 static void api_lsa_lookup_sids( uint16 vuid, prs_struct *data,
 342                                  prs_struct *rdata )
 343 {
 344         LSA_Q_LOOKUP_SIDS q_l;
 345         pstring dom_name;
 346         DOM_SID sid_S_1_1;
 347         DOM_SID sid_S_1_3;
 348         DOM_SID sid_S_1_5;
 349
 350         DOM_SID *sid_array[4];
 351         char    *dom_names[4];
 352
 353         ZERO_STRUCT(q_l);
 354         ZERO_STRUCT(sid_S_1_1);
 355         ZERO_STRUCT(sid_S_1_3);
 356         ZERO_STRUCT(sid_S_1_5);
 357
 358         /* grab the info class and policy handle */
 359         lsa_io_q_lookup_sids("", &q_l, data, 0);
 360
 361         pstrcpy(dom_name, lp_workgroup());
 362
 363         string_to_sid(&sid_S_1_1, "S-1-1");
 364         string_to_sid(&sid_S_1_3, "S-1-3");
 365         string_to_sid(&sid_S_1_5, "S-1-5");
 366
 367         dom_names[0] = dom_name;
 368         sid_array[0] = &global_machine_sid;
 369
 370         dom_names[1] = "Everyone";
 371         sid_array[1] = &sid_S_1_1;
 372
 373         dom_names[2] = "don't know";
 374         sid_array[2] = &sid_S_1_3;
 375
 376         dom_names[3] = "NT AUTHORITY";
 377         sid_array[3] = &sid_S_1_5;
 378
 379         /* construct reply.  return status is always 0x0 */
 380         lsa_reply_lookup_sids(rdata,
 381                               q_l.sids.num_entries, q_l.sids.sid, /* SIDs */
 382                               4, dom_names, sid_array);
 383 }
 384
 385 /***************************************************************************
 386 api_lsa_lookup_names
 387  ***************************************************************************/
 388 static void api_lsa_lookup_names( uint16 vuid, prs_struct *data,
 389                                   prs_struct *rdata )
 390 {
 391         int i;
 392         LSA_Q_LOOKUP_RIDS q_l;
 393         pstring dom_name;
 394         uint32 dom_rids[MAX_LOOKUP_SIDS];
 395         uint32 dummy_g_rid;
 396
 397         DOM_SID sid_S_1_1;
 398         DOM_SID sid_S_1_3;
 399         DOM_SID sid_S_1_5;
 400
 401         DOM_SID *sid_array[4];
 402         char    *dom_names[4];
 403
 404         ZERO_STRUCT(q_l);
 405         ZERO_STRUCT(sid_S_1_1);
 406         ZERO_STRUCT(sid_S_1_3);
 407         ZERO_STRUCT(sid_S_1_5);
 408         ZERO_ARRAY(dom_rids);
 409
 410         /* grab the info class and policy handle */
 411         lsa_io_q_lookup_rids("", &q_l, data, 0);
 412
 413         pstrcpy(dom_name, lp_workgroup());
 414
 415         string_to_sid(&sid_S_1_1, "S-1-1");
 416         string_to_sid(&sid_S_1_3, "S-1-3");
 417         string_to_sid(&sid_S_1_5, "S-1-5");
 418
 419         dom_names[0] = dom_name;
 420         sid_array[0] = &global_machine_sid;
 421
 422         dom_names[1] = "Everyone";
 423         sid_array[1] = &sid_S_1_1;
 424
 425         dom_names[2] = "don't know";
 426         sid_array[2] = &sid_S_1_3;
 427
 428         dom_names[3] = "NT AUTHORITY";
 429         sid_array[3] = &sid_S_1_5;
 430
 431         SMB_ASSERT_ARRAY(q_l.lookup_name, q_l.num_entries);
 432
 433         /* convert received RIDs to strings, so we can do them. */
 434         for (i = 0; i < q_l.num_entries; i++)
 435         {
 436                 fstring user_name;
 437                 fstrcpy(user_name, unistr2(q_l.lookup_name[i].str.buffer));
 438         /*
 439          * Map to the UNIX username.
 440          */
 441         map_username(user_name);
 442
 443         /*
 444          * Do any case conversions.
 445          */
 446         (void)Get_Pwnam(user_name, True);
 447
 448                 if (!pdb_name_to_rid(user_name, &dom_rids[i], &dummy_g_rid))
 449                 {
 450                         /* WHOOPS!  we should really do something about this... */
 451                         dom_rids[i] = 0;
 452                 }
 453         }
 454
 455         /* construct reply.  return status is always 0x0 */
 456         lsa_reply_lookup_rids(rdata,
 457                               q_l.num_entries, dom_rids, /* text-converted SIDs */
 458                               4, dom_names, sid_array);
 459 }
 460
 461 /***************************************************************************
 462  api_lsa_close
 463  ***************************************************************************/
 464 static void api_lsa_close( uint16 vuid, prs_struct *data,
 465                                   prs_struct *rdata)
 466 {
 467         /* XXXX this is NOT good */
 468         char *q = mem_data(&(rdata->data), rdata->offset);
 469
 470         SIVAL(q, 0, 0);
 471         q += 4;
 472         SIVAL(q, 0, 0);
 473         q += 4;
 474         SIVAL(q, 0, 0);
 475         q += 4;
 476         SIVAL(q, 0, 0);
 477         q += 4;
 478         SIVAL(q, 0, 0);
 479         q += 4;
 480         SIVAL(q, 0, 0);
 481         q += 4;
 482
 483         rdata->offset += 24;
 484 }
 485
 486 /***************************************************************************
 487  api_lsa_open_secret
 488  ***************************************************************************/
 489 static void api_lsa_open_secret( uint16 vuid, prs_struct *data,
 490                                   prs_struct *rdata)
 491 {
 492         /* XXXX this is NOT good */
 493         char *q = mem_data(&(rdata->data), rdata->offset);
 494
 495         SIVAL(q, 0, 0);
 496         q += 4;
 497         SIVAL(q, 0, 0);
 498         q += 4;
 499         SIVAL(q, 0, 0);
 500         q += 4;
 501         SIVAL(q, 0, 0);
 502         q += 4;
 503         SIVAL(q, 0, 0);
 504         q += 4;
 505         SIVAL(q, 0, 0xC0000000 | NT_STATUS_OBJECT_NAME_NOT_FOUND);
 506         q += 4;
 507
 508         rdata->offset += 24;
 509 }
 510
 511 /***************************************************************************
 512  \PIPE\ntlsa commands
 513  ***************************************************************************/
 514 static struct api_struct api_lsa_cmds[] =
 515 {
 516         { "LSA_OPENPOLICY"      , LSA_OPENPOLICY      , api_lsa_open_policy    },
 517         { "LSA_QUERYINFOPOLICY" , LSA_QUERYINFOPOLICY , api_lsa_query_info     },
 518         { "LSA_ENUMTRUSTDOM"    , LSA_ENUMTRUSTDOM    , api_lsa_enum_trust_dom },
 519         { "LSA_CLOSE"           , LSA_CLOSE           , api_lsa_close          },
 520         { "LSA_OPENSECRET"      , LSA_OPENSECRET      , api_lsa_open_secret    },
 521         { "LSA_LOOKUPSIDS"      , LSA_LOOKUPSIDS      , api_lsa_lookup_sids    },
 522         { "LSA_LOOKUPNAMES"     , LSA_LOOKUPNAMES     , api_lsa_lookup_names   },
 523         { NULL                  , 0                   , NULL                   }
 524 };
 525
 526 /***************************************************************************
 527  api_ntLsarpcTNP
 528  ***************************************************************************/
 529 BOOL api_ntlsa_rpc(pipes_struct *p, prs_struct *data)
 530 {
 531         return api_rpcTNP(p, "api_ntlsa_rpc", api_lsa_cmds, data);
 532 }