openbsd-compat/bsd-misc.c

   1
   2 /*
   3  * Copyright (c) 1999-2004 Damien Miller <djm@mindrot.org>
   4  *
   5  * Permission to use, copy, modify, and distribute this software for any
   6  * purpose with or without fee is hereby granted, provided that the above
   7  * copyright notice and this permission notice appear in all copies.
   8  *
   9  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
  10  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
  11  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
  12  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
  13  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
  14  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
  15  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
  16  */
  17
  18 #include "includes.h"
  19
  20 #include <sys/types.h>
  21 #ifdef HAVE_SYS_SELECT_H
  22 # include <sys/select.h>
  23 #endif
  24 #ifdef HAVE_SYS_TIME_H
  25 # include <sys/time.h>
  26 #endif
  27
  28 #include <string.h>
  29 #include <signal.h>
  30 #include <stdlib.h>
  31 #include <unistd.h>
  32
  33 #include "xmalloc.h"
  34
  35 #ifndef HAVE___PROGNAME
  36 char *__progname;
  37 #endif
  38
  39 /*
  40  * NB. duplicate __progname in case it is an alias for argv[0]
  41  * Otherwise it may get clobbered by setproctitle()
  42  */
  43 char *ssh_get_progname(char *argv0)
  44 {
  45 #ifdef HAVE___PROGNAME
  46         extern char *__progname;
  47
  48         return xstrdup(__progname);
  49 #else
  50         char *p;
  51
  52         if (argv0 == NULL)
  53                 return ("unknown");     /* XXX */
  54         p = strrchr(argv0, '/');
  55         if (p == NULL)
  56                 p = argv0;
  57         else
  58                 p++;
  59
  60         return (xstrdup(p));
  61 #endif
  62 }
  63
  64 #ifndef HAVE_SETLOGIN
  65 int setlogin(const char *name)
  66 {
  67         return (0);
  68 }
  69 #endif /* !HAVE_SETLOGIN */
  70
  71 #ifndef HAVE_INNETGR
  72 int innetgr(const char *netgroup, const char *host,
  73             const char *user, const char *domain)
  74 {
  75         return (0);
  76 }
  77 #endif /* HAVE_INNETGR */
  78
  79 #if !defined(HAVE_SETEUID) && defined(HAVE_SETREUID)
  80 int seteuid(uid_t euid)
  81 {
  82         return (setreuid(-1, euid));
  83 }
  84 #endif /* !defined(HAVE_SETEUID) && defined(HAVE_SETREUID) */
  85
  86 #if !defined(HAVE_SETEGID) && defined(HAVE_SETRESGID)
  87 int setegid(uid_t egid)
  88 {
  89         return(setresgid(-1, egid, -1));
  90 }
  91 #endif /* !defined(HAVE_SETEGID) && defined(HAVE_SETRESGID) */
  92
  93 #if !defined(HAVE_STRERROR) && defined(HAVE_SYS_ERRLIST) && defined(HAVE_SYS_NERR)
  94 const char *strerror(int e)
  95 {
  96         extern int sys_nerr;
  97         extern char *sys_errlist[];
  98
  99         if ((e >= 0) && (e < sys_nerr))
 100                 return (sys_errlist[e]);
 101
 102         return ("unlisted error");
 103 }
 104 #endif
 105
 106 #ifndef HAVE_UTIMES
 107 int utimes(char *filename, struct timeval *tvp)
 108 {
 109         struct utimbuf ub;
 110
 111         ub.actime = tvp[0].tv_sec;
 112         ub.modtime = tvp[1].tv_sec;
 113
 114         return (utime(filename, &ub));
 115 }
 116 #endif
 117
 118 #ifndef HAVE_TRUNCATE
 119 int truncate(const char *path, off_t length)
 120 {
 121         int fd, ret, saverrno;
 122
 123         fd = open(path, O_WRONLY);
 124         if (fd < 0)
 125                 return (-1);
 126
 127         ret = ftruncate(fd, length);
 128         saverrno = errno;
 129         close(fd);
 130         if (ret == -1)
 131                 errno = saverrno;
 132
 133         return(ret);
 134 }
 135 #endif /* HAVE_TRUNCATE */
 136
 137 #if !defined(HAVE_NANOSLEEP) && !defined(HAVE_NSLEEP)
 138 int nanosleep(const struct timespec *req, struct timespec *rem)
 139 {
 140         int rc, saverrno;
 141         extern int errno;
 142         struct timeval tstart, tstop, tremain, time2wait;
 143
 144         TIMESPEC_TO_TIMEVAL(&time2wait, req)
 145         (void) gettimeofday(&tstart, NULL);
 146         rc = select(0, NULL, NULL, NULL, &time2wait);
 147         if (rc == -1) {
 148                 saverrno = errno;
 149                 (void) gettimeofday (&tstop, NULL);
 150                 errno = saverrno;
 151                 tremain.tv_sec = time2wait.tv_sec -
 152                         (tstop.tv_sec - tstart.tv_sec);
 153                 tremain.tv_usec = time2wait.tv_usec -
 154                         (tstop.tv_usec - tstart.tv_usec);
 155                 tremain.tv_sec += tremain.tv_usec / 1000000L;
 156                 tremain.tv_usec %= 1000000L;
 157         } else {
 158                 tremain.tv_sec = 0;
 159                 tremain.tv_usec = 0;
 160         }
 161         TIMEVAL_TO_TIMESPEC(&tremain, rem)
 162
 163         return(rc);
 164 }
 165 #endif
 166
 167 #ifndef HAVE_TCGETPGRP
 168 pid_t
 169 tcgetpgrp(int fd)
 170 {
 171         int ctty_pgrp;
 172
 173         if (ioctl(fd, TIOCGPGRP, &ctty_pgrp) == -1)
 174                 return(-1);
 175         else
 176                 return(ctty_pgrp);
 177 }
 178 #endif /* HAVE_TCGETPGRP */
 179
 180 #ifndef HAVE_TCSENDBREAK
 181 int
 182 tcsendbreak(int fd, int duration)
 183 {
 184 # if defined(TIOCSBRK) && defined(TIOCCBRK)
 185         struct timeval sleepytime;
 186
 187         sleepytime.tv_sec = 0;
 188         sleepytime.tv_usec = 400000;
 189         if (ioctl(fd, TIOCSBRK, 0) == -1)
 190                 return (-1);
 191         (void)select(0, 0, 0, 0, &sleepytime);
 192         if (ioctl(fd, TIOCCBRK, 0) == -1)
 193                 return (-1);
 194         return (0);
 195 # else
 196         return -1;
 197 # endif
 198 }
 199 #endif /* HAVE_TCSENDBREAK */
 200
 201 mysig_t
 202 mysignal(int sig, mysig_t act)
 203 {
 204 #ifdef HAVE_SIGACTION
 205         struct sigaction sa, osa;
 206
 207         if (sigaction(sig, NULL, &osa) == -1)
 208                 return (mysig_t) -1;
 209         if (osa.sa_handler != act) {
 210                 memset(&sa, 0, sizeof(sa));
 211                 sigemptyset(&sa.sa_mask);
 212                 sa.sa_flags = 0;
 213 #ifdef SA_INTERRUPT
 214                 if (sig == SIGALRM)
 215                         sa.sa_flags |= SA_INTERRUPT;
 216 #endif
 217                 sa.sa_handler = act;
 218                 if (sigaction(sig, &sa, NULL) == -1)
 219                         return (mysig_t) -1;
 220         }
 221         return (osa.sa_handler);
 222 #else
 223         #undef signal
 224         return (signal(sig, act));
 225 #endif
 226 }
 227
 228 #ifndef HAVE_STRDUP
 229 char *
 230 strdup(const char *str)
 231 {
 232         size_t len;
 233         char *cp;
 234
 235         len = strlen(str) + 1;
 236         cp = malloc(len);
 237         if (cp != NULL)
 238                 return(memcpy(cp, str, len));
 239         return NULL;
 240 }
 241 #endif