/* $NetBSD: support.c,v 1.1.1.1 2020/06/15 01:52:53 christos Exp $ */ /*- * Copyright (c) 2015 The NetBSD Foundation, Inc. * All rights reserved. * * This code is derived from software contributed to The NetBSD Foundation * by Christos Zoulas. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE * POSSIBILITY OF SUCH DAMAGE. */ #ifdef HAVE_CONFIG_H #include "config.h" #endif #include __RCSID("$NetBSD: support.c,v 1.1.1.1 2020/06/15 01:52:53 christos Exp $"); #include #include #include #include #include #include #include #include "support.h" static __attribute__((__format_arg__(3))) const char * expandm(char *buf, size_t len, const char *fmt) { char *p; size_t r; if ((p = strstr(fmt, "%m")) == NULL) return fmt; r = (size_t)(p - fmt); if (r >= len) return fmt; strlcpy(buf, fmt, r + 1); strlcat(buf, strerror(errno), len); strlcat(buf, fmt + r + 2, len); return buf; } void vdlog(int level __unused, const char *fmt, va_list ap) { char buf[BUFSIZ]; // fprintf(stderr, "%s: ", getprogname()); vfprintf(stderr, expandm(buf, sizeof(buf), fmt), ap); fprintf(stderr, "\n"); } void dlog(int level, const char *fmt, ...) { va_list ap; va_start(ap, fmt); vdlog(level, fmt, ap); va_end(ap); } const char * fmttime(char *b, size_t l, time_t t) { struct tm tm; if (localtime_r(&t, &tm) == NULL) snprintf(b, l, "*%jd*", (intmax_t)t); else strftime(b, l, "%Y/%m/%d %H:%M:%S", &tm); return b; } const char * fmtydhms(char *b, size_t l, time_t t) { time_t s, m, h, d, y; int z; size_t o; s = t % 60; t /= 60; m = t % 60; t /= 60; h = t % 24; t /= 24; d = t % 365; t /= 365; y = t; z = 0; o = 0; #define APPEND(a) \ if (a) { \ z = snprintf(b + o, l - o, "%jd%s", (intmax_t)a, __STRING(a)); \ if (z == -1) \ return b; \ o += (size_t)z; \ if (o >= l) \ return b; \ } APPEND(y) APPEND(d) APPEND(h) APPEND(m) APPEND(s) return b; } ssize_t blhexdump(char *buf, size_t len, const char *str, const void *b, size_t l) { size_t z, cz; int r; const unsigned char *p = b; const unsigned char *e = p + l; r = snprintf(buf, len, "%s: ", str); if (r == -1) return -1; if ((cz = z = (size_t)r) >= len) cz = len; while (p < e) { r = snprintf(buf + cz, len - cz, "%.2x", *p++); if (r == -1) return -1; if ((cz = (z += (size_t)r)) >= len) cz = len; } return (ssize_t)z; }