wscript: Add check for --wrap linker flag
[vlendec/samba-autobuild/.git] / source3 / libsmb / libsmb_context.c
1 /*
2    Unix SMB/Netbios implementation.
3    SMB client library implementation
4    Copyright (C) Andrew Tridgell 1998
5    Copyright (C) Richard Sharpe 2000, 2002
6    Copyright (C) John Terpstra 2000
7    Copyright (C) Tom Jansen (Ninja ISD) 2002
8    Copyright (C) Derrell Lipman 2003-2008
9    Copyright (C) Jeremy Allison 2007, 2008
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 3 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, see <http://www.gnu.org/licenses/>.
23 */
24
25 #include "includes.h"
26 #include "libsmb/libsmb.h"
27 #include "libsmbclient.h"
28 #include "libsmb_internal.h"
29 #include "secrets.h"
30 #include "../libcli/smb/smbXcli_base.h"
31
32 /*
33  * Is the logging working / configfile read ?
34  */
35 static bool SMBC_initialized = false;
36 static unsigned int initialized_ctx_count = 0;
37 static void *initialized_ctx_count_mutex = NULL;
38
39 /*
40  * Do some module- and library-wide intializations
41  */
42 static void
43 SMBC_module_init(void * punused)
44 {
45     bool conf_loaded = False;
46     char *home = NULL;
47     TALLOC_CTX *frame = talloc_stackframe();
48
49     setup_logging("libsmbclient", DEBUG_STDOUT);
50
51     /* Here we would open the smb.conf file if needed ... */
52
53     home = getenv("HOME");
54     if (home) {
55         char *conf = NULL;
56         if (asprintf(&conf, "%s/.smb/smb.conf", home) > 0) {
57             if (lp_load_client(conf)) {
58                 conf_loaded = True;
59             } else {
60                 DEBUG(5, ("Could not load config file: %s\n",
61                           conf));
62             }
63             SAFE_FREE(conf);
64         }
65     }
66
67     if (!conf_loaded) {
68         /*
69          * Well, if that failed, try the get_dyn_CONFIGFILE
70          * Which points to the standard locn, and if that
71          * fails, silently ignore it and use the internal
72          * defaults ...
73          */
74
75         if (!lp_load_client(get_dyn_CONFIGFILE())) {
76             DEBUG(5, ("Could not load config file: %s\n",
77                       get_dyn_CONFIGFILE()));
78         } else if (home) {
79             char *conf;
80             /*
81              * We loaded the global config file.  Now lets
82              * load user-specific modifications to the
83              * global config.
84              */
85             if (asprintf(&conf,
86                          "%s/.smb/smb.conf.append",
87                          home) > 0) {
88                 if (!lp_load_client_no_reinit(conf)) {
89                     DEBUG(10,
90                           ("Could not append config file: "
91                            "%s\n",
92                            conf));
93                 }
94                 SAFE_FREE(conf);
95             }
96         }
97     }
98
99     load_interfaces();  /* Load the list of interfaces ... */
100
101     reopen_logs();  /* Get logging working ... */
102
103     /*
104      * Block SIGPIPE (from lib/util_sock.c: write())
105      * It is not needed and should not stop execution
106      */
107     BlockSignals(True, SIGPIPE);
108
109     /* Create the mutex we'll use to protect initialized_ctx_count */
110     if (SMB_THREAD_CREATE_MUTEX("initialized_ctx_count_mutex",
111                                 initialized_ctx_count_mutex) != 0) {
112         smb_panic("SMBC_module_init: "
113                   "failed to create 'initialized_ctx_count' mutex");
114     }
115
116
117     TALLOC_FREE(frame);
118 }
119
120
121 static void
122 SMBC_module_terminate(void)
123 {
124     TALLOC_CTX *frame = talloc_stackframe();
125     secrets_shutdown();
126     gfree_all();
127     SMBC_initialized = false;
128     TALLOC_FREE(frame);
129 }
130
131
132 /*
133  * Get a new empty handle to fill in with your own info
134  */
135 SMBCCTX *
136 smbc_new_context(void)
137 {
138         SMBCCTX *context;
139         TALLOC_CTX *frame = talloc_stackframe();
140
141         /* The first call to this function should initialize the module */
142         SMB_THREAD_ONCE(&SMBC_initialized, SMBC_module_init, NULL);
143
144         /*
145          * All newly added context fields should be placed in
146          * SMBC_internal_data, not directly in SMBCCTX.
147          */
148         context = SMB_MALLOC_P(SMBCCTX);
149         if (!context) {
150                 TALLOC_FREE(frame);
151                 errno = ENOMEM;
152                 return NULL;
153         }
154
155         ZERO_STRUCTP(context);
156
157         context->internal = SMB_MALLOC_P(struct SMBC_internal_data);
158         if (!context->internal) {
159                 TALLOC_FREE(frame);
160                 SAFE_FREE(context);
161                 errno = ENOMEM;
162                 return NULL;
163         }
164
165         /* Initialize the context and establish reasonable defaults */
166         ZERO_STRUCTP(context->internal);
167
168         smbc_setDebug(context, 0);
169         smbc_setTimeout(context, 20000);
170         smbc_setPort(context, 0);
171
172         smbc_setOptionFullTimeNames(context, False);
173         smbc_setOptionOpenShareMode(context, SMBC_SHAREMODE_DENY_NONE);
174         smbc_setOptionSmbEncryptionLevel(context, SMBC_ENCRYPTLEVEL_NONE);
175         smbc_setOptionUseCCache(context, True);
176         smbc_setOptionCaseSensitive(context, False);
177         smbc_setOptionBrowseMaxLmbCount(context, 3);    /* # LMBs to query */
178         smbc_setOptionUrlEncodeReaddirEntries(context, False);
179         smbc_setOptionOneSharePerServer(context, False);
180         if (getenv("LIBSMBCLIENT_NO_CCACHE") != NULL) {
181                 smbc_setOptionUseCCache(context, false);
182         }
183
184         smbc_setFunctionAuthData(context, SMBC_get_auth_data);
185         smbc_setFunctionCheckServer(context, SMBC_check_server);
186         smbc_setFunctionRemoveUnusedServer(context, SMBC_remove_unused_server);
187
188         smbc_setOptionUserData(context, NULL);
189         smbc_setFunctionAddCachedServer(context, SMBC_add_cached_server);
190         smbc_setFunctionGetCachedServer(context, SMBC_get_cached_server);
191         smbc_setFunctionRemoveCachedServer(context, SMBC_remove_cached_server);
192         smbc_setFunctionPurgeCachedServers(context, SMBC_purge_cached_servers);
193
194         smbc_setFunctionOpen(context, SMBC_open_ctx);
195         smbc_setFunctionCreat(context, SMBC_creat_ctx);
196         smbc_setFunctionRead(context, SMBC_read_ctx);
197         smbc_setFunctionSplice(context, SMBC_splice_ctx);
198         smbc_setFunctionWrite(context, SMBC_write_ctx);
199         smbc_setFunctionClose(context, SMBC_close_ctx);
200         smbc_setFunctionUnlink(context, SMBC_unlink_ctx);
201         smbc_setFunctionRename(context, SMBC_rename_ctx);
202         smbc_setFunctionLseek(context, SMBC_lseek_ctx);
203         smbc_setFunctionFtruncate(context, SMBC_ftruncate_ctx);
204         smbc_setFunctionStat(context, SMBC_stat_ctx);
205         smbc_setFunctionStatVFS(context, SMBC_statvfs_ctx);
206         smbc_setFunctionFstatVFS(context, SMBC_fstatvfs_ctx);
207         smbc_setFunctionFstat(context, SMBC_fstat_ctx);
208         smbc_setFunctionOpendir(context, SMBC_opendir_ctx);
209         smbc_setFunctionClosedir(context, SMBC_closedir_ctx);
210         smbc_setFunctionReaddir(context, SMBC_readdir_ctx);
211         smbc_setFunctionGetdents(context, SMBC_getdents_ctx);
212         smbc_setFunctionMkdir(context, SMBC_mkdir_ctx);
213         smbc_setFunctionRmdir(context, SMBC_rmdir_ctx);
214         smbc_setFunctionTelldir(context, SMBC_telldir_ctx);
215         smbc_setFunctionLseekdir(context, SMBC_lseekdir_ctx);
216         smbc_setFunctionFstatdir(context, SMBC_fstatdir_ctx);
217         smbc_setFunctionNotify(context, SMBC_notify_ctx);
218         smbc_setFunctionChmod(context, SMBC_chmod_ctx);
219         smbc_setFunctionUtimes(context, SMBC_utimes_ctx);
220         smbc_setFunctionSetxattr(context, SMBC_setxattr_ctx);
221         smbc_setFunctionGetxattr(context, SMBC_getxattr_ctx);
222         smbc_setFunctionRemovexattr(context, SMBC_removexattr_ctx);
223         smbc_setFunctionListxattr(context, SMBC_listxattr_ctx);
224
225         smbc_setFunctionOpenPrintJob(context, SMBC_open_print_job_ctx);
226         smbc_setFunctionPrintFile(context, SMBC_print_file_ctx);
227         smbc_setFunctionListPrintJobs(context, SMBC_list_print_jobs_ctx);
228         smbc_setFunctionUnlinkPrintJob(context, SMBC_unlink_print_job_ctx);
229
230         TALLOC_FREE(frame);
231         return context;
232 }
233
234 /*
235  * Free a context
236  *
237  * Returns 0 on success. Otherwise returns 1, the SMBCCTX is _not_ freed
238  * and thus you'll be leaking memory if not handled properly.
239  *
240  */
241 int
242 smbc_free_context(SMBCCTX *context,
243                   int shutdown_ctx)
244 {
245         TALLOC_CTX *frame;
246         if (!context) {
247                 errno = EBADF;
248                 return 1;
249         }
250
251         frame = talloc_stackframe();
252
253         if (shutdown_ctx) {
254                 SMBCFILE * f;
255                 DEBUG(1,("Performing aggressive shutdown.\n"));
256
257                 f = context->internal->files;
258                 while (f) {
259                         SMBCFILE *next = f->next;
260                         smbc_getFunctionClose(context)(context, f);
261                         f = next;
262                 }
263                 context->internal->files = NULL;
264
265                 /* First try to remove the servers the nice way. */
266                 if (smbc_getFunctionPurgeCachedServers(context)(context)) {
267                         SMBCSRV * s;
268                         SMBCSRV * next;
269                         DEBUG(1, ("Could not purge all servers, "
270                                   "Nice way shutdown failed.\n"));
271                         s = context->internal->servers;
272                         while (s) {
273                                 DEBUG(1, ("Forced shutdown: %p (cli=%p)\n",
274                                           s, s->cli));
275                                 cli_shutdown(s->cli);
276                                 smbc_getFunctionRemoveCachedServer(context)(context,
277                                                                          s);
278                                 next = s->next;
279                                 DLIST_REMOVE(context->internal->servers, s);
280                                 SAFE_FREE(s);
281                                 s = next;
282                         }
283                         context->internal->servers = NULL;
284                 }
285         }
286         else {
287                 /* This is the polite way */
288                 if (smbc_getFunctionPurgeCachedServers(context)(context)) {
289                         DEBUG(1, ("Could not purge all servers, "
290                                   "free_context failed.\n"));
291                         errno = EBUSY;
292                         TALLOC_FREE(frame);
293                         return 1;
294                 }
295                 if (context->internal->servers) {
296                         DEBUG(1, ("Active servers in context, "
297                                   "free_context failed.\n"));
298                         errno = EBUSY;
299                         TALLOC_FREE(frame);
300                         return 1;
301                 }
302                 if (context->internal->files) {
303                         DEBUG(1, ("Active files in context, "
304                                   "free_context failed.\n"));
305                         errno = EBUSY;
306                         TALLOC_FREE(frame);
307                         return 1;
308                 }
309         }
310
311         /* Things we have to clean up */
312         smbc_setWorkgroup(context, NULL);
313         smbc_setNetbiosName(context, NULL);
314         smbc_setUser(context, NULL);
315
316         DEBUG(3, ("Context %p successfully freed\n", context));
317
318         /* Free any DFS auth context. */
319         TALLOC_FREE(context->internal->auth_info);
320
321         SAFE_FREE(context->internal);
322         SAFE_FREE(context);
323
324         /* Protect access to the count of contexts in use */
325         if (SMB_THREAD_LOCK(initialized_ctx_count_mutex) != 0) {
326                 smb_panic("error locking 'initialized_ctx_count'");
327         }
328
329         if (initialized_ctx_count) {
330                 initialized_ctx_count--;
331         }
332
333         if (initialized_ctx_count == 0) {
334             SMBC_module_terminate();
335         }
336
337         /* Unlock the mutex */
338         if (SMB_THREAD_UNLOCK(initialized_ctx_count_mutex) != 0) {
339                 smb_panic("error unlocking 'initialized_ctx_count'");
340         }
341
342         TALLOC_FREE(frame);
343         return 0;
344 }
345
346
347 /**
348  * Deprecated interface.  Do not use.  Instead, use the various
349  * smbc_setOption*() functions or smbc_setFunctionAuthDataWithContext().
350  */
351 void
352 smbc_option_set(SMBCCTX *context,
353                 char *option_name,
354                 ... /* option_value */)
355 {
356         va_list ap;
357         union {
358                 int i;
359                 bool b;
360                 smbc_get_auth_data_with_context_fn auth_fn;
361                 void *v;
362                 const char *s;
363         } option_value;
364
365         TALLOC_CTX *frame = talloc_stackframe();
366
367         va_start(ap, option_name);
368
369         if (strcmp(option_name, "debug_to_stderr") == 0) {
370                 option_value.b = (bool) va_arg(ap, int);
371                 smbc_setOptionDebugToStderr(context, option_value.b);
372
373         } else if (strcmp(option_name, "full_time_names") == 0) {
374                 option_value.b = (bool) va_arg(ap, int);
375                 smbc_setOptionFullTimeNames(context, option_value.b);
376
377         } else if (strcmp(option_name, "open_share_mode") == 0) {
378                 option_value.i = va_arg(ap, int);
379                 smbc_setOptionOpenShareMode(context, option_value.i);
380
381         } else if (strcmp(option_name, "auth_function") == 0) {
382                 option_value.auth_fn =
383                         va_arg(ap, smbc_get_auth_data_with_context_fn);
384                 smbc_setFunctionAuthDataWithContext(context, option_value.auth_fn);
385
386         } else if (strcmp(option_name, "user_data") == 0) {
387                 option_value.v = va_arg(ap, void *);
388                 smbc_setOptionUserData(context, option_value.v);
389
390         } else if (strcmp(option_name, "smb_encrypt_level") == 0) {
391                 option_value.s = va_arg(ap, const char *);
392                 if (strcmp(option_value.s, "none") == 0) {
393                         smbc_setOptionSmbEncryptionLevel(context,
394                                                          SMBC_ENCRYPTLEVEL_NONE);
395                 } else if (strcmp(option_value.s, "request") == 0) {
396                         smbc_setOptionSmbEncryptionLevel(context,
397                                                          SMBC_ENCRYPTLEVEL_REQUEST);
398                 } else if (strcmp(option_value.s, "require") == 0) {
399                         smbc_setOptionSmbEncryptionLevel(context,
400                                                          SMBC_ENCRYPTLEVEL_REQUIRE);
401                 }
402
403         } else if (strcmp(option_name, "browse_max_lmb_count") == 0) {
404                 option_value.i = va_arg(ap, int);
405                 smbc_setOptionBrowseMaxLmbCount(context, option_value.i);
406
407         } else if (strcmp(option_name, "urlencode_readdir_entries") == 0) {
408                 option_value.b = (bool) va_arg(ap, int);
409                 smbc_setOptionUrlEncodeReaddirEntries(context, option_value.b);
410
411         } else if (strcmp(option_name, "one_share_per_server") == 0) {
412                 option_value.b = (bool) va_arg(ap, int);
413                 smbc_setOptionOneSharePerServer(context, option_value.b);
414
415         } else if (strcmp(option_name, "use_kerberos") == 0) {
416                 option_value.b = (bool) va_arg(ap, int);
417                 smbc_setOptionUseKerberos(context, option_value.b);
418
419         } else if (strcmp(option_name, "fallback_after_kerberos") == 0) {
420                 option_value.b = (bool) va_arg(ap, int);
421                 smbc_setOptionFallbackAfterKerberos(context, option_value.b);
422
423         } else if (strcmp(option_name, "use_ccache") == 0) {
424                 option_value.b = (bool) va_arg(ap, int);
425                 smbc_setOptionUseCCache(context, option_value.b);
426
427         } else if (strcmp(option_name, "no_auto_anonymous_login") == 0) {
428                 option_value.b = (bool) va_arg(ap, int);
429                 smbc_setOptionNoAutoAnonymousLogin(context, option_value.b);
430         }
431
432         va_end(ap);
433         TALLOC_FREE(frame);
434 }
435
436
437 /*
438  * Deprecated interface.  Do not use.  Instead, use the various
439  * smbc_getOption*() functions.
440  */
441 void *
442 smbc_option_get(SMBCCTX *context,
443                 char *option_name)
444 {
445         if (strcmp(option_name, "debug_stderr") == 0) {
446 #if defined(__intptr_t_defined) || defined(HAVE_INTPTR_T)
447                 return (void *) (intptr_t) smbc_getOptionDebugToStderr(context);
448 #else
449                 return (void *) smbc_getOptionDebugToStderr(context);
450 #endif
451
452         } else if (strcmp(option_name, "full_time_names") == 0) {
453 #if defined(__intptr_t_defined) || defined(HAVE_INTPTR_T)
454                 return (void *) (intptr_t) smbc_getOptionFullTimeNames(context);
455 #else
456                 return (void *) smbc_getOptionFullTimeNames(context);
457 #endif
458
459         } else if (strcmp(option_name, "open_share_mode") == 0) {
460 #if defined(__intptr_t_defined) || defined(HAVE_INTPTR_T)
461                 return (void *) (intptr_t) smbc_getOptionOpenShareMode(context);
462 #else
463                 return (void *) smbc_getOptionOpenShareMode(context);
464 #endif
465
466         } else if (strcmp(option_name, "auth_function") == 0) {
467                 return (void *) smbc_getFunctionAuthDataWithContext(context);
468
469         } else if (strcmp(option_name, "user_data") == 0) {
470                 return smbc_getOptionUserData(context);
471
472         } else if (strcmp(option_name, "smb_encrypt_level") == 0) {
473                 switch(smbc_getOptionSmbEncryptionLevel(context))
474                 {
475                 case 0:
476                         return discard_const_p(void, "none");
477                 case 1:
478                         return discard_const_p(void, "request");
479                 case 2:
480                         return discard_const_p(void, "require");
481                 }
482
483         } else if (strcmp(option_name, "smb_encrypt_on") == 0) {
484                 SMBCSRV *s;
485                 unsigned int num_servers = 0;
486
487                 for (s = context->internal->servers; s; s = s->next) {
488                         num_servers++;
489                         if (!cli_state_is_encryption_on(s->cli)) {
490                                 return (void *)false;
491                         }
492                 }
493 #if defined(__intptr_t_defined) || defined(HAVE_INTPTR_T)
494                 return (void *) (intptr_t) (bool) (num_servers > 0);
495 #else
496                 return (void *) (bool) (num_servers > 0);
497 #endif
498
499         } else if (strcmp(option_name, "browse_max_lmb_count") == 0) {
500 #if defined(__intptr_t_defined) || defined(HAVE_INTPTR_T)
501                 return (void *) (intptr_t) smbc_getOptionBrowseMaxLmbCount(context);
502 #else
503                 return (void *) smbc_getOptionBrowseMaxLmbCount(context);
504 #endif
505
506         } else if (strcmp(option_name, "urlencode_readdir_entries") == 0) {
507 #if defined(__intptr_t_defined) || defined(HAVE_INTPTR_T)
508                 return (void *)(intptr_t) smbc_getOptionUrlEncodeReaddirEntries(context);
509 #else
510                 return (void *) (bool) smbc_getOptionUrlEncodeReaddirEntries(context);
511 #endif
512
513         } else if (strcmp(option_name, "one_share_per_server") == 0) {
514 #if defined(__intptr_t_defined) || defined(HAVE_INTPTR_T)
515                 return (void *) (intptr_t) smbc_getOptionOneSharePerServer(context);
516 #else
517                 return (void *) (bool) smbc_getOptionOneSharePerServer(context);
518 #endif
519
520         } else if (strcmp(option_name, "use_kerberos") == 0) {
521 #if defined(__intptr_t_defined) || defined(HAVE_INTPTR_T)
522                 return (void *) (intptr_t) smbc_getOptionUseKerberos(context);
523 #else
524                 return (void *) (bool) smbc_getOptionUseKerberos(context);
525 #endif
526
527         } else if (strcmp(option_name, "fallback_after_kerberos") == 0) {
528 #if defined(__intptr_t_defined) || defined(HAVE_INTPTR_T)
529                 return (void *)(intptr_t) smbc_getOptionFallbackAfterKerberos(context);
530 #else
531                 return (void *) (bool) smbc_getOptionFallbackAfterKerberos(context);
532 #endif
533
534         } else if (strcmp(option_name, "use_ccache") == 0) {
535 #if defined(__intptr_t_defined) || defined(HAVE_INTPTR_T)
536                 return (void *) (intptr_t) smbc_getOptionUseCCache(context);
537 #else
538                 return (void *) (bool) smbc_getOptionUseCCache(context);
539 #endif
540
541         } else if (strcmp(option_name, "no_auto_anonymous_login") == 0) {
542 #if defined(__intptr_t_defined) || defined(HAVE_INTPTR_T)
543                 return (void *) (intptr_t) smbc_getOptionNoAutoAnonymousLogin(context);
544 #else
545                 return (void *) (bool) smbc_getOptionNoAutoAnonymousLogin(context);
546 #endif
547         }
548
549         return NULL;
550 }
551
552
553 /*
554  * Initialize the library, etc.
555  *
556  * We accept a struct containing handle information.
557  * valid values for info->debug from 0 to 100,
558  * and insist that info->fn must be non-null.
559  */
560 SMBCCTX *
561 smbc_init_context(SMBCCTX *context)
562 {
563         int pid;
564         TALLOC_CTX *frame;
565
566         if (!context) {
567                 errno = EBADF;
568                 return NULL;
569         }
570
571         /* Do not initialise the same client twice */
572         if (context->internal->initialized) {
573                 return NULL;
574         }
575
576         frame = talloc_stackframe();
577
578         if ((!smbc_getFunctionAuthData(context) &&
579              !smbc_getFunctionAuthDataWithContext(context)) ||
580             smbc_getDebug(context) < 0 ||
581             smbc_getDebug(context) > 100) {
582
583                 TALLOC_FREE(frame);
584                 errno = EINVAL;
585                 return NULL;
586
587         }
588
589         if (!smbc_getUser(context)) {
590                 /*
591                  * FIXME: Is this the best way to get the user info?
592                  */
593                 char *user = getenv("USER");
594                 /* walk around as "guest" if no username can be found */
595                 if (!user) {
596                         user = SMB_STRDUP("guest");
597                 } else {
598                         user = SMB_STRDUP(user);
599                 }
600
601                 if (!user) {
602                         TALLOC_FREE(frame);
603                         errno = ENOMEM;
604                         return NULL;
605                 }
606
607                 smbc_setUser(context, user);
608                 SAFE_FREE(user);
609
610                 if (!smbc_getUser(context)) {
611                         TALLOC_FREE(frame);
612                         errno = ENOMEM;
613                         return NULL;
614                 }
615         }
616
617         if (!smbc_getNetbiosName(context)) {
618                 /*
619                  * We try to get our netbios name from the config. If that
620                  * fails we fall back on constructing our netbios name from
621                  * our hostname etc
622                  */
623                 char *netbios_name;
624                 if (lp_netbios_name()) {
625                         netbios_name = SMB_STRDUP(lp_netbios_name());
626                 } else {
627                         /*
628                          * Hmmm, I want to get hostname as well, but I am too
629                          * lazy for the moment
630                          */
631                         pid = getpid();
632                         netbios_name = (char *)SMB_MALLOC(17);
633                         if (!netbios_name) {
634                                 TALLOC_FREE(frame);
635                                 errno = ENOMEM;
636                                 return NULL;
637                         }
638                         slprintf(netbios_name, 16,
639                                  "smbc%s%d", smbc_getUser(context), pid);
640                 }
641
642                 if (!netbios_name) {
643                         TALLOC_FREE(frame);
644                         errno = ENOMEM;
645                         return NULL;
646                 }
647
648                 smbc_setNetbiosName(context, netbios_name);
649                 SAFE_FREE(netbios_name);
650
651                 if (!smbc_getNetbiosName(context)) {
652                         TALLOC_FREE(frame);
653                         errno = ENOMEM;
654                         return NULL;
655                 }
656         }
657
658         DEBUG(1, ("Using netbios name %s.\n", smbc_getNetbiosName(context)));
659
660         if (!smbc_getWorkgroup(context)) {
661                 char *workgroup;
662
663                 if (lp_workgroup()) {
664                         workgroup = SMB_STRDUP(lp_workgroup());
665                 }
666                 else {
667                         /* TODO: Think about a decent default workgroup */
668                         workgroup = SMB_STRDUP("samba");
669                 }
670
671                 if (!workgroup) {
672                         TALLOC_FREE(frame);
673                         errno = ENOMEM;
674                         return NULL;
675                 }
676
677                 smbc_setWorkgroup(context, workgroup);
678                 SAFE_FREE(workgroup);
679
680                 if (!smbc_getWorkgroup(context)) {
681                         TALLOC_FREE(frame);
682                         errno = ENOMEM;
683                         return NULL;
684                 }
685         }
686
687         DEBUG(1, ("Using workgroup %s.\n", smbc_getWorkgroup(context)));
688
689         /* shortest timeout is 1 second */
690         if (smbc_getTimeout(context) > 0 && smbc_getTimeout(context) < 1000)
691                 smbc_setTimeout(context, 1000);
692
693         context->internal->initialized = True;
694
695         /* Protect access to the count of contexts in use */
696         if (SMB_THREAD_LOCK(initialized_ctx_count_mutex) != 0) {
697                 smb_panic("error locking 'initialized_ctx_count'");
698         }
699
700         initialized_ctx_count++;
701
702         /* Unlock the mutex */
703         if (SMB_THREAD_UNLOCK(initialized_ctx_count_mutex) != 0) {
704                 smb_panic("error unlocking 'initialized_ctx_count'");
705         }
706
707         TALLOC_FREE(frame);
708         return context;
709 }
710
711
712 /* Return the verion of samba, and thus libsmbclient */
713 const char *
714 smbc_version(void)
715 {
716         return samba_version_string();
717 }
718
719 /*
720  * Set the credentials so DFS will work when following referrals.
721  * This function is broken and must be removed. No SMBCCTX arg...
722  * JRA.
723  */
724
725 void
726 smbc_set_credentials(const char *workgroup,
727                         const char *user,
728                         const char *password,
729                         smbc_bool use_kerberos,
730                         const char *signing_state)
731 {
732         d_printf("smbc_set_credentials is obsolete. Replace with smbc_set_credentials_with_fallback().\n");
733 }
734
735 void smbc_set_credentials_with_fallback(SMBCCTX *context,
736                                         const char *workgroup,
737                                         const char *user,
738                                         const char *password)
739 {
740         smbc_bool use_kerberos = false;
741         const char *signing_state = "off";
742         struct user_auth_info *auth_info = NULL;
743         TALLOC_CTX *frame;
744
745         if (! context) {
746
747                 return;
748         }
749
750         frame = talloc_stackframe();
751
752         if (! workgroup || ! *workgroup) {
753                 workgroup = smbc_getWorkgroup(context);
754         }
755
756         if (! user) {
757                 user = smbc_getUser(context);
758         }
759
760         if (! password) {
761                 password = "";
762         }
763
764         auth_info = user_auth_info_init(NULL);
765
766         if (! auth_info) {
767                 DEBUG(0, ("smbc_set_credentials_with_fallback: allocation fail\n"));
768                 TALLOC_FREE(frame);
769                 return;
770         }
771
772         if (smbc_getOptionUseKerberos(context)) {
773                 use_kerberos = True;
774         }
775
776         if (lp_client_signing() != SMB_SIGNING_OFF) {
777                 signing_state = "if_required";
778         }
779
780         if (lp_client_signing() == SMB_SIGNING_REQUIRED) {
781                 signing_state = "required";
782         }
783
784         set_cmdline_auth_info_username(auth_info, user);
785         set_cmdline_auth_info_domain(auth_info, workgroup);
786         set_cmdline_auth_info_password(auth_info, password);
787         set_cmdline_auth_info_use_kerberos(auth_info, use_kerberos);
788         set_cmdline_auth_info_signing_state(auth_info, signing_state);
789         set_cmdline_auth_info_fallback_after_kerberos(auth_info,
790                 smbc_getOptionFallbackAfterKerberos(context));
791         set_cmdline_auth_info_use_ccache(
792                 auth_info, smbc_getOptionUseCCache(context));
793
794         TALLOC_FREE(context->internal->auth_info);
795
796         context->internal->auth_info = auth_info;
797         TALLOC_FREE(frame);
798 }