/* 
 * Motif
 *
 * Copyright (c) 1987-2012, The Open Group. All rights reserved.
 *
 * These libraries and programs are free software; you can
 * redistribute them and/or modify them under the terms of the GNU
 * Lesser General Public License as published by the Free Software
 * Foundation; either version 2 of the License, or (at your option)
 * any later version.
 *
 * These libraries and programs are distributed in the hope that
 * they will be useful, but WITHOUT ANY WARRANTY; without even the
 * implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
 * PURPOSE. See the GNU Lesser General Public License for more
 * details.
 *
 * You should have received a copy of the GNU Lesser General Public
 * License along with these librararies and programs; if not, write
 * to the Free Software Foundation, Inc., 51 Franklin Street, Fifth
 * Floor, Boston, MA 02110-1301 USA
*/ 
/* 
 * HISTORY
*/ 
#ifdef REV_INFO
#ifndef lint
static char rcsid[] = "$XConsortium: NL.c /main/4 1995/07/13 20:31:34 drk $"
#endif
#endif


#include <stdio.h>
#include <Mrm/MrmAppl.h>

typedef struct {
  char *valid_string1;
  char *valid_string2;
  char *uid_path;
  char *mrm_file1;
  char *mrm_file2;
  int   mrm_file_count;
} AppData, *pAppData;


int def_mrm_count = 1;

XtResource myResources[] = {
  {"validString1","ValidString",XtRString,sizeof(char *),
   XtOffset(pAppData,valid_string1),XtRString,(caddr_t)"string1"},
  {"validString2","ValidString",XtRString,sizeof(char *),
   XtOffset(pAppData,valid_string2),XtRString,(caddr_t)"string2"},
  {"uidPath","UidPath",XtRString,sizeof(char *),
   XtOffset(pAppData,uid_path),XtRString,(caddr_t)"%U\
%S"},
  {"mrmFile1","MrmFile",XtRString,sizeof(char *),
   XtOffset(pAppData,mrm_file1),XtRString,(caddr_t)"file1"},
  {"mrmFile2","MrmFile",XtRString,sizeof(char *),
   XtOffset(pAppData,mrm_file2),XtRString,(caddr_t)"file2"},
  {"mrmFileCount","MrmFileCount",XtRInt,sizeof(int),
   XtOffset(pAppData,mrm_file_count),XtRInt,(caddr_t)&def_mrm_count}
};

XrmOptionDescRec options[] = {
  {"-valid1","*validString1",XrmoptionSepArg,NULL},
  {"-valid2","*validString2",XrmoptionSepArg,NULL},
  {"-uidpath","*uidPath",XrmoptionSepArg,NULL},
  {"-file1","*mrmFile1",XrmoptionSepArg,NULL},
  {"-file2","*mrmFile2",XrmoptionSepArg,NULL},
  {"-filecount","*mrmFileCount",XrmoptionSepArg,NULL}
};

void main (argc, argv)
int argc;
char **argv;
{
   AppData myData;
   Widget toplevel;
   MrmCount filecount;
   MrmHierarchy	s_MrmHierarchy;
   MrmCode	type;
   String        UIL_string_literal;
   char *filenames[2];
   char envstring[120];
   Display *dsp;

   MrmInitialize();
   toplevel = XtInitialize (argv[0], "PathnameTest", options, 
			    XtNumber(options), &argc, argv);

   /* get app resources */
   XtGetApplicationResources(toplevel, &myData,
			     myResources, XtNumber(myResources),
			     NULL, 0);

   filecount = myData.mrm_file_count;
   filenames[0] = myData.mrm_file1;
   filenames[1] = myData.mrm_file2;

   dsp = XtDisplay(toplevel);

   sprintf(envstring,"UIDPATH=%s",myData.uid_path);
   putenv(envstring);

   if(myData.mrm_file_count==1){
     printf("uid path: %s\nvalid string: %s\nmrm filename: %s \n",
	  myData.uid_path,
	  myData.valid_string1,
	  myData.mrm_file1);
   }
   if(myData.mrm_file_count==2){
     printf("uid path: %s\nvalid string1: %s\nmrm filename1: %s \nvalid string2: %s\nmrm filename2: %s \n",
	  myData.uid_path,
	  myData.valid_string1,
	  myData.mrm_file1,
	  myData.valid_string2,
	  myData.mrm_file2);
   }
   if(MrmOpenHierarchy(filecount,/* number of files	*/
		       filenames,	 /* files		*/
		       NULL,		 /* os_ext_list (null)	*/
		       &s_MrmHierarchy) /* ptr to returned id	*/
      != MrmSUCCESS) {
     fprintf(stdout,"Open hierarchy FAILED\n");
     exit(1);
   }

   fprintf(stdout,"Open hierarchy call passed.\n");

   /* Fetch string literal to verify that correct uid file was opened */
   if(MrmFetchLiteral(s_MrmHierarchy,
		      "string1",
		      dsp,
		      (XtPointer)&UIL_string_literal,
		      &type) != MrmSUCCESS){
     fprintf(stdout,"Fetch literal FAILED\n");
     exit(2);
   }
   if(strcmp(UIL_string_literal, myData.valid_string1) != 0)
     fprintf(stdout,"Fetch literal FAILED: fetched string is %s\n",
	     UIL_string_literal);
   else
     fprintf(stdout,"Fetch literal passed with fetched string %s\n",
	     UIL_string_literal);


   if(filecount==2){
     /* Fetch string literal to verify that correct uid file was opened */
     if(MrmFetchLiteral(s_MrmHierarchy,
			"string2",
			dsp,
			(XtPointer)&UIL_string_literal,
			&type) != MrmSUCCESS){
       fprintf(stdout,"Second fetch literal FAILED\n");
       exit(3);
     }
     if(strcmp(UIL_string_literal, myData.valid_string2) != 0)
       fprintf(stdout,"Second fetch FAILED: fetched string is %s\n",
	       UIL_string_literal);
     else
       fprintf(stdout,"Second fetch passed with fetched string %s\n",
	       UIL_string_literal);
   }

   MrmCloseHierarchy(s_MrmHierarchy);
}