inj_decl.c revision 80ab886d233f514d54c2a6bdeb9fdfd951bd6881
1N/A/*
1N/A * CDDL HEADER START
1N/A *
1N/A * The contents of this file are subject to the terms of the
1N/A * Common Development and Distribution License (the "License").
1N/A * You may not use this file except in compliance with the License.
1N/A *
1N/A * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
1N/A * or http://www.opensolaris.org/os/licensing.
1N/A * See the License for the specific language governing permissions
1N/A * and limitations under the License.
1N/A *
1N/A * When distributing Covered Code, include this CDDL HEADER in each
1N/A * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
1N/A * If applicable, add the following below this CDDL HEADER, with the
1N/A * fields enclosed by brackets "[]" replaced with your own identifying
1N/A * information: Portions Copyright [yyyy] [name of copyright owner]
1N/A *
1N/A * CDDL HEADER END
1N/A */
1N/A
1N/A/*
1N/A * Copyright 2006 Sun Microsystems, Inc. All rights reserved.
1N/A * Use is subject to license terms.
1N/A */
1N/A
1N/A#pragma ident "%Z%%M% %I% %E% SMI"
1N/A
1N/A/*
1N/A * Events, FMRIs and authorities must be declared before they can be used.
1N/A * Routines in this file, driven by the parser, create the data structures
1N/A * associated with the declarations.
1N/A */
1N/A
1N/A#include <assert.h>
1N/A#include <string.h>
1N/A
1N/A#include <inj_event.h>
1N/A#include <inj_err.h>
1N/A#include <inj_lex.h>
1N/A#include <inj_list.h>
1N/A#include <inj.h>
1N/A
1N/Astatic inj_hash_t inj_decls[ITEMTYPE_NITEMS];
1N/Astatic int inj_decls_initialized;
1N/A
1N/Astatic inj_hash_t *
1N/Aitem2hash(inj_itemtype_t item)
1N/A{
1N/A int i;
1N/A
1N/A assert(item >= 0 && item < sizeof (inj_decls) / sizeof (inj_hash_t));
1N/A
1N/A if (!inj_decls_initialized) {
1N/A for (i = 0; i < sizeof (inj_decls) / sizeof (inj_hash_t); i++)
1N/A inj_strhash_create(&inj_decls[i]);
1N/A inj_decls_initialized = 1;
1N/A }
1N/A
1N/A return (&inj_decls[item]);
1N/A}
1N/A
1N/Ainj_decl_t *
1N/Ainj_decl_lookup(const char *name, inj_itemtype_t type)
1N/A{
1N/A inj_hash_t *hash = item2hash(type);
1N/A inj_var_t *v;
1N/A
1N/A if ((v = inj_strhash_lookup(hash, name)) == NULL)
1N/A return (NULL);
1N/A
1N/A return (inj_hash_get_cookie(v));
1N/A}
1N/A
1N/Avoid
1N/Ainj_decl_mem_destroy(inj_declmem_t *dlm)
1N/A{
1N/A inj_strfree(dlm->dlm_name);
1N/A
1N/A if (dlm->dlm_type == MEMTYPE_ENUM)
1N/A inj_strhash_destroy(dlm->dlm_enumvals);
1N/A}
1N/A
1N/Ainj_declmem_t *
1N/Ainj_decl_mem_create(const char *name, inj_memtype_t type)
1N/A{
1N/A inj_declmem_t *dlm = inj_zalloc(sizeof (inj_declmem_t));
1N/A
1N/A dlm->dlm_name = name;
1N/A dlm->dlm_type = type;
1N/A
1N/A return (dlm);
1N/A}
1N/A
1N/A/* An embedded event, authority, or FMRI */
1N/Ainj_declmem_t *
1N/Ainj_decl_mem_create_defined(const char *name, const char *declnm,
1N/A inj_itemtype_t type)
1N/A{
1N/A inj_declmem_t *dlm = inj_zalloc(sizeof (inj_declmem_t));
1N/A
1N/A dlm->dlm_name = name;
1N/A dlm->dlm_type = inj_item2mem(type);
1N/A
1N/A if ((dlm->dlm_decl = inj_decl_lookup(declnm, type)) == NULL) {
1N/A yyerror("unknown %s %s", inj_item2str(type), declnm);
1N/A return (NULL);
1N/A }
1N/A
1N/A return (dlm);
1N/A}
1N/A
1N/Ainj_declmem_t *
1N/Ainj_decl_mem_create_enum(const char *name, inj_hash_t *vals)
1N/A{
1N/A inj_declmem_t *dlm = inj_zalloc(sizeof (inj_declmem_t));
1N/A
1N/A dlm->dlm_name = name;
1N/A dlm->dlm_type = MEMTYPE_ENUM;
1N/A dlm->dlm_enumvals = vals;
1N/A
1N/A return (dlm);
1N/A}
1N/A
1N/A/* Turn a previously-declared member into an array */
1N/Avoid
1N/Ainj_decl_mem_make_array(inj_declmem_t *dlm, uint_t dim)
1N/A{
1N/A dlm->dlm_flags |= DECLMEM_F_ARRAY;
1N/A dlm->dlm_arrdim = dim;
1N/A}
1N/A
1N/Avoid
1N/Ainj_decl_destroy(inj_decl_t *decl)
1N/A{
1N/A inj_declmem_t *m, *n;
1N/A
1N/A inj_strfree(decl->decl_name);
1N/A inj_strhash_destroy(&decl->decl_memhash);
1N/A
1N/A for (m = inj_list_next(&decl->decl_members); m != NULL; m = n) {
1N/A n = inj_list_next(m);
1N/A
1N/A inj_decl_mem_destroy(m);
1N/A }
1N/A
1N/A inj_free(decl, sizeof (inj_declmem_t));
1N/A}
1N/A
1N/Ainj_decl_t *
1N/Ainj_decl_create(inj_declmem_t *dlm)
1N/A{
1N/A inj_decl_t *decl = inj_zalloc(sizeof (inj_decl_t));
1N/A
1N/A decl->decl_lineno = yylineno;
1N/A
1N/A inj_strhash_create(&decl->decl_memhash);
1N/A
1N/A inj_list_append(&decl->decl_members, dlm);
1N/A (void) inj_strhash_insert(&decl->decl_memhash, dlm->dlm_name,
1N/A (uintptr_t)dlm);
1N/A
1N/A return (decl);
1N/A}
1N/A
1N/Avoid
1N/Ainj_decl_addmem(inj_decl_t *decl, inj_declmem_t *dlm)
1N/A{
1N/A inj_var_t *v;
1N/A
1N/A if ((v = inj_strhash_lookup(&decl->decl_memhash, dlm->dlm_name)) !=
1N/A NULL) {
1N/A inj_decl_t *other = inj_hash_get_cookie(v);
1N/A
1N/A yyerror("duplicate member name %s (other on line %d)\n",
1N/A dlm->dlm_name, other->decl_lineno);
1N/A inj_decl_destroy(decl);
1N/A return;
1N/A }
1N/A
1N/A inj_list_append(&decl->decl_members, dlm);
1N/A (void) inj_strhash_insert(&decl->decl_memhash, dlm->dlm_name,
1N/A (uintptr_t)dlm);
1N/A}
1N/A
1N/A/*
1N/A * The various declaration types - events, FMRIs, and authorities - each have
1N/A * their own semantic validation requirements.
1N/A */
1N/A
1N/A/* No user-defined class member. If ena isn't present, we'll generate it */
1N/Astatic int
1N/Ainj_decl_validate_event(inj_decl_t *decl)
1N/A{
1N/A if (inj_strhash_lookup(&decl->decl_memhash, "class") != NULL) {
1N/A yyerror("class may not be explicitly declared\n");
1N/A return (0);
1N/A }
1N/A
1N/A if (inj_strhash_lookup(&decl->decl_memhash, "ena") == NULL)
1N/A decl->decl_flags |= DECL_F_AUTOENA;
1N/A
1N/A return (1);
1N/A}
1N/A
1N/A/* FMRIs must have a string scheme member */
1N/Astatic int
1N/Ainj_decl_validate_fmri(inj_decl_t *decl)
1N/A{
1N/A inj_declmem_t *dlm;
1N/A inj_var_t *v;
1N/A
1N/A if ((v = inj_strhash_lookup(&decl->decl_memhash, "scheme")) == NULL) {
1N/A yyerror("fmri declared without scheme member\n");
1N/A return (0);
1N/A }
1N/A
1N/A dlm = inj_hash_get_cookie(v);
1N/A if (dlm->dlm_type != MEMTYPE_STRING) {
1N/A yyerror("scheme member must be a string\n");
1N/A return (0);
1N/A }
1N/A
1N/A return (1);
1N/A}
1N/A
1N/A/*ARGSUSED*/
1N/Astatic int
1N/Ainj_decl_validate_nop(inj_decl_t *decl)
1N/A{
1N/A return (1);
1N/A}
1N/A
1N/Avoid
1N/Ainj_decl_finish(inj_decl_t *decl, const char *name, inj_itemtype_t type)
1N/A{
1N/A static int (*const validators[])(inj_decl_t *) = {
1N/A inj_decl_validate_event,
1N/A inj_decl_validate_fmri,
1N/A inj_decl_validate_nop, /* no validation for auth */
1N/A inj_decl_validate_nop /* no validation for lists */
1N/A };
1N/A
1N/A inj_hash_t *hash = item2hash(type);
1N/A inj_var_t *v;
1N/A
1N/A decl->decl_name = name;
1N/A decl->decl_type = type;
1N/A
1N/A if (!validators[type](decl)) {
1N/A inj_decl_destroy(decl);
1N/A return;
1N/A }
1N/A
1N/A if ((v = inj_strhash_lookup(hash, name)) != NULL) {
1N/A inj_decl_t *other = inj_hash_get_cookie(v);
1N/A
1N/A yyerror("duplicate %s name %s (other on line %d)\n",
1N/A inj_item2str(type), name, other->decl_lineno);
1N/A inj_decl_destroy(decl);
1N/A return;
1N/A }
1N/A
1N/A (void) inj_strhash_insert(hash, name, (uintptr_t)decl);
1N/A}
1N/A