1 /* SPDX-License-Identifier: LGPL-2.1+ */
7 #include <security/_pam_macros.h>
8 #include <security/pam_ext.h>
9 #include <security/pam_misc.h>
10 #include <security/pam_modules.h>
11 #include <security/pam_modutil.h>
14 #include "alloc-util.h"
15 #include "audit-util.h"
16 #include "bus-common-errors.h"
17 #include "bus-error.h"
19 #include "cgroup-util.h"
23 #include "format-util.h"
24 #include "hostname-util.h"
25 #include "login-util.h"
27 #include "parse-util.h"
28 #include "path-util.h"
29 #include "process-util.h"
30 #include "socket-util.h"
31 #include "stdio-util.h"
33 #include "terminal-util.h"
36 static int parse_argv(
38 int argc
, const char **argv
,
47 assert(argc
== 0 || argv
);
49 for (i
= 0; i
< (unsigned) argc
; i
++) {
50 if (startswith(argv
[i
], "class=")) {
54 } else if (startswith(argv
[i
], "type=")) {
58 } else if (startswith(argv
[i
], "desktop=")) {
60 *desktop
= argv
[i
] + 8;
62 } else if (streq(argv
[i
], "debug")) {
66 } else if (startswith(argv
[i
], "debug=")) {
69 k
= parse_boolean(argv
[i
] + 6);
71 pam_syslog(handle
, LOG_WARNING
, "Failed to parse debug= argument, ignoring.");
76 pam_syslog(handle
, LOG_WARNING
, "Unknown parameter '%s', ignoring", argv
[i
]);
82 static int get_user_data(
84 const char **ret_username
,
85 struct passwd
**ret_pw
) {
87 const char *username
= NULL
;
88 struct passwd
*pw
= NULL
;
95 r
= pam_get_user(handle
, &username
, NULL
);
96 if (r
!= PAM_SUCCESS
) {
97 pam_syslog(handle
, LOG_ERR
, "Failed to get user name.");
101 if (isempty(username
)) {
102 pam_syslog(handle
, LOG_ERR
, "User name not valid.");
106 pw
= pam_modutil_getpwnam(handle
, username
);
108 pam_syslog(handle
, LOG_ERR
, "Failed to get user data.");
109 return PAM_USER_UNKNOWN
;
113 *ret_username
= username
;
118 static int socket_from_display(const char *display
, char **path
) {
125 if (!display_is_local(display
))
128 k
= strspn(display
+1, "0123456789");
130 f
= new(char, STRLEN("/tmp/.X11-unix/X") + k
+ 1);
134 c
= stpcpy(f
, "/tmp/.X11-unix/X");
135 memcpy(c
, display
+1, k
);
143 static int get_seat_from_display(const char *display
, const char **seat
, uint32_t *vtnr
) {
144 union sockaddr_union sa
= {};
145 _cleanup_free_
char *p
= NULL
, *tty
= NULL
;
146 _cleanup_close_
int fd
= -1;
153 /* We deduce the X11 socket from the display name, then use
154 * SO_PEERCRED to determine the X11 server process, ask for
155 * the controlling tty of that and if it's a VC then we know
156 * the seat and the virtual terminal. Sounds ugly, is only
159 r
= socket_from_display(display
, &p
);
162 salen
= sockaddr_un_set_path(&sa
.un
, p
);
166 fd
= socket(AF_UNIX
, SOCK_STREAM
|SOCK_CLOEXEC
, 0);
170 if (connect(fd
, &sa
.sa
, salen
) < 0)
173 r
= getpeercred(fd
, &ucred
);
177 r
= get_ctty(ucred
.pid
, NULL
, &tty
);
181 v
= vtnr_from_tty(tty
);
189 *vtnr
= (uint32_t) v
;
194 static int export_legacy_dbus_address(
195 pam_handle_t
*handle
,
197 const char *runtime
) {
199 _cleanup_free_
char *s
= NULL
;
202 if (asprintf(&s
, DEFAULT_USER_BUS_ADDRESS_FMT
, runtime
) < 0)
205 r
= pam_misc_setenv(handle
, "DBUS_SESSION_BUS_ADDRESS", s
, 0);
206 if (r
!= PAM_SUCCESS
)
212 pam_syslog(handle
, LOG_ERR
, "Failed to set bus variable.");
216 static int append_session_memory_max(pam_handle_t
*handle
, sd_bus_message
*m
, const char *limit
) {
223 if (streq(limit
, "infinity")) {
224 r
= sd_bus_message_append(m
, "(sv)", "MemoryMax", "t", (uint64_t)-1);
226 pam_syslog(handle
, LOG_ERR
, "Failed to append to bus message: %s", strerror(-r
));
230 r
= parse_permille(limit
);
232 r
= sd_bus_message_append(m
, "(sv)", "MemoryMaxScale", "u", (uint32_t) (((uint64_t) r
* UINT32_MAX
) / 1000U));
234 pam_syslog(handle
, LOG_ERR
, "Failed to append to bus message: %s", strerror(-r
));
238 r
= parse_size(limit
, 1024, &val
);
240 r
= sd_bus_message_append(m
, "(sv)", "MemoryMax", "t", val
);
242 pam_syslog(handle
, LOG_ERR
, "Failed to append to bus message: %s", strerror(-r
));
246 pam_syslog(handle
, LOG_WARNING
, "Failed to parse systemd.limit: %s, ignoring.", limit
);
253 static int append_session_tasks_max(pam_handle_t
*handle
, sd_bus_message
*m
, const char *limit
) {
257 /* No need to parse "infinity" here, it will be set unconditionally later in manager_start_scope() */
258 if (isempty(limit
) || streq(limit
, "infinity"))
261 r
= safe_atou64(limit
, &val
);
263 r
= sd_bus_message_append(m
, "(sv)", "TasksMax", "t", val
);
265 pam_syslog(handle
, LOG_ERR
, "Failed to append to bus message: %s", strerror(-r
));
269 pam_syslog(handle
, LOG_WARNING
, "Failed to parse systemd.limit: %s, ignoring.", limit
);
274 static int append_session_cg_weight(pam_handle_t
*handle
, sd_bus_message
*m
, const char *limit
, const char *field
) {
281 r
= cg_weight_parse(limit
, &val
);
283 r
= sd_bus_message_append(m
, "(sv)", field
, "t", val
);
285 pam_syslog(handle
, LOG_ERR
, "Failed to append to bus message: %s", strerror(-r
));
288 } else if (streq(field
, "CPUWeight"))
289 pam_syslog(handle
, LOG_WARNING
, "Failed to parse systemd.cpu_weight: %s, ignoring.", limit
);
291 pam_syslog(handle
, LOG_WARNING
, "Failed to parse systemd.io_weight: %s, ignoring.", limit
);
296 static const char* getenv_harder(pam_handle_t
*handle
, const char *key
, const char *fallback
) {
302 /* Looks for an environment variable, preferrably in the environment block associated with the specified PAM
303 * handle, falling back to the process' block instead. */
305 v
= pam_getenv(handle
, key
);
316 static int update_environment(pam_handle_t
*handle
, const char *key
, const char *value
) {
322 /* Updates the environment, but only if there's actually a value set. Also, log about errors */
327 r
= pam_misc_setenv(handle
, key
, value
, 0);
328 if (r
!= PAM_SUCCESS
)
329 pam_syslog(handle
, LOG_ERR
, "Failed to set environment variable %s.", key
);
334 static bool validate_runtime_directory(pam_handle_t
*handle
, const char *path
, uid_t uid
) {
339 /* Just some extra paranoia: let's not set $XDG_RUNTIME_DIR if the directory we'd set it to isn't actually set
340 * up properly for us. */
342 if (lstat(path
, &st
) < 0) {
343 pam_syslog(handle
, LOG_ERR
, "Failed to stat() runtime directory '%s': %s", path
, strerror(errno
));
347 if (!S_ISDIR(st
.st_mode
)) {
348 pam_syslog(handle
, LOG_ERR
, "Runtime directory '%s' is not actually a directory.", path
);
352 if (st
.st_uid
!= uid
) {
353 pam_syslog(handle
, LOG_ERR
, "Runtime directory '%s' is not owned by UID " UID_FMT
", as it should.", path
, uid
);
360 pam_syslog(handle
, LOG_WARNING
, "Not setting $XDG_RUNTIME_DIR, as the directory is not in order.");
364 _public_ PAM_EXTERN
int pam_sm_open_session(
365 pam_handle_t
*handle
,
367 int argc
, const char **argv
) {
369 _cleanup_(sd_bus_error_free
) sd_bus_error error
= SD_BUS_ERROR_NULL
;
370 _cleanup_(sd_bus_message_unrefp
) sd_bus_message
*m
= NULL
, *reply
= NULL
;
372 *username
, *id
, *object_path
, *runtime_path
,
374 *tty
= NULL
, *display
= NULL
,
375 *remote_user
= NULL
, *remote_host
= NULL
,
377 *type
= NULL
, *class = NULL
,
378 *class_pam
= NULL
, *type_pam
= NULL
, *cvtnr
= NULL
, *desktop
= NULL
, *desktop_pam
= NULL
,
379 *memory_max
= NULL
, *tasks_max
= NULL
, *cpu_weight
= NULL
, *io_weight
= NULL
;
380 _cleanup_(sd_bus_flush_close_unrefp
) sd_bus
*bus
= NULL
;
381 int session_fd
= -1, existing
, r
;
382 bool debug
= false, remote
;
389 /* Make this a NOP on non-logind systems */
390 if (!logind_running())
393 if (parse_argv(handle
,
399 return PAM_SESSION_ERR
;
402 pam_syslog(handle
, LOG_DEBUG
, "pam-systemd initializing");
404 r
= get_user_data(handle
, &username
, &pw
);
405 if (r
!= PAM_SUCCESS
) {
406 pam_syslog(handle
, LOG_ERR
, "Failed to get user data.");
410 /* Make sure we don't enter a loop by talking to
411 * systemd-logind when it is actually waiting for the
412 * background to finish start-up. If the service is
413 * "systemd-user" we simply set XDG_RUNTIME_DIR and
416 pam_get_item(handle
, PAM_SERVICE
, (const void**) &service
);
417 if (streq_ptr(service
, "systemd-user")) {
418 char rt
[STRLEN("/run/user/") + DECIMAL_STR_MAX(uid_t
)];
420 xsprintf(rt
, "/run/user/"UID_FMT
, pw
->pw_uid
);
421 if (validate_runtime_directory(handle
, rt
, pw
->pw_uid
)) {
422 r
= pam_misc_setenv(handle
, "XDG_RUNTIME_DIR", rt
, 0);
423 if (r
!= PAM_SUCCESS
) {
424 pam_syslog(handle
, LOG_ERR
, "Failed to set runtime dir.");
429 r
= export_legacy_dbus_address(handle
, pw
->pw_uid
, rt
);
430 if (r
!= PAM_SUCCESS
)
436 /* Otherwise, we ask logind to create a session for us */
438 pam_get_item(handle
, PAM_XDISPLAY
, (const void**) &display
);
439 pam_get_item(handle
, PAM_TTY
, (const void**) &tty
);
440 pam_get_item(handle
, PAM_RUSER
, (const void**) &remote_user
);
441 pam_get_item(handle
, PAM_RHOST
, (const void**) &remote_host
);
443 seat
= getenv_harder(handle
, "XDG_SEAT", NULL
);
444 cvtnr
= getenv_harder(handle
, "XDG_VTNR", NULL
);
445 type
= getenv_harder(handle
, "XDG_SESSION_TYPE", type_pam
);
446 class = getenv_harder(handle
, "XDG_SESSION_CLASS", class_pam
);
447 desktop
= getenv_harder(handle
, "XDG_SESSION_DESKTOP", desktop_pam
);
451 if (strchr(tty
, ':')) {
452 /* A tty with a colon is usually an X11 display, placed there to show up in utmp. We rearrange things
453 * and don't pretend that an X display was a tty. */
454 if (isempty(display
))
458 } else if (streq(tty
, "cron")) {
459 /* cron is setting PAM_TTY to "cron" for some reason (the commit carries no information why, but
460 * probably because it wants to set it to something as pam_time/pam_access/… require PAM_TTY to be set
461 * (as they otherwise even try to update it!) — but cron doesn't actually allocate a TTY for its forked
463 type
= "unspecified";
464 class = "background";
467 } else if (streq(tty
, "ssh")) {
468 /* ssh has been setting PAM_TTY to "ssh" (for the same reason as cron does this, see above. For further
469 * details look for "PAM_TTY_KLUDGE" in the openssh sources). */
472 tty
= NULL
; /* This one is particularly sad, as this means that ssh sessions — even though usually
473 * associated with a pty — won't be tracked by their tty in logind. This is because ssh
474 * does the PAM session registration early for new connections, and registers a pty only
475 * much later (this is because it doesn't know yet if it needs one at all, as whether to
476 * register a pty or not is negotiated much later in the protocol). */
479 /* Chop off leading /dev prefix that some clients specify, but others do not. */
480 tty
= skip_dev_prefix(tty
);
482 /* If this fails vtnr will be 0, that's intended */
484 (void) safe_atou32(cvtnr
, &vtnr
);
486 if (!isempty(display
) && !vtnr
) {
488 (void) get_seat_from_display(display
, &seat
, &vtnr
);
489 else if (streq(seat
, "seat0"))
490 (void) get_seat_from_display(display
, NULL
, &vtnr
);
493 if (seat
&& !streq(seat
, "seat0") && vtnr
!= 0) {
495 pam_syslog(handle
, LOG_DEBUG
, "Ignoring vtnr %"PRIu32
" for %s which is not seat0", vtnr
, seat
);
500 type
= !isempty(display
) ? "x11" :
501 !isempty(tty
) ? "tty" : "unspecified";
504 class = streq(type
, "unspecified") ? "background" : "user";
506 remote
= !isempty(remote_host
) && !is_localhost(remote_host
);
508 (void) pam_get_data(handle
, "systemd.memory_max", (const void **)&memory_max
);
509 (void) pam_get_data(handle
, "systemd.tasks_max", (const void **)&tasks_max
);
510 (void) pam_get_data(handle
, "systemd.cpu_weight", (const void **)&cpu_weight
);
511 (void) pam_get_data(handle
, "systemd.io_weight", (const void **)&io_weight
);
513 /* Talk to logind over the message bus */
515 r
= sd_bus_open_system(&bus
);
517 pam_syslog(handle
, LOG_ERR
, "Failed to connect to system bus: %s", strerror(-r
));
518 return PAM_SESSION_ERR
;
522 pam_syslog(handle
, LOG_DEBUG
, "Asking logind to create session: "
523 "uid="UID_FMT
" pid="PID_FMT
" service=%s type=%s class=%s desktop=%s seat=%s vtnr=%"PRIu32
" tty=%s display=%s remote=%s remote_user=%s remote_host=%s",
524 pw
->pw_uid
, getpid_cached(),
526 type
, class, strempty(desktop
),
527 strempty(seat
), vtnr
, strempty(tty
), strempty(display
),
528 yes_no(remote
), strempty(remote_user
), strempty(remote_host
));
529 pam_syslog(handle
, LOG_DEBUG
, "Session limits: "
530 "memory_max=%s tasks_max=%s cpu_weight=%s io_weight=%s",
531 strna(memory_max
), strna(tasks_max
), strna(cpu_weight
), strna(io_weight
));
534 r
= sd_bus_message_new_method_call(
537 "org.freedesktop.login1",
538 "/org/freedesktop/login1",
539 "org.freedesktop.login1.Manager",
542 pam_syslog(handle
, LOG_ERR
, "Failed to create CreateSession method call: %s", strerror(-r
));
543 return PAM_SESSION_ERR
;
546 r
= sd_bus_message_append(m
, "uusssssussbss",
547 (uint32_t) pw
->pw_uid
,
561 pam_syslog(handle
, LOG_ERR
, "Failed to append to bus message: %s", strerror(-r
));
562 return PAM_SESSION_ERR
;
565 r
= sd_bus_message_open_container(m
, 'a', "(sv)");
567 pam_syslog(handle
, LOG_ERR
, "Failed to open message container: %s", strerror(-r
));
568 return PAM_SYSTEM_ERR
;
571 r
= append_session_memory_max(handle
, m
, memory_max
);
573 return PAM_SESSION_ERR
;
575 r
= append_session_tasks_max(handle
, m
, tasks_max
);
577 return PAM_SESSION_ERR
;
579 r
= append_session_cg_weight(handle
, m
, cpu_weight
, "CPUWeight");
581 return PAM_SESSION_ERR
;
583 r
= append_session_cg_weight(handle
, m
, io_weight
, "IOWeight");
585 return PAM_SESSION_ERR
;
587 r
= sd_bus_message_close_container(m
);
589 pam_syslog(handle
, LOG_ERR
, "Failed to close message container: %s", strerror(-r
));
590 return PAM_SYSTEM_ERR
;
593 r
= sd_bus_call(bus
, m
, 0, &error
, &reply
);
595 if (sd_bus_error_has_name(&error
, BUS_ERROR_SESSION_BUSY
)) {
597 pam_syslog(handle
, LOG_DEBUG
, "Cannot create session: %s", bus_error_message(&error
, r
));
600 pam_syslog(handle
, LOG_ERR
, "Failed to create session: %s", bus_error_message(&error
, r
));
601 return PAM_SYSTEM_ERR
;
605 r
= sd_bus_message_read(reply
,
616 pam_syslog(handle
, LOG_ERR
, "Failed to parse message: %s", strerror(-r
));
617 return PAM_SESSION_ERR
;
621 pam_syslog(handle
, LOG_DEBUG
, "Reply from logind: "
622 "id=%s object_path=%s runtime_path=%s session_fd=%d seat=%s vtnr=%u original_uid=%u",
623 id
, object_path
, runtime_path
, session_fd
, seat
, vtnr
, original_uid
);
625 r
= update_environment(handle
, "XDG_SESSION_ID", id
);
626 if (r
!= PAM_SUCCESS
)
629 if (original_uid
== pw
->pw_uid
) {
630 /* Don't set $XDG_RUNTIME_DIR if the user we now
631 * authenticated for does not match the original user
632 * of the session. We do this in order not to result
633 * in privileged apps clobbering the runtime directory
636 if (validate_runtime_directory(handle
, runtime_path
, pw
->pw_uid
)) {
637 r
= update_environment(handle
, "XDG_RUNTIME_DIR", runtime_path
);
638 if (r
!= PAM_SUCCESS
)
642 r
= export_legacy_dbus_address(handle
, pw
->pw_uid
, runtime_path
);
643 if (r
!= PAM_SUCCESS
)
647 /* Most likely we got the session/type/class from environment variables, but might have gotten the data
648 * somewhere else (for example PAM module parameters). Let's now update the environment variables, so that this
649 * data is inherited into the session processes, and programs can rely on them to be initialized. */
651 r
= update_environment(handle
, "XDG_SESSION_TYPE", type
);
652 if (r
!= PAM_SUCCESS
)
655 r
= update_environment(handle
, "XDG_SESSION_CLASS", class);
656 if (r
!= PAM_SUCCESS
)
659 r
= update_environment(handle
, "XDG_SESSION_DESKTOP", desktop
);
660 if (r
!= PAM_SUCCESS
)
663 r
= update_environment(handle
, "XDG_SEAT", seat
);
664 if (r
!= PAM_SUCCESS
)
668 char buf
[DECIMAL_STR_MAX(vtnr
)];
669 sprintf(buf
, "%u", vtnr
);
671 r
= update_environment(handle
, "XDG_VTNR", buf
);
672 if (r
!= PAM_SUCCESS
)
676 r
= pam_set_data(handle
, "systemd.existing", INT_TO_PTR(!!existing
), NULL
);
677 if (r
!= PAM_SUCCESS
) {
678 pam_syslog(handle
, LOG_ERR
, "Failed to install existing flag.");
682 if (session_fd
>= 0) {
683 session_fd
= fcntl(session_fd
, F_DUPFD_CLOEXEC
, 3);
684 if (session_fd
< 0) {
685 pam_syslog(handle
, LOG_ERR
, "Failed to dup session fd: %m");
686 return PAM_SESSION_ERR
;
689 r
= pam_set_data(handle
, "systemd.session-fd", FD_TO_PTR(session_fd
), NULL
);
690 if (r
!= PAM_SUCCESS
) {
691 pam_syslog(handle
, LOG_ERR
, "Failed to install session fd.");
692 safe_close(session_fd
);
700 _public_ PAM_EXTERN
int pam_sm_close_session(
701 pam_handle_t
*handle
,
703 int argc
, const char **argv
) {
705 _cleanup_(sd_bus_error_free
) sd_bus_error error
= SD_BUS_ERROR_NULL
;
706 _cleanup_(sd_bus_flush_close_unrefp
) sd_bus
*bus
= NULL
;
707 const void *existing
= NULL
;
713 /* Only release session if it wasn't pre-existing when we
714 * tried to create it */
715 (void) pam_get_data(handle
, "systemd.existing", &existing
);
717 id
= pam_getenv(handle
, "XDG_SESSION_ID");
718 if (id
&& !existing
) {
720 /* Before we go and close the FIFO we need to tell
721 * logind that this is a clean session shutdown, so
722 * that it doesn't just go and slaughter us
723 * immediately after closing the fd */
725 r
= sd_bus_open_system(&bus
);
727 pam_syslog(handle
, LOG_ERR
, "Failed to connect to system bus: %s", strerror(-r
));
728 return PAM_SESSION_ERR
;
731 r
= sd_bus_call_method(bus
,
732 "org.freedesktop.login1",
733 "/org/freedesktop/login1",
734 "org.freedesktop.login1.Manager",
741 pam_syslog(handle
, LOG_ERR
, "Failed to release session: %s", bus_error_message(&error
, r
));
742 return PAM_SESSION_ERR
;
746 /* Note that we are knowingly leaking the FIFO fd here. This
747 * way, logind can watch us die. If we closed it here it would
748 * not have any clue when that is completed. Given that one
749 * cannot really have multiple PAM sessions open from the same
750 * process this means we will leak one FD at max. */