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@recompile.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(),
34
#include <stdlib.h> /* EXIT_FAILURE, free(),
36
#include <sys/types.h> /* pid_t, DIR, struct dirent,
38
#include <dirent.h> /* opendir(), readdir(), closedir() */
39
#include <inttypes.h> /* intmax_t, strtoimax() */
40
#include <sys/stat.h> /* struct stat, lstat(), S_ISLNK */
41
#include <iso646.h> /* not, or, and */
42
#include <unistd.h> /* readlink(), fork(), execl(),
43
sleep(), dup2() STDERR_FILENO,
44
STDOUT_FILENO, _exit(),
46
#include <string.h> /* memcmp(), strerror() */
47
#include <errno.h> /* errno, EACCES, ENOTDIR, ELOOP,
48
ENOENT, ENAMETOOLONG, EMFILE,
49
ENFILE, ENOMEM, ENOEXEC, EINVAL,
50
E2BIG, EFAULT, EIO, ETXTBSY,
51
EISDIR, ELIBBAD, EPERM, EINTR,
53
#include <error.h> /* error() */
54
#include <sys/wait.h> /* waitpid(), WIFEXITED(),
56
#include <sysexits.h> /* EX_OSERR, EX_OSFILE,
58
#include <stdarg.h> /* va_list, va_start(), ... */
60
sig_atomic_t interrupted_by_signal = 0;
63
/* Function to use when printing errors */
64
void error_plus(int status, int errnum, const char *formatstring,
70
va_start(ap, formatstring);
71
ret = vasprintf(&text, formatstring, ap);
73
fprintf(stderr, "Mandos plugin %s: ",
74
program_invocation_short_name);
75
vfprintf(stderr, formatstring, ap);
76
fprintf(stderr, ": ");
77
fprintf(stderr, "%s\n", strerror(errnum));
78
error(status, errno, "vasprintf while printing error");
81
fprintf(stderr, "Mandos plugin ");
82
error(status, errnum, "%s", text);
87
static void termination_handler(int signum){
88
if(interrupted_by_signal){
91
interrupted_by_signal = 1;
92
signal_received = signum;
95
int main(__attribute__((unused))int argc,
96
__attribute__((unused))char **argv){
100
pid_t splashy_pid = 0;
101
pid_t splashy_command_pid = 0;
102
int exitstatus = EXIT_FAILURE;
104
/* Create prompt string */
106
const char *const cryptsource = getenv("cryptsource");
107
const char *const crypttarget = getenv("crypttarget");
108
const char *const prompt_start = "getpass "
109
"Enter passphrase to unlock the disk";
111
if(cryptsource == NULL){
112
if(crypttarget == NULL){
113
ret = asprintf(&prompt, "%s: ", prompt_start);
115
ret = asprintf(&prompt, "%s (%s): ", prompt_start,
119
if(crypttarget == NULL){
120
ret = asprintf(&prompt, "%s %s: ", prompt_start, cryptsource);
122
ret = asprintf(&prompt, "%s %s (%s): ", prompt_start,
123
cryptsource, crypttarget);
128
exitstatus = EX_OSERR;
133
/* Find splashy process */
135
const char splashy_name[] = "/sbin/splashy";
136
proc_dir = opendir("/proc");
137
if(proc_dir == NULL){
139
error_plus(0, errno, "opendir");
146
exitstatus = EX_OSFILE;
152
exitstatus = EX_OSERR;
157
for(struct dirent *proc_ent = readdir(proc_dir);
159
proc_ent = readdir(proc_dir)){
165
tmpmax = strtoimax(proc_ent->d_name, &tmp, 10);
166
if(errno != 0 or tmp == proc_ent->d_name or *tmp != '\0'
167
or tmpmax != (pid_t)tmpmax){
173
/* Find the executable name by doing readlink() on the
174
/proc/<pid>/exe link */
175
char exe_target[sizeof(splashy_name)];
179
ret = asprintf(&exe_link, "/proc/%s/exe", proc_ent->d_name);
181
error_plus(0, errno, "asprintf");
182
exitstatus = EX_OSERR;
186
/* Check that it refers to a symlink owned by root:root */
187
struct stat exe_stat;
188
ret = lstat(exe_link, &exe_stat);
195
error_plus(0, errno, "lstat");
202
exitstatus = EX_OSFILE;
205
exitstatus = EX_OSERR;
210
if(not S_ISLNK(exe_stat.st_mode)
211
or exe_stat.st_uid != 0
212
or exe_stat.st_gid != 0){
217
sret = readlink(exe_link, exe_target, sizeof(exe_target));
220
if((sret == ((ssize_t)sizeof(exe_target)-1))
221
and (memcmp(splashy_name, exe_target,
222
sizeof(exe_target)-1) == 0)){
230
if(splashy_pid == 0){
231
exitstatus = EX_UNAVAILABLE;
235
/* Set up the signal handler */
237
struct sigaction old_action,
238
new_action = { .sa_handler = termination_handler,
240
sigemptyset(&new_action.sa_mask);
241
ret = sigaddset(&new_action.sa_mask, SIGINT);
243
error_plus(0, errno, "sigaddset");
244
exitstatus = EX_OSERR;
247
ret = sigaddset(&new_action.sa_mask, SIGHUP);
249
error_plus(0, errno, "sigaddset");
250
exitstatus = EX_OSERR;
253
ret = sigaddset(&new_action.sa_mask, SIGTERM);
255
error_plus(0, errno, "sigaddset");
256
exitstatus = EX_OSERR;
259
ret = sigaction(SIGINT, NULL, &old_action);
261
error_plus(0, errno, "sigaction");
262
exitstatus = EX_OSERR;
265
if(old_action.sa_handler != SIG_IGN){
266
ret = sigaction(SIGINT, &new_action, NULL);
268
error_plus(0, errno, "sigaction");
269
exitstatus = EX_OSERR;
273
ret = sigaction(SIGHUP, NULL, &old_action);
275
error_plus(0, errno, "sigaction");
276
exitstatus = EX_OSERR;
279
if(old_action.sa_handler != SIG_IGN){
280
ret = sigaction(SIGHUP, &new_action, NULL);
282
error_plus(0, errno, "sigaction");
283
exitstatus = EX_OSERR;
287
ret = sigaction(SIGTERM, NULL, &old_action);
289
error_plus(0, errno, "sigaction");
290
exitstatus = EX_OSERR;
293
if(old_action.sa_handler != SIG_IGN){
294
ret = sigaction(SIGTERM, &new_action, NULL);
296
error_plus(0, errno, "sigaction");
297
exitstatus = EX_OSERR;
303
if(interrupted_by_signal){
307
/* Fork off the splashy command to prompt for password */
308
splashy_command_pid = fork();
309
if(splashy_command_pid != 0 and interrupted_by_signal){
312
if(splashy_command_pid == -1){
313
error_plus(0, errno, "fork");
314
exitstatus = EX_OSERR;
318
if(splashy_command_pid == 0){
319
if(not interrupted_by_signal){
320
const char splashy_command[] = "/sbin/splashy_update";
321
execl(splashy_command, splashy_command, prompt, (char *)NULL);
323
error_plus(0, errno, "execl");
329
_exit(EX_UNAVAILABLE);
344
case ELIBBAD: /* Linux only */
358
if(interrupted_by_signal){
362
/* Wait for command to complete */
366
ret = waitpid(splashy_command_pid, &status, 0);
367
} while(ret == -1 and errno == EINTR
368
and not interrupted_by_signal);
369
if(interrupted_by_signal){
373
error_plus(0, errno, "waitpid");
375
splashy_command_pid = 0;
378
/* The child process has exited */
379
splashy_command_pid = 0;
380
if(WIFEXITED(status) and WEXITSTATUS(status) == 0){
390
if(proc_dir != NULL){
391
TEMP_FAILURE_RETRY(closedir(proc_dir));
394
if(splashy_command_pid != 0){
395
TEMP_FAILURE_RETRY(kill(splashy_command_pid, SIGTERM));
397
TEMP_FAILURE_RETRY(kill(splashy_pid, SIGTERM));
399
while(TEMP_FAILURE_RETRY(kill(splashy_pid, 0)) == 0){
400
TEMP_FAILURE_RETRY(kill(splashy_pid, SIGKILL));
403
pid_t new_splashy_pid = (pid_t)TEMP_FAILURE_RETRY(fork());
404
if(new_splashy_pid == 0){
405
/* Child; will become new splashy process */
407
/* Make the effective user ID (root) the only user ID instead of
408
the real user ID (_mandos) */
409
ret = setuid(geteuid());
411
error_plus(0, errno, "setuid");
417
error_plus(0, errno, "chdir");
419
/* if(fork() != 0){ */
420
/* _exit(EXIT_SUCCESS); */
422
ret = dup2(STDERR_FILENO, STDOUT_FILENO); /* replace stdout */
424
error_plus(0, errno, "dup2");
428
execl("/sbin/splashy", "/sbin/splashy", "boot", (char *)NULL);
431
error_plus(0, errno, "execl");
437
_exit(EX_UNAVAILABLE);
450
if(interrupted_by_signal){
451
struct sigaction signal_action;
452
sigemptyset(&signal_action.sa_mask);
453
signal_action.sa_handler = SIG_DFL;
454
ret = (int)TEMP_FAILURE_RETRY(sigaction(signal_received,
455
&signal_action, NULL));
457
error_plus(0, errno, "sigaction");
460
ret = raise(signal_received);
461
} while(ret != 0 and errno == EINTR);
463
error_plus(0, errno, "raise");
466
TEMP_FAILURE_RETRY(pause());