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