1 /*

     2  * LIBOIL - Library of Optimized Inner Loops

     3  * Copyright (c) 2004 David A. Schleef <ds@schleef.org>

     4  * All rights reserved.

     5  *

     6  * Redistribution and use in source and binary forms, with or without

     7  * modification, are permitted provided that the following conditions

     8  * are met:

     9  * 1. Redistributions of source code must retain the above copyright

    10  *    notice, this list of conditions and the following disclaimer.

    11  * 2. Redistributions in binary form must reproduce the above copyright

    12  *    notice, this list of conditions and the following disclaimer in the

    13  *    documentation and/or other materials provided with the distribution.

    14  * 

    15  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR

    16  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED

    17  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE

    18  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT,

    19  * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES

    20  * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR

    21  * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)

    22  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,

    23  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING

    24  * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE

    25  * POSSIBILITY OF SUCH DAMAGE.

    26  */

    27 

    28 

    29 #include <stdio.h>

    30 #include <liboil/liboilprototype.h>

    31 #include <liboil/liboil.h>

    32 #include <ctype.h>

    33 #include <stdlib.h>

    34 #include <string.h>

    35 

    36 #include <liboil/globals.h>

    37 

    38 #define LOG_FILE "c:\\logs\\testsuite_proto3_log1.txt"

    39 #include "std_log_result.h"

    40 #define LOG_FILENAME_LINE __FILE__, __LINE__

    41 

    42 void create_xml(int result)

    43 {

    44     if(result)

    45         assert_failed = 1;

    46     

    47     testResultXml("testsuite_proto3");

    48     close_log_file();

    49 }

    50 

    51 void print_param (OilParameter *param);

    52 

    53 /* format:

    54  * <isd>[s][0-9*][_[<0-9*,nm[p0-9*]>x]<0-9*,nm[p0-9*]>] */

    55 

    56 char *good_params[] = {

    57   "d",

    58   "s",

    59   "i",

    60   "d1",

    61   "d2",

    62   "ds",

    63   "ss",

    64   "is",

    65   "ds1",

    66   "ds2",

    67   "d_1",

    68   "d_2",

    69   "d_4",

    70   "d_n",

    71   "d_1xn",

    72   "d_4xn",

    73   "d_nxm",

    74   "d_8x8",

    75   "d_np2",

    76   NULL

    77 };

    78 

    79 char *bad_params[] = {

    80   "e",

    81   NULL

    82 };

    83 

    84 int main (int argc, char *argv[])

    85 {

    86   int i;

    87   int ret;

    88   int failed = 0;

    89   OilParameter param;

    90   

    91   //xmlfile = "proto3";

    92   std_log(LOG_FILENAME_LINE, "Test Started testsuite_proto3");

    93 

    94   for(i=0;good_params[i];i++){

    95     ret = oil_param_from_string (&param, good_params[i]);

    96     if (!ret) {

    97       printf("***ERROR***\n");

    98       std_log(LOG_FILENAME_LINE, "***ERROR***");

    99       failed = 1;

   100     }

   101     print_param (&param);

   102   }

   103 

   104   for(i=0;bad_params[i];i++){

   105     ret = oil_param_from_string (&param, bad_params[i]);

   106     if (ret) {

   107       printf("***ERROR***\n");

   108       std_log(LOG_FILENAME_LINE, "***ERROR***");

   109       failed = 1;

   110     }

   111   }

   112   std_log(LOG_FILENAME_LINE, "Test Successful");

   113   create_xml(0);

   114   return failed;

   115 }

   116 

   117 void print_param (OilParameter *param)

   118 {

   119   if (param->is_stride) 

   120   {

   121       printf ("  %cs%d\n", param->direction, param->index);

   122   } 

   123   else 

   124   {

   125       printf ("  %c%d_", param->direction, param->index);

   126       if (param->prestride_var > 0) 

   127       {

   128           printf("%c", (param->prestride_var==1) ? 'n' : 'm');

   129           if (param->prestride_length) 

   130           {

   131               printf("p%d", param->prestride_length);

   132           }

   133       } 

   134       else 

   135       {

   136           printf("%d", param->prestride_length);

   137       }

   138       printf("x");

   139       if (param->poststride_var > 0) 

   140       {

   141           printf("%c", (param->poststride_var==1) ? 'n' : 'm');

   142           if (param->poststride_length) 

   143           {

   144               printf("p%d", param->poststride_length);

   145           }

   146       } 

   147       else

   148       {

   149           printf("%d", param->poststride_length);

   150       }

   151       printf("\n");

   152   }

   153 

   154 }

   155