Fix immediate bug where the idmap can't tell the difference between an entry
[ira/wip.git] / source3 / nsswitch / winbindd_util.c
index d5668a2bb68eee85b892a52bfc26df5d8d30a70d..0bc4beeac6c272423eda097c989713d8659cdcec 100644 (file)
@@ -73,22 +73,27 @@ void free_domain_list(void)
        }
 }
 
-/* Add a trusted domain to our list of domains */
 
-static struct winbindd_domain *add_trusted_domain(char *domain_name,
-                                                 struct winbindd_methods *methods)
+/* Add a trusted domain to our list of domains */
+static struct winbindd_domain *add_trusted_domain(const char *domain_name, const char *alt_name,
+                                                 struct winbindd_methods *methods,
+                                                 DOM_SID *sid)
 {
        struct winbindd_domain *domain;
         
        /* We can't call domain_list() as this function is called from
           init_domain_list() and we'll get stuck in a loop. */
-
        for (domain = _domain_list; domain; domain = domain->next) {
-               if (strcmp(domain_name, domain->name) == 0) {
-                       DEBUG(3, ("domain %s already in domain list\n", 
-                                 domain_name));
+               if (strcasecmp(domain_name, domain->name) == 0 ||
+                   strcasecmp(domain_name, domain->alt_name) == 0) {
                        return domain;
                }
+               if (alt_name && *alt_name) {
+                       if (strcasecmp(alt_name, domain->name) == 0 ||
+                           strcasecmp(alt_name, domain->alt_name) == 0) {
+                               return domain;
+                       }
+               }
        }
         
        /* Create new domain entry */
@@ -101,75 +106,122 @@ static struct winbindd_domain *add_trusted_domain(char *domain_name,
         
        ZERO_STRUCTP(domain);
 
+       /* prioritise the short name */
+       if (strchr_m(domain_name, '.') && alt_name && *alt_name) {
+               fstrcpy(domain->name, alt_name);
+               fstrcpy(domain->alt_name, domain_name);
+       } else {
        fstrcpy(domain->name, domain_name);
-        domain->methods = methods;
+               if (alt_name) {
+                       fstrcpy(domain->alt_name, alt_name);
+               }
+       }
+
+       domain->methods = methods;
+       domain->backend = NULL;
        domain->sequence_number = DOM_SEQUENCE_NONE;
        domain->last_seq_check = 0;
+       if (sid) {
+               sid_copy(&domain->sid, sid);
+       }
+       
+       /* see if this is a native mode win2k domain */
+          
+       domain->native_mode = cm_check_for_native_mode_win2k( domain_name );
+       DEBUG(3,("add_trusted_domain: %s is a %s mode domain\n", domain_name,
+               domain->native_mode ? "native" : "mixed (or NT4)" ));
 
        /* Link to domain list */
-        
        DLIST_ADD(_domain_list, domain);
         
+       DEBUG(1,("Added domain %s %s %s\n", 
+                domain->name, domain->alt_name,
+                sid?sid_string_static(&domain->sid):""));
+        
        return domain;
 }
 
-/* Look up global info for the winbind daemon */
 
-BOOL init_domain_list(void)
+/*
+  rescan our domains looking for new trusted domains
+ */
+void rescan_trusted_domains(BOOL force)
 {
-       NTSTATUS result;
-       TALLOC_CTX *mem_ctx;
-       extern struct winbindd_methods cache_methods;
        struct winbindd_domain *domain;
-       DOM_SID *dom_sids;
-       char **names;
-       int num_domains = 0;
+       TALLOC_CTX *mem_ctx;
+       static time_t last_scan;
+       time_t t = time(NULL);
 
-       if (!(mem_ctx = talloc_init_named("init_domain_list")))
-               return False;
+       /* trusted domains might be disabled */
+       if (!lp_allow_trusted_domains()) {
+               return;
+       }
 
-       /* Free existing list */
+       /* Only rescan every few minutes but force if necessary */
 
-       free_domain_list();
+       if (((unsigned)(t - last_scan) < WINBINDD_RESCAN_FREQ) && !force)
+               return;
 
-       /* Add ourselves as the first entry */
-
-       domain = add_trusted_domain(lp_workgroup(), &cache_methods);
+       last_scan = t;
 
-       /* Now we *must* get the domain sid for our primary domain. Go into
-          a holding pattern until that is available */
+       DEBUG(1, ("scanning trusted domain list\n"));
 
-       result = cache_methods.domain_sid(domain, &domain->sid);
-       while (!NT_STATUS_IS_OK(result)) {
-               sleep(10);
-               DEBUG(1,("Retrying startup domain sid fetch for %s\n",
-                        domain->name));
-               result = cache_methods.domain_sid(domain, &domain->sid);
-       }
-       
-       DEBUG(1,("Added domain %s (%s)\n", 
-                domain->name, 
-                sid_string_static(&domain->sid)));
+       if (!(mem_ctx = talloc_init("init_domain_list")))
+               return;
 
-       DEBUG(1, ("getting trusted domain list\n"));
+       for (domain = _domain_list; domain; domain = domain->next) {
+               NTSTATUS result;
+               char **names;
+               char **alt_names;
+               int num_domains = 0;
+               DOM_SID *dom_sids;
+               int i;
 
-       result = cache_methods.trusted_domains(domain, mem_ctx, &num_domains,
-                                              &names, &dom_sids);
+               result = domain->methods->trusted_domains(domain, mem_ctx, &num_domains,
+                                                         &names, &alt_names, &dom_sids);
+               if (!NT_STATUS_IS_OK(result)) {
+                       continue;
+               }
 
-       /* Add each domain to the trusted domain list */
-       if (NT_STATUS_IS_OK(result)) {
-               int i;
+               /* Add each domain to the trusted domain list. Each domain inherits
+                  the access methods of its parent */
                for(i = 0; i < num_domains; i++) {
-                       domain = add_trusted_domain(names[i], &cache_methods);
-                       if (!domain) continue;
-                       sid_copy(&domain->sid, &dom_sids[i]);
-                       DEBUG(1,("Added domain %s (%s)\n", 
-                                domain->name, 
-                                sid_string_static(&domain->sid)));
+                       DEBUG(10,("Found domain %s\n", names[i]));
+                       add_trusted_domain(names[i], alt_names?alt_names[i]:NULL,
+                                          domain->methods, &dom_sids[i]);
+                       
+                       /* store trusted domain in the cache */
+                       trustdom_cache_store(names[i], alt_names ? alt_names[i] : NULL,
+                                            &dom_sids[i], t + WINBINDD_RESCAN_FREQ);
                }
        }
 
        talloc_destroy(mem_ctx);
+}
+
+/* Look up global info for the winbind daemon */
+BOOL init_domain_list(void)
+{
+       extern struct winbindd_methods cache_methods;
+       struct winbindd_domain *domain;
+
+       /* Free existing list */
+       free_domain_list();
+
+       /* Add ourselves as the first entry */
+       domain = add_trusted_domain(lp_workgroup(), NULL, &cache_methods, NULL);
+       if (!secrets_fetch_domain_sid(domain->name, &domain->sid)) {
+               DEBUG(1, ("Could not fetch sid for our domain %s\n",
+                         domain->name));
+               return False;
+       }
+
+       /* get any alternate name for the primary domain */
+       cache_methods.alternate_name(domain);
+
+       /* do an initial scan for trusted domains */
+       rescan_trusted_domains(True);
+
        return True;
 }
 
@@ -184,7 +236,7 @@ struct winbindd_domain *find_domain_from_name(const char *domain_name)
 
        for (domain = domain_list(); domain != NULL; domain = domain->next) {
                if (strequal(domain_name, domain->name) ||
-                   strequal(domain_name, domain->full_name))
+                   (domain->alt_name[0] && strequal(domain_name, domain->alt_name)))
                        return domain;
        }
 
@@ -218,14 +270,20 @@ BOOL winbindd_lookup_sid_by_name(struct winbindd_domain *domain,
                                 enum SID_NAME_USE *type)
 {
        NTSTATUS result;
-        
+        TALLOC_CTX *mem_ctx;
        /* Don't bother with machine accounts */
-        
+
        if (name[strlen(name) - 1] == '$')
                return False;
 
+       mem_ctx = talloc_init("lookup_sid_by_name for %s\n", name);
+       if (!mem_ctx) 
+               return False;
+        
        /* Lookup name */
-       result = domain->methods->name_to_sid(domain, name, sid, type);
+       result = domain->methods->name_to_sid(domain, mem_ctx, name, sid, type);
+
+       talloc_destroy(mem_ctx);
         
        /* Return rid and type if lookup successful */
        if (!NT_STATUS_IS_OK(result)) {
@@ -270,7 +328,7 @@ BOOL winbindd_lookup_name_by_sid(DOM_SID *sid,
 
        /* Lookup name */
 
-       if (!(mem_ctx = talloc_init_named("winbindd_lookup_name_by_sid")))
+       if (!(mem_ctx = talloc_init("winbindd_lookup_name_by_sid")))
                return False;
         
        result = domain->methods->sid_to_name(domain, mem_ctx, sid, &names, type);
@@ -315,19 +373,21 @@ void free_getent_state(struct getent_state *state)
        }
 }
 
-/* Initialise trusted domain info */
+/* Parse winbindd related parameters */
 
 BOOL winbindd_param_init(void)
 {
        /* Parse winbind uid and winbind_gid parameters */
 
-       if (!lp_winbind_uid(&server_state.uid_low, &server_state.uid_high)) {
-               DEBUG(0, ("winbind uid range missing or invalid\n"));
+       if (!lp_idmap_uid(&server_state.uid_low, &server_state.uid_high)) {
+               DEBUG(0, ("winbindd: idmap uid range missing or invalid\n"));
+               DEBUG(0, ("winbindd: cannot continue, exiting.\n"));
                return False;
        }
        
-       if (!lp_winbind_gid(&server_state.gid_low, &server_state.gid_high)) {
-               DEBUG(0, ("winbind gid range missing or invalid\n"));
+       if (!lp_idmap_gid(&server_state.gid_low, &server_state.gid_high)) {
+               DEBUG(0, ("winbindd: idmap gid range missing or invalid\n"));
+               DEBUG(0, ("winbindd: cannot continue, exiting.\n"));
                return False;
        }
        
@@ -339,7 +399,7 @@ BOOL winbindd_param_init(void)
 BOOL check_domain_env(char *domain_env, char *domain)
 {
        fstring name;
-       char *tmp = domain_env;
+       const char *tmp = domain_env;
 
        while(next_token(&tmp, name, ",", sizeof(fstring))) {
                if (strequal(name, domain))
@@ -350,7 +410,6 @@ BOOL check_domain_env(char *domain_env, char *domain)
 }
 
 /* Parse a string of the form DOMAIN/user into a domain and a user */
-extern fstring global_myworkgroup;
 
 BOOL parse_domain_user(const char *domuser, fstring domain, fstring user)
 {
@@ -361,7 +420,7 @@ BOOL parse_domain_user(const char *domuser, fstring domain, fstring user)
        
        if(!p && lp_winbind_use_default_domain()) {
                fstrcpy(user, domuser);
-               fstrcpy(domain, global_myworkgroup);
+               fstrcpy(domain, lp_workgroup());
        } else {
                fstrcpy(user, p+1);
                fstrcpy(domain, domuser);
@@ -376,13 +435,13 @@ BOOL parse_domain_user(const char *domuser, fstring domain, fstring user)
     'winbind separator' options.
     This means:
        - omit DOMAIN when 'winbind use default domain = true' and DOMAIN is
-       global_myworkgroup
+       lp_workgroup
         
 */
 void fill_domain_username(fstring name, const char *domain, const char *user)
 {
        if(lp_winbind_use_default_domain() &&
-           !strcmp(global_myworkgroup, domain)) {
+           !strcmp(lp_workgroup(), domain)) {
                strlcpy(name, user, sizeof(fstring));
        } else {
                slprintf(name, sizeof(fstring) - 1, "%s%s%s",
@@ -390,3 +449,336 @@ void fill_domain_username(fstring name, const char *domain, const char *user)
                         user);
        }
 }
+
+/*
+ * Winbindd socket accessor functions
+ */
+
+char *get_winbind_priv_pipe_dir(void) 
+{
+       return lock_path(WINBINDD_PRIV_SOCKET_SUBDIR);
+}
+
+/* Open the winbindd socket */
+
+static int _winbindd_socket = -1;
+static int _winbindd_priv_socket = -1;
+
+int open_winbindd_socket(void)
+{
+       if (_winbindd_socket == -1) {
+               _winbindd_socket = create_pipe_sock(
+                       WINBINDD_SOCKET_DIR, WINBINDD_SOCKET_NAME, 0755);
+               DEBUG(10, ("open_winbindd_socket: opened socket fd %d\n",
+                          _winbindd_socket));
+       }
+
+       return _winbindd_socket;
+}
+
+int open_winbindd_priv_socket(void)
+{
+       if (_winbindd_priv_socket == -1) {
+               _winbindd_priv_socket = create_pipe_sock(
+                       get_winbind_priv_pipe_dir(), WINBINDD_SOCKET_NAME, 0750);
+               DEBUG(10, ("open_winbindd_priv_socket: opened socket fd %d\n",
+                          _winbindd_priv_socket));
+       }
+
+       return _winbindd_priv_socket;
+}
+
+/* Close the winbindd socket */
+
+void close_winbindd_socket(void)
+{
+       if (_winbindd_socket != -1) {
+               DEBUG(10, ("close_winbindd_socket: closing socket fd %d\n",
+                          _winbindd_socket));
+               close(_winbindd_socket);
+               _winbindd_socket = -1;
+       }
+       if (_winbindd_priv_socket != -1) {
+               DEBUG(10, ("close_winbindd_socket: closing socket fd %d\n",
+                          _winbindd_priv_socket));
+               close(_winbindd_priv_socket);
+               _winbindd_priv_socket = -1;
+       }
+}
+
+/*
+ * Client list accessor functions
+ */
+
+static struct winbindd_cli_state *_client_list;
+static int _num_clients;
+
+/* Return list of all connected clients */
+
+struct winbindd_cli_state *winbindd_client_list(void)
+{
+       return _client_list;
+}
+
+/* Add a connection to the list */
+
+void winbindd_add_client(struct winbindd_cli_state *cli)
+{
+       DLIST_ADD(_client_list, cli);
+       _num_clients++;
+}
+
+/* Remove a client from the list */
+
+void winbindd_remove_client(struct winbindd_cli_state *cli)
+{
+       DLIST_REMOVE(_client_list, cli);
+       _num_clients--;
+}
+
+/* Close all open clients */
+
+void winbindd_kill_all_clients(void)
+{
+       struct winbindd_cli_state *cl = winbindd_client_list();
+
+       DEBUG(10, ("winbindd_kill_all_clients: going postal\n"));
+
+       while (cl) {
+               struct winbindd_cli_state *next;
+               
+               next = cl->next;
+               winbindd_remove_client(cl);
+               cl = next;
+       }
+}
+
+/* Return number of open clients */
+
+int winbindd_num_clients(void)
+{
+       return _num_clients;
+}
+
+/* Help with RID -> SID conversion */
+
+DOM_SID *rid_to_talloced_sid(struct winbindd_domain *domain,
+                                   TALLOC_CTX *mem_ctx,
+                                   uint32 rid) 
+{
+       DOM_SID *sid;
+       sid = talloc(mem_ctx, sizeof(*sid));
+       if (!sid) {
+               smb_panic("rid_to_to_talloced_sid: talloc for DOM_SID failed!\n");
+       }
+       sid_copy(sid, &domain->sid);
+       sid_append_rid(sid, rid);
+       return sid;
+}
+       
+/*****************************************************************************
+ For idmap conversion: convert one record to new format
+ Ancient versions (eg 2.2.3a) of winbindd_idmap.tdb mapped DOMAINNAME/rid
+ instead of the SID.
+*****************************************************************************/
+static int convert_fn(TDB_CONTEXT *tdb, TDB_DATA key, TDB_DATA data, void *state)
+{
+       struct winbindd_domain *domain;
+       char *p;
+       DOM_SID sid;
+       uint32 rid;
+       fstring keystr;
+       fstring dom_name;
+       TDB_DATA key2;
+       BOOL *failed = (BOOL *)state;
+
+       DEBUG(10,("Converting %s\n", key.dptr));
+
+       p = strchr(key.dptr, '/');
+       if (!p)
+               return 0;
+
+       *p = 0;
+       fstrcpy(dom_name, key.dptr);
+       *p++ = '/';
+
+       domain = find_domain_from_name(dom_name);
+       if (domain == NULL) {
+               /* We must delete the old record. */
+               DEBUG(0,("Unable to find domain %s\n", dom_name ));
+               DEBUG(0,("deleting record %s\n", key.dptr ));
+
+               if (tdb_delete(tdb, key) != 0) {
+                       DEBUG(0, ("Unable to delete record %s\n", key.dptr));
+                       *failed = True;
+                       return -1;
+               }
+
+               return 0;
+       }
+
+       rid = atoi(p);
+
+       sid_copy(&sid, &domain->sid);
+       sid_append_rid(&sid, rid);
+
+       sid_to_string(keystr, &sid);
+       key2.dptr = keystr;
+       key2.dsize = strlen(keystr) + 1;
+
+       if (tdb_store(tdb, key2, data, TDB_INSERT) != 0) {
+               DEBUG(0,("Unable to add record %s\n", key2.dptr ));
+               *failed = True;
+               return -1;
+       }
+
+       if (tdb_store(tdb, data, key2, TDB_REPLACE) != 0) {
+               DEBUG(0,("Unable to update record %s\n", data.dptr ));
+               *failed = True;
+               return -1;
+       }
+
+       if (tdb_delete(tdb, key) != 0) {
+               DEBUG(0,("Unable to delete record %s\n", key.dptr ));
+               *failed = True;
+               return -1;
+       }
+
+       return 0;
+}
+
+/* These definitions are from sam/idmap_tdb.c. Replicated here just
+   out of laziness.... :-( */
+
+/* High water mark keys */
+#define HWM_GROUP  "GROUP HWM"
+#define HWM_USER   "USER HWM"
+
+/* idmap version determines auto-conversion */
+#define IDMAP_VERSION 2
+
+
+/*****************************************************************************
+ Convert the idmap database from an older version.
+*****************************************************************************/
+
+static BOOL idmap_convert(const char *idmap_name)
+{
+       int32 vers;
+       BOOL bigendianheader;
+       BOOL failed = False;
+       TDB_CONTEXT *idmap_tdb;
+
+       if (!(idmap_tdb = tdb_open_log(idmap_name, 0,
+                                       TDB_DEFAULT, O_RDWR,
+                                       0600))) {
+               DEBUG(0, ("idmap_convert: Unable to open idmap database\n"));
+               return False;
+       }
+
+       bigendianheader = (idmap_tdb->flags & TDB_BIGENDIAN) ? True : False;
+
+       vers = tdb_fetch_int32(idmap_tdb, "IDMAP_VERSION");
+
+       if (((vers == -1) && bigendianheader) || (IREV(vers) == IDMAP_VERSION)) {
+               /* Arrggghh ! Bytereversed or old big-endian - make order independent ! */
+               /*
+                * high and low records were created on a
+                * big endian machine and will need byte-reversing.
+                */
+
+               int32 wm;
+
+               wm = tdb_fetch_int32(idmap_tdb, HWM_USER);
+
+               if (wm != -1) {
+                       wm = IREV(wm);
+               }  else {
+                       wm = server_state.uid_low;
+               }
+
+               if (tdb_store_int32(idmap_tdb, HWM_USER, wm) == -1) {
+                       DEBUG(0, ("idmap_convert: Unable to byteswap user hwm in idmap database\n"));
+                       tdb_close(idmap_tdb);
+                       return False;
+               }
+
+               wm = tdb_fetch_int32(idmap_tdb, HWM_GROUP);
+               if (wm != -1) {
+                       wm = IREV(wm);
+               } else {
+                       wm = server_state.gid_low;
+               }
+
+               if (tdb_store_int32(idmap_tdb, HWM_GROUP, wm) == -1) {
+                       DEBUG(0, ("idmap_convert: Unable to byteswap group hwm in idmap database\n"));
+                       tdb_close(idmap_tdb);
+                       return False;
+               }
+       }
+
+       /* the old format stored as DOMAIN/rid - now we store the SID direct */
+       tdb_traverse(idmap_tdb, convert_fn, &failed);
+
+       if (failed) {
+               DEBUG(0, ("Problem during conversion\n"));
+               tdb_close(idmap_tdb);
+               return False;
+       }
+
+       if (tdb_store_int32(idmap_tdb, "IDMAP_VERSION", IDMAP_VERSION) == -1) {
+               DEBUG(0, ("idmap_convert: Unable to dtore idmap version in databse\n"));
+               tdb_close(idmap_tdb);
+               return False;
+       }
+
+       tdb_close(idmap_tdb);
+       return True;
+}
+
+/*****************************************************************************
+ Convert the idmap database from an older version if necessary
+*****************************************************************************/
+
+BOOL winbindd_upgrade_idmap(void)
+{
+       pstring idmap_name;
+       pstring backup_name;
+       SMB_STRUCT_STAT stbuf;
+       TDB_CONTEXT *idmap_tdb;
+
+       pstrcpy(idmap_name, lock_path("winbindd_idmap.tdb"));
+
+       if (!file_exist(idmap_name, &stbuf)) {
+               /* nothing to convert return */
+               return True;
+       }
+
+       if (!(idmap_tdb = tdb_open_log(idmap_name, 0,
+                                       TDB_DEFAULT, O_RDWR,
+                                       0600))) {
+               DEBUG(0, ("idmap_convert: Unable to open idmap database\n"));
+               return False;
+       }
+
+       if (tdb_fetch_int32(idmap_tdb, "IDMAP_VERSION") == IDMAP_VERSION) {
+               /* nothing to convert return */
+               tdb_close(idmap_tdb);
+               return True;
+       }
+
+       /* backup_tdb expects the tdb not to be open */
+       tdb_close(idmap_tdb);
+
+       DEBUG(0, ("Upgrading winbindd_idmap.tdb from an old version\n"));
+
+       pstrcpy(backup_name, idmap_name);
+       pstrcat(backup_name, ".bak");
+
+       if (backup_tdb(idmap_name, backup_name) != 0) {
+               DEBUG(0, ("Could not backup idmap database\n"));
+               return False;
+       }
+
+       return idmap_convert(idmap_name);
+}