#include <sys/types.h>
#include <sys/stat.h>
#include <fcntl.h>
#include <string.h>
#include <stdio.h>
#include <errno.h>
#include <sys/inotify.h>
/* This will watch for any new arrivals at TARGET directory and if found,it will invoke the SANITY_TEST script. */

#define TARGET "/sanity/test/incoming"
#define SANITY_TEST "/opt/qa/tools/dev_sanity/sanity_test.sh "

void get_event (int fd, const char * target);


/* ----------------------------------------------------------------- */

int main (int argc, char *argv[])
{
   char target[FILENAME_MAX];
   int result;
   int fd;
   int wd;   /* watch descriptor */

   if (argc < 2) {
      strcpy (target,TARGET);
	
   }
   else {
      fprintf (stderr, "Watching %s\n", TARGET);
      strcpy (target, TARGET);
   }

   fd = inotify_init();
   if (fd < 0) {
      fprintf (stderr, "Error: %s\n", strerror(errno));
      return 1;
   }
   
   wd = inotify_add_watch (fd, target, IN_ALL_EVENTS);
   if (wd < 0) {
      fprintf (stderr, "Error: %s\n", strerror(errno));
      return 1;
   }
   
   while (1) {
      get_event(fd, target);
   }

   return 0;
}

/* ----------------------------------------------------------------- */
/* Allow for 1024 simultanious events */
#define BUFF_SIZE ((sizeof(struct inotify_event)+FILENAME_MAX)*1024)

void get_event (int fd, const char * target)
{
   ssize_t len, i = 0;
   int status;
   char action[81+FILENAME_MAX] = {0};
   char buff[BUFF_SIZE] = {0};

   len = read (fd, buff, BUFF_SIZE);
   
   while (i < len) {
      struct inotify_event *pevent = (struct inotify_event *)&buff[i];
      char action[81+FILENAME_MAX] = {0};

      if (pevent->len) 
         strcpy (action, pevent->name);
      else
         strcpy (action, target);
    
      if (pevent->mask & IN_CLOSE_WRITE){ 
         strcat(action, " opened for writing was closed");
	/*invoke the script to process newly arrived tar file*/
	if (fork()==0){//child process.
	printf("Child running...");
	if(fork()==0){//grandchild
	system(SANITY_TEST);
	}else
	exit(0);
//	waitpid(-1, &status, 0);
	}
	}
//      waitpid(-1,&status,0);
      printf ("%s\n", action);
      i += sizeof(struct inotify_event) + pevent->len;

   }

}  /* get_event */