usr/src/lib/libtnf/type.c

   1 /*
   2  * CDDL HEADER START
   3  *
   4  * The contents of this file are subject to the terms of the
   5  * Common Development and Distribution License, Version 1.0 only
   6  * (the "License").  You may not use this file except in compliance
   7  * with the License.
   8  *
   9  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
  10  * or http://www.opensolaris.org/os/licensing.
  11  * See the License for the specific language governing permissions
  12  * and limitations under the License.
  13  *
  14  * When distributing Covered Code, include this CDDL HEADER in each
  15  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
  16  * If applicable, add the following below this CDDL HEADER, with the
  17  * fields enclosed by brackets "[]" replaced with your own identifying
  18  * information: Portions Copyright [yyyy] [name of copyright owner]
  19  *
  20  * CDDL HEADER END
  21  */
  22 /*
  23  *      Copyright (c) 1994, by Sun Microsytems, Inc.
  24  */
  25
  26 #pragma ident   "%Z%%M% %I%     %E% SMI"
  27
  28 #include "libtnf.h"
  29
  30 /*
  31  * All types are struct records
  32  */
  33
  34 void
  35 _tnf_check_type(tnf_datum_t datum)
  36 {
  37         CHECK_RECORD(datum);
  38         CHECK_SLOTS(datum);
  39
  40         if (!INFO_TYPE(DATUM_INFO(datum)))
  41                 _tnf_error(DATUM_TNF(datum), TNF_ERR_TYPEMISMATCH);
  42 }
  43
  44 /*
  45  * Get data kind of a type record
  46  */
  47
  48 tnf_kind_t
  49 tnf_type_get_kind(tnf_datum_t datum)
  50 {
  51         struct taginfo  *info;
  52
  53         CHECK_TYPE(datum);
  54
  55         /* Note: DATUM_RECORD(), not DATUM_TAG() */
  56         /* LINTED pointer cast may result in improper alignment */
  57         info = _tnf_get_info(DATUM_TNF(datum), DATUM_RECORD(datum));
  58         return (info->kind);
  59 }
  60
  61 /*
  62  * Retrieve type name for datum type record
  63  */
  64
  65 char *
  66 tnf_type_get_name(tnf_datum_t datum)
  67 {
  68         CHECK_TYPE(datum);
  69         /* XXX Dispatch to ABI routine; faster than taginfo lookup? */
  70         /* LINTED pointer cast may result in improper alignment */
  71         return (_tnf_get_name(DATUM_TNF(datum), DATUM_RECORD(datum)));
  72 }
  73
  74 /*
  75  * Fetch size member of info for datum type record
  76  */
  77
  78 size_t
  79 tnf_type_get_size(tnf_datum_t datum)
  80 {
  81         struct taginfo  *info;
  82
  83         CHECK_TYPE(datum);
  84
  85         /* Note: DATUM_RECORD(), not DATUM_TAG() */
  86         /* LINTED pointer cast may result in improper alignment */
  87         info = _tnf_get_info(DATUM_TNF(datum), DATUM_RECORD(datum));
  88
  89         if (INFO_ARRAY(info))
  90                 /* XXX All arrays are self-sized */
  91                 return ((size_t)-1);
  92         else
  93                 return (info->size);
  94 }
  95
  96 /*
  97  * Get the base type of a type
  98  */
  99
 100 tnf_datum_t
 101 tnf_type_get_base(tnf_datum_t datum)
 102 {
 103         struct taginfo  *info;
 104
 105         CHECK_TYPE(datum);
 106
 107         /* Note: DATUM_RECORD(), not DATUM_TAG() */
 108         /* LINTED pointer cast may result in improper alignment */
 109         info = _tnf_get_info(DATUM_TNF(datum), DATUM_RECORD(datum));
 110
 111         if (INFO_DERIVED(info))
 112                 return (DATUM(info->base->meta, (caddr_t)info->base->tag));
 113         else
 114                 return (datum);
 115 }
 116
 117 /*
 118  * If type record has named property, return a datum for it
 119  */
 120
 121 tnf_datum_t
 122 tnf_type_get_property(tnf_datum_t datum, char *name)
 123 {
 124         tnf_ref32_t     *property;
 125
 126         CHECK_TYPE(datum);
 127
 128         /* Note: DATUM_RECORD(), not DATUM_TAG() */
 129         property = _tnf_get_property(DATUM_TNF(datum),
 130                 /* LINTED pointer cast may result in improper alignment */
 131                         DATUM_RECORD(datum), name);
 132
 133         if (property == TNF_NULL)
 134                 return (TNF_DATUM_NULL);
 135         else
 136                 return (RECORD_DATUM(DATUM_TNF(datum), property));
 137 }