Sat May 18 02:57:46 1996 Ulrich Drepper <drepper@cygnus.com>
[kopensolaris-gnu/glibc.git] / login / pututline_r.c
1 /* Copyright (C) 1996 Free Software Foundation, Inc.
2 This file is part of the GNU C Library.
3 Contributed by Ulrich Drepper <drepper@cygnus.com>, 1996.
4
5 The GNU C Library is free software; you can redistribute it and/or
6 modify it under the terms of the GNU Library General Public License as
7 published by the Free Software Foundation; either version 2 of the
8 License, or (at your option) any later version.
9
10 The GNU C Library is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13 Library General Public License for more details.
14
15 You should have received a copy of the GNU Library General Public
16 License along with the GNU C Library; see the file COPYING.LIB.  If
17 not, write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
18 Boston, MA 02111-1307, USA.  */
19
20 #include <alloca.h>
21 #include <errno.h>
22 #include <stdlib.h>
23 #include <string.h>
24 #include <unistd.h>
25 #include <utmp.h>
26 #include <sys/file.h>
27
28
29 int
30 pututline_r (const struct utmp *utmp_ptr, struct utmp_data *utmp_data)
31 {
32   /* Open utmp file if not already done.  */
33   if (utmp_data->ut_fd == -1)
34     {
35       setutent_r (utmp_data);
36       if (utmp_data->ut_fd == -1)
37         return -1;
38     }
39
40   /* Seek position to write.  */
41   if (utmp_data->ubuf.ut_type != utmp_ptr->ut_type)
42     {
43       /* We must not overwrite the data in UTMP_DATA.  */
44       struct utmp_data *data_tmp = alloca (sizeof (utmp_data));
45       struct utmp *dummy;
46
47       memcpy (data_tmp, utmp_data, sizeof (utmp_data));
48       utmp_data = data_tmp;
49       
50       if (getutid_r (utmp_ptr, &dummy, utmp_data) < 0)
51         {
52           if (errno != ESRCH)
53             return -1;
54
55           utmp_data->loc_utmp = lseek (utmp_data->ut_fd, 0, SEEK_END);
56           if (utmp_data->loc_utmp == -1)
57             return -1;
58         }
59     }
60
61   /* Position file correctly.  */
62   if (utmp_data->loc_utmp > 0
63       && lseek (utmp_data->ut_fd, utmp_data->loc_utmp - sizeof (struct utmp),
64                 SEEK_SET) < 0)
65     return -1;
66
67   /* XXX An alternative solution would be to call an SUID root program
68      which write the new value.  */
69   
70   /* Try to lock the file.  */
71   if (flock (utmp_data->ut_fd, LOCK_EX | LOCK_NB) < 0 && errno != ENOSYS)
72     {
73       /* Oh, oh.  The file is already locked.  Wait a bit and try again.  */
74       sleep (1);
75
76       /* This time we ignore the error.  */
77       (void) flock (utmp_data->ut_fd, LOCK_EX | LOCK_NB);
78     }
79   
80   /* Write the new data.  */
81   if (write (utmp_data->ut_fd, &utmp_data->ubuf, sizeof (struct utmp))
82       != sizeof (struct utmp))
83     return -1;
84
85   /* And unlock the file.  */
86   (void) flock (utmp_data->ut_fd, LOCK_UN);
87
88   return 0;
89 }