src/basic/terminal-util.c

   1 /***
   2   This file is part of systemd.
   3
   4   Copyright 2010 Lennart Poettering
   5
   6   systemd is free software; you can redistribute it and/or modify it
   7   under the terms of the GNU Lesser General Public License as published by
   8   the Free Software Foundation; either version 2.1 of the License, or
   9   (at your option) any later version.
  10
  11   systemd is distributed in the hope that it will be useful, but
  12   WITHOUT ANY WARRANTY; without even the implied warranty of
  13   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  14   Lesser General Public License for more details.
  15
  16   You should have received a copy of the GNU Lesser General Public License
  17   along with systemd; If not, see <http://www.gnu.org/licenses/>.
  18 ***/
  19
  20 #include <sys/ioctl.h>
  21 #include <sys/types.h>
  22 #include <sys/stat.h>
  23 #include <termios.h>
  24 #include <unistd.h>
  25 #include <fcntl.h>
  26 #include <signal.h>
  27 #include <time.h>
  28 #include <assert.h>
  29 #include <poll.h>
  30 #include <linux/vt.h>
  31 #include <linux/tiocl.h>
  32 #include <linux/kd.h>
  33
  34 #include "terminal-util.h"
  35 #include "time-util.h"
  36 #include "process-util.h"
  37 #include "util.h"
  38 #include "fileio.h"
  39 #include "path-util.h"
  40
  41 static volatile unsigned cached_columns = 0;
  42 static volatile unsigned cached_lines = 0;
  43
  44 int chvt(int vt) {
  45         _cleanup_close_ int fd;
  46
  47         fd = open_terminal("/dev/tty0", O_RDWR|O_NOCTTY|O_CLOEXEC|O_NONBLOCK);
  48         if (fd < 0)
  49                 return -errno;
  50
  51         if (vt < 0) {
  52                 int tiocl[2] = {
  53                         TIOCL_GETKMSGREDIRECT,
  54                         0
  55                 };
  56
  57                 if (ioctl(fd, TIOCLINUX, tiocl) < 0)
  58                         return -errno;
  59
  60                 vt = tiocl[0] <= 0 ? 1 : tiocl[0];
  61         }
  62
  63         if (ioctl(fd, VT_ACTIVATE, vt) < 0)
  64                 return -errno;
  65
  66         return 0;
  67 }
  68
  69 int read_one_char(FILE *f, char *ret, usec_t t, bool *need_nl) {
  70         struct termios old_termios, new_termios;
  71         char c, line[LINE_MAX];
  72
  73         assert(f);
  74         assert(ret);
  75
  76         if (tcgetattr(fileno(f), &old_termios) >= 0) {
  77                 new_termios = old_termios;
  78
  79                 new_termios.c_lflag &= ~ICANON;
  80                 new_termios.c_cc[VMIN] = 1;
  81                 new_termios.c_cc[VTIME] = 0;
  82
  83                 if (tcsetattr(fileno(f), TCSADRAIN, &new_termios) >= 0) {
  84                         size_t k;
  85
  86                         if (t != USEC_INFINITY) {
  87                                 if (fd_wait_for_event(fileno(f), POLLIN, t) <= 0) {
  88                                         tcsetattr(fileno(f), TCSADRAIN, &old_termios);
  89                                         return -ETIMEDOUT;
  90                                 }
  91                         }
  92
  93                         k = fread(&c, 1, 1, f);
  94
  95                         tcsetattr(fileno(f), TCSADRAIN, &old_termios);
  96
  97                         if (k <= 0)
  98                                 return -EIO;
  99
 100                         if (need_nl)
 101                                 *need_nl = c != '\n';
 102
 103                         *ret = c;
 104                         return 0;
 105                 }
 106         }
 107
 108         if (t != USEC_INFINITY) {
 109                 if (fd_wait_for_event(fileno(f), POLLIN, t) <= 0)
 110                         return -ETIMEDOUT;
 111         }
 112
 113         errno = 0;
 114         if (!fgets(line, sizeof(line), f))
 115                 return errno ? -errno : -EIO;
 116
 117         truncate_nl(line);
 118
 119         if (strlen(line) != 1)
 120                 return -EBADMSG;
 121
 122         if (need_nl)
 123                 *need_nl = false;
 124
 125         *ret = line[0];
 126         return 0;
 127 }
 128
 129 /// UNNEEDED by elogind
 130 #if 0
 131 int ask_char(char *ret, const char *replies, const char *text, ...) {
 132         int r;
 133
 134         assert(ret);
 135         assert(replies);
 136         assert(text);
 137
 138         for (;;) {
 139                 va_list ap;
 140                 char c;
 141                 bool need_nl = true;
 142
 143                 if (on_tty())
 144                         fputs(ANSI_HIGHLIGHT_ON, stdout);
 145
 146                 va_start(ap, text);
 147                 vprintf(text, ap);
 148                 va_end(ap);
 149
 150                 if (on_tty())
 151                         fputs(ANSI_HIGHLIGHT_OFF, stdout);
 152
 153                 fflush(stdout);
 154
 155                 r = read_one_char(stdin, &c, USEC_INFINITY, &need_nl);
 156                 if (r < 0) {
 157
 158                         if (r == -EBADMSG) {
 159                                 puts("Bad input, please try again.");
 160                                 continue;
 161                         }
 162
 163                         putchar('\n');
 164                         return r;
 165                 }
 166
 167                 if (need_nl)
 168                         putchar('\n');
 169
 170                 if (strchr(replies, c)) {
 171                         *ret = c;
 172                         return 0;
 173                 }
 174
 175                 puts("Read unexpected character, please try again.");
 176         }
 177 }
 178
 179 int ask_string(char **ret, const char *text, ...) {
 180         assert(ret);
 181         assert(text);
 182
 183         for (;;) {
 184                 char line[LINE_MAX];
 185                 va_list ap;
 186
 187                 if (on_tty())
 188                         fputs(ANSI_HIGHLIGHT_ON, stdout);
 189
 190                 va_start(ap, text);
 191                 vprintf(text, ap);
 192                 va_end(ap);
 193
 194                 if (on_tty())
 195                         fputs(ANSI_HIGHLIGHT_OFF, stdout);
 196
 197                 fflush(stdout);
 198
 199                 errno = 0;
 200                 if (!fgets(line, sizeof(line), stdin))
 201                         return errno ? -errno : -EIO;
 202
 203                 if (!endswith(line, "\n"))
 204                         putchar('\n');
 205                 else {
 206                         char *s;
 207
 208                         if (isempty(line))
 209                                 continue;
 210
 211                         truncate_nl(line);
 212                         s = strdup(line);
 213                         if (!s)
 214                                 return -ENOMEM;
 215
 216                         *ret = s;
 217                         return 0;
 218                 }
 219         }
 220 }
 221 #endif // 0
 222
 223 int reset_terminal_fd(int fd, bool switch_to_text) {
 224         struct termios termios;
 225         int r = 0;
 226
 227         /* Set terminal to some sane defaults */
 228
 229         assert(fd >= 0);
 230
 231         /* We leave locked terminal attributes untouched, so that
 232          * Plymouth may set whatever it wants to set, and we don't
 233          * interfere with that. */
 234
 235         /* Disable exclusive mode, just in case */
 236         ioctl(fd, TIOCNXCL);
 237
 238         /* Switch to text mode */
 239         if (switch_to_text)
 240                 ioctl(fd, KDSETMODE, KD_TEXT);
 241
 242         /* Enable console unicode mode */
 243         ioctl(fd, KDSKBMODE, K_UNICODE);
 244
 245         if (tcgetattr(fd, &termios) < 0) {
 246                 r = -errno;
 247                 goto finish;
 248         }
 249
 250         /* We only reset the stuff that matters to the software. How
 251          * hardware is set up we don't touch assuming that somebody
 252          * else will do that for us */
 253
 254         termios.c_iflag &= ~(IGNBRK | BRKINT | ISTRIP | INLCR | IGNCR | IUCLC);
 255         termios.c_iflag |= ICRNL | IMAXBEL | IUTF8;
 256         termios.c_oflag |= ONLCR;
 257         termios.c_cflag |= CREAD;
 258         termios.c_lflag = ISIG | ICANON | IEXTEN | ECHO | ECHOE | ECHOK | ECHOCTL | ECHOPRT | ECHOKE;
 259
 260         termios.c_cc[VINTR]    =   03;  /* ^C */
 261         termios.c_cc[VQUIT]    =  034;  /* ^\ */
 262         termios.c_cc[VERASE]   = 0177;
 263         termios.c_cc[VKILL]    =  025;  /* ^X */
 264         termios.c_cc[VEOF]     =   04;  /* ^D */
 265         termios.c_cc[VSTART]   =  021;  /* ^Q */
 266         termios.c_cc[VSTOP]    =  023;  /* ^S */
 267         termios.c_cc[VSUSP]    =  032;  /* ^Z */
 268         termios.c_cc[VLNEXT]   =  026;  /* ^V */
 269         termios.c_cc[VWERASE]  =  027;  /* ^W */
 270         termios.c_cc[VREPRINT] =  022;  /* ^R */
 271         termios.c_cc[VEOL]     =    0;
 272         termios.c_cc[VEOL2]    =    0;
 273
 274         termios.c_cc[VTIME]  = 0;
 275         termios.c_cc[VMIN]   = 1;
 276
 277         if (tcsetattr(fd, TCSANOW, &termios) < 0)
 278                 r = -errno;
 279
 280 finish:
 281         /* Just in case, flush all crap out */
 282         tcflush(fd, TCIOFLUSH);
 283
 284         return r;
 285 }
 286
 287 int reset_terminal(const char *name) {
 288         _cleanup_close_ int fd = -1;
 289
 290         /* We open the terminal with O_NONBLOCK here, to ensure we
 291          * don't block on carrier if this is a terminal with carrier
 292          * configured. */
 293
 294         fd = open_terminal(name, O_RDWR|O_NOCTTY|O_CLOEXEC|O_NONBLOCK);
 295         if (fd < 0)
 296                 return fd;
 297
 298         return reset_terminal_fd(fd, true);
 299 }
 300
 301 int open_terminal(const char *name, int mode) {
 302         int fd, r;
 303         unsigned c = 0;
 304
 305         /*
 306          * If a TTY is in the process of being closed opening it might
 307          * cause EIO. This is horribly awful, but unlikely to be
 308          * changed in the kernel. Hence we work around this problem by
 309          * retrying a couple of times.
 310          *
 311          * https://bugs.launchpad.net/ubuntu/+source/linux/+bug/554172/comments/245
 312          */
 313
 314         if (mode & O_CREAT)
 315                 return -EINVAL;
 316
 317         for (;;) {
 318                 fd = open(name, mode, 0);
 319                 if (fd >= 0)
 320                         break;
 321
 322                 if (errno != EIO)
 323                         return -errno;
 324
 325                 /* Max 1s in total */
 326                 if (c >= 20)
 327                         return -errno;
 328
 329                 usleep(50 * USEC_PER_MSEC);
 330                 c++;
 331         }
 332
 333         r = isatty(fd);
 334         if (r < 0) {
 335                 safe_close(fd);
 336                 return -errno;
 337         }
 338
 339         if (!r) {
 340                 safe_close(fd);
 341                 return -ENOTTY;
 342         }
 343
 344         return fd;
 345 }
 346
 347 int acquire_terminal(
 348                 const char *name,
 349                 bool fail,
 350                 bool force,
 351                 bool ignore_tiocstty_eperm,
 352                 usec_t timeout) {
 353
 354         int fd = -1, notify = -1, r = 0, wd = -1;
 355         usec_t ts = 0;
 356
 357         assert(name);
 358
 359         /* We use inotify to be notified when the tty is closed. We
 360          * create the watch before checking if we can actually acquire
 361          * it, so that we don't lose any event.
 362          *
 363          * Note: strictly speaking this actually watches for the
 364          * device being closed, it does *not* really watch whether a
 365          * tty loses its controlling process. However, unless some
 366          * rogue process uses TIOCNOTTY on /dev/tty *after* closing
 367          * its tty otherwise this will not become a problem. As long
 368          * as the administrator makes sure not configure any service
 369          * on the same tty as an untrusted user this should not be a
 370          * problem. (Which he probably should not do anyway.) */
 371
 372         if (timeout != USEC_INFINITY)
 373                 ts = now(CLOCK_MONOTONIC);
 374
 375         if (!fail && !force) {
 376                 notify = inotify_init1(IN_CLOEXEC | (timeout != USEC_INFINITY ? IN_NONBLOCK : 0));
 377                 if (notify < 0) {
 378                         r = -errno;
 379                         goto fail;
 380                 }
 381
 382                 wd = inotify_add_watch(notify, name, IN_CLOSE);
 383                 if (wd < 0) {
 384                         r = -errno;
 385                         goto fail;
 386                 }
 387         }
 388
 389         for (;;) {
 390                 struct sigaction sa_old, sa_new = {
 391                         .sa_handler = SIG_IGN,
 392                         .sa_flags = SA_RESTART,
 393                 };
 394
 395                 if (notify >= 0) {
 396                         r = flush_fd(notify);
 397                         if (r < 0)
 398                                 goto fail;
 399                 }
 400
 401                 /* We pass here O_NOCTTY only so that we can check the return
 402                  * value TIOCSCTTY and have a reliable way to figure out if we
 403                  * successfully became the controlling process of the tty */
 404                 fd = open_terminal(name, O_RDWR|O_NOCTTY|O_CLOEXEC);
 405                 if (fd < 0)
 406                         return fd;
 407
 408                 /* Temporarily ignore SIGHUP, so that we don't get SIGHUP'ed
 409                  * if we already own the tty. */
 410                 assert_se(sigaction(SIGHUP, &sa_new, &sa_old) == 0);
 411
 412                 /* First, try to get the tty */
 413                 if (ioctl(fd, TIOCSCTTY, force) < 0)
 414                         r = -errno;
 415
 416                 assert_se(sigaction(SIGHUP, &sa_old, NULL) == 0);
 417
 418                 /* Sometimes it makes sense to ignore TIOCSCTTY
 419                  * returning EPERM, i.e. when very likely we already
 420                  * are have this controlling terminal. */
 421                 if (r < 0 && r == -EPERM && ignore_tiocstty_eperm)
 422                         r = 0;
 423
 424                 if (r < 0 && (force || fail || r != -EPERM)) {
 425                         goto fail;
 426                 }
 427
 428                 if (r >= 0)
 429                         break;
 430
 431                 assert(!fail);
 432                 assert(!force);
 433                 assert(notify >= 0);
 434
 435                 for (;;) {
 436                         union inotify_event_buffer buffer;
 437                         struct inotify_event *e;
 438                         ssize_t l;
 439
 440                         if (timeout != USEC_INFINITY) {
 441                                 usec_t n;
 442
 443                                 n = now(CLOCK_MONOTONIC);
 444                                 if (ts + timeout < n) {
 445                                         r = -ETIMEDOUT;
 446                                         goto fail;
 447                                 }
 448
 449                                 r = fd_wait_for_event(fd, POLLIN, ts + timeout - n);
 450                                 if (r < 0)
 451                                         goto fail;
 452
 453                                 if (r == 0) {
 454                                         r = -ETIMEDOUT;
 455                                         goto fail;
 456                                 }
 457                         }
 458
 459                         l = read(notify, &buffer, sizeof(buffer));
 460                         if (l < 0) {
 461                                 if (errno == EINTR || errno == EAGAIN)
 462                                         continue;
 463
 464                                 r = -errno;
 465                                 goto fail;
 466                         }
 467
 468                         FOREACH_INOTIFY_EVENT(e, buffer, l) {
 469                                 if (e->wd != wd || !(e->mask & IN_CLOSE)) {
 470                                         r = -EIO;
 471                                         goto fail;
 472                                 }
 473                         }
 474
 475                         break;
 476                 }
 477
 478                 /* We close the tty fd here since if the old session
 479                  * ended our handle will be dead. It's important that
 480                  * we do this after sleeping, so that we don't enter
 481                  * an endless loop. */
 482                 fd = safe_close(fd);
 483         }
 484
 485         safe_close(notify);
 486
 487         r = reset_terminal_fd(fd, true);
 488         if (r < 0)
 489                 log_warning_errno(r, "Failed to reset terminal: %m");
 490
 491         return fd;
 492
 493 fail:
 494         safe_close(fd);
 495         safe_close(notify);
 496
 497         return r;
 498 }
 499
 500 /// UNNEEDED by elogind
 501 #if 0
 502 int release_terminal(void) {
 503         static const struct sigaction sa_new = {
 504                 .sa_handler = SIG_IGN,
 505                 .sa_flags = SA_RESTART,
 506         };
 507
 508         _cleanup_close_ int fd = -1;
 509         struct sigaction sa_old;
 510         int r = 0;
 511
 512         fd = open("/dev/tty", O_RDWR|O_NOCTTY|O_CLOEXEC|O_NONBLOCK);
 513         if (fd < 0)
 514                 return -errno;
 515
 516         /* Temporarily ignore SIGHUP, so that we don't get SIGHUP'ed
 517          * by our own TIOCNOTTY */
 518         assert_se(sigaction(SIGHUP, &sa_new, &sa_old) == 0);
 519
 520         if (ioctl(fd, TIOCNOTTY) < 0)
 521                 r = -errno;
 522
 523         assert_se(sigaction(SIGHUP, &sa_old, NULL) == 0);
 524
 525         return r;
 526 }
 527 #endif // 0
 528
 529 int terminal_vhangup_fd(int fd) {
 530         assert(fd >= 0);
 531
 532         if (ioctl(fd, TIOCVHANGUP) < 0)
 533                 return -errno;
 534
 535         return 0;
 536 }
 537
 538 int terminal_vhangup(const char *name) {
 539         _cleanup_close_ int fd;
 540
 541         fd = open_terminal(name, O_RDWR|O_NOCTTY|O_CLOEXEC|O_NONBLOCK);
 542         if (fd < 0)
 543                 return fd;
 544
 545         return terminal_vhangup_fd(fd);
 546 }
 547
 548 int vt_disallocate(const char *name) {
 549         int fd, r;
 550         unsigned u;
 551
 552         /* Deallocate the VT if possible. If not possible
 553          * (i.e. because it is the active one), at least clear it
 554          * entirely (including the scrollback buffer) */
 555
 556         if (!startswith(name, "/dev/"))
 557                 return -EINVAL;
 558
 559         if (!tty_is_vc(name)) {
 560                 /* So this is not a VT. I guess we cannot deallocate
 561                  * it then. But let's at least clear the screen */
 562
 563                 fd = open_terminal(name, O_RDWR|O_NOCTTY|O_CLOEXEC);
 564                 if (fd < 0)
 565                         return fd;
 566
 567                 loop_write(fd,
 568                            "\033[r"    /* clear scrolling region */
 569                            "\033[H"    /* move home */
 570                            "\033[2J",  /* clear screen */
 571                            10, false);
 572                 safe_close(fd);
 573
 574                 return 0;
 575         }
 576
 577         if (!startswith(name, "/dev/tty"))
 578                 return -EINVAL;
 579
 580         r = safe_atou(name+8, &u);
 581         if (r < 0)
 582                 return r;
 583
 584         if (u <= 0)
 585                 return -EINVAL;
 586
 587         /* Try to deallocate */
 588         fd = open_terminal("/dev/tty0", O_RDWR|O_NOCTTY|O_CLOEXEC|O_NONBLOCK);
 589         if (fd < 0)
 590                 return fd;
 591
 592         r = ioctl(fd, VT_DISALLOCATE, u);
 593         safe_close(fd);
 594
 595         if (r >= 0)
 596                 return 0;
 597
 598         if (errno != EBUSY)
 599                 return -errno;
 600
 601         /* Couldn't deallocate, so let's clear it fully with
 602          * scrollback */
 603         fd = open_terminal(name, O_RDWR|O_NOCTTY|O_CLOEXEC);
 604         if (fd < 0)
 605                 return fd;
 606
 607         loop_write(fd,
 608                    "\033[r"   /* clear scrolling region */
 609                    "\033[H"   /* move home */
 610                    "\033[3J", /* clear screen including scrollback, requires Linux 2.6.40 */
 611                    10, false);
 612         safe_close(fd);
 613
 614         return 0;
 615 }
 616
 617 void warn_melody(void) {
 618         _cleanup_close_ int fd = -1;
 619
 620         fd = open("/dev/console", O_WRONLY|O_CLOEXEC|O_NOCTTY);
 621         if (fd < 0)
 622                 return;
 623
 624         /* Yeah, this is synchronous. Kinda sucks. But well... */
 625
 626         ioctl(fd, KIOCSOUND, (int)(1193180/440));
 627         usleep(125*USEC_PER_MSEC);
 628
 629         ioctl(fd, KIOCSOUND, (int)(1193180/220));
 630         usleep(125*USEC_PER_MSEC);
 631
 632         ioctl(fd, KIOCSOUND, (int)(1193180/220));
 633         usleep(125*USEC_PER_MSEC);
 634
 635         ioctl(fd, KIOCSOUND, 0);
 636 }
 637
 638 /// UNNEEDED by elogind
 639 #if 0
 640 int make_console_stdio(void) {
 641         int fd, r;
 642
 643         /* Make /dev/console the controlling terminal and stdin/stdout/stderr */
 644
 645         fd = acquire_terminal("/dev/console", false, true, true, USEC_INFINITY);
 646         if (fd < 0)
 647                 return log_error_errno(fd, "Failed to acquire terminal: %m");
 648
 649         r = make_stdio(fd);
 650         if (r < 0)
 651                 return log_error_errno(r, "Failed to duplicate terminal fd: %m");
 652
 653         return 0;
 654 }
 655 #endif // 0
 656
 657 int status_vprintf(const char *status, bool ellipse, bool ephemeral, const char *format, va_list ap) {
 658         static const char status_indent[] = "         "; /* "[" STATUS "] " */
 659         _cleanup_free_ char *s = NULL;
 660         _cleanup_close_ int fd = -1;
 661         struct iovec iovec[6] = {};
 662         int n = 0;
 663         static bool prev_ephemeral;
 664
 665         assert(format);
 666
 667         /* This is independent of logging, as status messages are
 668          * optional and go exclusively to the console. */
 669
 670         if (vasprintf(&s, format, ap) < 0)
 671                 return log_oom();
 672
 673         fd = open_terminal("/dev/console", O_WRONLY|O_NOCTTY|O_CLOEXEC);
 674         if (fd < 0)
 675                 return fd;
 676
 677         if (ellipse) {
 678                 char *e;
 679                 size_t emax, sl;
 680                 int c;
 681
 682                 c = fd_columns(fd);
 683                 if (c <= 0)
 684                         c = 80;
 685
 686                 sl = status ? sizeof(status_indent)-1 : 0;
 687
 688                 emax = c - sl - 1;
 689                 if (emax < 3)
 690                         emax = 3;
 691
 692                 e = ellipsize(s, emax, 50);
 693                 if (e) {
 694                         free(s);
 695                         s = e;
 696                 }
 697         }
 698
 699         if (prev_ephemeral)
 700                 IOVEC_SET_STRING(iovec[n++], "\r" ANSI_ERASE_TO_END_OF_LINE);
 701         prev_ephemeral = ephemeral;
 702
 703         if (status) {
 704                 if (!isempty(status)) {
 705                         IOVEC_SET_STRING(iovec[n++], "[");
 706                         IOVEC_SET_STRING(iovec[n++], status);
 707                         IOVEC_SET_STRING(iovec[n++], "] ");
 708                 } else
 709                         IOVEC_SET_STRING(iovec[n++], status_indent);
 710         }
 711
 712         IOVEC_SET_STRING(iovec[n++], s);
 713         if (!ephemeral)
 714                 IOVEC_SET_STRING(iovec[n++], "\n");
 715
 716         if (writev(fd, iovec, n) < 0)
 717                 return -errno;
 718
 719         return 0;
 720 }
 721
 722 int status_printf(const char *status, bool ellipse, bool ephemeral, const char *format, ...) {
 723         va_list ap;
 724         int r;
 725
 726         assert(format);
 727
 728         va_start(ap, format);
 729         r = status_vprintf(status, ellipse, ephemeral, format, ap);
 730         va_end(ap);
 731
 732         return r;
 733 }
 734
 735 bool tty_is_vc(const char *tty) {
 736         assert(tty);
 737
 738         return vtnr_from_tty(tty) >= 0;
 739 }
 740
 741 bool tty_is_console(const char *tty) {
 742         assert(tty);
 743
 744         if (startswith(tty, "/dev/"))
 745                 tty += 5;
 746
 747         return streq(tty, "console");
 748 }
 749
 750 int vtnr_from_tty(const char *tty) {
 751         int i, r;
 752
 753         assert(tty);
 754
 755         if (startswith(tty, "/dev/"))
 756                 tty += 5;
 757
 758         if (!startswith(tty, "tty") )
 759                 return -EINVAL;
 760
 761         if (tty[3] < '0' || tty[3] > '9')
 762                 return -EINVAL;
 763
 764         r = safe_atoi(tty+3, &i);
 765         if (r < 0)
 766                 return r;
 767
 768         if (i < 0 || i > 63)
 769                 return -EINVAL;
 770
 771         return i;
 772 }
 773
 774 char *resolve_dev_console(char **active) {
 775         char *tty;
 776
 777         /* Resolve where /dev/console is pointing to, if /sys is actually ours
 778          * (i.e. not read-only-mounted which is a sign for container setups) */
 779
 780         if (path_is_read_only_fs("/sys") > 0)
 781                 return NULL;
 782
 783         if (read_one_line_file("/sys/class/tty/console/active", active) < 0)
 784                 return NULL;
 785
 786         /* If multiple log outputs are configured the last one is what
 787          * /dev/console points to */
 788         tty = strrchr(*active, ' ');
 789         if (tty)
 790                 tty++;
 791         else
 792                 tty = *active;
 793
 794         if (streq(tty, "tty0")) {
 795                 char *tmp;
 796
 797                 /* Get the active VC (e.g. tty1) */
 798                 if (read_one_line_file("/sys/class/tty/tty0/active", &tmp) >= 0) {
 799                         free(*active);
 800                         tty = *active = tmp;
 801                 }
 802         }
 803
 804         return tty;
 805 }
 806
 807 bool tty_is_vc_resolve(const char *tty) {
 808         _cleanup_free_ char *active = NULL;
 809
 810         assert(tty);
 811
 812         if (startswith(tty, "/dev/"))
 813                 tty += 5;
 814
 815         if (streq(tty, "console")) {
 816                 tty = resolve_dev_console(&active);
 817                 if (!tty)
 818                         return false;
 819         }
 820
 821         return tty_is_vc(tty);
 822 }
 823
 824 /// UNNEEDED by elogind
 825 #if 0
 826 const char *default_term_for_tty(const char *tty) {
 827         assert(tty);
 828
 829         return tty_is_vc_resolve(tty) ? "TERM=linux" : "TERM=vt220";
 830 }
 831 #endif // 0
 832
 833 int fd_columns(int fd) {
 834         struct winsize ws = {};
 835
 836         if (ioctl(fd, TIOCGWINSZ, &ws) < 0)
 837                 return -errno;
 838
 839         if (ws.ws_col <= 0)
 840                 return -EIO;
 841
 842         return ws.ws_col;
 843 }
 844
 845 unsigned columns(void) {
 846         const char *e;
 847         int c;
 848
 849         if (_likely_(cached_columns > 0))
 850                 return cached_columns;
 851
 852         c = 0;
 853         e = getenv("COLUMNS");
 854         if (e)
 855                 (void) safe_atoi(e, &c);
 856
 857         if (c <= 0)
 858                 c = fd_columns(STDOUT_FILENO);
 859
 860         if (c <= 0)
 861                 c = 80;
 862
 863         cached_columns = c;
 864         return cached_columns;
 865 }
 866
 867 int fd_lines(int fd) {
 868         struct winsize ws = {};
 869
 870         if (ioctl(fd, TIOCGWINSZ, &ws) < 0)
 871                 return -errno;
 872
 873         if (ws.ws_row <= 0)
 874                 return -EIO;
 875
 876         return ws.ws_row;
 877 }
 878
 879 unsigned lines(void) {
 880         const char *e;
 881         int l;
 882
 883         if (_likely_(cached_lines > 0))
 884                 return cached_lines;
 885
 886         l = 0;
 887         e = getenv("LINES");
 888         if (e)
 889                 (void) safe_atoi(e, &l);
 890
 891         if (l <= 0)
 892                 l = fd_lines(STDOUT_FILENO);
 893
 894         if (l <= 0)
 895                 l = 24;
 896
 897         cached_lines = l;
 898         return cached_lines;
 899 }
 900
 901 /* intended to be used as a SIGWINCH sighandler */
 902 /// UNNEEDED by elogind
 903 #if 0
 904 void columns_lines_cache_reset(int signum) {
 905         cached_columns = 0;
 906         cached_lines = 0;
 907 }
 908 #endif // 0
 909
 910 bool on_tty(void) {
 911         static int cached_on_tty = -1;
 912
 913         if (_unlikely_(cached_on_tty < 0))
 914                 cached_on_tty = isatty(STDOUT_FILENO) > 0;
 915
 916         return cached_on_tty;
 917 }
 918
 919 int make_stdio(int fd) {
 920         int r, s, t;
 921
 922         assert(fd >= 0);
 923
 924         r = dup2(fd, STDIN_FILENO);
 925         s = dup2(fd, STDOUT_FILENO);
 926         t = dup2(fd, STDERR_FILENO);
 927
 928         if (fd >= 3)
 929                 safe_close(fd);
 930
 931         if (r < 0 || s < 0 || t < 0)
 932                 return -errno;
 933
 934         /* Explicitly unset O_CLOEXEC, since if fd was < 3, then
 935          * dup2() was a NOP and the bit hence possibly set. */
 936         fd_cloexec(STDIN_FILENO, false);
 937         fd_cloexec(STDOUT_FILENO, false);
 938         fd_cloexec(STDERR_FILENO, false);
 939
 940         return 0;
 941 }
 942
 943 int make_null_stdio(void) {
 944         int null_fd;
 945
 946         null_fd = open("/dev/null", O_RDWR|O_NOCTTY);
 947         if (null_fd < 0)
 948                 return -errno;
 949
 950         return make_stdio(null_fd);
 951 }
 952
 953 int getttyname_malloc(int fd, char **ret) {
 954         size_t l = 100;
 955         int r;
 956
 957         assert(fd >= 0);
 958         assert(ret);
 959
 960         for (;;) {
 961                 char path[l];
 962
 963                 r = ttyname_r(fd, path, sizeof(path));
 964                 if (r == 0) {
 965                         const char *p;
 966                         char *c;
 967
 968                         p = startswith(path, "/dev/");
 969                         c = strdup(p ?: path);
 970                         if (!c)
 971                                 return -ENOMEM;
 972
 973                         *ret = c;
 974                         return 0;
 975                 }
 976
 977                 if (r != ERANGE)
 978                         return -r;
 979
 980                 l *= 2;
 981         }
 982
 983         return 0;
 984 }
 985
 986 /// UNNEEDED by elogind
 987 #if 0
 988 int getttyname_harder(int fd, char **r) {
 989         int k;
 990         char *s = NULL;
 991
 992         k = getttyname_malloc(fd, &s);
 993         if (k < 0)
 994                 return k;
 995
 996         if (streq(s, "tty")) {
 997                 free(s);
 998                 return get_ctty(0, NULL, r);
 999         }
1000
1001         *r = s;
1002         return 0;
1003 }
1004 #endif // 0
1005
1006 int get_ctty_devnr(pid_t pid, dev_t *d) {
1007         int r;
1008         _cleanup_free_ char *line = NULL;
1009         const char *p;
1010         unsigned long ttynr;
1011
1012         assert(pid >= 0);
1013
1014         p = procfs_file_alloca(pid, "stat");
1015         r = read_one_line_file(p, &line);
1016         if (r < 0)
1017                 return r;
1018
1019         p = strrchr(line, ')');
1020         if (!p)
1021                 return -EIO;
1022
1023         p++;
1024
1025         if (sscanf(p, " "
1026                    "%*c "  /* state */
1027                    "%*d "  /* ppid */
1028                    "%*d "  /* pgrp */
1029                    "%*d "  /* session */
1030                    "%lu ", /* ttynr */
1031                    &ttynr) != 1)
1032                 return -EIO;
1033
1034         if (major(ttynr) == 0 && minor(ttynr) == 0)
1035                 return -ENXIO;
1036
1037         if (d)
1038                 *d = (dev_t) ttynr;
1039
1040         return 0;
1041 }
1042
1043 int get_ctty(pid_t pid, dev_t *_devnr, char **r) {
1044         char fn[sizeof("/dev/char/")-1 + 2*DECIMAL_STR_MAX(unsigned) + 1 + 1], *b = NULL;
1045         _cleanup_free_ char *s = NULL;
1046         const char *p;
1047         dev_t devnr;
1048         int k;
1049
1050         assert(r);
1051
1052         k = get_ctty_devnr(pid, &devnr);
1053         if (k < 0)
1054                 return k;
1055
1056         sprintf(fn, "/dev/char/%u:%u", major(devnr), minor(devnr));
1057
1058         k = readlink_malloc(fn, &s);
1059         if (k < 0) {
1060
1061                 if (k != -ENOENT)
1062                         return k;
1063
1064                 /* This is an ugly hack */
1065                 if (major(devnr) == 136) {
1066                         if (asprintf(&b, "pts/%u", minor(devnr)) < 0)
1067                                 return -ENOMEM;
1068                 } else {
1069                         /* Probably something like the ptys which have no
1070                          * symlink in /dev/char. Let's return something
1071                          * vaguely useful. */
1072
1073                         b = strdup(fn + 5);
1074                         if (!b)
1075                                 return -ENOMEM;
1076                 }
1077         } else {
1078                 if (startswith(s, "/dev/"))
1079                         p = s + 5;
1080                 else if (startswith(s, "../"))
1081                         p = s + 3;
1082                 else
1083                         p = s;
1084
1085                 b = strdup(p);
1086                 if (!b)
1087                         return -ENOMEM;
1088         }
1089
1090         *r = b;
1091         if (_devnr)
1092                 *_devnr = devnr;
1093
1094         return 0;
1095 }