%{

/*

 * CDDL HEADER START

 *

 * The contents of this file are subject to the terms of the

 * Common Development and Distribution License (the "License").

 * You may not use this file except in compliance with the License.

 *

 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE

 * or http://www.opensolaris.org/os/licensing.

 * See the License for the specific language governing permissions

 * and limitations under the License.

 *

 * When distributing Covered Code, include this CDDL HEADER in each

 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.

 * If applicable, add the following below this CDDL HEADER, with the

 * fields enclosed by brackets "[]" replaced with your own identifying

 * information: Portions Copyright [yyyy] [name of copyright owner]

 *

 * CDDL HEADER END

 */

/*

 * Copyright (c) 2003, 2010, Oracle and/or its affiliates. All rights reserved.

 */

#include <stdio.h>

#include <strings.h>

#include "zonecfg.h"

static cmd_t *cmd = NULL;		/* Command being processed */

static complex_property_ptr_t complex = NULL;

static list_property_ptr_t new_list = NULL, tmp_list, last,

    list[MAX_EQ_PROP_PAIRS];

static property_value_t property[MAX_EQ_PROP_PAIRS];

extern boolean_t newline_terminated;

extern int num_prop_vals;		/* # of property values */

/* yacc externals */

extern int yydebug;

extern void yyerror(char *s);

/*

 * This function is used by the simple_prop_val reduction rules to set up

 * a list_property_ptr_t and adjust the above global variables appropriately.

 * Note that this function duplicates the specified string and makes

 * the new list's lp_simple field point to the duplicate.  This function does

 * not free the original string.

 *

 * This function returns a pointer to the duplicated string or NULL if an error

 * occurred.  The simple_prop_val reduction rules that invoke this function

 * should set $$ to the returned pointer.

 */

static char *

simple_prop_val_func(const char *str)

{

	char *retstr;

	if ((new_list = alloc_list()) == NULL)

		return (NULL);

	if ((retstr = strdup(str)) == NULL) {

		free_list(new_list);

		return (NULL);

	}

	new_list->lp_simple = retstr;

	new_list->lp_complex = NULL;

	new_list->lp_next = NULL;

	if (list[num_prop_vals] == NULL) {

		list[num_prop_vals] = new_list;

	} else {

		for (tmp_list = list[num_prop_vals]; tmp_list != NULL;

		    tmp_list = tmp_list->lp_next)

			last = tmp_list;

		last->lp_next = new_list;

	}

	return (retstr);

}

/*

 * This function is used by the complex_piece reduction rules to set up a

 * complex_property_prt_t and adjust the above global variables appropriately.

 * Note that this function duplicates the specified string and makes the new

 * complex_property_ptr_t's cp_value field point to the duplicate.  It also sets

 * the complex_property_ptr_t's cp_type field to cp_type and its cp_next field

 * to cp_next.  This function does not free the original string.

 *

 * This function returns a pointer to the complex_property_t created for the

 * complex_piece or NULL if an error occurred.  The complex_piece reduction

 * rules that invoke this function should set $$ to the returned pointer.

 */

static complex_property_ptr_t

complex_piece_func(int cp_type, const char *str, complex_property_ptr_t cp_next)

{

	complex_property_ptr_t retval;

	if ((retval = alloc_complex()) == NULL)

		return (NULL);

	if ((retval->cp_value = strdup(str)) == NULL) {

		free_complex(retval);

		return (NULL);

	}

	retval->cp_type = cp_type;

	retval->cp_next = cp_next;

	complex = retval;

	return (retval);

}

%}

%union {

	int ival;

	char *strval;

	cmd_t *cmd;

	complex_property_ptr_t complex;

	list_property_ptr_t list;

}

%start commands

%token HELP CREATE EXPORT ADD DELETE REMOVE SELECT SET INFO CANCEL END VERIFY

%token COMMIT REVERT EXIT SEMICOLON TOKEN ZONENAME ZONEPATH AUTOBOOT POOL NET

%token FS IPD ATTR DEVICE RCTL SPECIAL RAW DIR OPTIONS TYPE ADDRESS PHYSICAL

%token NAME MATCH PRIV LIMIT ACTION VALUE EQUAL OPEN_SQ_BRACKET CLOSE_SQ_BRACKET

%token OPEN_PAREN CLOSE_PAREN COMMA DATASET LIMITPRIV BOOTARGS BRAND PSET PCAP

%token MCAP NCPUS IMPORTANCE SHARES MAXLWPS MAXSHMMEM MAXSHMIDS MAXMSGIDS

%token MAXSEMIDS LOCKED SWAP SCHED CLEAR DEFROUTER ADMIN USER AUTHS

%type <strval> TOKEN EQUAL OPEN_SQ_BRACKET CLOSE_SQ_BRACKET

    property_value OPEN_PAREN CLOSE_PAREN COMMA simple_prop_val

%type <complex> complex_piece complex_prop_val

%type <ival> resource_type NET FS IPD DEVICE RCTL ATTR DATASET PSET PCAP MCAP

    ADMIN

%type <ival> property_name SPECIAL RAW DIR OPTIONS TYPE ADDRESS PHYSICAL NAME

    MATCH ZONENAME ZONEPATH AUTOBOOT POOL LIMITPRIV BOOTARGS VALUE PRIV LIMIT

%type <cmd> command

%type <cmd> add_command ADD

%type <cmd> cancel_command CANCEL

%type <cmd> commit_command COMMIT

%type <cmd> create_command CREATE

%type <cmd> delete_command DELETE

%type <cmd> end_command END

%type <cmd> exit_command EXIT

%type <cmd> export_command EXPORT

%type <cmd> help_command HELP

%type <cmd> info_command INFO

%type <cmd> remove_command REMOVE

%type <cmd> revert_command REVERT

%type <cmd> select_command SELECT

%type <cmd> set_command SET

%type <cmd> clear_command CLEAR

%type <cmd> verify_command VERIFY

%type <cmd> terminator

%%

commands: command terminator

	{

		if ($1 != NULL) {

			if ($1->cmd_handler != NULL)

				$1->cmd_handler($1);

			free_cmd($1);

			bzero(list, sizeof (list_property_t));

			num_prop_vals = 0;

		}

		return (0);

	}

	| command error terminator

	{

		if ($1 != NULL) {

			free_cmd($1);

			bzero(list, sizeof (list_property_t));

			num_prop_vals = 0;

		}

		if (YYRECOVERING())

			YYABORT;

		yyclearin;

		yyerrok;

	}

	| error terminator

	{

		if (YYRECOVERING())

			YYABORT;

		yyclearin;

		yyerrok;

	}

	| terminator

	{

		return (0);

	}

command: add_command

	| cancel_command

	| clear_command

	| create_command

	| commit_command

	| delete_command

	| end_command

	| exit_command

	| export_command

	| help_command

	| info_command

	| remove_command

	| revert_command

	| select_command

	| set_command

	| verify_command

terminator:	'\n'	{ newline_terminated = B_TRUE; }

	|	';'	{ newline_terminated = B_FALSE; }

add_command: ADD

	{

		short_usage(CMD_ADD);

		(void) fputs("\n", stderr);

		usage(B_FALSE, HELP_RES_PROPS);

		YYERROR;

	}

	| ADD TOKEN

	{

		if (($$ = alloc_cmd()) == NULL)

			YYERROR;

		cmd = $$;

		$$->cmd_handler = &add_func;

		$$->cmd_argc = 1;

		$$->cmd_argv[0] = $2;

		$$->cmd_argv[1] = NULL;

	}

	| ADD resource_type

	{

		if (($$ = alloc_cmd()) == NULL)

			YYERROR;

		cmd = $$;

		$$->cmd_handler = &add_func;

		$$->cmd_argc = 0;

		$$->cmd_res_type = $2;

		$$->cmd_prop_nv_pairs = 0;

	}

	| ADD property_name property_value

	{

		if (($$ = alloc_cmd()) == NULL)

			YYERROR;

		cmd = $$;

		$$->cmd_handler = &add_func;

		$$->cmd_argc = 0;

		$$->cmd_prop_nv_pairs = 1;

		$$->cmd_prop_name[0] = $2;

		$$->cmd_property_ptr[0] = &property[0];

	}

cancel_command: CANCEL

	{

		if (($$ = alloc_cmd()) == NULL)

			YYERROR;

		cmd = $$;

		$$->cmd_handler = &cancel_func;

		$$->cmd_argc = 0;

		$$->cmd_argv[0] = NULL;

	}

	| CANCEL TOKEN

	{

		if (($$ = alloc_cmd()) == NULL)

			YYERROR;

		cmd = $$;

		$$->cmd_handler = &cancel_func;

		$$->cmd_argc = 1;

		$$->cmd_argv[0] = $2;

		$$->cmd_argv[1] = NULL;

	}

create_command: CREATE

	{

		if (($$ = alloc_cmd()) == NULL)

			YYERROR;

		cmd = $$;

		$$->cmd_handler = &create_func;

		$$->cmd_argc = 0;

		$$->cmd_argv[0] = NULL;

	}

	| CREATE TOKEN

	{

		if (($$ = alloc_cmd()) == NULL)

			YYERROR;

		cmd = $$;

		$$->cmd_handler = &create_func;

		$$->cmd_argc = 1;

		$$->cmd_argv[0] = $2;

		$$->cmd_argv[1] = NULL;

	}

	| CREATE TOKEN TOKEN

	{

		if (($$ = alloc_cmd()) == NULL)

			YYERROR;

		cmd = $$;

		$$->cmd_handler = &create_func;

		$$->cmd_argc = 2;

		$$->cmd_argv[0] = $2;

		$$->cmd_argv[1] = $3;

		$$->cmd_argv[2] = NULL;

	}

	| CREATE TOKEN TOKEN TOKEN

	{

		if (($$ = alloc_cmd()) == NULL)

			YYERROR;

		cmd = $$;

		$$->cmd_handler = &create_func;

		$$->cmd_argc = 3;

		$$->cmd_argv[0] = $2;

		$$->cmd_argv[1] = $3;

		$$->cmd_argv[2] = $4;

		$$->cmd_argv[3] = NULL;

	}

commit_command: COMMIT

	{

		if (($$ = alloc_cmd()) == NULL)

			YYERROR;

		cmd = $$;

		$$->cmd_handler = &commit_func;

		$$->cmd_argc = 0;

		$$->cmd_argv[0] = NULL;

	}

	| COMMIT TOKEN

	{

		if (($$ = alloc_cmd()) == NULL)

			YYERROR;

		cmd = $$;

		$$->cmd_handler = &commit_func;

		$$->cmd_argc = 1;

		$$->cmd_argv[0] = $2;

		$$->cmd_argv[1] = NULL;

	}

delete_command: DELETE

	{

		if (($$ = alloc_cmd()) == NULL)

			YYERROR;

		cmd = $$;

		$$->cmd_handler = &delete_func;

		$$->cmd_argc = 0;

		$$->cmd_argv[0] = NULL;

	}

	|	DELETE TOKEN

	{

		if (($$ = alloc_cmd()) == NULL)

			YYERROR;

		cmd = $$;

		$$->cmd_handler = &delete_func;

		$$->cmd_argc = 1;

		$$->cmd_argv[0] = $2;

		$$->cmd_argv[1] = NULL;

	}

end_command: END

	{

		if (($$ = alloc_cmd()) == NULL)

			YYERROR;

		cmd = $$;

		$$->cmd_handler = &end_func;

		$$->cmd_argc = 0;

		$$->cmd_argv[0] = NULL;

	}

	| END TOKEN

	{

		if (($$ = alloc_cmd()) == NULL)

			YYERROR;

		cmd = $$;

		$$->cmd_handler = &end_func;

		$$->cmd_argc = 1;

		$$->cmd_argv[0] = $2;

		$$->cmd_argv[1] = NULL;

	}

exit_command: EXIT

	{

		if (($$ = alloc_cmd()) == NULL)

			YYERROR;

		cmd = $$;

		$$->cmd_handler = &exit_func;

		$$->cmd_argc = 0;

		$$->cmd_argv[0] = NULL;

	}

	| EXIT TOKEN

	{

		if (($$ = alloc_cmd()) == NULL)

			YYERROR;

		cmd = $$;

		$$->cmd_handler = &exit_func;

		$$->cmd_argc = 1;

		$$->cmd_argv[0] = $2;

		$$->cmd_argv[1] = NULL;

	}

export_command: EXPORT

	{

		if (($$ = alloc_cmd()) == NULL)

			YYERROR;

		cmd = $$;

		$$->cmd_handler = &export_func;

		$$->cmd_argc = 0;

		$$->cmd_argv[0] = NULL;

	}

	| EXPORT TOKEN

	{

		if (($$ = alloc_cmd()) == NULL)

			YYERROR;

		cmd = $$;

		$$->cmd_handler = &export_func;

		$$->cmd_argc = 1;

		$$->cmd_argv[0] = $2;

		$$->cmd_argv[1] = NULL;

	}

	| EXPORT TOKEN TOKEN

	{

		if (($$ = alloc_cmd()) == NULL)

			YYERROR;

		cmd = $$;

		$$->cmd_handler = &export_func;

		$$->cmd_argc = 2;

		$$->cmd_argv[0] = $2;

		$$->cmd_argv[1] = $3;

		$$->cmd_argv[2] = NULL;

	}

help_command:	HELP

	{

		if (($$ = alloc_cmd()) == NULL)

			YYERROR;

		cmd = $$;

		$$->cmd_handler = &help_func;

		$$->cmd_argc = 0;

		$$->cmd_argv[0] = NULL;

	}

	|	HELP TOKEN

	{

		if (($$ = alloc_cmd()) == NULL)

			YYERROR;

		cmd = $$;

		$$->cmd_handler = &help_func;

		$$->cmd_argc = 1;

		$$->cmd_argv[0] = $2;

		$$->cmd_argv[1] = NULL;

	}

info_command:	INFO

	{

		if (($$ = alloc_cmd()) == NULL)

			YYERROR;

		cmd = $$;

		$$->cmd_handler = &info_func;

		$$->cmd_res_type = RT_UNKNOWN;

		$$->cmd_prop_nv_pairs = 0;

	}

	|	INFO TOKEN

	{

		short_usage(CMD_INFO);

		(void) fputs("\n", stderr);

		usage(B_FALSE, HELP_RES_PROPS);

		free($2);

		YYERROR;

	}

	|	INFO resource_type

	{

		if (($$ = alloc_cmd()) == NULL)

			YYERROR;

		cmd = $$;

		$$->cmd_handler = &info_func;

		$$->cmd_res_type = $2;

		$$->cmd_prop_nv_pairs = 0;

	}

	|	INFO ZONENAME

	{

		if (($$ = alloc_cmd()) == NULL)

			YYERROR;

		cmd = $$;

		$$->cmd_handler = &info_func;

		$$->cmd_res_type = RT_ZONENAME;

		$$->cmd_prop_nv_pairs = 0;

	}

	|	INFO ZONEPATH

	{

		if (($$ = alloc_cmd()) == NULL)

			YYERROR;

		cmd = $$;

		$$->cmd_handler = &info_func;

		$$->cmd_res_type = RT_ZONEPATH;

		$$->cmd_prop_nv_pairs = 0;

	}

	|	INFO BRAND

	{

		if (($$ = alloc_cmd()) == NULL)

			YYERROR;

		cmd = $$;

		$$->cmd_handler = &info_func;

		$$->cmd_res_type = RT_BRAND;

		$$->cmd_prop_nv_pairs = 0;

	}

	|	INFO AUTOBOOT

	{

		if (($$ = alloc_cmd()) == NULL)

			YYERROR;

		cmd = $$;

		$$->cmd_handler = &info_func;

		$$->cmd_res_type = RT_AUTOBOOT;

		$$->cmd_prop_nv_pairs = 0;

	}

	|	INFO IPTYPE

	{

		if (($$ = alloc_cmd()) == NULL)

			YYERROR;

		cmd = $$;

		$$->cmd_handler = &info_func;

		$$->cmd_res_type = RT_IPTYPE;

		$$->cmd_prop_nv_pairs = 0;