started moving tags to a private internal header
[reactos.git] / reactos / ntoskrnl / cc / view.c
index c6d9766..35266a1 100644 (file)
-/*
- *  ReactOS kernel
- *  Copyright (C) 1998, 1999, 2000, 2001 ReactOS Team
- *
- *  This program is free software; you can redistribute it and/or modify
- *  it under the terms of the GNU General Public License as published by
- *  the Free Software Foundation; either version 2 of the License, or
- *  (at your option) any later version.
- *
- *  This program is distributed in the hope that it will be useful,
- *  but WITHOUT ANY WARRANTY; without even the implied warranty of
- *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
- *  GNU General Public License for more details.
- *
- *  You should have received a copy of the GNU General Public License
- *  along with this program; if not, write to the Free Software
- *  Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
- */
-/* $Id: view.c,v 1.46 2002/08/14 20:58:32 dwelch Exp $
+/* $Id$
  *
+ * COPYRIGHT:       See COPYING in the top level directory
  * PROJECT:         ReactOS kernel
  * FILE:            ntoskrnl/cc/view.c
  * PURPOSE:         Cache manager
- * PROGRAMMER:      David Welch (welch@mcmail.com)
- * PORTABILITY:     Checked
- * UPDATE HISTORY:
- *                  Created 22/05/98
+ *
+ * PROGRAMMERS:     David Welch (welch@mcmail.com)
  */
 
 /* NOTES **********************************************************************
  *
- * This is not the NT implementation of a file cache nor anything much like 
- * it. 
+ * This is not the NT implementation of a file cache nor anything much like
+ * it.
  *
- * The general procedure for a filesystem to implement a read or write 
+ * The general procedure for a filesystem to implement a read or write
  * dispatch routine is as follows
- * 
+ *
  * (1) If caching for the FCB hasn't been initiated then so do by calling
  * CcInitializeFileCache.
- * 
+ *
  * (2) For each 4k region which is being read or written obtain a cache page
- * by calling CcRequestCachePage. 
+ * by calling CcRequestCachePage.
  *
- * (3) If either the page is being read or not completely written, and it is 
+ * (3) If either the page is being read or not completely written, and it is
  * not up to date then read its data from the underlying medium. If the read
- * fails then call CcReleaseCachePage with VALID as FALSE and return a error.  
- * 
+ * fails then call CcReleaseCachePage with VALID as FALSE and return a error.
+ *
  * (4) Copy the data into or out of the page as necessary.
- * 
+ *
  * (5) Release the cache page
  */
 /* INCLUDES ******************************************************************/
 
-#include <ddk/ntddk.h>
-#include <ddk/ntifs.h>
-#include <internal/mm.h>
-#include <internal/cc.h>
-#include <internal/pool.h>
-#include <ntos/minmax.h>
-
+#include <ntoskrnl.h>
 #define NDEBUG
 #include <internal/debug.h>
 
 /* GLOBALS *******************************************************************/
 
+/*
+ * If CACHE_BITMAP is defined, the cache manager uses one large memory region
+ * within the kernel address space and allocate/deallocate space from this block
+ * over a bitmap. If CACHE_BITMAP is used, the size of the mdl mapping region
+ * must be reduced (ntoskrnl\mm\mdl.c, MI_MDLMAPPING_REGION_SIZE).
+ */
+//#define CACHE_BITMAP
+
 #define ROUND_UP(N, S) ((((N) + (S) - 1) / (S)) * (S))
 #define ROUND_DOWN(N, S) (((N) % (S)) ? ROUND_UP(N, S) - S : N)
 
-#define TAG_CSEG  TAG('C', 'S', 'E', 'G')
-#define TAG_BCB   TAG('B', 'C', 'B', ' ')
-
 static LIST_ENTRY DirtySegmentListHead;
 static LIST_ENTRY CacheSegmentListHead;
 static LIST_ENTRY CacheSegmentLRUListHead;
+static LIST_ENTRY ClosedListHead;
+ULONG DirtyPageCount=0;
 
-static FAST_MUTEX ViewLock;
+FAST_MUTEX ViewLock;
 
-NTSTATUS STDCALL
-CcRosInternalFreeCacheSegment(PBCB Bcb, PCACHE_SEGMENT CacheSeg);
+#ifdef CACHE_BITMAP
+#define        CI_CACHESEG_MAPPING_REGION_SIZE (128*1024*1024)
+
+static PVOID CiCacheSegMappingRegionBase = NULL;
+static RTL_BITMAP CiCacheSegMappingRegionAllocMap;
+static ULONG CiCacheSegMappingRegionHint;
+static KSPIN_LOCK CiCacheSegMappingRegionLock;
+#endif
+
+NPAGED_LOOKASIDE_LIST iBcbLookasideList;
+static NPAGED_LOOKASIDE_LIST BcbLookasideList;
+static NPAGED_LOOKASIDE_LIST CacheSegLookasideList;
+
+static ULONG CcTimeStamp;
+static KEVENT LazyCloseThreadEvent;
+static HANDLE LazyCloseThreadHandle;
+static CLIENT_ID LazyCloseThreadId;
+static volatile BOOLEAN LazyCloseThreadShouldTerminate;
+
+#if defined(__GNUC__)
+/* void * alloca(size_t size); */
+#elif defined(_MSC_VER)
+void* _alloca(size_t size);
+#else
+#error Unknown compiler for alloca intrinsic stack allocation "function"
+#endif
+
+
+NTSTATUS
+CcRosInternalFreeCacheSegment(PCACHE_SEGMENT CacheSeg);
 
 /* FUNCTIONS *****************************************************************/
 
-NTSTATUS STATIC
+NTSTATUS
 CcRosFlushCacheSegment(PCACHE_SEGMENT CacheSegment)
 {
   NTSTATUS Status;
+  KIRQL oldIrql;
   Status = WriteCacheSegment(CacheSegment);
   if (NT_SUCCESS(Status))
     {
+      ExAcquireFastMutex(&ViewLock);
+      KeAcquireSpinLock(&CacheSegment->Bcb->BcbLock, &oldIrql);
       CacheSegment->Dirty = FALSE;
       RemoveEntryList(&CacheSegment->DirtySegmentListEntry);
+      DirtyPageCount -= CacheSegment->Bcb->CacheSegmentSize / PAGE_SIZE;
+      CacheSegment->ReferenceCount--;
+      KeReleaseSpinLock(&CacheSegment->Bcb->BcbLock, oldIrql);
+      ExReleaseFastMutex(&ViewLock);
     }
   return(Status);
 }
@@ -101,16 +118,43 @@ CcRosFlushDirtyPages(ULONG Target, PULONG Count)
   ULONG PagesPerSegment;
   BOOLEAN Locked;
   NTSTATUS Status;
+  static ULONG WriteCount[4] = {0, 0, 0, 0};
+  ULONG NewTarget;
 
   DPRINT("CcRosFlushDirtyPages(Target %d)\n", Target);
 
   (*Count) = 0;
 
   ExAcquireFastMutex(&ViewLock);
+
+  WriteCount[0] = WriteCount[1];
+  WriteCount[1] = WriteCount[2];
+  WriteCount[2] = WriteCount[3];
+  WriteCount[3] = 0;
+
+  NewTarget = WriteCount[0] + WriteCount[1] + WriteCount[2];
+
+  if (NewTarget < DirtyPageCount)
+  {
+     NewTarget = (DirtyPageCount - NewTarget + 3) / 4;
+     WriteCount[0] += NewTarget;
+     WriteCount[1] += NewTarget;
+     WriteCount[2] += NewTarget;
+     WriteCount[3] += NewTarget;
+  }
+
+  NewTarget = WriteCount[0];
+
+  Target = max(NewTarget, Target);
+
   current_entry = DirtySegmentListHead.Flink;
+  if (current_entry == &DirtySegmentListHead)
+  {
+     DPRINT("No Dirty pages\n");
+  }
   while (current_entry != &DirtySegmentListHead && Target > 0)
     {
-      current = CONTAINING_RECORD(current_entry, CACHE_SEGMENT, 
+      current = CONTAINING_RECORD(current_entry, CACHE_SEGMENT,
                                  DirtySegmentListEntry);
       current_entry = current_entry->Flink;
       Locked = ExTryToAcquireFastMutex(&current->Lock);
@@ -118,30 +162,35 @@ CcRosFlushDirtyPages(ULONG Target, PULONG Count)
        {
          continue;
        }
-      assert(current->Dirty);
-      if (current->ReferenceCount > 0)
+      ASSERT(current->Dirty);
+      if (current->ReferenceCount > 1)
        {
          ExReleaseFastMutex(&current->Lock);
          continue;
        }
-      current->ReferenceCount++;
       ExReleaseFastMutex(&ViewLock);
-      PagesPerSegment = current->Bcb->CacheSegmentSize / PAGESIZE;
-      Status = CcRosFlushCacheSegment(current);      
-      current->ReferenceCount--;
+      PagesPerSegment = current->Bcb->CacheSegmentSize / PAGE_SIZE;
+      Status = CcRosFlushCacheSegment(current);
       ExReleaseFastMutex(&current->Lock);
-      if (!NT_SUCCESS(Status))
-       {
-         DPRINT1("CC: Failed to flush cache segment.\n");
-       }      
-      (*Count) += PagesPerSegment;
-      Target -= PagesPerSegment;     
-
+      if (!NT_SUCCESS(Status) &&  (Status != STATUS_END_OF_FILE))
+      {
+        DPRINT1("CC: Failed to flush cache segment.\n");
+      }
+      else
+      {
+         (*Count) += PagesPerSegment;
+         Target -= PagesPerSegment;
+      }
       ExAcquireFastMutex(&ViewLock);
       current_entry = DirtySegmentListHead.Flink;
     }
+  if (*Count < NewTarget)
+  {
+     WriteCount[1] += (NewTarget - *Count);
+  }
   ExReleaseFastMutex(&ViewLock);
-  DPRINT("CcRosTrimCache() finished\n");
+  DPRINT("CcRosFlushDirtyPages() finished\n");
+
   return(STATUS_SUCCESS);
 }
 
@@ -152,54 +201,92 @@ CcRosTrimCache(ULONG Target, ULONG Priority, PULONG NrFreed)
  * ARGUMENTS:
  *       Target - The number of pages to be freed.
  *       Priority - The priority of free (currently unused).
- *       NrFreed - Points to a variable where the number of pages 
+ *       NrFreed - Points to a variable where the number of pages
  *                 actually freed is returned.
  */
 {
   PLIST_ENTRY current_entry;
-  PCACHE_SEGMENT current;
+  PCACHE_SEGMENT current, last = NULL;
   ULONG PagesPerSegment;
   ULONG PagesFreed;
-  BOOLEAN Locked;
+  KIRQL oldIrql;
+  LIST_ENTRY FreeList;
 
   DPRINT("CcRosTrimCache(Target %d)\n", Target);
 
   *NrFreed = 0;
 
+  InitializeListHead(&FreeList);
+
   ExAcquireFastMutex(&ViewLock);
   current_entry = CacheSegmentLRUListHead.Flink;
   while (current_entry != &CacheSegmentLRUListHead && Target > 0)
     {
-      current = CONTAINING_RECORD(current_entry, CACHE_SEGMENT, 
+      current = CONTAINING_RECORD(current_entry, CACHE_SEGMENT,
                                  CacheSegmentLRUListEntry);
       current_entry = current_entry->Flink;
-      Locked = ExTryToAcquireFastMutex(&current->Lock);
-      if (!Locked)
-       {
-         continue;
-       }
-      if (current->MappedCount > 0 || current->Dirty || 
-         current->ReferenceCount > 0)
-       {
-         ExReleaseFastMutex(&current->Lock);
-         continue;
-       }
-      ExReleaseFastMutex(&current->Lock);
-      DPRINT("current->Bcb->CacheSegmentSize %d\n", 
-            current->Bcb->CacheSegmentSize);
-      PagesPerSegment = current->Bcb->CacheSegmentSize / PAGESIZE;
-      CcRosInternalFreeCacheSegment(current->Bcb, current);      
-      DPRINT("CcRosTrimCache(): Freed %d\n", PagesPerSegment);
-      PagesFreed = min(PagesPerSegment, Target);
-      Target = Target - PagesFreed;
-      (*NrFreed) = (*NrFreed) + PagesFreed;
-    }
+
+      KeAcquireSpinLock(&current->Bcb->BcbLock, &oldIrql);
+      if (current->ReferenceCount == 0)
+      {
+         RemoveEntryList(&current->BcbSegmentListEntry);
+         KeReleaseSpinLock(&current->Bcb->BcbLock, oldIrql);
+         RemoveEntryList(&current->CacheSegmentListEntry);
+         RemoveEntryList(&current->CacheSegmentLRUListEntry);
+        InsertHeadList(&FreeList, &current->BcbSegmentListEntry);
+         PagesPerSegment = current->Bcb->CacheSegmentSize / PAGE_SIZE;
+         PagesFreed = min(PagesPerSegment, Target);
+         Target -= PagesFreed;
+         (*NrFreed) += PagesFreed;
+      }
+      else
+      {
+         if (last != current && current->MappedCount > 0 && !current->Dirty && !current->PageOut)
+          {
+            ULONG i;
+            NTSTATUS Status;
+
+             current->ReferenceCount++;
+            last = current;
+            current->PageOut = TRUE;
+             KeReleaseSpinLock(&current->Bcb->BcbLock, oldIrql);
+            ExReleaseFastMutex(&ViewLock);
+            for (i = 0; i < current->Bcb->CacheSegmentSize / PAGE_SIZE; i++)
+              {
+                PFN_TYPE Page;
+                Page = MmGetPhysicalAddress((char*)current->BaseAddress + i * PAGE_SIZE).QuadPart >> PAGE_SHIFT;
+                 Status = MmPageOutPhysicalAddress(Page);
+                if (!NT_SUCCESS(Status))
+                  {
+                    break;
+                  }
+              }
+             ExAcquireFastMutex(&ViewLock);
+             KeAcquireSpinLock(&current->Bcb->BcbLock, &oldIrql);
+            current->ReferenceCount--;
+            current->PageOut = FALSE;
+             KeReleaseSpinLock(&current->Bcb->BcbLock, oldIrql);
+             current_entry = &current->CacheSegmentLRUListEntry;
+            continue;
+          }
+        KeReleaseSpinLock(&current->Bcb->BcbLock, oldIrql);
+      }
+  }
   ExReleaseFastMutex(&ViewLock);
+
+  while (!IsListEmpty(&FreeList))
+  {
+     current_entry = RemoveHeadList(&FreeList);
+     current = CONTAINING_RECORD(current_entry, CACHE_SEGMENT,
+                                BcbSegmentListEntry);
+     CcRosInternalFreeCacheSegment(current);
+  }
+
   DPRINT("CcRosTrimCache() finished\n");
   return(STATUS_SUCCESS);
 }
 
-NTSTATUS STDCALL 
+NTSTATUS
 CcRosReleaseCacheSegment(PBCB Bcb,
                         PCACHE_SEGMENT CacheSeg,
                         BOOLEAN Valid,
@@ -207,49 +294,69 @@ CcRosReleaseCacheSegment(PBCB Bcb,
                         BOOLEAN Mapped)
 {
   BOOLEAN WasDirty = CacheSeg->Dirty;
+  KIRQL oldIrql;
 
-  DPRINT("CcReleaseCachePage(Bcb %x, CacheSeg %x, Valid %d)\n",
+  ASSERT(Bcb);
+
+  DPRINT("CcReleaseCacheSegment(Bcb %x, CacheSeg %x, Valid %d)\n",
         Bcb, CacheSeg, Valid);
-  
+
   CacheSeg->Valid = Valid;
   CacheSeg->Dirty = CacheSeg->Dirty || Dirty;
-  if (Mapped)
-    {
-      CacheSeg->MappedCount++;
-    }
-  ExReleaseFastMutex(&CacheSeg->Lock);
+
   ExAcquireFastMutex(&ViewLock);
   if (!WasDirty && CacheSeg->Dirty)
     {
       InsertTailList(&DirtySegmentListHead, &CacheSeg->DirtySegmentListEntry);
+      DirtyPageCount += Bcb->CacheSegmentSize / PAGE_SIZE;
     }
   RemoveEntryList(&CacheSeg->CacheSegmentLRUListEntry);
-  InsertTailList(&CacheSegmentLRUListHead, 
-                &CacheSeg->CacheSegmentLRUListEntry);
+  InsertTailList(&CacheSegmentLRUListHead, &CacheSeg->CacheSegmentLRUListEntry);
+
+  if (Mapped)
+  {
+     CacheSeg->MappedCount++;
+  }
+  KeAcquireSpinLock(&Bcb->BcbLock, &oldIrql);
+  CacheSeg->ReferenceCount--;
+  if (Mapped && CacheSeg->MappedCount == 1)
+  {
+      CacheSeg->ReferenceCount++;
+  }
+  if (!WasDirty && CacheSeg->Dirty)
+  {
+      CacheSeg->ReferenceCount++;
+  }
+  KeReleaseSpinLock(&Bcb->BcbLock, oldIrql);
   ExReleaseFastMutex(&ViewLock);
-  InterlockedDecrement(&CacheSeg->ReferenceCount);
-  
-  DPRINT("CcReleaseCachePage() finished\n");
-  
+  ExReleaseFastMutex(&CacheSeg->Lock);
+
   return(STATUS_SUCCESS);
 }
 
-PCACHE_SEGMENT CcRosLookupCacheSegment(PBCB Bcb, ULONG FileOffset)
+PCACHE_SEGMENT
+CcRosLookupCacheSegment(PBCB Bcb, ULONG FileOffset)
 {
   PLIST_ENTRY current_entry;
   PCACHE_SEGMENT current;
   KIRQL oldIrql;
 
+  ASSERT(Bcb);
+
+  DPRINT("CcRosLookupCacheSegment(Bcb %x, FileOffset %d)\n", Bcb, FileOffset);
+
   KeAcquireSpinLock(&Bcb->BcbLock, &oldIrql);
   current_entry = Bcb->BcbSegmentListHead.Flink;
   while (current_entry != &Bcb->BcbSegmentListHead)
     {
-      current = CONTAINING_RECORD(current_entry, CACHE_SEGMENT, 
+      current = CONTAINING_RECORD(current_entry, CACHE_SEGMENT,
                                  BcbSegmentListEntry);
       if (current->FileOffset <= FileOffset &&
          (current->FileOffset + Bcb->CacheSegmentSize) > FileOffset)
        {
+         current->ReferenceCount++;
          KeReleaseSpinLock(&Bcb->BcbLock, oldIrql);
+          ExAcquireFastMutex(&current->Lock);
          return(current);
        }
       current_entry = current_entry->Flink;
@@ -262,50 +369,35 @@ NTSTATUS
 CcRosMarkDirtyCacheSegment(PBCB Bcb, ULONG FileOffset)
 {
   PCACHE_SEGMENT CacheSeg;
+  KIRQL oldIrql;
+
+  ASSERT(Bcb);
+
+  DPRINT("CcRosMarkDirtyCacheSegment(Bcb %x, FileOffset %d)\n", Bcb, FileOffset);
 
-  ExAcquireFastMutex(&ViewLock);
   CacheSeg = CcRosLookupCacheSegment(Bcb, FileOffset);
   if (CacheSeg == NULL)
     {
-      KeBugCheck(0);
+      KEBUGCHECKCC;
     }
-  ExAcquireFastMutex(&CacheSeg->Lock);
   if (!CacheSeg->Dirty)
     {
+      ExAcquireFastMutex(&ViewLock);
       InsertTailList(&DirtySegmentListHead, &CacheSeg->DirtySegmentListEntry);
+      DirtyPageCount += Bcb->CacheSegmentSize / PAGE_SIZE;
+      ExReleaseFastMutex(&ViewLock);
     }
-  CacheSeg->Dirty = TRUE;
-  ExReleaseFastMutex(&CacheSeg->Lock);
-  ExReleaseFastMutex(&ViewLock);
-  return(STATUS_SUCCESS);
-}
+  else
+  {
+     KeAcquireSpinLock(&Bcb->BcbLock, &oldIrql);
+     CacheSeg->ReferenceCount--;
+     KeReleaseSpinLock(&Bcb->BcbLock, oldIrql);
+  }
 
-NTSTATUS
-CcRosSuggestFreeCacheSegment(PBCB Bcb, ULONG FileOffset, BOOLEAN NowDirty)
-{
-  PCACHE_SEGMENT CacheSeg;
 
-  ExAcquireFastMutex(&ViewLock);
-  CacheSeg = CcRosLookupCacheSegment(Bcb, FileOffset);
-  if (CacheSeg == NULL)
-    {
-      KeBugCheck(0);
-    }
-  ExAcquireFastMutex(&CacheSeg->Lock);
-  if (CacheSeg->MappedCount > 0)
-    {
-      KeBugCheck(0);
-    }
-  CacheSeg->Dirty = CacheSeg->Dirty || NowDirty;
-  if (CacheSeg->Dirty || CacheSeg->ReferenceCount > 0)
-    {
-      ExReleaseFastMutex(&CacheSeg->Lock);
-      ExReleaseFastMutex(&ViewLock);
-      return(STATUS_UNSUCCESSFUL);
-    }
+  CacheSeg->Dirty = TRUE;
   ExReleaseFastMutex(&CacheSeg->Lock);
-  CcRosInternalFreeCacheSegment(CacheSeg->Bcb, CacheSeg);
-  ExReleaseFastMutex(&ViewLock);
+
   return(STATUS_SUCCESS);
 }
 
@@ -313,20 +405,45 @@ NTSTATUS
 CcRosUnmapCacheSegment(PBCB Bcb, ULONG FileOffset, BOOLEAN NowDirty)
 {
   PCACHE_SEGMENT CacheSeg;
+  BOOLEAN WasDirty;
+  KIRQL oldIrql;
+
+  ASSERT(Bcb);
+
+  DPRINT("CcRosUnmapCacheSegment(Bcb %x, FileOffset %d, NowDirty %d)\n",
+          Bcb, FileOffset, NowDirty);
 
-  ExAcquireFastMutex(&ViewLock);
   CacheSeg = CcRosLookupCacheSegment(Bcb, FileOffset);
   if (CacheSeg == NULL)
     {
-      ExReleaseFastMutex(&ViewLock);
       return(STATUS_UNSUCCESSFUL);
     }
-  CacheSeg->ReferenceCount++;
-  ExReleaseFastMutex(&ViewLock);
-  ExAcquireFastMutex(&CacheSeg->Lock);
-  CacheSeg->MappedCount--;
+
+  WasDirty = CacheSeg->Dirty;
   CacheSeg->Dirty = CacheSeg->Dirty || NowDirty;
+
+  CacheSeg->MappedCount--;
+
+  if (!WasDirty && NowDirty)
+  {
+     ExAcquireFastMutex(&ViewLock);
+     InsertTailList(&DirtySegmentListHead, &CacheSeg->DirtySegmentListEntry);
+     DirtyPageCount += Bcb->CacheSegmentSize / PAGE_SIZE;
+     ExReleaseFastMutex(&ViewLock);
+  }
+
+  KeAcquireSpinLock(&Bcb->BcbLock, &oldIrql);
   CacheSeg->ReferenceCount--;
+  if (!WasDirty && NowDirty)
+  {
+     CacheSeg->ReferenceCount++;
+  }
+  if (CacheSeg->MappedCount == 0)
+  {
+     CacheSeg->ReferenceCount--;
+  }
+  KeReleaseSpinLock(&Bcb->BcbLock, oldIrql);
+
   ExReleaseFastMutex(&CacheSeg->Lock);
   return(STATUS_SUCCESS);
 }
@@ -334,74 +451,157 @@ CcRosUnmapCacheSegment(PBCB Bcb, ULONG FileOffset, BOOLEAN NowDirty)
 NTSTATUS STATIC
 CcRosCreateCacheSegment(PBCB Bcb,
                        ULONG FileOffset,
-                       PCACHE_SEGMENT* CacheSeg,
-                       BOOLEAN Lock)
+                       PCACHE_SEGMENT* CacheSeg)
 {
   ULONG i;
   PCACHE_SEGMENT current;
+  PCACHE_SEGMENT previous;
+  PLIST_ENTRY current_entry;
   NTSTATUS Status;
   KIRQL oldIrql;
+  PPFN_TYPE Pfn;
+#ifdef CACHE_BITMAP
+  ULONG StartingOffset;
+#else
+#endif
+  PHYSICAL_ADDRESS BoundaryAddressMultiple;
 
-  current = ExAllocatePoolWithTag(NonPagedPool, sizeof(CACHE_SEGMENT), 
-                                 TAG_CSEG);
+  ASSERT(Bcb);
 
-  MmLockAddressSpace(MmGetKernelAddressSpace());
-  current->BaseAddress = NULL;
-  Status = MmCreateMemoryArea(KernelMode,
-                             MmGetKernelAddressSpace(),
-                             MEMORY_AREA_CACHE_SEGMENT,
-                             &current->BaseAddress,
-                             Bcb->CacheSegmentSize,
-                             PAGE_READWRITE,
-                             (PMEMORY_AREA*)&current->MemoryArea,
-                             FALSE);
-  if (!NT_SUCCESS(Status))
-    {
-      MmUnlockAddressSpace(MmGetKernelAddressSpace());
-      KeBugCheck(0);
-    }
-  MmUnlockAddressSpace(MmGetKernelAddressSpace());
+  DPRINT("CcRosCreateCacheSegment()\n");
+
+  BoundaryAddressMultiple.QuadPart = 0;
+  if (FileOffset >= Bcb->FileSize.u.LowPart)
+  {
+     CacheSeg = NULL;
+     return STATUS_INVALID_PARAMETER;
+  }
+
+  current = ExAllocateFromNPagedLookasideList(&CacheSegLookasideList);
   current->Valid = FALSE;
   current->Dirty = FALSE;
+  current->PageOut = FALSE;
   current->FileOffset = ROUND_DOWN(FileOffset, Bcb->CacheSegmentSize);
   current->Bcb = Bcb;
   current->MappedCount = 0;
-  ExInitializeFastMutex(&current->Lock);
+  current->DirtySegmentListEntry.Flink = NULL;
+  current->DirtySegmentListEntry.Blink = NULL;
   current->ReferenceCount = 1;
+  ExInitializeFastMutex(&current->Lock);
+  ExAcquireFastMutex(&current->Lock);
+  ExAcquireFastMutex(&ViewLock);
+
+  *CacheSeg = current;
+  /* There is window between the call to CcRosLookupCacheSegment
+   * and CcRosCreateCacheSegment. We must check if a segment on
+   * the fileoffset exist. If there exist a segment, we release
+   * our new created segment and return the existing one.
+   */
   KeAcquireSpinLock(&Bcb->BcbLock, &oldIrql);
-  InsertTailList(&Bcb->BcbSegmentListHead, &current->BcbSegmentListEntry);
-  KeReleaseSpinLock(&Bcb->BcbLock, oldIrql);
-  InsertTailList(&CacheSegmentListHead, &current->CacheSegmentListEntry);
-  InsertTailList(&CacheSegmentLRUListHead, 
-                &current->CacheSegmentLRUListEntry);
-  current->DirtySegmentListEntry.Flink = 
-    current->DirtySegmentListEntry.Blink = NULL;
-  if (Lock)
-    {
-      ExAcquireFastMutex(&current->Lock);
-    }
-  ExReleaseFastMutex(&ViewLock);
-  for (i = 0; i < (Bcb->CacheSegmentSize / PAGESIZE); i++)
-    {
-      PHYSICAL_ADDRESS Page;
-      
-      Status = MmRequestPageMemoryConsumer(MC_CACHE, TRUE, &Page);
-      if (!NT_SUCCESS(Status))
+  current_entry = Bcb->BcbSegmentListHead.Flink;
+  previous = NULL;
+  while (current_entry != &Bcb->BcbSegmentListHead)
+  {
+     current = CONTAINING_RECORD(current_entry, CACHE_SEGMENT,
+                                BcbSegmentListEntry);
+     if (current->FileOffset <= FileOffset &&
+       (current->FileOffset + Bcb->CacheSegmentSize) > FileOffset)
+     {
+       current->ReferenceCount++;
+       KeReleaseSpinLock(&Bcb->BcbLock, oldIrql);
+       ExReleaseFastMutex(&(*CacheSeg)->Lock);
+       ExReleaseFastMutex(&ViewLock);
+       ExFreeToNPagedLookasideList(&CacheSegLookasideList, *CacheSeg);
+       *CacheSeg = current;
+        ExAcquireFastMutex(&current->Lock);
+       return STATUS_SUCCESS;
+     }
+     if (current->FileOffset < FileOffset)
+     {
+        if (previous == NULL)
        {
-         KeBugCheck(0);
+          previous = current;
        }
-      
-      Status = MmCreateVirtualMapping(NULL,
-                                     current->BaseAddress + (i * PAGESIZE),
-                                     PAGE_READWRITE,
-                                     Page,
-                                     TRUE);
-      if (!NT_SUCCESS(Status))
+       else
        {
-         KeBugCheck(0);
+          if (previous->FileOffset < current->FileOffset)
+          {
+             previous = current;
+          }
        }
-    }
-  *CacheSeg = current;
+     }
+     current_entry = current_entry->Flink;
+  }
+  /* There was no existing segment. */
+  current = *CacheSeg;
+  if (previous)
+  {
+     InsertHeadList(&previous->BcbSegmentListEntry, &current->BcbSegmentListEntry);
+  }
+  else
+  {
+     InsertHeadList(&Bcb->BcbSegmentListHead, &current->BcbSegmentListEntry);
+  }
+  KeReleaseSpinLock(&Bcb->BcbLock, oldIrql);
+  InsertTailList(&CacheSegmentListHead, &current->CacheSegmentListEntry);
+  InsertTailList(&CacheSegmentLRUListHead, &current->CacheSegmentLRUListEntry);
+  ExReleaseFastMutex(&ViewLock);
+#ifdef CACHE_BITMAP
+  KeAcquireSpinLock(&CiCacheSegMappingRegionLock, &oldIrql);
+
+  StartingOffset = RtlFindClearBitsAndSet(&CiCacheSegMappingRegionAllocMap, Bcb->CacheSegmentSize / PAGE_SIZE, CiCacheSegMappingRegionHint);
+
+  if (StartingOffset == 0xffffffff)
+  {
+     DPRINT1("Out of CacheSeg mapping space\n");
+     KEBUGCHECKCC;
+  }
+
+  current->BaseAddress = CiCacheSegMappingRegionBase + StartingOffset * PAGE_SIZE;
+
+  if (CiCacheSegMappingRegionHint == StartingOffset)
+  {
+     CiCacheSegMappingRegionHint += Bcb->CacheSegmentSize / PAGE_SIZE;
+  }
+
+  KeReleaseSpinLock(&CiCacheSegMappingRegionLock, oldIrql);
+#else
+  MmLockAddressSpace(MmGetKernelAddressSpace());
+  current->BaseAddress = NULL;
+  Status = MmCreateMemoryArea(NULL,
+                             MmGetKernelAddressSpace(),
+                             MEMORY_AREA_CACHE_SEGMENT,
+                             &current->BaseAddress,
+                             Bcb->CacheSegmentSize,
+                             PAGE_READWRITE,
+                             (PMEMORY_AREA*)&current->MemoryArea,
+                             FALSE,
+                             FALSE,
+                             BoundaryAddressMultiple);
+  MmUnlockAddressSpace(MmGetKernelAddressSpace());
+  if (!NT_SUCCESS(Status))
+  {
+     KEBUGCHECKCC;
+  }
+#endif
+  Pfn = alloca(sizeof(PFN_TYPE) * (Bcb->CacheSegmentSize / PAGE_SIZE));
+  for (i = 0; i < (Bcb->CacheSegmentSize / PAGE_SIZE); i++)
+  {
+     Status = MmRequestPageMemoryConsumer(MC_CACHE, TRUE, &Pfn[i]);
+     if (!NT_SUCCESS(Status))
+     {
+       KEBUGCHECKCC;
+     }
+  }
+  Status = MmCreateVirtualMapping(NULL,
+                                 current->BaseAddress,
+                                 PAGE_READWRITE,
+                                 Pfn,
+                                 Bcb->CacheSegmentSize / PAGE_SIZE);
+  if (!NT_SUCCESS(Status))
+  {
+    KEBUGCHECKCC;
+  }
   return(STATUS_SUCCESS);
 }
 
@@ -414,18 +614,24 @@ CcRosGetCacheSegmentChain(PBCB Bcb,
   PCACHE_SEGMENT current;
   ULONG i;
   PCACHE_SEGMENT* CacheSegList;
-  PCACHE_SEGMENT Previous;
+  PCACHE_SEGMENT Previous = NULL;
+
+  ASSERT(Bcb);
+
+  DPRINT("CcRosGetCacheSegmentChain()\n");
 
   Length = ROUND_UP(Length, Bcb->CacheSegmentSize);
 
-  CacheSegList = alloca(sizeof(PCACHE_SEGMENT) * 
+#if defined(__GNUC__)
+  CacheSegList = alloca(sizeof(PCACHE_SEGMENT) *
+                       (Length / Bcb->CacheSegmentSize));
+#elif defined(_MSC_VER)
+  CacheSegList = _alloca(sizeof(PCACHE_SEGMENT) *
                        (Length / Bcb->CacheSegmentSize));
+#else
+#error Unknown compiler for alloca intrinsic stack allocation "function"
+#endif
 
-  /*
-   * Acquire the global lock.
-   */
-  ExAcquireFastMutex(&ViewLock);
-  
   /*
    * Look for a cache segment already mapping the same data.
    */
@@ -435,24 +641,17 @@ CcRosGetCacheSegmentChain(PBCB Bcb,
       current = CcRosLookupCacheSegment(Bcb, CurrentOffset);
       if (current != NULL)
        {
-         /*
-          * Make sure the cache segment can't go away outside of our control.
-          */
-         current->ReferenceCount++;
          CacheSegList[i] = current;
        }
       else
        {
-         CcRosCreateCacheSegment(Bcb, CurrentOffset, &current, FALSE);
+         CcRosCreateCacheSegment(Bcb, CurrentOffset, &current);
          CacheSegList[i] = current;
-         ExAcquireFastMutex(&ViewLock);
        }
     }
-  ExReleaseFastMutex(&ViewLock);
 
   for (i = 0; i < (Length / Bcb->CacheSegmentSize); i++)
     {
-      ExAcquireFastMutex(&CacheSegList[i]->Lock);
       if (i == 0)
        {
          *CacheSeg = CacheSegList[i];
@@ -465,7 +664,7 @@ CcRosGetCacheSegmentChain(PBCB Bcb,
        }
     }
   Previous->NextInChain = NULL;
-  
+
   return(STATUS_SUCCESS);
 }
 
@@ -480,51 +679,37 @@ CcRosGetCacheSegment(PBCB Bcb,
    PCACHE_SEGMENT current;
    NTSTATUS Status;
 
-   /*
-    * Acquire the global lock.
-    */
-   ExAcquireFastMutex(&ViewLock);
+   ASSERT(Bcb);
+
+   DPRINT("CcRosGetCacheSegment()\n");
 
    /*
     * Look for a cache segment already mapping the same data.
     */
    current = CcRosLookupCacheSegment(Bcb, FileOffset);
-   if (current != NULL)
-     {
-       /*
-       * Make sure the cache segment can't go away outside of our control.
-       */
-       current->ReferenceCount++;
-       /*
-       * Release the global lock and lock the cache segment.
-       */
-       ExReleaseFastMutex(&ViewLock);
-       ExAcquireFastMutex(&current->Lock);
-       /*
-       * Return information about the segment to the caller.
-       */
-       *UptoDate = current->Valid;
-       *BaseAddress = current->BaseAddress;
-       DPRINT("*BaseAddress 0x%.8X\n", *BaseAddress);
-       *CacheSeg = current;
-       *BaseOffset = current->FileOffset;
-       return(STATUS_SUCCESS);
-     }
-
+   if (current == NULL)
+   {
+     /*
+      * Otherwise create a new segment.
+      */
+      Status = CcRosCreateCacheSegment(Bcb, FileOffset, &current);
+      if (!NT_SUCCESS(Status))
+      {
+       return Status;
+      }
+   }
    /*
-    * Otherwise create a new segment.
+    * Return information about the segment to the caller.
     */
-   Status = CcRosCreateCacheSegment(Bcb, FileOffset, &current, TRUE);
    *UptoDate = current->Valid;
    *BaseAddress = current->BaseAddress;
    DPRINT("*BaseAddress 0x%.8X\n", *BaseAddress);
    *CacheSeg = current;
    *BaseOffset = current->FileOffset;
-   
    return(STATUS_SUCCESS);
 }
 
-NTSTATUS STDCALL 
+NTSTATUS STDCALL
 CcRosRequestCacheSegment(PBCB Bcb,
                      ULONG FileOffset,
                      PVOID* BaseAddress,
@@ -535,12 +720,14 @@ CcRosRequestCacheSegment(PBCB Bcb,
  */
 {
   ULONG BaseOffset;
-   
+
+  ASSERT(Bcb);
+
   if ((FileOffset % Bcb->CacheSegmentSize) != 0)
     {
       CPRINT("Bad fileoffset %x should be multiple of %x",
         FileOffset, Bcb->CacheSegmentSize);
-      KeBugCheck(0);
+      KEBUGCHECKCC;
     }
 
   return(CcRosGetCacheSegment(Bcb,
@@ -550,50 +737,175 @@ CcRosRequestCacheSegment(PBCB Bcb,
                           UptoDate,
                           CacheSeg));
 }
-
-STATIC VOID 
-CcFreeCachePage(PVOID Context, MEMORY_AREA* MemoryArea, PVOID Address, 
-               PHYSICAL_ADDRESS PhysAddr, SWAPENTRY SwapEntry, BOOLEAN Dirty)
+#ifdef CACHE_BITMAP
+#else
+STATIC VOID
+CcFreeCachePage(PVOID Context, MEMORY_AREA* MemoryArea, PVOID Address,
+               PFN_TYPE Page, SWAPENTRY SwapEntry, BOOLEAN Dirty)
 {
-  assert(SwapEntry == 0);
-  if (PhysAddr.QuadPart != 0)
+  ASSERT(SwapEntry == 0);
+  if (Page != 0)
     {
-      MmReleasePageMemoryConsumer(MC_CACHE, PhysAddr);
+      MmReleasePageMemoryConsumer(MC_CACHE, Page);
     }
 }
-
-NTSTATUS STDCALL 
-CcRosInternalFreeCacheSegment(PBCB Bcb, PCACHE_SEGMENT CacheSeg)
+#endif
+NTSTATUS
+CcRosInternalFreeCacheSegment(PCACHE_SEGMENT CacheSeg)
 /*
  * FUNCTION: Releases a cache segment associated with a BCB
  */
 {
+#ifdef CACHE_BITMAP
+  ULONG i;
+  ULONG RegionSize;
+  ULONG Base;
+  PFN_TYPE Page;
+  KIRQL oldIrql;
+#endif
   DPRINT("Freeing cache segment %x\n", CacheSeg);
-  RemoveEntryList(&CacheSeg->CacheSegmentListEntry);
-  RemoveEntryList(&CacheSeg->CacheSegmentLRUListEntry);
-  RemoveEntryList(&CacheSeg->BcbSegmentListEntry);
+#ifdef CACHE_BITMAP
+  RegionSize = CacheSeg->Bcb->CacheSegmentSize / PAGE_SIZE;
+
+  /* Unmap all the pages. */
+  for (i = 0; i < RegionSize; i++)
+    {
+      MmDeleteVirtualMapping(NULL,
+                            CacheSeg->BaseAddress + (i * PAGE_SIZE),
+                            FALSE,
+                            NULL,
+                            &Page);
+      MmReleasePageMemoryConsumer(MC_CACHE, Page);
+    }
+
+  KeAcquireSpinLock(&CiCacheSegMappingRegionLock, &oldIrql);
+  /* Deallocate all the pages used. */
+  Base = (ULONG)(CacheSeg->BaseAddress - CiCacheSegMappingRegionBase) / PAGE_SIZE;
+
+  RtlClearBits(&CiCacheSegMappingRegionAllocMap, Base, RegionSize);
+
+  CiCacheSegMappingRegionHint = min (CiCacheSegMappingRegionHint, Base);
+
+  KeReleaseSpinLock(&CiCacheSegMappingRegionLock, oldIrql);
+#else
   MmLockAddressSpace(MmGetKernelAddressSpace());
   MmFreeMemoryArea(MmGetKernelAddressSpace(),
-                  CacheSeg->BaseAddress,
-                  Bcb->CacheSegmentSize,
+                  CacheSeg->MemoryArea,
                   CcFreeCachePage,
                   NULL);
   MmUnlockAddressSpace(MmGetKernelAddressSpace());
-  ExFreePool(CacheSeg);
+#endif
+  ExFreeToNPagedLookasideList(&CacheSegLookasideList, CacheSeg);
   return(STATUS_SUCCESS);
 }
 
-NTSTATUS STDCALL 
+NTSTATUS
 CcRosFreeCacheSegment(PBCB Bcb, PCACHE_SEGMENT CacheSeg)
 {
   NTSTATUS Status;
+  KIRQL oldIrql;
+
+  ASSERT(Bcb);
+
+  DPRINT("CcRosFreeCacheSegment(Bcb %x, CacheSeg %x)\n",
+         Bcb, CacheSeg);
+
   ExAcquireFastMutex(&ViewLock);
-  Status = CcRosInternalFreeCacheSegment(Bcb, CacheSeg);
+  KeAcquireSpinLock(&Bcb->BcbLock, &oldIrql);
+  RemoveEntryList(&CacheSeg->BcbSegmentListEntry);
+  RemoveEntryList(&CacheSeg->CacheSegmentListEntry);
+  RemoveEntryList(&CacheSeg->CacheSegmentLRUListEntry);
+  if (CacheSeg->Dirty)
+  {
+     RemoveEntryList(&CacheSeg->DirtySegmentListEntry);
+     DirtyPageCount -= Bcb->CacheSegmentSize / PAGE_SIZE;
+
+  }
+  KeReleaseSpinLock(&Bcb->BcbLock, oldIrql);
   ExReleaseFastMutex(&ViewLock);
+
+  Status = CcRosInternalFreeCacheSegment(CacheSeg);
   return(Status);
 }
 
-NTSTATUS STDCALL 
+/*
+ * @implemented
+ */
+VOID STDCALL
+CcFlushCache(IN PSECTION_OBJECT_POINTERS SectionObjectPointers,
+            IN PLARGE_INTEGER FileOffset OPTIONAL,
+            IN ULONG Length,
+            OUT PIO_STATUS_BLOCK IoStatus)
+{
+   PBCB Bcb;
+   LARGE_INTEGER Offset;
+   PCACHE_SEGMENT current;
+   NTSTATUS Status;
+   KIRQL oldIrql;
+
+   DPRINT("CcFlushCache(SectionObjectPointers %x, FileOffset %x, Length %d, IoStatus %x)\n",
+           SectionObjectPointers, FileOffset, Length, IoStatus);
+
+   if (SectionObjectPointers && SectionObjectPointers->SharedCacheMap)
+   {
+      Bcb = (PBCB)SectionObjectPointers->SharedCacheMap;
+      ASSERT(Bcb);
+      if (FileOffset)
+      {
+        Offset = *FileOffset;
+      }
+      else
+      {
+        Offset.QuadPart = (LONGLONG)0;
+        Length = Bcb->FileSize.u.LowPart;
+      }
+
+      if (IoStatus)
+      {
+        IoStatus->Status = STATUS_SUCCESS;
+        IoStatus->Information = 0;
+      }
+
+      while (Length > 0)
+      {
+        current = CcRosLookupCacheSegment (Bcb, Offset.u.LowPart);
+        if (current != NULL)
+        {
+           if (current->Dirty)
+           {
+              Status = CcRosFlushCacheSegment(current);
+              if (!NT_SUCCESS(Status) && IoStatus != NULL)
+              {
+                  IoStatus->Status = Status;
+              }
+           }
+            KeAcquireSpinLock(&Bcb->BcbLock, &oldIrql);
+           ExReleaseFastMutex(&current->Lock);
+           current->ReferenceCount--;
+           KeReleaseSpinLock(&Bcb->BcbLock, oldIrql);
+        }
+
+        Offset.QuadPart += Bcb->CacheSegmentSize;
+        if (Length > Bcb->CacheSegmentSize)
+        {
+           Length -= Bcb->CacheSegmentSize;
+        }
+        else
+        {
+           Length = 0;
+        }
+      }
+   }
+   else
+   {
+      if (IoStatus)
+      {
+        IoStatus->Status = STATUS_INVALID_PARAMETER;
+      }
+   }
+}
+
+NTSTATUS
 CcRosDeleteFileCache(PFILE_OBJECT FileObject, PBCB Bcb)
 /*
  * FUNCTION: Releases the BCB associated with a file object
@@ -602,105 +914,420 @@ CcRosDeleteFileCache(PFILE_OBJECT FileObject, PBCB Bcb)
    PLIST_ENTRY current_entry;
    PCACHE_SEGMENT current;
    NTSTATUS Status;
-   
-   DPRINT("CcRosDeleteFileCache(FileObject %x, Bcb %x)\n", Bcb->FileObject, 
-         Bcb);
+   LIST_ENTRY FreeList;
+   KIRQL oldIrql;
 
-   MmFreeSectionSegments(Bcb->FileObject);
+   ASSERT(Bcb);
 
-   /*
-    * Write back dirty cache segments.
-    */
-   current_entry = Bcb->BcbSegmentListHead.Flink;
-   while (current_entry != &Bcb->BcbSegmentListHead)
-     {
-       current = 
-         CONTAINING_RECORD(current_entry, CACHE_SEGMENT, BcbSegmentListEntry);
-       if (current->Dirty)
+   Bcb->RefCount++;
+   ExReleaseFastMutex(&ViewLock);
+
+   CcFlushCache(FileObject->SectionObjectPointer, NULL, 0, NULL);
+
+   ExAcquireFastMutex(&ViewLock);
+   Bcb->RefCount--;
+   if (Bcb->RefCount == 0)
+   {
+      if (Bcb->BcbRemoveListEntry.Flink != NULL)
+      {
+        RemoveEntryList(&Bcb->BcbRemoveListEntry);
+         Bcb->BcbRemoveListEntry.Flink = NULL;
+      }
+
+      FileObject->SectionObjectPointer->SharedCacheMap = NULL;
+
+      /*
+       * Release all cache segments.
+       */
+      InitializeListHead(&FreeList);
+      KeAcquireSpinLock(&Bcb->BcbLock, &oldIrql);
+      current_entry = Bcb->BcbSegmentListHead.Flink;
+      while (!IsListEmpty(&Bcb->BcbSegmentListHead))
+      {
+         current_entry = RemoveTailList(&Bcb->BcbSegmentListHead);
+         current = CONTAINING_RECORD(current_entry, CACHE_SEGMENT, BcbSegmentListEntry);
+         RemoveEntryList(&current->CacheSegmentListEntry);
+         RemoveEntryList(&current->CacheSegmentLRUListEntry);
+         if (current->Dirty)
         {
-          Status = WriteCacheSegment(current);
-          if (!NT_SUCCESS(Status))
-            {
-              DPRINT1("Failed to write cache segment (Status %X)\n", Status);
-            }
-          ExAcquireFastMutex(&ViewLock);
-          RemoveEntryList(&current->DirtySegmentListEntry);
-          ExReleaseFastMutex(&ViewLock);
+            RemoveEntryList(&current->DirtySegmentListEntry);
+            DirtyPageCount -= Bcb->CacheSegmentSize / PAGE_SIZE;
+           DPRINT1("Freeing dirty segment\n");
         }
-       current_entry = current_entry->Flink;
-     }
-   
-   /*
-    * Release all cache segments.
-    */
-   current_entry = Bcb->BcbSegmentListHead.Flink;
-   while (current_entry != &Bcb->BcbSegmentListHead)
-     {
-       current = 
-         CONTAINING_RECORD(current_entry, CACHE_SEGMENT, BcbSegmentListEntry);
-       current_entry = current_entry->Flink;
-       CcRosFreeCacheSegment(Bcb, current);
-     }
+         InsertHeadList(&FreeList, &current->BcbSegmentListEntry);
+      }
+      KeReleaseSpinLock(&Bcb->BcbLock, oldIrql);
 
-   ObDereferenceObject (Bcb->FileObject);
-   ExFreePool(Bcb);
+      ExReleaseFastMutex(&ViewLock);
+      ObDereferenceObject (Bcb->FileObject);
 
+      while (!IsListEmpty(&FreeList))
+      {
+         current_entry = RemoveTailList(&FreeList);
+         current = CONTAINING_RECORD(current_entry, CACHE_SEGMENT, BcbSegmentListEntry);
+         Status = CcRosInternalFreeCacheSegment(current);
+      }
+      ExFreeToNPagedLookasideList(&BcbLookasideList, Bcb);
+      ExAcquireFastMutex(&ViewLock);
+   }
    return(STATUS_SUCCESS);
 }
 
-NTSTATUS STDCALL 
-CcRosReleaseFileCache(PFILE_OBJECT FileObject, PBCB Bcb)
+VOID CcRosReferenceCache(PFILE_OBJECT FileObject)
+{
+  PBCB Bcb;
+  ExAcquireFastMutex(&ViewLock);
+  Bcb = (PBCB)FileObject->SectionObjectPointer->SharedCacheMap;
+  ASSERT(Bcb);
+  if (Bcb->RefCount == 0)
+  {
+     ASSERT(Bcb->BcbRemoveListEntry.Flink != NULL);
+     RemoveEntryList(&Bcb->BcbRemoveListEntry);
+     Bcb->BcbRemoveListEntry.Flink = NULL;
+
+  }
+  else
+  {
+     ASSERT(Bcb->BcbRemoveListEntry.Flink == NULL);
+  }
+  Bcb->RefCount++;
+  ExReleaseFastMutex(&ViewLock);
+}
+
+VOID CcRosSetRemoveOnClose(PSECTION_OBJECT_POINTERS SectionObjectPointer)
+{
+  PBCB Bcb;
+  DPRINT("CcRosSetRemoveOnClose()\n");
+  ExAcquireFastMutex(&ViewLock);
+  Bcb = (PBCB)SectionObjectPointer->SharedCacheMap;
+  if (Bcb)
+  {
+    Bcb->RemoveOnClose = TRUE;
+    if (Bcb->RefCount == 0)
+    {
+      CcRosDeleteFileCache(Bcb->FileObject, Bcb);
+    }
+  }
+  ExReleaseFastMutex(&ViewLock);
+}
+
+
+VOID CcRosDereferenceCache(PFILE_OBJECT FileObject)
+{
+  PBCB Bcb;
+  ExAcquireFastMutex(&ViewLock);
+  Bcb = (PBCB)FileObject->SectionObjectPointer->SharedCacheMap;
+  ASSERT(Bcb);
+  if (Bcb->RefCount > 0)
+  {
+    Bcb->RefCount--;
+    if (Bcb->RefCount == 0)
+    {
+       MmFreeSectionSegments(Bcb->FileObject);
+       if (Bcb->RemoveOnClose)
+       {
+          CcRosDeleteFileCache(FileObject, Bcb);
+       }
+       else
+       {
+         Bcb->TimeStamp = CcTimeStamp;
+          InsertHeadList(&ClosedListHead, &Bcb->BcbRemoveListEntry);
+       }
+    }
+  }
+  ExReleaseFastMutex(&ViewLock);
+}
+
+NTSTATUS STDCALL
+CcRosReleaseFileCache(PFILE_OBJECT FileObject)
 /*
  * FUNCTION: Called by the file system when a handle to a file object
  * has been closed.
  */
 {
+  PBCB Bcb;
+
+  ExAcquireFastMutex(&ViewLock);
+
+  if (FileObject->SectionObjectPointer->SharedCacheMap != NULL)
+  {
+    Bcb = FileObject->SectionObjectPointer->SharedCacheMap;
+    if (FileObject->PrivateCacheMap != NULL)
+    {
+      FileObject->PrivateCacheMap = NULL;
+      if (Bcb->RefCount > 0)
+      {
+         Bcb->RefCount--;
+        if (Bcb->RefCount == 0)
+        {
+            MmFreeSectionSegments(Bcb->FileObject);
+           if (Bcb->RemoveOnClose)
+           {
+              CcRosDeleteFileCache(FileObject, Bcb);
+           }
+           else
+           {
+              Bcb->TimeStamp = CcTimeStamp;
+              InsertHeadList(&ClosedListHead, &Bcb->BcbRemoveListEntry);
+           }
+        }
+      }
+    }
+  }
+  ExReleaseFastMutex(&ViewLock);
   return(STATUS_SUCCESS);
 }
 
-NTSTATUS STDCALL 
+NTSTATUS
+CcTryToInitializeFileCache(PFILE_OBJECT FileObject)
+{
+   PBCB Bcb;
+   NTSTATUS Status;
+
+   ExAcquireFastMutex(&ViewLock);
+
+   Bcb = FileObject->SectionObjectPointer->SharedCacheMap;
+   if (Bcb == NULL)
+   {
+      Status = STATUS_UNSUCCESSFUL;
+   }
+   else
+   {
+      if (FileObject->PrivateCacheMap == NULL)
+      {
+         FileObject->PrivateCacheMap = Bcb;
+         Bcb->RefCount++;
+      }
+      if (Bcb->BcbRemoveListEntry.Flink != NULL)
+      {
+         RemoveEntryList(&Bcb->BcbRemoveListEntry);
+         Bcb->BcbRemoveListEntry.Flink = NULL;
+      }
+      Status = STATUS_SUCCESS;
+   }
+   ExReleaseFastMutex(&ViewLock);
+
+   return Status;
+}
+
+
+NTSTATUS STDCALL
 CcRosInitializeFileCache(PFILE_OBJECT FileObject,
-                        PBCB* Bcb,
                         ULONG CacheSegmentSize)
 /*
  * FUNCTION: Initializes a BCB for a file object
  */
-{   
-   (*Bcb) = ExAllocatePoolWithTag(NonPagedPool, sizeof(BCB), TAG_BCB);
-   if ((*Bcb) == NULL)
-     {
+{
+   PBCB Bcb;
+
+   Bcb = FileObject->SectionObjectPointer->SharedCacheMap;
+   DPRINT("CcRosInitializeFileCache(FileObject %x, *Bcb %x, CacheSegmentSize %d)\n",
+           FileObject, Bcb, CacheSegmentSize);
+
+   ExAcquireFastMutex(&ViewLock);
+   if (Bcb == NULL)
+   {
+      Bcb = ExAllocateFromNPagedLookasideList(&BcbLookasideList);
+      if (Bcb == NULL)
+      {
+        ExReleaseFastMutex(&ViewLock);
        return(STATUS_UNSUCCESSFUL);
-     }
-   
-   ObReferenceObjectByPointer(FileObject,
-                             FILE_ALL_ACCESS,
-                             NULL,
-                             KernelMode);
-   (*Bcb)->FileObject = FileObject;
-   (*Bcb)->CacheSegmentSize = CacheSegmentSize;
-   if (FileObject->FsContext)
-     {
-       (*Bcb)->AllocationSize = 
-        ((REACTOS_COMMON_FCB_HEADER*)FileObject->FsContext)->AllocationSize;
-       (*Bcb)->FileSize = 
-        ((REACTOS_COMMON_FCB_HEADER*)FileObject->FsContext)->FileSize;
-     }
-   KeInitializeSpinLock(&(*Bcb)->BcbLock);
-   InitializeListHead(&(*Bcb)->BcbSegmentListHead);
-   
+      }
+      memset(Bcb, 0, sizeof(BCB));
+      ObReferenceObjectByPointer(FileObject,
+                                FILE_ALL_ACCESS,
+                                NULL,
+                                KernelMode);
+      Bcb->FileObject = FileObject;
+      Bcb->CacheSegmentSize = CacheSegmentSize;
+      if (FileObject->FsContext)
+      {
+         Bcb->AllocationSize =
+          ((PFSRTL_COMMON_FCB_HEADER)FileObject->FsContext)->AllocationSize;
+         Bcb->FileSize =
+          ((PFSRTL_COMMON_FCB_HEADER)FileObject->FsContext)->FileSize;
+      }
+      KeInitializeSpinLock(&Bcb->BcbLock);
+      InitializeListHead(&Bcb->BcbSegmentListHead);
+      FileObject->SectionObjectPointer->SharedCacheMap = Bcb;
+   }
+   if (FileObject->PrivateCacheMap == NULL)
+   {
+      FileObject->PrivateCacheMap = Bcb;
+      Bcb->RefCount++;
+   }
+   if (Bcb->BcbRemoveListEntry.Flink != NULL)
+   {
+      RemoveEntryList(&Bcb->BcbRemoveListEntry);
+      Bcb->BcbRemoveListEntry.Flink = NULL;
+   }
+   ExReleaseFastMutex(&ViewLock);
+
    return(STATUS_SUCCESS);
 }
 
-VOID
+/*
+ * @implemented
+ */
+PFILE_OBJECT STDCALL
+CcGetFileObjectFromSectionPtrs(IN PSECTION_OBJECT_POINTERS SectionObjectPointers)
+{
+   PBCB Bcb;
+   if (SectionObjectPointers && SectionObjectPointers->SharedCacheMap)
+   {
+      Bcb = (PBCB)SectionObjectPointers->SharedCacheMap;
+      ASSERT(Bcb);
+      return Bcb->FileObject;
+   }
+   return NULL;
+}
+
+VOID STDCALL
+CmLazyCloseThreadMain(PVOID Ignored)
+{
+   LARGE_INTEGER Timeout;
+   PLIST_ENTRY current_entry;
+   PBCB current;
+   ULONG RemoveTimeStamp;
+   NTSTATUS Status;
+
+   KeQuerySystemTime (&Timeout);
+
+   while (1)
+   {
+      Timeout.QuadPart += (LONGLONG)100000000; // 10sec
+      Status = KeWaitForSingleObject(&LazyCloseThreadEvent,
+                                    0,
+                                    KernelMode,
+                                    FALSE,
+                                    &Timeout);
+
+      DPRINT("LazyCloseThreadMain %d\n", CcTimeStamp);
+
+      if (!NT_SUCCESS(Status))
+      {
+         DbgPrint("LazyCloseThread: Wait failed\n");
+         KEBUGCHECKCC;
+         break;
+      }
+      if (LazyCloseThreadShouldTerminate)
+      {
+          DbgPrint("LazyCloseThread: Terminating\n");
+         break;
+      }
+
+      ExAcquireFastMutex(&ViewLock);
+      CcTimeStamp++;
+      if (CcTimeStamp >= 30)
+      {
+         RemoveTimeStamp = CcTimeStamp - 30; /* 5min = 10sec * 30 */
+         while (!IsListEmpty(&ClosedListHead))
+        {
+            current_entry = ClosedListHead.Blink;
+            current = CONTAINING_RECORD(current_entry, BCB, BcbRemoveListEntry);
+           if (current->TimeStamp >= RemoveTimeStamp)
+           {
+              break;
+           }
+            CcRosDeleteFileCache(current->FileObject, current);
+        }
+      }
+      ExReleaseFastMutex(&ViewLock);
+   }
+}
+
+VOID INIT_FUNCTION
 CcInitView(VOID)
 {
+#ifdef CACHE_BITMAP
+  PMEMORY_AREA marea;
+  PVOID Buffer;
+  PHYSICAL_ADDRESS BoundaryAddressMultiple;
+#endif
+  NTSTATUS Status;
+  KPRIORITY Priority;
+
   DPRINT("CcInitView()\n");
+#ifdef CACHE_BITMAP
+  BoundaryAddressMultiple.QuadPart = 0;
+  CiCacheSegMappingRegionHint = 0;
+  CiCacheSegMappingRegionBase = NULL;
+
+  MmLockAddressSpace(MmGetKernelAddressSpace());
+
+  Status = MmCreateMemoryArea(NULL,
+                             MmGetKernelAddressSpace(),
+                             MEMORY_AREA_CACHE_SEGMENT,
+                             &CiCacheSegMappingRegionBase,
+                             CI_CACHESEG_MAPPING_REGION_SIZE,
+                             0,
+                             &marea,
+                             FALSE,
+                             FALSE,
+                             BoundaryAddressMultiple);
+  MmUnlockAddressSpace(MmGetKernelAddressSpace());
+  if (!NT_SUCCESS(Status))
+    {
+      KEBUGCHECKCC;
+    }
+
+  Buffer = ExAllocatePool(NonPagedPool, CI_CACHESEG_MAPPING_REGION_SIZE / (PAGE_SIZE * 8));
+
+  RtlInitializeBitMap(&CiCacheSegMappingRegionAllocMap, Buffer, CI_CACHESEG_MAPPING_REGION_SIZE / PAGE_SIZE);
+  RtlClearAllBits(&CiCacheSegMappingRegionAllocMap);
+
+  KeInitializeSpinLock(&CiCacheSegMappingRegionLock);
+#endif
   InitializeListHead(&CacheSegmentListHead);
   InitializeListHead(&DirtySegmentListHead);
   InitializeListHead(&CacheSegmentLRUListHead);
+  InitializeListHead(&ClosedListHead);
   ExInitializeFastMutex(&ViewLock);
+  ExInitializeNPagedLookasideList (&iBcbLookasideList,
+                                  NULL,
+                                  NULL,
+                                  0,
+                                  sizeof(INTERNAL_BCB),
+                                  TAG_IBCB,
+                                  20);
+  ExInitializeNPagedLookasideList (&BcbLookasideList,
+                                  NULL,
+                                  NULL,
+                                  0,
+                                  sizeof(BCB),
+                                  TAG_BCB,
+                                  20);
+  ExInitializeNPagedLookasideList (&CacheSegLookasideList,
+                                  NULL,
+                                  NULL,
+                                  0,
+                                  sizeof(CACHE_SEGMENT),
+                                  TAG_CSEG,
+                                  20);
+
   MmInitializeMemoryConsumer(MC_CACHE, CcRosTrimCache);
+
   CcInitCacheZeroPage();
+
+  CcTimeStamp = 0;
+  LazyCloseThreadShouldTerminate = FALSE;
+  KeInitializeEvent (&LazyCloseThreadEvent, SynchronizationEvent, FALSE);
+  Status = PsCreateSystemThread(&LazyCloseThreadHandle,
+                               THREAD_ALL_ACCESS,
+                               NULL,
+                               NULL,
+                               &LazyCloseThreadId,
+                               (PKSTART_ROUTINE)CmLazyCloseThreadMain,
+                               NULL);
+  if (NT_SUCCESS(Status))
+  {
+     Priority = LOW_REALTIME_PRIORITY;
+     NtSetInformationThread(LazyCloseThreadHandle,
+                           ThreadPriority,
+                           &Priority,
+                           sizeof(Priority));
+  }
+
 }
 
 /* EOF */