/*====================================================================*\
FILE    : UtilGroups.c
PURPOSE :

HISTORY..
DATE      BUILD   AUTHOR   MODIFICATIONS
07 Nov 96 H-01-16 Igor     $$1  Created
25 Nov 96 H-01-18 Igor     $$2  Fix bug 
17-Dec-96 H-01-21 Igor     $$3  added possibility to quit from a group
15-Aug-97 H-03-22 Pavel    $$4  Replace pro/D on Pro/E
21-Jan-97 H-03-37 aab      $$5  Added type casting
07-Oct-98 I-01-23 AKH      $$6  Replace pd_proto.h by pd_prototype.h
\*====================================================================*/

/*--------------------------------------------------------------------*\
Pro/Toolkit includes -- include this first
\*--------------------------------------------------------------------*/
#include "ProToolkit.h"
#include "TestError.h"
#include "ProMenu.h"
#include "ProElemId.h"

/*--------------------------------------------------------------------*\
Pro/Develop includes
\*--------------------------------------------------------------------*/
#include "prodev_menu.h"

/*--------------------------------------------------------------------*\
Application includes
\*--------------------------------------------------------------------*/
#include "pd_prototype.h"
#include "TestElem.h"
#include "UtilGroups.h"


/*====================================================================*\
FUNCTION : ProUtilIdToStr
PURPOSE  : Given the ProElemId, return the corresponding string
\*====================================================================*/
ProError ProUtilIdToStr(ProElemId elem_id, char *string_id)
{
    int table_size = sizeof(id_string_table2)/sizeof(ProTestIdToString);
    int i;
    ProBool exists = PRO_B_FALSE;

    strcpy(string_id, "not exist");
    for (i=0; i<table_size; i++)
     {
        if (id_string_table2[i].name_id == elem_id)
          {
            strcpy(string_id, id_string_table2[i].elem_name);
            exists = PRO_B_TRUE;
            break;
          }
     }
    if (exists == PRO_B_TRUE)
       return PRO_TK_NO_ERROR;
    else
       return PRO_TK_E_NOT_FOUND;
}


/*====================================================================*\
FUNCTION : ProUtilStrToId
PURPOSE  : Given the string, return the corresponding element id
\*====================================================================*/
ProError ProUtilStrToId(char *string_id, ProElemId *p_elem_id)
{
    int table_size = sizeof(id_string_table2)/sizeof(ProTestIdToString);
    int i;
    ProBool exists = PRO_B_TRUE;

    for (i=0; i<table_size; i++)
     {
        if (strcmp(id_string_table2[i].elem_name, string_id) == 0)
          {
            *p_elem_id = id_string_table2[i].name_id;
            exists = PRO_B_TRUE;
            break;
          }
     }
    if (exists == PRO_B_TRUE)
       return PRO_TK_NO_ERROR;
    else
       return PRO_TK_E_NOT_FOUND;
}


/*====================================================================*\
FUNCTION : ProUtilGroupMenu
PURPOSE  : create a groups menu and get the user's group choice
	   group_name is allocated and passed into a function!
\*====================================================================*/
ProError ProUtilGroupMenu(char *group_name)
{
    int i;
    wchar_t **group_names;
    wchar_t **selected;
    int n_sel;
    wchar_t title[15];
    ProError err;
   
    group_names = (wchar_t **) calloc(NUM_GROUPS + 2, sizeof(wchar_t *)); 

    for (i=0; i<NUM_GROUPS; i++)
      {
	group_names[i] = (wchar_t *) calloc(GROUP_NAME_SIZE, sizeof(wchar_t));
	ProStringToWstring(group_names[i], elem_groups[i].group_name);
      }

    group_names[NUM_GROUPS] = (wchar_t *) calloc(6, sizeof(wchar_t));
    ProStringToWstring(group_names[NUM_GROUPS], "Done");

    group_names[NUM_GROUPS + 1] = (wchar_t *) calloc(3, sizeof(wchar_t));
    ProStringToWstring(group_names[NUM_GROUPS + 1], "");

    ProStringToWstring(title, "ELEM GROUPS");

    err = ProMenuStringsSelect(title, group_names, 1, NULL,
	 					&selected, &n_sel);
    TEST_CALL_REPORT("ProMenuStringsSelect()", "ProUtilGroupMenu",
			    	       err, err != PRO_TK_NO_ERROR);

    ProWstringToString(group_name, selected[0]);

    for (i=0; i<=NUM_GROUPS + 1; i++)
       free(group_names[i]);

    free(group_names);

    return PRO_TK_NO_ERROR;
    
}    


/*====================================================================*\
FUNCTION : ProUtilElemMenu
PURPOSE  : create an elements menu of the specified group 
\*====================================================================*/
ProError ProUtilElemMenu(char *group_name, ProElemId *p_elem_id)
{
    int i;
    wchar_t **elem_names;
    wchar_t **selected;
    int num_elems;
    int n_sel;
    wchar_t title[15];
    int group_index = -1;
    char elem_name_id[ELEM_NAME_SIZE];
    ProError err;

    for (i=0; i<NUM_GROUPS; i++)
      {
	if (strcmp(elem_groups[i].group_name, group_name)==0)
	  {
	    group_index = i;
	    break;
	  }
      }

    if (group_index == -1)
      return PRO_TK_E_NOT_FOUND;

    /*-------------------------------------------*\
       Count how many elements are in the group
    \*-------------------------------------------*/
    num_elems = 0;

    for (i=0; i<NUM_ELEMS_IN_GROUP; i++)
      {
	if (elem_groups[group_index].group_elems[i] == -1)
	  break;

	num_elems++;
      }


    elem_names = (wchar_t **) calloc(num_elems + 2, sizeof(wchar_t *));

    for (i=0; i<num_elems; i++)
      {
	elem_names[i] = (wchar_t *) calloc(ELEM_NAME_SIZE, sizeof(wchar_t));
	ProUtilIdToStr((ProElemId)elem_groups[group_index].group_elems[i],elem_name_id);
	ProStringToWstring(elem_names[i], elem_name_id);
      } 

    elem_names[num_elems] = (wchar_t *) calloc(7, sizeof(wchar_t));
    ProStringToWstring(elem_names[num_elems], "QUIT");

    elem_names[num_elems + 1] = (wchar_t *) calloc(3, sizeof(wchar_t));
    ProStringToWstring(elem_names[num_elems + 1], "");

    ProStringToWstring(title, "Element Ids");

    err = ProMenuStringsSelect(title, elem_names, 1, NULL,
				    	    &selected, &n_sel);
    TEST_CALL_REPORT("ProMenuStringsSelect()", "ProUtilElemMenu",
			    	       err, err != PRO_TK_NO_ERROR);

    ProWstringToString(elem_name_id, selected[0]);

     if (strcmp(elem_name_id, "QUIT") == 0)
       err = PRO_TK_MSG_USER_QUIT;
     else
       {
         ProUtilStrToId(elem_name_id, p_elem_id);
         err = PRO_TK_NO_ERROR;
       }

    for (i=0; i<=num_elems+1; i++)
      free(elem_names[i]);

    free(elem_names);

    return err;
}