loginrec.c

   1 /*
   2  * Copyright (c) 2000 Andre Lucas.  All rights reserved.
   3  * Portions copyright (c) 1998 Todd C. Miller
   4  * Portions copyright (c) 1996 Jason Downs
   5  * Portions copyright (c) 1996 Theo de Raadt
   6  *
   7  * Redistribution and use in source and binary forms, with or without
   8  * modification, are permitted provided that the following conditions
   9  * are met:
  10  * 1. Redistributions of source code must retain the above copyright
  11  *    notice, this list of conditions and the following disclaimer.
  12  * 2. Redistributions in binary form must reproduce the above copyright
  13  *    notice, this list of conditions and the following disclaimer in the
  14  *    documentation and/or other materials provided with the distribution.
  15  *
  16  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
  17  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  18  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  19  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
  20  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  21  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  22  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  23  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  24  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  25  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  26  */
  27
  28 /*
  29  * The btmp logging code is derived from login.c from util-linux and is under
  30  * the the following license:
  31  *
  32  * Copyright (c) 1980, 1987, 1988 The Regents of the University of California.
  33  * All rights reserved.
  34  *
  35  * Redistribution and use in source and binary forms are permitted
  36  * provided that the above copyright notice and this paragraph are
  37  * duplicated in all such forms and that any documentation,
  38  * advertising materials, and other materials related to such
  39  * distribution and use acknowledge that the software was developed
  40  * by the University of California, Berkeley.  The name of the
  41  * University may not be used to endorse or promote products derived
  42  * from this software without specific prior written permission.
  43  * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
  44  * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
  45  * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  46  */
  47
  48
  49 /**
  50  ** loginrec.c:  platform-independent login recording and lastlog retrieval
  51  **/
  52
  53 /*
  54  *  The new login code explained
  55  *  ============================
  56  *
  57  *  This code attempts to provide a common interface to login recording
  58  *  (utmp and friends) and last login time retrieval.
  59  *
  60  *  Its primary means of achieving this is to use 'struct logininfo', a
  61  *  union of all the useful fields in the various different types of
  62  *  system login record structures one finds on UNIX variants.
  63  *
  64  *  We depend on autoconf to define which recording methods are to be
  65  *  used, and which fields are contained in the relevant data structures
  66  *  on the local system. Many C preprocessor symbols affect which code
  67  *  gets compiled here.
  68  *
  69  *  The code is designed to make it easy to modify a particular
  70  *  recording method, without affecting other methods nor requiring so
  71  *  many nested conditional compilation blocks as were commonplace in
  72  *  the old code.
  73  *
  74  *  For login recording, we try to use the local system's libraries as
  75  *  these are clearly most likely to work correctly. For utmp systems
  76  *  this usually means login() and logout() or setutent() etc., probably
  77  *  in libutil, along with logwtmp() etc. On these systems, we fall back
  78  *  to writing the files directly if we have to, though this method
  79  *  requires very thorough testing so we do not corrupt local auditing
  80  *  information. These files and their access methods are very system
  81  *  specific indeed.
  82  *
  83  *  For utmpx systems, the corresponding library functions are
  84  *  setutxent() etc. To the author's knowledge, all utmpx systems have
  85  *  these library functions and so no direct write is attempted. If such
  86  *  a system exists and needs support, direct analogues of the [uw]tmp
  87  *  code should suffice.
  88  *
  89  *  Retrieving the time of last login ('lastlog') is in some ways even
  90  *  more problemmatic than login recording. Some systems provide a
  91  *  simple table of all users which we seek based on uid and retrieve a
  92  *  relatively standard structure. Others record the same information in
  93  *  a directory with a separate file, and others don't record the
  94  *  information separately at all. For systems in the latter category,
  95  *  we look backwards in the wtmp or wtmpx file for the last login entry
  96  *  for our user. Naturally this is slower and on busy systems could
  97  *  incur a significant performance penalty.
  98  *
  99  *  Calling the new code
 100  *  --------------------
 101  *
 102  *  In OpenSSH all login recording and retrieval is performed in
 103  *  login.c. Here you'll find working examples. Also, in the logintest.c
 104  *  program there are more examples.
 105  *
 106  *  Internal handler calling method
 107  *  -------------------------------
 108  *
 109  *  When a call is made to login_login() or login_logout(), both
 110  *  routines set a struct logininfo flag defining which action (log in,
 111  *  or log out) is to be taken. They both then call login_write(), which
 112  *  calls whichever of the many structure-specific handlers autoconf
 113  *  selects for the local system.
 114  *
 115  *  The handlers themselves handle system data structure specifics. Both
 116  *  struct utmp and struct utmpx have utility functions (see
 117  *  construct_utmp*()) to try to make it simpler to add extra systems
 118  *  that introduce new features to either structure.
 119  *
 120  *  While it may seem terribly wasteful to replicate so much similar
 121  *  code for each method, experience has shown that maintaining code to
 122  *  write both struct utmp and utmpx in one function, whilst maintaining
 123  *  support for all systems whether they have library support or not, is
 124  *  a difficult and time-consuming task.
 125  *
 126  *  Lastlog support proceeds similarly. Functions login_get_lastlog()
 127  *  (and its OpenSSH-tuned friend login_get_lastlog_time()) call
 128  *  getlast_entry(), which tries one of three methods to find the last
 129  *  login time. It uses local system lastlog support if it can,
 130  *  otherwise it tries wtmp or wtmpx before giving up and returning 0,
 131  *  meaning "tilt".
 132  *
 133  *  Maintenance
 134  *  -----------
 135  *
 136  *  In many cases it's possible to tweak autoconf to select the correct
 137  *  methods for a particular platform, either by improving the detection
 138  *  code (best), or by presetting DISABLE_<method> or CONF_<method>_FILE
 139  *  symbols for the platform.
 140  *
 141  *  Use logintest to check which symbols are defined before modifying
 142  *  configure.ac and loginrec.c. (You have to build logintest yourself
 143  *  with 'make logintest' as it's not built by default.)
 144  *
 145  *  Otherwise, patches to the specific method(s) are very helpful!
 146  */
 147
 148 #include "includes.h"
 149
 150 #include <sys/types.h>
 151 #include <sys/stat.h>
 152 #include <sys/socket.h>
 153
 154 #include <netinet/in.h>
 155
 156 #include <errno.h>
 157 #include <fcntl.h>
 158 #include <pwd.h>
 159
 160 #include "ssh.h"
 161 #include "xmalloc.h"
 162 #include "loginrec.h"
 163 #include "log.h"
 164 #include "atomicio.h"
 165 #include "packet.h"
 166 #include "canohost.h"
 167 #include "auth.h"
 168 #include "buffer.h"
 169
 170 #ifdef HAVE_UTIL_H
 171 # include <util.h>
 172 #endif
 173
 174 #ifdef HAVE_LIBUTIL_H
 175 # include <libutil.h>
 176 #endif
 177
 178 /**
 179  ** prototypes for helper functions in this file
 180  **/
 181
 182 #if HAVE_UTMP_H
 183 void set_utmp_time(struct logininfo *li, struct utmp *ut);
 184 void construct_utmp(struct logininfo *li, struct utmp *ut);
 185 #endif
 186
 187 #ifdef HAVE_UTMPX_H
 188 void set_utmpx_time(struct logininfo *li, struct utmpx *ut);
 189 void construct_utmpx(struct logininfo *li, struct utmpx *ut);
 190 #endif
 191
 192 int utmp_write_entry(struct logininfo *li);
 193 int utmpx_write_entry(struct logininfo *li);
 194 int wtmp_write_entry(struct logininfo *li);
 195 int wtmpx_write_entry(struct logininfo *li);
 196 int lastlog_write_entry(struct logininfo *li);
 197 int syslogin_write_entry(struct logininfo *li);
 198
 199 int getlast_entry(struct logininfo *li);
 200 int lastlog_get_entry(struct logininfo *li);
 201 int wtmp_get_entry(struct logininfo *li);
 202 int wtmpx_get_entry(struct logininfo *li);
 203
 204 extern Buffer loginmsg;
 205
 206 /* pick the shortest string */
 207 #define MIN_SIZEOF(s1,s2) (sizeof(s1) < sizeof(s2) ? sizeof(s1) : sizeof(s2))
 208
 209 /**
 210  ** platform-independent login functions
 211  **/
 212
 213 /*
 214  * login_login(struct logininfo *) - Record a login
 215  *
 216  * Call with a pointer to a struct logininfo initialised with
 217  * login_init_entry() or login_alloc_entry()
 218  *
 219  * Returns:
 220  *  >0 if successful
 221  *  0  on failure (will use OpenSSH's logging facilities for diagnostics)
 222  */
 223 int
 224 login_login(struct logininfo *li)
 225 {
 226         li->type = LTYPE_LOGIN;
 227         return (login_write(li));
 228 }
 229
 230
 231 /*
 232  * login_logout(struct logininfo *) - Record a logout
 233  *
 234  * Call as with login_login()
 235  *
 236  * Returns:
 237  *  >0 if successful
 238  *  0  on failure (will use OpenSSH's logging facilities for diagnostics)
 239  */
 240 int
 241 login_logout(struct logininfo *li)
 242 {
 243         li->type = LTYPE_LOGOUT;
 244         return (login_write(li));
 245 }
 246
 247 /*
 248  * login_get_lastlog_time(int) - Retrieve the last login time
 249  *
 250  * Retrieve the last login time for the given uid. Will try to use the
 251  * system lastlog facilities if they are available, but will fall back
 252  * to looking in wtmp/wtmpx if necessary
 253  *
 254  * Returns:
 255  *   0 on failure, or if user has never logged in
 256  *   Time in seconds from the epoch if successful
 257  *
 258  * Useful preprocessor symbols:
 259  *   DISABLE_LASTLOG: If set, *never* even try to retrieve lastlog
 260  *                    info
 261  *   USE_LASTLOG: If set, indicates the presence of system lastlog
 262  *                facilities. If this and DISABLE_LASTLOG are not set,
 263  *                try to retrieve lastlog information from wtmp/wtmpx.
 264  */
 265 unsigned int
 266 login_get_lastlog_time(const int uid)
 267 {
 268         struct logininfo li;
 269
 270         if (login_get_lastlog(&li, uid))
 271                 return (li.tv_sec);
 272         else
 273                 return (0);
 274 }
 275
 276 /*
 277  * login_get_lastlog(struct logininfo *, int)   - Retrieve a lastlog entry
 278  *
 279  * Retrieve a logininfo structure populated (only partially) with
 280  * information from the system lastlog data, or from wtmp/wtmpx if no
 281  * system lastlog information exists.
 282  *
 283  * Note this routine must be given a pre-allocated logininfo.
 284  *
 285  * Returns:
 286  *  >0: A pointer to your struct logininfo if successful
 287  *  0  on failure (will use OpenSSH's logging facilities for diagnostics)
 288  */
 289 struct logininfo *
 290 login_get_lastlog(struct logininfo *li, const int uid)
 291 {
 292         struct passwd *pw;
 293
 294         memset(li, '\0', sizeof(*li));
 295         li->uid = uid;
 296
 297         /*
 298          * If we don't have a 'real' lastlog, we need the username to
 299          * reliably search wtmp(x) for the last login (see
 300          * wtmp_get_entry().)
 301          */
 302         pw = getpwuid(uid);
 303         if (pw == NULL)
 304                 fatal("%s: Cannot find account for uid %i", __func__, uid);
 305
 306         /* No MIN_SIZEOF here - we absolutely *must not* truncate the
 307          * username (XXX - so check for trunc!) */
 308         strlcpy(li->username, pw->pw_name, sizeof(li->username));
 309
 310         if (getlast_entry(li))
 311                 return (li);
 312         else
 313                 return (NULL);
 314 }
 315
 316
 317 /*
 318  * login_alloc_entry(int, char*, char*, char*)    - Allocate and initialise
 319  *                                                  a logininfo structure
 320  *
 321  * This function creates a new struct logininfo, a data structure
 322  * meant to carry the information required to portably record login info.
 323  *
 324  * Returns a pointer to a newly created struct logininfo. If memory
 325  * allocation fails, the program halts.
 326  */
 327 struct
 328 logininfo *login_alloc_entry(int pid, const char *username,
 329     const char *hostname, const char *line)
 330 {
 331         struct logininfo *newli;
 332
 333         newli = xmalloc(sizeof(*newli));
 334         login_init_entry(newli, pid, username, hostname, line);
 335         return (newli);
 336 }
 337
 338
 339 /* login_free_entry(struct logininfo *)    - free struct memory */
 340 void
 341 login_free_entry(struct logininfo *li)
 342 {
 343         xfree(li);
 344 }
 345
 346
 347 /* login_init_entry(struct logininfo *, int, char*, char*, char*)
 348  *                                        - initialise a struct logininfo
 349  *
 350  * Populates a new struct logininfo, a data structure meant to carry
 351  * the information required to portably record login info.
 352  *
 353  * Returns: 1
 354  */
 355 int
 356 login_init_entry(struct logininfo *li, int pid, const char *username,
 357     const char *hostname, const char *line)
 358 {
 359         struct passwd *pw;
 360
 361         memset(li, 0, sizeof(*li));
 362
 363         li->pid = pid;
 364
 365         /* set the line information */
 366         if (line)
 367                 line_fullname(li->line, line, sizeof(li->line));
 368
 369         if (username) {
 370                 strlcpy(li->username, username, sizeof(li->username));
 371                 pw = getpwnam(li->username);
 372                 if (pw == NULL) {
 373                         fatal("%s: Cannot find user \"%s\"", __func__,
 374                             li->username);
 375                 }
 376                 li->uid = pw->pw_uid;
 377         }
 378
 379         if (hostname)
 380                 strlcpy(li->hostname, hostname, sizeof(li->hostname));
 381
 382         return (1);
 383 }
 384
 385 /*
 386  * login_set_current_time(struct logininfo *)    - set the current time
 387  *
 388  * Set the current time in a logininfo structure. This function is
 389  * meant to eliminate the need to deal with system dependencies for
 390  * time handling.
 391  */
 392 void
 393 login_set_current_time(struct logininfo *li)
 394 {
 395         struct timeval tv;
 396
 397         gettimeofday(&tv, NULL);
 398
 399         li->tv_sec = tv.tv_sec;
 400         li->tv_usec = tv.tv_usec;
 401 }
 402
 403 /* copy a sockaddr_* into our logininfo */
 404 void
 405 login_set_addr(struct logininfo *li, const struct sockaddr *sa,
 406     const unsigned int sa_size)
 407 {
 408         unsigned int bufsize = sa_size;
 409
 410         /* make sure we don't overrun our union */
 411         if (sizeof(li->hostaddr) < sa_size)
 412                 bufsize = sizeof(li->hostaddr);
 413
 414         memcpy(&li->hostaddr.sa, sa, bufsize);
 415 }
 416
 417
 418 /**
 419  ** login_write: Call low-level recording functions based on autoconf
 420  ** results
 421  **/
 422 int
 423 login_write(struct logininfo *li)
 424 {
 425 #ifndef HAVE_CYGWIN
 426         if (geteuid() != 0) {
 427                 logit("Attempt to write login records by non-root user (aborting)");
 428                 return (1);
 429         }
 430 #endif
 431
 432         /* set the timestamp */
 433         login_set_current_time(li);
 434 #ifdef USE_LOGIN
 435         syslogin_write_entry(li);
 436 #endif
 437 #ifdef USE_LASTLOG
 438         if (li->type == LTYPE_LOGIN)
 439                 lastlog_write_entry(li);
 440 #endif
 441 #ifdef USE_UTMP
 442         utmp_write_entry(li);
 443 #endif
 444 #ifdef USE_WTMP
 445         wtmp_write_entry(li);
 446 #endif
 447 #ifdef USE_UTMPX
 448         utmpx_write_entry(li);
 449 #endif
 450 #ifdef USE_WTMPX
 451         wtmpx_write_entry(li);
 452 #endif
 453 #ifdef CUSTOM_SYS_AUTH_RECORD_LOGIN
 454         if (li->type == LTYPE_LOGIN &&
 455             !sys_auth_record_login(li->username,li->hostname,li->line,
 456             &loginmsg))
 457                 logit("Writing login record failed for %s", li->username);
 458 #endif
 459 #ifdef SSH_AUDIT_EVENTS
 460         if (li->type == LTYPE_LOGIN)
 461                 audit_session_open(li->line);
 462         else if (li->type == LTYPE_LOGOUT)
 463                 audit_session_close(li->line);
 464 #endif
 465         return (0);
 466 }
 467
 468 #ifdef LOGIN_NEEDS_UTMPX
 469 int
 470 login_utmp_only(struct logininfo *li)
 471 {
 472         li->type = LTYPE_LOGIN;
 473         login_set_current_time(li);
 474 # ifdef USE_UTMP
 475         utmp_write_entry(li);
 476 # endif
 477 # ifdef USE_WTMP
 478         wtmp_write_entry(li);
 479 # endif
 480 # ifdef USE_UTMPX
 481         utmpx_write_entry(li);
 482 # endif
 483 # ifdef USE_WTMPX
 484         wtmpx_write_entry(li);
 485 # endif
 486         return (0);
 487 }
 488 #endif
 489
 490 /**
 491  ** getlast_entry: Call low-level functions to retrieve the last login
 492  **                time.
 493  **/
 494
 495 /* take the uid in li and return the last login time */
 496 int
 497 getlast_entry(struct logininfo *li)
 498 {
 499 #ifdef USE_LASTLOG
 500         return(lastlog_get_entry(li));
 501 #else /* !USE_LASTLOG */
 502
 503 #if defined(DISABLE_LASTLOG)
 504         /* On some systems we shouldn't even try to obtain last login
 505          * time, e.g. AIX */
 506         return (0);
 507 # elif defined(USE_WTMP) && \
 508     (defined(HAVE_TIME_IN_UTMP) || defined(HAVE_TV_IN_UTMP))
 509         /* retrieve last login time from utmp */
 510         return (wtmp_get_entry(li));
 511 # elif defined(USE_WTMPX) && \
 512     (defined(HAVE_TIME_IN_UTMPX) || defined(HAVE_TV_IN_UTMPX))
 513         /* If wtmp isn't available, try wtmpx */
 514         return (wtmpx_get_entry(li));
 515 # else
 516         /* Give up: No means of retrieving last login time */
 517         return (0);
 518 # endif /* DISABLE_LASTLOG */
 519 #endif /* USE_LASTLOG */
 520 }
 521
 522
 523
 524 /*
 525  * 'line' string utility functions
 526  *
 527  * These functions process the 'line' string into one of three forms:
 528  *
 529  * 1. The full filename (including '/dev')
 530  * 2. The stripped name (excluding '/dev')
 531  * 3. The abbreviated name (e.g. /dev/ttyp00 -> yp00
 532  *                               /dev/pts/1  -> ts/1 )
 533  *
 534  * Form 3 is used on some systems to identify a .tmp.? entry when
 535  * attempting to remove it. Typically both addition and removal is
 536  * performed by one application - say, sshd - so as long as the choice
 537  * uniquely identifies a terminal it's ok.
 538  */
 539
 540
 541 /*
 542  * line_fullname(): add the leading '/dev/' if it doesn't exist make
 543  * sure dst has enough space, if not just copy src (ugh)
 544  */
 545 char *
 546 line_fullname(char *dst, const char *src, u_int dstsize)
 547 {
 548         memset(dst, '\0', dstsize);
 549         if ((strncmp(src, "/dev/", 5) == 0) || (dstsize < (strlen(src) + 5)))
 550                 strlcpy(dst, src, dstsize);
 551         else {
 552                 strlcpy(dst, "/dev/", dstsize);
 553                 strlcat(dst, src, dstsize);
 554         }
 555         return (dst);
 556 }
 557
 558 /* line_stripname(): strip the leading '/dev' if it exists, return dst */
 559 char *
 560 line_stripname(char *dst, const char *src, int dstsize)
 561 {
 562         memset(dst, '\0', dstsize);
 563         if (strncmp(src, "/dev/", 5) == 0)
 564                 strlcpy(dst, src + 5, dstsize);
 565         else
 566                 strlcpy(dst, src, dstsize);
 567         return (dst);
 568 }
 569
 570 /*
 571  * line_abbrevname(): Return the abbreviated (usually four-character)
 572  * form of the line (Just use the last <dstsize> characters of the
 573  * full name.)
 574  *
 575  * NOTE: use strncpy because we do NOT necessarily want zero
 576  * termination
 577  */
 578 char *
 579 line_abbrevname(char *dst, const char *src, int dstsize)
 580 {
 581         size_t len;
 582
 583         memset(dst, '\0', dstsize);
 584
 585         /* Always skip prefix if present */
 586         if (strncmp(src, "/dev/", 5) == 0)
 587                 src += 5;
 588
 589 #ifdef WITH_ABBREV_NO_TTY
 590         if (strncmp(src, "tty", 3) == 0)
 591                 src += 3;
 592 #endif
 593
 594         len = strlen(src);
 595
 596         if (len > 0) {
 597                 if (((int)len - dstsize) > 0)
 598                         src +=  ((int)len - dstsize);
 599
 600                 /* note: _don't_ change this to strlcpy */
 601                 strncpy(dst, src, (size_t)dstsize);
 602         }
 603
 604         return (dst);
 605 }
 606
 607 /**
 608  ** utmp utility functions
 609  **
 610  ** These functions manipulate struct utmp, taking system differences
 611  ** into account.
 612  **/
 613
 614 #if defined(USE_UTMP) || defined (USE_WTMP) || defined (USE_LOGIN)
 615
 616 /* build the utmp structure */
 617 void
 618 set_utmp_time(struct logininfo *li, struct utmp *ut)
 619 {
 620 # if defined(HAVE_TV_IN_UTMP)
 621         ut->ut_tv.tv_sec = li->tv_sec;
 622         ut->ut_tv.tv_usec = li->tv_usec;
 623 # elif defined(HAVE_TIME_IN_UTMP)
 624         ut->ut_time = li->tv_sec;
 625 # endif
 626 }
 627
 628 void
 629 construct_utmp(struct logininfo *li,
 630                     struct utmp *ut)
 631 {
 632 # ifdef HAVE_ADDR_V6_IN_UTMP
 633         struct sockaddr_in6 *sa6;
 634 # endif
 635
 636         memset(ut, '\0', sizeof(*ut));
 637
 638         /* First fill out fields used for both logins and logouts */
 639
 640 # ifdef HAVE_ID_IN_UTMP
 641         line_abbrevname(ut->ut_id, li->line, sizeof(ut->ut_id));
 642 # endif
 643
 644 # ifdef HAVE_TYPE_IN_UTMP
 645         /* This is done here to keep utmp constants out of struct logininfo */
 646         switch (li->type) {
 647         case LTYPE_LOGIN:
 648                 ut->ut_type = USER_PROCESS;
 649 #ifdef _UNICOS
 650                 cray_set_tmpdir(ut);
 651 #endif
 652                 break;
 653         case LTYPE_LOGOUT:
 654                 ut->ut_type = DEAD_PROCESS;
 655 #ifdef _UNICOS
 656                 cray_retain_utmp(ut, li->pid);
 657 #endif
 658                 break;
 659         }
 660 # endif
 661         set_utmp_time(li, ut);
 662
 663         line_stripname(ut->ut_line, li->line, sizeof(ut->ut_line));
 664
 665 # ifdef HAVE_PID_IN_UTMP
 666         ut->ut_pid = li->pid;
 667 # endif
 668
 669         /* If we're logging out, leave all other fields blank */
 670         if (li->type == LTYPE_LOGOUT)
 671                 return;
 672
 673         /*
 674          * These fields are only used when logging in, and are blank
 675          * for logouts.
 676          */
 677
 678         /* Use strncpy because we don't necessarily want null termination */
 679         strncpy(ut->ut_name, li->username,
 680             MIN_SIZEOF(ut->ut_name, li->username));
 681 # ifdef HAVE_HOST_IN_UTMP
 682         strncpy(ut->ut_host, li->hostname,
 683             MIN_SIZEOF(ut->ut_host, li->hostname));
 684 # endif
 685 # ifdef HAVE_ADDR_IN_UTMP
 686         /* this is just a 32-bit IP address */
 687         if (li->hostaddr.sa.sa_family == AF_INET)
 688                 ut->ut_addr = li->hostaddr.sa_in.sin_addr.s_addr;
 689 # endif
 690 # ifdef HAVE_ADDR_V6_IN_UTMP
 691         /* this is just a 128-bit IPv6 address */
 692         if (li->hostaddr.sa.sa_family == AF_INET6) {
 693                 sa6 = ((struct sockaddr_in6 *)&li->hostaddr.sa);
 694                 memcpy(ut->ut_addr_v6, sa6->sin6_addr.s6_addr, 16);
 695                 if (IN6_IS_ADDR_V4MAPPED(&sa6->sin6_addr)) {
 696                         ut->ut_addr_v6[0] = ut->ut_addr_v6[3];
 697                         ut->ut_addr_v6[1] = 0;
 698                         ut->ut_addr_v6[2] = 0;
 699                         ut->ut_addr_v6[3] = 0;
 700                 }
 701         }
 702 # endif
 703 }
 704 #endif /* USE_UTMP || USE_WTMP || USE_LOGIN */
 705
 706 /**
 707  ** utmpx utility functions
 708  **
 709  ** These functions manipulate struct utmpx, accounting for system
 710  ** variations.
 711  **/
 712
 713 #if defined(USE_UTMPX) || defined (USE_WTMPX)
 714 /* build the utmpx structure */
 715 void
 716 set_utmpx_time(struct logininfo *li, struct utmpx *utx)
 717 {
 718 # if defined(HAVE_TV_IN_UTMPX)
 719         utx->ut_tv.tv_sec = li->tv_sec;
 720         utx->ut_tv.tv_usec = li->tv_usec;
 721 # elif defined(HAVE_TIME_IN_UTMPX)
 722         utx->ut_time = li->tv_sec;
 723 # endif
 724 }
 725
 726 void
 727 construct_utmpx(struct logininfo *li, struct utmpx *utx)
 728 {
 729 # ifdef HAVE_ADDR_V6_IN_UTMP
 730         struct sockaddr_in6 *sa6;
 731 #  endif
 732         memset(utx, '\0', sizeof(*utx));
 733
 734 # ifdef HAVE_ID_IN_UTMPX
 735         line_abbrevname(utx->ut_id, li->line, sizeof(utx->ut_id));
 736 # endif
 737
 738         /* this is done here to keep utmp constants out of loginrec.h */
 739         switch (li->type) {
 740         case LTYPE_LOGIN:
 741                 utx->ut_type = USER_PROCESS;
 742                 break;
 743         case LTYPE_LOGOUT:
 744                 utx->ut_type = DEAD_PROCESS;
 745                 break;
 746         }
 747         line_stripname(utx->ut_line, li->line, sizeof(utx->ut_line));
 748         set_utmpx_time(li, utx);
 749         utx->ut_pid = li->pid;
 750
 751         /* strncpy(): Don't necessarily want null termination */
 752         strncpy(utx->ut_name, li->username,
 753             MIN_SIZEOF(utx->ut_name, li->username));
 754
 755         if (li->type == LTYPE_LOGOUT)
 756                 return;
 757
 758         /*
 759          * These fields are only used when logging in, and are blank
 760          * for logouts.
 761          */
 762
 763 # ifdef HAVE_HOST_IN_UTMPX
 764         strncpy(utx->ut_host, li->hostname,
 765             MIN_SIZEOF(utx->ut_host, li->hostname));
 766 # endif
 767 # ifdef HAVE_ADDR_IN_UTMPX
 768         /* this is just a 32-bit IP address */
 769         if (li->hostaddr.sa.sa_family == AF_INET)
 770                 utx->ut_addr = li->hostaddr.sa_in.sin_addr.s_addr;
 771 # endif
 772 # ifdef HAVE_ADDR_V6_IN_UTMP
 773         /* this is just a 128-bit IPv6 address */
 774         if (li->hostaddr.sa.sa_family == AF_INET6) {
 775                 sa6 = ((struct sockaddr_in6 *)&li->hostaddr.sa);
 776                 memcpy(ut->ut_addr_v6, sa6->sin6_addr.s6_addr, 16);
 777                 if (IN6_IS_ADDR_V4MAPPED(&sa6->sin6_addr)) {
 778                         ut->ut_addr_v6[0] = ut->ut_addr_v6[3];
 779                         ut->ut_addr_v6[1] = 0;
 780                         ut->ut_addr_v6[2] = 0;
 781                         ut->ut_addr_v6[3] = 0;
 782                 }
 783         }
 784 # endif
 785 # ifdef HAVE_SYSLEN_IN_UTMPX
 786         /* ut_syslen is the length of the utx_host string */
 787         utx->ut_syslen = MIN(strlen(li->hostname), sizeof(utx->ut_host));
 788 # endif
 789 }
 790 #endif /* USE_UTMPX || USE_WTMPX */
 791
 792 /**
 793  ** Low-level utmp functions
 794  **/
 795
 796 /* FIXME: (ATL) utmp_write_direct needs testing */
 797 #ifdef USE_UTMP
 798
 799 /* if we can, use pututline() etc. */
 800 # if !defined(DISABLE_PUTUTLINE) && defined(HAVE_SETUTENT) && \
 801         defined(HAVE_PUTUTLINE)
 802 #  define UTMP_USE_LIBRARY
 803 # endif
 804
 805
 806 /* write a utmp entry with the system's help (pututline() and pals) */
 807 # ifdef UTMP_USE_LIBRARY
 808 static int
 809 utmp_write_library(struct logininfo *li, struct utmp *ut)
 810 {
 811         setutent();
 812         pututline(ut);
 813 #  ifdef HAVE_ENDUTENT
 814         endutent();
 815 #  endif
 816         return (1);
 817 }
 818 # else /* UTMP_USE_LIBRARY */
 819
 820 /*
 821  * Write a utmp entry direct to the file
 822  * This is a slightly modification of code in OpenBSD's login.c
 823  */
 824 static int
 825 utmp_write_direct(struct logininfo *li, struct utmp *ut)
 826 {
 827         struct utmp old_ut;
 828         register int fd;
 829         int tty;
 830
 831         /* FIXME: (ATL) ttyslot() needs local implementation */
 832
 833 #if defined(HAVE_GETTTYENT)
 834         struct ttyent *ty;
 835
 836         tty=0;
 837         setttyent();
 838         while (NULL != (ty = getttyent())) {
 839                 tty++;
 840                 if (!strncmp(ty->ty_name, ut->ut_line, sizeof(ut->ut_line)))
 841                         break;
 842         }
 843         endttyent();
 844
 845         if (NULL == ty) {
 846                 logit("%s: tty not found", __func__);
 847                 return (0);
 848         }
 849 #else /* FIXME */
 850
 851         tty = ttyslot(); /* seems only to work for /dev/ttyp? style names */
 852
 853 #endif /* HAVE_GETTTYENT */
 854
 855         if (tty > 0 && (fd = open(UTMP_FILE, O_RDWR|O_CREAT, 0644)) >= 0) {
 856                 off_t pos, ret;
 857
 858                 pos = (off_t)tty * sizeof(struct utmp);
 859                 if ((ret = lseek(fd, pos, SEEK_SET)) == -1) {
 860                         logit("%s: lseek: %s", __func__, strerror(errno));
 861                         return (0);
 862                 }
 863                 if (ret != pos) {
 864                         logit("%s: Couldn't seek to tty %d slot in %s",
 865                             __func__, tty, UTMP_FILE);
 866                         return (0);
 867                 }
 868                 /*
 869                  * Prevent luser from zero'ing out ut_host.
 870                  * If the new ut_line is empty but the old one is not
 871                  * and ut_line and ut_name match, preserve the old ut_line.
 872                  */
 873                 if (atomicio(read, fd, &old_ut, sizeof(old_ut)) == sizeof(old_ut) &&
 874                     (ut->ut_host[0] == '\0') && (old_ut.ut_host[0] != '\0') &&
 875                     (strncmp(old_ut.ut_line, ut->ut_line, sizeof(ut->ut_line)) == 0) &&
 876                     (strncmp(old_ut.ut_name, ut->ut_name, sizeof(ut->ut_name)) == 0))
 877                         memcpy(ut->ut_host, old_ut.ut_host, sizeof(ut->ut_host));
 878
 879                 if ((ret = lseek(fd, pos, SEEK_SET)) == -1) {
 880                         logit("%s: lseek: %s", __func__, strerror(errno));
 881                         return (0);
 882                 }
 883                 if (ret != pos) {
 884                         logit("%s: Couldn't seek to tty %d slot in %s",
 885                             __func__, tty, UTMP_FILE);
 886                         return (0);
 887                 }
 888                 if (atomicio(vwrite, fd, ut, sizeof(*ut)) != sizeof(*ut)) {
 889                         logit("%s: error writing %s: %s", __func__,
 890                             UTMP_FILE, strerror(errno));
 891                 }
 892
 893                 close(fd);
 894                 return (1);
 895         } else {
 896                 return (0);
 897         }
 898 }
 899 # endif /* UTMP_USE_LIBRARY */
 900
 901 static int
 902 utmp_perform_login(struct logininfo *li)
 903 {
 904         struct utmp ut;
 905
 906         construct_utmp(li, &ut);
 907 # ifdef UTMP_USE_LIBRARY
 908         if (!utmp_write_library(li, &ut)) {
 909                 logit("%s: utmp_write_library() failed", __func__);
 910                 return (0);
 911         }
 912 # else
 913         if (!utmp_write_direct(li, &ut)) {
 914                 logit("%s: utmp_write_direct() failed", __func__);
 915                 return (0);
 916         }
 917 # endif
 918         return (1);
 919 }
 920
 921
 922 static int
 923 utmp_perform_logout(struct logininfo *li)
 924 {
 925         struct utmp ut;
 926
 927         construct_utmp(li, &ut);
 928 # ifdef UTMP_USE_LIBRARY
 929         if (!utmp_write_library(li, &ut)) {
 930                 logit("%s: utmp_write_library() failed", __func__);
 931                 return (0);
 932         }
 933 # else
 934         if (!utmp_write_direct(li, &ut)) {
 935                 logit("%s: utmp_write_direct() failed", __func__);
 936                 return (0);
 937         }
 938 # endif
 939         return (1);
 940 }
 941
 942
 943 int
 944 utmp_write_entry(struct logininfo *li)
 945 {
 946         switch(li->type) {
 947         case LTYPE_LOGIN:
 948                 return (utmp_perform_login(li));
 949
 950         case LTYPE_LOGOUT:
 951                 return (utmp_perform_logout(li));
 952
 953         default:
 954                 logit("%s: invalid type field", __func__);
 955                 return (0);
 956         }
 957 }
 958 #endif /* USE_UTMP */
 959
 960
 961 /**
 962  ** Low-level utmpx functions
 963  **/
 964
 965 /* not much point if we don't want utmpx entries */
 966 #ifdef USE_UTMPX
 967
 968 /* if we have the wherewithall, use pututxline etc. */
 969 # if !defined(DISABLE_PUTUTXLINE) && defined(HAVE_SETUTXENT) && \
 970         defined(HAVE_PUTUTXLINE)
 971 #  define UTMPX_USE_LIBRARY
 972 # endif
 973
 974
 975 /* write a utmpx entry with the system's help (pututxline() and pals) */
 976 # ifdef UTMPX_USE_LIBRARY
 977 static int
 978 utmpx_write_library(struct logininfo *li, struct utmpx *utx)
 979 {
 980         setutxent();
 981         pututxline(utx);
 982
 983 #  ifdef HAVE_ENDUTXENT
 984         endutxent();
 985 #  endif
 986         return (1);
 987 }
 988
 989 # else /* UTMPX_USE_LIBRARY */
 990
 991 /* write a utmp entry direct to the file */
 992 static int
 993 utmpx_write_direct(struct logininfo *li, struct utmpx *utx)
 994 {
 995         logit("%s: not implemented!", __func__);
 996         return (0);
 997 }
 998 # endif /* UTMPX_USE_LIBRARY */
 999
1000 static int
1001 utmpx_perform_login(struct logininfo *li)
1002 {
1003         struct utmpx utx;
1004
1005         construct_utmpx(li, &utx);
1006 # ifdef UTMPX_USE_LIBRARY
1007         if (!utmpx_write_library(li, &utx)) {
1008                 logit("%s: utmp_write_library() failed", __func__);
1009                 return (0);
1010         }
1011 # else
1012         if (!utmpx_write_direct(li, &ut)) {
1013                 logit("%s: utmp_write_direct() failed", __func__);
1014                 return (0);
1015         }
1016 # endif
1017         return (1);
1018 }
1019
1020
1021 static int
1022 utmpx_perform_logout(struct logininfo *li)
1023 {
1024         struct utmpx utx;
1025
1026         construct_utmpx(li, &utx);
1027 # ifdef HAVE_ID_IN_UTMPX
1028         line_abbrevname(utx.ut_id, li->line, sizeof(utx.ut_id));
1029 # endif
1030 # ifdef HAVE_TYPE_IN_UTMPX
1031         utx.ut_type = DEAD_PROCESS;
1032 # endif
1033
1034 # ifdef UTMPX_USE_LIBRARY
1035         utmpx_write_library(li, &utx);
1036 # else
1037         utmpx_write_direct(li, &utx);
1038 # endif
1039         return (1);
1040 }
1041
1042 int
1043 utmpx_write_entry(struct logininfo *li)
1044 {
1045         switch(li->type) {
1046         case LTYPE_LOGIN:
1047                 return (utmpx_perform_login(li));
1048         case LTYPE_LOGOUT:
1049                 return (utmpx_perform_logout(li));
1050         default:
1051                 logit("%s: invalid type field", __func__);
1052                 return (0);
1053         }
1054 }
1055 #endif /* USE_UTMPX */
1056
1057
1058 /**
1059  ** Low-level wtmp functions
1060  **/
1061
1062 #ifdef USE_WTMP
1063
1064 /*
1065  * Write a wtmp entry direct to the end of the file
1066  * This is a slight modification of code in OpenBSD's logwtmp.c
1067  */
1068 static int
1069 wtmp_write(struct logininfo *li, struct utmp *ut)
1070 {
1071         struct stat buf;
1072         int fd, ret = 1;
1073
1074         if ((fd = open(WTMP_FILE, O_WRONLY|O_APPEND, 0)) < 0) {
1075                 logit("%s: problem writing %s: %s", __func__,
1076                     WTMP_FILE, strerror(errno));
1077                 return (0);
1078         }
1079         if (fstat(fd, &buf) == 0)
1080                 if (atomicio(vwrite, fd, ut, sizeof(*ut)) != sizeof(*ut)) {
1081                         ftruncate(fd, buf.st_size);
1082                         logit("%s: problem writing %s: %s", __func__,
1083                             WTMP_FILE, strerror(errno));
1084                         ret = 0;
1085                 }
1086         close(fd);
1087         return (ret);
1088 }
1089
1090 static int
1091 wtmp_perform_login(struct logininfo *li)
1092 {
1093         struct utmp ut;
1094
1095         construct_utmp(li, &ut);
1096         return (wtmp_write(li, &ut));
1097 }
1098
1099
1100 static int
1101 wtmp_perform_logout(struct logininfo *li)
1102 {
1103         struct utmp ut;
1104
1105         construct_utmp(li, &ut);
1106         return (wtmp_write(li, &ut));
1107 }
1108
1109
1110 int
1111 wtmp_write_entry(struct logininfo *li)
1112 {
1113         switch(li->type) {
1114         case LTYPE_LOGIN:
1115                 return (wtmp_perform_login(li));
1116         case LTYPE_LOGOUT:
1117                 return (wtmp_perform_logout(li));
1118         default:
1119                 logit("%s: invalid type field", __func__);
1120                 return (0);
1121         }
1122 }
1123
1124
1125 /*
1126  * Notes on fetching login data from wtmp/wtmpx
1127  *
1128  * Logouts are usually recorded with (amongst other things) a blank
1129  * username on a given tty line.  However, some systems (HP-UX is one)
1130  * leave all fields set, but change the ut_type field to DEAD_PROCESS.
1131  *
1132  * Since we're only looking for logins here, we know that the username
1133  * must be set correctly. On systems that leave it in, we check for
1134  * ut_type==USER_PROCESS (indicating a login.)
1135  *
1136  * Portability: Some systems may set something other than USER_PROCESS
1137  * to indicate a login process. I don't know of any as I write. Also,
1138  * it's possible that some systems may both leave the username in
1139  * place and not have ut_type.
1140  */
1141
1142 /* return true if this wtmp entry indicates a login */
1143 static int
1144 wtmp_islogin(struct logininfo *li, struct utmp *ut)
1145 {
1146         if (strncmp(li->username, ut->ut_name,
1147             MIN_SIZEOF(li->username, ut->ut_name)) == 0) {
1148 # ifdef HAVE_TYPE_IN_UTMP
1149                 if (ut->ut_type & USER_PROCESS)
1150                         return (1);
1151 # else
1152                 return (1);
1153 # endif
1154         }
1155         return (0);
1156 }
1157
1158 int
1159 wtmp_get_entry(struct logininfo *li)
1160 {
1161         struct stat st;
1162         struct utmp ut;
1163         int fd, found = 0;
1164
1165         /* Clear the time entries in our logininfo */
1166         li->tv_sec = li->tv_usec = 0;
1167
1168         if ((fd = open(WTMP_FILE, O_RDONLY)) < 0) {
1169                 logit("%s: problem opening %s: %s", __func__,
1170                     WTMP_FILE, strerror(errno));
1171                 return (0);
1172         }
1173         if (fstat(fd, &st) != 0) {
1174                 logit("%s: couldn't stat %s: %s", __func__,
1175                     WTMP_FILE, strerror(errno));
1176                 close(fd);
1177                 return (0);
1178         }
1179
1180         /* Seek to the start of the last struct utmp */
1181         if (lseek(fd, -(off_t)sizeof(struct utmp), SEEK_END) == -1) {
1182                 /* Looks like we've got a fresh wtmp file */
1183                 close(fd);
1184                 return (0);
1185         }
1186
1187         while (!found) {
1188                 if (atomicio(read, fd, &ut, sizeof(ut)) != sizeof(ut)) {
1189                         logit("%s: read of %s failed: %s", __func__,
1190                             WTMP_FILE, strerror(errno));
1191                         close (fd);
1192                         return (0);
1193                 }
1194                 if ( wtmp_islogin(li, &ut) ) {
1195                         found = 1;
1196                         /*
1197                          * We've already checked for a time in struct
1198                          * utmp, in login_getlast()
1199                          */
1200 # ifdef HAVE_TIME_IN_UTMP
1201                         li->tv_sec = ut.ut_time;
1202 # else
1203 #  if HAVE_TV_IN_UTMP
1204                         li->tv_sec = ut.ut_tv.tv_sec;
1205 #  endif
1206 # endif
1207                         line_fullname(li->line, ut.ut_line,
1208                             MIN_SIZEOF(li->line, ut.ut_line));
1209 # ifdef HAVE_HOST_IN_UTMP
1210                         strlcpy(li->hostname, ut.ut_host,
1211                             MIN_SIZEOF(li->hostname, ut.ut_host));
1212 # endif
1213                         continue;
1214                 }
1215                 /* Seek back 2 x struct utmp */
1216                 if (lseek(fd, -(off_t)(2 * sizeof(struct utmp)), SEEK_CUR) == -1) {
1217                         /* We've found the start of the file, so quit */
1218                         close(fd);
1219                         return (0);
1220                 }
1221         }
1222
1223         /* We found an entry. Tidy up and return */
1224         close(fd);
1225         return (1);
1226 }
1227 # endif /* USE_WTMP */
1228
1229
1230 /**
1231  ** Low-level wtmpx functions
1232  **/
1233
1234 #ifdef USE_WTMPX
1235 /*
1236  * Write a wtmpx entry direct to the end of the file
1237  * This is a slight modification of code in OpenBSD's logwtmp.c
1238  */
1239 static int
1240 wtmpx_write(struct logininfo *li, struct utmpx *utx)
1241 {
1242 #ifndef HAVE_UPDWTMPX
1243         struct stat buf;
1244         int fd, ret = 1;
1245
1246         if ((fd = open(WTMPX_FILE, O_WRONLY|O_APPEND, 0)) < 0) {
1247                 logit("%s: problem opening %s: %s", __func__,
1248                     WTMPX_FILE, strerror(errno));
1249                 return (0);
1250         }
1251
1252         if (fstat(fd, &buf) == 0)
1253                 if (atomicio(vwrite, fd, utx, sizeof(*utx)) != sizeof(*utx)) {
1254                         ftruncate(fd, buf.st_size);
1255                         logit("%s: problem writing %s: %s", __func__,
1256                             WTMPX_FILE, strerror(errno));
1257                         ret = 0;
1258                 }
1259         close(fd);
1260
1261         return (ret);
1262 #else
1263         updwtmpx(WTMPX_FILE, utx);
1264         return (1);
1265 #endif
1266 }
1267
1268
1269 static int
1270 wtmpx_perform_login(struct logininfo *li)
1271 {
1272         struct utmpx utx;
1273
1274         construct_utmpx(li, &utx);
1275         return (wtmpx_write(li, &utx));
1276 }
1277
1278
1279 static int
1280 wtmpx_perform_logout(struct logininfo *li)
1281 {
1282         struct utmpx utx;
1283
1284         construct_utmpx(li, &utx);
1285         return (wtmpx_write(li, &utx));
1286 }
1287
1288
1289 int
1290 wtmpx_write_entry(struct logininfo *li)
1291 {
1292         switch(li->type) {
1293         case LTYPE_LOGIN:
1294                 return (wtmpx_perform_login(li));
1295         case LTYPE_LOGOUT:
1296                 return (wtmpx_perform_logout(li));
1297         default:
1298                 logit("%s: invalid type field", __func__);
1299                 return (0);
1300         }
1301 }
1302
1303 /* Please see the notes above wtmp_islogin() for information about the
1304    next two functions */
1305
1306 /* Return true if this wtmpx entry indicates a login */
1307 static int
1308 wtmpx_islogin(struct logininfo *li, struct utmpx *utx)
1309 {
1310         if (strncmp(li->username, utx->ut_name,
1311             MIN_SIZEOF(li->username, utx->ut_name)) == 0 ) {
1312 # ifdef HAVE_TYPE_IN_UTMPX
1313                 if (utx->ut_type == USER_PROCESS)
1314                         return (1);
1315 # else
1316                 return (1);
1317 # endif
1318         }
1319         return (0);
1320 }
1321
1322
1323 int
1324 wtmpx_get_entry(struct logininfo *li)
1325 {
1326         struct stat st;
1327         struct utmpx utx;
1328         int fd, found=0;
1329
1330         /* Clear the time entries */
1331         li->tv_sec = li->tv_usec = 0;
1332
1333         if ((fd = open(WTMPX_FILE, O_RDONLY)) < 0) {
1334                 logit("%s: problem opening %s: %s", __func__,
1335                     WTMPX_FILE, strerror(errno));
1336                 return (0);
1337         }
1338         if (fstat(fd, &st) != 0) {
1339                 logit("%s: couldn't stat %s: %s", __func__,
1340                     WTMPX_FILE, strerror(errno));
1341                 close(fd);
1342                 return (0);
1343         }
1344
1345         /* Seek to the start of the last struct utmpx */
1346         if (lseek(fd, -(off_t)sizeof(struct utmpx), SEEK_END) == -1 ) {
1347                 /* probably a newly rotated wtmpx file */
1348                 close(fd);
1349                 return (0);
1350         }
1351
1352         while (!found) {
1353                 if (atomicio(read, fd, &utx, sizeof(utx)) != sizeof(utx)) {
1354                         logit("%s: read of %s failed: %s", __func__,
1355                             WTMPX_FILE, strerror(errno));
1356                         close (fd);
1357                         return (0);
1358                 }
1359                 /*
1360                  * Logouts are recorded as a blank username on a particular
1361                  * line. So, we just need to find the username in struct utmpx
1362                  */
1363                 if (wtmpx_islogin(li, &utx)) {
1364                         found = 1;
1365 # if defined(HAVE_TV_IN_UTMPX)
1366                         li->tv_sec = utx.ut_tv.tv_sec;
1367 # elif defined(HAVE_TIME_IN_UTMPX)
1368                         li->tv_sec = utx.ut_time;
1369 # endif
1370                         line_fullname(li->line, utx.ut_line, sizeof(li->line));
1371 # if defined(HAVE_HOST_IN_UTMPX)
1372                         strlcpy(li->hostname, utx.ut_host,
1373                             MIN_SIZEOF(li->hostname, utx.ut_host));
1374 # endif
1375                         continue;
1376                 }
1377                 if (lseek(fd, -(off_t)(2 * sizeof(struct utmpx)), SEEK_CUR) == -1) {
1378                         close(fd);
1379                         return (0);
1380                 }
1381         }
1382
1383         close(fd);
1384         return (1);
1385 }
1386 #endif /* USE_WTMPX */
1387
1388 /**
1389  ** Low-level libutil login() functions
1390  **/
1391
1392 #ifdef USE_LOGIN
1393 static int
1394 syslogin_perform_login(struct logininfo *li)
1395 {
1396         struct utmp *ut;
1397
1398         ut = xmalloc(sizeof(*ut));
1399         construct_utmp(li, ut);
1400         login(ut);
1401         free(ut);
1402
1403         return (1);
1404 }
1405
1406 static int
1407 syslogin_perform_logout(struct logininfo *li)
1408 {
1409 # ifdef HAVE_LOGOUT
1410         char line[UT_LINESIZE];
1411
1412         (void)line_stripname(line, li->line, sizeof(line));
1413
1414         if (!logout(line))
1415                 logit("%s: logout() returned an error", __func__);
1416 #  ifdef HAVE_LOGWTMP
1417         else
1418                 logwtmp(line, "", "");
1419 #  endif
1420         /* FIXME: (ATL - if the need arises) What to do if we have
1421          * login, but no logout?  what if logout but no logwtmp? All
1422          * routines are in libutil so they should all be there,
1423          * but... */
1424 # endif
1425         return (1);
1426 }
1427
1428 int
1429 syslogin_write_entry(struct logininfo *li)
1430 {
1431         switch (li->type) {
1432         case LTYPE_LOGIN:
1433                 return (syslogin_perform_login(li));
1434         case LTYPE_LOGOUT:
1435                 return (syslogin_perform_logout(li));
1436         default:
1437                 logit("%s: Invalid type field", __func__);
1438                 return (0);
1439         }
1440 }
1441 #endif /* USE_LOGIN */
1442
1443 /* end of file log-syslogin.c */
1444
1445 /**
1446  ** Low-level lastlog functions
1447  **/
1448
1449 #ifdef USE_LASTLOG
1450 #define LL_FILE 1
1451 #define LL_DIR 2
1452 #define LL_OTHER 3
1453
1454 static void
1455 lastlog_construct(struct logininfo *li, struct lastlog *last)
1456 {
1457         /* clear the structure */
1458         memset(last, '\0', sizeof(*last));
1459
1460         line_stripname(last->ll_line, li->line, sizeof(last->ll_line));
1461         strlcpy(last->ll_host, li->hostname,
1462                 MIN_SIZEOF(last->ll_host, li->hostname));
1463         last->ll_time = li->tv_sec;
1464 }
1465
1466 static int
1467 lastlog_filetype(char *filename)
1468 {
1469         struct stat st;
1470
1471         if (stat(LASTLOG_FILE, &st) != 0) {
1472                 logit("%s: Couldn't stat %s: %s", __func__,
1473                     LASTLOG_FILE, strerror(errno));
1474                 return (0);
1475         }
1476         if (S_ISDIR(st.st_mode))
1477                 return (LL_DIR);
1478         else if (S_ISREG(st.st_mode))
1479                 return (LL_FILE);
1480         else
1481                 return (LL_OTHER);
1482 }
1483
1484
1485 /* open the file (using filemode) and seek to the login entry */
1486 static int
1487 lastlog_openseek(struct logininfo *li, int *fd, int filemode)
1488 {
1489         off_t offset;
1490         int type;
1491         char lastlog_file[1024];
1492
1493         type = lastlog_filetype(LASTLOG_FILE);
1494         switch (type) {
1495         case LL_FILE:
1496                 strlcpy(lastlog_file, LASTLOG_FILE,
1497                     sizeof(lastlog_file));
1498                 break;
1499         case LL_DIR:
1500                 snprintf(lastlog_file, sizeof(lastlog_file), "%s/%s",
1501                     LASTLOG_FILE, li->username);
1502                 break;
1503         default:
1504                 logit("%s: %.100s is not a file or directory!", __func__,
1505                     LASTLOG_FILE);
1506                 return (0);
1507         }
1508
1509         *fd = open(lastlog_file, filemode, 0600);
1510         if (*fd < 0) {
1511                 debug("%s: Couldn't open %s: %s", __func__,
1512                     lastlog_file, strerror(errno));
1513                 return (0);
1514         }
1515
1516         if (type == LL_FILE) {
1517                 /* find this uid's offset in the lastlog file */
1518                 offset = (off_t) ((long)li->uid * sizeof(struct lastlog));
1519
1520                 if (lseek(*fd, offset, SEEK_SET) != offset) {
1521                         logit("%s: %s->lseek(): %s", __func__,
1522                             lastlog_file, strerror(errno));
1523                         return (0);
1524                 }
1525         }
1526
1527         return (1);
1528 }
1529
1530 static int
1531 lastlog_perform_login(struct logininfo *li)
1532 {
1533         struct lastlog last;
1534         int fd;
1535
1536         /* create our struct lastlog */
1537         lastlog_construct(li, &last);
1538
1539         if (!lastlog_openseek(li, &fd, O_RDWR|O_CREAT))
1540                 return (0);
1541
1542         /* write the entry */
1543         if (atomicio(vwrite, fd, &last, sizeof(last)) != sizeof(last)) {
1544                 close(fd);
1545                 logit("%s: Error writing to %s: %s", __func__,
1546                     LASTLOG_FILE, strerror(errno));
1547                 return (0);
1548         }
1549
1550         close(fd);
1551         return (1);
1552 }
1553
1554 int
1555 lastlog_write_entry(struct logininfo *li)
1556 {
1557         switch(li->type) {
1558         case LTYPE_LOGIN:
1559                 return (lastlog_perform_login(li));
1560         default:
1561                 logit("%s: Invalid type field", __func__);
1562                 return (0);
1563         }
1564 }
1565
1566 static void
1567 lastlog_populate_entry(struct logininfo *li, struct lastlog *last)
1568 {
1569         line_fullname(li->line, last->ll_line, sizeof(li->line));
1570         strlcpy(li->hostname, last->ll_host,
1571             MIN_SIZEOF(li->hostname, last->ll_host));
1572         li->tv_sec = last->ll_time;
1573 }
1574
1575 int
1576 lastlog_get_entry(struct logininfo *li)
1577 {
1578         struct lastlog last;
1579         int fd, ret;
1580
1581         if (!lastlog_openseek(li, &fd, O_RDONLY))
1582                 return (0);
1583
1584         ret = atomicio(read, fd, &last, sizeof(last));
1585         close(fd);
1586
1587         switch (ret) {
1588         case 0:
1589                 memset(&last, '\0', sizeof(last));
1590                 /* FALLTHRU */
1591         case sizeof(last):
1592                 lastlog_populate_entry(li, &last);
1593                 return (1);
1594         case -1:
1595                 error("%s: Error reading from %s: %s", __func__,
1596                     LASTLOG_FILE, strerror(errno));
1597                 return (0);
1598         default:
1599                 error("%s: Error reading from %s: Expecting %d, got %d",
1600                     __func__, LASTLOG_FILE, (int)sizeof(last), ret);
1601                 return (0);
1602         }
1603
1604         /* NOTREACHED */
1605         return (0);
1606 }
1607 #endif /* USE_LASTLOG */
1608
1609 #ifdef USE_BTMP
1610   /*
1611    * Logs failed login attempts in _PATH_BTMP if that exists.
1612    * The most common login failure is to give password instead of username.
1613    * So the _PATH_BTMP file checked for the correct permission, so that
1614    * only root can read it.
1615    */
1616
1617 void
1618 record_failed_login(const char *username, const char *hostname,
1619     const char *ttyn)
1620 {
1621         int fd;
1622         struct utmp ut;
1623         struct sockaddr_storage from;
1624         socklen_t fromlen = sizeof(from);
1625         struct sockaddr_in *a4;
1626         struct sockaddr_in6 *a6;
1627         time_t t;
1628         struct stat fst;
1629
1630         if (geteuid() != 0)
1631                 return;
1632         if ((fd = open(_PATH_BTMP, O_WRONLY | O_APPEND)) < 0) {
1633                 debug("Unable to open the btmp file %s: %s", _PATH_BTMP,
1634                     strerror(errno));
1635                 return;
1636         }
1637         if (fstat(fd, &fst) < 0) {
1638                 logit("%s: fstat of %s failed: %s", __func__, _PATH_BTMP,
1639                     strerror(errno));
1640                 goto out;
1641         }
1642         if((fst.st_mode & (S_IRWXG | S_IRWXO)) || (fst.st_uid != 0)){
1643                 logit("Excess permission or bad ownership on file %s",
1644                     _PATH_BTMP);
1645                 goto out;
1646         }
1647
1648         memset(&ut, 0, sizeof(ut));
1649         /* strncpy because we don't necessarily want nul termination */
1650         strncpy(ut.ut_user, username, sizeof(ut.ut_user));
1651         strlcpy(ut.ut_line, "ssh:notty", sizeof(ut.ut_line));
1652
1653         time(&t);
1654         ut.ut_time = t;     /* ut_time is not always a time_t */
1655         ut.ut_type = LOGIN_PROCESS;
1656         ut.ut_pid = getpid();
1657
1658         /* strncpy because we don't necessarily want nul termination */
1659         strncpy(ut.ut_host, hostname, sizeof(ut.ut_host));
1660
1661         if (packet_connection_is_on_socket() &&
1662             getpeername(packet_get_connection_in(),
1663             (struct sockaddr *)&from, &fromlen) == 0) {
1664                 ipv64_normalise_mapped(&from, &fromlen);
1665                 if (from.ss_family == AF_INET) {
1666                         a4 = (struct sockaddr_in *)&from;
1667                         memcpy(&ut.ut_addr, &(a4->sin_addr),
1668                             MIN_SIZEOF(ut.ut_addr, a4->sin_addr));
1669                 }
1670 #ifdef HAVE_ADDR_V6_IN_UTMP
1671                 if (from.ss_family == AF_INET6) {
1672                         a6 = (struct sockaddr_in6 *)&from;
1673                         memcpy(&ut.ut_addr_v6, &(a6->sin6_addr),
1674                             MIN_SIZEOF(ut.ut_addr_v6, a6->sin6_addr));
1675                 }
1676 #endif
1677         }
1678
1679         if (atomicio(vwrite, fd, &ut, sizeof(ut)) != sizeof(ut))
1680                 error("Failed to write to %s: %s", _PATH_BTMP,
1681                     strerror(errno));
1682
1683 out:
1684         close(fd);
1685 }
1686 #endif  /* USE_BTMP */