/*
  * VisiQuest
  */

/*
 * Copyright (c) AccuSoft Corporation, 2005.
 * All rights reserved.  See $BOOTSTRAP/repos/license/License or run klicense.
 */

/* >>>>>>>>>>>>>>>>>>>>>>>>>>>>> <<<<<<<<<<<<<<<<<<<<<<<<<<
   >>>> 
   >>>> 	Driver code for myinverse
   >>>> 
   >>>>  Private: 
   >>>> 	run_myinverse()
   >>>> 	myinverse_extra_usage_additions();
   >>>>         myinverse_extra_free_args();
   >>>>   Static: 
   >>>>   Public: 
   >>>> 
   >>>>>>>>>>>>>>>>>>>>>>>>>>>>> <<<<<<<<<<<<<<<<<<<<<<<<<< */


#include "myinverse.h"

/*-----------------------------------------------------------
|
|  Routine Name: run_myinverse() - A simple example: creating the inverse of a greyscale image
|
|       Purpose: program driver code for myinverse
|
|       Returns: TRUE (1) on success, FALSE (0) on failure
|    Written By: gnemeth
|          Date: Apr 16, 2008
|
------------------------------------------------------------*/
int run_myinverse(void)
{
   /*-- Put Your Code Here --*/

   
   /* -main_variable_list */
   char *lib = "mythreshold_obj";
   char *rtn = "main";
   kobject in_object = NULL;
   kobject out_object = NULL;
   unsigned char *plane;
   unsigned char *res_plane;
   int w, h, d, t, e;
   int cw, ch, ct, pos;
/* -main_variable_list_end */

/* -main_before_lib_call */
   if ((in_object = kpds_open_input_object(clui_info->i_file))
          == KOBJECT_INVALID) {
     kerror(lib, rtn, "Can not open input object %s.\n", clui_info->i_file);
     kexit(KEXIT_FAILURE);
   }
   if ((out_object = kpds_open_output_object(clui_info->o_file))
        == KOBJECT_INVALID) {
     kerror(lib, rtn, "Can not open output object %s.\n", clui_info->o_file);
     kexit(KEXIT_FAILURE);
   }
   if (!kpds_copy_object(in_object, out_object)) {
     kerror(lib, rtn, "Can not copy input object to output object.\n");
     kexit(KEXIT_FAILURE);
   }
   kpds_set_attribute(in_object,  KPDS_VALUE_DATA_TYPE, KUBYTE);
   kpds_set_attribute(out_object, KPDS_VALUE_DATA_TYPE, KUBYTE);

  kpds_get_attribute(in_object, KPDS_VALUE_SIZE, &w, &h, &d, &t, &e);           

  plane = (unsigned char *)kmalloc(w*h*sizeof(unsigned char));
  res_plane = (char *)kmalloc(w*h*sizeof(unsigned char));
  if (!plane || !res_plane) {
     kerror(lib, rtn, "Could not allocate memory for the image\n");
     kexit(KEXIT_FAILURE);
  }
/* -main_before_lib_call_end */

/* -main_library_call */
  for (ct = 0; ct < t; ct++) {
    kpds_set_attribute(in_object, KPDS_VALUE_POSITION, 0, 0, 0, ct, 0);
    kpds_get_data(in_object, KPDS_VALUE_PLANE, (kaddr)plane);
    kmemset(res_plane, 0, w*h*sizeof(char));
 
    for (ch = 0; ch < h; ch++) {
      for (cw = 0; cw < w; cw++) {
        pos = ch*w + cw;
	
	/* IRD IDE A KOD RESZLETET!!!! */
	res_plane[pos] = 255 - plane[pos];
      }
    }
 
    kpds_set_attribute(out_object, KPDS_VALUE_POSITION, 0, 0, 0, ct, 0);
    kpds_put_data(out_object, KPDS_VALUE_PLANE, (kaddr)res_plane);
  }
/* -main_library_call_end */

/* -main_after_lib_call */
   if (!kpds_set_attribute(out_object, KPDS_HISTORY, kpds_history_string())) {
     kerror(lib,rtn,"Unable to set history on the destination object");
     kexit(KEXIT_FAILURE);
   }
   if (plane)
     kfree(plane);
   if (res_plane)
     kfree(res_plane);
   kpds_close_object(in_object);
   kpds_close_object(out_object);
/* -main_after_lib_call_end */
   
   return TRUE;
   
   return TRUE;
}

/*-----------------------------------------------------------
| 
|  Routine Name: myinverse_usage_additions
| 
|       Purpose: Prints usage additions in myinverse_usage routine
| 
|    Written By: gnemeth
|          Date: Apr 16, 2008
| 
------------------------------------------------------------*/
void myinverse_extra_usage_additions(void)
{
   /*-- Put Your Code Here --*/
   return;
}

/*-----------------------------------------------------------
| 
|  Routine Name: myinverse_free_args
| 
|       Purpose: Frees CLUI struct allocated in myinverse_get_args()
| 
|         Input: status      - The exit status for the program.
|		 client_data - Client data needed to by the exit handler
|    Written By: gnemeth
|          Date: Apr 16, 2008
| 
------------------------------------------------------------*/
/* ARGSUSED */
void myinverse_extra_free_args(
   kexit_status status,
   kaddr        client_data)
{
   /*-- Put Your Code Here --*/
   return;
}