2N/A/*
2N/A * CDDL HEADER START
2N/A *
2N/A * The contents of this file are subject to the terms of the
2N/A * Common Development and Distribution License (the "License").
2N/A * You may not use this file except in compliance with the License.
2N/A *
2N/A * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
2N/A * or http://www.opensolaris.org/os/licensing.
2N/A * See the License for the specific language governing permissions
2N/A * and limitations under the License.
2N/A *
2N/A * When distributing Covered Code, include this CDDL HEADER in each
2N/A * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
2N/A * If applicable, add the following below this CDDL HEADER, with the
2N/A * fields enclosed by brackets "[]" replaced with your own identifying
2N/A * information: Portions Copyright [yyyy] [name of copyright owner]
2N/A *
2N/A * CDDL HEADER END
2N/A */
2N/A/*
2N/A * Copyright (c) 2011, Oracle and/or its affiliates. All rights reserved.
2N/A */
2N/A
2N/A#include <sys/types.h>
2N/A#include <alloca.h>
2N/A#include <stdarg.h>
2N/A#include <stdio.h>
2N/A#include <string.h>
2N/A#include <errno.h>
2N/A#include "shadow_impl.h"
2N/A
2N/Astatic __thread shadow_errno_t _shadow_errno;
2N/Astatic __thread char _shadow_errmsg[1024];
2N/A
2N/Avoid
2N/A_shadow_dprintf(int fd, const char *file, const char *fmt, va_list ap)
2N/A{
2N/A const char *slash;
2N/A char buf[512], *bufp = buf;
2N/A int n;
2N/A
2N/A n = vsnprintf(buf, sizeof (buf), fmt, ap);
2N/A
2N/A if (n >= sizeof (buf)) {
2N/A bufp = alloca(n + 1);
2N/A n = vsprintf(bufp, fmt, ap);
2N/A }
2N/A
2N/A if ((slash = strrchr(file, '/')) != NULL)
2N/A file = slash + 1;
2N/A
2N/A (void) write(fd, file, strlen(file));
2N/A (void) write(fd, ": ", 2);
2N/A (void) write(fd, bufp, n);
2N/A}
2N/A
2N/A
2N/Avoid *
2N/Ashadow_alloc(size_t len)
2N/A{
2N/A void *ret;
2N/A
2N/A if ((ret = malloc(len)) == NULL)
2N/A (void) shadow_set_errno(ESHADOW_NOMEM);
2N/A
2N/A return (ret);
2N/A}
2N/A
2N/Avoid *
2N/Ashadow_zalloc(size_t len)
2N/A{
2N/A void *ret;
2N/A
2N/A if ((ret = calloc(len, 1)) == NULL)
2N/A (void) shadow_set_errno(ESHADOW_NOMEM);
2N/A
2N/A return (ret);
2N/A}
2N/A
2N/Achar *
2N/Ashadow_strdup(const char *str)
2N/A{
2N/A char *ret;
2N/A
2N/A if ((ret = strdup(str)) == NULL)
2N/A (void) shadow_set_errno(ESHADOW_NOMEM);
2N/A
2N/A return (ret);
2N/A}
2N/A
2N/Aint
2N/Ashadow_error(shadow_errno_t err, const char *fmt, ...)
2N/A{
2N/A va_list ap;
2N/A
2N/A _shadow_errno = err;
2N/A
2N/A va_start(ap, fmt);
2N/A (void) vsnprintf(dgettext(TEXT_DOMAIN, _shadow_errmsg),
2N/A sizeof (_shadow_errmsg), fmt, ap);
2N/A va_end(ap);
2N/A
2N/A return (-1);
2N/A}
2N/A
2N/Aint
2N/Ashadow_set_errno(shadow_errno_t err)
2N/A{
2N/A _shadow_errno = err;
2N/A _shadow_errmsg[0] = '\0';
2N/A
2N/A return (-1);
2N/A}
2N/A
2N/Ashadow_errno_t
2N/Ashadow_errno(void)
2N/A{
2N/A return (_shadow_errno);
2N/A}
2N/A
2N/Aconst char *
2N/Ashadow_errmsg(void)
2N/A{
2N/A if (_shadow_errmsg[0] == '\0')
2N/A return (shadow_strerror(_shadow_errno));
2N/A else
2N/A return (_shadow_errmsg);
2N/A}
2N/A
2N/A/*
2N/A * Translate from a libzfs error into the corresponding shadow error.
2N/A */
2N/Aint
2N/Ashadow_zfs_error(libzfs_handle_t *zhdl)
2N/A{
2N/A shadow_errno_t err;
2N/A
2N/A switch (libzfs_errno(zhdl)) {
2N/A case EZFS_NOMEM:
2N/A return (shadow_set_errno(ESHADOW_NOMEM));
2N/A
2N/A case EZFS_NOENT:
2N/A err = ESHADOW_ZFS_NOENT;
2N/A break;
2N/A
2N/A case EZFS_IO:
2N/A err = ESHADOW_ZFS_IO;
2N/A break;
2N/A
2N/A default:
2N/A err = ESHADOW_ZFS_IMPL;
2N/A break;
2N/A }
2N/A
2N/A return (shadow_error(err, "%s: %s", libzfs_error_action(zhdl),
2N/A libzfs_error_description(zhdl)));
2N/A}