workbench/libs/gadtools/gadtools_intern.h

   1 #ifndef GADTOOLS_INTERN_H
   2 #define GADTOOLS_INTERN_H
   3
   4 /*
   5     Copyright © 1995-2011, The AROS Development Team. All rights reserved.
   6     $Id$
   7
   8     Desc: Internal definitions for gadtools.library.
   9     Lang: english
  10 */
  11
  12 #ifndef EXEC_LIBRARIES_H
  13 #   include <exec/libraries.h>
  14 #endif
  15 #ifndef EXEC_SEMAPHORES_H
  16 #   include <exec/semaphores.h>
  17 #endif
  18 #ifndef DOS_DOS_H
  19 #   include <dos/dos.h>
  20 #endif
  21 #ifndef PROTO_GRAPHICS_H
  22 #   include <proto/graphics.h>
  23 #endif
  24 #ifndef GRAPHICS_GFXBASE_H
  25 #   include <graphics/gfxbase.h>
  26 #endif
  27 #ifndef PROTO_INTUITION_H
  28 #   include <proto/intuition.h>
  29 #endif
  30 #ifndef INTUITION_CLASSES_H
  31 #   include <intuition/classes.h>
  32 #endif
  33 #ifndef INTUITION_INTUITIONBASE_H
  34 #   include <intuition/intuitionbase.h>
  35 #endif
  36 #ifndef INTUITION_SCREENS_H
  37 #   include <intuition/screens.h>
  38 #endif
  39 #ifndef PROTO_UTILITY_H
  40 #   include <proto/utility.h>
  41 #endif
  42 #ifndef LIBRARIES_GADTOOLS_H
  43 #   include <libraries/gadtools.h>
  44 #endif
  45 #ifndef GADGETS_AROSMX_H
  46 #   include <gadgets/arosmx.h>
  47 #endif
  48
  49 /* Needed for aros_print_not_implemented macro */
  50 #include <aros/debug.h>
  51 #include <aros/libcall.h>
  52 #include <aros/asmcall.h>
  53
  54 /****************************************************************************************/
  55
  56 struct VisualInfo;
  57
  58 /* Some external stuff (gadtools_init.c) */
  59 struct GadToolsBase_intern; /* prerefrence */
  60
  61 /* Internal prototypes */
  62 struct IntuiText *makeitext(struct GadToolsBase_intern *GadToolsBase,
  63                             struct NewGadget *ng,
  64                             struct TagItem *taglist);
  65 void freeitext(struct GadToolsBase_intern *GadToolsBase,
  66                struct IntuiText *itext);
  67
  68 BOOL renderlabel(struct GadToolsBase_intern *GadToolsBase,
  69                  struct Gadget *gad, struct RastPort *rport, LONG labelplace);
  70 void DoDisabledPattern(struct RastPort *rp, WORD x1, WORD y1, WORD x2, WORD y2,
  71                        WORD pen, struct GadToolsBase_intern *GadToolsBase);
  72
  73 /****************************************************************************************/
  74
  75 struct Gadget *makebutton(struct GadToolsBase_intern *GadToolsBase,
  76                           struct TagItem stdgadtags[],
  77                           struct VisualInfo *vi,
  78                           struct TagItem *taglist);
  79
  80 struct Gadget *makecheckbox(struct GadToolsBase_intern *GadToolsBase,
  81                             struct TagItem stdgadtags[],
  82                             struct VisualInfo *vi,
  83                             struct TagItem *taglist);
  84
  85 struct Gadget *makecycle(struct GadToolsBase_intern *GadToolsBase,
  86                          struct TagItem stdgadtags[],
  87                          struct VisualInfo *vi,
  88                          struct TextAttr *tattr,
  89                          struct TagItem *taglist);
  90
  91 struct Gadget *makemx(struct GadToolsBase_intern *GadToolsBase,
  92                       struct TagItem stdgadtags[],
  93                       struct VisualInfo *vi,
  94                       struct TextAttr *tattr,
  95                       struct TagItem *taglist);
  96
  97 struct Gadget *makepalette(struct GadToolsBase_intern *GadToolsBase,
  98                       struct TagItem stdgadtags[],
  99                       struct VisualInfo *vi,
 100                       const struct TagItem *taglist);
 101
 102 struct Gadget *maketext(struct GadToolsBase_intern *GadToolsBase,
 103                         struct TagItem stdgadtags[],
 104                         struct VisualInfo *vi,
 105                         struct TextAttr *tattr,
 106                         const struct TagItem *taglist);
 107
 108 struct Gadget *makenumber(struct GadToolsBase_intern *GadToolsBase,
 109                           struct TagItem stdgadtags[],
 110                           struct VisualInfo *vi,
 111                           struct TextAttr *tattr,
 112                           const struct TagItem *taglist);
 113
 114
 115 struct Gadget *makeslider(struct GadToolsBase_intern *GadToolsBase,
 116                           struct TagItem stdgadtags[],
 117                           struct VisualInfo *vi,
 118                           struct TextAttr *tattr,
 119                           const struct TagItem *taglist);
 120
 121 struct Gadget *makescroller(struct GadToolsBase_intern *GadToolsBase,
 122                           struct TagItem stdgadtags[],
 123                           struct VisualInfo *vi,
 124                           const struct TagItem *taglist);
 125
 126 struct Gadget *makestring(struct GadToolsBase_intern *GadToolsBase,
 127                           struct TagItem stdgadtags[],
 128                           struct VisualInfo *vi,
 129                           struct TextAttr *tattr,
 130                           const struct TagItem *taglist);
 131
 132 struct Gadget *makeinteger(struct GadToolsBase_intern *GadToolsBase,
 133                           struct TagItem stdgadtags[],
 134                           struct VisualInfo *vi,
 135                           struct TextAttr *tattr,
 136                           const struct TagItem *taglist);
 137
 138 struct Gadget *makelistview(struct GadToolsBase_intern *GadToolsBase,
 139                           struct TagItem stdgadtags[],
 140                           struct VisualInfo *vi,
 141                           struct TextAttr *tattr,
 142                           const struct TagItem *taglist);
 143
 144 struct Gadget *makegeneric(struct GadToolsBase_intern *GadToolsBase,
 145                           struct TagItem stdgadtags[],
 146                           struct VisualInfo *vi,
 147                           struct TextAttr *tattr,
 148                           struct TagItem *taglist);
 149
 150 /****************************************************************************************/
 151
 152 /* Tags for the private gadtools classes */
 153
 154 #define GT_Dummy                        (TAG_USER)
 155
 156 #define GTA_Text_DispFunc               (GT_Dummy + 1)
 157 #define GTA_Text_Format                 (GT_Dummy + 2)
 158 #define GTA_Arrow_Type                  (GT_Dummy + 3)
 159 #define GTA_Arrow_Pulse                 (GT_Dummy + 4)
 160 #define GTA_Arrow_Scroller              (GT_Dummy + 5)
 161 #define GTA_Scroller_Dec                (GT_Dummy + 6)
 162 #define GTA_Scroller_Inc                (GT_Dummy + 7)
 163 #define GTA_Listview_Scroller           (GT_Dummy + 8)
 164 #define GTA_GadgetKind                  (GT_Dummy + 9)
 165 #define GTA_ChildGadgetKind             (GT_Dummy + 10)
 166 #define GTA_Scroller_ScrollerKind       (GT_Dummy + 11)
 167 #define GTA_Scroller_ArrowKind          (GT_Dummy + 12)
 168 #define GTA_Scroller_Arrow1             (GT_Dummy + 13)
 169 #define GTA_Scroller_Arrow2             (GT_Dummy + 14)
 170 #define GTA_Text_ParentGadget           (GT_Dummy + 15)
 171
 172 /****************************************************************************************/
 173
 174 /* private gadget kinds */
 175
 176 #define _ARROW_KIND                     100
 177
 178 /****************************************************************************************/
 179
 180 /* Some listview specific constants */
 181 #define LV_BORDER_X                     4
 182 #define LV_BORDER_Y                     3
 183
 184 #define LV_DEF_INTERNAL_SPACING         0
 185
 186 /****************************************************************************************/
 187
 188 /* Private MX tags */
 189
 190 #define GTMX_TickLabelPlace AROSMX_TickLabelPlace
 191 #define GTMX_TickHeight     AROSMX_TickHeight
 192
 193 /****************************************************************************************/
 194
 195 #define NEWMENUCODE     TRUE
 196
 197 #if NEWMENUCODE
 198 struct Menu * makemenutitle(struct NewMenu * newmenu,
 199                             UBYTE               **MyMenuMemPtr,
 200                             struct TagItem * taglist);
 201
 202 struct MenuItem * makemenuitem(struct NewMenu * newmenu,
 203                             UBYTE               **MyMenuMemPtr,
 204                             struct Image        ***MyBarTablePtr,
 205                                BOOL is_image,
 206                                struct TagItem * taglist,
 207                                struct GadToolsBase_intern * GadToolsBase);
 208
 209 ULONG   getmenutitlesize(struct NewMenu * newmenu,
 210                           struct TagItem * taglist);
 211 ULONG   getmenuitemsize(struct NewMenu * newmenu,
 212                                    BOOL is_image,
 213                                    struct TagItem * taglist,
 214                                    struct GadToolsBase_intern * GadToolsBase);
 215
 216 #else
 217
 218 struct Menu * makemenutitle(struct NewMenu * newmenu,
 219                             struct TagItem * taglist);
 220
 221 struct MenuItem * makemenuitem(struct NewMenu * newmenu,
 222                                BOOL is_image,
 223                                struct TagItem * taglist,
 224                                struct GadToolsBase_intern * GadToolsBase);
 225 #endif
 226 void appendmenu(struct Menu * firstmenu,
 227                 struct Menu * lastmenu);
 228
 229 void appenditem(struct Menu * curmenu,
 230                 struct MenuItem * item);
 231
 232 void appendsubitem(struct MenuItem * curitem,
 233                    struct MenuItem * subitem);
 234
 235 void freeitems(struct MenuItem * mi, struct GadToolsBase_intern * GadToolsBase);
 236
 237 BOOL layoutmenuitems(struct MenuItem * menuitem,
 238                      struct VisualInfo * vi,
 239                      struct TagItem * taglist,
 240                      struct GadToolsBase_intern * GadToolsBase);
 241
 242 BOOL layoutsubitems(struct MenuItem * motheritem,
 243                     struct VisualInfo * vi,
 244                     struct TagItem * taglist,
 245                     struct GadToolsBase_intern * GadToolsBase);
 246
 247 BOOL is_menubarlabelclass_image(struct Image *im,
 248                                 struct GadToolsBase_intern *GadToolsBase);
 249
 250 /****************************************************************************************/
 251
 252 struct GadToolsBase_intern
 253 {
 254     struct Library                lib;
 255
 256     Class                       * buttonclass;
 257     Class                       * textclass;
 258     Class                       * sliderclass;
 259     Class                       * scrollerclass;
 260     Class                       * arrowclass;
 261     Class                       * stringclass;
 262     Class                       * listviewclass;
 263     Class                       * checkboxclass;
 264     Class                       * cycleclass;
 265     Class                       * mxclass;
 266     Class                       * paletteclass;
 267
 268     /* Semaphore to protect the bevel object. */
 269     struct SignalSemaphore      bevelsema;
 270     /* Actually an Object *. The image used for bevel boxes. */
 271     struct Image                * bevel;
 272
 273     /* RenderHook for GTListView class */
 274     struct Hook                 lv_RenderHook;
 275
 276     /* Seglist pointer */
 277     BPTR                        gt_SegList;
 278
 279     /* Required libraies */
 280     APTR                        gt_IntuitionBase;
 281     APTR                        gt_UtilityBase;
 282     APTR                        gt_GfxBase;
 283     APTR                        gt_LayersBase;
 284 };
 285
 286 /* extended intuimsg as used by GT_GetIMsg, GT_FilterIMsg, ... */
 287
 288 struct GT_IntuiMessage
 289 {
 290     struct ExtIntuiMessage      imsg;
 291     struct IntuiMessage         * origmsg;
 292     BOOL                        wasalloced;
 293 };
 294
 295 #define VI(x)                   ((struct VisualInfo *)x)
 296
 297 struct VisualInfo
 298 {
 299     struct Screen               * vi_screen;
 300     struct DrawInfo             * vi_dri;
 301 };
 302
 303 /* dummy gadget created by CreateContext */
 304
 305 struct GT_ContextGadget
 306 {
 307     struct ExtGadget            gad;
 308     IPTR                        magic;
 309     IPTR                        magic2;
 310     struct GT_IntuiMessage      gtmsg;
 311     struct Gadget               *activegadget;
 312     struct Gadget               *parentgadget;
 313     IPTR                        gadget_value;
 314     IPTR                        gadgetkind;
 315     IPTR                        childgadgetkind;
 316     IPTR                        childinfo;
 317     ULONG                       getattrtag;
 318     ULONG                       setattrtag;
 319     WORD                        scrollticker;
 320 };
 321
 322 struct GT_GenericGadget
 323 {
 324     struct ExtGadget            gad;
 325     IPTR                        magic;
 326     IPTR                        magic2;
 327     struct IntuiText            *itext;
 328 };
 329
 330 /****************************************************************************************/
 331
 332 #define CONTEXT_MAGIC           ((IPTR)0x11223344)
 333 #define CONTEXT_MAGIC2          ((IPTR)0x44332211)
 334
 335 #define GENERIC_MAGIC           ((IPTR)0x11335577)
 336 #define GENERIC_MAGIC2          ((IPTR)0x77553311)
 337
 338 /****************************************************************************************/
 339
 340 #define TAG_Left                0
 341 #define TAG_Top                 1
 342 #define TAG_Width               2
 343 #define TAG_Height              3
 344 #define TAG_IText               4
 345 #define TAG_LabelPlace          5
 346 #define TAG_Previous            6
 347 #define TAG_ID                  7
 348 #define TAG_DrawInfo            8
 349 #define TAG_UserData            9
 350 #define TAG_Num                 10
 351
 352
 353 #define TAG_Menu                0
 354 #define TAG_TextAttr            1
 355 #define TAG_NewLookMenus        2
 356 #define TAG_CheckMark           3
 357 #define TAG_AmigaKey            4
 358 #define TAG_FrontPen            5
 359
 360 #define BORDERPROPSPACINGX      2
 361 #define BORDERPROPSPACINGY      2
 362
 363 #define BORDERSTRINGSPACINGX    4
 364 #define BORDERSTRINGSPACINGY    2
 365
 366 #define LV_SHOWSELECTED_NONE    ((struct Gadget *)~0)
 367
 368 /****************************************************************************************/
 369
 370 #define GTB(gtb)                ((struct GadToolsBase_intern *)gtb)
 371
 372 extern struct ExecBase *SysBase;
 373 /* FIXME: Remove these #define xxxBase hacks
 374    Do not use this in new code !
 375 */
 376 #define IntuitionBase   (GTB(GadToolsBase)->gt_IntuitionBase)
 377 #define UtilityBase     (GTB(GadToolsBase)->gt_UtilityBase)
 378 #define GfxBase         (GTB(GadToolsBase)->gt_GfxBase)
 379 #define LayersBase      (GTB(GadToolsBase)->gt_LayersBase)
 380
 381
 382 #ifdef __MORPHOS__
 383 #define DeinitRastPort(x) ((void)0)
 384
 385 #define DoMethod(MyObject, tags...) \
 386         ({ULONG _tags[] = { tags }; DoMethodA((MyObject), (APTR)_tags);})
 387
 388 #define CoerceMethod(MyClass, MyObject, tags...) \
 389         ({ULONG _tags[] = { tags }; CoerceMethodA((MyClass), (MyObject), (APTR)_tags);})
 390
 391 #define DoSuperMethod(MyClass, MyObject, tags...) \
 392         ({ULONG _tags[] = { tags }; DoSuperMethodA((MyClass), (MyObject), (APTR)_tags);})
 393
 394 /********************************************************************************/
 395 /* imageclass.h AROS extensions */
 396
 397 #define SYSIA_WithBorder  IA_FGPen      /* default: TRUE */
 398 #define SYSIA_Style       IA_BGPen      /* default: SYSISTYLE_NORMAL */
 399
 400 #define SYSISTYLE_NORMAL   0
 401 #define SYSISTYLE_GADTOOLS 1            /* to get arrow images in gadtools look */
 402
 403 /********************************************************************************/
 404 /* gadgetclass.h AROS extenstions */
 405
 406 /* This method is invoked to learn about the sizing requirements of your class,
 407    before an object is created. This is AROS specific. */
 408 #define GM_DOMAIN 7
 409 struct gpDomain
 410 {
 411     STACKED ULONG          MethodID;   /* GM_DOMAIN */
 412     STACKED struct GadgetInfo * gpd_GInfo;  /* see <intuition/cghooks.h> */
 413     STACKED struct RastPort   * gpd_RPort;  /* RastPort to calculate dimensions for. */
 414     STACKED LONG           gpd_Which;  /* see below */
 415     STACKED struct IBox         gpd_Domain; /* Resulting domain. */
 416     STACKED struct TagItem    * gpd_Attrs;  /* Additional attributes. None defined,
 417                                        yet. */
 418 };
 419
 420 /********************************************************************************/
 421
 422 /* gpd_Which */
 423 #define GDOMAIN_MINIMUM 0 /* Calculate minimum size. */
 424 #define GDOMAIN_NOMINAL 1 /* Calculate nominal size. */
 425 #define GDOMAIN_MAXIMUM 2 /* Calculate maximum size. */
 426
 427 /********************************************************************************/
 428
 429   /* [IS.] (struct TextAttr *) TextAttr structure (see <graphics/text.h>) to
 430      use for gadget rendering. This attribute is not directly supported by
 431      GadgetClass. */
 432 #define GA_TextAttr      (GA_Dummy + 40)
 433
 434   /* [I..] (LONG) Choose the placing of the label. GadgetClass does not support
 435      this directly. Its subclasses have to take care of that. For possible
 436      values see below. */
 437 #define GA_LabelPlace    (GA_Dummy + 100)
 438
 439
 440 /* Placetext values for GA_LabelPlace. */
 441 #define GV_LabelPlace_In    1
 442 #define GV_LabelPlace_Left  2
 443 #define GV_LabelPlace_Right 3
 444 #define GV_LabelPlace_Above 4
 445 #define GV_LabelPlace_Below 5
 446
 447 /********************************************************************************/
 448
 449 #define MENUBARLABELCLASS "menubarlabelclass"
 450
 451 #define GTYP_GADTOOLS 0x0100
 452
 453 #define CORRECT_LISTVIEWHEIGHT  TRUE
 454
 455 #else /*MorphOS*/
 456
 457 #define CORRECT_LISTVIEWHEIGHT  FALSE
 458
 459 #endif
 460
 461 #define DEBUG_CREATECONTEXT(x)  ;
 462 #define DEBUG_CREATEGADGETA(x)  ;
 463 #define DEBUG_CREATEMENUSA(x)   ;
 464 #define DEBUG_CREATELISTVIEW(x) ;
 465 #define DEBUG_CREATESCROLLER(x) ;
 466 #define DEBUG_FREEGADGETS(x)    ;
 467 #define DEBUG_DUMPMENUS(x)      ;
 468 #define DEBUG_ALLOCMENUS(x)     ;
 469 #define DEBUG_FREEMENUS(x)      ;
 470 #define DEBUG_REFRESHWINDOW(x)  ;
 471
 472 void    DumpMenu(struct Menu *menu);
 473
 474 /* Structures for the class private data */
 475
 476 /* GTButton class */
 477 struct ButtonData
 478 {
 479     struct DrawInfo     *dri;
 480     struct Image        *frame;
 481 };
 482
 483 /* GTText class */
 484 struct TextData
 485 {
 486     struct DrawInfo     *dri;
 487     struct Gadget       *parentgadget;
 488     Object              *frame;
 489     STRPTR              format;
 490     IPTR                toprint;
 491     UBYTE               frontpen;
 492     UBYTE               backpen;
 493     UBYTE               justification;
 494     UBYTE               flags;
 495     struct TextFont     *font;
 496     UWORD               maxnumberlength;
 497     WORD                gadgetkind;
 498     IPTR                (*dispfunc)(struct Gadget *, WORD);
 499     UBYTE               labelplace;
 500
 501 };
 502
 503 /* GTSlider class */
 504 struct SliderData
 505 {
 506     Object      *frame;
 507     WORD        min;
 508     WORD        max;
 509     WORD        level;
 510     WORD        freedom;
 511     UBYTE       labelplace;
 512 };
 513
 514 /* GTScroller class */
 515 struct ScrollerData
 516 {
 517     Object              *frame;
 518     struct Gadget       *arrow1;
 519     struct Gadget       *arrow2;
 520     WORD                gadgetkind;
 521     UBYTE               labelplace;
 522 };
 523
 524 /* GTArrow class */
 525 struct ArrowData
 526 {
 527     Object      *arrowimage;
 528     Object      *frame;
 529     Object      *scroller;
 530     WORD        gadgetkind;
 531     WORD        arrowtype;
 532 };
 533
 534 /* GTString class */
 535 struct StringData
 536 {
 537     Object              *frame;
 538     struct TextFont     *font;
 539     WORD                gadgetkind;
 540     UBYTE               labelplace;
 541 };
 542
 543 /* GTListView class */
 544 struct LVData
 545 {
 546     struct Hook         *ld_CallBack;
 547     struct List         *ld_Labels;
 548     struct DrawInfo     *ld_Dri;
 549     struct TextFont     *ld_Font;
 550     Object              *ld_Frame;
 551     Object              *ld_Scroller;
 552     struct Gadget       *ld_ShowSelected;
 553     WORD                ld_Top;
 554     WORD                ld_Selected;
 555     WORD                ld_Spacing;
 556     WORD                ld_ItemHeight;
 557
 558     /* The number of first damaged entry, counting from first visible.
 559     ** A value o -1 means "nothing has to be redrawn"
 560     */
 561     WORD                ld_FirstDamaged;
 562     UWORD               ld_NumDamaged;
 563
 564     /* Number of entries the listview should scroll in GM_RENDER.
 565     ** Negative valu means scroll up.
 566     */
 567     WORD                ld_ScrollEntries;
 568     WORD                ld_NumEntries;
 569
 570     UBYTE               ld_Flags;
 571     UBYTE               ld_LabelPlace;
 572 };
 573
 574 /* GTCheckBox class */
 575 struct CheckBoxData
 576 {
 577     struct DrawInfo *dri;
 578     LONG            labelplace;
 579     LONG            flags;
 580 };
 581
 582 /* GTCycle class */
 583 struct CycleData
 584 {
 585     struct TextFont *font;
 586     STRPTR          *labels;
 587     UWORD           active;
 588     UWORD           numlabels;
 589     UWORD           labelplace;
 590 };
 591
 592 /* GTMX class */
 593 struct MXData
 594 {
 595     struct DrawInfo     *dri;
 596     struct TextAttr     *tattr;
 597     struct Image        *mximage;
 598     struct TextFont     *font;
 599     struct Rectangle    bbox;
 600     STRPTR              *labels;
 601     ULONG               active, newactive;          /* The active tick and the tick to be activated */
 602     ULONG               numlabels;                  /* The number of labels */
 603     LONG                labelplace, ticklabelplace;
 604     UWORD               fontheight;
 605     UWORD               spacing;
 606     UWORD               maxtextwidth;
 607 };
 608
 609 /* GTPalette class */
 610 struct PaletteData
 611 {
 612     UWORD               pd_NumColors;
 613     UBYTE               *pd_ColorTable;
 614     UBYTE               pd_Color;
 615     /* For state info, to know what selected entry to delete in GM_RENDER, GREDRAW_UPDATE */
 616     UBYTE               pd_OldColor;
 617
 618     UBYTE               pd_ColorOffset;
 619     UWORD               pd_IndWidth;
 620     UWORD               pd_IndHeight;
 621
 622     struct IBox         pd_GadgetBox;    /* Box surrounding whole palette       */
 623     struct IBox         pd_PaletteBox;   /* Box surrounding palette             */
 624     struct IBox         pd_IndicatorBox; /* Box surrounding indicator           */
 625
 626     UWORD               pd_ColWidth;
 627     UWORD               pd_RowHeight;
 628     UBYTE               pd_NumCols;
 629     UBYTE               pd_NumRows;
 630
 631     /* This one is used to backup pd_Color if left is clicked. This
 632     ** way the old state can be restored if the left is released
 633     ** outside the gadget.
 634     */
 635     UBYTE               pd_ColorBackup;
 636     struct TextAttr     *pd_TAttr;
 637     LONG                pd_LabelPlace;
 638     Object              *pd_Frame;
 639 };
 640
 641
 642 #endif /* GADTOOLS_INTERN_H */