Differential D5912 Diff 17205 vendor/NetBSD/blacklist/dist/bin/support.c

Changeset View

Standalone View

vendor/NetBSD/blacklist/dist/bin/support.c

Property	Old Value	New Value
svn:eol-style	null	native \ No newline at end of property
svn:keywords	null	FreeBSD=%H \ No newline at end of property
svn:mime-type	null	text/plain \ No newline at end of property

				/* $NetBSD: support.c,v 1.8 2016/04/04 15:52:56 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 <sys/cdefs.h>
				__RCSID("$NetBSD: support.c,v 1.8 2016/04/04 15:52:56 christos Exp $");

				#include <time.h>
				#include <string.h>
				#include <stdio.h>
				#include <stdarg.h>
				#include <errno.h>
				#include <stdlib.h>
				#include <inttypes.h>

				#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 % 60;
				t /= 24;
				d = t % 24;
				t /= 356;
				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;
				}