workbench/demos/register.c

   1 #include <intuition/intuition.h>
   2 #include <graphics/gfx.h>
   3 #include <graphics/text.h>
   4 #include <proto/exec.h>
   5 #include <proto/intuition.h>
   6 #include <proto/graphics.h>
   7
   8 #include <stdio.h>
   9 #include <string.h>
  10 #include <stdlib.h>
  11
  12 /****************************************************************************************/
  13
  14 #define REGISTER_EXTRA_HEIGHT 4
  15 #define REGISTERITEM_EXTRA_WIDTH 8
  16 #define REGISTER_SPACE_LEFT 8
  17 #define REGISTER_SPACE_RIGHT 8
  18
  19 struct Register
  20 {
  21     struct RegisterItem *items;
  22     struct DrawInfo *dri;
  23     WORD numitems;
  24     WORD active;
  25     WORD left;
  26     WORD top;
  27     WORD width;
  28     WORD height;
  29     WORD fontw;
  30     WORD fonth;
  31     WORD fontb;
  32     WORD slopew;
  33 };
  34
  35 struct RegisterItem
  36 {
  37     STRPTR text;
  38     WORD textlen;
  39     WORD x1, y1, x2, y2, w, h;
  40     WORD tx, ty;
  41 };
  42
  43 /****************************************************************************************/
  44
  45 struct IntuitionBase *IntuitionBase;
  46 struct GfxBase *GfxBase;
  47
  48 struct Screen *scr;
  49 struct DrawInfo *dri;
  50 struct Window *win;
  51
  52 /****************************************************************************************/
  53
  54 struct RegisterItem myregisteritems[] =
  55 {
  56     {"Timezone"},
  57     {"Country"},
  58     {"Language"},
  59     {"Something"},
  60     {"AROS"},
  61     {NULL}
  62 };
  63 struct Register myregister;
  64
  65 /****************************************************************************************/
  66
  67 static void cleanup(char *msg)
  68 {
  69     if (msg) printf("register: %s\n", msg);
  70
  71     if (win) CloseWindow(win);
  72
  73     if (dri) FreeScreenDrawInfo(scr, dri);
  74     if (scr) UnlockPubScreen(NULL, scr);
  75
  76     if (GfxBase) CloseLibrary((struct Library *)GfxBase);
  77     if (IntuitionBase) CloseLibrary((struct Library *)IntuitionBase);
  78
  79     exit (0);
  80 }
  81
  82 /****************************************************************************************/
  83
  84 static void openlibs(void)
  85 {
  86     if (!(IntuitionBase = (struct IntuitionBase *)OpenLibrary("intuition.library", 39)))
  87     {
  88         cleanup("Can't open intuition.library V39!");
  89     }
  90
  91     if (!(GfxBase = (struct GfxBase *)OpenLibrary("graphics.library", 39)))
  92     {
  93         cleanup("Can't open graphics.library V39!");
  94     }
  95 }
  96
  97 /****************************************************************************************/
  98
  99 static void getvisual(void)
 100 {
 101     scr = LockPubScreen(NULL);
 102     if (!scr) cleanup("Can't lock pub screen!");
 103
 104     dri = GetScreenDrawInfo(scr);
 105     if (!dri) cleanup("Can't get drawinfo!");
 106
 107 }
 108
 109 /****************************************************************************************/
 110
 111 static void initregister(struct Register *reg, struct RegisterItem *items)
 112 {
 113     reg->items = items;
 114     reg->numitems = 0;
 115
 116     while(items->text)
 117     {
 118         reg->numitems++;
 119         items++;
 120     }
 121 }
 122
 123 /****************************************************************************************/
 124
 125 static void layoutregister(struct Register *reg, struct Screen *scr,
 126                            struct DrawInfo *dri, BOOL samewidth)
 127 {
 128     struct RastPort temprp;
 129     WORD i, x, biggest_w = 0;
 130
 131     InitRastPort(&temprp);
 132     SetFont(&temprp, dri->dri_Font);
 133     reg->dri = dri;
 134     reg->fonth = dri->dri_Font->tf_YSize;
 135     reg->fontb = dri->dri_Font->tf_Baseline;
 136
 137     reg->height = ((reg->fonth + REGISTER_EXTRA_HEIGHT) + 3) & ~3; /* Multiple of 4 */
 138     reg->height += 4;
 139
 140     reg->slopew = (reg->height - 4) / 2;
 141
 142     for(i = 0; i < reg->numitems; i++)
 143     {
 144         reg->items[i].textlen = strlen(reg->items[i].text);
 145         reg->items[i].w = TextLength(&temprp, reg->items[i].text, reg->items[i].textlen);
 146         reg->items[i].w += REGISTERITEM_EXTRA_WIDTH + reg->slopew * 2;
 147
 148         if (reg->items[i].w > biggest_w) biggest_w = reg->items[i].w;
 149     }
 150
 151     if (samewidth)
 152     {
 153         for(i = 0; i < reg->numitems; i++)
 154         {
 155             reg->items[i].w = biggest_w;
 156         }
 157     }
 158
 159    x = REGISTER_SPACE_LEFT;
 160    for(i = 0; i < reg->numitems; i++)
 161    {
 162        reg->items[i].x1 = x;
 163        reg->items[i].y1 = 0;
 164        reg->items[i].x2 = x + reg->items[i].w - 1;
 165        reg->items[i].y2 = reg->height - 1;
 166        reg->items[i].h  = reg->items[i].y2 - reg->items[i].y1 + 1;
 167        reg->items[i].tx = reg->items[i].w / 2 - TextLength(&temprp, reg->items[i].text, reg->items[i].textlen) / 2;
 168        reg->items[i].ty = reg->fontb + reg->items[i].h / 2 - reg->fonth / 2;
 169
 170        x += reg->items[i].w - reg->slopew;
 171    }
 172
 173    reg->width = x + reg->slopew + REGISTER_SPACE_RIGHT;
 174 }
 175
 176 /****************************************************************************************/
 177
 178 static void setregisterpos(struct Register *reg, WORD left, WORD top)
 179 {
 180     reg->left = left;
 181     reg->top  = top;
 182 }
 183
 184 /****************************************************************************************/
 185
 186 static void renderregisteritem(struct RastPort *rp, struct Register *reg, WORD item)
 187 {
 188     struct RegisterItem *ri = &reg->items[item];
 189     WORD x, y;
 190
 191     SetDrMd(rp, JAM1);
 192     SetFont(rp, reg->dri->dri_Font);
 193
 194     x = reg->left + ri->x1;
 195     y = reg->top + ri->y1;
 196
 197
 198     SetAPen(rp, reg->dri->dri_Pens[(reg->active == item) ? TEXTPEN : BACKGROUNDPEN]);
 199     Move(rp, x + ri->tx + 1, y + ri->ty);
 200     Text(rp, ri->text, ri->textlen);
 201     SetAPen(rp, reg->dri->dri_Pens[TEXTPEN]);
 202     Move(rp, x + ri->tx, y + ri->ty);
 203     Text(rp, ri->text, ri->textlen);
 204
 205     /* upper / at left side */
 206
 207     SetAPen(rp, reg->dri->dri_Pens[SHINEPEN]);
 208     WritePixel(rp, x + reg->slopew, y + 2);
 209     Move(rp, x + reg->slopew / 2, y + 3 + reg->slopew - 1);
 210     Draw(rp, x + reg->slopew - 1, y + 3);
 211
 212     /* --- at top side */
 213
 214     RectFill(rp, x + reg->slopew + 1, y + 1, x + reg->slopew + 2, y + 1);
 215     RectFill(rp, x + reg->slopew + 3, y, x + ri->w - 1 - reg->slopew - 3, y);
 216
 217     SetAPen(rp, reg->dri->dri_Pens[SHADOWPEN]);
 218     RectFill(rp, x + ri->w - 1 - reg->slopew - 2, y + 1, x + ri->w - 1 - reg->slopew - 1, y + 1);
 219
 220     /* upper \ at right side */
 221
 222     WritePixel(rp, x + ri->w - 1 - reg->slopew, y + 2);
 223     Move(rp, x + ri->w - 1 - reg->slopew + 1, y + 3);
 224     Draw(rp, x + ri->w - 1 - reg->slopew / 2, y + 3 + reg->slopew - 1);
 225
 226     /* lower / at left side. */
 227
 228     if ((item == 0) || (reg->active == item))
 229     {
 230         SetAPen(rp, reg->dri->dri_Pens[SHINEPEN]);
 231     }
 232     else
 233     {
 234         SetAPen(rp, reg->dri->dri_Pens[BACKGROUNDPEN]);
 235     }
 236     Move(rp, x, y + ri->h - 2);
 237     Draw(rp, x + reg->slopew / 2 - 1, y + ri->h - 2 - reg->slopew + 1);
 238
 239     /* lower \ at the lefst side from the previous item */
 240
 241     if (item > 0)
 242     {
 243         if (reg->active == item)
 244         {
 245             SetAPen(rp, reg->dri->dri_Pens[BACKGROUNDPEN]);
 246         }
 247         else
 248         {
 249             SetAPen(rp, reg->dri->dri_Pens[SHADOWPEN]);
 250         }
 251         Move(rp, x + reg->slopew / 2, y + ri->h - 2 - reg->slopew + 1);
 252         Draw(rp, x + reg->slopew - 1, y + ri->h - 2);
 253     }
 254
 255     /* lower \ at right side. */
 256
 257     if (reg->active == item + 1)
 258     {
 259         SetAPen(rp, reg->dri->dri_Pens[BACKGROUNDPEN]);
 260     }
 261     else
 262     {
 263         SetAPen(rp, reg->dri->dri_Pens[SHADOWPEN]);
 264     }
 265     Move(rp, x + ri->w - 1 - reg->slopew / 2 + 1, y + ri->h - 2 - reg->slopew + 1);
 266     Draw(rp, x + ri->w - 1, y + ri->h - 2);
 267
 268     if (reg->active == item)
 269     {
 270         SetAPen(rp, reg->dri->dri_Pens[BACKGROUNDPEN]);
 271         RectFill(rp, x, y + ri->h - 1, x + ri->w - 1, y + ri->h - 1);
 272     }
 273     else
 274     {
 275         WORD x1, x2;
 276
 277         x1 = x;
 278         x2 = x + ri->w - 1;
 279
 280         if (reg->active == item - 1)
 281             x1 += reg->slopew;
 282         else if (reg->active == item + 1)
 283             x2 -= reg->slopew;
 284
 285         SetAPen(rp, reg->dri->dri_Pens[SHINEPEN]);
 286         RectFill(rp, x1, y + ri->h - 1, x2, y + ri->h - 1);
 287     }
 288
 289
 290
 291 #if 0
 292     /* \ at left side from previous item */
 293
 294     if (item != 0)
 295     {
 296         if (reg->active == item)
 297         {
 298             SetAPen(rp, reg->dri->dri_Pens[BACKGROUNDPEN]);
 299         }
 300         else
 301         {
 302             SetAPen(rp, reg->dri->dri_Pens[SHADOWPEN]);
 303         }
 304
 305         Move(rp, x + reg->slopew / 2, y + ri->h - 2 - reg->slopew + 1);
 306         Draw(rp, x + reg->slopew - 1, y + ri->h - 2);
 307     }
 308 #endif
 309
 310 }
 311
 312 /****************************************************************************************/
 313
 314 static void renderregister(struct RastPort *rp, struct Register *reg)
 315 {
 316     WORD i;
 317
 318     SetDrMd(rp, JAM1);
 319
 320     SetAPen(rp, reg->dri->dri_Pens[SHINEPEN]);
 321
 322     RectFill(rp, reg->left,
 323                  reg->top + reg->height - 1,
 324                  reg->left + REGISTER_SPACE_LEFT - 1,
 325                  reg->top + reg->height - 1);
 326
 327     RectFill(rp, reg->left + reg->width - REGISTER_SPACE_RIGHT,
 328                  reg->top + reg->height - 1,
 329                  reg->left + reg->width - 1,
 330                  reg->top + reg->height - 1);
 331
 332     for(i = 0; i < reg->numitems; i++)
 333     {
 334         renderregisteritem(rp, reg, i);
 335     }
 336
 337
 338 }
 339
 340 /****************************************************************************************/
 341
 342 static BOOL handleregisterinput(struct Register *reg, struct IntuiMessage *msg)
 343 {
 344     struct Window *win = msg->IDCMPWindow;
 345     BOOL retval = FALSE;
 346
 347     if ((msg->Class == IDCMP_MOUSEBUTTONS) &&
 348         (msg->Code == SELECTDOWN))
 349     {
 350         WORD i;
 351         WORD x = win->MouseX - reg->left;
 352         WORD y = win->MouseY - reg->top;
 353
 354         for(i = 0; i < reg->numitems; i++)
 355         {
 356             if ((x >= reg->items[i].x1) &&
 357                 (y >= reg->items[i].y1) &&
 358                 (x <= reg->items[i].x2) &&
 359                 (y <= reg->items[i].y2))
 360             {
 361                 if (reg->active != i)
 362                 {
 363                     WORD oldactive = reg->active;
 364
 365                     reg->active = i;
 366                     renderregisteritem(win->RPort, reg, oldactive);
 367                     renderregisteritem(win->RPort, reg, i);
 368                 }
 369                 break;
 370             }
 371         }
 372     }
 373
 374     return retval;
 375
 376 }
 377
 378
 379 /****************************************************************************************/
 380
 381 static void makewin(void)
 382 {
 383     win = OpenWindowTags(0, WA_PubScreen, (IPTR)scr,
 384                             WA_Title, (IPTR) "Register Tabs",
 385                             WA_InnerWidth, myregister.width + 8,
 386                             WA_InnerHeight, myregister.height + 8,
 387                             WA_CloseGadget, TRUE,
 388                             WA_DepthGadget, TRUE,
 389                             WA_Activate, TRUE,
 390                             WA_IDCMP, IDCMP_CLOSEWINDOW | IDCMP_MOUSEBUTTONS,
 391                             TAG_DONE);
 392
 393     if (!win) cleanup("Can't open window!");
 394 }
 395
 396 /****************************************************************************************/
 397
 398 static void handleall(void)
 399 {
 400     struct IntuiMessage *msg;
 401
 402     BOOL quitme = FALSE;
 403
 404     while(!quitme)
 405     {
 406         WaitPort(win->UserPort);
 407
 408         while((msg = (struct IntuiMessage *)GetMsg(win->UserPort)))
 409         {
 410             if (!handleregisterinput(&myregister, msg))
 411             {
 412                 switch(msg->Class)
 413                 {
 414                     case IDCMP_CLOSEWINDOW:
 415                         quitme = TRUE;
 416                         break;
 417                 }
 418             }
 419             ReplyMsg((struct Message *)msg);
 420
 421         } /* while((msg = (struct IntuiMessage *)GetMsg(win->UserPort))) */
 422
 423     } /* while(!quitme) */
 424 }
 425
 426 /****************************************************************************************/
 427
 428 int main(void)
 429 {
 430     openlibs();
 431     getvisual();
 432     initregister(&myregister, myregisteritems);
 433     layoutregister(&myregister, scr, dri, TRUE);
 434     makewin();
 435     setregisterpos(&myregister, win->BorderLeft + 4, win->BorderTop + 4);
 436     renderregister(win->RPort, &myregister);
 437     handleall();
 438     cleanup(0);
 439     return 0;
 440 }
 441
 442 /****************************************************************************************/
 443 /****************************************************************************************/
 444 /****************************************************************************************/
 445 /****************************************************************************************/
 446 /****************************************************************************************/
 447 /****************************************************************************************/