workbench/libs/icon/iconcontrol.c

   1 /*
   2     Copyright © 1995-2007, The AROS Development Team. All rights reserved.
   3     $Id$
   4 */
   5
   6 #include <exec/types.h>
   7 #include <workbench/icon.h>
   8 #include <utility/tagitem.h>
   9 #include <proto/icon.h>
  10
  11 #include "icon_intern.h"
  12
  13 #   include <aros/debug.h>
  14
  15 /*****************************************************************************
  16
  17     NAME */
  18
  19     AROS_LH2(ULONG, IconControlA,
  20
  21 /*  SYNOPSIS */
  22         AROS_LHA(struct DiskObject *, icon, A0),
  23         AROS_LHA(struct TagItem *,    tags, A1),
  24
  25 /*  LOCATION */
  26         struct Library *, IconBase, 26, Icon)
  27
  28 /*  FUNCTION
  29         Set and get icon and icon.library options.
  30
  31     INPUTS
  32         icon - icon to be queried
  33
  34     RESULT
  35         Number of processed tags.
  36
  37     NOTES
  38
  39     EXAMPLE
  40
  41     BUGS
  42
  43     SEE ALSO
  44
  45     INTERNALS
  46
  47 *****************************************************************************/
  48 {
  49     AROS_LIBFUNC_INIT
  50
  51     const struct TagItem *tstate       = tags;
  52     struct TagItem       *tag          = NULL;
  53     ULONG                 processed    = 0;
  54
  55     LONG                 *errorCode    = NULL;
  56     struct TagItem      **errorTagItem = NULL;
  57     struct NativeIcon    *nativeicon = NULL;
  58
  59     if (icon)
  60     {
  61         nativeicon = GetNativeIcon(icon, LB(IconBase));
  62     }
  63
  64 #   define STORE(pointer, value)   (pointer != NULL ? *pointer = (value) : (value))
  65 #   define SET_ERRORCODE(value)    STORE(errorCode, (value))
  66 #   define SET_ERRORTAGITEM(value) STORE(errorTagItem, (value))
  67
  68     /* The following tags need to be setup early ---------------------------*/
  69     errorCode = (LONG *) GetTagData(ICONA_ErrorCode, 0, tags);
  70     SET_ERRORCODE(0);
  71
  72     errorTagItem = (struct TagItem **) GetTagData(ICONA_ErrorTagItem, 0, tags);
  73     SET_ERRORTAGITEM(NULL);
  74
  75     /* Parse taglist -------------------------------------------------------*/
  76     while ((tag = NextTagItem(&tstate)) != NULL)
  77     {
  78         switch (tag->ti_Tag)
  79         {
  80             /* Global tags -------------------------------------------------*/
  81             case ICONCTRLA_SetGlobalScreen:
  82                 LB(IconBase)->ib_Screen = (struct Screen *) tag->ti_Data;
  83                 processed++;
  84                 break;
  85
  86             case ICONCTRLA_GetGlobalScreen:
  87                 STORE((struct Screen **) tag->ti_Data, LB(IconBase)->ib_Screen);
  88                 processed++;
  89                 break;
  90
  91             case ICONCTRLA_SetGlobalPrecision:
  92             case OBP_Precision:
  93                 LB(IconBase)->ib_Precision = tag->ti_Data;
  94                 processed++;
  95                 break;
  96
  97             case ICONCTRLA_GetGlobalPrecision:
  98                 STORE((LONG *) tag->ti_Data, LB(IconBase)->ib_Precision);
  99                 processed++;
 100                 break;
 101
 102             case ICONCTRLA_SetGlobalEmbossRect:
 103                 // FIXME
 104                 break;
 105
 106             case ICONCTRLA_GetGlobalEmbossRect:
 107                 // FIXME
 108                 break;
 109
 110             case ICONCTRLA_SetGlobalFrameless:
 111                 LB(IconBase)->ib_Frameless = tag->ti_Data;
 112                 processed++;
 113                 break;
 114
 115             case ICONCTRLA_GetGlobalFrameless:
 116                 STORE((LONG *) tag->ti_Data, LB(IconBase)->ib_Frameless);
 117                 processed++;
 118                 break;
 119
 120             case ICONCTRLA_SetGlobalIdentifyHook:
 121                 LB(IconBase)->ib_IdentifyHook = (struct Hook *) tag->ti_Data;
 122                 processed++;
 123                 break;
 124
 125             case ICONCTRLA_GetGlobalIdentifyHook:
 126                 STORE((struct Hook **) tag->ti_Data, LB(IconBase)->ib_IdentifyHook);
 127                 processed++;
 128                 break;
 129
 130             case ICONCTRLA_SetGlobalMaxNameLength:
 131                 LB(IconBase)->ib_MaxNameLength = tag->ti_Data;
 132                 processed++;
 133                 break;
 134
 135             case ICONCTRLA_GetGlobalMaxNameLength:
 136                 STORE((LONG *) tag->ti_Data, LB(IconBase)->ib_MaxNameLength);
 137                 processed++;
 138                 break;
 139
 140             case ICONCTRLA_SetGlobalNewIconsSupport:
 141                 LB(IconBase)->ib_NewIconsSupport = tag->ti_Data;
 142                 processed++;
 143                 break;
 144
 145             case ICONCTRLA_GetGlobalNewIconsSupport:
 146                 STORE((LONG *) tag->ti_Data, LB(IconBase)->ib_NewIconsSupport);
 147                 processed++;
 148                 break;
 149
 150             case ICONCTRLA_SetGlobalColorIconSupport:
 151                 LB(IconBase)->ib_ColorIconSupport = tag->ti_Data;
 152                 processed++;
 153                 break;
 154
 155             case ICONCTRLA_GetGlobalColorIconSupport:
 156                 STORE((LONG *) tag->ti_Data, LB(IconBase)->ib_ColorIconSupport);
 157                 processed++;
 158                 break;
 159
 160
 161             /* Local tags --------------------------------------------------*/
 162             case ICONCTRLA_GetImageMask1:
 163                 if (nativeicon)
 164                 {
 165                     STORE((PLANEPTR *)tag->ti_Data, (PLANEPTR)nativeicon->icon35.img1.mask);
 166                 }
 167                 else
 168                 {
 169                     STORE((PLANEPTR *)tag->ti_Data, 0);
 170                 }
 171                 processed++;
 172                 break;
 173
 174             case ICONCTRLA_GetImageMask2:
 175                 if (nativeicon)
 176                 {
 177                     STORE((PLANEPTR *)tag->ti_Data, (PLANEPTR)nativeicon->icon35.img2.mask);
 178                 }
 179                 else
 180                 {
 181                     STORE((PLANEPTR *)tag->ti_Data, 0);
 182                 }
 183                 processed++;
 184                 break;
 185
 186             case ICONCTRLA_SetTransparentColor1:
 187                 break;
 188
 189             case ICONCTRLA_GetTransparentColor1:
 190                 if (nativeicon && (nativeicon->icon35.img1.flags & IMAGE35F_HASTRANSPARENTCOLOR))
 191                 {
 192                     STORE((LONG *)tag->ti_Data, (LONG)nativeicon->icon35.img1.transparentcolor);
 193                 }
 194                 else
 195                 {
 196                     STORE((LONG *)tag->ti_Data, -1);
 197                 }
 198                 processed++;
 199                 break;
 200
 201             case ICONCTRLA_SetTransparentColor2:
 202                 break;
 203
 204             case ICONCTRLA_GetTransparentColor2:
 205                 if (nativeicon && (nativeicon->icon35.img2.flags & IMAGE35F_HASTRANSPARENTCOLOR))
 206                 {
 207                     STORE((LONG *)tag->ti_Data, (LONG)nativeicon->icon35.img2.transparentcolor);
 208                 }
 209                 else
 210                 {
 211                     STORE((LONG *)tag->ti_Data, -1);
 212                 }
 213                 processed++;
 214                 break;
 215
 216             case ICONCTRLA_SetPalette1:
 217                 break;
 218
 219             case ICONCTRLA_GetPalette1:
 220                 if (nativeicon)
 221                 {
 222                     STORE((struct ColorRegister **)tag->ti_Data, (struct ColorRegister *)nativeicon->icon35.img1.palette);
 223                 }
 224                 else
 225                 {
 226                     STORE((struct ColorRegister **)tag->ti_Data, 0);
 227                 }
 228                 processed++;
 229                 break;
 230
 231             case ICONCTRLA_SetPalette2:
 232                 break;
 233
 234             case ICONCTRLA_GetPalette2:
 235                 if (nativeicon)
 236                 {
 237                     STORE((struct ColorRegister **)tag->ti_Data, (struct ColorRegister *)nativeicon->icon35.img2.palette);
 238                 }
 239                 else
 240                 {
 241                     STORE((struct ColorRegister **)tag->ti_Data, 0);
 242                 }
 243                 processed++;
 244                 break;
 245
 246             case ICONCTRLA_SetPaletteSize1:
 247                 break;
 248
 249             case ICONCTRLA_GetPaletteSize1:
 250                 if (nativeicon)
 251                 {
 252                     STORE((ULONG *)tag->ti_Data, nativeicon->icon35.img1.numcolors);
 253                 }
 254                 else
 255                 {
 256                     STORE((ULONG *)tag->ti_Data, 0);
 257                 }
 258                 processed++;
 259                 break;
 260
 261             case ICONCTRLA_SetPaletteSize2:
 262                 break;
 263
 264             case ICONCTRLA_GetPaletteSize2:
 265                 if (nativeicon)
 266                 {
 267                     STORE((ULONG *)tag->ti_Data, nativeicon->icon35.img2.numcolors);
 268                 }
 269                 else
 270                 {
 271                     STORE((ULONG *)tag->ti_Data, 0);
 272                 }
 273                 processed++;
 274                 break;
 275
 276             case ICONCTRLA_SetImageData1:
 277                 break;
 278
 279             case ICONCTRLA_GetImageData1:
 280                 if (nativeicon)
 281                 {
 282                     STORE((UBYTE **)tag->ti_Data, nativeicon->icon35.img1.imagedata);
 283                 }
 284                 else
 285                 {
 286                     STORE((UBYTE **)tag->ti_Data, 0);
 287                 }
 288                 processed++;
 289                 break;
 290
 291             case ICONCTRLA_SetImageData2:
 292                 break;
 293
 294             case ICONCTRLA_GetImageData2:
 295                 if (nativeicon)
 296                 {
 297                     STORE((UBYTE **)tag->ti_Data, nativeicon->icon35.img2.imagedata);
 298                 }
 299                 else
 300                 {
 301                     STORE((UBYTE **)tag->ti_Data, 0);
 302                 }
 303                 processed++;
 304                 break;
 305
 306             case ICONCTRLA_SetFrameless:
 307                 break;
 308
 309             case ICONCTRLA_GetFrameless:
 310                 break;
 311
 312             case ICONCTRLA_SetNewIconsSupport:
 313                 break;
 314
 315             case ICONCTRLA_GetNewIconsSupport:
 316                 break;
 317
 318             case ICONCTRLA_SetAspectRatio:
 319                 break;
 320
 321             case ICONCTRLA_GetAspectRatio:
 322                 break;
 323
 324             case ICONCTRLA_SetWidth:
 325                 break;
 326
 327             case ICONCTRLA_GetWidth:
 328                 processed++;
 329                 if (nativeicon)
 330                 {
 331                     if (nativeicon->iconPNG.img1)
 332                     {
 333                         STORE((ULONG *)tag->ti_Data, nativeicon->iconPNG.width);
 334                         break;
 335                     }
 336
 337                     if (nativeicon->icon35.img1.imagedata)
 338                     {
 339                         STORE((ULONG *)tag->ti_Data, nativeicon->icon35.width);
 340                         break;
 341                     }
 342                 }
 343
 344                 if (icon)
 345                 {
 346                     STORE((ULONG *)tag->ti_Data, icon->do_Gadget.Width);
 347                 }
 348                 else
 349                 {
 350                     STORE((ULONG *)tag->ti_Data, 0);
 351                 }
 352                 break;
 353
 354             case ICONCTRLA_SetHeight:
 355                 break;
 356
 357             case ICONCTRLA_GetHeight:
 358                 processed++;
 359                 if (nativeicon)
 360                 {
 361                     if (nativeicon->iconPNG.img1)
 362                     {
 363                         STORE((ULONG *)tag->ti_Data, nativeicon->iconPNG.height);
 364                         break;
 365                     }
 366
 367                     if (nativeicon->icon35.img1.imagedata)
 368                     {
 369                         STORE((ULONG *)tag->ti_Data, nativeicon->icon35.height);
 370                         break;
 371                     }
 372                 }
 373
 374                 if (icon)
 375                 {
 376                     STORE((ULONG *)tag->ti_Data, icon->do_Gadget.Height);
 377                 }
 378                 else
 379                 {
 380                     STORE((ULONG *)tag->ti_Data, 0);
 381                 }
 382                 break;
 383
 384             case ICONCTRLA_IsPaletteMapped:
 385                 if (nativeicon && nativeicon->icon35.img1.imagedata)
 386                 {
 387                     STORE((LONG *)tag->ti_Data, 1);
 388                 }
 389                 else
 390                 {
 391                     STORE((LONG *)tag->ti_Data, 0);
 392                 }
 393                 processed++;
 394                 break;
 395
 396             case ICONCTRLA_IsNewIcon:
 397                 break;
 398
 399             case ICONCTRLA_IsNativeIcon:
 400                 if (nativeicon)
 401                 {
 402                     STORE((LONG *)tag->ti_Data, 1);
 403                 }
 404                 else
 405                 {
 406                     STORE((LONG *)tag->ti_Data, 0);
 407                 }
 408                 processed++;
 409                 break;
 410
 411             case ICONGETA_IsDefaultIcon:
 412                 break;
 413
 414             case ICONCTRLA_GetScreen:
 415                 break;
 416
 417             case ICONCTRLA_HasRealImage2:
 418                 break;
 419
 420             case ICONCTRLA_GetARGBImageData1:
 421                 if (nativeicon)
 422                 {
 423                     STORE((ULONG **)tag->ti_Data, (ULONG *)nativeicon->iconPNG.img1);
 424                 }
 425                 else
 426                 {
 427                     STORE((ULONG **)tag->ti_Data, 0);
 428                 }
 429                 processed++;
 430                 break;
 431
 432             case ICONCTRLA_GetARGBImageData2:
 433                 if (nativeicon)
 434                 {
 435                     STORE((ULONG **)tag->ti_Data, (ULONG *)nativeicon->iconPNG.img2);
 436                 }
 437                 else
 438                 {
 439                     STORE((ULONG **)tag->ti_Data, 0);
 440                 }
 441                 processed++;
 442                 break;
 443
 444         }
 445     }
 446
 447     return processed;
 448
 449     AROS_LIBFUNC_EXIT
 450
 451 #   undef STORE
 452 #   undef SET_ERRORCODE
 453 #   undef SET_ERRORTAGITEM
 454
 455 } /* IconControlA() */