home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 6 / AACD06.ISO / AACD / Programming / ICU / src / icu / source / extra / ustdio / ufile.c < prev    next >
Encoding:
C/C++ Source or Header  |  1999-10-19  |  7.4 KB  |  306 lines
  1. /*
  2. *******************************************************************************
  3. *                                                                             *
  4. * COPYRIGHT:                                                                  *
  5. *   (C) Copyright International Business Machines Corporation, 1998           *
  6. *   Licensed Material - Program-Property of IBM - All Rights Reserved.        *
  7. *   US Government Users Restricted Rights - Use, duplication, or disclosure   *
  8. *   restricted by GSA ADP Schedule Contract with IBM Corp.                    *
  9. *                                                                             *
  10. *******************************************************************************
  11. *
  12. * File ufile.c
  13. *
  14. * Modification History:
  15. *
  16. *   Date        Name        Description
  17. *   11/19/98    stephen     Creation.
  18. *   03/12/99    stephen     Modified for new C API.
  19. *   06/16/99    stephen     Changed T_LocaleBundle to u_locbund
  20. *   07/19/99    stephen     Fixed to use ucnv's default codepage.
  21. *******************************************************************************
  22. */
  23.  
  24. #include "uhash.h"
  25. #include "ustdio.h"
  26. #include "ufile.h"
  27. #include "uloc.h"
  28. #include "loccache.h"
  29.  
  30. #include <string.h>
  31. #include <stdlib.h>
  32.  
  33.  
  34. /* the data in the following two functions should REALLY be somewhere else */
  35. /* convert from a country code (only the first 2 chars are significant)  */
  36. /* to an IBM codepage */
  37.  
  38. /* thanks to http://czyborra.com/charsets/iso8859.htm for most of this info */
  39. static const char ufile_locale2codepage[][256] = {
  40.   "af", "latin-1",  /* Afrikaans */
  41.   "ar", "ibm-1256", /* arabic */
  42.  
  43.   "be", "ibm-915"  , /*  Byelorussian */
  44.   "bg", "ibm-915"  , /* Bulgarian */
  45.     
  46.   "ca", "latin-1"  , /* catalan */
  47.   "cs", "ibm-912"  , /* Czech */
  48.   
  49.   "da", "latin-1"  ,  /* danish */
  50.   "de", "latin-1"  ,  /* german */
  51.   
  52.   "el", "ibm-813"  , /* Greek */
  53.   "en", "latin-1"  ,  /* English */
  54.   "eo", "ibm-913"  , /* Esperanto */
  55.   "es", "latin-1"  ,  /* Spanish */
  56.   "eu", "latin-1"  , /* basque */
  57.   "et", "ibm-914"  , /* Estonian  */
  58.   
  59.   "fi", "latin-1"  ,  /* Finnish */
  60.   "fo", "latin-1"  ,  /* faroese */
  61.   "fr", "latin-1"  ,  /* French */
  62.   
  63.   "ga", "latin-1"  ,  /* Irish (Gaelic) */
  64.   "gd", "latin-1"  ,  /* Scottish */
  65.   
  66.   "hr", "ibm-912"  , /* Croatian */
  67.   "hu", "ibm-912"  , /* Hungarian */
  68.   
  69.   "in", "latin-1"  , /* Indonesian */
  70.   "is", "latin-1"  ,  /* Icelandic */
  71.   "it", "latin-1"  ,  /* Italian  */
  72.   "iw", "ibm-916", /* hebrew */
  73.   
  74.   "ja", "ibm-943", /* Japanese */
  75.   "ji", "ibm-916", /* Yiddish */
  76.   
  77.   "kl", "ibm-914", /* Greenlandic */
  78.   "ko", "ibm-949", /* korean  */
  79.   
  80.   "lt", "ibm-914", /* Lithuanian */
  81.   "lv", "ibm-914", /* latvian (lettish) */
  82.   
  83.   "mk", "ibm-915"  , /* Macedonian */
  84.   "mt", "ibm-1208"  , /* Maltese [UTF8] */
  85.   
  86.   "nl", "latin-1"  ,  /* dutch */
  87.   "no", "latin-1"  ,  /* Norwegian */
  88.   
  89.   "pl", "ibm-912"  , /* Polish */
  90.   "pt", "latin-1"  ,  /* Portugese */
  91.   
  92.   "rm", "latin-1"  ,  /* Rhaeto-romanic (??) */
  93.   "ro", "ibm-912"  , /* Romanian */
  94.   "ru", "ibm-878"  , /* Russian */
  95.   
  96.   "sk", "ibm-912"  , /* Slovak */
  97.  
  98.   "sl", "ibm-912"  , /* Slovenian */
  99.   "sq", "latin-1"  ,  /* albanian */
  100.   "sr", "ibm-915"  , /* Serbian */
  101.   "sv", "latin-1"  ,  /* Swedish */
  102.   "sw", "latin-1"  ,  /* Swahili */
  103.   
  104.   "th", "ibm-1208" , /* Thai - UTF8 */
  105.   
  106.   "tr", "ibm-920",  /* Turkish */
  107.   
  108.   "uk", "ibm-915"  , /* pre 1990 Ukranian (?) */
  109.   
  110.   "zh", "Big-5",  /* Chinese */
  111.   0,    0 
  112. };
  113.  
  114. static const char* 
  115. ufile_lookup_codepage(const char *locale)
  116. { 
  117.   int32_t i;
  118.   for(i = 0; ufile_locale2codepage[i][0]; i+= 2)
  119.     if( ! strncmp(ufile_locale2codepage[i], locale, 2))
  120.       return ufile_locale2codepage[i + 1];
  121.   return 0;
  122. }
  123.  
  124.  
  125. UFILE*
  126. u_fopen(const char    *filename,
  127.     const char    *perm,
  128.     const char    *locale,
  129.     const char    *codepage)
  130. {
  131.   UErrorCode     status = U_ZERO_ERROR;
  132.   bool_t     useSysCP = (locale == 0 && codepage == 0);
  133.   UFILE     *result = (UFILE*) malloc(sizeof(UFILE));
  134.   if(result == 0)
  135.     return 0;
  136.  
  137.   result->fFile = fopen(filename, perm);
  138.   if(result->fFile == 0) {
  139.     free(result);
  140.     return 0;
  141.   }
  142.  
  143.   result->fOwnFile = TRUE;
  144.  
  145.   /* if locale is 0, use the default */
  146.   if(locale == 0)
  147.     locale = uloc_getDefault();
  148.  
  149.   result->fBundle = u_loccache_get(locale);
  150.   if(result->fBundle == 0) {
  151.     fclose(result->fFile);
  152.     free(result);
  153.     return 0;
  154.   }
  155.  
  156.   result->fOwnBundle     = FALSE;
  157.   result->fUCPos     = result->fUCBuffer;
  158.   result->fUCLimit     = result->fUCBuffer;
  159.  
  160.   /* if the codepage is 0, use the default for the locale */
  161.   if(codepage == 0) {
  162.     codepage = ufile_lookup_codepage(locale);
  163.   
  164.     /* if the codepage is still 0, the default codepage will be used */
  165.   }
  166.   
  167.   /* if both locale and codepage are 0, use the system default codepage */
  168.   else if(useSysCP)
  169.     codepage = 0;
  170.  
  171.   result->fConverter = ucnv_open(codepage, &status);
  172.   if(U_FAILURE(status) || result->fConverter == 0) {
  173.     fclose(result->fFile);
  174.     free(result);
  175.     return 0;
  176.   }
  177.  
  178.   return result;
  179. }
  180.  
  181. UFILE*
  182. u_finit(FILE        *f,
  183.     const char    *locale,
  184.     const char    *codepage)
  185. {
  186.   UErrorCode     status         = U_ZERO_ERROR;
  187.   bool_t     useSysCP     = (locale == 0 && codepage == 0);
  188.   UFILE     *result     = (UFILE*) malloc(sizeof(UFILE));
  189.   if(result == 0)
  190.     return 0;
  191.  
  192.   result->fFile = f;
  193.   result->fOwnFile = FALSE;
  194.  
  195.   /* if locale is 0, use the default */
  196.   if(locale == 0)
  197.     locale = uloc_getDefault();
  198.  
  199.   result->fBundle = u_loccache_get(locale);
  200.   if(result->fBundle == 0) {
  201.     fclose(result->fFile);
  202.     free(result);
  203.     return 0;
  204.   }
  205.  
  206.   result->fOwnBundle     = FALSE;
  207.   result->fUCPos     = result->fUCBuffer;
  208.   result->fUCLimit     = result->fUCBuffer;
  209.  
  210.   /* if the codepage is 0, use the default for the locale */
  211.   if(codepage == 0) {
  212.     codepage = ufile_lookup_codepage(locale);
  213.   
  214.     /* if the codepage is still 0, the default codepage will be used */
  215.   }
  216.   
  217.   /* if both locale and codepage are 0, use the system default codepage */
  218.   else if(useSysCP)
  219.     codepage = 0;
  220.  
  221.   result->fConverter = ucnv_open(codepage, &status);
  222.   if(U_FAILURE(status) || result->fConverter == 0) {
  223.     fclose(result->fFile);
  224.     free(result);
  225.     return 0;
  226.   }
  227.  
  228.   return result;
  229. }
  230.  
  231. void
  232. u_fclose(UFILE *file)
  233. {
  234.   if(file->fOwnFile)
  235.     fclose(file->fFile);
  236.  
  237.   if(file->fOwnBundle)
  238.     u_locbund_delete(file->fBundle);
  239.  
  240.   ucnv_close(file->fConverter);
  241.  
  242.   free(file);
  243. }
  244.  
  245. FILE*
  246. u_fgetfile(    UFILE         *f)
  247. {
  248.   return f->fFile;
  249. }
  250.  
  251. const char*
  252. u_fgetlocale(    UFILE        *file)
  253. {
  254.   return file->fBundle->fLocale;
  255. }
  256.  
  257. int32_t
  258. u_fsetlocale(const char        *locale,
  259.          UFILE        *file)
  260. {
  261.   if(file->fOwnBundle)
  262.     u_locbund_delete(file->fBundle);
  263.  
  264.   file->fBundle     = u_loccache_get(locale);
  265.   file->fOwnBundle     = FALSE;
  266.  
  267.   return file->fBundle == 0 ? -1 : 0;
  268. }
  269.  
  270. const char*
  271. u_fgetcodepage(UFILE        *file)
  272. {
  273.   UErrorCode     status = U_ZERO_ERROR;
  274.   const char     *codepage;
  275.  
  276.   codepage = ucnv_getName(file->fConverter, &status); 
  277.   if(U_FAILURE(status)) return 0;
  278.   return codepage;
  279. }
  280.  
  281. int32_t
  282. u_fsetcodepage(    const char    *codepage,
  283.         UFILE        *file)
  284. {
  285.   UErrorCode status = U_ZERO_ERROR;
  286.  
  287.   /* if the codepage is 0, use the default for the locale */
  288.   if(codepage == 0) {
  289.     codepage = ufile_lookup_codepage(file->fBundle->fLocale);
  290.   
  291.     /* if the codepage is still 0, fall back on the default codepage */
  292.   }
  293.  
  294.   ucnv_close(file->fConverter);
  295.   file->fConverter = ucnv_open(codepage, &status);
  296.   if(U_FAILURE(status))
  297.     return -1;
  298.   return 0;
  299. }
  300.  
  301.  
  302. UConverter * u_fgetConverter(UFILE *file)
  303. {
  304.   return file->fConverter;
  305. }
  306.