 /*
  * Khoros: $Id: form_init.c,v 1.3 1992/03/20 22:50:28 dkhoros Exp $
  */

#if !defined(lint) && !defined(SABER)
static char rcsid[] = "Khoros: $Id: form_init.c,v 1.3 1992/03/20 22:50:28 dkhoros Exp $";
#endif

 /*
  * $Log: form_init.c,v $
 * Revision 1.3  1992/03/20  22:50:28  dkhoros
 * VirtualPatch5
 *
  */

/*
 *---------------------------------------------------------------------
 *            Copyright 1990 University of New Mexico
 * 
 * Permission to copy and modify this software and its documen- 
 * tation only for internal use in your organization is hereby 
 * granted, provided that this notice is retained thereon and 
 * on all copies.  UNM makes no representations as too the sui- 
 * tability and operability of this software for any purpose. 
 * It is provided 'as is' without express or implied warranty. 
 *  
 * UNM DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, 
 * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FIT- 
 * NESS.  IN NO EVENT SHALL UNM BE LIABLE FOR ANY SPECIAL, 
 * INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY OTHER DAMAGES WHAT- 
 * SOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER 
 * IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS 
 * ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PER- 
 * FORMANCE OF THIS SOFTWARE. 
 *  
 * No other rights, including for example, the right to redis- 
 * tribute this software and its documentation or the right to 
 * prepare derivative works, are granted unless specifically 
 * provided in a separate license agreement. 
 * 
 *---------------------------------------------------------------------
 */
#include "unmcopyright.h"
#include "xvforms.h"
#include "form_info.h"


/*>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>  <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
 >>>>
 >>>>         File Name:  form_init.c
 >>>>
 >>>>      Program Desc:  code to initialize fields
 >>>>                      in the structure found in form_info.h
 >>>>
 >>>>            Author:  automatically generated by conductor
 >>>>
 >>>> Date Last Updated:  Fri Mar 13 14:34:46 1992
 >>>>
 >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>   <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<*/


_xvf_init_Composer(formptr,forminfo)

xvf_form *formptr; 
Composer *forminfo;
{
	int index;
	Line_Info line_info;
	char **database;

	xvf_clear_line_info(&line_info);
	database = formptr->db;

	/***** initializing 'Composer' Form Information structure *****/

	forminfo->quit = false;
	forminfo->pane = (Composer_pane *) 
			  malloc(sizeof(Composer_pane));


	index = 9;

	xvf_parse_startsubform_line(database[index], &line_info);
	forminfo->pane_selected = line_info.selected;
	forminfo->pane_index = 9;
	forminfo->pane_sfb_index = 2;

	/*** initializing 'forminfo->pane'
	      Subform Information structure ***/

	forminfo->pane->edit_pane = (pane_edit_pane *) 
			  malloc(sizeof(pane_edit_pane));


	index = 10;

	xvf_parse_startpane_line(database[index], &line_info);
	forminfo->pane->edit_pane_selected = line_info.selected;
	forminfo->pane->edit_pane_index = 10;
	forminfo->pane->edit_pane_gb_index = 0;
	index++;


	/* initializing 'forminfo->pane->edit_pane'
	       Pane Information structure */

	xvf_parse_input_line(database[index], &line_info);
	if (line_info.file_def != NULL) {
	   forminfo->pane->edit_pane->pane_file = 
		xvf_strcpy(line_info.file_def);
	}
	else  forminfo->pane->edit_pane->pane_file = NULL;

	xvf_deparse_input_line(&line_info, database, index);
	forminfo->pane->edit_pane->pane_file_index = index;
	index++;

	forminfo->pane->edit_pane->read_pane = false;
	forminfo->pane->edit_pane->read_pane_index = index;
	index++;

	forminfo->pane->edit_pane->save_pane = false;
	forminfo->pane->edit_pane->save_pane_index = index;
	index++;

	index++;

	forminfo->pane->edit_pane->select_I = false;
	forminfo->pane->edit_pane->select_I_index = index;
	index++;

	forminfo->pane->edit_pane->select_O = false;
	forminfo->pane->edit_pane->select_O_index = index;
	index++;

	forminfo->pane->edit_pane->select_f = false;
	forminfo->pane->edit_pane->select_f_index = index;
	index++;

	forminfo->pane->edit_pane->select_i = false;
	forminfo->pane->edit_pane->select_i_index = index;
	index++;

	forminfo->pane->edit_pane->select_s = false;
	forminfo->pane->edit_pane->select_s_index = index;
	index++;

	forminfo->pane->edit_pane->select_l = false;
	forminfo->pane->edit_pane->select_l_index = index;
	index++;

	forminfo->pane->edit_pane->select_T = false;
	forminfo->pane->edit_pane->select_T_index = index;
	index++;

	forminfo->pane->edit_pane->select_C = false;
	forminfo->pane->edit_pane->select_C_index = index;
	index++;

	forminfo->pane->edit_pane->select_b = false;
	forminfo->pane->edit_pane->select_b_index = index;
	index++;

	forminfo->pane->edit_pane->select_P = false;
	forminfo->pane->edit_pane->select_P_index = index;
	index++;

	forminfo->pane->edit_pane->select_a = false;
	forminfo->pane->edit_pane->select_a_index = index;
	index++;

	forminfo->pane->edit_pane->select_H = false;
	forminfo->pane->edit_pane->select_H_index = index;
	index++;

	forminfo->pane->edit_pane->select_Q = false;
	forminfo->pane->edit_pane->select_Q_index = index;
	index++;

	forminfo->pane->edit_pane->select_R = false;
	forminfo->pane->edit_pane->select_R_index = index;
	index++;

	forminfo->pane->edit_pane->delete = false;
	forminfo->pane->edit_pane->delete_index = index;
	index++;

	forminfo->pane->edit_pane->copy = false;
	forminfo->pane->edit_pane->copy_index = index;
	index++;

	index++;

	xvf_parse_string_line(database[index], &line_info);
	if (line_info.string_def != NULL) {
	   forminfo->pane->edit_pane->var_name = 
		xvf_strcpy(line_info.string_def);
	}
	else  forminfo->pane->edit_pane->var_name = NULL;

	xvf_deparse_string_line(&line_info, database,index);
	forminfo->pane->edit_pane->var_name_index = index;
	index++;

	xvf_parse_string_line(database[index], &line_info);
	if (line_info.string_def != NULL) {
	   forminfo->pane->edit_pane->name = 
		xvf_strcpy(line_info.string_def);
	}
	else  forminfo->pane->edit_pane->name = NULL;

	xvf_deparse_string_line(&line_info, database,index);
	forminfo->pane->edit_pane->name_index = index;
	index++;

	xvf_parse_string_line(database[index], &line_info);
	if (line_info.string_def != NULL) {
	   forminfo->pane->edit_pane->button_label = 
		xvf_strcpy(line_info.string_def);
	}
	else  forminfo->pane->edit_pane->button_label = NULL;

	xvf_deparse_string_line(&line_info, database,index);
	forminfo->pane->edit_pane->button_label_index = index;
forminfo->pane->edit_pane->button_label_selected = false;
	index++;

	xvf_parse_string_line(database[index], &line_info);
	if (line_info.string_def != NULL) {
	   forminfo->pane->edit_pane->usage_string = 
		xvf_strcpy(line_info.string_def);
	}
	else  forminfo->pane->edit_pane->usage_string = NULL;

	xvf_deparse_string_line(&line_info, database,index);
	forminfo->pane->edit_pane->usage_string_index = index;
	index++;

	xvf_parse_string_line(database[index], &line_info);
	if (line_info.string_def != NULL) {
	   forminfo->pane->edit_pane->default_string = 
		xvf_strcpy(line_info.string_def);
	}
	else  forminfo->pane->edit_pane->default_string = NULL;

	xvf_deparse_string_line(&line_info, database,index);
	forminfo->pane->edit_pane->default_string_index = index;
forminfo->pane->edit_pane->default_string_selected = false;
	index++;

	xvf_parse_logic_line(database[index], &line_info);
	forminfo->pane->edit_pane->active = line_info.logical_def;
	line_info.logical_val = line_info.logical_def;
	xvf_deparse_logic_line(&line_info, database,index);
	forminfo->pane->edit_pane->active_index = index;
forminfo->pane->edit_pane->active_selected = false;
	index++;

	xvf_parse_logic_line(database[index], &line_info);
	forminfo->pane->edit_pane->live = line_info.logical_def;
	line_info.logical_val = line_info.logical_def;
	xvf_deparse_logic_line(&line_info, database,index);
	forminfo->pane->edit_pane->live_index = index;
forminfo->pane->edit_pane->live_selected = false;
	index++;

	xvf_parse_logic_line(database[index], &line_info);
	forminfo->pane->edit_pane->optional = line_info.logical_def;
	line_info.logical_val = line_info.logical_def;
	xvf_deparse_logic_line(&line_info, database,index);
	forminfo->pane->edit_pane->optional_index = index;
forminfo->pane->edit_pane->optional_selected = false;
	index++;

	xvf_parse_logic_line(database[index], &line_info);
	forminfo->pane->edit_pane->opt_selected = line_info.logical_def;
	line_info.logical_val = line_info.logical_def;
	xvf_deparse_logic_line(&line_info, database,index);
	forminfo->pane->edit_pane->opt_selected_index = index;
forminfo->pane->edit_pane->opt_selected_selected = false;
	index++;

	index++;

	xvf_parse_int_line(database[index], &line_info);
	forminfo->pane->edit_pane->gs_width = line_info.int_def;
	line_info.int_val = line_info.int_def;
	xvf_deparse_int_line(&line_info, database,index);
	forminfo->pane->edit_pane->gs_width_index = index;
forminfo->pane->edit_pane->gs_width_selected = false;
	index++;

	xvf_parse_int_line(database[index], &line_info);
	forminfo->pane->edit_pane->gs_height = line_info.int_def;
	line_info.int_val = line_info.int_def;
	xvf_deparse_int_line(&line_info, database,index);
	forminfo->pane->edit_pane->gs_height_index = index;
forminfo->pane->edit_pane->gs_height_selected = false;
	index++;

	xvf_parse_int_line(database[index], &line_info);
	forminfo->pane->edit_pane->gs_xoff = line_info.int_def;
	line_info.int_val = line_info.int_def;
	xvf_deparse_int_line(&line_info, database,index);
	forminfo->pane->edit_pane->gs_xoff_index = index;
forminfo->pane->edit_pane->gs_xoff_selected = false;
	index++;

	xvf_parse_int_line(database[index], &line_info);
	forminfo->pane->edit_pane->gs_yoff = line_info.int_def;
	line_info.int_val = line_info.int_def;
	xvf_deparse_int_line(&line_info, database,index);
	forminfo->pane->edit_pane->gs_yoff_index = index;
forminfo->pane->edit_pane->gs_yoff_selected = false;
	index++;

	xvf_parse_int_line(database[index], &line_info);
	forminfo->pane->edit_pane->ps_xoff = line_info.int_def;
	line_info.int_val = line_info.int_def;
	xvf_deparse_int_line(&line_info, database,index);
	forminfo->pane->edit_pane->ps_xoff_index = index;
forminfo->pane->edit_pane->ps_xoff_selected = false;
	index++;

	xvf_parse_int_line(database[index], &line_info);
	forminfo->pane->edit_pane->ps_yoff = line_info.int_def;
	line_info.int_val = line_info.int_def;
	xvf_deparse_int_line(&line_info, database,index);
	forminfo->pane->edit_pane->ps_yoff_index = index;
forminfo->pane->edit_pane->ps_yoff_selected = false;
	index++;

	xvf_parse_toggle_line(database[index], &line_info);
	forminfo->pane->edit_pane->toggle_range_val = line_info.toggle_def;
	line_info.toggle_val = line_info.toggle_def;
	xvf_deparse_toggle_line(&line_info, database,index);
	forminfo->pane->edit_pane->toggle_range_index = index;
forminfo->pane->edit_pane->toggle_range_selected = false;
	index++;

	index = 56;
	xvf_parse_float_line(database[index], &line_info);
	forminfo->pane->edit_pane->default_float = line_info.float_def;
	line_info.float_val = line_info.float_def;
	xvf_deparse_float_line(&line_info, database,index);
	forminfo->pane->edit_pane->default_float_index = index;
forminfo->pane->edit_pane->default_float_selected = false;
	index++;

	index++;

	xvf_parse_float_line(database[index], &line_info);
	forminfo->pane->edit_pane->lower_range = line_info.float_def;
	line_info.float_val = line_info.float_def;
	xvf_deparse_float_line(&line_info, database,index);
	forminfo->pane->edit_pane->lower_range_index = index;
	index++;

	xvf_parse_float_line(database[index], &line_info);
	forminfo->pane->edit_pane->upper_range = line_info.float_def;
	line_info.float_val = line_info.float_def;
	xvf_deparse_float_line(&line_info, database,index);
	forminfo->pane->edit_pane->upper_range_index = index;
	index++;

	index++;

	xvf_parse_string_line(database[index], &line_info);
	if (line_info.string_def != NULL) {
	   forminfo->pane->edit_pane->zero_label = 
		xvf_strcpy(line_info.string_def);
	}
	else  forminfo->pane->edit_pane->zero_label = NULL;

	xvf_deparse_string_line(&line_info, database,index);
	forminfo->pane->edit_pane->zero_label_index = index;
forminfo->pane->edit_pane->zero_label_selected = false;
	index++;

	xvf_parse_string_line(database[index], &line_info);
	if (line_info.string_def != NULL) {
	   forminfo->pane->edit_pane->one_label = 
		xvf_strcpy(line_info.string_def);
	}
	else  forminfo->pane->edit_pane->one_label = NULL;

	xvf_deparse_string_line(&line_info, database,index);
	forminfo->pane->edit_pane->one_label_index = index;
forminfo->pane->edit_pane->one_label_selected = false;
	index++;

	xvf_parse_logic_line(database[index], &line_info);
	forminfo->pane->edit_pane->default_logical = line_info.logical_def;
	line_info.logical_val = line_info.logical_def;
	xvf_deparse_logic_line(&line_info, database,index);
	forminfo->pane->edit_pane->default_logical_index = index;
forminfo->pane->edit_pane->default_logical_selected = false;
	index++;

	forminfo->pane->edit_pane->quit = false;
	index++;

	forminfo->prog = (Composer_prog *) 
			  malloc(sizeof(Composer_prog));


	index = 67;

	xvf_parse_startsubform_line(database[index], &line_info);
	forminfo->prog_selected = line_info.selected;
	forminfo->prog_index = 67;
	forminfo->prog_sfb_index = 3;

	/*** initializing 'forminfo->prog'
	      Subform Information structure ***/

	forminfo->prog->edit_prog = (prog_edit_prog *) 
			  malloc(sizeof(prog_edit_prog));


	index = 68;

	xvf_parse_startpane_line(database[index], &line_info);
	forminfo->prog->edit_prog_selected = line_info.selected;
	forminfo->prog->edit_prog_index = 68;
	forminfo->prog->edit_prog_gb_index = 0;
	index++;


	/* initializing 'forminfo->prog->edit_prog'
	       Pane Information structure */

	xvf_parse_input_line(database[index], &line_info);
	if (line_info.file_def != NULL) {
	   forminfo->prog->edit_prog->prog_file = 
		xvf_strcpy(line_info.file_def);
	}
	else  forminfo->prog->edit_prog->prog_file = NULL;

	xvf_deparse_input_line(&line_info, database, index);
	forminfo->prog->edit_prog->prog_file_index = index;
	index++;

	forminfo->prog->edit_prog->read_prog = false;
	forminfo->prog->edit_prog->read_prog_index = index;
	index++;

	forminfo->prog->edit_prog->save_prog = false;
	forminfo->prog->edit_prog->save_prog_index = index;
	index++;

	index++;

	index++;

	forminfo->prog->edit_prog->authors = false;
	forminfo->prog->edit_prog->authors_index = index;
	index++;

	forminfo->prog->edit_prog->short_prog_description = false;
	forminfo->prog->edit_prog->short_prog_description_index = index;
	index++;

	forminfo->prog->edit_prog->man1_long_description = false;
	forminfo->prog->edit_prog->man1_long_description_index = index;
	index++;

	forminfo->prog->edit_prog->man1_examples = false;
	forminfo->prog->edit_prog->man1_examples_index = index;
	index++;

	forminfo->prog->edit_prog->man1_restrictions = false;
	forminfo->prog->edit_prog->man1_restrictions_index = index;
	index++;

	forminfo->prog->edit_prog->man1_see_also = false;
	forminfo->prog->edit_prog->man1_see_also_index = index;
	index++;

	forminfo->prog->edit_prog->usage_additions = false;
	forminfo->prog->edit_prog->usage_additions_index = index;
	index++;

	forminfo->prog->edit_prog->include_includes = false;
	forminfo->prog->edit_prog->include_includes_index = index;
	index++;

	forminfo->prog->edit_prog->include_additions = false;
	forminfo->prog->edit_prog->include_additions_index = index;
	index++;

	forminfo->prog->edit_prog->include_macros = false;
	forminfo->prog->edit_prog->include_macros_index = index;
	index++;

	forminfo->prog->edit_prog->main_variable_list = false;
	forminfo->prog->edit_prog->main_variable_list_index = index;
	index++;

	forminfo->prog->edit_prog->main_before_lib_call = false;
	forminfo->prog->edit_prog->main_before_lib_call_index = index;
	index++;

	forminfo->prog->edit_prog->main_library_call = false;
	forminfo->prog->edit_prog->main_library_call_index = index;
	index++;

	forminfo->prog->edit_prog->main_after_lib_call = false;
	forminfo->prog->edit_prog->main_after_lib_call_index = index;
	index++;

	forminfo->prog->edit_prog->library_def = false;
	forminfo->prog->edit_prog->library_def_index = index;
	index++;

	forminfo->prog->edit_prog->library_includes = false;
	forminfo->prog->edit_prog->library_includes_index = index;
	index++;

	forminfo->prog->edit_prog->library_code = false;
	forminfo->prog->edit_prog->library_code_index = index;
	index++;

	forminfo->prog->edit_prog->short_lib_description = false;
	forminfo->prog->edit_prog->short_lib_description_index = index;
	index++;

	forminfo->prog->edit_prog->man3_long_description = false;
	forminfo->prog->edit_prog->man3_long_description_index = index;
	index++;

	forminfo->prog->edit_prog->man3_see_also = false;
	forminfo->prog->edit_prog->man3_see_also_index = index;
	index++;

	forminfo->prog->edit_prog->man3_restrictions = false;
	forminfo->prog->edit_prog->man3_restrictions_index = index;
	index++;

	forminfo->prog->edit_prog->library_mods = false;
	forminfo->prog->edit_prog->library_mods_index = index;
	index++;

	forminfo->prog->edit_prog->library_input = false;
	forminfo->prog->edit_prog->library_input_index = index;
	index++;

	forminfo->prog->edit_prog->library_output = false;
	forminfo->prog->edit_prog->library_output_index = index;
	index++;

	index++;

	xvf_parse_string_line(database[index], &line_info);
	if (line_info.string_def != NULL) {
	   forminfo->prog->edit_prog->prog_text = 
		xvf_strcpy(line_info.string_def);
	}
	else  forminfo->prog->edit_prog->prog_text = NULL;

	xvf_deparse_string_line(&line_info, database,index);
	forminfo->prog->edit_prog->prog_text_index = index;
	index++;

	forminfo->prog->edit_prog->quit = false;
	index++;

	forminfo->conf_manage = (Composer_conf_manage *) 
			  malloc(sizeof(Composer_conf_manage));


	index = 103;

	xvf_parse_startsubform_line(database[index], &line_info);
	forminfo->conf_manage_selected = line_info.selected;
	forminfo->conf_manage_index = 103;
	forminfo->conf_manage_sfb_index = 4;

	/*** initializing 'forminfo->conf_manage'
	      Subform Information structure ***/

	forminfo->conf_manage->ghost_routines = (conf_manage_ghost_routines *) 
			  malloc(sizeof(conf_manage_ghost_routines));


	index = 104;

	xvf_parse_startpane_line(database[index], &line_info);
	forminfo->conf_manage->ghost_routines_selected = line_info.selected;
	forminfo->conf_manage->ghost_routines_index = 104;
	forminfo->conf_manage->ghost_routines_gb_index = 0;
	index++;


	/* initializing 'forminfo->conf_manage->ghost_routines'
	       Pane Information structure */

	index++;

	xvf_parse_string_line(database[index], &line_info);
	if (line_info.string_def != NULL) {
	   forminfo->conf_manage->ghost_routines->name = 
		xvf_strcpy(line_info.string_def);
	}
	else  forminfo->conf_manage->ghost_routines->name = NULL;

	xvf_deparse_string_line(&line_info, database,index);
	forminfo->conf_manage->ghost_routines->name_index = index;
	index++;

	xvf_parse_string_line(database[index], &line_info);
	if (line_info.string_def != NULL) {
	   forminfo->conf_manage->ghost_routines->project = 
		xvf_strcpy(line_info.string_def);
	}
	else  forminfo->conf_manage->ghost_routines->project = NULL;

	xvf_deparse_string_line(&line_info, database,index);
	forminfo->conf_manage->ghost_routines->project_index = index;
	index++;

	xvf_parse_logic_line(database[index], &line_info);
	forminfo->conf_manage->ghost_routines->con_file = line_info.logical_def;
	line_info.logical_val = line_info.logical_def;
	xvf_deparse_logic_line(&line_info, database,index);
	forminfo->conf_manage->ghost_routines->con_file_index = index;
	index++;

	xvf_parse_logic_line(database[index], &line_info);
	forminfo->conf_manage->ghost_routines->install = line_info.logical_def;
	line_info.logical_val = line_info.logical_def;
	xvf_deparse_logic_line(&line_info, database,index);
	forminfo->conf_manage->ghost_routines->install_index = index;
	index++;

	index++;

	xvf_parse_logic_line(database[index], &line_info);
	forminfo->conf_manage->ghost_routines->lib = line_info.logical_def;
	line_info.logical_val = line_info.logical_def;
	xvf_deparse_logic_line(&line_info, database,index);
	forminfo->conf_manage->ghost_routines->lib_index = index;
	index++;

	xvf_parse_logic_line(database[index], &line_info);
	forminfo->conf_manage->ghost_routines->man3 = line_info.logical_def;
	line_info.logical_val = line_info.logical_def;
	xvf_deparse_logic_line(&line_info, database,index);
	forminfo->conf_manage->ghost_routines->man3_index = index;
	index++;

	index++;

	index++;

	forminfo->conf_manage->ghost_routines->exec_ghost = false;
	forminfo->conf_manage->ghost_routines->exec_ghost_index = index;
	index++;

	forminfo->conf_manage->ghost_routines->exec_ghostcheck = false;
	forminfo->conf_manage->ghost_routines->exec_ghostcheck_index = index;
	index++;

	forminfo->conf_manage->ghost_routines->exec_ghostreader = false;
	forminfo->conf_manage->ghost_routines->exec_ghostreader_index = index;
	index++;

	forminfo->conf_manage->ghost_routines->exec_make = false;
	forminfo->conf_manage->ghost_routines->exec_make_index = index;
	index++;

	index++;

	index++;

	forminfo->conf_manage->ghost_routines->exec_kinstall = false;
	forminfo->conf_manage->ghost_routines->exec_kinstall_index = index;
	index++;

	forminfo->conf_manage->ghost_routines->quit = false;
	index++;

	return(true);

}

