1
/* -*- coding: utf-8 -*- */
3
* Splashy - Read a password from splashy and output it
5
* Copyright © 2008-2010 Teddy Hogeborn
6
* Copyright © 2008-2010 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() */
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() */
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,
58
sig_atomic_t interrupted_by_signal = 0;
61
static void termination_handler(int signum){
62
if(interrupted_by_signal){
65
interrupted_by_signal = 1;
66
signal_received = signum;
69
int main(__attribute__((unused))int argc,
70
__attribute__((unused))char **argv){
74
pid_t splashy_pid = 0;
75
pid_t splashy_command_pid = 0;
76
int exitstatus = EXIT_FAILURE;
78
/* Create prompt string */
80
const char *const cryptsource = getenv("cryptsource");
81
const char *const crypttarget = getenv("crypttarget");
82
const char *const prompt_start = "getpass "
83
"Enter passphrase to unlock the disk";
85
if(cryptsource == NULL){
86
if(crypttarget == NULL){
87
ret = asprintf(&prompt, "%s: ", prompt_start);
89
ret = asprintf(&prompt, "%s (%s): ", prompt_start,
93
if(crypttarget == NULL){
94
ret = asprintf(&prompt, "%s %s: ", prompt_start, cryptsource);
96
ret = asprintf(&prompt, "%s %s (%s): ", prompt_start,
97
cryptsource, crypttarget);
102
exitstatus = EX_OSERR;
107
/* Find splashy process */
109
const char splashy_name[] = "/sbin/splashy";
110
proc_dir = opendir("/proc");
111
if(proc_dir == NULL){
113
error(0, errno, "opendir");
120
exitstatus = EX_OSFILE;
126
exitstatus = EX_OSERR;
131
for(struct dirent *proc_ent = readdir(proc_dir);
133
proc_ent = readdir(proc_dir)){
139
tmpmax = strtoimax(proc_ent->d_name, &tmp, 10);
140
if(errno != 0 or tmp == proc_ent->d_name or *tmp != '\0'
141
or tmpmax != (pid_t)tmpmax){
147
/* Find the executable name by doing readlink() on the
148
/proc/<pid>/exe link */
149
char exe_target[sizeof(splashy_name)];
153
ret = asprintf(&exe_link, "/proc/%s/exe", proc_ent->d_name);
155
error(0, errno, "asprintf");
156
exitstatus = EX_OSERR;
160
/* Check that it refers to a symlink owned by root:root */
161
struct stat exe_stat;
162
ret = lstat(exe_link, &exe_stat);
169
error(0, errno, "lstat");
176
exitstatus = EX_OSFILE;
179
exitstatus = EX_OSERR;
184
if(not S_ISLNK(exe_stat.st_mode)
185
or exe_stat.st_uid != 0
186
or exe_stat.st_gid != 0){
191
sret = readlink(exe_link, exe_target, sizeof(exe_target));
194
if((sret == ((ssize_t)sizeof(exe_target)-1))
195
and (memcmp(splashy_name, exe_target,
196
sizeof(exe_target)-1) == 0)){
204
if(splashy_pid == 0){
205
exitstatus = EX_UNAVAILABLE;
209
/* Set up the signal handler */
211
struct sigaction old_action,
212
new_action = { .sa_handler = termination_handler,
214
sigemptyset(&new_action.sa_mask);
215
ret = sigaddset(&new_action.sa_mask, SIGINT);
217
error(0, errno, "sigaddset");
218
exitstatus = EX_OSERR;
221
ret = sigaddset(&new_action.sa_mask, SIGHUP);
223
error(0, errno, "sigaddset");
224
exitstatus = EX_OSERR;
227
ret = sigaddset(&new_action.sa_mask, SIGTERM);
229
error(0, errno, "sigaddset");
230
exitstatus = EX_OSERR;
233
ret = sigaction(SIGINT, NULL, &old_action);
235
error(0, errno, "sigaction");
236
exitstatus = EX_OSERR;
239
if(old_action.sa_handler != SIG_IGN){
240
ret = sigaction(SIGINT, &new_action, NULL);
242
error(0, errno, "sigaction");
243
exitstatus = EX_OSERR;
247
ret = sigaction(SIGHUP, NULL, &old_action);
249
error(0, errno, "sigaction");
250
exitstatus = EX_OSERR;
253
if(old_action.sa_handler != SIG_IGN){
254
ret = sigaction(SIGHUP, &new_action, NULL);
256
error(0, errno, "sigaction");
257
exitstatus = EX_OSERR;
261
ret = sigaction(SIGTERM, NULL, &old_action);
263
error(0, errno, "sigaction");
264
exitstatus = EX_OSERR;
267
if(old_action.sa_handler != SIG_IGN){
268
ret = sigaction(SIGTERM, &new_action, NULL);
270
error(0, errno, "sigaction");
271
exitstatus = EX_OSERR;
277
if(interrupted_by_signal){
281
/* Fork off the splashy command to prompt for password */
282
splashy_command_pid = fork();
283
if(splashy_command_pid != 0 and interrupted_by_signal){
286
if(splashy_command_pid == -1){
287
error(0, errno, "fork");
288
exitstatus = EX_OSERR;
292
if(splashy_command_pid == 0){
293
if(not interrupted_by_signal){
294
const char splashy_command[] = "/sbin/splashy_update";
295
execl(splashy_command, splashy_command, prompt, (char *)NULL);
297
error(0, errno, "execl");
303
_exit(EX_UNAVAILABLE);
330
if(interrupted_by_signal){
334
/* Wait for command to complete */
338
ret = waitpid(splashy_command_pid, &status, 0);
339
} while(ret == -1 and errno == EINTR
340
and not interrupted_by_signal);
341
if(interrupted_by_signal){
345
error(0, errno, "waitpid");
347
splashy_command_pid = 0;
350
/* The child process has exited */
351
splashy_command_pid = 0;
352
if(WIFEXITED(status) and WEXITSTATUS(status) == 0){
362
if(proc_dir != NULL){
363
TEMP_FAILURE_RETRY(closedir(proc_dir));
366
if(splashy_command_pid != 0){
367
TEMP_FAILURE_RETRY(kill(splashy_command_pid, SIGTERM));
369
TEMP_FAILURE_RETRY(kill(splashy_pid, SIGTERM));
371
while(TEMP_FAILURE_RETRY(kill(splashy_pid, 0)) == 0){
372
TEMP_FAILURE_RETRY(kill(splashy_pid, SIGKILL));
375
pid_t new_splashy_pid = (pid_t)TEMP_FAILURE_RETRY(fork());
376
if(new_splashy_pid == 0){
377
/* Child; will become new splashy process */
379
/* Make the effective user ID (root) the only user ID instead of
380
the real user ID (_mandos) */
381
ret = setuid(geteuid());
383
error(0, errno, "setuid");
389
error(0, errno, "chdir");
391
/* if(fork() != 0){ */
392
/* _exit(EXIT_SUCCESS); */
394
ret = dup2(STDERR_FILENO, STDOUT_FILENO); /* replace stdout */
396
error(0, errno, "dup2");
400
execl("/sbin/splashy", "/sbin/splashy", "boot", (char *)NULL);
403
error(0, errno, "execl");
409
_exit(EX_UNAVAILABLE);
422
if(interrupted_by_signal){
423
struct sigaction signal_action;
424
sigemptyset(&signal_action.sa_mask);
425
signal_action.sa_handler = SIG_DFL;
426
ret = (int)TEMP_FAILURE_RETRY(sigaction(signal_received,
427
&signal_action, NULL));
429
error(0, errno, "sigaction");
432
ret = raise(signal_received);
433
} while(ret != 0 and errno == EINTR);
435
error(0, errno, "raise");
438
TEMP_FAILURE_RETRY(pause());