932223c9b2fb0960517ac88df561d76c74a40b68
[metze/samba/wip.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_setFunctionReaddirPlus(context, SMBC_readdirplus_ctx);
212         smbc_setFunctionGetdents(context, SMBC_getdents_ctx);
213         smbc_setFunctionMkdir(context, SMBC_mkdir_ctx);
214         smbc_setFunctionRmdir(context, SMBC_rmdir_ctx);
215         smbc_setFunctionTelldir(context, SMBC_telldir_ctx);
216         smbc_setFunctionLseekdir(context, SMBC_lseekdir_ctx);
217         smbc_setFunctionFstatdir(context, SMBC_fstatdir_ctx);
218         smbc_setFunctionNotify(context, SMBC_notify_ctx);
219         smbc_setFunctionChmod(context, SMBC_chmod_ctx);
220         smbc_setFunctionUtimes(context, SMBC_utimes_ctx);
221         smbc_setFunctionSetxattr(context, SMBC_setxattr_ctx);
222         smbc_setFunctionGetxattr(context, SMBC_getxattr_ctx);
223         smbc_setFunctionRemovexattr(context, SMBC_removexattr_ctx);
224         smbc_setFunctionListxattr(context, SMBC_listxattr_ctx);
225
226         smbc_setFunctionOpenPrintJob(context, SMBC_open_print_job_ctx);
227         smbc_setFunctionPrintFile(context, SMBC_print_file_ctx);
228         smbc_setFunctionListPrintJobs(context, SMBC_list_print_jobs_ctx);
229         smbc_setFunctionUnlinkPrintJob(context, SMBC_unlink_print_job_ctx);
230
231         TALLOC_FREE(frame);
232         return context;
233 }
234
235 /*
236  * Free a context
237  *
238  * Returns 0 on success. Otherwise returns 1, the SMBCCTX is _not_ freed
239  * and thus you'll be leaking memory if not handled properly.
240  *
241  */
242 int
243 smbc_free_context(SMBCCTX *context,
244                   int shutdown_ctx)
245 {
246         TALLOC_CTX *frame;
247         if (!context) {
248                 errno = EBADF;
249                 return 1;
250         }
251
252         frame = talloc_stackframe();
253
254         if (shutdown_ctx) {
255                 SMBCFILE * f;
256                 DEBUG(1,("Performing aggressive shutdown.\n"));
257
258                 f = context->internal->files;
259                 while (f) {
260                         SMBCFILE *next = f->next;
261                         smbc_getFunctionClose(context)(context, f);
262                         f = next;
263                 }
264                 context->internal->files = NULL;
265
266                 /* First try to remove the servers the nice way. */
267                 if (smbc_getFunctionPurgeCachedServers(context)(context)) {
268                         SMBCSRV * s;
269                         SMBCSRV * next;
270                         DEBUG(1, ("Could not purge all servers, "
271                                   "Nice way shutdown failed.\n"));
272                         s = context->internal->servers;
273                         while (s) {
274                                 DEBUG(1, ("Forced shutdown: %p (cli=%p)\n",
275                                           s, s->cli));
276                                 cli_shutdown(s->cli);
277                                 smbc_getFunctionRemoveCachedServer(context)(context,
278                                                                          s);
279                                 next = s->next;
280                                 DLIST_REMOVE(context->internal->servers, s);
281                                 SAFE_FREE(s);
282                                 s = next;
283                         }
284                         context->internal->servers = NULL;
285                 }
286         }
287         else {
288                 /* This is the polite way */
289                 if (smbc_getFunctionPurgeCachedServers(context)(context)) {
290                         DEBUG(1, ("Could not purge all servers, "
291                                   "free_context failed.\n"));
292                         errno = EBUSY;
293                         TALLOC_FREE(frame);
294                         return 1;
295                 }
296                 if (context->internal->servers) {
297                         DEBUG(1, ("Active servers in context, "
298                                   "free_context failed.\n"));
299                         errno = EBUSY;
300                         TALLOC_FREE(frame);
301                         return 1;
302                 }
303                 if (context->internal->files) {
304                         DEBUG(1, ("Active files in context, "
305                                   "free_context failed.\n"));
306                         errno = EBUSY;
307                         TALLOC_FREE(frame);
308                         return 1;
309                 }
310         }
311
312         /* Things we have to clean up */
313         smbc_setWorkgroup(context, NULL);
314         smbc_setNetbiosName(context, NULL);
315         smbc_setUser(context, NULL);
316
317         DEBUG(3, ("Context %p successfully freed\n", context));
318
319         /* Free any DFS auth context. */
320         TALLOC_FREE(context->internal->auth_info);
321
322         SAFE_FREE(context->internal);
323         SAFE_FREE(context);
324
325         /* Protect access to the count of contexts in use */
326         if (SMB_THREAD_LOCK(initialized_ctx_count_mutex) != 0) {
327                 smb_panic("error locking 'initialized_ctx_count'");
328         }
329
330         if (initialized_ctx_count) {
331                 initialized_ctx_count--;
332         }
333
334         if (initialized_ctx_count == 0) {
335             SMBC_module_terminate();
336         }
337
338         /* Unlock the mutex */
339         if (SMB_THREAD_UNLOCK(initialized_ctx_count_mutex) != 0) {
340                 smb_panic("error unlocking 'initialized_ctx_count'");
341         }
342
343         TALLOC_FREE(frame);
344         return 0;
345 }
346
347
348 /**
349  * Deprecated interface.  Do not use.  Instead, use the various
350  * smbc_setOption*() functions or smbc_setFunctionAuthDataWithContext().
351  */
352 void
353 smbc_option_set(SMBCCTX *context,
354                 char *option_name,
355                 ... /* option_value */)
356 {
357         va_list ap;
358         union {
359                 int i;
360                 bool b;
361                 smbc_get_auth_data_with_context_fn auth_fn;
362                 void *v;
363                 const char *s;
364         } option_value;
365
366         TALLOC_CTX *frame = talloc_stackframe();
367
368         va_start(ap, option_name);
369
370         if (strcmp(option_name, "debug_to_stderr") == 0) {
371                 option_value.b = (bool) va_arg(ap, int);
372                 smbc_setOptionDebugToStderr(context, option_value.b);
373
374         } else if (strcmp(option_name, "full_time_names") == 0) {
375                 option_value.b = (bool) va_arg(ap, int);
376                 smbc_setOptionFullTimeNames(context, option_value.b);
377
378         } else if (strcmp(option_name, "open_share_mode") == 0) {
379                 option_value.i = va_arg(ap, int);
380                 smbc_setOptionOpenShareMode(context, option_value.i);
381
382         } else if (strcmp(option_name, "auth_function") == 0) {
383                 option_value.auth_fn =
384                         va_arg(ap, smbc_get_auth_data_with_context_fn);
385                 smbc_setFunctionAuthDataWithContext(context, option_value.auth_fn);
386
387         } else if (strcmp(option_name, "user_data") == 0) {
388                 option_value.v = va_arg(ap, void *);
389                 smbc_setOptionUserData(context, option_value.v);
390
391         } else if (strcmp(option_name, "smb_encrypt_level") == 0) {
392                 option_value.s = va_arg(ap, const char *);
393                 if (strcmp(option_value.s, "none") == 0) {
394                         smbc_setOptionSmbEncryptionLevel(context,
395                                                          SMBC_ENCRYPTLEVEL_NONE);
396                 } else if (strcmp(option_value.s, "request") == 0) {
397                         smbc_setOptionSmbEncryptionLevel(context,
398                                                          SMBC_ENCRYPTLEVEL_REQUEST);
399                 } else if (strcmp(option_value.s, "require") == 0) {
400                         smbc_setOptionSmbEncryptionLevel(context,
401                                                          SMBC_ENCRYPTLEVEL_REQUIRE);
402                 }
403
404         } else if (strcmp(option_name, "browse_max_lmb_count") == 0) {
405                 option_value.i = va_arg(ap, int);
406                 smbc_setOptionBrowseMaxLmbCount(context, option_value.i);
407
408         } else if (strcmp(option_name, "urlencode_readdir_entries") == 0) {
409                 option_value.b = (bool) va_arg(ap, int);
410                 smbc_setOptionUrlEncodeReaddirEntries(context, option_value.b);
411
412         } else if (strcmp(option_name, "one_share_per_server") == 0) {
413                 option_value.b = (bool) va_arg(ap, int);
414                 smbc_setOptionOneSharePerServer(context, option_value.b);
415
416         } else if (strcmp(option_name, "use_kerberos") == 0) {
417                 option_value.b = (bool) va_arg(ap, int);
418                 smbc_setOptionUseKerberos(context, option_value.b);
419
420         } else if (strcmp(option_name, "fallback_after_kerberos") == 0) {
421                 option_value.b = (bool) va_arg(ap, int);
422                 smbc_setOptionFallbackAfterKerberos(context, option_value.b);
423
424         } else if (strcmp(option_name, "use_ccache") == 0) {
425                 option_value.b = (bool) va_arg(ap, int);
426                 smbc_setOptionUseCCache(context, option_value.b);
427
428         } else if (strcmp(option_name, "no_auto_anonymous_login") == 0) {
429                 option_value.b = (bool) va_arg(ap, int);
430                 smbc_setOptionNoAutoAnonymousLogin(context, option_value.b);
431         }
432
433         va_end(ap);
434         TALLOC_FREE(frame);
435 }
436
437
438 /*
439  * Deprecated interface.  Do not use.  Instead, use the various
440  * smbc_getOption*() functions.
441  */
442 void *
443 smbc_option_get(SMBCCTX *context,
444                 char *option_name)
445 {
446         if (strcmp(option_name, "debug_stderr") == 0) {
447 #if defined(__intptr_t_defined) || defined(HAVE_INTPTR_T)
448                 return (void *) (intptr_t) smbc_getOptionDebugToStderr(context);
449 #else
450                 return (void *) smbc_getOptionDebugToStderr(context);
451 #endif
452
453         } else if (strcmp(option_name, "full_time_names") == 0) {
454 #if defined(__intptr_t_defined) || defined(HAVE_INTPTR_T)
455                 return (void *) (intptr_t) smbc_getOptionFullTimeNames(context);
456 #else
457                 return (void *) smbc_getOptionFullTimeNames(context);
458 #endif
459
460         } else if (strcmp(option_name, "open_share_mode") == 0) {
461 #if defined(__intptr_t_defined) || defined(HAVE_INTPTR_T)
462                 return (void *) (intptr_t) smbc_getOptionOpenShareMode(context);
463 #else
464                 return (void *) smbc_getOptionOpenShareMode(context);
465 #endif
466
467         } else if (strcmp(option_name, "auth_function") == 0) {
468                 return (void *) smbc_getFunctionAuthDataWithContext(context);
469
470         } else if (strcmp(option_name, "user_data") == 0) {
471                 return smbc_getOptionUserData(context);
472
473         } else if (strcmp(option_name, "smb_encrypt_level") == 0) {
474                 switch(smbc_getOptionSmbEncryptionLevel(context))
475                 {
476                 case 0:
477                         return discard_const_p(void, "none");
478                 case 1:
479                         return discard_const_p(void, "request");
480                 case 2:
481                         return discard_const_p(void, "require");
482                 }
483
484         } else if (strcmp(option_name, "smb_encrypt_on") == 0) {
485                 SMBCSRV *s;
486                 unsigned int num_servers = 0;
487
488                 for (s = context->internal->servers; s; s = s->next) {
489                         num_servers++;
490                         if (!cli_state_is_encryption_on(s->cli)) {
491                                 return (void *)false;
492                         }
493                 }
494 #if defined(__intptr_t_defined) || defined(HAVE_INTPTR_T)
495                 return (void *) (intptr_t) (bool) (num_servers > 0);
496 #else
497                 return (void *) (bool) (num_servers > 0);
498 #endif
499
500         } else if (strcmp(option_name, "browse_max_lmb_count") == 0) {
501 #if defined(__intptr_t_defined) || defined(HAVE_INTPTR_T)
502                 return (void *) (intptr_t) smbc_getOptionBrowseMaxLmbCount(context);
503 #else
504                 return (void *) smbc_getOptionBrowseMaxLmbCount(context);
505 #endif
506
507         } else if (strcmp(option_name, "urlencode_readdir_entries") == 0) {
508 #if defined(__intptr_t_defined) || defined(HAVE_INTPTR_T)
509                 return (void *)(intptr_t) smbc_getOptionUrlEncodeReaddirEntries(context);
510 #else
511                 return (void *) (bool) smbc_getOptionUrlEncodeReaddirEntries(context);
512 #endif
513
514         } else if (strcmp(option_name, "one_share_per_server") == 0) {
515 #if defined(__intptr_t_defined) || defined(HAVE_INTPTR_T)
516                 return (void *) (intptr_t) smbc_getOptionOneSharePerServer(context);
517 #else
518                 return (void *) (bool) smbc_getOptionOneSharePerServer(context);
519 #endif
520
521         } else if (strcmp(option_name, "use_kerberos") == 0) {
522 #if defined(__intptr_t_defined) || defined(HAVE_INTPTR_T)
523                 return (void *) (intptr_t) smbc_getOptionUseKerberos(context);
524 #else
525                 return (void *) (bool) smbc_getOptionUseKerberos(context);
526 #endif
527
528         } else if (strcmp(option_name, "fallback_after_kerberos") == 0) {
529 #if defined(__intptr_t_defined) || defined(HAVE_INTPTR_T)
530                 return (void *)(intptr_t) smbc_getOptionFallbackAfterKerberos(context);
531 #else
532                 return (void *) (bool) smbc_getOptionFallbackAfterKerberos(context);
533 #endif
534
535         } else if (strcmp(option_name, "use_ccache") == 0) {
536 #if defined(__intptr_t_defined) || defined(HAVE_INTPTR_T)
537                 return (void *) (intptr_t) smbc_getOptionUseCCache(context);
538 #else
539                 return (void *) (bool) smbc_getOptionUseCCache(context);
540 #endif
541
542         } else if (strcmp(option_name, "no_auto_anonymous_login") == 0) {
543 #if defined(__intptr_t_defined) || defined(HAVE_INTPTR_T)
544                 return (void *) (intptr_t) smbc_getOptionNoAutoAnonymousLogin(context);
545 #else
546                 return (void *) (bool) smbc_getOptionNoAutoAnonymousLogin(context);
547 #endif
548         }
549
550         return NULL;
551 }
552
553
554 /*
555  * Initialize the library, etc.
556  *
557  * We accept a struct containing handle information.
558  * valid values for info->debug from 0 to 100,
559  * and insist that info->fn must be non-null.
560  */
561 SMBCCTX *
562 smbc_init_context(SMBCCTX *context)
563 {
564         int pid;
565         TALLOC_CTX *frame;
566
567         if (!context) {
568                 errno = EBADF;
569                 return NULL;
570         }
571
572         /* Do not initialise the same client twice */
573         if (context->internal->initialized) {
574                 return NULL;
575         }
576
577         frame = talloc_stackframe();
578
579         if ((!smbc_getFunctionAuthData(context) &&
580              !smbc_getFunctionAuthDataWithContext(context)) ||
581             smbc_getDebug(context) < 0 ||
582             smbc_getDebug(context) > 100) {
583
584                 TALLOC_FREE(frame);
585                 errno = EINVAL;
586                 return NULL;
587
588         }
589
590         if (!smbc_getUser(context)) {
591                 /*
592                  * FIXME: Is this the best way to get the user info?
593                  */
594                 char *user = getenv("USER");
595                 /* walk around as "guest" if no username can be found */
596                 if (!user) {
597                         user = SMB_STRDUP("guest");
598                 } else {
599                         user = SMB_STRDUP(user);
600                 }
601
602                 if (!user) {
603                         TALLOC_FREE(frame);
604                         errno = ENOMEM;
605                         return NULL;
606                 }
607
608                 smbc_setUser(context, user);
609                 SAFE_FREE(user);
610
611                 if (!smbc_getUser(context)) {
612                         TALLOC_FREE(frame);
613                         errno = ENOMEM;
614                         return NULL;
615                 }
616         }
617
618         if (!smbc_getNetbiosName(context)) {
619                 /*
620                  * We try to get our netbios name from the config. If that
621                  * fails we fall back on constructing our netbios name from
622                  * our hostname etc
623                  */
624                 char *netbios_name;
625                 if (lp_netbios_name()) {
626                         netbios_name = SMB_STRDUP(lp_netbios_name());
627                 } else {
628                         /*
629                          * Hmmm, I want to get hostname as well, but I am too
630                          * lazy for the moment
631                          */
632                         pid = getpid();
633                         netbios_name = (char *)SMB_MALLOC(17);
634                         if (!netbios_name) {
635                                 TALLOC_FREE(frame);
636                                 errno = ENOMEM;
637                                 return NULL;
638                         }
639                         slprintf(netbios_name, 16,
640                                  "smbc%s%d", smbc_getUser(context), pid);
641                 }
642
643                 if (!netbios_name) {
644                         TALLOC_FREE(frame);
645                         errno = ENOMEM;
646                         return NULL;
647                 }
648
649                 smbc_setNetbiosName(context, netbios_name);
650                 SAFE_FREE(netbios_name);
651
652                 if (!smbc_getNetbiosName(context)) {
653                         TALLOC_FREE(frame);
654                         errno = ENOMEM;
655                         return NULL;
656                 }
657         }
658
659         DEBUG(1, ("Using netbios name %s.\n", smbc_getNetbiosName(context)));
660
661         if (!smbc_getWorkgroup(context)) {
662                 char *workgroup;
663
664                 if (lp_workgroup()) {
665                         workgroup = SMB_STRDUP(lp_workgroup());
666                 }
667                 else {
668                         /* TODO: Think about a decent default workgroup */
669                         workgroup = SMB_STRDUP("samba");
670                 }
671
672                 if (!workgroup) {
673                         TALLOC_FREE(frame);
674                         errno = ENOMEM;
675                         return NULL;
676                 }
677
678                 smbc_setWorkgroup(context, workgroup);
679                 SAFE_FREE(workgroup);
680
681                 if (!smbc_getWorkgroup(context)) {
682                         TALLOC_FREE(frame);
683                         errno = ENOMEM;
684                         return NULL;
685                 }
686         }
687
688         DEBUG(1, ("Using workgroup %s.\n", smbc_getWorkgroup(context)));
689
690         /* shortest timeout is 1 second */
691         if (smbc_getTimeout(context) > 0 && smbc_getTimeout(context) < 1000)
692                 smbc_setTimeout(context, 1000);
693
694         context->internal->initialized = True;
695
696         /* Protect access to the count of contexts in use */
697         if (SMB_THREAD_LOCK(initialized_ctx_count_mutex) != 0) {
698                 smb_panic("error locking 'initialized_ctx_count'");
699         }
700
701         initialized_ctx_count++;
702
703         /* Unlock the mutex */
704         if (SMB_THREAD_UNLOCK(initialized_ctx_count_mutex) != 0) {
705                 smb_panic("error unlocking 'initialized_ctx_count'");
706         }
707
708         TALLOC_FREE(frame);
709         return context;
710 }
711
712
713 /* Return the verion of samba, and thus libsmbclient */
714 const char *
715 smbc_version(void)
716 {
717         return samba_version_string();
718 }
719
720 /*
721  * Set the credentials so DFS will work when following referrals.
722  * This function is broken and must be removed. No SMBCCTX arg...
723  * JRA.
724  */
725
726 void
727 smbc_set_credentials(const char *workgroup,
728                         const char *user,
729                         const char *password,
730                         smbc_bool use_kerberos,
731                         const char *signing_state)
732 {
733         d_printf("smbc_set_credentials is obsolete. Replace with smbc_set_credentials_with_fallback().\n");
734 }
735
736 void smbc_set_credentials_with_fallback(SMBCCTX *context,
737                                         const char *workgroup,
738                                         const char *user,
739                                         const char *password)
740 {
741         smbc_bool use_kerberos = false;
742         const char *signing_state = "off";
743         struct user_auth_info *auth_info = NULL;
744         TALLOC_CTX *frame;
745
746         if (! context) {
747
748                 return;
749         }
750
751         frame = talloc_stackframe();
752
753         if (! workgroup || ! *workgroup) {
754                 workgroup = smbc_getWorkgroup(context);
755         }
756
757         if (! user) {
758                 user = smbc_getUser(context);
759         }
760
761         if (! password) {
762                 password = "";
763         }
764
765         auth_info = user_auth_info_init(NULL);
766
767         if (! auth_info) {
768                 DEBUG(0, ("smbc_set_credentials_with_fallback: allocation fail\n"));
769                 TALLOC_FREE(frame);
770                 return;
771         }
772
773         if (smbc_getOptionUseKerberos(context)) {
774                 use_kerberos = True;
775         }
776
777         if (lp_client_signing() != SMB_SIGNING_OFF) {
778                 signing_state = "if_required";
779         }
780
781         if (lp_client_signing() == SMB_SIGNING_REQUIRED) {
782                 signing_state = "required";
783         }
784
785         set_cmdline_auth_info_username(auth_info, user);
786         set_cmdline_auth_info_domain(auth_info, workgroup);
787         set_cmdline_auth_info_password(auth_info, password);
788         set_cmdline_auth_info_use_kerberos(auth_info, use_kerberos);
789         set_cmdline_auth_info_signing_state(auth_info, signing_state);
790         set_cmdline_auth_info_fallback_after_kerberos(auth_info,
791                 smbc_getOptionFallbackAfterKerberos(context));
792         set_cmdline_auth_info_use_ccache(
793                 auth_info, smbc_getOptionUseCCache(context));
794
795         TALLOC_FREE(context->internal->auth_info);
796
797         context->internal->auth_info = auth_info;
798         TALLOC_FREE(frame);
799 }