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