contrib/libarchive/libarchive_fe/err.c

   1 /*-
   2  * Copyright (c) 2003-2007 Tim Kientzle
   3  * All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms, with or without
   6  * modification, are permitted provided that the following conditions
   7  * are met:
   8  * 1. Redistributions of source code must retain the above copyright
   9  *    notice, this list of conditions and the following disclaimer
  10  *    in this position and unchanged.
  11  * 2. Redistributions in binary form must reproduce the above copyright
  12  *    notice, this list of conditions and the following disclaimer in the
  13  *    documentation and/or other materials provided with the distribution.
  14  *
  15  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR(S) ``AS IS'' AND ANY EXPRESS OR
  16  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  17  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  18  * IN NO EVENT SHALL THE AUTHOR(S) BE LIABLE FOR ANY DIRECT, INDIRECT,
  19  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  20  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  21  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  22  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  23  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  24  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  25  */
  26
  27 #include "lafe_platform.h"
  28 __FBSDID("$FreeBSD$");
  29
  30 #ifdef HAVE_STDARG_H
  31 #include <stdarg.h>
  32 #endif
  33 #include <stdio.h>
  34 #ifdef HAVE_STDLIB_H
  35 #include <stdlib.h>
  36 #endif
  37 #ifdef HAVE_STRING_H
  38 #include <string.h>
  39 #endif
  40
  41 #include "err.h"
  42
  43 static void lafe_vwarnc(int, const char *, va_list) __LA_PRINTFLIKE(2, 0);
  44
  45 static const char *lafe_progname;
  46
  47 const char *
  48 lafe_getprogname(void)
  49 {
  50
  51         return lafe_progname;
  52 }
  53
  54 void
  55 lafe_setprogname(const char *name, const char *defaultname)
  56 {
  57
  58         if (name == NULL)
  59                 name = defaultname;
  60 #if defined(_WIN32) && !defined(__CYGWIN__)
  61         lafe_progname = strrchr(name, '\\');
  62         if (strrchr(name, '/') > lafe_progname)
  63 #endif
  64         lafe_progname = strrchr(name, '/');
  65         if (lafe_progname != NULL)
  66                 lafe_progname++;
  67         else
  68                 lafe_progname = name;
  69 }
  70
  71 static void
  72 lafe_vwarnc(int code, const char *fmt, va_list ap)
  73 {
  74         fprintf(stderr, "%s: ", lafe_progname);
  75         vfprintf(stderr, fmt, ap);
  76         if (code != 0)
  77                 fprintf(stderr, ": %s", strerror(code));
  78         fprintf(stderr, "\n");
  79 }
  80
  81 void
  82 lafe_warnc(int code, const char *fmt, ...)
  83 {
  84         va_list ap;
  85
  86         va_start(ap, fmt);
  87         lafe_vwarnc(code, fmt, ap);
  88         va_end(ap);
  89 }
  90
  91 void
  92 lafe_errc(int eval, int code, const char *fmt, ...)
  93 {
  94         va_list ap;
  95
  96         va_start(ap, fmt);
  97         lafe_vwarnc(code, fmt, ap);
  98         va_end(ap);
  99         exit(eval);
 100 }