2 Unix SMB/CIFS implementation.
4 Winbind daemon for ntdom nss module
6 Copyright (C) Tim Potter 2000-2001
7 Copyright (C) 2001 by Martin Pool <mbp@samba.org>
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.
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.
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.
28 #define DBGC_CLASS DBGC_WINBIND
31 * @file winbindd_util.c
33 * Winbind daemon for NT domain authentication nss module.
38 * Used to clobber name fields that have an undefined value.
40 * Correct code should never look at a field that has this value.
43 static const fstring name_deadbeef
= "<deadbeef>";
45 /* The list of trusted domains. Note that the list can be deleted and
46 recreated using the init_domain_list() function so pointers to
47 individual winbindd_domain structures cannot be made. Keep a copy of
48 the domain name instead. */
50 static struct winbindd_domain
*_domain_list
;
53 When was the last scan of trusted domains done?
58 static time_t last_trustdom_scan
;
60 struct winbindd_domain
*domain_list(void)
65 if (!init_domain_list())
71 /* Free all entries in the trusted domain list */
73 void free_domain_list(void)
75 struct winbindd_domain
*domain
= _domain_list
;
78 struct winbindd_domain
*next
= domain
->next
;
80 DLIST_REMOVE(_domain_list
, domain
);
87 /* Add a trusted domain to our list of domains */
88 static struct winbindd_domain
*add_trusted_domain(const char *domain_name
, const char *alt_name
,
89 struct winbindd_methods
*methods
,
92 struct winbindd_domain
*domain
;
93 const char *alternative_name
= NULL
;
94 static const DOM_SID null_sid
;
96 /* ignore alt_name if we are not in an AD domain */
98 if ( (lp_security() == SEC_ADS
) && alt_name
&& *alt_name
) {
99 alternative_name
= alt_name
;
102 /* We can't call domain_list() as this function is called from
103 init_domain_list() and we'll get stuck in a loop. */
104 for (domain
= _domain_list
; domain
; domain
= domain
->next
) {
105 if (strequal(domain_name
, domain
->name
) ||
106 strequal(domain_name
, domain
->alt_name
)) {
109 if (alternative_name
&& *alternative_name
) {
110 if (strequal(alternative_name
, domain
->name
) ||
111 strequal(alternative_name
, domain
->alt_name
)) {
116 if (sid_equal(sid
, &null_sid
) ) {
118 } else if (sid_equal(sid
, &domain
->sid
)) {
124 /* Create new domain entry */
126 if ((domain
= (struct winbindd_domain
*)malloc(sizeof(*domain
))) == NULL
)
131 ZERO_STRUCTP(domain
);
133 /* prioritise the short name */
134 if (strchr_m(domain_name
, '.') && alternative_name
&& *alternative_name
) {
135 fstrcpy(domain
->name
, alternative_name
);
136 fstrcpy(domain
->alt_name
, domain_name
);
138 fstrcpy(domain
->name
, domain_name
);
139 if (alternative_name
) {
140 fstrcpy(domain
->alt_name
, alternative_name
);
144 domain
->methods
= methods
;
145 domain
->backend
= NULL
;
146 domain
->sequence_number
= DOM_SEQUENCE_NONE
;
147 domain
->last_seq_check
= 0;
149 sid_copy(&domain
->sid
, sid
);
152 /* set flags about native_mode, active_directory */
154 set_dc_type_and_flags( domain
);
156 DEBUG(3,("add_trusted_domain: %s is an %s %s domain\n", domain
->name
,
157 domain
->active_directory
? "ADS" : "NT4",
158 domain
->native_mode
? "native mode" :
159 ((domain
->active_directory
&& !domain
->native_mode
) ? "mixed mode" : "")));
161 /* Link to domain list */
162 DLIST_ADD(_domain_list
, domain
);
164 DEBUG(1,("Added domain %s %s %s\n",
165 domain
->name
, domain
->alt_name
,
166 &domain
->sid
?sid_string_static(&domain
->sid
):""));
171 /********************************************************************
172 Periodically we need to refresh the trusted domain cache for smbd
173 ********************************************************************/
175 void rescan_trusted_domains( void )
177 time_t now
= time(NULL
);
178 struct winbindd_domain
*mydomain
= NULL
;
180 /* see if the time has come... */
182 if ( (now
> last_trustdom_scan
) && ((now
-last_trustdom_scan
) < WINBINDD_RESCAN_FREQ
) )
185 if ( (mydomain
= find_our_domain()) == NULL
) {
186 DEBUG(0,("rescan_trusted_domains: Can't find my own domain!\n"));
190 /* this will only add new domains we didn't already know about */
192 add_trusted_domains( mydomain
);
194 last_trustdom_scan
= now
;
199 /********************************************************************
200 rescan our domains looking for new trusted domains
201 ********************************************************************/
203 void add_trusted_domains( struct winbindd_domain
*domain
)
211 DOM_SID
*dom_sids
, null_sid
;
213 struct winbindd_domain
*new_domain
;
215 /* trusted domains might be disabled */
216 if (!lp_allow_trusted_domains()) {
220 DEBUG(5, ("scanning trusted domain list\n"));
222 if (!(mem_ctx
= talloc_init("init_domain_list")))
225 ZERO_STRUCTP(&null_sid
);
229 /* ask the DC what domains it trusts */
231 result
= domain
->methods
->trusted_domains(domain
, mem_ctx
, (unsigned int *)&num_domains
,
232 &names
, &alt_names
, &dom_sids
);
234 if ( NT_STATUS_IS_OK(result
) ) {
236 /* Add each domain to the trusted domain list */
238 for(i
= 0; i
< num_domains
; i
++) {
239 DEBUG(10,("Found domain %s\n", names
[i
]));
240 add_trusted_domain(names
[i
], alt_names
?alt_names
[i
]:NULL
,
241 domain
->methods
, &dom_sids
[i
]);
243 /* if the SID was empty, we better set it now */
245 if ( sid_equal(&dom_sids
[i
], &null_sid
) ) {
247 new_domain
= find_domain_from_name(names
[i
]);
249 /* this should never happen */
251 DEBUG(0,("rescan_trust_domains: can't find the domain I just added! [%s]\n",
256 /* call the cache method; which will operate on the winbindd_domain \
257 passed in and choose either rpc or ads as appropriate */
259 result
= domain
->methods
->domain_sid( new_domain
, &new_domain
->sid
);
261 if ( NT_STATUS_IS_OK(result
) )
262 sid_copy( &dom_sids
[i
], &new_domain
->sid
);
265 /* store trusted domain in the cache */
266 trustdom_cache_store(names
[i
], alt_names
? alt_names
[i
] : NULL
,
267 &dom_sids
[i
], t
+ WINBINDD_RESCAN_FREQ
);
271 talloc_destroy(mem_ctx
);
274 /* Look up global info for the winbind daemon */
275 BOOL
init_domain_list(void)
277 extern struct winbindd_methods cache_methods
;
278 struct winbindd_domain
*domain
;
280 /* Free existing list */
283 /* Add ourselves as the first entry. */
285 domain
= add_trusted_domain( lp_workgroup(), lp_realm(), &cache_methods
, NULL
);
287 domain
->primary
= True
;
289 /* get any alternate name for the primary domain */
291 cache_methods
.alternate_name(domain
);
293 /* now we have the correct netbios (short) domain name */
296 set_global_myworkgroup( domain
->name
);
298 if (!secrets_fetch_domain_sid(domain
->name
, &domain
->sid
)) {
299 DEBUG(1, ("Could not fetch sid for our domain %s\n",
304 /* do an initial scan for trusted domains */
305 add_trusted_domains(domain
);
307 /* avoid rescanning this right away */
308 last_trustdom_scan
= time(NULL
);
313 * Given a domain name, return the struct winbindd domain info for it
315 * @note Do *not* pass lp_workgroup() to this function. domain_list
316 * may modify it's value, and free that pointer. Instead, our local
317 * domain may be found by calling find_our_domain().
321 * @return The domain structure for the named domain, if it is working.
324 struct winbindd_domain
*find_domain_from_name(const char *domain_name
)
326 struct winbindd_domain
*domain
;
328 /* Search through list */
330 for (domain
= domain_list(); domain
!= NULL
; domain
= domain
->next
) {
331 if (strequal(domain_name
, domain
->name
) ||
332 (domain
->alt_name
[0] && strequal(domain_name
, domain
->alt_name
))) {
342 /* Given a domain sid, return the struct winbindd domain info for it */
344 struct winbindd_domain
*find_domain_from_sid(DOM_SID
*sid
)
346 struct winbindd_domain
*domain
;
348 /* Search through list */
350 for (domain
= domain_list(); domain
!= NULL
; domain
= domain
->next
) {
351 if (sid_compare_domain(sid
, &domain
->sid
) == 0)
360 /* Given a domain sid, return the struct winbindd domain info for it */
362 struct winbindd_domain
*find_our_domain(void)
364 struct winbindd_domain
*domain
;
366 /* Search through list */
368 for (domain
= domain_list(); domain
!= NULL
; domain
= domain
->next
) {
378 /* Lookup a sid in a domain from a name */
380 BOOL
winbindd_lookup_sid_by_name(struct winbindd_domain
*domain
,
381 const char *name
, DOM_SID
*sid
,
382 enum SID_NAME_USE
*type
)
387 mem_ctx
= talloc_init("lookup_sid_by_name for %s\n", name
);
392 result
= domain
->methods
->name_to_sid(domain
, mem_ctx
, name
, sid
, type
);
394 talloc_destroy(mem_ctx
);
396 /* Return rid and type if lookup successful */
397 if (!NT_STATUS_IS_OK(result
)) {
398 *type
= SID_NAME_UNKNOWN
;
401 return NT_STATUS_IS_OK(result
);
405 * @brief Lookup a name in a domain from a sid.
407 * @param sid Security ID you want to look up.
408 * @param name On success, set to the name corresponding to @p sid.
409 * @param dom_name On success, set to the 'domain name' corresponding to @p sid.
410 * @param type On success, contains the type of name: alias, group or
412 * @retval True if the name exists, in which case @p name and @p type
413 * are set, otherwise False.
415 BOOL
winbindd_lookup_name_by_sid(DOM_SID
*sid
,
418 enum SID_NAME_USE
*type
)
424 struct winbindd_domain
*domain
;
426 domain
= find_domain_from_sid(sid
);
429 DEBUG(1,("Can't find domain from sid\n"));
435 if (!(mem_ctx
= talloc_init("winbindd_lookup_name_by_sid")))
438 result
= domain
->methods
->sid_to_name(domain
, mem_ctx
, sid
, &names
, type
);
440 /* Return name and type if successful */
442 if ((rv
= NT_STATUS_IS_OK(result
))) {
443 fstrcpy(dom_name
, domain
->name
);
444 fstrcpy(name
, names
);
446 *type
= SID_NAME_UNKNOWN
;
447 fstrcpy(name
, name_deadbeef
);
450 talloc_destroy(mem_ctx
);
456 /* Free state information held for {set,get,end}{pw,gr}ent() functions */
458 void free_getent_state(struct getent_state
*state
)
460 struct getent_state
*temp
;
462 /* Iterate over state list */
466 while(temp
!= NULL
) {
467 struct getent_state
*next
;
469 /* Free sam entries then list entry */
471 SAFE_FREE(state
->sam_entries
);
472 DLIST_REMOVE(state
, state
);
480 /* Parse winbindd related parameters */
482 BOOL
winbindd_param_init(void)
484 /* Parse winbind uid and winbind_gid parameters */
486 if (!lp_idmap_uid(&server_state
.uid_low
, &server_state
.uid_high
)) {
487 DEBUG(0, ("winbindd: idmap uid range missing or invalid\n"));
488 DEBUG(0, ("winbindd: cannot continue, exiting.\n"));
492 if (!lp_idmap_gid(&server_state
.gid_low
, &server_state
.gid_high
)) {
493 DEBUG(0, ("winbindd: idmap gid range missing or invalid\n"));
494 DEBUG(0, ("winbindd: cannot continue, exiting.\n"));
501 /* Check if a domain is present in a comma-separated list of domains */
503 BOOL
check_domain_env(char *domain_env
, char *domain
)
506 const char *tmp
= domain_env
;
508 while(next_token(&tmp
, name
, ",", sizeof(fstring
))) {
509 if (strequal(name
, domain
))
516 /* Is this a domain which we may assume no DOMAIN\ prefix? */
518 static BOOL
assume_domain(const char *domain
) {
519 if ((lp_winbind_use_default_domain()
520 || lp_winbind_trusted_domains_only()) &&
521 strequal(lp_workgroup(), domain
))
524 if (strequal(get_global_sam_name(), domain
))
530 /* Parse a string of the form DOMAIN/user into a domain and a user */
532 BOOL
parse_domain_user(const char *domuser
, fstring domain
, fstring user
)
534 char *p
= strchr(domuser
,*lp_winbind_separator());
537 fstrcpy(user
, domuser
);
539 if ( assume_domain(lp_workgroup())) {
540 fstrcpy(domain
, lp_workgroup());
542 fstrcpy( domain
, get_global_sam_name() );
547 fstrcpy(domain
, domuser
);
548 domain
[PTR_DIFF(p
, domuser
)] = 0;
557 Fill DOMAIN\\USERNAME entry accounting 'winbind use default domain' and
558 'winbind separator' options.
560 - omit DOMAIN when 'winbind use default domain = true' and DOMAIN is
563 If we are a PDC or BDC, and this is for our domain, do likewise.
565 Also, if omit DOMAIN if 'winbind trusted domains only = true', as the
566 username is then unqualified in unix
569 void fill_domain_username(fstring name
, const char *domain
, const char *user
)
571 if (assume_domain(domain
)) {
572 strlcpy(name
, user
, sizeof(fstring
));
574 slprintf(name
, sizeof(fstring
) - 1, "%s%s%s",
575 domain
, lp_winbind_separator(),
581 * Winbindd socket accessor functions
584 char *get_winbind_priv_pipe_dir(void)
586 return lock_path(WINBINDD_PRIV_SOCKET_SUBDIR
);
589 /* Open the winbindd socket */
591 static int _winbindd_socket
= -1;
592 static int _winbindd_priv_socket
= -1;
594 int open_winbindd_socket(void)
596 if (_winbindd_socket
== -1) {
597 _winbindd_socket
= create_pipe_sock(
598 WINBINDD_SOCKET_DIR
, WINBINDD_SOCKET_NAME
, 0755);
599 DEBUG(10, ("open_winbindd_socket: opened socket fd %d\n",
603 return _winbindd_socket
;
606 int open_winbindd_priv_socket(void)
608 if (_winbindd_priv_socket
== -1) {
609 _winbindd_priv_socket
= create_pipe_sock(
610 get_winbind_priv_pipe_dir(), WINBINDD_SOCKET_NAME
, 0750);
611 DEBUG(10, ("open_winbindd_priv_socket: opened socket fd %d\n",
612 _winbindd_priv_socket
));
615 return _winbindd_priv_socket
;
618 /* Close the winbindd socket */
620 void close_winbindd_socket(void)
622 if (_winbindd_socket
!= -1) {
623 DEBUG(10, ("close_winbindd_socket: closing socket fd %d\n",
625 close(_winbindd_socket
);
626 _winbindd_socket
= -1;
628 if (_winbindd_priv_socket
!= -1) {
629 DEBUG(10, ("close_winbindd_socket: closing socket fd %d\n",
630 _winbindd_priv_socket
));
631 close(_winbindd_priv_socket
);
632 _winbindd_priv_socket
= -1;
637 * Client list accessor functions
640 static struct winbindd_cli_state
*_client_list
;
641 static int _num_clients
;
643 /* Return list of all connected clients */
645 struct winbindd_cli_state
*winbindd_client_list(void)
650 /* Add a connection to the list */
652 void winbindd_add_client(struct winbindd_cli_state
*cli
)
654 DLIST_ADD(_client_list
, cli
);
658 /* Remove a client from the list */
660 void winbindd_remove_client(struct winbindd_cli_state
*cli
)
662 DLIST_REMOVE(_client_list
, cli
);
666 /* Close all open clients */
668 void winbindd_kill_all_clients(void)
670 struct winbindd_cli_state
*cl
= winbindd_client_list();
672 DEBUG(10, ("winbindd_kill_all_clients: going postal\n"));
675 struct winbindd_cli_state
*next
;
678 winbindd_remove_client(cl
);
683 /* Return number of open clients */
685 int winbindd_num_clients(void)
690 /* Help with RID -> SID conversion */
692 DOM_SID
*rid_to_talloced_sid(struct winbindd_domain
*domain
,
697 sid
= talloc(mem_ctx
, sizeof(*sid
));
699 smb_panic("rid_to_to_talloced_sid: talloc for DOM_SID failed!\n");
701 sid_copy(sid
, &domain
->sid
);
702 sid_append_rid(sid
, rid
);
706 /*****************************************************************************
707 For idmap conversion: convert one record to new format
708 Ancient versions (eg 2.2.3a) of winbindd_idmap.tdb mapped DOMAINNAME/rid
710 *****************************************************************************/
711 static int convert_fn(TDB_CONTEXT
*tdb
, TDB_DATA key
, TDB_DATA data
, void *state
)
713 struct winbindd_domain
*domain
;
720 BOOL
*failed
= (BOOL
*)state
;
722 DEBUG(10,("Converting %s\n", key
.dptr
));
724 p
= strchr(key
.dptr
, '/');
729 fstrcpy(dom_name
, key
.dptr
);
732 domain
= find_domain_from_name(dom_name
);
733 if (domain
== NULL
) {
734 /* We must delete the old record. */
735 DEBUG(0,("Unable to find domain %s\n", dom_name
));
736 DEBUG(0,("deleting record %s\n", key
.dptr
));
738 if (tdb_delete(tdb
, key
) != 0) {
739 DEBUG(0, ("Unable to delete record %s\n", key
.dptr
));
749 sid_copy(&sid
, &domain
->sid
);
750 sid_append_rid(&sid
, rid
);
752 sid_to_string(keystr
, &sid
);
754 key2
.dsize
= strlen(keystr
) + 1;
756 if (tdb_store(tdb
, key2
, data
, TDB_INSERT
) != 0) {
757 DEBUG(0,("Unable to add record %s\n", key2
.dptr
));
762 if (tdb_store(tdb
, data
, key2
, TDB_REPLACE
) != 0) {
763 DEBUG(0,("Unable to update record %s\n", data
.dptr
));
768 if (tdb_delete(tdb
, key
) != 0) {
769 DEBUG(0,("Unable to delete record %s\n", key
.dptr
));
777 /* These definitions are from sam/idmap_tdb.c. Replicated here just
778 out of laziness.... :-( */
780 /* High water mark keys */
781 #define HWM_GROUP "GROUP HWM"
782 #define HWM_USER "USER HWM"
784 /* idmap version determines auto-conversion */
785 #define IDMAP_VERSION 2
788 /*****************************************************************************
789 Convert the idmap database from an older version.
790 *****************************************************************************/
792 static BOOL
idmap_convert(const char *idmap_name
)
795 BOOL bigendianheader
;
797 TDB_CONTEXT
*idmap_tdb
;
799 if (!(idmap_tdb
= tdb_open_log(idmap_name
, 0,
802 DEBUG(0, ("idmap_convert: Unable to open idmap database\n"));
806 bigendianheader
= (idmap_tdb
->flags
& TDB_BIGENDIAN
) ? True
: False
;
808 vers
= tdb_fetch_int32(idmap_tdb
, "IDMAP_VERSION");
810 if (((vers
== -1) && bigendianheader
) || (IREV(vers
) == IDMAP_VERSION
)) {
811 /* Arrggghh ! Bytereversed or old big-endian - make order independent ! */
813 * high and low records were created on a
814 * big endian machine and will need byte-reversing.
819 wm
= tdb_fetch_int32(idmap_tdb
, HWM_USER
);
824 wm
= server_state
.uid_low
;
827 if (tdb_store_int32(idmap_tdb
, HWM_USER
, wm
) == -1) {
828 DEBUG(0, ("idmap_convert: Unable to byteswap user hwm in idmap database\n"));
829 tdb_close(idmap_tdb
);
833 wm
= tdb_fetch_int32(idmap_tdb
, HWM_GROUP
);
837 wm
= server_state
.gid_low
;
840 if (tdb_store_int32(idmap_tdb
, HWM_GROUP
, wm
) == -1) {
841 DEBUG(0, ("idmap_convert: Unable to byteswap group hwm in idmap database\n"));
842 tdb_close(idmap_tdb
);
847 /* the old format stored as DOMAIN/rid - now we store the SID direct */
848 tdb_traverse(idmap_tdb
, convert_fn
, &failed
);
851 DEBUG(0, ("Problem during conversion\n"));
852 tdb_close(idmap_tdb
);
856 if (tdb_store_int32(idmap_tdb
, "IDMAP_VERSION", IDMAP_VERSION
) == -1) {
857 DEBUG(0, ("idmap_convert: Unable to dtore idmap version in databse\n"));
858 tdb_close(idmap_tdb
);
862 tdb_close(idmap_tdb
);
866 /*****************************************************************************
867 Convert the idmap database from an older version if necessary
868 *****************************************************************************/
870 BOOL
winbindd_upgrade_idmap(void)
874 SMB_STRUCT_STAT stbuf
;
875 TDB_CONTEXT
*idmap_tdb
;
877 pstrcpy(idmap_name
, lock_path("winbindd_idmap.tdb"));
879 if (!file_exist(idmap_name
, &stbuf
)) {
880 /* nothing to convert return */
884 if (!(idmap_tdb
= tdb_open_log(idmap_name
, 0,
887 DEBUG(0, ("idmap_convert: Unable to open idmap database\n"));
891 if (tdb_fetch_int32(idmap_tdb
, "IDMAP_VERSION") == IDMAP_VERSION
) {
892 /* nothing to convert return */
893 tdb_close(idmap_tdb
);
897 /* backup_tdb expects the tdb not to be open */
898 tdb_close(idmap_tdb
);
900 DEBUG(0, ("Upgrading winbindd_idmap.tdb from an old version\n"));
902 pstrcpy(backup_name
, idmap_name
);
903 pstrcat(backup_name
, ".bak");
905 if (backup_tdb(idmap_name
, backup_name
) != 0) {
906 DEBUG(0, ("Could not backup idmap database\n"));
910 return idmap_convert(idmap_name
);
913 /*******************************************************************
914 wrapper around retrieving the trust account password
915 *******************************************************************/
917 BOOL
get_trust_pw(const char *domain
, uint8 ret_pwd
[16],
918 time_t *pass_last_set_time
, uint32
*channel
)
923 /* if we are a DC and this is not our domain, then lookup an account
924 for the domain trust */
926 if ( IS_DC
&& !strequal(domain
, lp_workgroup()) && lp_allow_trusted_domains() )
928 if ( !secrets_fetch_trusted_domain_password(domain
, &pwd
, &sid
,
929 pass_last_set_time
) )
931 DEBUG(0, ("get_trust_pw: could not fetch trust account "
932 "password for trusted domain %s\n", domain
));
936 *channel
= SEC_CHAN_DOMAIN
;
937 E_md4hash(pwd
, ret_pwd
);
942 else /* just get the account for our domain (covers
943 ROLE_DOMAIN_MEMBER as well */
945 /* get the machine trust account for our domain */
947 if ( !secrets_fetch_trust_account_password (lp_workgroup(), ret_pwd
,
948 pass_last_set_time
, channel
) )
950 DEBUG(0, ("get_trust_pw: could not fetch trust account "
951 "password for my domain %s\n", domain
));