Home | History | Annotate | Download | only in pkgdata
      1 /**************************************************************************
      2 *
      3 *   Copyright (C) 2000-2008, International Business Machines
      4 *   Corporation and others.  All Rights Reserved.
      5 *
      6 ***************************************************************************
      7 *   file name:  pkgdata.c
      8 *   encoding:   ANSI X3.4 (1968)
      9 *   tab size:   8 (not used)
     10 *   indentation:4
     11 *
     12 *   created on: 2000may16
     13 *   created by: Steven \u24C7 Loomis
     14 *
     15 *  common types for pkgdata
     16 */
     17 
     18 #include <stdio.h>
     19 #include <stdlib.h>
     20 #include "unicode/utypes.h"
     21 #include "unicode/putil.h"
     22 #include "cmemory.h"
     23 #include "cstring.h"
     24 #include "pkgtypes.h"
     25 
     26 
     27 const char *pkg_writeCharListWrap(FileStream *s, CharList *l, const char *delim, const char *brk, int32_t quote)
     28 {
     29     int32_t ln = 0;
     30     char buffer[1024];
     31     while(l != NULL)
     32     {
     33         if(l->str)
     34         {
     35             uprv_strncpy(buffer, l->str, 1020);
     36             buffer[1019]=0;
     37 
     38             if(quote < 0) { /* remove quotes */
     39                 if(buffer[uprv_strlen(buffer)-1] == '"') {
     40                     buffer[uprv_strlen(buffer)-1] = '\0';
     41                 }
     42                 if(buffer[0] == '"') {
     43                     uprv_strcpy(buffer, buffer+1);
     44                 }
     45             } else if(quote > 0) { /* add quotes */
     46                 if(l->str[0] != '"') {
     47                     uprv_strcpy(buffer, "\"");
     48                     uprv_strncat(buffer, l->str,1020);
     49                 }
     50                 if(l->str[uprv_strlen(l->str)-1] != '"') {
     51                     uprv_strcat(buffer, "\"");
     52                 }
     53             }
     54             T_FileStream_write(s, buffer, (int32_t)uprv_strlen(buffer));
     55 
     56             ln += (int32_t)uprv_strlen(l->str);
     57         }
     58 
     59         if(l->next && delim)
     60         {
     61             if(ln > 60 && brk) {
     62                 ln  = 0;
     63                 T_FileStream_write(s, brk, (int32_t)uprv_strlen(brk));
     64             }
     65             T_FileStream_write(s, delim, (int32_t)uprv_strlen(delim));
     66         }
     67         l = l->next;
     68     }
     69     return NULL;
     70 }
     71 
     72 
     73 const char *pkg_writeCharList(FileStream *s, CharList *l, const char *delim, int32_t quote)
     74 {
     75     char buffer[1024];
     76     while(l != NULL)
     77     {
     78         if(l->str)
     79         {
     80             uprv_strncpy(buffer, l->str, 1023);
     81             buffer[1023]=0;
     82             if(uprv_strlen(l->str) >= 1023)
     83             {
     84                 fprintf(stderr, "%s:%d: Internal error, line too long (greater than 1023 chars)\n",
     85                         __FILE__, __LINE__);
     86                 exit(0);
     87             }
     88             if(quote < 0) { /* remove quotes */
     89                 if(buffer[uprv_strlen(buffer)-1] == '"') {
     90                     buffer[uprv_strlen(buffer)-1] = '\0';
     91                 }
     92                 if(buffer[0] == '"') {
     93                     uprv_strcpy(buffer, buffer+1);
     94                 }
     95             } else if(quote > 0) { /* add quotes */
     96                 if(l->str[0] != '"') {
     97                     uprv_strcpy(buffer, "\"");
     98                     uprv_strcat(buffer, l->str);
     99                 }
    100                 if(l->str[uprv_strlen(l->str)-1] != '"') {
    101                     uprv_strcat(buffer, "\"");
    102                 }
    103             }
    104             T_FileStream_write(s, buffer, (int32_t)uprv_strlen(buffer));
    105         }
    106 
    107         if(l->next && delim)
    108         {
    109             T_FileStream_write(s, delim, (int32_t)uprv_strlen(delim));
    110         }
    111         l = l->next;
    112     }
    113     return NULL;
    114 }
    115 
    116 
    117 /*
    118  * Count items . 0 if null
    119  */
    120 uint32_t pkg_countCharList(CharList *l)
    121 {
    122   uint32_t c = 0;
    123   while(l != NULL)
    124   {
    125     c++;
    126     l = l->next;
    127   }
    128 
    129   return c;
    130 }
    131 
    132 /*
    133  * Prepend string to CharList
    134  */
    135 CharList *pkg_prependToList(CharList *l, const char *str)
    136 {
    137   CharList *newList;
    138   newList = uprv_malloc(sizeof(CharList));
    139 
    140   /* test for NULL */
    141   if(newList == NULL) {
    142     return NULL;
    143   }
    144 
    145   newList->str = str;
    146   newList->next = l;
    147   return newList;
    148 }
    149 
    150 /*
    151  * append string to CharList. *end or even end can be null if you don't
    152  * know it.[slow]
    153  * Str is adopted!
    154  */
    155 CharList *pkg_appendToList(CharList *l, CharList** end, const char *str)
    156 {
    157   CharList *endptr = NULL, *tmp;
    158 
    159   if(end == NULL)
    160   {
    161     end = &endptr;
    162   }
    163 
    164   /* FIND the end */
    165   if((*end == NULL) && (l != NULL))
    166   {
    167     tmp = l;
    168     while(tmp->next)
    169     {
    170       tmp = tmp->next;
    171     }
    172 
    173     *end = tmp;
    174   }
    175 
    176   /* Create a new empty list and append it */
    177   if(l == NULL)
    178     {
    179       l = pkg_prependToList(NULL, str);
    180     }
    181   else
    182     {
    183       (*end)->next = pkg_prependToList(NULL, str);
    184     }
    185 
    186   /* Move the end pointer. */
    187   if(*end)
    188     {
    189       (*end) = (*end)->next;
    190     }
    191   else
    192     {
    193       *end = l;
    194     }
    195 
    196   return l;
    197 }
    198 
    199 char * convertToNativePathSeparators(char *path) {
    200 #if defined(U_MAKE_IS_NMAKE)
    201     char *itr;
    202     while ((itr = uprv_strchr(path, U_FILE_ALT_SEP_CHAR))) {
    203         *itr = U_FILE_SEP_CHAR;
    204     }
    205 #endif
    206     return path;
    207 }
    208 
    209 CharList *pkg_appendUniqueDirToList(CharList *l, CharList** end, const char *strAlias) {
    210     char aBuf[1024];
    211     char *rPtr;
    212     rPtr = uprv_strrchr(strAlias, U_FILE_SEP_CHAR);
    213 #if (U_FILE_SEP_CHAR != U_FILE_ALT_SEP_CHAR)
    214     {
    215         char *aPtr = uprv_strrchr(strAlias, U_FILE_ALT_SEP_CHAR);
    216         if(!rPtr || /* regular char wasn't found or.. */
    217             (aPtr && (aPtr > rPtr)))
    218         { /* alt ptr exists and is to the right of r ptr */
    219             rPtr = aPtr; /* may copy NULL which is OK */
    220         }
    221     }
    222 #endif
    223     if(!rPtr) {
    224         return l; /* no dir path */
    225     }
    226     if((rPtr-strAlias) >= (sizeof(aBuf)/sizeof(aBuf[0]))) {
    227         fprintf(stderr, "## ERR: Path too long [%d chars]: %s\n", (int)sizeof(aBuf), strAlias);
    228         return l;
    229     }
    230     strncpy(aBuf, strAlias,(rPtr-strAlias));
    231     aBuf[rPtr-strAlias]=0;  /* no trailing slash */
    232     convertToNativePathSeparators(aBuf);
    233 
    234     if(!pkg_listContains(l, aBuf)) {
    235         return pkg_appendToList(l, end, uprv_strdup(aBuf));
    236     } else {
    237         return l; /* already found */
    238     }
    239 }
    240 
    241 #if 0
    242 static CharList *
    243 pkg_appendFromStrings(CharList *l, CharList** end, const char *s, int32_t len)
    244 {
    245   CharList *endptr = NULL;
    246   const char *p;
    247   char *t;
    248   const char *targ;
    249   if(end == NULL) {
    250     end = &endptr;
    251   }
    252 
    253   if(len==-1) {
    254     len = uprv_strlen(s);
    255   }
    256   targ = s+len;
    257 
    258   while(*s && s<targ) {
    259     while(s<targ&&isspace(*s)) s++;
    260     for(p=s;s<targ&&!isspace(*p);p++);
    261     if(p!=s) {
    262       t = uprv_malloc(p-s+1);
    263       uprv_strncpy(t,s,p-s);
    264       t[p-s]=0;
    265       l=pkg_appendToList(l,end,t);
    266       fprintf(stderr, " P %s\n", t);
    267     }
    268     s=p;
    269   }
    270 
    271   return l;
    272 }
    273 #endif
    274 
    275 
    276 /*
    277  * Delete list
    278  */
    279 void pkg_deleteList(CharList *l)
    280 {
    281   CharList *tmp;
    282   while(l != NULL)
    283   {
    284     uprv_free((void*)l->str);
    285     tmp = l;
    286     l = l->next;
    287     uprv_free(tmp);
    288   }
    289 }
    290 
    291 UBool  pkg_listContains(CharList *l, const char *str)
    292 {
    293   for(;l;l=l->next){
    294     if(!uprv_strcmp(l->str, str)) {
    295       return TRUE;
    296     }
    297   }
    298 
    299   return FALSE;
    300 }
    301