#define INCL_DOS
#define INCL_WIN

#include <os2.h>
#include <stdarg.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <ctype.h>
#include "fm3dll.h"

#pragma alloc_text(UPDATECNR,UpdateCnrRecord,UpdateCnrList)


PCNRITEM UpdateCnrRecord (HWND hwndCnr,CHAR *filename,BOOL partial,
                          DIRCNRDATA *dcd) {

  PCNRITEM      pci;
  FILEFINDBUF4  ffb;
  HDIR          hDir = HDIR_CREATE;
  ULONG         nm = 1L;
  ULONG         oldemphasis = 0;
  APIRET        status;
  BOOL          needtosort = FALSE;
#ifdef DEBUG
  BOOL existed=FALSE,updated=FALSE,added=FALSE,deleted=FALSE,found=FALSE;
#endif

  if(!filename || !*filename)
    return (PCNRITEM)NULL;
  if(IsFullName(filename)) {
    if(driveflags[toupper(*filename) - 'A'] & DRIVE_NOTWRITEABLE)
      /* ignore non-writeable drives */
      return (PCNRITEM)NULL;
  }
  status = DosFindFirst(filename,
                        &hDir,
                        FILE_NORMAL   | FILE_DIRECTORY |
                        FILE_ARCHIVED | FILE_READONLY |
                        FILE_HIDDEN   | FILE_SYSTEM,
                        &ffb,
                        sizeof(ffb),
                        &nm,
                        FIL_QUERYEASIZE);
  if(!status) {
#ifdef DEBUG
    existed = TRUE;
#endif
    /* file exists */
    DosFindClose(hDir);
    if(!dcd)
      dcd = INSTDATA(hwndCnr);
/*
    if(dcd->type == TREE_FRAME &&
       !(ffb.attrFile & FILE_DIRECTORY))
      return (PCNRITEM)NULL;
*/
    if(dcd->type == ARC_FRAME)
      return (PCNRITEM)NULL;
    if(*dcd->directory) {

      CHAR *p,temp;

      p = strrchr(filename,'\\');
      if(p) {
        if(p < filename + 3)
          p++;
        temp = *p;
        *p = 0;
        if(stricmp(filename,dcd->directory)) {
          *p = temp;
          return (PCNRITEM)NULL;
        }
        *p = temp;
      }
      else
        return (PCNRITEM)NULL;
    }
    pci = FindCnrRecord(hwndCnr,
                        filename,
                        (PCNRITEM)NULL,
                        partial,
                        FALSE,
                        TRUE);
Update:
    if(pci) {     /* update record? */
#ifdef DEBUG
      found=TRUE;
#endif
      if((!fForceUpper && !fForceLower &&
         strcmp(pci->szFileName,filename)) ||
         pci->cbFile != ffb.cbFile || pci->attrFile != ffb.attrFile ||
         pci->easize != ((ffb.cbList > 4L) ? (ffb.cbList / 2) : 0L) ||
         pci->date.day != ffb.fdateLastWrite.day ||
         pci->date.month != ffb.fdateLastWrite.month ||
         pci->date.year != ffb.fdateLastWrite.year + 1980 ||
         pci->time.seconds != ffb.ftimeLastWrite.twosecs * 2 ||
         pci->time.minutes != ffb.ftimeLastWrite.minutes ||
         pci->time.hours != ffb.ftimeLastWrite.hours ||
         pci->ladate.day != ffb.fdateLastAccess.day ||
         pci->ladate.month != ffb.fdateLastAccess.month ||
         pci->ladate.year != ffb.fdateLastAccess.year + 1980 ||
         pci->latime.seconds != ffb.ftimeLastAccess.twosecs * 2 ||
         pci->latime.minutes != ffb.ftimeLastAccess.minutes ||
         pci->latime.hours != ffb.ftimeLastAccess.hours) { /* changed; update */
#ifdef DEBUG
        updated=TRUE;
#endif
        *ffb.achName = 0;
        ffb.cchName = 0;
        FillInRecordFromFFB(hwndCnr,pci,filename,&ffb,partial,dcd);
        if(strlen(pci->szFileName) < 4) {
          *pci->szFileName = toupper(*pci->szFileName);
          if(isalpha(*pci->szFileName) && toupper(*pci->szFileName) > 'B') {
            if(driveflags[toupper(*pci->szFileName) - 'A'] & DRIVE_CDROM)
              pci->rc.hptrIcon = hptrCDROM;
            else
              pci->rc.hptrIcon = (driveflags[toupper(*pci->szFileName) - 'A'] & DRIVE_REMOVABLE) ?
                                  hptrRemovable :
                                  (driveflags[toupper(*pci->szFileName) - 'A'] & DRIVE_REMOTE) ?
                                  hptrRemote :
                                  (driveflags[toupper(*pci->szFileName) - 'A'] & DRIVE_ZIPSTREAM) ?
                                  hptrZipstrm : hptrDrive;
          }
          else
            pci->rc.hptrIcon = hptrFloppy;
        }
        oldemphasis = pci->rc.flRecordAttr &
                      (CRA_SELECTED | CRA_CURSORED);
        if(oldemphasis)
          WinSendMsg(hwndCnr,
                     CM_SETRECORDEMPHASIS,
                     MPFROMP(pci),
                     MPFROM2SHORT(FALSE,
                                  oldemphasis));
        WinSendMsg(hwndCnr,
                   CM_INVALIDATERECORD,
                   MPFROMP(&pci),
                   MPFROM2SHORT(1,
                                /* CMA_ERASE | */CMA_TEXTCHANGED));
        if(oldemphasis)
          WinSendMsg(hwndCnr,
                     CM_SETRECORDEMPHASIS,
                     MPFROMP(pci),
                     MPFROM2SHORT(TRUE,
                                  oldemphasis));
      }
      else  /* existed, unchanged, do nothing but return */
        return pci;
    }
    else {        /* add record */
#ifdef DEBUG
      added=TRUE;
#endif
      needtosort = TRUE;
      if(dcd->type == DIR_FRAME) {

        RECORDINSERT ri;
        ULONG        totalbytes;

        pci = WinSendMsg(hwndCnr,
                         CM_ALLOCRECORD,
                         MPFROMLONG(EXTRA_RECORD_BYTES),
                         MPFROMLONG(1L));
        if(pci) {
          *ffb.achName = 0;
          totalbytes = FillInRecordFromFFB(hwndCnr,
                                           pci,
                                           filename,
                                           &ffb,
                                           partial,
                                           dcd);
          if(strlen(pci->szFileName) < 4) {
            *pci->szFileName = toupper(*pci->szFileName);
            if(isalpha(*pci->szFileName) &&
               toupper(*pci->szFileName) > 'B') {
              if(driveflags[toupper(*pci->szFileName) - 'A'] & DRIVE_CDROM)
                pci->rc.hptrIcon = hptrCDROM;
              else
                pci->rc.hptrIcon = (driveflags[toupper(*pci->szFileName) - 'A'] & DRIVE_REMOVABLE) ?
                                    hptrRemovable :
                                    (driveflags[toupper(*pci->szFileName) - 'A'] & DRIVE_REMOTE) ?
                                    hptrRemote :
                                    (driveflags[toupper(*pci->szFileName) - 'A'] & DRIVE_ZIPSTREAM) ?
                                    hptrZipstrm : hptrDrive;
            }
            else
              pci->rc.hptrIcon = hptrFloppy;
          }
          memset(&ri,0,sizeof(RECORDINSERT));
          ri.cb                 = sizeof(RECORDINSERT);
          ri.pRecordOrder       = (PRECORDCORE)CMA_END;
          ri.pRecordParent      = (PRECORDCORE)NULL;
          ri.zOrder             = (USHORT)CMA_TOP;
          ri.cRecordsInsert     = 1L;
          ri.fInvalidateRecord  = TRUE;
          if(WinSendMsg(hwndCnr,
                        CM_INSERTRECORD,
                        MPFROMP(pci),
                        MPFROMP(&ri)) &&
             totalbytes != (ULONG)-1L &&
             totalbytes) {
            dcd->totalbytes += totalbytes;
            PostMsg(hwndCnr,
                    UM_RESCAN,
                    MPVOID,
                    MPVOID);
            if(pci->attrFile & FILE_DIRECTORY)
              Stubby(hwndCnr,pci);
          }
        }
      }
      else if(ffb.attrFile & FILE_DIRECTORY) {

        /* check all parts and insert as required */
        CHAR    *p,temp;
        PCNRITEM pciParent = NULL,pciT;

        p = strchr(filename,'\\');
        if(p) {
          while(p && *p) {
            if(p < filename + 3)
              p++;
            temp = *p;
            *p = 0;
            pciT = FindCnrRecord(hwndCnr,
                                 filename,
                                 NULL,
                                 partial,
                                 FALSE,
                                 TRUE);
            if(!pciT || (INT)pciT == -1) {
              pci = WinSendMsg(hwndCnr,
                               CM_ALLOCRECORD,
                               MPFROMLONG(EXTRA_RECORD_BYTES),
                               MPFROMLONG(1L));
              if(pci) {

                RECORDINSERT ri;
                ULONG        totalbytes;

                *ffb.achName = 0;
                totalbytes = FillInRecordFromFFB(hwndCnr,
                                                 pci,
                                                 filename,
                                                 &ffb,
                                                 partial,
                                                 dcd);
                if(strlen(pci->szFileName) < 4) {
                  *pci->szFileName = toupper(*pci->szFileName);
                  if(isalpha(*pci->szFileName) && toupper(*pci->szFileName) > 'B') {
                    if(driveflags[toupper(*pci->szFileName) - 'A'] & DRIVE_CDROM)
                      pci->rc.hptrIcon = hptrCDROM;
                    else
                      pci->rc.hptrIcon = (driveflags[toupper(*pci->szFileName) - 'A'] & DRIVE_REMOVABLE) ?
                                          hptrRemovable :
                                          (driveflags[toupper(*pci->szFileName) - 'A'] & DRIVE_REMOTE) ?
                                          hptrRemote :
                                          (driveflags[toupper(*pci->szFileName) - 'A'] & DRIVE_ZIPSTREAM) ?
                                          hptrZipstrm : hptrDrive;
                  }
                  else
                    pci->rc.hptrIcon = hptrFloppy;
                }
                memset(&ri,0,sizeof(RECORDINSERT));
                ri.cb                 = sizeof(RECORDINSERT);
                ri.pRecordOrder       = (PRECORDCORE)CMA_END;
                ri.pRecordParent      = (PRECORDCORE)pciParent;
                ri.zOrder             = (USHORT)CMA_TOP;
                ri.cRecordsInsert     = 1L;
                ri.fInvalidateRecord  = TRUE;
                if(WinSendMsg(hwndCnr,
                              CM_INSERTRECORD,
                              MPFROMP(pci),
                              MPFROMP(&ri))) {
                  Flesh(hwndCnr,pci);
                  *p = temp;
                  pci = FindCnrRecord(hwndCnr,
                                      filename,
                                      pciT,
                                      partial,
                                      FALSE,
                                      TRUE);
                  if(pci)
                    goto Update;
                }
              }
            }
            else {
              pciParent = pciT;
              if(!(pciT->rc.flRecordAttr & CRA_EXPANDED)) {
                Flesh(hwndCnr,pciT);
                *p = temp;
                pci = FindCnrRecord(hwndCnr,
                                    filename,
                                    pciT,
                                    partial,
                                    FALSE,
                                    TRUE);
                if(pci)
                  goto Update;
              }
            }
            *p = temp;
            p = strchr(p + ((temp == '\\') ? 1 : 0),'\\');
          }
        }
        pci = WinSendMsg(hwndCnr,
                         CM_ALLOCRECORD,
                         MPFROMLONG(EXTRA_RECORD_BYTES),
                         MPFROMLONG(1L));
        if(pci) {

          RECORDINSERT ri;
          ULONG        totalbytes;

          *ffb.achName = 0;
          totalbytes = FillInRecordFromFFB(hwndCnr,
                                           pci,
                                           filename,
                                           &ffb,
                                           partial,
                                           dcd);
          if(strlen(pci->szFileName) < 4) {
            *pci->szFileName = toupper(*pci->szFileName);
            if(isalpha(*pci->szFileName) &&
               toupper(*pci->szFileName) > 'B') {
              if(driveflags[toupper(*pci->szFileName) - 'A'] & DRIVE_CDROM)
                pci->rc.hptrIcon = hptrCDROM;
              else
                pci->rc.hptrIcon = (driveflags[toupper(*pci->szFileName) - 'A'] & DRIVE_REMOVABLE) ?
                                    hptrRemovable :
                                    (driveflags[toupper(*pci->szFileName) - 'A'] & DRIVE_REMOTE) ?
                                    hptrRemote :
                                    (driveflags[toupper(*pci->szFileName) - 'A'] & DRIVE_ZIPSTREAM) ?
                                    hptrZipstrm : hptrDrive;
            }
            else
              pci->rc.hptrIcon = hptrFloppy;
          }
          memset(&ri,0,sizeof(RECORDINSERT));
          ri.cb                 = sizeof(RECORDINSERT);
          ri.pRecordOrder       = (PRECORDCORE)CMA_END;
          ri.pRecordParent      = (PRECORDCORE)pciParent;
          ri.zOrder             = (USHORT)CMA_TOP;
          ri.cRecordsInsert     = 1L;
          ri.fInvalidateRecord  = TRUE;
          if(WinSendMsg(hwndCnr,
                        CM_INSERTRECORD,
                        MPFROMP(pci),
                        MPFROMP(&ri)) &&
             totalbytes != (ULONG)-1L &&
             totalbytes) {
            if(dcd->type == DIR_FRAME)
              dcd->totalbytes += totalbytes;
            Stubby(hwndCnr,pci);
          }
        }
      }
    }
  }
  else if((pci = FindCnrRecord(hwndCnr,
                               filename,
                               (PCNRITEM)NULL,
                               partial,
                               FALSE,
                               TRUE)) !=
           NULL && (INT)pci != -1 && strlen(pci->szFileName) > 3) {
    /* file doesn't exist; delete record */
#ifdef DEBUG
    found=TRUE;
    deleted=TRUE;
#endif
    if(!dcd)
      dcd = INSTDATA(hwndCnr);
    if(pci->rc.flRecordAttr & CRA_SELECTED)
      WinSendMsg(hwndCnr,
                 CM_SETRECORDEMPHASIS,
                 MPFROMP(pci),
                 MPFROM2SHORT(FALSE,
                              CRA_SELECTED));
    if(dcd->type == DIR_FRAME)
      dcd->totalbytes -= (pci->cbFile + pci->easize);
    WinSendMsg(hwndCnr,
               CM_REMOVERECORD,
               MPFROMP(&pci),
               MPFROM2SHORT(1,
                            CMA_FREE | CMA_INVALIDATE));
    pci = (PCNRITEM)NULL;
    PostMsg(hwndCnr,
            UM_RESCAN,
            MPVOID,
            MPVOID);
  }
#ifdef DEBUG
  {
    char s[CCHMAXPATH + 80];
    sprintf(s,"%s:%s%s%s%s%s",filename,(existed) ? " Existed" : "",
            (updated) ? " Updated" : "",(added) ? " Added" : "",
            (deleted) ? " Deleted" : "",(found) ? " Found" : "");
    WinSetWindowText(WinQueryWindow(hwndMain,QW_PARENT),s);
  }
#endif
  return pci;
}



BOOL UpdateCnrList (HWND hwndCnr,CHAR **filename,INT howmany,BOOL partial,
                    DIRCNRDATA *dcd) {

  PCNRITEM      pci,*pciList = NULL;
  FILEFINDBUF4  ffb;
  HDIR          hDir;
  ULONG         nm = 1L;
  register INT  x,numlist = 0,numremain;
  BOOL          repos = FALSE,needtosort = FALSE,ret = FALSE;
  APIRET        status;

  if(!dcd)
    dcd = INSTDATA(hwndCnr);
  if(!dcd)
    return ret;
  if(!filename || !howmany || !filename[0])
    return ret;
  {
    CNRINFO cnri;

    memset(&cnri,0,sizeof(CNRINFO));
    cnri.cb = sizeof(CNRINFO);
    WinSendMsg(hwndCnr,
               CM_QUERYCNRINFO,
               MPFROMP(&cnri),
               MPFROMLONG(sizeof(CNRINFO)));
    numremain = cnri.cRecords;
  }
  pciList = malloc(sizeof(PCNRITEM) * howmany);
  for(x = 0;filename[x] && x < howmany;x++) {
    if(IsFullName(filename[x])) {
      if(driveflags[toupper(*filename[x]) - 'A'] & DRIVE_NOTWRITEABLE)
        /* ignore non-writeable drives */
        continue;
    }
    hDir = HDIR_CREATE;
    status = DosFindFirst(filename[x],
                          &hDir,
                          FILE_NORMAL   | FILE_DIRECTORY |
                          FILE_ARCHIVED | FILE_READONLY |
                          FILE_HIDDEN   | FILE_SYSTEM,
                          &ffb,
                          sizeof(ffb),
                          &nm,
                          FIL_QUERYEASIZE);
    if(!status) {
      /* file exists */
      DosFindClose(hDir);
//      if(dcd->type == TREE_FRAME && !(ffb.attrFile & FILE_DIRECTORY))
//        continue;
      if(dcd->type == DIR_FRAME &&
         *dcd->directory) {

        CHAR *p,temp;

        p = strrchr(filename[x],'\\');
        if(p) {
          if(p < filename[x] + 3)
            p++;
          temp = *p;
          *p = 0;
          if(stricmp(filename[x],dcd->directory)) {
            *p = temp;
            continue;
          }
          *p = temp;
        }
        else
          continue;
      }
      ret = TRUE;
      pci = FindCnrRecord(hwndCnr,
                          filename[x],
                          (PCNRITEM)NULL,
                          partial,
                          FALSE,
                          TRUE);
      if(pci) {     /* update record? */
        if((!fForceUpper && !fForceLower &&
           strcmp(pci->szFileName,filename[x])) ||
           pci->cbFile != ffb.cbFile || pci->attrFile != ffb.attrFile ||
           pci->easize != ((ffb.cbList > 4L) ? (ffb.cbList / 2) : 0L) ||
           pci->date.day != ffb.fdateLastWrite.day ||
           pci->date.month != ffb.fdateLastWrite.month ||
           pci->date.year != ffb.fdateLastWrite.year + 1980 ||
           pci->time.seconds != ffb.ftimeLastWrite.twosecs * 2 ||
           pci->time.minutes != ffb.ftimeLastWrite.minutes ||
           pci->time.hours != ffb.ftimeLastWrite.hours ||
           pci->ladate.day != ffb.fdateLastAccess.day ||
           pci->ladate.month != ffb.fdateLastAccess.month ||
           pci->ladate.year != ffb.fdateLastAccess.year + 1980 ||
           pci->latime.seconds != ffb.ftimeLastAccess.twosecs * 2 ||
           pci->latime.minutes != ffb.ftimeLastAccess.minutes ||
           pci->latime.hours != ffb.ftimeLastAccess.hours) { /* changed; update */
          pciList[numlist++] = pci;
          *ffb.achName = 0;
          ffb.cchName = 0;
          FillInRecordFromFFB(hwndCnr,
                              pci,
                              filename[x],
                              &ffb,
                              partial,
                              dcd);
          if(IsRoot(pci->szFileName)) {
            *pci->szFileName = toupper(*pci->szFileName);
            if(isalpha(*pci->szFileName) &&
               toupper(*pci->szFileName) > 'B') {
              if(driveflags[toupper(*pci->szFileName) - 'A'] & DRIVE_CDROM)
                pci->rc.hptrIcon = hptrCDROM;
              else
                pci->rc.hptrIcon = (driveflags[toupper(*pci->szFileName) - 'A'] & DRIVE_REMOVABLE) ?
                                    hptrRemovable :
                                    (driveflags[toupper(*pci->szFileName) - 'A'] & DRIVE_REMOTE) ?
                                    hptrRemote :
                                    (driveflags[toupper(*pci->szFileName) - 'A'] & DRIVE_ZIPSTREAM) ?
                                    hptrZipstrm : hptrDrive;
            }
            else
              pci->rc.hptrIcon = hptrFloppy;
          }
          WinSendMsg(hwndCnr,
                     CM_SETRECORDEMPHASIS,
                     MPFROMP(pci),
                     MPFROM2SHORT(FALSE,
                                  CRA_SELECTED | CRA_CURSORED));
        }
      }
      else {        /* add record */
        needtosort = TRUE;
        if(dcd->type == DIR_FRAME) {

          RECORDINSERT ri;
          ULONG        totalbytes;

          pci = WinSendMsg(hwndCnr,
                           CM_ALLOCRECORD,
                           MPFROMLONG(EXTRA_RECORD_BYTES),
                           MPFROMLONG(1L));
          if(pci) {
            ret = TRUE;
            *ffb.achName = 0;
            totalbytes = FillInRecordFromFFB(hwndCnr,
                                             pci,
                                             filename[x],
                                             &ffb,
                                             partial,
                                             dcd);
            if(strlen(pci->szFileName) < 4) {
              *pci->szFileName = toupper(*pci->szFileName);
              if(isalpha(*pci->szFileName) &&
                 toupper(*pci->szFileName) > 'B') {
                if(driveflags[toupper(*pci->szFileName) - 'A'] & DRIVE_CDROM)
                  pci->rc.hptrIcon = hptrCDROM;
                else
                  pci->rc.hptrIcon = (driveflags[toupper(*pci->szFileName) - 'A'] & DRIVE_REMOVABLE) ?
                                      hptrRemovable :
                                      (driveflags[toupper(*pci->szFileName) - 'A'] & DRIVE_REMOTE) ?
                                      hptrRemote :
                                      (driveflags[toupper(*pci->szFileName) - 'A'] & DRIVE_ZIPSTREAM) ?
                                      hptrZipstrm : hptrDrive;
              }
              else
                pci->rc.hptrIcon = hptrFloppy;
            }
            memset(&ri,0,sizeof(RECORDINSERT));
            ri.cb                 = sizeof(RECORDINSERT);
            ri.pRecordOrder       = (PRECORDCORE)CMA_END;
            ri.pRecordParent      = (PRECORDCORE)NULL;
            ri.zOrder             = (USHORT)CMA_TOP;
            ri.cRecordsInsert     = 1L;
            ri.fInvalidateRecord  = FALSE;
            if(WinSendMsg(hwndCnr,
                          CM_INSERTRECORD,
                          MPFROMP(pci),
                          MPFROMP(&ri))) {
              if(totalbytes != (ULONG)-1L &&
                 totalbytes) {
                dcd->totalbytes += totalbytes;
                numremain++;
              }
              repos = TRUE;
              if(pci->attrFile & FILE_DIRECTORY)
                Stubby(hwndCnr,pci);
            }
            else
              WinSendMsg(hwndCnr,
                         CM_FREERECORD,
                         MPFROMP(&pci),
                         MPFROMSHORT(1));
          }
        }
        else if(ffb.attrFile & FILE_DIRECTORY) {  /* check all parts and insert as required */

          CHAR    *p,temp;
          PCNRITEM pciParent = NULL,pciT;

          p = strchr(filename[x],'\\');
          if(p) {
            while(p && *p) {
              if(p < filename[x] + 3)
                p++;
              temp = *p;
              *p = 0;
              pciT = FindCnrRecord(hwndCnr,
                                   filename[x],
                                   NULL,
                                   partial,
                                   FALSE,
                                   TRUE);
              if(!pciT || (INT)pciT == -1) {
                pci = WinSendMsg(hwndCnr,
                                 CM_ALLOCRECORD,
                                 MPFROMLONG(EXTRA_RECORD_BYTES),
                                 MPFROMLONG(1L));
                if(pci) {

                  RECORDINSERT ri;
                  ULONG        totalbytes;

                  ret = TRUE;
                  *ffb.achName = 0;
                  totalbytes = FillInRecordFromFFB(hwndCnr,
                                                   pci,
                                                   filename[x],
                                                   &ffb,
                                                   partial,
                                                   dcd);
                  if(strlen(pci->szFileName) < 4) {
                    *pci->szFileName = toupper(*pci->szFileName);
                    if(isalpha(*pci->szFileName) &&
                       toupper(*pci->szFileName) > 'B') {
                      if(driveflags[toupper(*pci->szFileName) - 'A'] & DRIVE_CDROM)
                        pci->rc.hptrIcon = hptrCDROM;
                      else
                        pci->rc.hptrIcon = (driveflags[toupper(*pci->szFileName) - 'A'] & DRIVE_REMOVABLE) ?
                                            hptrRemovable :
                                            (driveflags[toupper(*pci->szFileName) - 'A'] & DRIVE_REMOTE) ?
                                            hptrRemote :
                                            (driveflags[toupper(*pci->szFileName) - 'A'] & DRIVE_ZIPSTREAM) ?
                                            hptrZipstrm : hptrDrive;
                    }
                    else
                      pci->rc.hptrIcon = hptrFloppy;
                  }
                  memset(&ri,0,sizeof(RECORDINSERT));
                  ri.cb                 = sizeof(RECORDINSERT);
                  ri.pRecordOrder       = (PRECORDCORE)CMA_END;
                  ri.pRecordParent      = (PRECORDCORE)pciParent;
                  ri.zOrder             = (USHORT)CMA_TOP;
                  ri.cRecordsInsert     = 1L;
                  ri.fInvalidateRecord  = FALSE;
                  if(WinSendMsg(hwndCnr,
                                CM_INSERTRECORD,
                                MPFROMP(pci),
                                MPFROMP(&ri))) {
                    if(totalbytes != (ULONG)-1L && totalbytes) {
                      numremain++;
                      if(dcd->type == DIR_FRAME)
                        dcd->totalbytes += totalbytes;
                    }
                    repos = TRUE;
                  }
                  else
                    WinSendMsg(hwndCnr,
                               CM_FREERECORD,
                               MPFROMP(&pci),
                               MPFROMSHORT(1));
                }
              }
              else
                pciParent = pciT;
              *p = temp;
              p = strchr(p + ((temp == '\\') ? 1 : 0),'\\');
            }
          }
          {
            pci = WinSendMsg(hwndCnr,
                             CM_ALLOCRECORD,
                             MPFROMLONG(EXTRA_RECORD_BYTES),
                             MPFROMLONG(1L));
            if(pci) {

              RECORDINSERT ri;
              ULONG        totalbytes;

              ret = TRUE;
              *ffb.achName = 0;
              totalbytes = FillInRecordFromFFB(hwndCnr,
                                               pci,
                                               filename[x],
                                               &ffb,
                                               partial,
                                               dcd);
              if(strlen(pci->szFileName) < 4) {
                *pci->szFileName = toupper(*pci->szFileName);
                if(isalpha(*pci->szFileName) &&
                   toupper(*pci->szFileName) > 'B') {
                  if(driveflags[toupper(*pci->szFileName) - 'A'] & DRIVE_CDROM)
                    pci->rc.hptrIcon = hptrCDROM;
                  else
                    pci->rc.hptrIcon = (driveflags[toupper(*pci->szFileName) - 'A'] & DRIVE_REMOVABLE) ?
                                        hptrRemovable :
                                        (driveflags[toupper(*pci->szFileName) - 'A'] & DRIVE_REMOTE) ?
                                        hptrRemote :
                                        (driveflags[toupper(*pci->szFileName) - 'A'] & DRIVE_ZIPSTREAM) ?
                                        hptrZipstrm : hptrDrive;
                }
                else
                  pci->rc.hptrIcon = hptrFloppy;
              }
              memset(&ri,0,sizeof(RECORDINSERT));
              ri.cb                 = sizeof(RECORDINSERT);
              ri.pRecordOrder       = (PRECORDCORE)CMA_END;
              ri.pRecordParent      = (PRECORDCORE)pciParent;
              ri.zOrder             = (USHORT)CMA_TOP;
              ri.cRecordsInsert     = 1L;
              ri.fInvalidateRecord  = FALSE;
              if(WinSendMsg(hwndCnr,
                            CM_INSERTRECORD,
                            MPFROMP(pci),
                            MPFROMP(&ri))) {
                if(totalbytes != (ULONG)-1L && totalbytes) {
                  numremain++;
                  if(dcd->type == DIR_FRAME)
                    dcd->totalbytes += totalbytes;
                }
                repos = TRUE;
                Stubby(hwndCnr,pci);
              }
              else
                WinSendMsg(hwndCnr,
                           CM_FREERECORD,
                           MPFROMP(&pci),
                           MPFROMSHORT(1));
            }
          }
        }
      }
    }
    else if((pci = FindCnrRecord(hwndCnr,
                                 filename[x],
                                 (PCNRITEM)NULL,
                                 partial,
                                 FALSE,
                                 TRUE)) !=  NULL &&
            (INT)pci != -1 && !IsRoot(pci->szFileName)) {
      /* file doesn't exist; delete record */
      if(pci->rc.flRecordAttr & CRA_SELECTED)
        WinSendMsg(hwndCnr,
                   CM_SETRECORDEMPHASIS,
                   MPFROMP(pci),
                   MPFROM2SHORT(FALSE,
                                CRA_SELECTED));
      if(dcd->type == DIR_FRAME)
        dcd->totalbytes -= (pci->cbFile + pci->easize);
      if(WinSendMsg(hwndCnr,
                    CM_REMOVERECORD,
                    MPFROMP(&pci),
                    MPFROM2SHORT(1,
                                 CMA_FREE |
                                  ((numremain == 1) ?
                                   CMA_INVALIDATE : 0)))) {
        numremain--;
        repos = TRUE;
      }
    }
  }
  if(repos || (pciList && numlist)) {

    QUERYRECORDRECT qrr;
    RECTL           rCnr,rCItem;

    pci = WinSendMsg(hwndCnr,
                     CM_QUERYRECORDEMPHASIS,
                     MPFROMLONG(CMA_FIRST),
                     MPFROMLONG(CRA_CURSORED));
    if(pci && (INT)pci != -1) {
      memset(&qrr, 0, sizeof(QUERYRECORDRECT));
      qrr.cb = sizeof(QUERYRECORDRECT);
      qrr.pRecord = (PRECORDCORE) pci;
      qrr.fRightSplitWindow = FALSE;
      qrr.fsExtent = CMA_TEXT;
      if(!WinSendMsg(hwndCnr,
                     CM_QUERYRECORDRECT,
                     MPFROMP(&rCItem),
                     MPFROMP(&qrr)))
        qrr.cb = 0;
    }
    if(pciList && numlist && !repos)
      WinSendMsg(hwndCnr,
                 CM_INVALIDATERECORD,
                 MPFROMP(pciList),
                 MPFROM2SHORT(numlist,((repos) ?
                                       CMA_NOREPOSITION :
                                       CMA_REPOSITION | CMA_ERASE)));
    if(repos)
      WinSendMsg(hwndCnr,
                 CM_INVALIDATERECORD,
                 MPVOID,
                 MPFROM2SHORT(0,
                              CMA_ERASE | CMA_REPOSITION));
    if(pci && (INT)pci != -1 && qrr.cb) {
      WinSendMsg(hwndCnr,
                 CM_QUERYVIEWPORTRECT,
                 MPFROMP(&rCnr),
                 MPFROM2SHORT(CMA_WINDOW,
                              (SHORT)FALSE));
      WinSendMsg(hwndCnr,
                 CM_SCROLLWINDOW,
                 MPFROMSHORT(CMA_VERTICAL),
                 MPFROMLONG(rCnr.yTop - rCItem.yTop));
    }
  }
  PostMsg(hwndCnr,
          UM_RESCAN,
          MPVOID,
          MPVOID);
  if(pciList) {
    free(pciList);
    DosPostEventSem(CompactSem);
  }
  return ret;
}