2 Unix SMB/CIFS implementation.
3 Samba utility functions
4 Copyright (C) Andrew Tridgell 1992-1998
5 Copyright (C) Jeremy Allison 2001-2002
6 Copyright (C) Simo Sorce 2001
7 Copyright (C) Jim McDonough (jmcd@us.ibm.com) 2003.
8 Copyright (C) James J Myers 2003
9 Copyright (C) Jelmer Vernooij 2005-2007
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.
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.
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/>.
26 #include "dynconfig/dynconfig.h"
27 #include "system/network.h"
28 #include "system/filesys.h"
29 #include "system/dir.h"
30 #include "param/param.h"
34 * @brief Misc utility functions
38 bool lpcfg_is_mydomain(struct loadparm_context
*lp_ctx
,
41 return strequal(lpcfg_workgroup(lp_ctx
), domain
);
44 bool lpcfg_is_my_domain_or_realm(struct loadparm_context
*lp_ctx
,
47 return strequal(lpcfg_workgroup(lp_ctx
), domain
) ||
48 strequal(lpcfg_realm(lp_ctx
), domain
);
52 see if a string matches either our primary or one of our secondary
53 netbios aliases. do a case insensitive match
55 bool lpcfg_is_myname(struct loadparm_context
*lp_ctx
, const char *name
)
60 if (strcasecmp(name
, lpcfg_netbios_name(lp_ctx
)) == 0) {
64 aliases
= lpcfg_netbios_aliases(lp_ctx
);
65 for (i
=0; aliases
&& aliases
[i
]; i
++) {
66 if (strcasecmp(name
, aliases
[i
]) == 0) {
76 A useful function for returning a path in the Samba lock directory.
78 char *lock_path(TALLOC_CTX
* mem_ctx
, struct loadparm_context
*lp_ctx
,
85 if (name
[0] == 0 || name
[0] == '/' || strstr(name
, ":/")) {
86 return talloc_strdup(mem_ctx
, name
);
89 dname
= talloc_strdup(mem_ctx
, lpcfg_lockdir(lp_ctx
));
90 trim_string(dname
,"","/");
92 if (!directory_exist(dname
)) {
96 fname
= talloc_asprintf(mem_ctx
, "%s/%s", dname
, name
);
104 * @brief Returns an absolute path to a file in the directory containing the current config file
106 * @param name File to find, relative to the config file directory.
108 * @retval Pointer to a talloc'ed string containing the full path.
111 char *config_path(TALLOC_CTX
* mem_ctx
, struct loadparm_context
*lp_ctx
,
114 char *fname
, *config_dir
, *p
;
115 config_dir
= talloc_strdup(mem_ctx
, lpcfg_configfile(lp_ctx
));
116 if (config_dir
== NULL
) {
117 config_dir
= talloc_strdup(mem_ctx
, lp_default_path());
119 p
= strrchr(config_dir
, '/');
121 talloc_free(config_dir
);
122 config_dir
= talloc_strdup(mem_ctx
, ".");
123 if (config_dir
== NULL
) {
129 fname
= talloc_asprintf(mem_ctx
, "%s/%s", config_dir
, name
);
130 talloc_free(config_dir
);
135 * @brief Returns an absolute path to a file in the Samba private directory.
137 * @param name File to find, relative to PRIVATEDIR.
138 * if name is not relative, then use it as-is
140 * @retval Pointer to a talloc'ed string containing the full path.
142 char *private_path(TALLOC_CTX
* mem_ctx
,
143 struct loadparm_context
*lp_ctx
,
150 if (name
[0] == 0 || name
[0] == '/' || strstr(name
, ":/")) {
151 return talloc_strdup(mem_ctx
, name
);
153 fname
= talloc_asprintf(mem_ctx
, "%s/%s", lpcfg_private_dir(lp_ctx
), name
);
158 return a path in the smbd.tmp directory, where all temporary file
159 for smbd go. If NULL is passed for name then return the directory
162 char *smbd_tmp_path(TALLOC_CTX
*mem_ctx
,
163 struct loadparm_context
*lp_ctx
,
168 dname
= private_path(mem_ctx
, lp_ctx
, "smbd.tmp");
169 if (!directory_exist(dname
)) {
177 fname
= talloc_asprintf(mem_ctx
, "%s/%s", dname
, name
);
184 * Obtain the init function from a shared library file
186 init_module_fn
load_module(TALLOC_CTX
*mem_ctx
, const char *path
)
191 handle
= dlopen(path
, RTLD_NOW
);
192 if (handle
== NULL
) {
193 DEBUG(0, ("Unable to open %s: %s\n", path
, dlerror()));
197 init_fn
= dlsym(handle
, SAMBA_INIT_MODULE
);
199 if (init_fn
== NULL
) {
200 DEBUG(0, ("Unable to find %s() in %s: %s\n",
201 SAMBA_INIT_MODULE
, path
, dlerror()));
202 DEBUG(1, ("Loading module '%s' failed\n", path
));
207 return (init_module_fn
)init_fn
;
211 * Obtain list of init functions from the modules in the specified
214 init_module_fn
*load_modules(TALLOC_CTX
*mem_ctx
, const char *path
)
217 struct dirent
*entry
;
220 init_module_fn
*ret
= talloc_array(mem_ctx
, init_module_fn
, 2);
230 while((entry
= readdir(dir
))) {
231 if (ISDOT(entry
->d_name
) || ISDOTDOT(entry
->d_name
))
234 filename
= talloc_asprintf(mem_ctx
, "%s/%s", path
, entry
->d_name
);
236 ret
[success
] = load_module(mem_ctx
, filename
);
238 ret
= talloc_realloc(mem_ctx
, ret
, init_module_fn
, success
+2);
243 talloc_free(filename
);
252 * Run the specified init functions.
254 * @return true if all functions ran successfully, false otherwise
256 bool run_init_functions(init_module_fn
*fns
)
264 for (i
= 0; fns
[i
]; i
++) { ret
&= (bool)NT_STATUS_IS_OK(fns
[i
]()); }
269 static char *modules_path(TALLOC_CTX
* mem_ctx
, struct loadparm_context
*lp_ctx
,
272 const char *env_moduledir
= getenv("LD_SAMBA_MODULE_PATH");
273 return talloc_asprintf(mem_ctx
, "%s/%s",
274 env_moduledir
?env_moduledir
:lpcfg_modulesdir(lp_ctx
),
279 * Load the initialization functions from DSO files for a specific subsystem.
281 * Will return an array of function pointers to initialization functions
284 init_module_fn
*load_samba_modules(TALLOC_CTX
*mem_ctx
, struct loadparm_context
*lp_ctx
, const char *subsystem
)
286 char *path
= modules_path(mem_ctx
, lp_ctx
, subsystem
);
289 ret
= load_modules(mem_ctx
, path
);
296 const char *lpcfg_messaging_path(TALLOC_CTX
*mem_ctx
,
297 struct loadparm_context
*lp_ctx
)
299 return smbd_tmp_path(mem_ctx
, lp_ctx
, "messaging");
302 struct smb_iconv_convenience
*smb_iconv_convenience_reinit_lp(TALLOC_CTX
*mem_ctx
,
303 struct loadparm_context
*lp_ctx
,
304 struct smb_iconv_convenience
*old_ic
)
306 return smb_iconv_convenience_reinit(mem_ctx
, lpcfg_dos_charset(lp_ctx
),
307 lpcfg_unix_charset(lp_ctx
),
308 lpcfg_parm_bool(lp_ctx
, NULL
, "iconv", "native", true),
313 const char *lpcfg_sam_name(struct loadparm_context
*lp_ctx
)
315 switch (lpcfg_server_role(lp_ctx
)) {
316 case ROLE_DOMAIN_CONTROLLER
:
317 return lpcfg_workgroup(lp_ctx
);
319 return lpcfg_netbios_name(lp_ctx
);