source: vendor/current/nsswitch/pam_winbind.c

Last change on this file was 988, checked in by Silvan Scherrer, 9 years ago

Samba Server: update vendor to version 4.4.3
File size: 79.1 KB
Line 
1/* pam_winbind module
2
3 Copyright Andrew Tridgell <tridge@samba.org> 2000
4 Copyright Tim Potter <tpot@samba.org> 2000
5 Copyright Andrew Bartlett <abartlet@samba.org> 2002
6 Copyright Guenther Deschner <gd@samba.org> 2005-2008
7
8 largely based on pam_userdb by Cristian Gafton <gafton@redhat.com> also
9 contains large slabs of code from pam_unix by Elliot Lee
10 <sopwith@redhat.com> (see copyright below for full details)
11*/
12
13#include "pam_winbind.h"
14
15enum pam_winbind_request_type
16{
17 PAM_WINBIND_AUTHENTICATE,
18 PAM_WINBIND_SETCRED,
19 PAM_WINBIND_ACCT_MGMT,
20 PAM_WINBIND_OPEN_SESSION,
21 PAM_WINBIND_CLOSE_SESSION,
22 PAM_WINBIND_CHAUTHTOK,
23 PAM_WINBIND_CLEANUP
24};
25
26static int wbc_error_to_pam_error(wbcErr status)
27{
28 switch (status) {
29 case WBC_ERR_SUCCESS:
30 return PAM_SUCCESS;
31 case WBC_ERR_NOT_IMPLEMENTED:
32 return PAM_SERVICE_ERR;
33 case WBC_ERR_UNKNOWN_FAILURE:
34 break;
35 case WBC_ERR_NO_MEMORY:
36 return PAM_BUF_ERR;
37 case WBC_ERR_INVALID_SID:
38 case WBC_ERR_INVALID_PARAM:
39 break;
40 case WBC_ERR_WINBIND_NOT_AVAILABLE:
41 return PAM_AUTHINFO_UNAVAIL;
42 case WBC_ERR_DOMAIN_NOT_FOUND:
43 return PAM_AUTHINFO_UNAVAIL;
44 case WBC_ERR_INVALID_RESPONSE:
45 return PAM_BUF_ERR;
46 case WBC_ERR_NSS_ERROR:
47 return PAM_USER_UNKNOWN;
48 case WBC_ERR_AUTH_ERROR:
49 return PAM_AUTH_ERR;
50 case WBC_ERR_UNKNOWN_USER:
51 return PAM_USER_UNKNOWN;
52 case WBC_ERR_UNKNOWN_GROUP:
53 return PAM_USER_UNKNOWN;
54 case WBC_ERR_PWD_CHANGE_FAILED:
55 break;
56 }
57
58 /* be paranoid */
59 return PAM_AUTH_ERR;
60}
61
62static const char *_pam_error_code_str(int err)
63{
64 switch (err) {
65 case PAM_SUCCESS:
66 return "PAM_SUCCESS";
67 case PAM_OPEN_ERR:
68 return "PAM_OPEN_ERR";
69 case PAM_SYMBOL_ERR:
70 return "PAM_SYMBOL_ERR";
71 case PAM_SERVICE_ERR:
72 return "PAM_SERVICE_ERR";
73 case PAM_SYSTEM_ERR:
74 return "PAM_SYSTEM_ERR";
75 case PAM_BUF_ERR:
76 return "PAM_BUF_ERR";
77 case PAM_PERM_DENIED:
78 return "PAM_PERM_DENIED";
79 case PAM_AUTH_ERR:
80 return "PAM_AUTH_ERR";
81 case PAM_CRED_INSUFFICIENT:
82 return "PAM_CRED_INSUFFICIENT";
83 case PAM_AUTHINFO_UNAVAIL:
84 return "PAM_AUTHINFO_UNAVAIL";
85 case PAM_USER_UNKNOWN:
86 return "PAM_USER_UNKNOWN";
87 case PAM_MAXTRIES:
88 return "PAM_MAXTRIES";
89 case PAM_NEW_AUTHTOK_REQD:
90 return "PAM_NEW_AUTHTOK_REQD";
91 case PAM_ACCT_EXPIRED:
92 return "PAM_ACCT_EXPIRED";
93 case PAM_SESSION_ERR:
94 return "PAM_SESSION_ERR";
95 case PAM_CRED_UNAVAIL:
96 return "PAM_CRED_UNAVAIL";
97 case PAM_CRED_EXPIRED:
98 return "PAM_CRED_EXPIRED";
99 case PAM_CRED_ERR:
100 return "PAM_CRED_ERR";
101 case PAM_NO_MODULE_DATA:
102 return "PAM_NO_MODULE_DATA";
103 case PAM_CONV_ERR:
104 return "PAM_CONV_ERR";
105 case PAM_AUTHTOK_ERR:
106 return "PAM_AUTHTOK_ERR";
107 case PAM_AUTHTOK_RECOVER_ERR:
108 return "PAM_AUTHTOK_RECOVER_ERR";
109 case PAM_AUTHTOK_LOCK_BUSY:
110 return "PAM_AUTHTOK_LOCK_BUSY";
111 case PAM_AUTHTOK_DISABLE_AGING:
112 return "PAM_AUTHTOK_DISABLE_AGING";
113 case PAM_TRY_AGAIN:
114 return "PAM_TRY_AGAIN";
115 case PAM_IGNORE:
116 return "PAM_IGNORE";
117 case PAM_ABORT:
118 return "PAM_ABORT";
119 case PAM_AUTHTOK_EXPIRED:
120 return "PAM_AUTHTOK_EXPIRED";
121#ifdef PAM_MODULE_UNKNOWN
122 case PAM_MODULE_UNKNOWN:
123 return "PAM_MODULE_UNKNOWN";
124#endif
125#ifdef PAM_BAD_ITEM
126 case PAM_BAD_ITEM:
127 return "PAM_BAD_ITEM";
128#endif
129#ifdef PAM_CONV_AGAIN
130 case PAM_CONV_AGAIN:
131 return "PAM_CONV_AGAIN";
132#endif
133#ifdef PAM_INCOMPLETE
134 case PAM_INCOMPLETE:
135 return "PAM_INCOMPLETE";
136#endif
137 default:
138 return NULL;
139 }
140}
141
142#define _PAM_LOG_FUNCTION_ENTER(function, ctx) \
143 do { \
144 _pam_log_debug(ctx, LOG_DEBUG, "[pamh: %p] ENTER: " \
145 function " (flags: 0x%04x)", ctx->pamh, ctx->flags); \
146 _pam_log_state(ctx); \
147 } while (0)
148
149#define _PAM_LOG_FUNCTION_LEAVE(function, ctx, retval) \
150 do { \
151 _pam_log_debug(ctx, LOG_DEBUG, "[pamh: %p] LEAVE: " \
152 function " returning %d (%s)", ctx ? ctx->pamh : NULL, retval, \
153 _pam_error_code_str(retval)); \
154 _pam_log_state(ctx); \
155 } while (0)
156
157/* data tokens */
158
159#define MAX_PASSWD_TRIES 3
160
161#ifdef HAVE_GETTEXT
162static char initialized = 0;
163
164static inline void textdomain_init(void);
165static inline void textdomain_init(void)
166{
167 if (!initialized) {
168 bindtextdomain(MODULE_NAME, LOCALEDIR);
169 initialized = 1;
170 }
171 return;
172}
173#endif
174
175
176/* some syslogging */
177
178#ifdef HAVE_PAM_VSYSLOG
179static void _pam_log_int(const pam_handle_t *pamh,
180 int err,
181 const char *format,
182 va_list args)
183{
184 pam_vsyslog(pamh, err, format, args);
185}
186#else
187static void _pam_log_int(const pam_handle_t *pamh,
188 int err,
189 const char *format,
190 va_list args)
191{
192 char *format2 = NULL;
193 const char *service;
194
195 pam_get_item(pamh, PAM_SERVICE, (const void **) &service);
196
197 format2 = (char *)malloc(strlen(MODULE_NAME)+strlen(format)+strlen(service)+5);
198 if (format2 == NULL) {
199 /* what else todo ? */
200 vsyslog(err, format, args);
201 return;
202 }
203
204 sprintf(format2, "%s(%s): %s", MODULE_NAME, service, format);
205 vsyslog(err, format2, args);
206 SAFE_FREE(format2);
207}
208#endif /* HAVE_PAM_VSYSLOG */
209
210static bool _pam_log_is_silent(int ctrl)
211{
212 return on(ctrl, WINBIND_SILENT);
213}
214
215static void _pam_log(struct pwb_context *r, int err, const char *format, ...) PRINTF_ATTRIBUTE(3,4);
216static void _pam_log(struct pwb_context *r, int err, const char *format, ...)
217{
218 va_list args;
219
220 if (_pam_log_is_silent(r->ctrl)) {
221 return;
222 }
223
224 va_start(args, format);
225 _pam_log_int(r->pamh, err, format, args);
226 va_end(args);
227}
228static void __pam_log(const pam_handle_t *pamh, int ctrl, int err, const char *format, ...) PRINTF_ATTRIBUTE(4,5);
229static void __pam_log(const pam_handle_t *pamh, int ctrl, int err, const char *format, ...)
230{
231 va_list args;
232
233 if (_pam_log_is_silent(ctrl)) {
234 return;
235 }
236
237 va_start(args, format);
238 _pam_log_int(pamh, err, format, args);
239 va_end(args);
240}
241
242static bool _pam_log_is_debug_enabled(int ctrl)
243{
244 if (ctrl == -1) {
245 return false;
246 }
247
248 if (_pam_log_is_silent(ctrl)) {
249 return false;
250 }
251
252 if (!(ctrl & WINBIND_DEBUG_ARG)) {
253 return false;
254 }
255
256 return true;
257}
258
259static bool _pam_log_is_debug_state_enabled(int ctrl)
260{
261 if (!(ctrl & WINBIND_DEBUG_STATE)) {
262 return false;
263 }
264
265 return _pam_log_is_debug_enabled(ctrl);
266}
267
268static void _pam_log_debug(struct pwb_context *r, int err, const char *format, ...) PRINTF_ATTRIBUTE(3,4);
269static void _pam_log_debug(struct pwb_context *r, int err, const char *format, ...)
270{
271 va_list args;
272
273 if (!r || !_pam_log_is_debug_enabled(r->ctrl)) {
274 return;
275 }
276
277 va_start(args, format);
278 _pam_log_int(r->pamh, err, format, args);
279 va_end(args);
280}
281static void __pam_log_debug(const pam_handle_t *pamh, int ctrl, int err, const char *format, ...) PRINTF_ATTRIBUTE(4,5);
282static void __pam_log_debug(const pam_handle_t *pamh, int ctrl, int err, const char *format, ...)
283{
284 va_list args;
285
286 if (!_pam_log_is_debug_enabled(ctrl)) {
287 return;
288 }
289
290 va_start(args, format);
291 _pam_log_int(pamh, err, format, args);
292 va_end(args);
293}
294
295static void _pam_log_state_datum(struct pwb_context *ctx,
296 int item_type,
297 const char *key,
298 int is_string)
299{
300 const void *data = NULL;
301 if (item_type != 0) {
302 pam_get_item(ctx->pamh, item_type, &data);
303 } else {
304 pam_get_data(ctx->pamh, key, &data);
305 }
306 if (data != NULL) {
307 const char *type = (item_type != 0) ? "ITEM" : "DATA";
308 if (is_string != 0) {
309 _pam_log_debug(ctx, LOG_DEBUG,
310 "[pamh: %p] STATE: %s(%s) = \"%s\" (%p)",
311 ctx->pamh, type, key, (const char *)data,
312 data);
313 } else {
314 _pam_log_debug(ctx, LOG_DEBUG,
315 "[pamh: %p] STATE: %s(%s) = %p",
316 ctx->pamh, type, key, data);
317 }
318 }
319}
320
321#define _PAM_LOG_STATE_DATA_POINTER(ctx, module_data_name) \
322 _pam_log_state_datum(ctx, 0, module_data_name, 0)
323
324#define _PAM_LOG_STATE_DATA_STRING(ctx, module_data_name) \
325 _pam_log_state_datum(ctx, 0, module_data_name, 1)
326
327#define _PAM_LOG_STATE_ITEM_POINTER(ctx, item_type) \
328 _pam_log_state_datum(ctx, item_type, #item_type, 0)
329
330#define _PAM_LOG_STATE_ITEM_STRING(ctx, item_type) \
331 _pam_log_state_datum(ctx, item_type, #item_type, 1)
332
333#ifdef DEBUG_PASSWORD
334#define _LOG_PASSWORD_AS_STRING 1
335#else
336#define _LOG_PASSWORD_AS_STRING 0
337#endif
338
339#define _PAM_LOG_STATE_ITEM_PASSWORD(ctx, item_type) \
340 _pam_log_state_datum(ctx, item_type, #item_type, \
341 _LOG_PASSWORD_AS_STRING)
342/*
343 * wrapper to preserve old behaviour of iniparser which ignored
344 * key values that had no value assigned like
345 * key =
346 * for a key like above newer iniparser will return a zero-length
347 * string, previously iniparser would return NULL
348 *
349 * JRA: For compatibility, tiniparser behaves like iniparser.
350 */
351static const char *tiniparser_getstring_nonempty(struct tiniparser_dictionary *d,
352 const char *key,
353 const char *def)
354{
355 const char *ret = tiniparser_getstring(d, key, def);
356 if (ret && strlen(ret) == 0) {
357 ret = NULL;
358 }
359 return ret;
360}
361
362static void _pam_log_state(struct pwb_context *ctx)
363{
364 if (!ctx || !_pam_log_is_debug_state_enabled(ctx->ctrl)) {
365 return;
366 }
367
368 _PAM_LOG_STATE_ITEM_STRING(ctx, PAM_SERVICE);
369 _PAM_LOG_STATE_ITEM_STRING(ctx, PAM_USER);
370 _PAM_LOG_STATE_ITEM_STRING(ctx, PAM_TTY);
371 _PAM_LOG_STATE_ITEM_STRING(ctx, PAM_RHOST);
372 _PAM_LOG_STATE_ITEM_STRING(ctx, PAM_RUSER);
373 _PAM_LOG_STATE_ITEM_PASSWORD(ctx, PAM_OLDAUTHTOK);
374 _PAM_LOG_STATE_ITEM_PASSWORD(ctx, PAM_AUTHTOK);
375 _PAM_LOG_STATE_ITEM_STRING(ctx, PAM_USER_PROMPT);
376 _PAM_LOG_STATE_ITEM_POINTER(ctx, PAM_CONV);
377#ifdef PAM_FAIL_DELAY
378 _PAM_LOG_STATE_ITEM_POINTER(ctx, PAM_FAIL_DELAY);
379#endif
380#ifdef PAM_REPOSITORY
381 _PAM_LOG_STATE_ITEM_POINTER(ctx, PAM_REPOSITORY);
382#endif
383
384 _PAM_LOG_STATE_DATA_STRING(ctx, PAM_WINBIND_HOMEDIR);
385 _PAM_LOG_STATE_DATA_STRING(ctx, PAM_WINBIND_LOGONSCRIPT);
386 _PAM_LOG_STATE_DATA_STRING(ctx, PAM_WINBIND_LOGONSERVER);
387 _PAM_LOG_STATE_DATA_STRING(ctx, PAM_WINBIND_PROFILEPATH);
388 _PAM_LOG_STATE_DATA_STRING(ctx,
389 PAM_WINBIND_NEW_AUTHTOK_REQD);
390 /* Use atoi to get PAM result code */
391 _PAM_LOG_STATE_DATA_STRING(ctx,
392 PAM_WINBIND_NEW_AUTHTOK_REQD_DURING_AUTH);
393 _PAM_LOG_STATE_DATA_POINTER(ctx, PAM_WINBIND_PWD_LAST_SET);
394}
395
396static int _pam_parse(const pam_handle_t *pamh,
397 int flags,
398 int argc,
399 const char **argv,
400 enum pam_winbind_request_type type,
401 struct tiniparser_dictionary **result_d)
402{
403 int ctrl = 0;
404 const char *config_file = NULL;
405 int i;
406 const char **v;
407 struct tiniparser_dictionary *d = NULL;
408
409 if (flags & PAM_SILENT) {
410 ctrl |= WINBIND_SILENT;
411 }
412
413 for (i=argc,v=argv; i-- > 0; ++v) {
414 if (!strncasecmp(*v, "config", strlen("config"))) {
415 ctrl |= WINBIND_CONFIG_FILE;
416 config_file = v[i];
417 break;
418 }
419 }
420
421 if (config_file == NULL) {
422 config_file = PAM_WINBIND_CONFIG_FILE;
423 }
424
425 d = tiniparser_load(config_file);
426 if (d == NULL) {
427 goto config_from_pam;
428 }
429
430 if (tiniparser_getboolean(d, "global:debug", false)) {
431 ctrl |= WINBIND_DEBUG_ARG;
432 }
433
434 if (tiniparser_getboolean(d, "global:debug_state", false)) {
435 ctrl |= WINBIND_DEBUG_STATE;
436 }
437
438 if (tiniparser_getboolean(d, "global:cached_login", false)) {
439 ctrl |= WINBIND_CACHED_LOGIN;
440 }
441
442 if (tiniparser_getboolean(d, "global:krb5_auth", false)) {
443 ctrl |= WINBIND_KRB5_AUTH;
444 }
445
446 if (tiniparser_getboolean(d, "global:silent", false)) {
447 ctrl |= WINBIND_SILENT;
448 }
449
450 if (tiniparser_getstring_nonempty(d, "global:krb5_ccache_type", NULL) != NULL) {
451 ctrl |= WINBIND_KRB5_CCACHE_TYPE;
452 }
453
454 if ((tiniparser_getstring_nonempty(d, "global:require-membership-of", NULL)
455 != NULL) ||
456 (tiniparser_getstring_nonempty(d, "global:require_membership_of", NULL)
457 != NULL)) {
458 ctrl |= WINBIND_REQUIRED_MEMBERSHIP;
459 }
460
461 if (tiniparser_getboolean(d, "global:try_first_pass", false)) {
462 ctrl |= WINBIND_TRY_FIRST_PASS_ARG;
463 }
464
465 if (tiniparser_getint(d, "global:warn_pwd_expire", 0)) {
466 ctrl |= WINBIND_WARN_PWD_EXPIRE;
467 }
468
469 if (tiniparser_getboolean(d, "global:mkhomedir", false)) {
470 ctrl |= WINBIND_MKHOMEDIR;
471 }
472
473config_from_pam:
474 /* step through arguments */
475 for (i=argc,v=argv; i-- > 0; ++v) {
476
477 /* generic options */
478 if (!strcmp(*v,"debug"))
479 ctrl |= WINBIND_DEBUG_ARG;
480 else if (!strcasecmp(*v, "debug_state"))
481 ctrl |= WINBIND_DEBUG_STATE;
482 else if (!strcasecmp(*v, "silent"))
483 ctrl |= WINBIND_SILENT;
484 else if (!strcasecmp(*v, "use_authtok"))
485 ctrl |= WINBIND_USE_AUTHTOK_ARG;
486 else if (!strcasecmp(*v, "use_first_pass"))
487 ctrl |= WINBIND_USE_FIRST_PASS_ARG;
488 else if (!strcasecmp(*v, "try_first_pass"))
489 ctrl |= WINBIND_TRY_FIRST_PASS_ARG;
490 else if (!strcasecmp(*v, "unknown_ok"))
491 ctrl |= WINBIND_UNKNOWN_OK_ARG;
492 else if ((type == PAM_WINBIND_AUTHENTICATE
493 || type == PAM_WINBIND_SETCRED)
494 && !strncasecmp(*v, "require_membership_of",
495 strlen("require_membership_of")))
496 ctrl |= WINBIND_REQUIRED_MEMBERSHIP;
497 else if ((type == PAM_WINBIND_AUTHENTICATE
498 || type == PAM_WINBIND_SETCRED)
499 && !strncasecmp(*v, "require-membership-of",
500 strlen("require-membership-of")))
501 ctrl |= WINBIND_REQUIRED_MEMBERSHIP;
502 else if (!strcasecmp(*v, "krb5_auth"))
503 ctrl |= WINBIND_KRB5_AUTH;
504 else if (!strncasecmp(*v, "krb5_ccache_type",
505 strlen("krb5_ccache_type")))
506 ctrl |= WINBIND_KRB5_CCACHE_TYPE;
507 else if (!strcasecmp(*v, "cached_login"))
508 ctrl |= WINBIND_CACHED_LOGIN;
509 else if (!strcasecmp(*v, "mkhomedir"))
510 ctrl |= WINBIND_MKHOMEDIR;
511 else if (!strncasecmp(*v, "warn_pwd_expire",
512 strlen("warn_pwd_expire")))
513 ctrl |= WINBIND_WARN_PWD_EXPIRE;
514 else if (type != PAM_WINBIND_CLEANUP) {
515 __pam_log(pamh, ctrl, LOG_ERR,
516 "pam_parse: unknown option: %s", *v);
517 return -1;
518 }
519
520 }
521
522 if (result_d) {
523 *result_d = d;
524 } else {
525 if (d) {
526 tiniparser_freedict(d);
527 }
528 }
529
530 return ctrl;
531};
532
533static int _pam_winbind_free_context(struct pwb_context *ctx)
534{
535 if (!ctx) {
536 return 0;
537 }
538
539 if (ctx->dict) {
540 tiniparser_freedict(ctx->dict);
541 }
542
543 return 0;
544}
545
546static int _pam_winbind_init_context(pam_handle_t *pamh,
547 int flags,
548 int argc,
549 const char **argv,
550 enum pam_winbind_request_type type,
551 struct pwb_context **ctx_p)
552{
553 struct pwb_context *r = NULL;
554
555#ifdef HAVE_GETTEXT
556 textdomain_init();
557#endif
558
559 r = talloc_zero(NULL, struct pwb_context);
560 if (!r) {
561 return PAM_BUF_ERR;
562 }
563
564 talloc_set_destructor(r, _pam_winbind_free_context);
565
566 r->pamh = pamh;
567 r->flags = flags;
568 r->argc = argc;
569 r->argv = argv;
570 r->ctrl = _pam_parse(pamh, flags, argc, argv, type, &r->dict);
571 if (r->ctrl == -1) {
572 TALLOC_FREE(r);
573 return PAM_SYSTEM_ERR;
574 }
575
576 *ctx_p = r;
577
578 return PAM_SUCCESS;
579}
580
581static void _pam_winbind_cleanup_func(pam_handle_t *pamh,
582 void *data,
583 int error_status)
584{
585 int ctrl = _pam_parse(pamh, 0, 0, NULL, PAM_WINBIND_CLEANUP, NULL);
586 if (_pam_log_is_debug_state_enabled(ctrl)) {
587 __pam_log_debug(pamh, ctrl, LOG_DEBUG,
588 "[pamh: %p] CLEAN: cleaning up PAM data %p "
589 "(error_status = %d)", pamh, data,
590 error_status);
591 }
592 TALLOC_FREE(data);
593}
594
595
596static const struct ntstatus_errors {
597 const char *ntstatus_string;
598 const char *error_string;
599} ntstatus_errors[] = {
600 {"NT_STATUS_OK",
601 N_("Success")},
602 {"NT_STATUS_BACKUP_CONTROLLER",
603 N_("No primary Domain Controler available")},
604 {"NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND",
605 N_("No domain controllers found")},
606 {"NT_STATUS_NO_LOGON_SERVERS",
607 N_("No logon servers")},
608 {"NT_STATUS_PWD_TOO_SHORT",
609 N_("Password too short")},
610 {"NT_STATUS_PWD_TOO_RECENT",
611 N_("The password of this user is too recent to change")},
612 {"NT_STATUS_PWD_HISTORY_CONFLICT",
613 N_("Password is already in password history")},
614 {"NT_STATUS_PASSWORD_EXPIRED",
615 N_("Your password has expired")},
616 {"NT_STATUS_PASSWORD_MUST_CHANGE",
617 N_("You need to change your password now")},
618 {"NT_STATUS_INVALID_WORKSTATION",
619 N_("You are not allowed to logon from this workstation")},
620 {"NT_STATUS_INVALID_LOGON_HOURS",
621 N_("You are not allowed to logon at this time")},
622 {"NT_STATUS_ACCOUNT_EXPIRED",
623 N_("Your account has expired. "
624 "Please contact your System administrator")}, /* SCNR */
625 {"NT_STATUS_ACCOUNT_DISABLED",
626 N_("Your account is disabled. "
627 "Please contact your System administrator")}, /* SCNR */
628 {"NT_STATUS_ACCOUNT_LOCKED_OUT",
629 N_("Your account has been locked. "
630 "Please contact your System administrator")}, /* SCNR */
631 {"NT_STATUS_NOLOGON_WORKSTATION_TRUST_ACCOUNT",
632 N_("Invalid Trust Account")},
633 {"NT_STATUS_NOLOGON_SERVER_TRUST_ACCOUNT",
634 N_("Invalid Trust Account")},
635 {"NT_STATUS_NOLOGON_INTERDOMAIN_TRUST_ACCOUNT",
636 N_("Invalid Trust Account")},
637 {"NT_STATUS_ACCESS_DENIED",
638 N_("Access is denied")},
639 {NULL, NULL}
640};
641
642static const char *_get_ntstatus_error_string(const char *nt_status_string)
643{
644 int i;
645 for (i=0; ntstatus_errors[i].ntstatus_string != NULL; i++) {
646 if (!strcasecmp(ntstatus_errors[i].ntstatus_string,
647 nt_status_string)) {
648 return _(ntstatus_errors[i].error_string);
649 }
650 }
651 return NULL;
652}
653
654/* --- authentication management functions --- */
655
656/* Attempt a conversation */
657
658static int converse(const pam_handle_t *pamh,
659 int nargs,
660 struct pam_message **message,
661 struct pam_response **response)
662{
663 int retval;
664 struct pam_conv *conv;
665
666 retval = pam_get_item(pamh, PAM_CONV, (const void **) &conv);
667 if (retval == PAM_SUCCESS) {
668 retval = conv->conv(nargs,
669 discard_const_p(const struct pam_message *, message),
670 response, conv->appdata_ptr);
671 }
672
673 return retval; /* propagate error status */
674}
675
676
677static int _make_remark(struct pwb_context *ctx,
678 int type,
679 const char *text)
680{
681 int retval = PAM_SUCCESS;
682
683 struct pam_message *pmsg[1], msg[1];
684 struct pam_response *resp;
685
686 if (ctx->flags & WINBIND_SILENT) {
687 return PAM_SUCCESS;
688 }
689
690 pmsg[0] = &msg[0];
691 msg[0].msg = discard_const_p(char, text);
692 msg[0].msg_style = type;
693
694 resp = NULL;
695 retval = converse(ctx->pamh, 1, pmsg, &resp);
696
697 if (resp) {
698 _pam_drop_reply(resp, 1);
699 }
700 return retval;
701}
702
703static int _make_remark_v(struct pwb_context *ctx,
704 int type,
705 const char *format,
706 va_list args)
707{
708 char *var;
709 int ret;
710
711 ret = vasprintf(&var, format, args);
712 if (ret < 0) {
713 _pam_log(ctx, LOG_ERR, "memory allocation failure");
714 return ret;
715 }
716
717 ret = _make_remark(ctx, type, var);
718 SAFE_FREE(var);
719 return ret;
720}
721
722static int _make_remark_format(struct pwb_context *ctx, int type, const char *format, ...) PRINTF_ATTRIBUTE(3,4);
723static int _make_remark_format(struct pwb_context *ctx, int type, const char *format, ...)
724{
725 int ret;
726 va_list args;
727
728 va_start(args, format);
729 ret = _make_remark_v(ctx, type, format, args);
730 va_end(args);
731 return ret;
732}
733
734static int pam_winbind_request_log(struct pwb_context *ctx,
735 int retval,
736 const char *user,
737 const char *fn)
738{
739 switch (retval) {
740 case PAM_AUTH_ERR:
741 /* incorrect password */
742 _pam_log(ctx, LOG_WARNING, "user '%s' denied access "
743 "(incorrect password or invalid membership)", user);
744 return retval;
745 case PAM_ACCT_EXPIRED:
746 /* account expired */
747 _pam_log(ctx, LOG_WARNING, "user '%s' account expired",
748 user);
749 return retval;
750 case PAM_AUTHTOK_EXPIRED:
751 /* password expired */
752 _pam_log(ctx, LOG_WARNING, "user '%s' password expired",
753 user);
754 return retval;
755 case PAM_NEW_AUTHTOK_REQD:
756 /* new password required */
757 _pam_log(ctx, LOG_WARNING, "user '%s' new password "
758 "required", user);
759 return retval;
760 case PAM_USER_UNKNOWN:
761 /* the user does not exist */
762 _pam_log_debug(ctx, LOG_NOTICE, "user '%s' not found",
763 user);
764 if (ctx->ctrl & WINBIND_UNKNOWN_OK_ARG) {
765 return PAM_IGNORE;
766 }
767 return retval;
768 case PAM_SUCCESS:
769 /* Otherwise, the authentication looked good */
770 if (strcmp(fn, "wbcLogonUser") == 0) {
771 _pam_log(ctx, LOG_NOTICE,
772 "user '%s' granted access", user);
773 } else {
774 _pam_log(ctx, LOG_NOTICE,
775 "user '%s' OK", user);
776 }
777 return retval;
778 default:
779 /* we don't know anything about this return value */
780 _pam_log(ctx, LOG_ERR,
781 "internal module error (retval = %s(%d), user = '%s')",
782 _pam_error_code_str(retval), retval, user);
783 return retval;
784 }
785}
786
787static int wbc_auth_error_to_pam_error(struct pwb_context *ctx,
788 struct wbcAuthErrorInfo *e,
789 wbcErr status,
790 const char *username,
791 const char *fn)
792{
793 int ret = PAM_AUTH_ERR;
794
795 if (WBC_ERROR_IS_OK(status)) {
796 _pam_log_debug(ctx, LOG_DEBUG, "request %s succeeded",
797 fn);
798 ret = PAM_SUCCESS;
799 return pam_winbind_request_log(ctx, ret, username, fn);
800 }
801
802 if (e) {
803 if (e->pam_error != PAM_SUCCESS) {
804 _pam_log(ctx, LOG_ERR,
805 "request %s failed: %s, "
806 "PAM error: %s (%d), NTSTATUS: %s, "
807 "Error message was: %s",
808 fn,
809 wbcErrorString(status),
810 _pam_error_code_str(e->pam_error),
811 e->pam_error,
812 e->nt_string,
813 e->display_string);
814 ret = e->pam_error;
815 return pam_winbind_request_log(ctx, ret, username, fn);
816 }
817
818 _pam_log(ctx, LOG_ERR, "request %s failed, but PAM error 0!", fn);
819
820 ret = PAM_SERVICE_ERR;
821 return pam_winbind_request_log(ctx, ret, username, fn);
822 }
823
824 ret = wbc_error_to_pam_error(status);
825 return pam_winbind_request_log(ctx, ret, username, fn);
826}
827
828#if defined(HAVE_PAM_RADIO_TYPE)
829static bool _pam_winbind_change_pwd(struct pwb_context *ctx)
830{
831 struct pam_message msg, *pmsg;
832 struct pam_response *resp = NULL;
833 int ret;
834 bool retval = false;
835 pmsg = &msg;
836 msg.msg_style = PAM_RADIO_TYPE;
837 msg.msg = _("Do you want to change your password now?");
838 ret = converse(ctx->pamh, 1, &pmsg, &resp);
839 if (resp == NULL) {
840 if (ret == PAM_SUCCESS) {
841 _pam_log(ctx, LOG_CRIT, "pam_winbind: system error!\n");
842 return false;
843 }
844 }
845 if (ret != PAM_SUCCESS) {
846 return false;
847 }
848 _pam_log(ctx, LOG_CRIT, "Received [%s] reply from application.\n", resp->resp);
849
850 if ((resp->resp != NULL) && (strcasecmp(resp->resp, "yes") == 0)) {
851 retval = true;
852 }
853
854 _pam_drop_reply(resp, 1);
855 return retval;
856}
857#else
858static bool _pam_winbind_change_pwd(struct pwb_context *ctx)
859{
860 return false;
861}
862#endif
863
864/**
865 * send a password expiry message if required
866 *
867 * @param ctx PAM winbind context.
868 * @param next_change expected (calculated) next expiry date.
869 * @param already_expired pointer to a boolean to indicate if the password is
870 * already expired.
871 *
872 * @return boolean Returns true if message has been sent, false if not.
873 */
874
875static bool _pam_send_password_expiry_message(struct pwb_context *ctx,
876 time_t next_change,
877 time_t now,
878 int warn_pwd_expire,
879 bool *already_expired,
880 bool *change_pwd)
881{
882 int days = 0;
883 struct tm tm_now, tm_next_change;
884 bool retval = false;
885 int ret;
886
887 if (already_expired) {
888 *already_expired = false;
889 }
890
891 if (change_pwd) {
892 *change_pwd = false;
893 }
894
895 if (next_change <= now) {
896 PAM_WB_REMARK_DIRECT(ctx, "NT_STATUS_PASSWORD_EXPIRED");
897 if (already_expired) {
898 *already_expired = true;
899 }
900 return true;
901 }
902
903 if ((next_change < 0) ||
904 (next_change > now + warn_pwd_expire * SECONDS_PER_DAY)) {
905 return false;
906 }
907
908 if ((localtime_r(&now, &tm_now) == NULL) ||
909 (localtime_r(&next_change, &tm_next_change) == NULL)) {
910 return false;
911 }
912
913 days = (tm_next_change.tm_yday+tm_next_change.tm_year*365) -
914 (tm_now.tm_yday+tm_now.tm_year*365);
915
916 if (days == 0) {
917 ret = _make_remark(ctx, PAM_TEXT_INFO,
918 _("Your password expires today.\n"));
919
920 /*
921 * If change_pwd and already_expired is null.
922 * We are just sending a notification message.
923 * We don't expect any response in this case.
924 */
925
926 if (!change_pwd && !already_expired) {
927 return true;
928 }
929
930 /*
931 * successfully sent the warning message.
932 * Give the user a chance to change pwd.
933 */
934 if (ret == PAM_SUCCESS) {
935 if (change_pwd) {
936 retval = _pam_winbind_change_pwd(ctx);
937 if (retval) {
938 *change_pwd = true;
939 }
940 }
941 }
942 return true;
943 }
944
945 if (days > 0 && days < warn_pwd_expire) {
946
947 ret = _make_remark_format(ctx, PAM_TEXT_INFO,
948 _("Your password will expire in %d %s.\n"),
949 days, (days > 1) ? _("days"):_("day"));
950 /*
951 * If change_pwd and already_expired is null.
952 * We are just sending a notification message.
953 * We don't expect any response in this case.
954 */
955
956 if (!change_pwd && !already_expired) {
957 return true;
958 }
959
960 /*
961 * successfully sent the warning message.
962 * Give the user a chance to change pwd.
963 */
964 if (ret == PAM_SUCCESS) {
965 if (change_pwd) {
966 retval = _pam_winbind_change_pwd(ctx);
967 if (retval) {
968 *change_pwd = true;
969 }
970 }
971 }
972 return true;
973 }
974
975 return false;
976}
977
978/**
979 * Send a warning if the password expires in the near future
980 *
981 * @param ctx PAM winbind context.
982 * @param response The full authentication response structure.
983 * @param already_expired boolean, is the pwd already expired?
984 *
985 * @return void.
986 */
987
988static void _pam_warn_password_expiry(struct pwb_context *ctx,
989 const struct wbcAuthUserInfo *info,
990 const struct wbcUserPasswordPolicyInfo *policy,
991 int warn_pwd_expire,
992 bool *already_expired,
993 bool *change_pwd)
994{
995 time_t now = time(NULL);
996 time_t next_change = 0;
997
998 if (!info || !policy) {
999 return;
1000 }
1001
1002 if (already_expired) {
1003 *already_expired = false;
1004 }
1005
1006 if (change_pwd) {
1007 *change_pwd = false;
1008 }
1009
1010 /* accounts with WBC_ACB_PWNOEXP set never receive a warning */
1011 if (info->acct_flags & WBC_ACB_PWNOEXP) {
1012 return;
1013 }
1014
1015 /* no point in sending a warning if this is a grace logon */
1016 if (PAM_WB_GRACE_LOGON(info->user_flags)) {
1017 return;
1018 }
1019
1020 /* check if the info3 must change timestamp has been set */
1021 next_change = info->pass_must_change_time;
1022
1023 if (_pam_send_password_expiry_message(ctx, next_change, now,
1024 warn_pwd_expire,
1025 already_expired,
1026 change_pwd)) {
1027 return;
1028 }
1029
1030 /* now check for the global password policy */
1031 /* good catch from Ralf Haferkamp: an expiry of "never" is translated
1032 * to -1 */
1033 if ((policy->expire == (int64_t)-1) ||
1034 (policy->expire == 0)) {
1035 return;
1036 }
1037
1038 next_change = info->pass_last_set_time + policy->expire;
1039
1040 if (_pam_send_password_expiry_message(ctx, next_change, now,
1041 warn_pwd_expire,
1042 already_expired,
1043 change_pwd)) {
1044 return;
1045 }
1046
1047 /* no warning sent */
1048}
1049
1050#define IS_SID_STRING(name) (strncmp("S-", name, 2) == 0)
1051
1052/**
1053 * Append a string, making sure not to overflow and to always return a
1054 * NULL-terminated string.
1055 *
1056 * @param dest Destination string buffer (must already be NULL-terminated).
1057 * @param src Source string buffer.
1058 * @param dest_buffer_size Size of dest buffer in bytes.
1059 *
1060 * @return false if dest buffer is not big enough (no bytes copied), true on
1061 * success.
1062 */
1063
1064static bool safe_append_string(char *dest,
1065 const char *src,
1066 int dest_buffer_size)
1067{
1068 size_t len;
1069 len = strlcat(dest, src, dest_buffer_size);
1070 return (len < dest_buffer_size);
1071}
1072
1073/**
1074 * Convert a names into a SID string, appending it to a buffer.
1075 *
1076 * @param ctx PAM winbind context.
1077 * @param user User in PAM request.
1078 * @param name Name to convert.
1079 * @param sid_list_buffer Where to append the string sid.
1080 * @param sid_list_buffer Size of sid_list_buffer (in bytes).
1081 *
1082 * @return false on failure, true on success.
1083 */
1084static bool winbind_name_to_sid_string(struct pwb_context *ctx,
1085 const char *user,
1086 const char *name,
1087 char *sid_list_buffer,
1088 int sid_list_buffer_size)
1089{
1090 char sid_string[WBC_SID_STRING_BUFLEN];
1091
1092 /* lookup name? */
1093 if (IS_SID_STRING(name)) {
1094 strlcpy(sid_string, name, sizeof(sid_string));
1095 } else {
1096 wbcErr wbc_status;
1097 struct wbcDomainSid sid;
1098 enum wbcSidType type;
1099
1100 _pam_log_debug(ctx, LOG_DEBUG,
1101 "no sid given, looking up: %s\n", name);
1102
1103 wbc_status = wbcLookupName("", name, &sid, &type);
1104 if (!WBC_ERROR_IS_OK(wbc_status)) {
1105 _pam_log(ctx, LOG_INFO,
1106 "could not lookup name: %s\n", name);
1107 return false;
1108 }
1109
1110 wbcSidToStringBuf(&sid, sid_string, sizeof(sid_string));
1111 }
1112
1113 if (!safe_append_string(sid_list_buffer, sid_string,
1114 sid_list_buffer_size)) {
1115 return false;
1116 }
1117 return true;
1118}
1119
1120/**
1121 * Convert a list of names into a list of sids.
1122 *
1123 * @param ctx PAM winbind context.
1124 * @param user User in PAM request.
1125 * @param name_list List of names or string sids, separated by commas.
1126 * @param sid_list_buffer Where to put the list of string sids.
1127 * @param sid_list_buffer Size of sid_list_buffer (in bytes).
1128 *
1129 * @return false on failure, true on success.
1130 */
1131static bool winbind_name_list_to_sid_string_list(struct pwb_context *ctx,
1132 const char *user,
1133 const char *name_list,
1134 char *sid_list_buffer,
1135 int sid_list_buffer_size)
1136{
1137 bool result = false;
1138 char *current_name = NULL;
1139 const char *search_location;
1140 const char *comma;
1141 int len;
1142
1143 if (sid_list_buffer_size > 0) {
1144 sid_list_buffer[0] = 0;
1145 }
1146
1147 search_location = name_list;
1148 while ((comma = strchr(search_location, ',')) != NULL) {
1149 current_name = strndup(search_location,
1150 comma - search_location);
1151 if (NULL == current_name) {
1152 goto out;
1153 }
1154
1155 if (!winbind_name_to_sid_string(ctx, user,
1156 current_name,
1157 sid_list_buffer,
1158 sid_list_buffer_size)) {
1159 /*
1160 * If one group name failed, we must not fail
1161 * the authentication totally, continue with
1162 * the following group names. If user belongs to
1163 * one of the valid groups, we must allow it
1164 * login. -- BoYang
1165 */
1166
1167 _pam_log(ctx, LOG_INFO, "cannot convert group %s to sid, "
1168 "check if group %s is valid group.", current_name,
1169 current_name);
1170 _make_remark_format(ctx, PAM_TEXT_INFO, _("Cannot convert group %s "
1171 "to sid, please contact your administrator to see "
1172 "if group %s is valid."), current_name, current_name);
1173 SAFE_FREE(current_name);
1174 search_location = comma + 1;
1175 continue;
1176 }
1177
1178 SAFE_FREE(current_name);
1179
1180 if (!safe_append_string(sid_list_buffer, ",",
1181 sid_list_buffer_size)) {
1182 goto out;
1183 }
1184
1185 search_location = comma + 1;
1186 }
1187
1188 if (!winbind_name_to_sid_string(ctx, user, search_location,
1189 sid_list_buffer,
1190 sid_list_buffer_size)) {
1191 _pam_log(ctx, LOG_INFO, "cannot convert group %s to sid, "
1192 "check if group %s is valid group.", search_location,
1193 search_location);
1194 _make_remark_format(ctx, PAM_TEXT_INFO, _("Cannot convert group %s "
1195 "to sid, please contact your administrator to see "
1196 "if group %s is valid."), search_location, search_location);
1197
1198 /* If no valid groups were converted we should fail outright */
1199 if (name_list != NULL && strlen(sid_list_buffer) == 0) {
1200 result = false;
1201 goto out;
1202 }
1203 /*
1204 * The lookup of the last name failed..
1205 * It results in require_member_of_sid ends with ','
1206 * It is malformated parameter here, overwrite the last ','.
1207 */
1208 len = strlen(sid_list_buffer);
1209 if ((len != 0) && (sid_list_buffer[len - 1] == ',')) {
1210 sid_list_buffer[len - 1] = '\0';
1211 }
1212 }
1213
1214 result = true;
1215
1216out:
1217 SAFE_FREE(current_name);
1218 return result;
1219}
1220
1221/**
1222 * put krb5ccname variable into environment
1223 *
1224 * @param ctx PAM winbind context.
1225 * @param krb5ccname env variable retrieved from winbindd.
1226 *
1227 * @return void.
1228 */
1229
1230static void _pam_setup_krb5_env(struct pwb_context *ctx,
1231 struct wbcLogonUserInfo *info)
1232{
1233 char *var = NULL;
1234 int ret;
1235 uint32_t i;
1236 const char *krb5ccname = NULL;
1237
1238 if (off(ctx->ctrl, WINBIND_KRB5_AUTH)) {
1239 return;
1240 }
1241
1242 if (!info) {
1243 return;
1244 }
1245
1246 for (i=0; i < info->num_blobs; i++) {
1247 if (strcasecmp(info->blobs[i].name, "krb5ccname") == 0) {
1248 krb5ccname = (const char *)info->blobs[i].blob.data;
1249 break;
1250 }
1251 }
1252
1253 if (!krb5ccname || (strlen(krb5ccname) == 0)) {
1254 return;
1255 }
1256
1257 _pam_log_debug(ctx, LOG_DEBUG,
1258 "request returned KRB5CCNAME: %s", krb5ccname);
1259
1260 if (asprintf(&var, "KRB5CCNAME=%s", krb5ccname) == -1) {
1261 return;
1262 }
1263
1264 ret = pam_putenv(ctx->pamh, var);
1265 if (ret != PAM_SUCCESS) {
1266 _pam_log(ctx, LOG_ERR,
1267 "failed to set KRB5CCNAME to %s: %s",
1268 var, pam_strerror(ctx->pamh, ret));
1269 }
1270 free(var);
1271}
1272
1273/**
1274 * Copy unix username if available (further processed in PAM).
1275 *
1276 * @param ctx PAM winbind context
1277 * @param user_ret A pointer that holds a pointer to a string
1278 * @param unix_username A username
1279 *
1280 * @return void.
1281 */
1282
1283static void _pam_setup_unix_username(struct pwb_context *ctx,
1284 char **user_ret,
1285 struct wbcLogonUserInfo *info)
1286{
1287 const char *unix_username = NULL;
1288 uint32_t i;
1289
1290 if (!user_ret || !info) {
1291 return;
1292 }
1293
1294 for (i=0; i < info->num_blobs; i++) {
1295 if (strcasecmp(info->blobs[i].name, "unix_username") == 0) {
1296 unix_username = (const char *)info->blobs[i].blob.data;
1297 break;
1298 }
1299 }
1300
1301 if (!unix_username || !unix_username[0]) {
1302 return;
1303 }
1304
1305 *user_ret = strdup(unix_username);
1306}
1307
1308/**
1309 * Set string into the PAM stack.
1310 *
1311 * @param ctx PAM winbind context.
1312 * @param data_name Key name for pam_set_data.
1313 * @param value String value.
1314 *
1315 * @return void.
1316 */
1317
1318static void _pam_set_data_string(struct pwb_context *ctx,
1319 const char *data_name,
1320 const char *value)
1321{
1322 int ret;
1323
1324 if (!data_name || !value || (strlen(data_name) == 0) ||
1325 (strlen(value) == 0)) {
1326 return;
1327 }
1328
1329 ret = pam_set_data(ctx->pamh, data_name, talloc_strdup(NULL, value),
1330 _pam_winbind_cleanup_func);
1331 if (ret != PAM_SUCCESS) {
1332 _pam_log_debug(ctx, LOG_DEBUG,
1333 "Could not set data %s: %s\n",
1334 data_name, pam_strerror(ctx->pamh, ret));
1335 }
1336}
1337
1338/**
1339 * Set info3 strings into the PAM stack.
1340 *
1341 * @param ctx PAM winbind context.
1342 * @param data_name Key name for pam_set_data.
1343 * @param value String value.
1344 *
1345 * @return void.
1346 */
1347
1348static void _pam_set_data_info3(struct pwb_context *ctx,
1349 const struct wbcAuthUserInfo *info)
1350{
1351 _pam_set_data_string(ctx, PAM_WINBIND_HOMEDIR,
1352 info->home_directory);
1353 _pam_set_data_string(ctx, PAM_WINBIND_LOGONSCRIPT,
1354 info->logon_script);
1355 _pam_set_data_string(ctx, PAM_WINBIND_LOGONSERVER,
1356 info->logon_server);
1357 _pam_set_data_string(ctx, PAM_WINBIND_PROFILEPATH,
1358 info->profile_path);
1359}
1360
1361/**
1362 * Free info3 strings in the PAM stack.
1363 *
1364 * @param pamh PAM handle
1365 *
1366 * @return void.
1367 */
1368
1369static void _pam_free_data_info3(pam_handle_t *pamh)
1370{
1371 pam_set_data(pamh, PAM_WINBIND_HOMEDIR, NULL, NULL);
1372 pam_set_data(pamh, PAM_WINBIND_LOGONSCRIPT, NULL, NULL);
1373 pam_set_data(pamh, PAM_WINBIND_LOGONSERVER, NULL, NULL);
1374 pam_set_data(pamh, PAM_WINBIND_PROFILEPATH, NULL, NULL);
1375}
1376
1377/**
1378 * Send PAM_ERROR_MSG for cached or grace logons.
1379 *
1380 * @param ctx PAM winbind context.
1381 * @param username User in PAM request.
1382 * @param info3_user_flgs Info3 flags containing logon type bits.
1383 *
1384 * @return void.
1385 */
1386
1387static void _pam_warn_logon_type(struct pwb_context *ctx,
1388 const char *username,
1389 uint32_t info3_user_flgs)
1390{
1391 /* inform about logon type */
1392 if (PAM_WB_GRACE_LOGON(info3_user_flgs)) {
1393
1394 _make_remark(ctx, PAM_ERROR_MSG,
1395 _("Grace login. "
1396 "Please change your password as soon you're "
1397 "online again"));
1398 _pam_log_debug(ctx, LOG_DEBUG,
1399 "User %s logged on using grace logon\n",
1400 username);
1401
1402 } else if (PAM_WB_CACHED_LOGON(info3_user_flgs)) {
1403
1404 _make_remark(ctx, PAM_ERROR_MSG,
1405 _("Domain Controller unreachable, "
1406 "using cached credentials instead. "
1407 "Network resources may be unavailable"));
1408 _pam_log_debug(ctx, LOG_DEBUG,
1409 "User %s logged on using cached credentials\n",
1410 username);
1411 }
1412}
1413
1414/**
1415 * Send PAM_ERROR_MSG for krb5 errors.
1416 *
1417 * @param ctx PAM winbind context.
1418 * @param username User in PAM request.
1419 * @param info3_user_flgs Info3 flags containing logon type bits.
1420 *
1421 * @return void.
1422 */
1423
1424static void _pam_warn_krb5_failure(struct pwb_context *ctx,
1425 const char *username,
1426 uint32_t info3_user_flgs)
1427{
1428 if (PAM_WB_KRB5_CLOCK_SKEW(info3_user_flgs)) {
1429 _make_remark(ctx, PAM_ERROR_MSG,
1430 _("Failed to establish your Kerberos Ticket cache "
1431 "due time differences\n"
1432 "with the domain controller. "
1433 "Please verify the system time.\n"));
1434 _pam_log_debug(ctx, LOG_DEBUG,
1435 "User %s: Clock skew when getting Krb5 TGT\n",
1436 username);
1437 }
1438}
1439
1440static bool _pam_check_remark_auth_err(struct pwb_context *ctx,
1441 const struct wbcAuthErrorInfo *e,
1442 const char *nt_status_string,
1443 int *pam_err)
1444{
1445 const char *ntstatus = NULL;
1446 const char *error_string = NULL;
1447
1448 if (!e || !pam_err) {
1449 return false;
1450 }
1451
1452 ntstatus = e->nt_string;
1453 if (!ntstatus) {
1454 return false;
1455 }
1456
1457 if (strcasecmp(ntstatus, nt_status_string) == 0) {
1458
1459 error_string = _get_ntstatus_error_string(nt_status_string);
1460 if (error_string) {
1461 _make_remark(ctx, PAM_ERROR_MSG, error_string);
1462 *pam_err = e->pam_error;
1463 return true;
1464 }
1465
1466 if (e->display_string) {
1467 _make_remark(ctx, PAM_ERROR_MSG, _(e->display_string));
1468 *pam_err = e->pam_error;
1469 return true;
1470 }
1471
1472 _make_remark(ctx, PAM_ERROR_MSG, nt_status_string);
1473 *pam_err = e->pam_error;
1474
1475 return true;
1476 }
1477
1478 return false;
1479};
1480
1481/**
1482 * Compose Password Restriction String for a PAM_ERROR_MSG conversation.
1483 *
1484 * @param i The wbcUserPasswordPolicyInfo struct.
1485 *
1486 * @return string (caller needs to talloc_free).
1487 */
1488
1489static char *_pam_compose_pwd_restriction_string(struct pwb_context *ctx,
1490 struct wbcUserPasswordPolicyInfo *i)
1491{
1492 char *str = NULL;
1493
1494 if (!i) {
1495 goto failed;
1496 }
1497
1498 str = talloc_asprintf(ctx, _("Your password "));
1499 if (!str) {
1500 goto failed;
1501 }
1502
1503 if (i->min_length_password > 0) {
1504 str = talloc_asprintf_append(str,
1505 _("must be at least %d characters; "),
1506 i->min_length_password);
1507 if (!str) {
1508 goto failed;
1509 }
1510 }
1511
1512 if (i->password_history > 0) {
1513 str = talloc_asprintf_append(str,
1514 _("cannot repeat any of your previous %d "
1515 "passwords; "),
1516 i->password_history);
1517 if (!str) {
1518 goto failed;
1519 }
1520 }
1521
1522 if (i->password_properties & WBC_DOMAIN_PASSWORD_COMPLEX) {
1523 str = talloc_asprintf_append(str,
1524 _("must contain capitals, numerals "
1525 "or punctuation; "
1526 "and cannot contain your account "
1527 "or full name; "));
1528 if (!str) {
1529 goto failed;
1530 }
1531 }
1532
1533 str = talloc_asprintf_append(str,
1534 _("Please type a different password. "
1535 "Type a password which meets these requirements in "
1536 "both text boxes."));
1537 if (!str) {
1538 goto failed;
1539 }
1540
1541 return str;
1542
1543 failed:
1544 TALLOC_FREE(str);
1545 return NULL;
1546}
1547
1548static int _pam_create_homedir(struct pwb_context *ctx,
1549 const char *dirname,
1550 mode_t mode)
1551{
1552 struct stat sbuf;
1553
1554 if (stat(dirname, &sbuf) == 0) {
1555 return PAM_SUCCESS;
1556 }
1557
1558 if (mkdir(dirname, mode) != 0) {
1559
1560 _make_remark_format(ctx, PAM_TEXT_INFO,
1561 _("Creating directory: %s failed: %s"),
1562 dirname, strerror(errno));
1563 _pam_log(ctx, LOG_ERR, "could not create dir: %s (%s)",
1564 dirname, strerror(errno));
1565 return PAM_PERM_DENIED;
1566 }
1567
1568 return PAM_SUCCESS;
1569}
1570
1571static int _pam_chown_homedir(struct pwb_context *ctx,
1572 const char *dirname,
1573 uid_t uid,
1574 gid_t gid)
1575{
1576 if (chown(dirname, uid, gid) != 0) {
1577 _pam_log(ctx, LOG_ERR, "failed to chown user homedir: %s (%s)",
1578 dirname, strerror(errno));
1579 return PAM_PERM_DENIED;
1580 }
1581
1582 return PAM_SUCCESS;
1583}
1584
1585static int _pam_mkhomedir(struct pwb_context *ctx)
1586{
1587 struct passwd *pwd = NULL;
1588 char *token = NULL;
1589 char *create_dir = NULL;
1590 char *user_dir = NULL;
1591 int ret;
1592 const char *username;
1593 mode_t mode = 0700;
1594 char *safe_ptr = NULL;
1595 char *p = NULL;
1596
1597 /* Get the username */
1598 ret = pam_get_user(ctx->pamh, &username, NULL);
1599 if ((ret != PAM_SUCCESS) || (!username)) {
1600 _pam_log_debug(ctx, LOG_DEBUG, "can not get the username");
1601 return PAM_SERVICE_ERR;
1602 }
1603
1604 pwd = getpwnam(username);
1605 if (pwd == NULL) {
1606 _pam_log_debug(ctx, LOG_DEBUG, "can not get the username");
1607 return PAM_USER_UNKNOWN;
1608 }
1609 _pam_log_debug(ctx, LOG_DEBUG, "homedir is: %s", pwd->pw_dir);
1610
1611 ret = _pam_create_homedir(ctx, pwd->pw_dir, 0700);
1612 if (ret == PAM_SUCCESS) {
1613 ret = _pam_chown_homedir(ctx, pwd->pw_dir,
1614 pwd->pw_uid,
1615 pwd->pw_gid);
1616 }
1617
1618 if (ret == PAM_SUCCESS) {
1619 return ret;
1620 }
1621
1622 /* maybe we need to create parent dirs */
1623 create_dir = talloc_strdup(ctx, "/");
1624 if (!create_dir) {
1625 return PAM_BUF_ERR;
1626 }
1627
1628 /* find final directory */
1629 user_dir = strrchr(pwd->pw_dir, '/');
1630 if (!user_dir) {
1631 return PAM_BUF_ERR;
1632 }
1633 user_dir++;
1634
1635 _pam_log(ctx, LOG_DEBUG, "final directory: %s", user_dir);
1636
1637 p = pwd->pw_dir;
1638
1639 while ((token = strtok_r(p, "/", &safe_ptr)) != NULL) {
1640
1641 mode = 0755;
1642
1643 p = NULL;
1644
1645 _pam_log_debug(ctx, LOG_DEBUG, "token is %s", token);
1646
1647 create_dir = talloc_asprintf_append(create_dir, "%s/", token);
1648 if (!create_dir) {
1649 return PAM_BUF_ERR;
1650 }
1651 _pam_log_debug(ctx, LOG_DEBUG, "current_dir is %s", create_dir);
1652
1653 if (strcmp(token, user_dir) == 0) {
1654 _pam_log_debug(ctx, LOG_DEBUG, "assuming last directory: %s", token);
1655 mode = 0700;
1656 }
1657
1658 ret = _pam_create_homedir(ctx, create_dir, mode);
1659 if (ret != PAM_SUCCESS) {
1660 return ret;
1661 }
1662 }
1663
1664 return _pam_chown_homedir(ctx, create_dir,
1665 pwd->pw_uid,
1666 pwd->pw_gid);
1667}
1668
1669/* talk to winbindd */
1670static int winbind_auth_request(struct pwb_context *ctx,
1671 const char *user,
1672 const char *pass,
1673 const char *member,
1674 const char *cctype,
1675 const int warn_pwd_expire,
1676 struct wbcAuthErrorInfo **p_error,
1677 struct wbcLogonUserInfo **p_info,
1678 struct wbcUserPasswordPolicyInfo **p_policy,
1679 time_t *pwd_last_set,
1680 char **user_ret)
1681{
1682 wbcErr wbc_status;
1683
1684 struct wbcLogonUserParams logon;
1685 char membership_of[1024];
1686 uid_t user_uid = -1;
1687 uint32_t flags = WBFLAG_PAM_INFO3_TEXT |
1688 WBFLAG_PAM_GET_PWD_POLICY;
1689
1690 struct wbcLogonUserInfo *info = NULL;
1691 struct wbcAuthUserInfo *user_info = NULL;
1692 struct wbcAuthErrorInfo *error = NULL;
1693 struct wbcUserPasswordPolicyInfo *policy = NULL;
1694
1695 int ret = PAM_AUTH_ERR;
1696 int i;
1697 const char *codes[] = {
1698 "NT_STATUS_PASSWORD_EXPIRED",
1699 "NT_STATUS_PASSWORD_MUST_CHANGE",
1700 "NT_STATUS_INVALID_WORKSTATION",
1701 "NT_STATUS_INVALID_LOGON_HOURS",
1702 "NT_STATUS_ACCOUNT_EXPIRED",
1703 "NT_STATUS_ACCOUNT_DISABLED",
1704 "NT_STATUS_ACCOUNT_LOCKED_OUT",
1705 "NT_STATUS_NOLOGON_WORKSTATION_TRUST_ACCOUNT",
1706 "NT_STATUS_NOLOGON_SERVER_TRUST_ACCOUNT",
1707 "NT_STATUS_NOLOGON_INTERDOMAIN_TRUST_ACCOUNT",
1708 "NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND",
1709 "NT_STATUS_NO_LOGON_SERVERS",
1710 "NT_STATUS_WRONG_PASSWORD",
1711 "NT_STATUS_ACCESS_DENIED"
1712 };
1713
1714 if (pwd_last_set) {
1715 *pwd_last_set = 0;
1716 }
1717
1718 /* Krb5 auth always has to go against the KDC of the user's realm */
1719
1720 if (ctx->ctrl & WINBIND_KRB5_AUTH) {
1721 flags |= WBFLAG_PAM_CONTACT_TRUSTDOM;
1722 }
1723
1724 if (ctx->ctrl & (WINBIND_KRB5_AUTH|WINBIND_CACHED_LOGIN)) {
1725 struct passwd *pwd = NULL;
1726
1727 pwd = getpwnam(user);
1728 if (pwd == NULL) {
1729 return PAM_USER_UNKNOWN;
1730 }
1731 user_uid = pwd->pw_uid;
1732 }
1733
1734 if (ctx->ctrl & WINBIND_KRB5_AUTH) {
1735
1736 _pam_log_debug(ctx, LOG_DEBUG,
1737 "enabling krb5 login flag\n");
1738
1739 flags |= WBFLAG_PAM_KRB5 |
1740 WBFLAG_PAM_FALLBACK_AFTER_KRB5;
1741 }
1742
1743 if (ctx->ctrl & WINBIND_CACHED_LOGIN) {
1744 _pam_log_debug(ctx, LOG_DEBUG,
1745 "enabling cached login flag\n");
1746 flags |= WBFLAG_PAM_CACHED_LOGIN;
1747 }
1748
1749 if (user_ret) {
1750 *user_ret = NULL;
1751 flags |= WBFLAG_PAM_UNIX_NAME;
1752 }
1753
1754 if (cctype != NULL) {
1755 _pam_log_debug(ctx, LOG_DEBUG,
1756 "enabling request for a %s krb5 ccache\n",
1757 cctype);
1758 }
1759
1760 if (member != NULL) {
1761
1762 ZERO_STRUCT(membership_of);
1763
1764 if (!winbind_name_list_to_sid_string_list(ctx, user, member,
1765 membership_of,
1766 sizeof(membership_of))) {
1767 _pam_log_debug(ctx, LOG_ERR,
1768 "failed to serialize membership of sid "
1769 "\"%s\"\n", member);
1770 return PAM_AUTH_ERR;
1771 }
1772 }
1773
1774 ZERO_STRUCT(logon);
1775
1776 logon.username = user;
1777 logon.password = pass;
1778
1779 if (cctype) {
1780 wbc_status = wbcAddNamedBlob(&logon.num_blobs,
1781 &logon.blobs,
1782 "krb5_cc_type",
1783 0,
1784 discard_const_p(uint8_t, cctype),
1785 strlen(cctype)+1);
1786 if (!WBC_ERROR_IS_OK(wbc_status)) {
1787 goto done;
1788 }
1789 }
1790
1791 wbc_status = wbcAddNamedBlob(&logon.num_blobs,
1792 &logon.blobs,
1793 "flags",
1794 0,
1795 (uint8_t *)&flags,
1796 sizeof(flags));
1797 if (!WBC_ERROR_IS_OK(wbc_status)) {
1798 goto done;
1799 }
1800
1801 wbc_status = wbcAddNamedBlob(&logon.num_blobs,
1802 &logon.blobs,
1803 "user_uid",
1804 0,
1805 (uint8_t *)&user_uid,
1806 sizeof(user_uid));
1807 if (!WBC_ERROR_IS_OK(wbc_status)) {
1808 goto done;
1809 }
1810
1811 if (member) {
1812 wbc_status = wbcAddNamedBlob(&logon.num_blobs,
1813 &logon.blobs,
1814 "membership_of",
1815 0,
1816 (uint8_t *)membership_of,
1817 sizeof(membership_of));
1818 if (!WBC_ERROR_IS_OK(wbc_status)) {
1819 goto done;
1820 }
1821 }
1822
1823 wbc_status = wbcLogonUser(&logon, &info, &error, &policy);
1824 ret = wbc_auth_error_to_pam_error(ctx, error, wbc_status,
1825 user, "wbcLogonUser");
1826 wbcFreeMemory(logon.blobs);
1827 logon.blobs = NULL;
1828
1829 if (info && info->info) {
1830 user_info = info->info;
1831 }
1832
1833 if (pwd_last_set && user_info) {
1834 *pwd_last_set = user_info->pass_last_set_time;
1835 }
1836
1837 if (p_info && info) {
1838 *p_info = info;
1839 }
1840
1841 if (p_policy && policy) {
1842 *p_policy = policy;
1843 }
1844
1845 if (p_error && error) {
1846 /* We want to process the error in the caller. */
1847 *p_error = error;
1848 return ret;
1849 }
1850
1851 for (i=0; i<ARRAY_SIZE(codes); i++) {
1852 int _ret = ret;
1853 if (_pam_check_remark_auth_err(ctx, error, codes[i], &_ret)) {
1854 ret = _ret;
1855 goto done;
1856 }
1857 }
1858
1859 if ((ret == PAM_SUCCESS) && user_info && policy && info) {
1860
1861 bool already_expired = false;
1862 bool change_pwd = false;
1863
1864 /* warn a user if the password is about to expire soon */
1865 _pam_warn_password_expiry(ctx, user_info, policy,
1866 warn_pwd_expire,
1867 &already_expired,
1868 &change_pwd);
1869
1870 if (already_expired == true) {
1871
1872 SMB_TIME_T last_set = user_info->pass_last_set_time;
1873
1874 _pam_log_debug(ctx, LOG_DEBUG,
1875 "Password has expired "
1876 "(Password was last set: %lld, "
1877 "the policy says it should expire here "
1878 "%lld (now it's: %ld))\n",
1879 (long long int)last_set,
1880 (long long int)last_set +
1881 policy->expire,
1882 (long)time(NULL));
1883
1884 return PAM_AUTHTOK_EXPIRED;
1885 }
1886
1887 if (change_pwd) {
1888 ret = PAM_NEW_AUTHTOK_REQD;
1889 goto done;
1890 }
1891
1892 /* inform about logon type */
1893 _pam_warn_logon_type(ctx, user, user_info->user_flags);
1894
1895 /* inform about krb5 failures */
1896 _pam_warn_krb5_failure(ctx, user, user_info->user_flags);
1897
1898 /* set some info3 info for other modules in the stack */
1899 _pam_set_data_info3(ctx, user_info);
1900
1901 /* put krb5ccname into env */
1902 _pam_setup_krb5_env(ctx, info);
1903
1904 /* If winbindd returned a username, return the pointer to it
1905 * here. */
1906 _pam_setup_unix_username(ctx, user_ret, info);
1907 }
1908
1909 done:
1910 wbcFreeMemory(logon.blobs);
1911 if (info && info->blobs && !p_info) {
1912 wbcFreeMemory(info->blobs);
1913 }
1914 if (error && !p_error) {
1915 wbcFreeMemory(error);
1916 }
1917 if (info && !p_info) {
1918 wbcFreeMemory(info);
1919 }
1920 if (policy && !p_policy) {
1921 wbcFreeMemory(policy);
1922 }
1923
1924 return ret;
1925}
1926
1927/* talk to winbindd */
1928static int winbind_chauthtok_request(struct pwb_context *ctx,
1929 const char *user,
1930 const char *oldpass,
1931 const char *newpass,
1932 time_t pwd_last_set)
1933{
1934 wbcErr wbc_status;
1935 struct wbcChangePasswordParams params;
1936 struct wbcAuthErrorInfo *error = NULL;
1937 struct wbcUserPasswordPolicyInfo *policy = NULL;
1938 enum wbcPasswordChangeRejectReason reject_reason = -1;
1939 uint32_t flags = 0;
1940
1941 int i;
1942 const char *codes[] = {
1943 "NT_STATUS_BACKUP_CONTROLLER",
1944 "NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND",
1945 "NT_STATUS_NO_LOGON_SERVERS",
1946 "NT_STATUS_ACCESS_DENIED",
1947 "NT_STATUS_PWD_TOO_SHORT", /* TODO: tell the min pwd length ? */
1948 "NT_STATUS_PWD_TOO_RECENT", /* TODO: tell the minage ? */
1949 "NT_STATUS_PWD_HISTORY_CONFLICT" /* TODO: tell the history length ? */
1950 };
1951 int ret = PAM_AUTH_ERR;
1952
1953 ZERO_STRUCT(params);
1954
1955 if (ctx->ctrl & WINBIND_KRB5_AUTH) {
1956 flags |= WBFLAG_PAM_KRB5 |
1957 WBFLAG_PAM_CONTACT_TRUSTDOM;
1958 }
1959
1960 if (ctx->ctrl & WINBIND_CACHED_LOGIN) {
1961 flags |= WBFLAG_PAM_CACHED_LOGIN;
1962 }
1963
1964 params.account_name = user;
1965 params.level = WBC_CHANGE_PASSWORD_LEVEL_PLAIN;
1966 params.old_password.plaintext = oldpass;
1967 params.new_password.plaintext = newpass;
1968 params.flags = flags;
1969
1970 wbc_status = wbcChangeUserPasswordEx(&params, &error, &reject_reason, &policy);
1971 ret = wbc_auth_error_to_pam_error(ctx, error, wbc_status,
1972 user, "wbcChangeUserPasswordEx");
1973
1974 if (WBC_ERROR_IS_OK(wbc_status)) {
1975 _pam_log(ctx, LOG_NOTICE,
1976 "user '%s' password changed", user);
1977 return PAM_SUCCESS;
1978 }
1979
1980 if (!error) {
1981 wbcFreeMemory(policy);
1982 return ret;
1983 }
1984
1985 for (i=0; i<ARRAY_SIZE(codes); i++) {
1986 int _ret = ret;
1987 if (_pam_check_remark_auth_err(ctx, error, codes[i], &_ret)) {
1988 ret = _ret;
1989 goto done;
1990 }
1991 }
1992
1993 if (!strcasecmp(error->nt_string,
1994 "NT_STATUS_PASSWORD_RESTRICTION")) {
1995
1996 char *pwd_restriction_string = NULL;
1997 SMB_TIME_T min_pwd_age = 0;
1998
1999 if (policy) {
2000 min_pwd_age = policy->min_passwordage;
2001 }
2002
2003 /* FIXME: avoid to send multiple PAM messages after another */
2004 switch ((int)reject_reason) {
2005 case -1:
2006 break;
2007 case WBC_PWD_CHANGE_NO_ERROR:
2008 if ((min_pwd_age > 0) &&
2009 (pwd_last_set + min_pwd_age > time(NULL))) {
2010 PAM_WB_REMARK_DIRECT(ctx,
2011 "NT_STATUS_PWD_TOO_RECENT");
2012 }
2013 break;
2014 case WBC_PWD_CHANGE_PASSWORD_TOO_SHORT:
2015 PAM_WB_REMARK_DIRECT(ctx,
2016 "NT_STATUS_PWD_TOO_SHORT");
2017 break;
2018 case WBC_PWD_CHANGE_PWD_IN_HISTORY:
2019 PAM_WB_REMARK_DIRECT(ctx,
2020 "NT_STATUS_PWD_HISTORY_CONFLICT");
2021 break;
2022 case WBC_PWD_CHANGE_NOT_COMPLEX:
2023 _make_remark(ctx, PAM_ERROR_MSG,
2024 _("Password does not meet "
2025 "complexity requirements"));
2026 break;
2027 default:
2028 _pam_log_debug(ctx, LOG_DEBUG,
2029 "unknown password change "
2030 "reject reason: %d",
2031 reject_reason);
2032 break;
2033 }
2034
2035 pwd_restriction_string =
2036 _pam_compose_pwd_restriction_string(ctx, policy);
2037 if (pwd_restriction_string) {
2038 _make_remark(ctx, PAM_ERROR_MSG,
2039 pwd_restriction_string);
2040 TALLOC_FREE(pwd_restriction_string);
2041 }
2042 }
2043 done:
2044 wbcFreeMemory(error);
2045 wbcFreeMemory(policy);
2046
2047 return ret;
2048}
2049
2050/*
2051 * Checks if a user has an account
2052 *
2053 * return values:
2054 * 1 = User not found
2055 * 0 = OK
2056 * -1 = System error
2057 */
2058static int valid_user(struct pwb_context *ctx,
2059 const char *user)
2060{
2061 /* check not only if the user is available over NSS calls, also make
2062 * sure it's really a winbind user, this is important when stacking PAM
2063 * modules in the 'account' or 'password' facility. */
2064
2065 wbcErr wbc_status;
2066 struct passwd *pwd = NULL;
2067 struct passwd *wb_pwd = NULL;
2068
2069 pwd = getpwnam(user);
2070 if (pwd == NULL) {
2071 return 1;
2072 }
2073
2074 wbc_status = wbcGetpwnam(user, &wb_pwd);
2075 wbcFreeMemory(wb_pwd);
2076 if (!WBC_ERROR_IS_OK(wbc_status)) {
2077 _pam_log(ctx, LOG_DEBUG, "valid_user: wbcGetpwnam gave %s\n",
2078 wbcErrorString(wbc_status));
2079 }
2080
2081 switch (wbc_status) {
2082 case WBC_ERR_UNKNOWN_USER:
2083 /* match other insane libwbclient return codes */
2084 case WBC_ERR_WINBIND_NOT_AVAILABLE:
2085 case WBC_ERR_DOMAIN_NOT_FOUND:
2086 return 1;
2087 case WBC_ERR_SUCCESS:
2088 return 0;
2089 default:
2090 break;
2091 }
2092 return -1;
2093}
2094
2095static char *_pam_delete(register char *xx)
2096{
2097 _pam_overwrite(xx);
2098 _pam_drop(xx);
2099 return NULL;
2100}
2101
2102/*
2103 * obtain a password from the user
2104 */
2105
2106static int _winbind_read_password(struct pwb_context *ctx,
2107 unsigned int ctrl,
2108 const char *comment,
2109 const char *prompt1,
2110 const char *prompt2,
2111 const char **pass)
2112{
2113 int authtok_flag;
2114 int retval;
2115 const char *item;
2116 char *token;
2117
2118 _pam_log(ctx, LOG_DEBUG, "getting password (0x%08x)", ctrl);
2119
2120 /*
2121 * make sure nothing inappropriate gets returned
2122 */
2123
2124 *pass = token = NULL;
2125
2126 /*
2127 * which authentication token are we getting?
2128 */
2129
2130 if (on(WINBIND__OLD_PASSWORD, ctrl)) {
2131 authtok_flag = PAM_OLDAUTHTOK;
2132 } else {
2133 authtok_flag = PAM_AUTHTOK;
2134 }
2135
2136 /*
2137 * should we obtain the password from a PAM item ?
2138 */
2139
2140 if (on(WINBIND_TRY_FIRST_PASS_ARG, ctrl) ||
2141 on(WINBIND_USE_FIRST_PASS_ARG, ctrl)) {
2142 retval = pam_get_item(ctx->pamh,
2143 authtok_flag,
2144 (const void **) &item);
2145 if (retval != PAM_SUCCESS) {
2146 /* very strange. */
2147 _pam_log(ctx, LOG_ALERT,
2148 "pam_get_item returned error "
2149 "to unix-read-password");
2150 return retval;
2151 } else if (item != NULL) { /* we have a password! */
2152 *pass = item;
2153 item = NULL;
2154 _pam_log(ctx, LOG_DEBUG,
2155 "pam_get_item returned a password");
2156 return PAM_SUCCESS;
2157 } else if (on(WINBIND_USE_FIRST_PASS_ARG, ctrl)) {
2158 return PAM_AUTHTOK_RECOVER_ERR; /* didn't work */
2159 } else if (on(WINBIND_USE_AUTHTOK_ARG, ctrl)
2160 && off(WINBIND__OLD_PASSWORD, ctrl)) {
2161 return PAM_AUTHTOK_RECOVER_ERR;
2162 }
2163 }
2164 /*
2165 * getting here implies we will have to get the password from the
2166 * user directly.
2167 */
2168
2169 {
2170 struct pam_message msg[3], *pmsg[3];
2171 struct pam_response *resp;
2172 int i, replies;
2173
2174 /* prepare to converse */
2175
2176 if (comment != NULL && off(ctrl, WINBIND_SILENT)) {
2177 pmsg[0] = &msg[0];
2178 msg[0].msg_style = PAM_TEXT_INFO;
2179 msg[0].msg = discard_const_p(char, comment);
2180 i = 1;
2181 } else {
2182 i = 0;
2183 }
2184
2185 pmsg[i] = &msg[i];
2186 msg[i].msg_style = PAM_PROMPT_ECHO_OFF;
2187 msg[i++].msg = discard_const_p(char, prompt1);
2188 replies = 1;
2189
2190 if (prompt2 != NULL) {
2191 pmsg[i] = &msg[i];
2192 msg[i].msg_style = PAM_PROMPT_ECHO_OFF;
2193 msg[i++].msg = discard_const_p(char, prompt2);
2194 ++replies;
2195 }
2196 /* so call the conversation expecting i responses */
2197 resp = NULL;
2198 retval = converse(ctx->pamh, i, pmsg, &resp);
2199 if (resp == NULL) {
2200 if (retval == PAM_SUCCESS) {
2201 retval = PAM_AUTHTOK_RECOVER_ERR;
2202 }
2203 goto done;
2204 }
2205 if (retval != PAM_SUCCESS) {
2206 _pam_drop_reply(resp, i);
2207 goto done;
2208 }
2209
2210 /* interpret the response */
2211
2212 token = x_strdup(resp[i - replies].resp);
2213 if (!token) {
2214 _pam_log(ctx, LOG_NOTICE,
2215 "could not recover "
2216 "authentication token");
2217 retval = PAM_AUTHTOK_RECOVER_ERR;
2218 goto done;
2219 }
2220
2221 if (replies == 2) {
2222 /* verify that password entered correctly */
2223 if (!resp[i - 1].resp ||
2224 strcmp(token, resp[i - 1].resp)) {
2225 _pam_delete(token); /* mistyped */
2226 retval = PAM_AUTHTOK_RECOVER_ERR;
2227 _make_remark(ctx, PAM_ERROR_MSG,
2228 MISTYPED_PASS);
2229 }
2230 }
2231
2232 /*
2233 * tidy up the conversation (resp_retcode) is ignored
2234 * -- what is it for anyway? AGM
2235 */
2236 _pam_drop_reply(resp, i);
2237 }
2238
2239 done:
2240 if (retval != PAM_SUCCESS) {
2241 _pam_log_debug(ctx, LOG_DEBUG,
2242 "unable to obtain a password");
2243 return retval;
2244 }
2245 /* 'token' is the entered password */
2246
2247 /* we store this password as an item */
2248
2249 retval = pam_set_item(ctx->pamh, authtok_flag, token);
2250 _pam_delete(token); /* clean it up */
2251 if (retval != PAM_SUCCESS ||
2252 (retval = pam_get_item(ctx->pamh, authtok_flag, (const void **) &item)) != PAM_SUCCESS) {
2253
2254 _pam_log(ctx, LOG_CRIT, "error manipulating password");
2255 return retval;
2256
2257 }
2258
2259 *pass = item;
2260 item = NULL; /* break link to password */
2261
2262 return PAM_SUCCESS;
2263}
2264
2265static const char *get_conf_item_string(struct pwb_context *ctx,
2266 const char *item,
2267 int config_flag)
2268{
2269 int i = 0;
2270 const char *parm_opt = NULL;
2271
2272 if (!(ctx->ctrl & config_flag)) {
2273 goto out;
2274 }
2275
2276 /* let the pam opt take precedence over the pam_winbind.conf option */
2277 for (i=0; i<ctx->argc; i++) {
2278
2279 if ((strncmp(ctx->argv[i], item, strlen(item)) == 0)) {
2280 char *p;
2281
2282 if ((p = strchr(ctx->argv[i], '=')) == NULL) {
2283 _pam_log(ctx, LOG_INFO,
2284 "no \"=\" delimiter for \"%s\" found\n",
2285 item);
2286 goto out;
2287 }
2288 _pam_log_debug(ctx, LOG_INFO,
2289 "PAM config: %s '%s'\n", item, p+1);
2290 return p + 1;
2291 }
2292 }
2293
2294 if (ctx->dict) {
2295 char *key = NULL;
2296
2297 key = talloc_asprintf(ctx, "global:%s", item);
2298 if (!key) {
2299 goto out;
2300 }
2301
2302 parm_opt = tiniparser_getstring_nonempty(ctx->dict, key, NULL);
2303 TALLOC_FREE(key);
2304
2305 _pam_log_debug(ctx, LOG_INFO, "CONFIG file: %s '%s'\n",
2306 item, parm_opt);
2307 }
2308out:
2309 return parm_opt;
2310}
2311
2312static int get_config_item_int(struct pwb_context *ctx,
2313 const char *item,
2314 int config_flag)
2315{
2316 int i, parm_opt = -1;
2317
2318 if (!(ctx->ctrl & config_flag)) {
2319 goto out;
2320 }
2321
2322 /* let the pam opt take precedence over the pam_winbind.conf option */
2323 for (i = 0; i < ctx->argc; i++) {
2324
2325 if ((strncmp(ctx->argv[i], item, strlen(item)) == 0)) {
2326 char *p;
2327
2328 if ((p = strchr(ctx->argv[i], '=')) == NULL) {
2329 _pam_log(ctx, LOG_INFO,
2330 "no \"=\" delimiter for \"%s\" found\n",
2331 item);
2332 goto out;
2333 }
2334 parm_opt = atoi(p + 1);
2335 _pam_log_debug(ctx, LOG_INFO,
2336 "PAM config: %s '%d'\n",
2337 item, parm_opt);
2338 return parm_opt;
2339 }
2340 }
2341
2342 if (ctx->dict) {
2343 char *key = NULL;
2344
2345 key = talloc_asprintf(ctx, "global:%s", item);
2346 if (!key) {
2347 goto out;
2348 }
2349
2350 parm_opt = tiniparser_getint(ctx->dict, key, -1);
2351 TALLOC_FREE(key);
2352
2353 _pam_log_debug(ctx, LOG_INFO,
2354 "CONFIG file: %s '%d'\n",
2355 item, parm_opt);
2356 }
2357out:
2358 return parm_opt;
2359}
2360
2361static const char *get_krb5_cc_type_from_config(struct pwb_context *ctx)
2362{
2363 return get_conf_item_string(ctx, "krb5_ccache_type",
2364 WINBIND_KRB5_CCACHE_TYPE);
2365}
2366
2367static const char *get_member_from_config(struct pwb_context *ctx)
2368{
2369 const char *ret = NULL;
2370 ret = get_conf_item_string(ctx, "require_membership_of",
2371 WINBIND_REQUIRED_MEMBERSHIP);
2372 if (ret != NULL) {
2373 return ret;
2374 }
2375 return get_conf_item_string(ctx, "require-membership-of",
2376 WINBIND_REQUIRED_MEMBERSHIP);
2377}
2378
2379static int get_warn_pwd_expire_from_config(struct pwb_context *ctx)
2380{
2381 int ret;
2382 ret = get_config_item_int(ctx, "warn_pwd_expire",
2383 WINBIND_WARN_PWD_EXPIRE);
2384 /* no or broken setting */
2385 if (ret < 0) {
2386 return DEFAULT_DAYS_TO_WARN_BEFORE_PWD_EXPIRES;
2387 }
2388 return ret;
2389}
2390
2391/**
2392 * Retrieve the winbind separator.
2393 *
2394 * @param ctx PAM winbind context.
2395 *
2396 * @return string separator character. NULL on failure.
2397 */
2398
2399static char winbind_get_separator(struct pwb_context *ctx)
2400{
2401 wbcErr wbc_status;
2402 static struct wbcInterfaceDetails *details = NULL;
2403
2404 wbc_status = wbcInterfaceDetails(&details);
2405 if (!WBC_ERROR_IS_OK(wbc_status)) {
2406 _pam_log(ctx, LOG_ERR,
2407 "Could not retrieve winbind interface details: %s",
2408 wbcErrorString(wbc_status));
2409 return '\0';
2410 }
2411
2412 if (!details) {
2413 return '\0';
2414 }
2415
2416 return details->winbind_separator;
2417}
2418
2419
2420/**
2421 * Convert a upn to a name.
2422 *
2423 * @param ctx PAM winbind context.
2424 * @param upn User UPN to be translated.
2425 *
2426 * @return converted name. NULL pointer on failure. Caller needs to free.
2427 */
2428
2429static char* winbind_upn_to_username(struct pwb_context *ctx,
2430 const char *upn)
2431{
2432 char sep;
2433 wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
2434 struct wbcDomainSid sid;
2435 enum wbcSidType type;
2436 char *domain = NULL;
2437 char *name;
2438 char *p;
2439 char *result;
2440
2441 /* This cannot work when the winbind separator = @ */
2442
2443 sep = winbind_get_separator(ctx);
2444 if (!sep || sep == '@') {
2445 return NULL;
2446 }
2447
2448 name = talloc_strdup(ctx, upn);
2449 if (!name) {
2450 return NULL;
2451 }
2452 if ((p = strchr(name, '@')) != NULL) {
2453 *p = 0;
2454 domain = p + 1;
2455 }
2456
2457 /* Convert the UPN to a SID */
2458
2459 wbc_status = wbcLookupName(domain, name, &sid, &type);
2460 if (!WBC_ERROR_IS_OK(wbc_status)) {
2461 return NULL;
2462 }
2463
2464 /* Convert the the SID back to the sAMAccountName */
2465
2466 wbc_status = wbcLookupSid(&sid, &domain, &name, &type);
2467 if (!WBC_ERROR_IS_OK(wbc_status)) {
2468 return NULL;
2469 }
2470
2471 result = talloc_asprintf(ctx, "%s%c%s", domain, sep, name);
2472 wbcFreeMemory(domain);
2473 wbcFreeMemory(name);
2474 return result;
2475}
2476
2477static int _pam_delete_cred(pam_handle_t *pamh, int flags,
2478 int argc, enum pam_winbind_request_type type,
2479 const char **argv)
2480{
2481 int retval = PAM_SUCCESS;
2482 struct pwb_context *ctx = NULL;
2483 struct wbcLogoffUserParams logoff;
2484 struct wbcAuthErrorInfo *error = NULL;
2485 const char *user;
2486 wbcErr wbc_status = WBC_ERR_SUCCESS;
2487
2488 ZERO_STRUCT(logoff);
2489
2490 retval = _pam_winbind_init_context(pamh, flags, argc, argv, type, &ctx);
2491 if (retval != PAM_SUCCESS) {
2492 return retval;
2493 }
2494
2495 _PAM_LOG_FUNCTION_ENTER("_pam_delete_cred", ctx);
2496
2497 if (ctx->ctrl & WINBIND_KRB5_AUTH) {
2498
2499 /* destroy the ccache here */
2500
2501 uint32_t wbc_flags = 0;
2502 const char *ccname = NULL;
2503 struct passwd *pwd = NULL;
2504
2505 retval = pam_get_user(pamh, &user, _("Username: "));
2506 if (retval != PAM_SUCCESS) {
2507 _pam_log(ctx, LOG_ERR,
2508 "could not identify user");
2509 goto out;
2510 }
2511
2512 if (user == NULL) {
2513 _pam_log(ctx, LOG_ERR,
2514 "username was NULL!");
2515 retval = PAM_USER_UNKNOWN;
2516 goto out;
2517 }
2518
2519 _pam_log_debug(ctx, LOG_DEBUG,
2520 "username [%s] obtained", user);
2521
2522 ccname = pam_getenv(pamh, "KRB5CCNAME");
2523 if (ccname == NULL) {
2524 _pam_log_debug(ctx, LOG_DEBUG,
2525 "user has no KRB5CCNAME environment");
2526 }
2527
2528 pwd = getpwnam(user);
2529 if (pwd == NULL) {
2530 retval = PAM_USER_UNKNOWN;
2531 goto out;
2532 }
2533
2534 wbc_flags = WBFLAG_PAM_KRB5 |
2535 WBFLAG_PAM_CONTACT_TRUSTDOM;
2536
2537 logoff.username = user;
2538
2539 if (ccname) {
2540 wbc_status = wbcAddNamedBlob(&logoff.num_blobs,
2541 &logoff.blobs,
2542 "ccfilename",
2543 0,
2544 discard_const_p(uint8_t, ccname),
2545 strlen(ccname)+1);
2546 if (!WBC_ERROR_IS_OK(wbc_status)) {
2547 goto out;
2548 }
2549 }
2550
2551 wbc_status = wbcAddNamedBlob(&logoff.num_blobs,
2552 &logoff.blobs,
2553 "flags",
2554 0,
2555 (uint8_t *)&wbc_flags,
2556 sizeof(wbc_flags));
2557 if (!WBC_ERROR_IS_OK(wbc_status)) {
2558 goto out;
2559 }
2560
2561 wbc_status = wbcAddNamedBlob(&logoff.num_blobs,
2562 &logoff.blobs,
2563 "user_uid",
2564 0,
2565 (uint8_t *)&pwd->pw_uid,
2566 sizeof(pwd->pw_uid));
2567 if (!WBC_ERROR_IS_OK(wbc_status)) {
2568 goto out;
2569 }
2570
2571 wbc_status = wbcLogoffUserEx(&logoff, &error);
2572 retval = wbc_auth_error_to_pam_error(ctx, error, wbc_status,
2573 user, "wbcLogoffUser");
2574 wbcFreeMemory(error);
2575 wbcFreeMemory(logoff.blobs);
2576 logoff.blobs = NULL;
2577
2578 if (!WBC_ERROR_IS_OK(wbc_status)) {
2579 _pam_log(ctx, LOG_INFO,
2580 "failed to logoff user %s: %s\n",
2581 user, wbcErrorString(wbc_status));
2582 }
2583 }
2584
2585out:
2586 if (logoff.blobs) {
2587 wbcFreeMemory(logoff.blobs);
2588 }
2589
2590 if (!WBC_ERROR_IS_OK(wbc_status)) {
2591 retval = wbc_auth_error_to_pam_error(ctx, error, wbc_status,
2592 user, "wbcLogoffUser");
2593 }
2594
2595 /*
2596 * Delete the krb5 ccname variable from the PAM environment
2597 * if it was set by winbind.
2598 */
2599 if ((ctx->ctrl & WINBIND_KRB5_AUTH) && pam_getenv(pamh, "KRB5CCNAME")) {
2600 pam_putenv(pamh, "KRB5CCNAME");
2601 }
2602
2603 _PAM_LOG_FUNCTION_LEAVE("_pam_delete_cred", ctx, retval);
2604
2605 TALLOC_FREE(ctx);
2606
2607 return retval;
2608}
2609
2610PAM_EXTERN
2611int pam_sm_authenticate(pam_handle_t *pamh, int flags,
2612 int argc, const char **argv)
2613{
2614 const char *username;
2615 const char *password;
2616 const char *member = NULL;
2617 const char *cctype = NULL;
2618 int warn_pwd_expire;
2619 int retval = PAM_AUTH_ERR;
2620 char *username_ret = NULL;
2621 char *new_authtok_required = NULL;
2622 char *real_username = NULL;
2623 struct pwb_context *ctx = NULL;
2624
2625 retval = _pam_winbind_init_context(pamh, flags, argc, argv,
2626 PAM_WINBIND_AUTHENTICATE, &ctx);
2627 if (retval != PAM_SUCCESS) {
2628 return retval;
2629 }
2630
2631 _PAM_LOG_FUNCTION_ENTER("pam_sm_authenticate", ctx);
2632
2633 /* Get the username */
2634 retval = pam_get_user(pamh, &username, NULL);
2635 if ((retval != PAM_SUCCESS) || (!username)) {
2636 _pam_log_debug(ctx, LOG_DEBUG,
2637 "can not get the username");
2638 retval = PAM_SERVICE_ERR;
2639 goto out;
2640 }
2641
2642
2643#if defined(AIX)
2644 /* Decode the user name since AIX does not support logn user
2645 names by default. The name is encoded as _#uid. */
2646
2647 if (username[0] == '_') {
2648 uid_t id = atoi(&username[1]);
2649 struct passwd *pw = NULL;
2650
2651 if ((id!=0) && ((pw = getpwuid(id)) != NULL)) {
2652 real_username = strdup(pw->pw_name);
2653 }
2654 }
2655#endif
2656
2657 if (!real_username) {
2658 /* Just making a copy of the username we got from PAM */
2659 if ((real_username = strdup(username)) == NULL) {
2660 _pam_log_debug(ctx, LOG_DEBUG,
2661 "memory allocation failure when copying "
2662 "username");
2663 retval = PAM_SERVICE_ERR;
2664 goto out;
2665 }
2666 }
2667
2668 /* Maybe this was a UPN */
2669
2670 if (strchr(real_username, '@') != NULL) {
2671 char *samaccountname = NULL;
2672
2673 samaccountname = winbind_upn_to_username(ctx,
2674 real_username);
2675 if (samaccountname) {
2676 free(real_username);
2677 real_username = strdup(samaccountname);
2678 }
2679 }
2680
2681 retval = _winbind_read_password(ctx, ctx->ctrl, NULL,
2682 _("Password: "), NULL,
2683 &password);
2684
2685 if (retval != PAM_SUCCESS) {
2686 _pam_log(ctx, LOG_ERR,
2687 "Could not retrieve user's password");
2688 retval = PAM_AUTHTOK_ERR;
2689 goto out;
2690 }
2691
2692 /* Let's not give too much away in the log file */
2693
2694#ifdef DEBUG_PASSWORD
2695 _pam_log_debug(ctx, LOG_INFO,
2696 "Verify user '%s' with password '%s'",
2697 real_username, password);
2698#else
2699 _pam_log_debug(ctx, LOG_INFO,
2700 "Verify user '%s'", real_username);
2701#endif
2702
2703 member = get_member_from_config(ctx);
2704 cctype = get_krb5_cc_type_from_config(ctx);
2705 warn_pwd_expire = get_warn_pwd_expire_from_config(ctx);
2706
2707 /* Now use the username to look up password */
2708 retval = winbind_auth_request(ctx, real_username, password,
2709 member, cctype, warn_pwd_expire,
2710 NULL, NULL, NULL,
2711 NULL, &username_ret);
2712
2713 if (retval == PAM_NEW_AUTHTOK_REQD ||
2714 retval == PAM_AUTHTOK_EXPIRED) {
2715
2716 char *new_authtok_required_during_auth = NULL;
2717
2718 new_authtok_required = talloc_asprintf(NULL, "%d", retval);
2719 if (!new_authtok_required) {
2720 retval = PAM_BUF_ERR;
2721 goto out;
2722 }
2723
2724 pam_set_data(pamh, PAM_WINBIND_NEW_AUTHTOK_REQD,
2725 new_authtok_required,
2726 _pam_winbind_cleanup_func);
2727
2728 retval = PAM_SUCCESS;
2729
2730 new_authtok_required_during_auth = talloc_asprintf(NULL, "%d", true);
2731 if (!new_authtok_required_during_auth) {
2732 retval = PAM_BUF_ERR;
2733 goto out;
2734 }
2735
2736 pam_set_data(pamh, PAM_WINBIND_NEW_AUTHTOK_REQD_DURING_AUTH,
2737 new_authtok_required_during_auth,
2738 _pam_winbind_cleanup_func);
2739
2740 goto out;
2741 }
2742
2743out:
2744 if (username_ret) {
2745 pam_set_item (pamh, PAM_USER, username_ret);
2746 _pam_log_debug(ctx, LOG_INFO,
2747 "Returned user was '%s'", username_ret);
2748 free(username_ret);
2749 }
2750
2751 if (real_username) {
2752 free(real_username);
2753 }
2754
2755 if (!new_authtok_required) {
2756 pam_set_data(pamh, PAM_WINBIND_NEW_AUTHTOK_REQD, NULL, NULL);
2757 }
2758
2759 if (retval != PAM_SUCCESS) {
2760 _pam_free_data_info3(pamh);
2761 }
2762
2763 _PAM_LOG_FUNCTION_LEAVE("pam_sm_authenticate", ctx, retval);
2764
2765 TALLOC_FREE(ctx);
2766
2767 return retval;
2768}
2769
2770PAM_EXTERN
2771int pam_sm_setcred(pam_handle_t *pamh, int flags,
2772 int argc, const char **argv)
2773{
2774 int ret = PAM_SYSTEM_ERR;
2775 struct pwb_context *ctx = NULL;
2776
2777 ret = _pam_winbind_init_context(pamh, flags, argc, argv,
2778 PAM_WINBIND_SETCRED, &ctx);
2779 if (ret != PAM_SUCCESS) {
2780 return ret;
2781 }
2782
2783 _PAM_LOG_FUNCTION_ENTER("pam_sm_setcred", ctx);
2784
2785 switch (flags & ~PAM_SILENT) {
2786
2787 case PAM_DELETE_CRED:
2788 ret = _pam_delete_cred(pamh, flags, argc,
2789 PAM_WINBIND_SETCRED, argv);
2790 break;
2791 case PAM_REFRESH_CRED:
2792 _pam_log_debug(ctx, LOG_WARNING,
2793 "PAM_REFRESH_CRED not implemented");
2794 ret = PAM_SUCCESS;
2795 break;
2796 case PAM_REINITIALIZE_CRED:
2797 _pam_log_debug(ctx, LOG_WARNING,
2798 "PAM_REINITIALIZE_CRED not implemented");
2799 ret = PAM_SUCCESS;
2800 break;
2801 case PAM_ESTABLISH_CRED:
2802 _pam_log_debug(ctx, LOG_WARNING,
2803 "PAM_ESTABLISH_CRED not implemented");
2804 ret = PAM_SUCCESS;
2805 break;
2806 default:
2807 ret = PAM_SYSTEM_ERR;
2808 break;
2809 }
2810
2811 _PAM_LOG_FUNCTION_LEAVE("pam_sm_setcred", ctx, ret);
2812
2813 TALLOC_FREE(ctx);
2814
2815 return ret;
2816}
2817
2818/*
2819 * Account management. We want to verify that the account exists
2820 * before returning PAM_SUCCESS
2821 */
2822PAM_EXTERN
2823int pam_sm_acct_mgmt(pam_handle_t *pamh, int flags,
2824 int argc, const char **argv)
2825{
2826 const char *username;
2827 int ret = PAM_USER_UNKNOWN;
2828 const char *tmp = NULL;
2829 struct pwb_context *ctx = NULL;
2830
2831 ret = _pam_winbind_init_context(pamh, flags, argc, argv,
2832 PAM_WINBIND_ACCT_MGMT, &ctx);
2833 if (ret != PAM_SUCCESS) {
2834 return ret;
2835 }
2836
2837 _PAM_LOG_FUNCTION_ENTER("pam_sm_acct_mgmt", ctx);
2838
2839
2840 /* Get the username */
2841 ret = pam_get_user(pamh, &username, NULL);
2842 if ((ret != PAM_SUCCESS) || (!username)) {
2843 _pam_log_debug(ctx, LOG_DEBUG,
2844 "can not get the username");
2845 ret = PAM_SERVICE_ERR;
2846 goto out;
2847 }
2848
2849 /* Verify the username */
2850 ret = valid_user(ctx, username);
2851 switch (ret) {
2852 case -1:
2853 /* some sort of system error. The log was already printed */
2854 ret = PAM_SERVICE_ERR;
2855 goto out;
2856 case 1:
2857 /* the user does not exist */
2858 _pam_log_debug(ctx, LOG_NOTICE, "user '%s' not found",
2859 username);
2860 if (ctx->ctrl & WINBIND_UNKNOWN_OK_ARG) {
2861 ret = PAM_IGNORE;
2862 goto out;
2863 }
2864 ret = PAM_USER_UNKNOWN;
2865 goto out;
2866 case 0:
2867 pam_get_data(pamh, PAM_WINBIND_NEW_AUTHTOK_REQD,
2868 (const void **)&tmp);
2869 if (tmp != NULL) {
2870 ret = atoi(tmp);
2871 switch (ret) {
2872 case PAM_AUTHTOK_EXPIRED:
2873 /* fall through, since new token is required in this case */
2874 case PAM_NEW_AUTHTOK_REQD:
2875 _pam_log(ctx, LOG_WARNING,
2876 "pam_sm_acct_mgmt success but %s is set",
2877 PAM_WINBIND_NEW_AUTHTOK_REQD);
2878 _pam_log(ctx, LOG_NOTICE,
2879 "user '%s' needs new password",
2880 username);
2881 /* PAM_AUTHTOKEN_REQD does not exist, but is documented in the manpage */
2882 ret = PAM_NEW_AUTHTOK_REQD;
2883 goto out;
2884 default:
2885 _pam_log(ctx, LOG_WARNING,
2886 "pam_sm_acct_mgmt success");
2887 _pam_log(ctx, LOG_NOTICE,
2888 "user '%s' granted access", username);
2889 ret = PAM_SUCCESS;
2890 goto out;
2891 }
2892 }
2893
2894 /* Otherwise, the authentication looked good */
2895 _pam_log(ctx, LOG_NOTICE,
2896 "user '%s' granted access", username);
2897 ret = PAM_SUCCESS;
2898 goto out;
2899 default:
2900 /* we don't know anything about this return value */
2901 _pam_log(ctx, LOG_ERR,
2902 "internal module error (ret = %d, user = '%s')",
2903 ret, username);
2904 ret = PAM_SERVICE_ERR;
2905 goto out;
2906 }
2907
2908 /* should not be reached */
2909 ret = PAM_IGNORE;
2910
2911 out:
2912
2913 _PAM_LOG_FUNCTION_LEAVE("pam_sm_acct_mgmt", ctx, ret);
2914
2915 TALLOC_FREE(ctx);
2916
2917 return ret;
2918}
2919
2920PAM_EXTERN
2921int pam_sm_open_session(pam_handle_t *pamh, int flags,
2922 int argc, const char **argv)
2923{
2924 int ret = PAM_SUCCESS;
2925 struct pwb_context *ctx = NULL;
2926
2927 ret = _pam_winbind_init_context(pamh, flags, argc, argv,
2928 PAM_WINBIND_OPEN_SESSION, &ctx);
2929 if (ret != PAM_SUCCESS) {
2930 return ret;
2931 }
2932
2933 _PAM_LOG_FUNCTION_ENTER("pam_sm_open_session", ctx);
2934
2935 if (ctx->ctrl & WINBIND_MKHOMEDIR) {
2936 /* check and create homedir */
2937 ret = _pam_mkhomedir(ctx);
2938 }
2939
2940 _PAM_LOG_FUNCTION_LEAVE("pam_sm_open_session", ctx, ret);
2941
2942 TALLOC_FREE(ctx);
2943
2944 return ret;
2945}
2946
2947PAM_EXTERN
2948int pam_sm_close_session(pam_handle_t *pamh, int flags,
2949 int argc, const char **argv)
2950{
2951 int ret = PAM_SUCCESS;
2952 struct pwb_context *ctx = NULL;
2953
2954 ret = _pam_winbind_init_context(pamh, flags, argc, argv,
2955 PAM_WINBIND_CLOSE_SESSION, &ctx);
2956 if (ret != PAM_SUCCESS) {
2957 return ret;
2958 }
2959
2960 _PAM_LOG_FUNCTION_ENTER("pam_sm_close_session", ctx);
2961
2962 _PAM_LOG_FUNCTION_LEAVE("pam_sm_close_session", ctx, ret);
2963
2964 TALLOC_FREE(ctx);
2965
2966 return ret;
2967}
2968
2969/**
2970 * evaluate whether we need to re-authenticate with kerberos after a
2971 * password change
2972 *
2973 * @param ctx PAM winbind context.
2974 * @param user The username
2975 *
2976 * @return boolean Returns true if required, false if not.
2977 */
2978
2979static bool _pam_require_krb5_auth_after_chauthtok(struct pwb_context *ctx,
2980 const char *user)
2981{
2982
2983 /* Make sure that we only do this if a) the chauthtok got initiated
2984 * during a logon attempt (authenticate->acct_mgmt->chauthtok) b) any
2985 * later password change via the "passwd" command if done by the user
2986 * itself
2987 * NB. If we login from gdm or xdm and the password expires,
2988 * we change the password, but there is no memory cache.
2989 * Thus, even for passthrough login, we should do the
2990 * authentication again to update memory cache.
2991 * --- BoYang
2992 * */
2993
2994 char *new_authtok_reqd_during_auth = NULL;
2995 struct passwd *pwd = NULL;
2996
2997 pam_get_data(ctx->pamh, PAM_WINBIND_NEW_AUTHTOK_REQD_DURING_AUTH,
2998 (const void **) &new_authtok_reqd_during_auth);
2999 pam_set_data(ctx->pamh, PAM_WINBIND_NEW_AUTHTOK_REQD_DURING_AUTH,
3000 NULL, NULL);
3001
3002 if (new_authtok_reqd_during_auth) {
3003 return true;
3004 }
3005
3006 pwd = getpwnam(user);
3007 if (!pwd) {
3008 return false;
3009 }
3010
3011 if (getuid() == pwd->pw_uid) {
3012 return true;
3013 }
3014
3015 return false;
3016}
3017
3018
3019PAM_EXTERN
3020int pam_sm_chauthtok(pam_handle_t * pamh, int flags,
3021 int argc, const char **argv)
3022{
3023 unsigned int lctrl;
3024 int ret;
3025 bool cached_login = false;
3026
3027 /* <DO NOT free() THESE> */
3028 const char *user;
3029 const char *pass_old;
3030 const char *pass_new;
3031 /* </DO NOT free() THESE> */
3032
3033 char *Announce;
3034
3035 int retry = 0;
3036 char *username_ret = NULL;
3037 struct wbcAuthErrorInfo *error = NULL;
3038 struct pwb_context *ctx = NULL;
3039
3040 ret = _pam_winbind_init_context(pamh, flags, argc, argv,
3041 PAM_WINBIND_CHAUTHTOK, &ctx);
3042 if (ret != PAM_SUCCESS) {
3043 return ret;
3044 }
3045
3046 _PAM_LOG_FUNCTION_ENTER("pam_sm_chauthtok", ctx);
3047
3048 cached_login = (ctx->ctrl & WINBIND_CACHED_LOGIN);
3049
3050 /* clearing offline bit for auth */
3051 ctx->ctrl &= ~WINBIND_CACHED_LOGIN;
3052
3053 /*
3054 * First get the name of a user
3055 */
3056 ret = pam_get_user(pamh, &user, _("Username: "));
3057 if (ret != PAM_SUCCESS) {
3058 _pam_log(ctx, LOG_ERR,
3059 "password - could not identify user");
3060 goto out;
3061 }
3062
3063 if (user == NULL) {
3064 _pam_log(ctx, LOG_ERR, "username was NULL!");
3065 ret = PAM_USER_UNKNOWN;
3066 goto out;
3067 }
3068
3069 _pam_log_debug(ctx, LOG_DEBUG, "username [%s] obtained", user);
3070
3071 /* check if this is really a user in winbindd, not only in NSS */
3072 ret = valid_user(ctx, user);
3073 switch (ret) {
3074 case 1:
3075 ret = PAM_USER_UNKNOWN;
3076 goto out;
3077 case -1:
3078 ret = PAM_SYSTEM_ERR;
3079 goto out;
3080 default:
3081 break;
3082 }
3083
3084 /*
3085 * obtain and verify the current password (OLDAUTHTOK) for
3086 * the user.
3087 */
3088
3089 if (flags & PAM_PRELIM_CHECK) {
3090 time_t pwdlastset_prelim = 0;
3091
3092 /* instruct user what is happening */
3093
3094#define greeting _("Changing password for")
3095 Announce = talloc_asprintf(ctx, "%s %s", greeting, user);
3096 if (!Announce) {
3097 _pam_log(ctx, LOG_CRIT,
3098 "password - out of memory");
3099 ret = PAM_BUF_ERR;
3100 goto out;
3101 }
3102#undef greeting
3103
3104 lctrl = ctx->ctrl | WINBIND__OLD_PASSWORD;
3105 ret = _winbind_read_password(ctx, lctrl,
3106 Announce,
3107 _("(current) NT password: "),
3108 NULL,
3109 (const char **) &pass_old);
3110 TALLOC_FREE(Announce);
3111 if (ret != PAM_SUCCESS) {
3112 _pam_log(ctx, LOG_NOTICE,
3113 "password - (old) token not obtained");
3114 goto out;
3115 }
3116
3117 /* verify that this is the password for this user */
3118
3119 ret = winbind_auth_request(ctx, user, pass_old,
3120 NULL, NULL, 0,
3121 &error, NULL, NULL,
3122 &pwdlastset_prelim, NULL);
3123
3124 if (ret != PAM_ACCT_EXPIRED &&
3125 ret != PAM_AUTHTOK_EXPIRED &&
3126 ret != PAM_NEW_AUTHTOK_REQD &&
3127 ret != PAM_SUCCESS) {
3128 pass_old = NULL;
3129 goto out;
3130 }
3131
3132 pam_set_data(pamh, PAM_WINBIND_PWD_LAST_SET,
3133 (void *)pwdlastset_prelim, NULL);
3134
3135 ret = pam_set_item(pamh, PAM_OLDAUTHTOK,
3136 (const void *) pass_old);
3137 pass_old = NULL;
3138 if (ret != PAM_SUCCESS) {
3139 _pam_log(ctx, LOG_CRIT,
3140 "failed to set PAM_OLDAUTHTOK");
3141 }
3142 } else if (flags & PAM_UPDATE_AUTHTOK) {
3143
3144 time_t pwdlastset_update = 0;
3145
3146 /*
3147 * obtain the proposed password
3148 */
3149
3150 /*
3151 * get the old token back.
3152 */
3153
3154 ret = pam_get_item(pamh, PAM_OLDAUTHTOK, (const void **) &pass_old);
3155
3156 if (ret != PAM_SUCCESS) {
3157 _pam_log(ctx, LOG_NOTICE,
3158 "user not authenticated");
3159 goto out;
3160 }
3161
3162 lctrl = ctx->ctrl & ~WINBIND_TRY_FIRST_PASS_ARG;
3163
3164 if (on(WINBIND_USE_AUTHTOK_ARG, lctrl)) {
3165 lctrl |= WINBIND_USE_FIRST_PASS_ARG;
3166 }
3167 retry = 0;
3168 ret = PAM_AUTHTOK_ERR;
3169 while ((ret != PAM_SUCCESS) && (retry++ < MAX_PASSWD_TRIES)) {
3170 /*
3171 * use_authtok is to force the use of a previously entered
3172 * password -- needed for pluggable password strength checking
3173 */
3174
3175 ret = _winbind_read_password(ctx, lctrl,
3176 NULL,
3177 _("Enter new NT password: "),
3178 _("Retype new NT password: "),
3179 (const char **)&pass_new);
3180
3181 if (ret != PAM_SUCCESS) {
3182 _pam_log_debug(ctx, LOG_ALERT,
3183 "password - "
3184 "new password not obtained");
3185 pass_old = NULL;/* tidy up */
3186 goto out;
3187 }
3188
3189 /*
3190 * At this point we know who the user is and what they
3191 * propose as their new password. Verify that the new
3192 * password is acceptable.
3193 */
3194
3195 if (pass_new[0] == '\0') {/* "\0" password = NULL */
3196 pass_new = NULL;
3197 }
3198 }
3199
3200 /*
3201 * By reaching here we have approved the passwords and must now
3202 * rebuild the password database file.
3203 */
3204 pam_get_data(pamh, PAM_WINBIND_PWD_LAST_SET,
3205 (const void **) &pwdlastset_update);
3206
3207 /*
3208 * if cached creds were enabled, make sure to set the
3209 * WINBIND_CACHED_LOGIN bit here in order to have winbindd
3210 * update the cached creds storage - gd
3211 */
3212 if (cached_login) {
3213 ctx->ctrl |= WINBIND_CACHED_LOGIN;
3214 }
3215
3216 ret = winbind_chauthtok_request(ctx, user, pass_old,
3217 pass_new, pwdlastset_update);
3218 if (ret != PAM_SUCCESS) {
3219 pass_old = pass_new = NULL;
3220 goto out;
3221 }
3222
3223 if (_pam_require_krb5_auth_after_chauthtok(ctx, user)) {
3224
3225 const char *member = NULL;
3226 const char *cctype = NULL;
3227 int warn_pwd_expire;
3228 struct wbcLogonUserInfo *info = NULL;
3229 struct wbcUserPasswordPolicyInfo *policy = NULL;
3230
3231 member = get_member_from_config(ctx);
3232 cctype = get_krb5_cc_type_from_config(ctx);
3233 warn_pwd_expire = get_warn_pwd_expire_from_config(ctx);
3234
3235 /* Keep WINBIND_CACHED_LOGIN bit for
3236 * authentication after changing the password.
3237 * This will update the cached credentials in case
3238 * that winbindd_dual_pam_chauthtok() fails
3239 * to update them.
3240 * --- BoYang
3241 * */
3242
3243 ret = winbind_auth_request(ctx, user, pass_new,
3244 member, cctype, 0,
3245 &error, &info, &policy,
3246 NULL, &username_ret);
3247 pass_old = pass_new = NULL;
3248
3249 if (ret == PAM_SUCCESS) {
3250
3251 struct wbcAuthUserInfo *user_info = NULL;
3252
3253 if (info && info->info) {
3254 user_info = info->info;
3255 }
3256
3257 /* warn a user if the password is about to
3258 * expire soon */
3259 _pam_warn_password_expiry(ctx, user_info, policy,
3260 warn_pwd_expire,
3261 NULL, NULL);
3262
3263 /* set some info3 info for other modules in the
3264 * stack */
3265 _pam_set_data_info3(ctx, user_info);
3266
3267 /* put krb5ccname into env */
3268 _pam_setup_krb5_env(ctx, info);
3269
3270 if (username_ret) {
3271 pam_set_item(pamh, PAM_USER,
3272 username_ret);
3273 _pam_log_debug(ctx, LOG_INFO,
3274 "Returned user was '%s'",
3275 username_ret);
3276 free(username_ret);
3277 }
3278
3279 }
3280
3281 if (info && info->blobs) {
3282 wbcFreeMemory(info->blobs);
3283 }
3284 wbcFreeMemory(info);
3285 wbcFreeMemory(policy);
3286
3287 goto out;
3288 }
3289 } else {
3290 ret = PAM_SERVICE_ERR;
3291 }
3292
3293out:
3294 {
3295 /* Deal with offline errors. */
3296 int i;
3297 const char *codes[] = {
3298 "NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND",
3299 "NT_STATUS_NO_LOGON_SERVERS",
3300 "NT_STATUS_ACCESS_DENIED"
3301 };
3302
3303 for (i=0; i<ARRAY_SIZE(codes); i++) {
3304 int _ret;
3305 if (_pam_check_remark_auth_err(ctx, error, codes[i], &_ret)) {
3306 break;
3307 }
3308 }
3309 }
3310
3311 wbcFreeMemory(error);
3312
3313 _PAM_LOG_FUNCTION_LEAVE("pam_sm_chauthtok", ctx, ret);
3314
3315 TALLOC_FREE(ctx);
3316
3317 return ret;
3318}
3319
3320#ifdef PAM_STATIC
3321
3322/* static module data */
3323
3324struct pam_module _pam_winbind_modstruct = {
3325 MODULE_NAME,
3326 pam_sm_authenticate,
3327 pam_sm_setcred,
3328 pam_sm_acct_mgmt,
3329 pam_sm_open_session,
3330 pam_sm_close_session,
3331 pam_sm_chauthtok
3332};
3333
3334#endif
3335
3336/*
3337 * Copyright (c) Andrew Tridgell <tridge@samba.org> 2000
3338 * Copyright (c) Tim Potter <tpot@samba.org> 2000
3339 * Copyright (c) Andrew Bartlettt <abartlet@samba.org> 2002
3340 * Copyright (c) Guenther Deschner <gd@samba.org> 2005-2008
3341 * Copyright (c) Jan Rêkorajski 1999.
3342 * Copyright (c) Andrew G. Morgan 1996-8.
3343 * Copyright (c) Alex O. Yuriev, 1996.
3344 * Copyright (c) Cristian Gafton 1996.
3345 * Copyright (C) Elliot Lee <sopwith@redhat.com> 1996, Red Hat Software.
3346 *
3347 * Redistribution and use in source and binary forms, with or without
3348 * modification, are permitted provided that the following conditions
3349 * are met:
3350 * 1. Redistributions of source code must retain the above copyright
3351 * notice, and the entire permission notice in its entirety,
3352 * including the disclaimer of warranties.
3353 * 2. Redistributions in binary form must reproduce the above copyright
3354 * notice, this list of conditions and the following disclaimer in the
3355 * documentation and/or other materials provided with the distribution.
3356 * 3. The name of the author may not be used to endorse or promote
3357 * products derived from this software without specific prior
3358 * written permission.
3359 *
3360 * ALTERNATIVELY, this product may be distributed under the terms of
3361 * the GNU Public License, in which case the provisions of the GPL are
3362 * required INSTEAD OF the above restrictions. (This clause is
3363 * necessary due to a potential bad interaction between the GPL and
3364 * the restrictions contained in a BSD-style copyright.)
3365 *
3366 * THIS SOFTWARE IS PROVIDED `AS IS'' AND ANY EXPRESS OR IMPLIED
3367 * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
3368 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
3369 * DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT,
3370 * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
3371 * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
3372 * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
3373 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
3374 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
3375 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
3376 * OF THE POSSIBILITY OF SUCH DAMAGE.
3377 */
Note: See TracBrowser for help on using the repository browser.