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


void removenl(char*); 

Bool 
get_event_ob(char *name,char *ret_object)
     //int main()
{
  FILE *infile;
  //char *name="threshold";
  //char *ret_object;
  char line[100];
  char *object;
  int lcount;
  //  int TRUE,FALSE=1;
  
  char key[100];
  int nchars;
  int index;
  char *p, *sp;
  
  
  if((infile = fopen("objects.txt", "r")) == NULL) 
    {
      printf("Objects file does not exists, Exiting......\n");
      exit(1);
    }
  
  while( fgets(line, sizeof(line), infile) != NULL ) 
    {
      removenl(line);
      sp = line;
      index=0;
      
      while(index<2) 
	{
	  index++;
	  if ((p = strchr(sp,'=')) == NULL)
	    p = sp + strlen(sp);
	  else
	    {
	      if(index==1)
		{
		  nchars = p - sp;
		  strncpy(key,sp,nchars);
		  key[nchars]='\0';
		}  
	      sp = p+1;
	    }
	  
	  if(index==2)
	    {
	      object=sp;
	    }    
	}  
      
      printf("key:%s\n",key);
      printf("value:%s\n",object);
      if(!strcmp(key,name))
	{
	  ret_object=object;
	  printf("found it\n");
	  fclose(infile);
	  return TRUE;
	}
    }
  
  fclose(infile);  /* Close the file */
  return FALSE;
}

void removenl(char *str) 
{
  while(strlen(str) && ( (str[strlen(str) - 1] == 13) || ( str[strlen(str) - 1] == 10 ))) 
    {
      str[strlen(str) - 1] = 0;
    }
}