workbench/prefs/locale/page_language.c

   1 /*
   2     Copyright © 1995-2001, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc:
   6     Lang: English
   7 */
   8
   9 /*********************************************************************************************/
  10
  11 #include "global.h"
  12
  13 #include <string.h>
  14
  15 /*********************************************************************************************/
  16
  17 static struct Gadget *gadlist, *availgad, *prefgad, *cleargad, *gad;
  18 static WORD domleft, domtop, domwidth, domheight;
  19 static WORD availleft, availtop, availwidth, availheight;
  20 static WORD prefleft, preftop, prefwidth, prefheight;
  21 static WORD minwidth, minheight;
  22 static BOOL page_active;
  23
  24 /*********************************************************************************************/
  25
  26 static LONG language_layout(void)
  27 {
  28     struct RastPort temprp;
  29     WORD            w, h, maxw = 0;
  30
  31     InitRastPort(&temprp);
  32     SetFont(&temprp, dri->dri_Font);
  33
  34     maxw = TextLength(&temprp, MSG(MSG_GAD_AVAIL_LANGUAGES), strlen(MSG(MSG_GAD_AVAIL_LANGUAGES)));
  35     w = TextLength(&temprp, MSG(MSG_GAD_PREF_LANGUAGES), strlen(MSG(MSG_GAD_PREF_LANGUAGES)));
  36     if (w > maxw) maxw = w;
  37
  38     maxw = maxw * 2 + SPACE_X;
  39
  40     w = TextLength(&temprp, MSG(MSG_GAD_CLEAR_LANGUAGES), strlen(MSG(MSG_GAD_CLEAR_LANGUAGES)));
  41     w += BUTTON_EXTRAWIDTH;
  42     if (w > maxw) maxw = w;
  43
  44     minwidth = maxw;
  45
  46     h =  dri->dri_Font->tf_YSize + BUTTON_EXTRAHEIGHT;
  47     h += SPACE_Y;
  48     h += dri->dri_Font->tf_YSize * 8;
  49
  50     minheight = h;
  51
  52     DeinitRastPort(&temprp);
  53
  54     return TRUE;
  55 }
  56
  57 /*********************************************************************************************/
  58
  59 static LONG language_makegadgets(void)
  60 {
  61     struct NewGadget ng;
  62     WORD labelheight;
  63
  64     gad = CreateContext(&gadlist);
  65
  66     labelheight = dri->dri_Font->tf_YSize + 2;
  67
  68     ng.ng_LeftEdge   = availleft = domleft;
  69     ng.ng_TopEdge    = availtop = preftop = domtop + labelheight;
  70     ng.ng_Width      = availwidth = prefwidth = (domwidth - SPACE_X) / 2;
  71     ng.ng_Height     = availheight = prefheight = domheight - dri->dri_Font->tf_YSize -
  72                        BUTTON_EXTRAHEIGHT - SPACE_Y - labelheight;
  73     ng.ng_GadgetText = MSG(MSG_GAD_AVAIL_LANGUAGES);
  74     ng.ng_TextAttr   = 0;
  75     ng.ng_GadgetID   = MSG_GAD_AVAIL_LANGUAGES;
  76     ng.ng_Flags      = PLACETEXT_ABOVE;
  77     ng.ng_VisualInfo = vi;
  78
  79     gad = availgad = CreateGadget(LISTVIEW_KIND, gad, &ng, GTLV_Labels, (IPTR)&language_list,
  80                                                            TAG_DONE);
  81
  82     ng.ng_LeftEdge   = prefleft = domleft + domwidth - ng.ng_Width;
  83     ng.ng_GadgetText = MSG(MSG_GAD_PREF_LANGUAGES);
  84     ng.ng_GadgetID   = MSG_GAD_PREF_LANGUAGES;
  85
  86     gad = prefgad = CreateGadget(LISTVIEW_KIND, gad, &ng, GTLV_Labels, (IPTR)&pref_language_list,
  87                                                           TAG_DONE);
  88
  89     ng.ng_LeftEdge   = domleft;
  90     ng.ng_TopEdge    = ng.ng_TopEdge + ng.ng_Height + SPACE_Y;
  91     ng.ng_Width      = domwidth;
  92     ng.ng_Height     = dri->dri_Font->tf_YSize + BUTTON_EXTRAHEIGHT;
  93     ng.ng_GadgetText = MSG(MSG_GAD_CLEAR_LANGUAGES);
  94     ng.ng_GadgetID   = MSG_GAD_CLEAR_LANGUAGES;
  95     ng.ng_Flags      = PLACETEXT_IN;
  96
  97     gad = cleargad = CreateGadgetA(BUTTON_KIND, gad, &ng, NULL);
  98
  99     return gad ? TRUE : FALSE;
 100 }
 101
 102 /*********************************************************************************************/
 103
 104 static void empty_listviews(void)
 105 {
 106     if (gadlist)
 107     {
 108         struct Window *winparam = page_active ? win : NULL;
 109
 110         GT_SetGadgetAttrs(availgad, winparam, NULL, GTLV_Labels, (IPTR) NULL,
 111                                                     TAG_DONE);
 112
 113         GT_SetGadgetAttrs(prefgad, winparam, NULL, GTLV_Labels, (IPTR) NULL,
 114                                                    TAG_DONE);
 115     }
 116 }
 117
 118 /*********************************************************************************************/
 119
 120 static void reset_listviews(void)
 121 {
 122     if (gadlist)
 123     {
 124         struct Window *winparam = page_active ? win : NULL;
 125
 126         GT_SetGadgetAttrs(availgad, winparam, NULL, GTLV_Labels, (IPTR)&language_list,
 127                                                     TAG_DONE);
 128
 129         GT_SetGadgetAttrs(prefgad, winparam, NULL, GTLV_Labels, (IPTR)&pref_language_list,
 130                                                    TAG_DONE);
 131     }
 132 }
 133
 134 /*********************************************************************************************/
 135
 136 static void clear_languages(void)
 137 {
 138     struct Node *node, *node2;
 139
 140     ForeachNodeSafe(&pref_language_list, node, node2)
 141     {
 142         Remove(node);
 143         SortInNode(&language_list, node);
 144     }
 145 }
 146
 147 /*********************************************************************************************/
 148
 149 static void update_prefs(void)
 150 {
 151     struct LanguageEntry *entry;
 152     WORD                 i = 0;
 153
 154     ForeachNode(&pref_language_list, entry)
 155     {
 156         strcpy(localeprefs.lp_PreferredLanguages[i], entry->lve.realname);
 157         i++;
 158         if (i == 10) break;
 159     }
 160
 161     if (i < 10) localeprefs.lp_PreferredLanguages[i][0] = '\0';
 162 }
 163
 164 /*********************************************************************************************/
 165
 166 static LONG language_input(struct IntuiMessage *msg)
 167 {
 168     struct Node *node;
 169     LONG        retval = FALSE;
 170
 171     if (msg->Class == IDCMP_GADGETUP)
 172     {
 173         struct Gadget *gad = (struct Gadget *)msg->IAddress;
 174
 175         switch(gad->GadgetID)
 176         {
 177             case MSG_GAD_AVAIL_LANGUAGES:
 178                 if ((node = FindListNode(&language_list, msg->Code)))
 179                 {
 180                     empty_listviews();
 181
 182                     Remove(node);
 183                     AddTail(&pref_language_list, node);
 184
 185                     reset_listviews();
 186
 187                     update_prefs();
 188                 }
 189                 retval = TRUE;
 190                 break;
 191
 192             case MSG_GAD_PREF_LANGUAGES:
 193                 if ((node = FindListNode(&pref_language_list, msg->Code)))
 194                 {
 195                     empty_listviews();
 196
 197                     Remove(node);
 198                     SortInNode(&language_list, node);
 199
 200                     reset_listviews();
 201
 202                     update_prefs();
 203                 }
 204                 retval = TRUE;
 205                 break;
 206
 207             case MSG_GAD_CLEAR_LANGUAGES:
 208                 empty_listviews();
 209                 clear_languages();
 210                 reset_listviews();
 211
 212                 update_prefs();
 213                 retval = TRUE;
 214                 break;
 215         }
 216
 217     }
 218     else if (msg->Class == IDCMP_RAWKEY)
 219     {
 220         WORD delta;
 221
 222         switch(msg->Code)
 223         {
 224             case RAWKEY_NM_WHEEL_UP:
 225                 delta = -1;
 226                 break;
 227
 228             case RAWKEY_NM_WHEEL_DOWN:
 229                 delta = 1;
 230                 break;
 231
 232             default:
 233                 delta = 0;
 234                 break;
 235         }
 236
 237         if (delta)
 238         {
 239             struct Gadget *lvgad = NULL;
 240
 241             if ((win->MouseX >= availleft) &&
 242                 (win->MouseY >= availtop) &&
 243                 (win->MouseX < availleft + availwidth) &&
 244                 (win->MouseY < availtop + availheight))
 245             {
 246                 lvgad = availgad;
 247             }
 248             else if ((win->MouseX >= prefleft) &&
 249                      (win->MouseY >= preftop) &&
 250                      (win->MouseX < prefleft + prefwidth) &&
 251                      (win->MouseY < preftop + prefheight))
 252             {
 253                 lvgad = prefgad;
 254             }
 255
 256             if (lvgad)
 257             {
 258                 ScrollListview(lvgad, delta);
 259             }
 260
 261         }
 262     }
 263
 264
 265     return retval;
 266 }
 267
 268 /*********************************************************************************************/
 269
 270 static void language_cleanup(void)
 271 {
 272     if (gadlist) FreeGadgets(gadlist);
 273     gadlist = NULL;
 274 }
 275
 276 /*********************************************************************************************/
 277
 278 static void language_prefs_changed(void)
 279 {
 280     struct LanguageEntry *entry, *entry2;
 281     WORD                 i;
 282
 283     empty_listviews();
 284
 285     clear_languages();
 286
 287     for(i = 0; i < 10; i++)
 288     {
 289         if (localeprefs.lp_PreferredLanguages[i][0] == '\0') break;
 290
 291         ForeachNodeSafe(&language_list, entry, entry2)
 292         {
 293             if (Stricmp(localeprefs.lp_PreferredLanguages[i], entry->lve.realname) == 0)
 294             {
 295                 Remove(&entry->lve.node);
 296                 AddTail(&pref_language_list, &entry->lve.node);
 297             }
 298         }
 299     }
 300
 301     reset_listviews();
 302
 303 }
 304
 305 /*********************************************************************************************/
 306
 307 LONG page_language_handler(LONG cmd, IPTR param)
 308 {
 309     LONG retval = TRUE;
 310
 311     switch(cmd)
 312     {
 313         case PAGECMD_INIT:
 314             break;
 315
 316         case PAGECMD_LAYOUT:
 317             retval = language_layout();
 318             break;
 319
 320         case PAGECMD_GETMINWIDTH:
 321             retval = minwidth;
 322             break;
 323
 324         case PAGECMD_GETMINHEIGHT:
 325             retval = minheight;
 326             break;
 327
 328         case PAGECMD_SETDOMLEFT:
 329             domleft = param;
 330             break;
 331
 332         case PAGECMD_SETDOMTOP:
 333             domtop = param;
 334             break;
 335
 336         case PAGECMD_SETDOMWIDTH:
 337             domwidth = param;
 338             break;
 339
 340         case PAGECMD_SETDOMHEIGHT:
 341             domheight = param;
 342             break;
 343
 344         case PAGECMD_MAKEGADGETS:
 345             retval = language_makegadgets();
 346             break;
 347
 348         case PAGECMD_ADDGADGETS:
 349             if (!page_active)
 350             {
 351                 AddGList(win, gadlist, -1, -1, NULL);
 352                 GT_RefreshWindow(win, NULL);
 353                 RefreshGList(gadlist, win, NULL, -1);
 354
 355                 page_active = TRUE;
 356             }
 357             break;
 358
 359         case PAGECMD_REMGADGETS:
 360             if (page_active)
 361             {
 362                 if (gadlist) RemoveGList(win, gadlist, -1);
 363
 364                 page_active = FALSE;
 365             }
 366             break;
 367
 368         case PAGECMD_HANDLEINPUT:
 369             retval = language_input((struct IntuiMessage *)param);
 370             break;
 371
 372         case PAGECMD_PREFS_CHANGING:
 373             break;
 374
 375         case PAGECMD_PREFS_CHANGED:
 376             language_prefs_changed();
 377             break;
 378
 379         case PAGECMD_CLEANUP:
 380             language_cleanup();
 381             break;
 382     }
 383
 384     return retval;
 385 }