1
/* -*- coding: utf-8 -*- */
3
* Splashy - Read a password from splashy and output it
5
* Copyright © 2008-2011 Teddy Hogeborn
6
* Copyright © 2008-2011 Björn Påhlsson
8
* This program is free software: you can redistribute it and/or
9
* modify it under the terms of the GNU General Public License as
10
* published by the Free Software Foundation, either version 3 of the
11
* License, or (at your option) any later version.
13
* This program is distributed in the hope that it will be useful, but
14
* WITHOUT ANY WARRANTY; without even the implied warranty of
15
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16
* General Public License for more details.
18
* You should have received a copy of the GNU General Public License
19
* along with this program. If not, see
20
* <http://www.gnu.org/licenses/>.
22
* Contact the authors at <mandos@fukt.bsnet.se>.
25
#define _GNU_SOURCE /* TEMP_FAILURE_RETRY(), asprintf() */
26
#include <signal.h> /* sig_atomic_t, struct sigaction,
27
sigemptyset(), sigaddset(), SIGINT,
28
SIGHUP, SIGTERM, sigaction,
29
SIG_IGN, kill(), SIGKILL */
30
#include <stddef.h> /* NULL */
31
#include <stdlib.h> /* getenv() */
32
#include <stdio.h> /* asprintf(), vasprintf(), vprintf(), fprintf() */
33
#include <stdlib.h> /* EXIT_FAILURE, free(),
35
#include <sys/types.h> /* pid_t, DIR, struct dirent,
37
#include <dirent.h> /* opendir(), readdir(), closedir() */
38
#include <inttypes.h> /* intmax_t, strtoimax() */
39
#include <sys/stat.h> /* struct stat, lstat(), S_ISLNK */
40
#include <iso646.h> /* not, or, and */
41
#include <unistd.h> /* readlink(), fork(), execl(),
42
sleep(), dup2() STDERR_FILENO,
43
STDOUT_FILENO, _exit(),
45
#include <string.h> /* memcmp(), strerror() */
46
#include <errno.h> /* errno, EACCES, ENOTDIR, ELOOP,
47
ENOENT, ENAMETOOLONG, EMFILE,
48
ENFILE, ENOMEM, ENOEXEC, EINVAL,
49
E2BIG, EFAULT, EIO, ETXTBSY,
50
EISDIR, ELIBBAD, EPERM, EINTR,
52
#include <error.h> /* error() */
53
#include <sys/wait.h> /* waitpid(), WIFEXITED(),
55
#include <sysexits.h> /* EX_OSERR, EX_OSFILE,
57
#include <stdarg.h> /* va_list, va_start(), ... */
59
sig_atomic_t interrupted_by_signal = 0;
62
/* Function to use when printing errors */
63
void error_plus(int status, int errnum, const char *formatstring, ...){
68
va_start(ap, formatstring);
69
ret = vasprintf(&text, formatstring, ap);
71
fprintf(stderr, "Mandos plugin %s: ", program_invocation_short_name);
72
vfprintf(stderr, formatstring, ap);
73
fprintf(stderr, ": ");
74
fprintf(stderr, "%s\n", strerror(errnum));
75
error(status, errno, "vasprintf while printing error");
78
fprintf(stderr, "Mandos plugin ");
79
error(status, errnum, "%s", text);
84
static void termination_handler(int signum){
85
if(interrupted_by_signal){
88
interrupted_by_signal = 1;
89
signal_received = signum;
92
int main(__attribute__((unused))int argc,
93
__attribute__((unused))char **argv){
97
pid_t splashy_pid = 0;
98
pid_t splashy_command_pid = 0;
99
int exitstatus = EXIT_FAILURE;
101
/* Create prompt string */
103
const char *const cryptsource = getenv("cryptsource");
104
const char *const crypttarget = getenv("crypttarget");
105
const char *const prompt_start = "getpass "
106
"Enter passphrase to unlock the disk";
108
if(cryptsource == NULL){
109
if(crypttarget == NULL){
110
ret = asprintf(&prompt, "%s: ", prompt_start);
112
ret = asprintf(&prompt, "%s (%s): ", prompt_start,
116
if(crypttarget == NULL){
117
ret = asprintf(&prompt, "%s %s: ", prompt_start, cryptsource);
119
ret = asprintf(&prompt, "%s %s (%s): ", prompt_start,
120
cryptsource, crypttarget);
125
exitstatus = EX_OSERR;
130
/* Find splashy process */
132
const char splashy_name[] = "/sbin/splashy";
133
proc_dir = opendir("/proc");
134
if(proc_dir == NULL){
136
error_plus(0, errno, "opendir");
143
exitstatus = EX_OSFILE;
149
exitstatus = EX_OSERR;
154
for(struct dirent *proc_ent = readdir(proc_dir);
156
proc_ent = readdir(proc_dir)){
162
tmpmax = strtoimax(proc_ent->d_name, &tmp, 10);
163
if(errno != 0 or tmp == proc_ent->d_name or *tmp != '\0'
164
or tmpmax != (pid_t)tmpmax){
170
/* Find the executable name by doing readlink() on the
171
/proc/<pid>/exe link */
172
char exe_target[sizeof(splashy_name)];
176
ret = asprintf(&exe_link, "/proc/%s/exe", proc_ent->d_name);
178
error_plus(0, errno, "asprintf");
179
exitstatus = EX_OSERR;
183
/* Check that it refers to a symlink owned by root:root */
184
struct stat exe_stat;
185
ret = lstat(exe_link, &exe_stat);
192
error_plus(0, errno, "lstat");
199
exitstatus = EX_OSFILE;
202
exitstatus = EX_OSERR;
207
if(not S_ISLNK(exe_stat.st_mode)
208
or exe_stat.st_uid != 0
209
or exe_stat.st_gid != 0){
214
sret = readlink(exe_link, exe_target, sizeof(exe_target));
217
if((sret == ((ssize_t)sizeof(exe_target)-1))
218
and (memcmp(splashy_name, exe_target,
219
sizeof(exe_target)-1) == 0)){
227
if(splashy_pid == 0){
228
exitstatus = EX_UNAVAILABLE;
232
/* Set up the signal handler */
234
struct sigaction old_action,
235
new_action = { .sa_handler = termination_handler,
237
sigemptyset(&new_action.sa_mask);
238
ret = sigaddset(&new_action.sa_mask, SIGINT);
240
error_plus(0, errno, "sigaddset");
241
exitstatus = EX_OSERR;
244
ret = sigaddset(&new_action.sa_mask, SIGHUP);
246
error_plus(0, errno, "sigaddset");
247
exitstatus = EX_OSERR;
250
ret = sigaddset(&new_action.sa_mask, SIGTERM);
252
error_plus(0, errno, "sigaddset");
253
exitstatus = EX_OSERR;
256
ret = sigaction(SIGINT, NULL, &old_action);
258
error_plus(0, errno, "sigaction");
259
exitstatus = EX_OSERR;
262
if(old_action.sa_handler != SIG_IGN){
263
ret = sigaction(SIGINT, &new_action, NULL);
265
error_plus(0, errno, "sigaction");
266
exitstatus = EX_OSERR;
270
ret = sigaction(SIGHUP, NULL, &old_action);
272
error_plus(0, errno, "sigaction");
273
exitstatus = EX_OSERR;
276
if(old_action.sa_handler != SIG_IGN){
277
ret = sigaction(SIGHUP, &new_action, NULL);
279
error_plus(0, errno, "sigaction");
280
exitstatus = EX_OSERR;
284
ret = sigaction(SIGTERM, NULL, &old_action);
286
error_plus(0, errno, "sigaction");
287
exitstatus = EX_OSERR;
290
if(old_action.sa_handler != SIG_IGN){
291
ret = sigaction(SIGTERM, &new_action, NULL);
293
error_plus(0, errno, "sigaction");
294
exitstatus = EX_OSERR;
300
if(interrupted_by_signal){
304
/* Fork off the splashy command to prompt for password */
305
splashy_command_pid = fork();
306
if(splashy_command_pid != 0 and interrupted_by_signal){
309
if(splashy_command_pid == -1){
310
error_plus(0, errno, "fork");
311
exitstatus = EX_OSERR;
315
if(splashy_command_pid == 0){
316
if(not interrupted_by_signal){
317
const char splashy_command[] = "/sbin/splashy_update";
318
execl(splashy_command, splashy_command, prompt, (char *)NULL);
320
error_plus(0, errno, "execl");
326
_exit(EX_UNAVAILABLE);
341
case ELIBBAD: /* Linux only */
355
if(interrupted_by_signal){
359
/* Wait for command to complete */
363
ret = waitpid(splashy_command_pid, &status, 0);
364
} while(ret == -1 and errno == EINTR
365
and not interrupted_by_signal);
366
if(interrupted_by_signal){
370
error_plus(0, errno, "waitpid");
372
splashy_command_pid = 0;
375
/* The child process has exited */
376
splashy_command_pid = 0;
377
if(WIFEXITED(status) and WEXITSTATUS(status) == 0){
387
if(proc_dir != NULL){
388
TEMP_FAILURE_RETRY(closedir(proc_dir));
391
if(splashy_command_pid != 0){
392
TEMP_FAILURE_RETRY(kill(splashy_command_pid, SIGTERM));
394
TEMP_FAILURE_RETRY(kill(splashy_pid, SIGTERM));
396
while(TEMP_FAILURE_RETRY(kill(splashy_pid, 0)) == 0){
397
TEMP_FAILURE_RETRY(kill(splashy_pid, SIGKILL));
400
pid_t new_splashy_pid = (pid_t)TEMP_FAILURE_RETRY(fork());
401
if(new_splashy_pid == 0){
402
/* Child; will become new splashy process */
404
/* Make the effective user ID (root) the only user ID instead of
405
the real user ID (_mandos) */
406
ret = setuid(geteuid());
408
error_plus(0, errno, "setuid");
414
error_plus(0, errno, "chdir");
416
/* if(fork() != 0){ */
417
/* _exit(EXIT_SUCCESS); */
419
ret = dup2(STDERR_FILENO, STDOUT_FILENO); /* replace stdout */
421
error_plus(0, errno, "dup2");
425
execl("/sbin/splashy", "/sbin/splashy", "boot", (char *)NULL);
428
error_plus(0, errno, "execl");
434
_exit(EX_UNAVAILABLE);
447
if(interrupted_by_signal){
448
struct sigaction signal_action;
449
sigemptyset(&signal_action.sa_mask);
450
signal_action.sa_handler = SIG_DFL;
451
ret = (int)TEMP_FAILURE_RETRY(sigaction(signal_received,
452
&signal_action, NULL));
454
error_plus(0, errno, "sigaction");
457
ret = raise(signal_received);
458
} while(ret != 0 and errno == EINTR);
460
error_plus(0, errno, "raise");
463
TEMP_FAILURE_RETRY(pause());