/*+JMJ
 * inifile test driver
 */

#include <stdio.h>
#include "inifile.h"

int
main ()
{
  int i;
  char* k;
  char* s;

  i = ireadi ("canonicl.ini");
  printf("Properties in canonicl.ini: %d\n", i); 

  printf ("Global properties:\n");
  k = wfkos ("");
  while (k != NULL)
  {
    printf ("%s:\t%s\n", k, lvop ("", k));
    k = wnkos ();
  }

  s = wfsoi ();
  while (s != NULL)
  {
    printf ("\n%s properties:\n", s);
    k = wfkos (s);
    while (k != NULL)
    {
      printf ("%s:\t%s\n", k, lvop (s, k));
      k = wnkos ();
    }
    s = wnsoi ();
  }

  printf ("\nQuery: Global keyg1=%s\n", lvop ("", "keyg1"));
  printf ("Query: [section1]key_2_section_2=%s\n",
	  lvop ("section1", "key_2_section_2"));

  ireseti ();
  printf ("\nReset INI properties\n");
  if (iproprty ("", "keyg1") == -1)
    printf ("Global keyg1 reset\n");
  else
    printf ("ERROR: Global keyg1 NOT reset\n");
  if (isection ("section1") == -1)
    printf ("Section section1 reset\n");
  else
    printf ("ERROR: Section section1 NOT reset\n");

  return 0;
}