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