external/openurl/raPrefs/locale.c

   1 /***************************************************************************
   2
   3  openurl.library - universal URL display and browser launcher library
   4  Copyright (C) 1998-2005 by Troels Walsted Hansen, et al.
   5  Copyright (C) 2005-2013 by openurl.library Open Source Team
   6
   7  This library is free software; it has been placed in the public domain
   8  and you can freely redistribute it and/or modify it. Please note, however,
   9  that some components may be under the LGPL or GPL license.
  10
  11  This library is distributed in the hope that it will be useful,
  12  but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
  14
  15  openurl.library project: http://sourceforge.net/projects/openurllib/
  16
  17  $Id$
  18
  19 ***************************************************************************/
  20
  21 #include "prefs.h"
  22 #define CATCOMP_ARRAY
  23 #include "locale.h"
  24 struct Catalog         *g_cat = NULL;
  25
  26 /***********************************************************************/
  27
  28 #define CATNAME "OpenURL.catalog"
  29
  30 struct CatCompArrayType * privateCatCompArray = NULL;
  31
  32 /***********************************************************************/
  33
  34 static struct Catalog *openCatalog(CONST_STRPTR name,ULONG minVer,ULONG minRev)
  35 {
  36     struct Catalog *cat;
  37
  38     if((cat = ILocale->OpenCatalogA(NULL,name,NULL)) != NULL)
  39     {
  40         ULONG ver = cat->cat_Version;
  41
  42         if ((ver<minVer) ? TRUE : ((ver==minVer) ? (cat->cat_Revision<minRev) : FALSE))
  43         {
  44             ILocale->CloseCatalog(cat);
  45             cat = NULL;
  46         }
  47     }
  48
  49     return cat;
  50 }
  51
  52 /***********************************************************************/
  53
  54 void initStrings(void)
  55 {
  56     if((LocaleBase = (struct LocaleBase *)IExec->OpenLibrary("locale.library",36)) != NULL)
  57     {
  58         if ( NULL == (ILocale = (struct LocaleIFace*)IExec->GetInterface((struct Library*)LocaleBase, "main", 1L, NULL)) ) return;
  59
  60         // to be on the safe side, we initialize our CatCompArray to point on the CatComp's one
  61         privateCatCompArray = (struct CatCompArrayType *)CatCompArray;
  62
  63         if((g_cat = openCatalog(CATNAME,7,0)) != NULL)
  64         {
  65             struct CatCompArrayType *cca;
  66             int                     cnt;
  67
  68             // OK we managed to open the catalog, now go to initialize our own CatComArray
  69             privateCatCompArray = (struct CatCompArrayType *) IExec->AllocVecTags( sizeof(CatCompArray), AVT_Type, MEMF_SHARED, AVT_Lock, FALSE, TAG_DONE);
  70             if( privateCatCompArray )
  71             {
  72                 // ok we have allocated our memory, go for initialization : we copy the whole memory into it
  73                 IExec->CopyMem(CatCompArray,privateCatCompArray,sizeof(CatCompArray));
  74
  75                 for (cnt = (sizeof(CatCompArray)/sizeof(struct CatCompArrayType))-1, cca = (struct CatCompArrayType *)privateCatCompArray+cnt;
  76                      cnt>=0;
  77                      cnt--, cca--)
  78                 {
  79                     CONST_STRPTR s;
  80
  81                     if((s = ILocale->GetCatalogStr(g_cat,cca->cca_ID,cca->cca_Str)) != NULL)
  82                         cca->cca_Str = (STRPTR)s;
  83                 }
  84             }
  85
  86         }
  87     }
  88 }
  89
  90 /***********************************************************************/
  91
  92 void uninitStrings(void)
  93 {
  94     if(privateCatCompArray != NULL && privateCatCompArray != (struct CatCompArrayType *)CatCompArray)
  95     {
  96         IExec->FreeVec(privateCatCompArray);
  97     }
  98     privateCatCompArray = NULL;
  99
 100     if(g_cat != NULL)
 101     {
 102         ILocale->CloseCatalog(g_cat);
 103     }
 104     g_cat = NULL;
 105 }
 106
 107 /***********************************************************************/
 108
 109 STRPTR getString(ULONG id)
 110 {
 111     struct CatCompArrayType *cca;
 112     int                     cnt;
 113
 114     for (cnt = (sizeof(CatCompArray)/sizeof(struct CatCompArrayType))-1, cca = (struct CatCompArrayType *)CatCompArray+cnt;
 115          cnt>=0;
 116          cnt--, cca--)
 117          if (cca->cca_ID==id)
 118                 return cca->cca_Str;
 119
 120     return (STRPTR)"";
 121 }
 122
 123 /***********************************************************************/
 124
 125 void localizeStrings(STRPTR *s)
 126 {
 127     for (; *s; s++) *s = getString((ULONG)*s);
 128 }
 129
 130 /***********************************************************************/
 131
 132 void localizeNewMenu(struct NewMenu *nm)
 133 {
 134     STRPTR str = NULL;
 135     for ( ; nm->nm_Type!=NM_END; nm++)
 136         if (nm->nm_Label!=NM_BARLABEL)
 137         {
 138             str = getString((ULONG)nm->nm_Label);
 139             if( str[1] == '\0' )
 140             {
 141                 nm->nm_CommKey = str;
 142                 str += 2;
 143             }
 144             nm->nm_Label = str;
 145         }
 146 }
 147
 148 /***********************************************************************/
 149
 150 ULONG getKeyChar(STRPTR string,ULONG id)
 151 {
 152     ULONG res = 0;
 153
 154     if (!string) string = getString(id);
 155
 156     for (; *string && *string!='_'; string++);
 157     if (*string++) res = IUtility->ToLower(*string);
 158
 159     return res;
 160 }
 161
 162 /***********************************************************************/