2N/A#if !defined(lint) && !defined(SABER)
2N/Astatic const char rcsid[] = "$Id: ctl_p.c,v 1.4 2005/04/27 04:56:35 sra Exp $";
2N/A#endif /* not lint */
2N/A
2N/A/*
2N/A * Copyright (c) 2004 by Internet Systems Consortium, Inc. ("ISC")
2N/A * Copyright (c) 1998,1999 by Internet Software Consortium.
2N/A *
2N/A * Permission to use, copy, modify, and distribute this software for any
2N/A * purpose with or without fee is hereby granted, provided that the above
2N/A * copyright notice and this permission notice appear in all copies.
2N/A *
2N/A * THE SOFTWARE IS PROVIDED "AS IS" AND ISC DISCLAIMS ALL WARRANTIES
2N/A * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
2N/A * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL ISC BE LIABLE FOR
2N/A * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
2N/A * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
2N/A * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT
2N/A * OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
2N/A */
2N/A
2N/A/* Extern. */
2N/A
2N/A#include "port_before.h"
2N/A
2N/A#include <sys/param.h>
2N/A#include <sys/file.h>
2N/A#include <sys/socket.h>
2N/A#include <sys/un.h>
2N/A
2N/A#include <netinet/in.h>
2N/A#include <arpa/nameser.h>
2N/A#include <arpa/inet.h>
2N/A
2N/A#include <errno.h>
2N/A#include <stdio.h>
2N/A#include <stdlib.h>
2N/A#include <string.h>
2N/A#include <time.h>
2N/A
2N/A#include <isc/assertions.h>
2N/A#include <isc/eventlib.h>
2N/A#include <isc/logging.h>
2N/A#include <isc/memcluster.h>
2N/A#include <isc/ctl.h>
2N/A
2N/A#include "ctl_p.h"
2N/A
2N/A#include "port_after.h"
2N/A
2N/A/* Constants. */
2N/A
2N/Aconst char * const ctl_sevnames[] = {
2N/A "debug", "warning", "error"
2N/A};
2N/A
2N/A/* Public. */
2N/A
2N/A/*%
2N/A * ctl_logger()
2N/A * if ctl_startup()'s caller didn't specify a logger, this one
2N/A * is used. this pollutes stderr with all kinds of trash so it will
2N/A * probably never be used in real applications.
2N/A */
2N/Avoid
2N/Actl_logger(enum ctl_severity severity, const char *format, ...) {
2N/A va_list ap;
2N/A static const char me[] = "ctl_logger";
2N/A
2N/A fprintf(stderr, "%s(%s): ", me, ctl_sevnames[severity]);
2N/A va_start(ap, format);
2N/A vfprintf(stderr, format, ap);
2N/A va_end(ap);
2N/A fputc('\n', stderr);
2N/A}
2N/A
2N/Aint
2N/Actl_bufget(struct ctl_buf *buf, ctl_logfunc logger) {
2N/A static const char me[] = "ctl_bufget";
2N/A
2N/A REQUIRE(!allocated_p(*buf) && buf->used == 0U);
2N/A buf->text = memget(MAX_LINELEN);
2N/A if (!allocated_p(*buf)) {
2N/A (*logger)(ctl_error, "%s: getmem: %s", me, strerror(errno));
2N/A return (-1);
2N/A }
2N/A buf->used = 0;
2N/A return (0);
2N/A}
2N/A
2N/Avoid
2N/Actl_bufput(struct ctl_buf *buf) {
2N/A
2N/A REQUIRE(allocated_p(*buf));
2N/A memput(buf->text, MAX_LINELEN);
2N/A buf->text = NULL;
2N/A buf->used = 0;
2N/A}
2N/A
2N/Aconst char *
2N/Actl_sa_ntop(const struct sockaddr *sa,
2N/A char *buf, size_t size,
2N/A ctl_logfunc logger)
2N/A{
2N/A static const char me[] = "ctl_sa_ntop";
2N/A static const char punt[] = "[0].-1";
2N/A char tmp[INET6_ADDRSTRLEN];
2N/A
2N/A switch (sa->sa_family) {
2N/A case AF_INET6: {
2N/A const struct sockaddr_in6 *in6 =
2N/A (const struct sockaddr_in6 *) sa;
2N/A
2N/A if (inet_ntop(in6->sin6_family, &in6->sin6_addr, tmp, sizeof tmp)
2N/A == NULL) {
2N/A (*logger)(ctl_error, "%s: inet_ntop(%u %04x): %s",
2N/A me, in6->sin6_family,
2N/A in6->sin6_port, strerror(errno));
2N/A return (punt);
2N/A }
2N/A if (strlen(tmp) + sizeof "[].65535" > size) {
2N/A (*logger)(ctl_error, "%s: buffer overflow", me);
2N/A return (punt);
2N/A }
2N/A (void) sprintf(buf, "[%s].%u", tmp, ntohs(in6->sin6_port));
2N/A return (buf);
2N/A }
2N/A case AF_INET: {
2N/A const struct sockaddr_in *in =
2N/A (const struct sockaddr_in *) sa;
2N/A
2N/A if (inet_ntop(in->sin_family, &in->sin_addr, tmp, sizeof tmp)
2N/A == NULL) {
2N/A (*logger)(ctl_error, "%s: inet_ntop(%u %04x %08x): %s",
2N/A me, in->sin_family,
2N/A in->sin_port, in->sin_addr.s_addr,
2N/A strerror(errno));
2N/A return (punt);
2N/A }
2N/A if (strlen(tmp) + sizeof "[].65535" > size) {
2N/A (*logger)(ctl_error, "%s: buffer overflow", me);
2N/A return (punt);
2N/A }
2N/A (void) sprintf(buf, "[%s].%u", tmp, ntohs(in->sin_port));
2N/A return (buf);
2N/A }
2N/A#ifndef NO_SOCKADDR_UN
2N/A case AF_UNIX: {
2N/A const struct sockaddr_un *un =
2N/A (const struct sockaddr_un *) sa;
2N/A unsigned int x = sizeof un->sun_path;
2N/A
2N/A if (x > size)
2N/A x = size;
2N/A strncpy(buf, un->sun_path, x - 1);
2N/A buf[x - 1] = '\0';
2N/A return (buf);
2N/A }
2N/A#endif
2N/A default:
2N/A return (punt);
2N/A }
2N/A}
2N/A
2N/Avoid
2N/Actl_sa_copy(const struct sockaddr *src, struct sockaddr *dst) {
2N/A switch (src->sa_family) {
2N/A case AF_INET6:
2N/A *((struct sockaddr_in6 *)dst) =
2N/A *((const struct sockaddr_in6 *)src);
2N/A break;
2N/A case AF_INET:
2N/A *((struct sockaddr_in *)dst) =
2N/A *((const struct sockaddr_in *)src);
2N/A break;
2N/A#ifndef NO_SOCKADDR_UN
2N/A case AF_UNIX:
2N/A *((struct sockaddr_un *)dst) =
2N/A *((const struct sockaddr_un *)src);
2N/A break;
2N/A#endif
2N/A default:
2N/A *dst = *src;
2N/A break;
2N/A }
2N/A}
2N/A
2N/A/*! \file */