lib/test/test_epplib.c

   1 /*
   2  * Test program for epp library. It reads file, given as argument
   3  * (while not stdin? to simplify running under debugger)
   4  * and performs specified operations
   5  * After each operation some fields of epp structure are printed
   6  * Availiable operations
   7  * read file - open epp file for reading
   8  * create file width height offsite bits - create file (write-only mode)
   9  * load file - opens file for random read-write access
  10  * save - saves loaded file
  11  * reset - resets write-only file to read-only mode
  12  * get col row - return value
  13  * put col row value - change value of pixel
  14  * line col1 col2 row value - change value of several adjanced pixels
  15  * # text    - comment
  16  * NOTE: space after hash mark is mandantory
  17  */
  18 #include <epp.h>
  19 #include <string.h>
  20 #include <stdlib.h>
  21 char filename[1024]; /* name of currently used epp-file */
  22 FILE *f; /*file with test command. */
  23 char *error_code[]={"OK","ME_POINT_OUTSIDE","ME_INVALID_MODE",
  24   "ME_READ_ERROR","ME_WRITE_ERROR","ME_INVALID_PUT","ME_OUT_OF_MEMORY",
  25   "ME_ACCESS_DENIED","ME_NO_FILE","ME_INVALID_FILE","ME_CREATE_ERROR",NULL};
  26 /* prints value of global map_error varable. If it is
  27    related with file-system error, also
  28    prints system error description */
  29 void print_result()
  30 {
  31   if (map_error>ME_OUT_OF_MEMORY) {
  32      perror(error_code[map_error]);
  33   } else {
  34      printf("%s\n",error_code[map_error]);
  35   }
  36     map_error=0;
  37 }
  38 /*
  39  * Prints verbosely mode field of EPP structure.
  40  * Note: if it prints something hexadecimal, it should be considered
  41  * error in library!
  42  */
  43 char *epp_flags[]={"MAP_INPUT","MAP_OUTPUT","MAP_LOADED","MAP_CACHED",
  44    NULL,NULL,NULL,"MAP_MODIFIED",
  45    NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,
  46    NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,
  47    NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,
  48 };
  49 /*
  50  * Prints verbosely mode field of EPP structure.
  51  * Note: if it prints something hexadecimal, it should be considered
  52  * error in library!
  53  */
  54 void print_flags(EPP *epp)
  55 {  int i, mask;
  56    char separator=':';
  57    printf("EPP mode");
  58    for(i=0,mask=1;i<32;i++,mask<<=1) {
  59        if (epp->mode&mask) {
  60           if (!epp_flags[i]) {
  61              printf("%c 0x%X",separator,mask);
  62           } else {
  63              printf("%c %s",separator,epp_flags[i]);
  64           }
  65           separator=',';
  66        }
  67    }
  68    printf("\n");
  69 }
  70 /*************************************************************************/
  71 /* individual test procedures begin here                                 */
  72 /************************************************************************/
  73
  74 /*
  75  * testing epp_put
  76  */
  77 void test_put(EPP *epp)
  78 {   int row,col,value;
  79     if (!epp) {
  80        fprintf(stderr,"Invalid test case - put before open");
  81        exit(2);
  82     }
  83     if (fscanf(f,"%d %d %d",&col,&row,&value)!=3) {
  84        fprintf(stderr,"Invalid line in input file\n");
  85        exit(2);
  86     }
  87     printf("epp_put(%d,%d,%d):",col,row,value);
  88     epp_put(epp, col, row, value);
  89     printf("max=%d,min=%d ",epp->max, epp->min);
  90 }
  91 /*
  92  * testing epp_putline
  93  */
  94 void test_putline(EPP *epp)
  95 {  int row,col,col2,value;
  96    if (!epp) {
  97        fprintf(stderr,"Invalid test case - putline before open");
  98        exit(2);
  99    }
 100     if (fscanf(f,"%d %d %d %d",&col,&col2,&row,&value)!=4) {
 101        fprintf(stderr,"Invalid line in input file\n");
 102        exit(2);
 103     }
 104     printf("epp_putline(%d,%d,%d,%d):",col,col2,row,value);
 105      epp_putline(epp,col,col2,row,value);
 106     printf("max=%d,min=%d ",epp->max, epp->min);
 107 }
 108 /*
 109  * testing epp_get
 110  */
 111 void test_get(EPP *epp)
 112 {  int row,col;
 113    if (!epp) {
 114        fprintf(stderr,"Invalid test case - get before open");
 115        exit(2);
 116    }
 117    if (fscanf(f,"%d %d",&row,&col)!=2) {
 118        fprintf(stderr,"Invalid line in input file\n");
 119        exit(2);
 120    }
 121    printf("epp_get(%d,%d)=%d ",col,row,epp_get(epp,col,row));
 122 }
 123 /*
 124  * Testing save_epp
 125  *
 126  */
 127 void test_save(EPP* epp)
 128 {
 129    if (!epp) {
 130        fprintf(stderr,"Invalid test case - save before load");
 131        exit(2);
 132    }
 133   printf("Saving %s...",filename);
 134   save_epp(epp);
 135   print_result();
 136   print_flags(epp);
 137 }
 138 /*
 139  * testing open_epp
 140  *
 141  */
 142
 143 EPP *test_read(EPP *epp)
 144 {
 145   if (epp) close_epp(epp);
 146   if (fscanf(f,"%s",filename)!=1) {
 147     fprintf(stderr,"Missing filename for read command\n");
 148     exit(2);
 149   }
 150   printf("Opening %s in read-only mode..",filename);
 151   epp=open_epp(filename);
 152   print_result();
 153   if (!epp) {
 154     printf("File wasn't opened.\n");
 155     return NULL;
 156   }
 157   printf("%s header information:\n  bits per cell:%d\n  size:%dx%d\n  "
 158      "offsite %d\n  values from: %d to %d\n  ",filename,epp->kind,
 159    epp->lc-epp->fc,epp->lr-epp->fr,epp->offsite,epp->min,epp->max);
 160   print_flags(epp);
 161   return epp;
 162 }
 163 /*
 164  *
 165  * testing load_epp
 166  *
 167  */
 168 EPP *test_load(EPP *epp)
 169 {
 170   if (epp) close_epp(epp);
 171   if (fscanf(f,"%s",filename)!=1) {
 172     fprintf(stderr,"Missing filename for load command\n");
 173     exit(2);
 174   }
 175   printf("Loading %s...",filename);
 176   epp=load_epp(filename);
 177   print_result();
 178   if (!epp) {
 179     printf("File wasn't loaded.\n");
 180     return NULL;
 181   }
 182   printf("%s header information:\n  bits per cell:%d\n  size:%dx%d\n  "
 183      "offsite %d\n  values from: %d to %d\n  ",filename,epp->kind,
 184    epp->lc-epp->fc,epp->lr-epp->fr,epp->offsite,epp->min,epp->max);
 185   print_flags(epp);
 186   return epp;
 187 }
 188 /*
 189  *
 190  * Test reset. Performs reset operation
 191  *
 192  */
 193 void test_reset(EPP *epp)
 194 {
 195    if (!epp) {
 196        fprintf(stderr,"Invalid test case - reset before read");
 197        exit(2);
 198    }
 199   printf("Resetting file.\n Current line was %d\n Flags was:",
 200        epp->currentline);
 201   print_flags(epp);
 202
 203   reset_epp(epp);
 204   print_result();
 205   printf("Current line now is:%d\n",epp->currentline);
 206   printf("%s header information:\n  bits per cell:%d\n  size:%dx%d\n  "
 207      "offsite %d\n  values from: %d to %d\n  ",filename,epp->kind,
 208    epp->lc-epp->fc,epp->lr-epp->fr,epp->offsite,epp->min,epp->max);
 209   print_flags(epp);
 210 }
 211 /*
 212  * testing creat_epp;
 213  *
 214  */
 215 EPP *test_create(EPP *epp)
 216 { int width,height,bits,offsite;
 217   if (epp) close_epp(epp);
 218   if (fscanf(f,"%s %d %d %d %d",filename,&width,&height,&offsite,&bits)!=5) {
 219     fprintf(stderr,"Wrong arguments for create command\n");
 220     exit(2);
 221   }
 222   Create16bit= (bits!=8);
 223   printf("Creating %d-bit file %s...",Create16bit?16:8,filename);
 224   epp=creat_epp(filename,1,1,width,height,0.5,0.5,width+0.5,height+0.5,
 225        100,0,offsite);
 226   print_result();
 227   if (!epp) {
 228     fprintf(stderr,"File is not created\n");
 229     return NULL;
 230   }
 231   printf("%s header information:\n  bits per cell:%d\n  size:%dx%d\n  "
 232      "offsite %d\n  values from: %d to %d\n  ",filename,epp->kind,
 233    epp->lc-epp->fc,epp->lr-epp->fr,epp->offsite,epp->min,epp->max);
 234   print_flags(epp);
 235   return epp;
 236 }
 237 int main (int argc, char *argv[])
 238 { EPP *epp=NULL;
 239   char command[256];
 240   if (argc!=2) {
 241     fprintf(stderr,"Usage: test_load test-file");
 242     exit(2);
 243   }
 244   f=fopen(argv[1],"r");
 245   if (!f) {
 246      perror(argv[0]);
 247      exit(2);
 248   }
 249   while (!feof(f)) {
 250     /* skip empty lines */
 251     if (fscanf(f,"%s",command)!=1) {
 252        continue;
 253     }
 254     if (!strcmp(command,"put")) {
 255         test_put(epp);
 256     } else if (!strcmp(command,"get")) {
 257         test_get(epp);
 258     } else if (!strcmp(command,"reset")) {
 259         test_reset(epp);
 260     } else if (!strcmp(command,"save")) {
 261         test_save(epp);
 262     } else if (!strcmp(command,"load"))  {
 263         epp=test_load(epp);
 264     } else if (!strcmp(command,"read")) {
 265         epp=test_read(epp);
 266     } else if (!strcmp(command,"create")) {
 267         epp=test_create(epp);
 268     } else if (!strcmp(command,"line")) {
 269         test_putline(epp);
 270     } else if (!strcmp(command,"#")) {
 271        char *newline;
 272        fgets(command,255,f);
 273        newline=strchr(command,'\n');
 274        if (newline) *newline=0;
 275        printf("*** %s ***\n",command);
 276        continue;
 277      } else {
 278        fprintf(stderr,"Unknown command:%s",command);
 279        continue;
 280      }
 281     print_result();
 282   }
 283   fclose(f);
 284   if (epp) close_epp(epp);
 285   return 0;
 286 }