workbench/system/Wanderer/Classes/icondrawerlist.c

   1 /*
   2 Copyright  2002-2009, The AROS Development Team. All rights reserved.
   3 $Id$
   4 */
   5
   6 #ifndef __AROS__
   7 #include "../portable_macros.h"
   8 #define WANDERER_BUILTIN_ICONDRAWERLIST 1
   9 #else
  10 #define DEBUG 0
  11 #include <aros/debug.h>
  12 #endif
  13
  14 #define DEBUG_ILC_EVENTS
  15 #define DEBUG_ILC_KEYEVENTS
  16 #define DEBUG_ILC_ICONRENDERING
  17 #define DEBUG_ILC_ICONSORTING
  18 #define DEBUG_ILC_ICONSORTING_DUMP
  19 #define DEBUG_ILC_ICONPOSITIONING
  20 #define DEBUG_ILC_LASSO
  21 #define DEBUG_ILC_MEMALLOC
  22
  23 //#define CREATE_FULL_DRAGIMAGE
  24
  25 #if !defined(__AROS__)
  26 #define DRAWICONSTATE DrawIconState
  27 #else
  28 #define DRAWICONSTATE DrawIconStateA
  29 #endif
  30
  31 #include <string.h>
  32 #include <stdlib.h>
  33 #include <stdio.h>
  34 #include <string.h>
  35 #include <math.h>
  36
  37 #include <dos/dos.h>
  38 #include <dos/datetime.h>
  39 #include <dos/filehandler.h>
  40
  41 #include <exec/memory.h>
  42 #include <graphics/gfx.h>
  43 #include <graphics/view.h>
  44 #include <graphics/rpattr.h>
  45 #include <workbench/icon.h>
  46 #include <workbench/workbench.h>
  47
  48 #ifdef __AROS__
  49 #include <devices/rawkeycodes.h>
  50 #include <clib/alib_protos.h>
  51 #else
  52 #include <devices_AROS/rawkeycodes.h>
  53 #endif
  54
  55
  56 #include <proto/exec.h>
  57 #include <proto/graphics.h>
  58 #include <proto/utility.h>
  59 #include <proto/dos.h>
  60 #include <proto/icon.h>
  61 #include <proto/layers.h>
  62 #include <proto/dos.h>
  63 #include <proto/iffparse.h>
  64
  65 #ifdef __AROS__
  66 #include <prefs/prefhdr.h>
  67 #include <prefs/wanderer.h>
  68 #else
  69 #include <prefs_AROS/prefhdr.h>
  70 #include <prefs_AROS/wanderer.h>
  71 #endif
  72
  73 #include <proto/cybergraphics.h>
  74
  75 #ifdef __AROS__
  76 #include <cybergraphx/cybergraphics.h>
  77 #else
  78 #include <cybergraphx_AROS/cybergraphics.h>
  79 #endif
  80
  81 #if defined(__AMIGA__) && !defined(__PPC__)
  82 #define NO_INLINE_STDARG
  83 #endif
  84 #include <proto/intuition.h>
  85 #include <proto/muimaster.h>
  86
  87 #include <libraries/mui.h>
  88 //#include "muimaster_intern.h"
  89 //#include "support.h"
  90 //#include "imspec.h"
  91 #include "iconlist_attributes.h"
  92 #include "icon_attributes.h"
  93 #include "iconlist.h"
  94 #include "icondrawerlist_private.h"
  95
  96 #ifndef __AROS__
  97 #define DEBUG 1
  98
  99 #ifdef DEBUG
 100   #define D(x) if (DEBUG) x
 101   #ifdef __amigaos4__
 102   #define bug DebugPrintF
 103   #else
 104   #define bug kprintf
 105   #endif
 106 #else
 107   #define  D(...)
 108 #endif
 109 #endif
 110
 111 extern struct Library *MUIMasterBase;
 112
 113
 114 ///IconDrawerList__ParseContents()
 115 /**************************************************************************
 116 Read icons in
 117 **************************************************************************/
 118 static int IconDrawerList__ParseContents(struct IClass *CLASS, Object *obj)
 119 {
 120     struct IconDrawerList_DATA  *data = INST_DATA(CLASS, obj);
 121     BPTR                        lock = NULL, tmplock = NULL;
 122     char                        filename[256];
 123     char                        namebuffer[512];
 124     ULONG                       list_DisplayFlags = 0;
 125
 126     D(bug("[IconDrawerList]: %s()\n", __PRETTY_FUNCTION__));
 127
 128     if (!data->drawer) return 1;
 129
 130     lock = Lock(data->drawer, SHARED_LOCK);
 131
 132     if (lock)
 133     {
 134         struct FileInfoBlock *fib = AllocDosObject(DOS_FIB, NULL);
 135         if (fib)
 136         {
 137             if (Examine(lock, fib))
 138             {
 139                 GET(obj, MUIA_IconList_DisplayFlags, &list_DisplayFlags);
 140                 D(bug("[IconDrawerList] %s: DisplayFlags = 0x%p\n", __PRETTY_FUNCTION__, list_DisplayFlags));
 141
 142                 while(ExNext(lock, fib))
 143                 {
 144                     int len = strlen(fib->fib_FileName);
 145                     struct IconEntry *this_Icon;
 146
 147                     memset(namebuffer, 0, 512);
 148                     strcpy(filename, fib->fib_FileName);
 149
 150                     D(bug("[IconDrawerList] %s: '%s', len = %d\n", __PRETTY_FUNCTION__, filename, len));
 151
 152                     if (len >= 5)
 153                     {
 154                         if (!Stricmp(&filename[len-5],".info"))
 155                         {
 156                             /* Its a .info file .. skip "disk.info" and just ".info" files*/
 157                             if ((len == 5) || ((len == 9) && (!Strnicmp(filename, "Disk", 4))))
 158                             {
 159                                 D(bug("[IconDrawerList] %s: Skiping file named disk.info or just .info ('%s')\n", __PRETTY_FUNCTION__, filename));
 160                                 continue;
 161                             }
 162
 163                             strcpy(namebuffer, data->drawer);
 164                             memset((filename + len - 5), 0, 1); //Remove the .info section
 165                             AddPart(namebuffer, filename, sizeof(namebuffer));
 166                             D(bug("[IconDrawerList] %s: Checking for .info files real file '%s'\n", __PRETTY_FUNCTION__, namebuffer));
 167
 168                             if ((tmplock = Lock(namebuffer, SHARED_LOCK)))
 169                             {
 170                                 /* We have a real file so skip it for now and let it be found seperately */
 171                                 D(bug("[IconDrawerList] %s: File found .. skipping\n", __PRETTY_FUNCTION__));
 172                                 UnLock(tmplock);
 173                                 continue;
 174                             }
 175                         }
 176                     }
 177
 178                     D(bug("[IconDrawerList] %s: Registering file '%s'\n", __PRETTY_FUNCTION__, filename));
 179                     strcpy(namebuffer, data->drawer);
 180                     AddPart(namebuffer, filename, sizeof(namebuffer));
 181
 182                     this_Icon = NULL;
 183
 184                     if ((this_Icon = (struct IconEntry *)DoMethod(obj, MUIM_IconList_CreateEntry, (IPTR)namebuffer, (IPTR)filename, (IPTR)fib, (IPTR)NULL, 0)))
 185                     {
 186                         D(bug("[IconDrawerList] %s: Icon entry allocated @ 0x%p\n", __PRETTY_FUNCTION__, this_Icon));
 187                         DoMethod(obj, MUIM_Family_AddTail, (struct Node*)&this_Icon->ie_IconNode);
 188
 189                         sprintf(namebuffer + strlen(namebuffer), ".info");
 190                         if ((tmplock = Lock(namebuffer, SHARED_LOCK)))
 191                         {
 192                             D(bug("[IconDrawerList] %s: File has a .info file .. updating info\n", __PRETTY_FUNCTION__));
 193                             UnLock(tmplock);
 194                             if (!(this_Icon->ie_Flags & ICONENTRY_FLAG_HASICON))
 195                                 this_Icon->ie_Flags |= ICONENTRY_FLAG_HASICON;
 196                         }
 197
 198                         if (list_DisplayFlags & ICONLIST_DISP_SHOWINFO)
 199                         {
 200                             if ((this_Icon->ie_Flags & ICONENTRY_FLAG_HASICON) && !(this_Icon->ie_Flags & ICONENTRY_FLAG_VISIBLE))
 201                                 this_Icon->ie_Flags |= ICONENTRY_FLAG_VISIBLE;
 202                         }
 203                         else if (!(this_Icon->ie_Flags & ICONENTRY_FLAG_VISIBLE))
 204                         {
 205                             this_Icon->ie_Flags |= ICONENTRY_FLAG_VISIBLE;
 206                         }
 207                         this_Icon->ie_IconNode.ln_Pri = 0;
 208
 209                         if (fib->fib_DirEntryType == ST_FILE)
 210                         {
 211                             this_Icon->ie_IconListEntry.type = ST_FILE;
 212                             D(bug("[IconDrawerList] %s: ST_FILE Entry created\n", __PRETTY_FUNCTION__));
 213                         }
 214                         else if (fib->fib_DirEntryType == ST_USERDIR)
 215                         {
 216                             this_Icon->ie_IconListEntry.type = ST_USERDIR;
 217                             D(bug("[IconDrawerList] %s: ST_USERDIR Entry created\n", __PRETTY_FUNCTION__));
 218                         }
 219                         else
 220                         {
 221                             D(bug("[IconDrawerList] %s: Unknown Entry Type created\n", __PRETTY_FUNCTION__));
 222                         }
 223                     }
 224                     else
 225                     {
 226                         D(bug("[IconDrawerList] %s: Failed to Register file!!!\n", __PRETTY_FUNCTION__));
 227                     }
 228                 }
 229             }
 230
 231             FreeDosObject(DOS_FIB, fib);
 232         }
 233
 234         UnLock(lock);
 235     }
 236
 237     return 1;
 238 }
 239 ///
 240
 241 ///OM_NEW()
 242 /**************************************************************************
 243 OM_NEW
 244 **************************************************************************/
 245 IPTR IconDrawerList__OM_NEW(struct IClass *CLASS, Object *obj, struct opSet *message)
 246 {
 247     struct IconDrawerList_DATA  *data = NULL;
 248     struct TagItem              *tag = NULL,
 249                                 *tags = NULL;
 250
 251     D(bug("[IconDrawerList]: %s()\n", __PRETTY_FUNCTION__));
 252
 253     obj = (Object *)DoSuperNewTags(CLASS, obj, NULL,
 254                                 TAG_MORE, (IPTR) message->ops_AttrList);
 255
 256     if (!obj) return FALSE;
 257
 258     D(bug("[IconDrawerList] obj @ %p\n", obj));
 259
 260     data = INST_DATA(CLASS, obj);
 261
 262     /* parse initial taglist */
 263     for (tags = message->ops_AttrList; (tag = NextTagItem((const struct TagItem **)&tags)); )
 264     {
 265         switch (tag->ti_Tag)
 266         {
 267         case    MUIA_IconDrawerList_Drawer:
 268                     data->drawer = StrDup((char *)tag->ti_Data);
 269                     break;
 270         }
 271     }
 272
 273     return (IPTR)obj;
 274 }
 275 ///
 276
 277 ///OM_DISPOSE()
 278 /**************************************************************************
 279 OM_DISPOSE
 280 **************************************************************************/
 281 IPTR IconDrawerList__OM_DISPOSE(struct IClass *CLASS, Object *obj, Msg message)
 282 {
 283     struct IconDrawerList_DATA *data = INST_DATA(CLASS, obj);
 284
 285     D(bug("[IconDrawerList]: %s()\n", __PRETTY_FUNCTION__));
 286
 287     if (data->drawer)
 288     {
 289         D(bug("[IconDrawerList] %s: Freeing DIR name storage for '%s'\n", __PRETTY_FUNCTION__, data->drawer));
 290
 291         FreeVec(data->drawer);
 292     }
 293
 294     return DoSuperMethodA(CLASS, obj, message);
 295 }
 296 ///
 297
 298 ///OM_SET()
 299 /**************************************************************************
 300 OM_SET
 301 **************************************************************************/
 302 IPTR IconDrawerList__OM_SET(struct IClass *CLASS, Object *obj, struct opSet *message)
 303 {
 304     struct IconDrawerList_DATA  *data = INST_DATA(CLASS, obj);
 305     struct TagItem              *tag = NULL,
 306                                 *tags = NULL;
 307
 308     D(bug("[IconDrawerList]: %s()\n", __PRETTY_FUNCTION__));
 309
 310     /* parse initial taglist */
 311     for (tags = message->ops_AttrList; (tag = NextTagItem((const struct TagItem **)&tags)); )
 312     {
 313         switch (tag->ti_Tag)
 314         {
 315         case    MUIA_IconDrawerList_Drawer:
 316                     if (data->drawer)
 317                         FreeVec(data->drawer);
 318
 319                     data->drawer = StrDup((char*)tag->ti_Data);
 320                     DoMethod(obj, MUIM_IconList_Update);
 321
 322                     break;
 323         }
 324     }
 325
 326     return DoSuperMethodA(CLASS, obj, (Msg)message);
 327 }
 328 ///
 329
 330 ///OM_GET()
 331 /**************************************************************************
 332 OM_GET
 333 **************************************************************************/
 334 IPTR IconDrawerList__OM_GET(struct IClass *CLASS, Object *obj, struct opGet *message)
 335 {
 336     /* small macro to simplify return value storage */
 337 #define STORE *(message->opg_Storage)
 338     struct IconDrawerList_DATA *data = INST_DATA(CLASS, obj);
 339
 340     D(bug("[IconDrawerList]: %s()\n", __PRETTY_FUNCTION__));
 341
 342     switch (message->opg_AttrID)
 343     {
 344         case MUIA_IconDrawerList_Drawer: STORE = (IPTR)data->drawer; return 1;
 345 #warning "TODO: Get the version/revision from our config.."
 346         case MUIA_Version:                              STORE = (IPTR)1; return 1;
 347         case MUIA_Revision:                             STORE = (IPTR)3; return 1;
 348     }
 349
 350     return DoSuperMethodA(CLASS, obj, (Msg) message);
 351 #undef STORE
 352 }
 353 ///
 354
 355 ///MUIM_IconList_Update()
 356 /**************************************************************************
 357 MUIM_IconList_Update
 358 **************************************************************************/
 359 IPTR IconDrawerList__MUIM_IconList_Update(struct IClass *CLASS, Object *obj, struct MUIP_IconList_Update *message)
 360 {
 361     //struct IconEntry *node;
 362
 363     D(bug("[IconDrawerList]: %s()\n", __PRETTY_FUNCTION__));
 364
 365     DoMethod(obj, MUIM_IconList_Clear);
 366
 367     IconDrawerList__ParseContents(CLASS, obj);
 368
 369     /*_Sort takes care of icon placement and redrawing for us*/
 370     DoMethod(obj, MUIM_IconList_Sort);
 371
 372     DoSuperMethodA(CLASS, obj, (Msg) message);
 373
 374     return 1;
 375 }
 376 ///
 377
 378
 379 #if WANDERER_BUILTIN_ICONDRAWERLIST
 380 BOOPSI_DISPATCHER(IPTR, IconDrawerList_Dispatcher, CLASS, obj, message)
 381 {
 382 #ifdef __AROS__
 383     switch (message->MethodID)
 384 #else
 385     struct IClass *CLASS = cl;
 386     Msg message = msg;
 387
 388     switch (msg->MethodID)
 389 #endif
 390     {
 391         case OM_NEW: return IconDrawerList__OM_NEW(CLASS, obj, (struct opSet *)message);
 392         case OM_DISPOSE: return IconDrawerList__OM_DISPOSE(CLASS, obj, message);
 393         case OM_SET: return IconDrawerList__OM_SET(CLASS, obj, (struct opSet *)message);
 394         case OM_GET: return IconDrawerList__OM_GET(CLASS, obj, (struct opGet *)message);
 395
 396 #ifdef __AROS__
 397         case MUIM_IconList_Update: return IconDrawerList__MUIM_Update(CLASS, obj, (APTR)message);
 398 #else
 399         case MUIM_IconList_Update: return IconDrawerList__MUIM_IconList_Update(CLASS, obj, (APTR)message);
 400 #endif
 401     }
 402     return DoSuperMethodA(CLASS, obj, message);
 403 }
 404 BOOPSI_DISPATCHER_END
 405
 406 #ifdef __AROS__
 407 /* Class descriptor. */
 408 const struct __MUIBuiltinClass _MUI_IconDrawerList_desc = {
 409     MUIC_IconDrawerList,
 410     MUIC_IconList,
 411     sizeof(struct IconDrawerList_DATA),
 412     (void*)IconDrawerList_Dispatcher
 413 };
 414 #endif
 415 #endif
 416
 417 #ifndef __AROS__
 418 struct MUI_CustomClass  *initIconDrawerListClass(void)
 419 {
 420     return (struct MUI_CustomClass *) MUI_CreateCustomClass(NULL,  NULL, IconList_Class, sizeof(struct IconDrawerList_DATA), ENTRY(IconDrawerList_Dispatcher));
 421 }
 422
 423 #endif