scalos/main/ScanDirText.c

   1 // ScanDir.c
   2 // $Date$
   3 // $Revision$
   4 // $Id$
   5
   6 #include <exec/types.h>
   7 #include <intuition/classes.h>
   8 #include <intuition/classusr.h>
   9 #include <utility/hooks.h>
  10 #include <intuition/gadgetclass.h>
  11 #include <datatypes/pictureclass.h>
  12 #include <dos/dos.h>
  13 #include <dos/dostags.h>
  14 #include <dos/exall.h>
  15
  16 #define __USE_SYSBASE
  17
  18 #include <proto/dos.h>
  19 #include <proto/exec.h>
  20 #include <proto/intuition.h>
  21 #include <proto/iconobject.h>
  22 #include <proto/utility.h>
  23 #include <proto/gadtools.h>
  24 #include <proto/datatypes.h>
  25 #include "debug.h"
  26 #include <proto/scalos.h>
  27
  28 #include <clib/alib_protos.h>
  29
  30 #include <defs.h>
  31 #include <datatypes/iconobject.h>
  32 #include <scalos/scalos.h>
  33
  34 #include <DefIcons.h>
  35
  36 #include <string.h>
  37 #include <stdio.h>
  38 #include <stdarg.h>
  39
  40 #include "scalos_structures.h"
  41 #include "locale.h"
  42 #include "functions.h"
  43 #include "Variables.h"
  44
  45 //----------------------------------------------------------------------------
  46
  47 // local data definitions
  48
  49 //----------------------------------------------------------------------------
  50
  51 // local functions
  52
  53 static BOOL IsBackDropIconTextWindow(struct internalScaWindowTask *iwt, struct BackDropList *bdl,
  54         BPTR fLock, CONST_STRPTR FileName, IPTR pos);
  55 static enum ScanDirResult TextCheckCleanup(struct ReadIconListControl *rilc);
  56 static enum ScanDirResult GenerateTextIcons(struct ReadIconListControl *rilc, BOOL Final);
  57 static struct ScaIconNode *GetTextIcon(struct internalScaWindowTask *iwt,
  58         struct Hook *ColumnChangeHook, struct IconScanEntry *ise,
  59         struct BackDropList *bdl, const struct ReadIconListData *rild);
  60 static void ResolveLink(struct ReadIconListData *rild);
  61 // static LONG ReExamine(struct ReadIconListData *rild);
  62
  63 //----------------------------------------------------------------------------
  64
  65 // local data
  66
  67 //----------------------------------------------------------------------------
  68
  69 // public data items
  70
  71 //----------------------------------------------------------------------------
  72
  73 /// TextWindowReadIcon
  74 // Result : Success
  75 struct ScaIconNode *TextWindowReadIcon(struct internalScaWindowTask *iwt,
  76         CONST_STRPTR Name, struct ScaReadIconArg *ria)
  77 {
  78         struct ScaIconNode *in = NULL;
  79         ULONG err;
  80         T_ExamineData *fib = NULL;
  81         BPTR oldDir = NOT_A_LOCK;
  82         BPTR dirLock;
  83         BOOL VolumeIsWritable;
  84         BOOL ScanDirSemaphoreLocked = FALSE;
  85         struct ReadIconListControl rilc;
  86
  87         do      {
  88                 BPTR iLock;
  89                 IPTR pos;
  90                 BOOL hasIcon = FALSE;
  91                 struct ReadIconListData rild;
  92
  93                 d1(KPrintF("%s/%s/%ld: Name=<%s>  ria=%08lx  iwt=%08lx\n", __FILE__, __FUNC__, __LINE__, Name, ria, iwt));
  94
  95                 if (!RilcInit(&rilc, iwt))
  96                         break;
  97
  98                 if (NULL == iwt->iwt_WindowTask.wt_Window)
  99                         break;
 100
 101                 BackdropWait(iwt->iwt_WindowTask.mt_WindowStruct->ws_Lock);
 102
 103                 if (!AttemptSemaphoreNoNest(&iwt->iwt_ScanDirSemaphore))
 104                         break;
 105
 106                 ScanDirSemaphoreLocked = TRUE;
 107
 108                 if (!IsShowAll(iwt->iwt_WindowTask.mt_WindowStruct) && 0 != IsIconName(Name))
 109                         {
 110                         d1(kprintf("%s/%s/%ld: \n", __FILE__, __FUNC__, __LINE__));
 111                         break;
 112                         }
 113
 114                 if (!ScalosExamineBegin(&fib))
 115                         {
 116                         d1(kprintf("%s/%s/%ld: ScalosExamineBegin failed\n", __FILE__, __FUNC__, __LINE__));
 117                         break;
 118                         }
 119
 120                 if (ria && ria->ria_Lock)
 121                         dirLock = ria->ria_Lock;
 122                 else
 123                         dirLock = iwt->iwt_WindowTask.mt_WindowStruct->ws_Lock;
 124
 125                 debugLock_d1(dirLock);
 126                 if ((BPTR)NULL == dirLock)
 127                         break;
 128
 129                 VolumeIsWritable = ClassIsDiskWritable(dirLock);
 130
 131                 oldDir = CurrentDir(dirLock);
 132
 133                 err = RETURN_OK;
 134                 iLock = Lock((STRPTR) Name, ACCESS_READ);
 135                 if (BNULL == iLock)
 136                         {
 137                         err = IoErr();
 138                         d1(kprintf("%s/%s/%ld: Lock returned %ld\n", __FILE__, __FUNC__, __LINE__, err));
 139                         }
 140                 else
 141                         {
 142                         if (!ScalosExamineLock(iLock, &fib))
 143                                 err = IoErr();
 144                         UnLock(iLock);
 145
 146                         d1(kprintf("%s/%s/%ld: ScalosExamineLock returned %ld\n", __FILE__, __FUNC__, __LINE__, err));
 147                         }
 148
 149                 if (ERROR_OBJECT_IN_USE == err)
 150                         DoMethod(iwt->iwt_WindowTask.mt_MainObject, SCCM_IconWin_ScheduleUpdate);
 151
 152                 rild.rild_SoloIcon = FALSE;
 153
 154                 if (ERROR_OBJECT_NOT_FOUND == err)
 155                         {
 156                         // object doesn't exist - check if associated icon is there
 157                         BOOL iconExists = FALSE;
 158                         STRPTR iconName = AllocPathBuffer();
 159
 160                         d1(kprintf("%s/%s/%ld: iconName=%08lx\n", __FILE__, __FUNC__, __LINE__, iconName));
 161
 162                         if (iconName)
 163                                 {
 164                                 BPTR iLock;
 165
 166                                 stccpy(iconName, Name, Max_PathLen);
 167                                 SafeStrCat(iconName, ".info", Max_PathLen);
 168
 169                                 iLock = Lock(iconName, ACCESS_READ);
 170                                 if (iLock)
 171                                         {
 172                                         rild.rild_SoloIcon = TRUE;
 173                                         ScalosExamineLock(iLock, &fib);
 174                                         iconExists = TRUE;
 175                                         UnLock(iLock);
 176                                         }
 177
 178                                 FreePathBuffer(iconName);
 179                                 }
 180
 181                         if (!iconExists)
 182                                 {
 183                                 break;
 184                                 }
 185
 186                         stccpy(rild.rild_Name, ScalosExamineGetName(fib), sizeof(rild.rild_Name));
 187                         }
 188                 else if (RETURN_OK != err)
 189                         {
 190                         stccpy(rild.rild_Name, Name, sizeof(rild.rild_Name));
 191                         }
 192                 else
 193                         {
 194                         // Success
 195                         stccpy(rild.rild_Name, ScalosExamineGetName(fib), sizeof(rild.rild_Name));
 196                         }
 197
 198                 if (NULL == fib)
 199                         {
 200                         break;
 201                         }
 202
 203                 stccpy(rild.rild_Comment, ScalosExamineGetComment(fib), sizeof(rild.rild_Comment));
 204                 rild.rild_OwnerUID = ScalosExamineGetDirUID(fib);
 205                 rild.rild_OwnerGID = ScalosExamineGetDirGID(fib);
 206                 rild.rild_Protection = ScalosExamineGetProtection(fib);
 207                 rild.rild_DateStamp = *ScalosExamineGetDate(fib);
 208                 rild.rild_Type = ScalosExamineGetDirEntryType(fib);
 209                 rild.rild_Size64 = ScalosExamineGetSize(fib);
 210                 rild.rild_DiskWriteProtected = !VolumeIsWritable;
 211                 rild.rild_CheckOverlap = TRUE;
 212
 213                 if (IsFileHidden(rild.rild_Name, rild.rild_Protection))
 214                         {
 215                         d1(kprintf("%s/%s/%ld: \n", __FILE__, __FUNC__, __LINE__));
 216                         break;
 217                         }
 218
 219                 //ReExamine(&rild);
 220
 221                 d1(kprintf("%s/%s/%ld:  rild_Name=<%s>\n", __FILE__, __FUNC__, __LINE__, rild.rild_Name));
 222
 223                 // this might be a softlink?
 224                 if (IsSoftLink(Name))
 225                         {
 226                         stccpy(rild.rild_Name, Name, sizeof(rild.rild_Name));
 227                         rild.rild_Type = ST_SOFTLINK;
 228                         d1(kprintf("%s/%s/%ld: ST_SOFTLINK rild_Name=<%s>\n", __FILE__, __FUNC__, __LINE__, rild.rild_Name));
 229                         }
 230
 231                 pos = IsIconName(rild.rild_Name);
 232
 233                 rild.rild_TypeNode = DefIconsIdentify(iwt->iwt_WindowTask.mt_WindowStruct->ws_Lock, rild.rild_Name,
 234                         ria ? ria->ria_IconType : ICONTYPE_NONE);
 235
 236                 d1(kprintf("%s/%s/%ld:  Name=<%s>  pos=%08lx\n", __FILE__, __FUNC__, __LINE__, rild.rild_Name, pos));
 237
 238                 // Read Text Icon
 239                 d1(kprintf("%s/%s/%ld: Name=<%s>\n", __FILE__, __FUNC__, __LINE__, rild.rild_Name));
 240
 241                 if (IsShowAllType(iwt->iwt_OldShowType))
 242                         {
 243                         in = GetTextIcon(iwt, &iwt->iwt_ColumnWidthChangeHook, NULL, &rilc.rilc_BackdropList, &rild);
 244
 245                         d1(kprintf("%s/%s/%ld: in=%08lx\n", __FILE__, __FUNC__, __LINE__, in));
 246
 247                         if (0 != pos && ~0 != pos)
 248                                 {
 249                                 // rild.rild_Name IS an icon
 250                                 hasIcon = TRUE;
 251                                 }
 252                         else
 253                                 {
 254                                 // we need to check whether an icon (.info) is present
 255                                 STRPTR IconFileName = AllocPathBuffer();
 256
 257                                 if (IconFileName)
 258                                         {
 259                                         BPTR IconLock;
 260
 261                                         stccpy(IconFileName, rild.rild_Name, MAX_FileName);
 262                                         SafeStrCat(IconFileName, ".info", MAX_FileName);
 263                                         if ((IconLock = Lock(IconFileName, ACCESS_READ)))
 264                                                 {
 265                                                 hasIcon = TRUE;
 266                                                 UnLock(IconLock);
 267                                                 }
 268                                         FreePathBuffer(IconFileName);
 269                                         }
 270                                 }
 271
 272                         if (in && 0 == pos)
 273                                 {
 274                                 ClassSetDefaultIconFlags(in, !hasIcon);
 275                                 d1(kprintf("%s/%s/%ld: in=<%s>  pos=%08lx  hasIcon=%ld\n", \
 276                                         __FILE__, __FUNC__, __LINE__, GetIconName(in), pos, hasIcon));
 277                                 }
 278                         }
 279                 else
 280                         {
 281                         d1(kprintf("%s/%s/%ld: \n", __FILE__, __FUNC__, __LINE__));
 282
 283                         if (rild.rild_SoloIcon && 0 != pos && ~0 != pos)
 284                                 {
 285                                 // strip ".info" from name
 286                                 *((char *) pos) = '\0';
 287                                 }
 288
 289                         in = GetTextIcon(iwt, &iwt->iwt_ColumnWidthChangeHook, NULL, &rilc.rilc_BackdropList, &rild);
 290                         hasIcon = TRUE;
 291
 292                         d1(kprintf("%s/%s/%ld: in=%08lx\n", __FILE__, __FUNC__, __LINE__, in));
 293                         }
 294
 295                 d1(KPrintF("%s/%s/%ld: in=%08lx\n", __FILE__, __FUNC__, __LINE__, in));
 296
 297                 if (in)
 298                         {
 299                         in->in_SupportFlags |= INF_SupportsOpen | INF_SupportsCopy | INF_SupportsInformation;
 300
 301                         d1(KPrintF("%s/%s/%ld: in=%08lx  hasIcon=%ld VolumeIsWritable=%ld\n", __FILE__, __FUNC__, __LINE__, in, hasIcon, VolumeIsWritable));
 302
 303                         if (hasIcon)
 304                                 in->in_SupportFlags |= INF_SupportsSnapshot | INF_SupportsUnSnapshot;
 305
 306                         if (VolumeIsWritable)
 307                                 {
 308                                 if (hasIcon)
 309                                         in->in_SupportFlags |= INF_SupportsSnapshot | INF_SupportsUnSnapshot;
 310
 311                                 if (IsPermanentBackDropIcon(iwt, &rilc.rilc_BackdropList, dirLock, GetIconName(in)))
 312                                         {
 313                                         d1(kprintf("%s/%s/%ld: \n", __FILE__, __FUNC__, __LINE__));
 314                                         in->in_SupportFlags |= INF_SupportsPutAway;
 315                                         in->in_SupportFlags &= ~INF_SupportsLeaveOut;
 316                                         }
 317                                 else
 318                                         {
 319                                         d1(kprintf("%s/%s/%ld: \n", __FILE__, __FUNC__, __LINE__));
 320                                         in->in_SupportFlags &= ~INF_SupportsPutAway;
 321                                         in->in_SupportFlags |= INF_SupportsLeaveOut;
 322                                         }
 323                                 }
 324                         else
 325                                 {
 326                                 in->in_SupportFlags &= ~(INF_SupportsSnapshot | INF_SupportsUnSnapshot);
 327                                 }
 328
 329                         if (!hasIcon)
 330                                 in->in_SupportFlags &= ~INF_SupportsLeaveOut;
 331
 332                         if (0 != pos)
 333                                 in->in_SupportFlags &= ~(INF_SupportsSnapshot | INF_SupportsUnSnapshot | INF_SupportsLeaveOut);
 334
 335                         d1(KPrintF("%s/%s/%ld: in=<%s>  supportFlags=%08lx  hasIcon=%ld  pos=%lu\n", \
 336                                 __FILE__, __FUNC__, __LINE__, GetIconName(in), in->in_SupportFlags, hasIcon, pos));
 337
 338                         in->in_FileType = rild.rild_TypeNode;
 339
 340                         SetIconSupportsFlags(in, VolumeIsWritable);
 341
 342                         if (!DoMethod(iwt->iwt_WindowTask.mt_MainObject, SCCM_TextWin_InsertIcon, in))
 343                                 {
 344                                 // SCCM_TextWin_InsertIcon failed
 345                                 struct ScaIconNode *IconList = NULL;
 346
 347                                 SCA_MoveIconNode(&iwt->iwt_WindowTask.wt_IconList, &IconList, in);
 348                                 FreeIconList(iwt, &IconList);
 349                                 }
 350                         }
 351                 } while (0);
 352
 353         RilcCleanup(&rilc);
 354
 355         if (ScanDirSemaphoreLocked)
 356                 ScalosReleaseSemaphore(&iwt->iwt_ScanDirSemaphore);
 357
 358         if (IS_VALID_LOCK(oldDir))
 359                 CurrentDir(oldDir);
 360         ScalosExamineEnd(&fib);
 361
 362         d1(KPrintF("%s/%s/%ld: in=%08lx\n", __FILE__, __FUNC__, __LINE__, in));
 363
 364         return in;
 365 }
 366 ///
 367
 368 /// IsBackDropIconTextWindow
 369 static BOOL IsBackDropIconTextWindow(struct internalScaWindowTask *iwt, struct BackDropList *bdl,
 370         BPTR fLock, CONST_STRPTR FileName, IPTR pos)
 371 {
 372         BOOL Result;
 373
 374         if (0 != pos && ~0 != pos)
 375                 {
 376                 // FileName is an icon, generate name for non-icon
 377                 STRPTR ObjectName = AllocCopyString(FileName);
 378
 379                 if (NULL == ObjectName)
 380                         {
 381                         Result = ScanDirIsBackDropIcon(iwt, bdl, fLock, FileName);
 382                         }
 383                 else
 384                         {
 385                         ObjectName[((STRPTR) pos) - FileName] = '\0';
 386
 387                         Result = ScanDirIsBackDropIcon(iwt, bdl, fLock, ObjectName);
 388                         FreeCopyString(ObjectName);
 389                         }
 390                 }
 391         else
 392                 {
 393                 Result = ScanDirIsBackDropIcon(iwt, bdl, fLock, FileName);
 394                 }
 395
 396         return Result;
 397 }
 398 ///
 399
 400 /// TextCheckCleanup
 401 static enum ScanDirResult TextCheckCleanup(struct ReadIconListControl *rilc)
 402 {
 403         enum ScanDirResult sdResult = SCANDIR_OK;
 404
 405         if (rilc->rilc_CleanupCount++ > 20)
 406                 {
 407                 struct internalScaWindowTask *iwt = rilc->rilc_WindowTask;
 408
 409                 rilc->rilc_CleanupCount = 0;
 410
 411                 d1(kprintf("%s/%s/%ld: IconList=%08lx\n", __FILE__, __FUNC__, __LINE__, iwt->iwt_WindowTask.wt_LateIconList));
 412
 413                 ScanDirUpdateStatusBarText(iwt, rilc->rilc_TotalFound);
 414                 }
 415
 416         return sdResult;
 417 }
 418 ///
 419
 420 /// GenerateTextIcons
 421 static enum ScanDirResult GenerateTextIcons(struct ReadIconListControl *rilc, BOOL Final)
 422 {
 423         struct internalScaWindowTask *iwt = rilc->rilc_WindowTask;
 424         struct IconScanEntry *ise;
 425         enum ScanDirResult sdResult;
 426
 427
 428         d1(KPrintF("%s/%s/%ld: START  Final=%ld\n", __FILE__, __FUNC__, __LINE__, Final));
 429
 430         // build links between icons and objects
 431         sdResult = LinkIconScanList(rilc);
 432         if (SCANDIR_OK != sdResult)
 433                 return sdResult;
 434
 435         if (Final)
 436                 {
 437                 while ((ise = (struct IconScanEntry *) RemTail(&rilc->rilc_UnlinkedIconScanList)))
 438                         {
 439                         // Move all remaining unlinked icons from rilc_UnlinkedIconScanList to rilc_IconScanList
 440                         Remove(&ise->ise_Node);
 441                         AddTail(&rilc->rilc_IconScanList, &ise->ise_Node);
 442                         }
 443                 }
 444
 445         for (ise = (struct IconScanEntry *) rilc->rilc_IconScanList.lh_Head;
 446                 SCANDIR_OK == sdResult && ise != (struct IconScanEntry *) &rilc->rilc_IconScanList.lh_Tail;
 447                 ise = (struct IconScanEntry *) ise->ise_Node.ln_Succ)
 448                 {
 449                 BOOL ShowEntry = TRUE;
 450
 451                 if (ise->ise_Flags & ISEFLG_Used)
 452                         continue;
 453
 454                 if (rilc->rilc_OrigViewByType != iwt->iwt_WindowTask.mt_WindowStruct->ws_Viewmodes)
 455                         break;
 456
 457                 if (!Final && NULL == ise->ise_ObjPtr && NULL == ise->ise_IconPtr)
 458                         continue;
 459
 460                 d1(kprintf("%s/%s/%ld: ise=<%s>  Flags=%08lx  ObjPtr=%08lx  IconPtr=%08lx\n", \
 461                         __FILE__, __FUNC__, __LINE__, ise->ise_Fib.fib_FileName, ise->ise_Flags, ise->ise_ObjPtr, ise->ise_IconPtr));
 462
 463                 if (!IsShowAllType(iwt->iwt_OldShowType))
 464                         {
 465                         ShowEntry = (NULL == ise->ise_ObjPtr);  // Icon w/o object
 466
 467                         if (WBDISK == ise->ise_IconType)
 468                                 ShowEntry = FALSE;      // don't show WBDISK icons
 469                         }
 470
 471                 if (IsFileHidden(ise->ise_Fib.fib_FileName, ise->ise_Fib.fib_Protection))
 472                         ShowEntry = FALSE;
 473
 474                 if (ShowEntry)
 475                         {
 476                         struct ScaIconNode *in;
 477                         struct ReadIconListData rild;
 478
 479                         rild.rild_DiskWriteProtected = !rilc->rilc_DiskWritable;
 480
 481                         ScanDirFillRildFromIse(&rild, ise);
 482
 483                         if (!IsShowAllType(iwt->iwt_OldShowType))
 484                                 {
 485                                 if (0 != ise->ise_Pos && ~0 != ise->ise_Pos)
 486                                         {
 487                                         // strip ".info" from name
 488                                         STRPTR ppos = rild.rild_Name + ((STRPTR) ise->ise_Pos - (STRPTR) ise->ise_Fib.fib_FileName);
 489
 490                                         *ppos = '\0';
 491                                         }
 492
 493                                 if (NULL == ise->ise_ObjPtr)
 494                                         {
 495                                         // icon w/o associated object
 496                                         rild.rild_Size64 = MakeU64(0);
 497                                         rild.rild_SoloIcon = TRUE;
 498
 499                                         d1(kprintf("%s/%s/%ld: ise=<%s>  Flags=%08lx  ObjPtr=%08lx  IconPtr=%08lx  SOLOicon\n", \
 500                                                 __FILE__, __FUNC__, __LINE__, ise->ise_Fib.fib_FileName, ise->ise_Flags, ise->ise_ObjPtr, ise->ise_IconPtr));
 501                                         }
 502                                 }
 503
 504                         in = GetTextIcon(iwt, NULL, ise, &rilc->rilc_BackdropList, &rild);
 505
 506                         d1(kprintf("%s/%s/%ld: in=%08lx\n", __FILE__, __FUNC__, __LINE__, in));
 507
 508                         if (in)
 509                                 {
 510                                 if (!(ise->ise_Flags & ISEFLG_IsIcon) && NULL == ise->ise_IconPtr)
 511                                 {
 512                                         ClassSetDefaultIconFlags(in, TRUE);
 513                                         d1(kprintf("%s/%s/%ld: ise=<%s>  Flags=%08lx  ObjPtr=%08lx  IconPtr=%08lx  SOLOicon\n", \
 514                                                 __FILE__, __FUNC__, __LINE__, ise->ise_Fib.fib_FileName, ise->ise_Flags, ise->ise_ObjPtr, ise->ise_IconPtr));
 515                                 }
 516
 517                                 d1(KPrintF("%s/%s/%ld: Name=<%s>  rild_IconType=%ld\n", \
 518                                         __FILE__, __FUNC__, __LINE__, rild.rild_Name, rild.rild_IconType));
 519
 520                                 SetIconSupportsFlags(in, rilc->rilc_DiskWritable);
 521                                 }
 522                         }
 523
 524                 if (iwt->iwt_WindowTask.mt_MainObject)
 525                         {
 526                         if (rilc->rilc_WindowTask->iwt_AbortScanDir)
 527                                 sdResult = SCANDIR_ABORT;
 528                         else if (DoMethod(rilc->rilc_WindowTask->iwt_WindowTask.mt_MainObject, SCCM_CheckForMessages) )
 529                                 sdResult = SCANDIR_WINDOW_CLOSING;
 530                         }
 531
 532                 ise->ise_Flags |= ISEFLG_Used;
 533                 }
 534
 535         for (ise = (struct IconScanEntry *) rilc->rilc_NonIconScanList.lh_Head;
 536                 SCANDIR_OK == sdResult && ise != (struct IconScanEntry *) &rilc->rilc_NonIconScanList.lh_Tail;
 537                 ise = (struct IconScanEntry *) ise->ise_Node.ln_Succ)
 538                 {
 539                 BOOL ShowEntry = TRUE;
 540
 541                 if (ise->ise_Flags & ISEFLG_Used)
 542                         continue;
 543
 544                 if (!Final && NULL == ise->ise_ObjPtr && NULL == ise->ise_IconPtr)
 545                         continue;
 546
 547                 d1(kprintf("%s/%s/%ld: ise=<%s>  Flags=%08lx  ObjPtr=%08lx  IconPtr=%08lx\n", \
 548                         __FILE__, __FUNC__, __LINE__, ise->ise_Fib.fib_FileName, ise->ise_Flags, ise->ise_ObjPtr, ise->ise_IconPtr));
 549
 550                 if (!IsShowAllType(iwt->iwt_OldShowType))
 551                         {
 552                         ShowEntry = (NULL != ise->ise_IconPtr); // Object with icon
 553                         }
 554
 555                 if (IsFileHidden(ise->ise_Fib.fib_FileName, ise->ise_Fib.fib_Protection))
 556                         ShowEntry = FALSE;
 557
 558                 if (ShowEntry)
 559                         {
 560                         struct ScaIconNode *in;
 561                         struct ReadIconListData rild;
 562
 563                         rild.rild_DiskWriteProtected = !rilc->rilc_DiskWritable;
 564
 565                         ScanDirFillRildFromIse(&rild, ise);
 566
 567                         in = GetTextIcon(iwt, NULL, ise, &rilc->rilc_BackdropList, &rild);
 568
 569                         d1(kprintf("%s/%s/%ld: in=%08lx\n", __FILE__, __FUNC__, __LINE__, in));
 570
 571                         if (in)
 572                                 {
 573                                 if (NULL == ise->ise_IconPtr)
 574                                         ClassSetDefaultIconFlags(in, TRUE);
 575
 576                                 d1(KPrintF("%s/%s/%ld: Name=<%s>  rild_IconType=%ld\n", \
 577                                         __FILE__, __FUNC__, __LINE__, rild.rild_Name, rild.rild_IconType));
 578
 579                                 SetIconSupportsFlags(in, rilc->rilc_DiskWritable);
 580                                 }
 581                         }
 582
 583                 if (iwt->iwt_WindowTask.mt_MainObject)
 584                         {
 585                         if (rilc->rilc_WindowTask->iwt_AbortScanDir)
 586                                 sdResult = SCANDIR_ABORT;
 587                         else if (DoMethod(rilc->rilc_WindowTask->iwt_WindowTask.mt_MainObject, SCCM_CheckForMessages) )
 588                                 sdResult = SCANDIR_WINDOW_CLOSING;
 589                         }
 590
 591                 ise->ise_Flags |= ISEFLG_Used;
 592                 }
 593
 594         d1(KPrintF("%s/%s/%ld: END\n", __FILE__, __FUNC__, __LINE__));
 595
 596         return sdResult;
 597 }
 598 ///
 599
 600 /// ReadTextWindowIconList
 601 // Result :
 602 // ==0  Success
 603 // !=0  Failure
 604 enum ScanDirResult ReadTextWindowIconList(struct internalScaWindowTask *iwt)
 605 {
 606         struct ReadIconListControl rilc;
 607         enum ScanDirResult sdResult;
 608         enum ScanDirResult Result;
 609         ULONG Flags = REDRAWF_DontRefreshWindowFrame;
 610
 611         d1(KPrintF("\n" "%s/%s/%ld: START  iwt=%08lx\n", __FILE__, __FUNC__, __LINE__, iwt));
 612
 613         if (!RilcInit(&rilc, iwt))
 614                 return SCANDIR_FAIL_ABORT;
 615
 616         rilc.rilc_OrigViewByType = iwt->iwt_WindowTask.mt_WindowStruct->ws_Viewmodes;
 617         rilc.rilc_TotalFound = 0;
 618
 619         if (!AttemptSemaphoreNoNest(&iwt->iwt_UpdateSemaphore))
 620                 return 0;
 621
 622         LockWindow(iwt);
 623
 624         ScalosLockIconListExclusive(iwt);
 625         FreeIconList(iwt, &iwt->iwt_WindowTask.wt_IconList);
 626         FreeIconList(iwt, &iwt->iwt_WindowTask.wt_LateIconList);
 627         ScalosUnLockIconList(iwt);
 628
 629         iwt->iwt_AbortScanDir = FALSE;
 630
 631         DoMethod(iwt->iwt_WindowTask.mt_MainObject, SCCM_IconWin_Redraw, Flags);
 632
 633         DoMethod(iwt->iwt_WindowTask.mt_MainObject, SCCM_IconWin_SetVirtSize,
 634                 SETVIRTF_AdjustRightSlider | SETVIRTF_AdjustBottomSlider);
 635
 636         BackdropWait(iwt->iwt_WindowTask.mt_WindowStruct->ws_Lock);
 637
 638         // limit <wt_XOffset> and <wt_YOffset> to positive values
 639         if (iwt->iwt_WindowTask.wt_XOffset < 0)
 640                 iwt->iwt_WindowTask.wt_XOffset = 0;
 641         if (iwt->iwt_WindowTask.wt_YOffset < 0)
 642                 iwt->iwt_WindowTask.wt_YOffset = 0;
 643
 644         d1(kprintf("%s/%s/%ld: xOffset=%ld  yOffset=%ld\n", __FILE__, __FUNC__, __LINE__, iwt->iwt_WindowTask.wt_XOffset, iwt->iwt_WindowTask.wt_YOffset));
 645
 646         sdResult = GetFileList(&rilc, TextCheckCleanup, CurrentPrefs.pref_UseExAll, TRUE, FALSE);
 647
 648         d1(kprintf("%s/%s/%ld: sdResult=%ld\n", __FILE__, __FUNC__, __LINE__, sdResult));
 649
 650         switch (sdResult)
 651                 {
 652         case SCANDIR_VIEWMODE_CHANGE:
 653         case SCANDIR_FINISHED:
 654                 Result = SCANDIR_OK;     // Success
 655                 break;
 656         default:                // Failure
 657                 d1(kprintf("%s/%s/%ld: sdResult=%ld\n", __FILE__, __FUNC__, __LINE__, sdResult));
 658                 Result = sdResult;
 659                 break;
 660                 }
 661
 662         d1(kprintf("%s/%s/%ld: Result=%ld\n", __FILE__, __FUNC__, __LINE__, Result));
 663
 664         if (rilc.rilc_OrigViewByType == iwt->iwt_WindowTask.mt_WindowStruct->ws_Viewmodes)
 665                 {
 666                 struct Hook SortHook;
 667
 668                 ScalosLockIconListExclusive(iwt);
 669
 670                 SETHOOKFUNC(SortHook, GetTextIconSortFunction(iwt));
 671                 SortHook.h_Data = NULL;
 672
 673                 sdResult = GenerateTextIcons(&rilc, TRUE);
 674
 675                 d1(kprintf("%s/%s/%ld: IconList=%08lx  SortFunc=%08lx\n", __FILE__, __FUNC__, __LINE__, iwt->iwt_WindowTask.wt_IconList, SortHook.h_Entry));
 676
 677                 if (SCANDIR_OK != sdResult)
 678                         {
 679                         Result = sdResult;
 680                         }
 681                 else
 682                         {
 683                         if (SortHook.h_Entry)
 684                                 SCA_SortNodes((struct ScalosNodeList *) &iwt->iwt_WindowTask.wt_IconList, &SortHook, SCA_SortType_Best);
 685
 686                         if (iwt->iwt_WindowTask.wt_Window)
 687                                 {
 688                                 ReposTextIcons2(iwt);
 689
 690                                 d1(kprintf("%s/%s/%ld: before RefreshIcons()\n", __FILE__, __FUNC__, __LINE__));
 691                                 RefreshIcons(iwt, NULL);
 692                                 }
 693                         }
 694
 695                 ScalosUnLockIconList(iwt);
 696                 }
 697
 698         RilcCleanup(&rilc);
 699
 700         ScalosReleaseSemaphore(&iwt->iwt_UpdateSemaphore);
 701
 702         UnLockWindow(iwt);
 703
 704         if (rilc.rilc_OrigViewByType != iwt->iwt_WindowTask.mt_WindowStruct->ws_Viewmodes)
 705                 DoMethod(iwt->iwt_WindowTask.mt_MainObject, SCCM_IconWin_Update);
 706
 707         SetMenuOnOff(iwt);
 708
 709         d1(KPrintF("%s/%s/%ld: END iwt=%08lx  <%s>\n", __FILE__, __FUNC__, __LINE__, iwt, iwt->iwt_WinTitle));
 710
 711         return Result;
 712 }
 713 ///
 714
 715 /// GetTextIcon
 716 static struct ScaIconNode *GetTextIcon(struct internalScaWindowTask *iwt,
 717         struct Hook *ColumnChangeHook, struct IconScanEntry *ise,
 718         struct BackDropList *bdl, const struct ReadIconListData *rild)
 719 {
 720         Object *TextIconObj;
 721         struct ScaIconNode *in = NULL;
 722         BOOL isLink;
 723         BPTR currentDirLock;
 724         ULONG TextStyle = FS_NORMAL;
 725         ULONG pos;
 726         struct ReadIconListData rildClone;
 727
 728         d1(kprintf("%s/%s/%ld: Name=<%s>  Type=%ld\n", __FILE__, __FUNC__, __LINE__, rild->rild_Name, rild->rild_Type));
 729         d1(kprintf("%s/%s/%ld: Comment=<%s>\n", __FILE__, __FUNC__, __LINE__, rild->rild_Comment));
 730
 731         if (NULL == rild->rild_Name || '\0' == *rild->rild_Name)
 732                 return NULL;
 733
 734         isLink = (ST_SOFTLINK == rild->rild_Type) || (ST_LINKDIR == rild->rild_Type) ||
 735                 (ST_LINKFILE == rild->rild_Type) || IsSoftLink(rild->rild_Name);
 736
 737         d1(KPrintF("%s/%s/%ld: <%s> Type=%ld  isLink=%ld\n", __FILE__, __FUNC__, __LINE__, rild->rild_Name, rild->rild_IconType, isLink));
 738         d1(KPrintF("%s/%s/%ld: <%s> comment=<%s>\n", __FILE__, __FUNC__, __LINE__, rild->rild_Name, rild->rild_Comment));
 739
 740         d1(KPrintF("%s/%s/%ld: rild_Size64=%08lx-%08lx\n", __FILE__, __FUNC__, __LINE__, \
 741                 ULONG64_HIGH(rild->rild_Size64), ULONG64_LOW(rild->rild_Size64)));
 742
 743         currentDirLock = CurrentDir((BPTR)NULL);
 744         CurrentDir(currentDirLock);
 745
 746         pos = IsIconName(rild->rild_Name);
 747
 748         if (IsBackDropIconTextWindow(iwt, bdl, currentDirLock, rild->rild_Name, pos))
 749                 {
 750                 return NULL;
 751                 }
 752
 753         if (ST_SOFTLINK == rild->rild_Type)
 754                 {
 755                 rildClone = *rild;
 756                 rild = &rildClone;
 757                 ResolveLink(&rildClone);
 758                 }
 759
 760         if (isLink)
 761                 TextStyle = CurrentPrefs.pref_LinkTextStyle;
 762
 763         // Notice:
 764         // IDTA_TextMode is always IDTV_TextMode_Normal,
 765         // for shadowed drawing (ICONOBJ_USERFLAGF_DrawShadowed), IDTV_TextMode_Shadow is used.
 766
 767         TextIconObj = NewObject(TextIconClass, NULL,
 768                 TIDTA_ReadIconListData, (IPTR) rild,
 769                 TIDTA_WidthArray, (IPTR) iwt->iwt_WidthArray,
 770                 TIDTA_TextStyle, TextStyle,
 771                 TIDTA_Font, (IPTR) iwt->iwt_IconFont,
 772                 TIDTA_TTFont, (IPTR) &iwt->iwt_IconTTFont,
 773                 TIDTA_IconType, (0 != pos) ? WB_TEXTICON_TOOL : (IPTR) rild->rild_IconType,
 774                 TIDTA_TypeNode, (IPTR) rild->rild_TypeNode,
 775                 TIDTA_WindowTask, (IPTR) iwt,
 776 //              TIDTA_IconObject, (IPTR) (ise ? ise->ise_IconObj : NULL),
 777                 TIDTA_SoloIcon, rild->rild_SoloIcon,
 778                 IDTA_InnerBottom, CurrentPrefs.pref_ImageBorders.Bottom,
 779                 IDTA_InnerRight, CurrentPrefs.pref_ImageBorders.Right,
 780                 IDTA_InnerTop, CurrentPrefs.pref_ImageBorders.Top,
 781                 IDTA_InnerLeft, CurrentPrefs.pref_ImageBorders.Left,
 782                 IDTA_Text, (IPTR) rild->rild_Name,
 783                 IDTA_HalfShinePen, PalettePrefs.pal_PensList[PENIDX_HSHINEPEN],
 784                 IDTA_HalfShadowPen, PalettePrefs.pal_PensList[PENIDX_HSHADOWPEN],
 785                 IDTA_FrameTypeSel, CurrentPrefs.pref_FrameTypeSel,
 786                 IDTA_FrameType, CurrentPrefs.pref_FrameType,
 787                 IDTA_TextSkip, CurrentPrefs.pref_TextSkip,
 788                 IDTA_MultiLineText, (IPTR) CurrentPrefs.pref_IconTextMuliLine,
 789                 TIDTA_TextPenFileNormal, PalettePrefs.pal_PensList[PENIDX_FILETEXT],
 790                 TIDTA_TextPenFileSelected, PalettePrefs.pal_PensList[PENIDX_FILETEXTSEL],
 791                 IDTA_TextPenShadow, PalettePrefs.pal_PensList[PENIDX_ICONTEXTSHADOWPEN],
 792                 IDTA_TextPenOutline, PalettePrefs.pal_PensList[PENIDX_ICONTEXTOUTLINEPEN],
 793                 TIDTA_TextPenDrawerNormal, PalettePrefs.pal_PensList[PENIDX_DRAWERTEXT],
 794                 TIDTA_TextPenDrawerSelected, PalettePrefs.pal_PensList[PENIDX_DRAWERTEXTSEL],
 795                 IDTA_TextMode, IDTV_TextMode_Normal,
 796                 IDTA_TextDrawMode, FontPrefs.fprf_TextDrawMode,
 797                 IDTA_TextStyle, isLink ? CurrentPrefs.pref_LinkTextStyle : FS_NORMAL,
 798                 IDTA_SupportedIconTypes, CurrentPrefs.pref_SupportedIconTypes,
 799                 TIDTA_ColumnWidthChangeHook, (IPTR) ColumnChangeHook,
 800                 TIDTA_SelectNameOnly, CurrentPrefs.pref_SelectTextIconName,
 801                 TAG_END);
 802
 803         d1(KPrintF("%s/%s/%ld: TextIconObj=%08lx  Name=<%s>  rild_IconType=%ld\n", __FILE__, __FUNC__, __LINE__, TextIconObj, rild->rild_Name, rild->rild_IconType));
 804
 805         if (TextIconObj)
 806                 {
 807                 if (ise)
 808                         ise->ise_IconObj = NULL;        // IconObject will be freed when TextIconObj is disposed!
 809
 810                 in = SCA_AllocIconNode(&iwt->iwt_WindowTask.wt_IconList);
 811
 812                 d1(kprintf("%s/%s/%ld: in=%08lx\n", __FILE__, __FUNC__, __LINE__, in));
 813                 if (in)
 814                         {
 815                         in->in_Icon = TextIconObj;
 816
 817                         GetAttr(TIDTA_IconType, TextIconObj, (IPTR *) &in->in_FileType);
 818
 819                         SetIconName(TextIconObj, in);
 820                         d1(kprintf("%s/%s/%ld: in_Name=<%s> %08lx\n", __FILE__, __FUNC__, __LINE__, in->in_Name, in->in_Name));
 821
 822                         switch (rild->rild_Type)
 823                                 {
 824                         case ST_FILE:
 825                         case ST_LINKFILE:
 826                         case ST_PIPEFILE:
 827                                 in->in_Flags |= INF_File;
 828                                 break;
 829                         case ST_SOFTLINK:
 830                                 if (rild->rild_Type < 0)
 831                                         in->in_Flags |= INF_File;
 832                                 break;
 833                         default:
 834                                 if (rild->rild_Type < 0)
 835                                         in->in_Flags |= INF_File;
 836                                 break;
 837                                 }
 838
 839                         in->in_Flags |= INF_TextIcon;
 840                         in->in_Flags |= INF_Sticky;
 841
 842                         if (rild->rild_DiskWriteProtected)
 843                                 in->in_Flags |= INF_VolumeWriteProtected;
 844
 845                         in->in_SupportFlags = INF_SupportsOpen | INF_SupportsCopy | INF_SupportsInformation;
 846
 847                         if (!rild->rild_DiskWriteProtected)
 848                                 {
 849                                 if (IsPermanentBackDropIcon(iwt, bdl, currentDirLock, rild->rild_Name))
 850                                         {
 851                                         d1(kprintf("%s/%s/%ld: \n", __FILE__, __FUNC__, __LINE__));
 852                                         in->in_SupportFlags |= INF_SupportsPutAway;
 853                                         in->in_SupportFlags &= ~INF_SupportsLeaveOut;
 854                                         }
 855                                 else
 856                                         {
 857                                         d1(kprintf("%s/%s/%ld: \n", __FILE__, __FUNC__, __LINE__));
 858                                         in->in_SupportFlags &= ~INF_SupportsPutAway;
 859                                         in->in_SupportFlags |= INF_SupportsLeaveOut;
 860                                         }
 861                                 }
 862
 863                         if (0 != pos)
 864                                 in->in_SupportFlags &= ~(INF_SupportsSnapshot | INF_SupportsUnSnapshot | INF_SupportsLeaveOut);
 865
 866                         if (!(rild->rild_Protection & FIBF_DELETE))
 867                                 in->in_SupportFlags |= INF_SupportsDelete;
 868                         if (!(rild->rild_Protection & FIBF_WRITE))
 869                                 in->in_SupportFlags |= INF_SupportsRename;
 870
 871                         d1(kprintf("%s/%s/%ld: in=<%s>  supportFlags=%08lx  pos=%lu\n", \
 872                                 __FILE__, __FUNC__, __LINE__, GetIconName(in), in->in_SupportFlags, pos));
 873
 874                         in->in_FileDateStamp = rild->rild_DateStamp;
 875                         in->in_FileSize = ULONG64_LOW(rild->rild_Size64);
 876
 877                         DateStamp(&in->in_DateStamp);
 878
 879                         d1(kprintf("%s/%s/%ld: <%s> Protection=%08lx  SupportFlags=%08lx\n", \
 880                                 __FILE__, __FUNC__, __LINE__, rild->rild_Name, rild->rild_Protection, in->in_SupportFlags));
 881
 882                         d1(kprintf("%s/%s/%ld: \n", __FILE__, __FUNC__, __LINE__));
 883
 884                         DoMethod(iwt->iwt_WindowTask.mt_MainObject, SCCM_IconWin_LayoutIcon,
 885                                 in->in_Icon, IOLAYOUTF_NormalImage | IOLAYOUTF_SelectedImage);
 886                         }
 887                 }
 888
 889         d1(kprintf("%s/%s/%ld: in=%08lx\n", __FILE__, __FUNC__, __LINE__, in));
 890
 891         return in;
 892 }
 893 ///
 894
 895 /// ResolveLink
 896 static void ResolveLink(struct ReadIconListData *rild)
 897 {
 898         BPTR LinkLock;
 899         T_ExamineData *fib = NULL;
 900
 901         do      {
 902                 LinkLock = Lock(rild->rild_Name, ACCESS_READ);
 903                 d1(kprintf("%s/%s/%ld: LinkLock=%08lx\n", __FILE__, __FUNC__, __LINE__, LinkLock));
 904                 if ((BPTR)NULL == LinkLock)
 905                         break;
 906
 907                 debugLock_d1(LinkLock);
 908
 909                 if (!ScalosExamineBegin(&fib))
 910                         break;
 911
 912                 d1(kprintf("%s/%s/%ld: fib=%08lx\n", __FILE__, __FUNC__, __LINE__, fib));
 913
 914                 if (!ScalosExamineLock(LinkLock, &fib))
 915                         break;
 916
 917                 rild->rild_Type = ScalosExamineGetDirEntryType(fib);
 918                 rild->rild_Size64 = ScalosExamineGetSize(fib);
 919                 rild->rild_Protection = ScalosExamineGetProtection(fib);
 920                 rild->rild_DateStamp = *ScalosExamineGetDate(fib);
 921                 stccpy(rild->rild_Comment, ScalosExamineGetComment(fib), sizeof(rild->rild_Comment));
 922
 923                 d1(kprintf("%s/%s/%ld: Name=<%s>  Type=%ld\n", __FILE__, __FUNC__, __LINE__, \
 924                         rild->rild_Name, rild->rild_Type));
 925                 } while (0);
 926
 927         ScalosExamineEnd(&fib);
 928         if (LinkLock)
 929                 UnLock(LinkLock);
 930 }
 931 ///
 932
 933 /// ReExamine
 934 #if 0
 935 static LONG ReExamine(struct ReadIconListData *rild)
 936 {
 937         T_ExamineData *fib;
 938         BPTR fLock = (BPTR)NULL;
 939         BOOL Result = RETURN_OK;
 940
 941         do      {
 942                 if (!ScalosExamineBegin(&fib))
 943                         {
 944                         Result = IoErr();
 945                         break;
 946                         }
 947
 948                 fLock = Lock(rild->rild_Name, ACCESS_READ);
 949                 if ((BPTR)NULL == fLock)
 950                         {
 951                         Result = IoErr();
 952                         break;
 953                         }
 954
 955                 if (!ScalosExamineLock(fLock, &fib))
 956                         {
 957                         Result = IoErr();
 958                         break;
 959                         }
 960
 961                 rild->rild_Type = ScalosExamineGetDirEntryType(fib);
 962                 rild->rild_Protection = ScalosExamineGetProtection(fib);
 963                 rild->rild_Size64 = ScalosExamineGetSize(fib);
 964                 rild->rild_DateStamp = *ScalosExamineGetDate(fib);
 965
 966                 stccpy(rild->rild_Comment, ScalosExamineGetComment(fib), sizeof(rild->rild_Comment));
 967                 stccpy(rild->rild_Name, ScalosExamineGetName(fib), sizeof(rild->rild_Name));
 968                 } while (0);
 969
 970         ScalosExamineEnd(&fib);
 971         if (fLock)
 972                 UnLock(fLock);
 973
 974         return Result;
 975 }
 976 #endif
 977 ///
 978