1 #include <check.h>

     2 #include <stdlib.h>

     3 #include <stdio.h>

     4 #include "check_check.h"

     5 #include "../src/fpcrtl.h"

     6 

     7 typedef struct __TResourceList

     8 {

     9     Integer count;

    10     string255 files[500 + 1];

    11 } TResourceList;

    12 

    13 string255 t = STRINIT("test");

    14 string255 Pathz[1] =

    15 { STRINIT("../../") };

    16 int ptCurrTheme = 0;

    17 string255 cThemeCFGFilename = STRINIT("theme.cfg");

    18 const string255 __str79 = STRINIT("object");

    19 string255 c1 = STRINIT("=");

    20 string255 c2 = STRINIT("\x2c");

    21 string255 c3 = STRINIT("\x2f");

    22 

    23 static string255 make_string(const char* str)

    24 {

    25     string255 s;

    26     s.len = strlen(str);

    27     memcpy(s.str, str, s.len + 1);

    28     return s;

    29 }

    30 

    31 TResourceList readThemeCfg_0()

    32 {

    33     TResourceList readthemecfg_result;

    34     string255 s;

    35     string255 key;

    36     TextFile f;

    37     Integer i;

    38     TResourceList res;

    39 

    40     s = _strconcat(_strappend(Pathz[ptCurrTheme], '\x2f'), cThemeCFGFilename);

    41     //umisc_log(s);

    42 

    43     fpcrtl_assign(f, s);

    44 

    45     FileMode = 0;

    46     fpcrtl_reset(f);

    47 

    48     res.count = 0;

    49     while (!(fpcrtl_eof(f)))

    50     {

    51         fpcrtl_readLnS(f, s);

    52         if ((fpcrtl_Length(s)) == (0))

    53         {

    54             continue;

    55         }

    56         if ((s.s[1]) == ('\x3b'))

    57         {

    58             continue;

    59         }

    60         i = fpcrtl_pos('\x3d', s);

    61         key = fpcrtl_trim(fpcrtl_copy(s, 1, i - 1));

    62         fpcrtl_delete(s, 1, i);

    63         if (_strcompare(key, __str79))

    64         {

    65             i = fpcrtl_pos('\x2c', s);

    66             res.files[res.count] = _strconcat(

    67                     _strappend(Pathz[ptCurrTheme], '\x2f'),

    68                     fpcrtl_trim(fpcrtl_copy(s, 1, i - 1)));

    69             ++res.count;

    70             //umisc_log(fpcrtl_trim(fpcrtl_copy(s, 1, i - 1)));

    71         }

    72     }

    73     fpcrtl_close(f);

    74     readthemecfg_result = res;

    75     return readthemecfg_result;

    76 }

    77 

    78 START_TEST(test_readthemecfg)

    79     {

    80         int i;

    81         TResourceList result;

    82 

    83         printf("-----Entering test readthemecfg-----\n");

    84         result = readThemeCfg_0();

    85         for (i = 0; i < result.count; i++)

    86         {

    87             printf("%s\n", result.files[i].str);

    88         }

    89         printf("-----Leaving test readthemecfg-----\n");

    90     }END_TEST

    91 

    92 Suite* fileio_suite(void)

    93 {

    94     Suite *s = suite_create("fileio");

    95 

    96     TCase *tc_core = tcase_create("Core");

    97 

    98     tcase_add_test(tc_core, test_readthemecfg);

    99 

   100     suite_add_tcase(s, tc_core);

   101 

   102     return s;

   103 }