2 * reactos Cache Manager mapper emulation of libcaptive
3 * Copyright (C) 2002-2003 Jan Kratochvil <project-captive@jankratochvil.net>
5 * This program is free software; you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License as published by
7 * the Free Software Foundation; exactly version 2 of June 1991 is required
9 * This program is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 * GNU General Public License for more details.
14 * You should have received a copy of the GNU General Public License
15 * along with this program; if not, write to the Free Software
16 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
22 #include "reactos/ddk/ccfuncs.h" /* self */
23 #include <glib/gmessages.h>
24 #include <glib/ghash.h>
25 #include <glib/gmem.h>
27 #include "reactos/ddk/mmfuncs.h" /* for MmCreateMdl() */
28 #include "reactos/ddk/kefuncs.h" /* for KeInitializeEvent() */
29 #include "reactos/ddk/iofuncs.h" /* for IoPageRead() */
30 #include "captive/macros.h"
31 #include <sys/types.h>
34 #include <glib/glist.h>
35 #include "reactos/internal/io.h" /* for IoSynchronousPageWrite() */
36 #include <glib/gmain.h>
37 #include "captive/leave.h"
38 #include <glib/gtree.h>
43 #define CAPTIVE_PUBLIC_BCB_NODETYPECODE 0xDE45 /* FIXME: unknown, undocumented */
44 /* Prepare linear mapped space by CcInitializeCacheMap()?
45 * NT-5.1sp will map the same pages of a file to the same memory location
46 * either by CcMap*() or CcPin*().
47 * We do a separate mapping for each Bcb protected by bounding unmapped pages
48 * with IPC shm shared pages if a file page is mapped multiple times.
49 * I am not aware how they can reserve enough virtual memory space during
50 * client with mapping requests of increasing range tendency.
51 * This define will try to pre-map the file as one linear are during
52 * CcInitializeCacheMap() according to its (CC_FILE_SIZES *)FileSizes
53 * but TODO the range is currently left unused in further mapping functions.
55 /* #define CAPTIVE_FILE_INITIALIZED_CACHE_IS_LINEAR 1 */
58 /* Flush all the buffers directly on the fly.
59 * For details see the comment in libcaptive/client/init.c/captive_shutdown().
61 gboolean captive_cc_unmounting=FALSE;
64 /* map: (FILE_OBJECT *)FileObject -> (struct fileobject_cached *) */
65 static GHashTable *fileobject_cached_hash;
67 struct fileobject_cached {
68 CACHE_MANAGER_CALLBACKS CallBacks;
69 VOID *LazyWriterContext;
70 #ifdef CAPTIVE_FILE_INITIALIZED_CACHE_IS_LINEAR
75 static void fileobject_cached_hash_value_destroy_func(struct fileobject_cached *value)
77 g_return_if_fail(value!=NULL);
82 static void fileobject_cached_hash_init(void)
84 if (fileobject_cached_hash)
86 fileobject_cached_hash=g_hash_table_new_full(
87 g_direct_hash, /* hash_func */
88 g_direct_equal, /* key_equal_func */
89 NULL, /* key_destroy_func */
90 (GDestroyNotify)fileobject_cached_hash_value_destroy_func); /* value_destroy_func */
95 * CcInitializeCacheMap:
96 * @FileObject: Existing file to set callbacks for. Ignored by libcaptive.
97 * %NULL value is forbidden.
98 * @FileSizes: Some file sizes suggestions. Ignored by libcaptive.
99 * %NULL value is forbidden.
100 * @PinAccess: CcPin*() functions will be used with @FileObject? Ignored by libcaptive.
101 * @CallBacks: Provided callback functions for readahead/writebehind. Ignored by libcaptive.
102 * %NULL value is forbidden.
103 * @LazyWriterContext: Value passed to functions of @CallBacks to bind with @FileObject.
104 * %NULL value is permitted.
106 * Provides support of readahead/writebehind in W32. Function should be called
107 * by W32 filesystem to offer its functions to W32 kernel. These functions
108 * are never called by libcaptive, this call is a NOP in libcaptive.
110 VOID CcInitializeCacheMap(IN PFILE_OBJECT FileObject,
111 IN PCC_FILE_SIZES FileSizes,IN BOOLEAN PinAccess,IN PCACHE_MANAGER_CALLBACKS CallBacks,IN PVOID LazyWriterContext)
113 struct fileobject_cached *fileobject_cached;
114 #ifdef CAPTIVE_FILE_INITIALIZED_CACHE_IS_LINEAR
116 LARGE_INTEGER FileOffset0;
121 g_return_if_fail(FileObject!=NULL);
122 g_return_if_fail(FileSizes!=NULL);
123 g_return_if_fail(CallBacks!=NULL);
125 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,"%s: FileObject=%p,"
126 "FileSizes->AllocationSize=0x%llX,FileSizes->FileSize=0x%llX,FileSizes->ValidDataLength=0x%llX,"
127 "PinAccess=%d,CallBacks=%p,LazyWriterContext=%p",G_STRLOC,
128 FileObject,(guint64)FileSizes->AllocationSize.QuadPart,(guint64)FileSizes->FileSize.QuadPart,
129 (guint64)FileSizes->ValidDataLength.QuadPart,(gint)PinAccess,CallBacks,LazyWriterContext);
131 fileobject_cached_hash_init();
135 /* Double reinitialization without CcUninitializeCacheMap()
136 * is done by both fastfat.sys and ntfs.sys of NT-5.1sp1.
139 g_assert(g_hash_table_lookup(fileobject_cached_hash,FileObject)==NULL);
142 captive_new(fileobject_cached);
143 fileobject_cached->CallBacks=*CallBacks;
144 fileobject_cached->LazyWriterContext=LazyWriterContext;
146 g_hash_table_insert(fileobject_cached_hash,
147 FileObject, /* key */
148 fileobject_cached); /* value */
150 #if CAPTIVE_FILE_INITIALIZED_CACHE_IS_LINEAR
151 size64=MAX(MAX(FileSizes->AllocationSize.QuadPart,FileSizes->FileSize.QuadPart),
152 (FileSizes->ValidDataLength.QuadPart==G_MAXINT64 ? 0 : FileSizes->ValidDataLength.QuadPart));
153 g_assert(((ULONG)size64)==size64);
154 FileOffset0.QuadPart=0;
156 errboolean=CcMapData(FileObject,&FileOffset0,size64,MAP_WAIT,&fileobject_cached->Bcb,&Buffer_trash);
157 g_assert(errboolean==TRUE);
162 BOOLEAN captive_cc_FileObject_delete(FILE_OBJECT *FileObject);
165 * CcUninitializeCacheMap:
166 * @FileObject: File to close caching for.
167 * %NULL value is forbidden.
168 * @TruncateSize: Current file size if @FileObject was truncated to it in the meantime.
169 * @UninitializeCompleteEvent: Optional event to signal after physical write to disk.
170 * %NULL value is permitted.
172 * Close the cachine facilities from CcInitializeCacheMap().
173 * It is valid to pass @FileObject without being registered by CcInitializeCacheMap().
175 * FIXME; What to do with files with dirty blocks? Currently we fail assertion on them
176 * although I think W32 would drop such buffers (purge them - not flush them).
178 * Returns: %TRUE if the caching was closed successfuly.
179 * %FALSE if @FileObject wasn't registered by CcInitializeCacheMap().
181 BOOLEAN CcUninitializeCacheMap(IN PFILE_OBJECT FileObject,
182 IN PLARGE_INTEGER TruncateSize OPTIONAL,IN PCACHE_UNINITIALIZE_EVENT UninitializeCompleteEvent OPTIONAL)
186 g_return_val_if_fail(FileObject!=NULL,FALSE);
187 /* assert current size ==*TruncateSize if TruncateSize */
189 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,"%s: FileObject=%p,TruncateSize=0x%llX,UninitializeCompleteEvent=%p",
190 G_STRLOC,FileObject,(guint64)(!TruncateSize ? -1 : TruncateSize->QuadPart),UninitializeCompleteEvent);
193 /* Here it will check for any dirty blocks and it will fail g_assert() on them.
194 * I think it may happen for BCBs to exist dirty for 'FileObject' and they
195 * should be silently discarded if CcUninitializeCacheMap() but currently
196 * the assertion is left here as some debugging aid.
198 r=captive_cc_FileObject_delete(FileObject);
200 /* FIXME: should we do KePulseEvent? Are we allowed to signal from inside CcUninitializeCacheMap() ? */
201 if (UninitializeCompleteEvent)
203 &UninitializeCompleteEvent->Event, /* Event */
204 IO_NO_INCREMENT, /* Increment */
211 static gboolean validate_Bcb(const PUBLIC_BCB *PublicBcb)
213 g_return_val_if_fail(PublicBcb!=NULL,FALSE);
214 g_return_val_if_fail(PublicBcb->NodeTypeCode==CAPTIVE_PUBLIC_BCB_NODETYPECODE,FALSE);
215 g_return_val_if_fail(PublicBcb->NodeByteSize==sizeof(*PublicBcb),FALSE);
216 g_return_val_if_fail(PublicBcb->MappedLength>0,FALSE);
217 g_return_val_if_fail(PublicBcb->MappedFileOffset.QuadPart>=0,FALSE);
223 /* position in file */
224 struct page_position {
225 FILE_OBJECT *FileObject;
226 LARGE_INTEGER FileOffset; /* always PAGE_SIZE aligned */
228 GList *privbcb_list; /* each mapped page has its one private_bcb */
229 gboolean building; /* data are not yet read; prevention for CcMapData() reentrancy */
232 /* map: (struct page_position *)pagepos -> (struct page_position *)pagepos */
233 static GHashTable *page_position_hash;
235 static gboolean validate_page_position(const struct page_position *pagepos)
238 struct shmid_ds shmid_ds;
240 g_return_val_if_fail(pagepos!=NULL,FALSE);
241 g_return_val_if_fail(pagepos->FileObject!=NULL,FALSE);
242 g_return_val_if_fail(pagepos->FileOffset.QuadPart>=0,FALSE);
243 g_return_val_if_fail(0==CAPTIVE_ROUND_DOWN_EXCEEDING64(pagepos->FileOffset.QuadPart,PAGE_SIZE),FALSE);
244 /* 'pagepos->shmid' may be -1 */
245 /* 'pagepos->privbcb_list' may be empty */
246 /* either deleted or alive */
247 /* shmid exists only for >=2 mappings, it is simple mmap() for single mapping */
248 g_return_val_if_fail((pagepos->shmid==-1)==(pagepos->privbcb_list==NULL || pagepos->privbcb_list->next==NULL),FALSE);
250 if (pagepos->shmid!=-1) {
251 errint=shmctl(pagepos->shmid,
253 &shmid_ds); /* buf */
254 g_return_val_if_fail(errint==0,FALSE);
256 g_return_val_if_fail(shmid_ds.shm_perm.uid==geteuid(),FALSE);
257 g_return_val_if_fail(shmid_ds.shm_perm.gid==getegid(),FALSE);
258 g_return_val_if_fail(shmid_ds.shm_perm.cuid==geteuid(),FALSE);
259 g_return_val_if_fail(shmid_ds.shm_perm.cgid==getegid(),FALSE);
260 /* 'shm_perm.mode' was seen with sticky bit 01000: */
261 g_return_val_if_fail((shmid_ds.shm_perm.mode&0777)==0600,FALSE);
262 g_return_val_if_fail(shmid_ds.shm_segsz==PAGE_SIZE,FALSE);
263 /* Do not check 'shmid_ds.shm_cpid' and 'shmid_ds.shm_lpid' against getpid()
264 * as we may run as different PIDs in different threads synchronized by client/ .
266 g_return_val_if_fail(shmid_ds.shm_nattch==g_list_length(pagepos->privbcb_list),FALSE);
272 static guint page_position_hash_hash_func(const struct page_position *key)
274 g_return_val_if_fail(validate_page_position(key),0);
276 return ((guint)key->FileObject)^(key->FileOffset.QuadPart);
279 static gboolean page_position_hash_key_equal_func(const struct page_position *a,const struct page_position *b)
281 g_return_val_if_fail(validate_page_position(a),FALSE);
282 g_return_val_if_fail(validate_page_position(b),FALSE);
284 return (a->FileObject==b->FileObject && a->FileOffset.QuadPart==b->FileOffset.QuadPart);
287 static void page_position_hash_key_destroy_func(struct page_position *key)
289 g_return_if_fail(validate_page_position(key));
290 g_assert(key->privbcb_list==NULL);
291 g_assert(key->shmid==-1);
296 static void page_position_hash_init(void)
298 if (page_position_hash)
300 page_position_hash=g_hash_table_new_full(
301 (GHashFunc)page_position_hash_hash_func, /* hash_func */
302 (GEqualFunc)page_position_hash_key_equal_func, /* key_equal_func */
303 (GDestroyNotify)page_position_hash_key_destroy_func, /* key_destroy_func */
304 NULL); /* value_destroy_func */
309 PUBLIC_BCB *PublicBcb; /* ->MappedLength, ->MappedFileOffset */
310 FILE_OBJECT *FileObject;
312 gboolean leave_func_pending;
313 /* we save it here as 'PublicBcb' may be already destroyed in private_bcb_hash_value_destroy_func(): */
314 ULONG MappedLength; /* It is the real requested size; it is not PAGE_SIZE aligned. */
315 /* we save it here as 'PublicBcb' may be already destroyed in private_bcb_hash_value_destroy_func(): */
316 LARGE_INTEGER MappedFileOffset; /* It is the real requested offset; it is not PAGE_SIZE aligned. */
317 gpointer base; /* It is the pointer corresponding to MappedFileOffset; it is not PAGE_SIZE aligned. */
319 LARGE_INTEGER lsn; gboolean lsn_valid;
323 /* map: (struct private_bcb *)privbcb -> (struct private_bcb *)privbcb */
324 static GTree *private_bcb_lsn_tree;
326 /* Such debugging messages are too much expensive.
327 * Use to track for deallocated privbcb-s/PublicBcb-s.
329 /* #define DEBUG_PRIVATE_BCB_LSN_TREE_KEY_COMPARE_FUNC 1 */
331 /* Although 'private_bcb_lsn_tree' contains only nodes with 'lsn_valid' TRUE
332 * compare_func cannot expect such arguments as it may be used to lookup
333 * privbcb unlisted in 'private_bcb_lsn_tree'.
335 static gint private_bcb_lsn_tree_key_compare_func(struct private_bcb *a,struct private_bcb *b,gpointer user_data /* NULL */)
340 #ifdef DEBUG_PRIVATE_BCB_LSN_TREE_KEY_COMPARE_FUNC
341 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,"%s: privbcb a=%p,privbcb b=%p",G_STRLOC,a,b);
342 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,"%s: privbcb a->PublicBcb=%p",G_STRLOC,a->PublicBcb);
343 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,"%s: privbcb b->PublicBcb=%p",G_STRLOC,b->PublicBcb);
344 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,"%s: privbcb a->PublicBcb->MappedLength=%u",G_STRLOC,(unsigned)a->PublicBcb->MappedLength);
345 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,"%s: privbcb b->PublicBcb->MappedLength=%u",G_STRLOC,(unsigned)b->PublicBcb->MappedLength);
348 g_return_val_if_fail(a!=NULL,0);
349 g_return_val_if_fail(validate_Bcb(a->PublicBcb),0);
350 g_assert(!a->lsn_valid || a->lsn.QuadPart!=(LONGLONG)G_MAXINT64); /* Forbid defined LSN as G_MAXINT64 */
351 g_return_val_if_fail(b!=NULL,0);
352 g_return_val_if_fail(validate_Bcb(b->PublicBcb),0);
353 g_assert(!b->lsn_valid || b->lsn.QuadPart!=(LONGLONG)G_MAXINT64); /* Forbid defined LSN as G_MAXINT64 */
355 if (a==b) { /* LSN would be apparently the same in such case :-) */
356 #ifdef DEBUG_PRIVATE_BCB_LSN_TREE_KEY_COMPARE_FUNC
357 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,"%s: return 0 (a==b)",G_STRLOC);
362 a_lsn=(!a->lsn_valid ? (LONGLONG)G_MAXINT64 : a->lsn.QuadPart);
363 b_lsn=(!b->lsn_valid ? (LONGLONG)G_MAXINT64 : b->lsn.QuadPart);
365 /* Forbid the same LSNs if both defined */
366 g_assert(a_lsn==(LONGLONG)G_MAXINT64 || a_lsn!=b_lsn);
368 if ((r=(a_lsn>b_lsn)-(a_lsn<b_lsn))) {
369 #ifdef DEBUG_PRIVATE_BCB_LSN_TREE_KEY_COMPARE_FUNC
370 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,"%s: return %d (lsn !=)",G_STRLOC,r);
375 #ifdef DEBUG_PRIVATE_BCB_LSN_TREE_KEY_COMPARE_FUNC
376 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,"%s: return (ptr !=)",G_STRLOC);
381 static void private_bcb_lsn_tree_init(void)
383 if (private_bcb_lsn_tree)
385 private_bcb_lsn_tree=g_tree_new(
386 (GCompareFunc)private_bcb_lsn_tree_key_compare_func); /* key_compare_func */
390 PRIVBCB_ITEM_NOP, /* for sanity checks */
392 PRIVBCB_ITEM_LSN_VALID,
393 PRIVBCB_ITEM_LEAVE_FUNC_PENDING,
394 PRIVBCB_ITEM_REF_COUNT,
395 PRIVBCB_ITEM_REF_COUNT_DESTRUCTOR, /* no protections against 'leave_func_pending' */
398 static void privbcb_set(struct private_bcb *privbcb,enum privbcb_item item,gint value)
400 g_return_if_fail(privbcb!=NULL);
402 private_bcb_lsn_tree_init();
404 g_assert((privbcb->lsn_valid ? privbcb : NULL)==g_tree_lookup(private_bcb_lsn_tree,privbcb));
406 case PRIVBCB_ITEM_NOP:
408 case PRIVBCB_ITEM_DIRTY:
409 g_assert(TRUE==value || FALSE==value);
410 privbcb->dirty=value;
412 case PRIVBCB_ITEM_LSN_VALID:
413 /* Never change 'privbcb->lsn_valid' while it is linked in 'private_bcb_lsn_tree'
414 * as it could become unreachable due to private_bcb_lsn_tree_key_compare_func()
415 * behaviour wrt 'privbcb->lsn_valid'!
417 g_tree_remove(private_bcb_lsn_tree,privbcb);
418 g_assert(TRUE==value || FALSE==value);
419 privbcb->lsn_valid=value;
420 if (privbcb->lsn_valid)
421 g_tree_insert(private_bcb_lsn_tree,
423 privbcb); /* value */
425 case PRIVBCB_ITEM_LEAVE_FUNC_PENDING:
426 g_assert(TRUE==value || FALSE==value);
427 privbcb->leave_func_pending=value;
429 g_assert(privbcb->ref_count==1);
431 case PRIVBCB_ITEM_REF_COUNT:
432 /* Forbid reincarnation of 'leave_func_pending' privbcb. */
433 g_assert(!privbcb->leave_func_pending);
434 g_assert(privbcb->ref_count>=1);
435 privbcb->ref_count+=value;
436 g_assert(privbcb->ref_count>=1);
438 case PRIVBCB_ITEM_REF_COUNT_DESTRUCTOR:
439 g_assert(privbcb->ref_count>=0);
440 privbcb->ref_count+=value;
441 g_assert(privbcb->ref_count>=0);
443 default: g_assert_not_reached();
445 g_assert((privbcb->lsn_valid ? privbcb : NULL)==g_tree_lookup(private_bcb_lsn_tree,privbcb));
449 /* map: (PUBLIC_BCB *)PublicBcb -> (struct private_bcb *)privbcb */
450 static GHashTable *private_bcb_hash;
452 static void private_bcb_hash_key_destroy_func(PUBLIC_BCB *key)
454 g_return_if_fail(validate_Bcb(key));
456 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,"%s: g_free: PublicBcb=%p",G_STRLOC,key);
461 static void private_bcb_hash_value_destroy_func(struct private_bcb *value)
463 struct page_position pagepos_local;
467 gpointer base_aligned;
469 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,"%s: g_free: privbcb=%p (->PublicBcb=%p)",G_STRLOC,value,value->PublicBcb);
471 g_return_if_fail(value!=NULL);
472 /* We cannot do 'validate_Bcb(value->PublicBcb)' here as 'value->PublicBcb'
473 * may got already destroyed by 'private_bcb_hash_key_destroy_func(key)'
475 g_return_if_fail(value->PublicBcb!=NULL);
476 g_return_if_fail(value->FileObject!=NULL);
477 g_return_if_fail(value->ref_count==0);
478 g_return_if_fail(value->MappedLength>0);
479 g_return_if_fail(value->MappedFileOffset.QuadPart>=0);
480 g_return_if_fail(value->base!=NULL);
481 g_return_if_fail(value->dirty==FALSE);
482 /* Ensure we are not registered in 'private_bcb_lsn_tree'. */
483 g_return_if_fail(value->lsn_valid==FALSE);
485 page_position_hash_init();
487 base_aligned=((char *)value->base)-CAPTIVE_ROUND_DOWN_EXCEEDING64(value->MappedFileOffset.QuadPart,PAGE_SIZE);
489 pagepos_local.FileObject=value->FileObject;
490 pagepos_local.privbcb_list=NULL;
491 pagepos_local.shmid=-1;
494 offset<value->MappedLength;
496 struct page_position *pagepos;
498 pagepos_local.FileOffset.QuadPart=CAPTIVE_ROUND_DOWN64(value->MappedFileOffset.QuadPart+offset,PAGE_SIZE);
499 pagepos=g_hash_table_lookup(page_position_hash,&pagepos_local);
500 g_assert(validate_page_position(pagepos));
501 g_assert(pagepos->privbcb_list!=NULL);
502 if (pagepos->privbcb_list->next==NULL) { /* single mapping by mmap(), no shm */
503 g_assert(pagepos->shmid==-1);
504 errint=munmap(((char *)base_aligned)+offset,PAGE_SIZE);
507 else if (pagepos->privbcb_list->next->next==NULL) { /* mapping 2 -> 1, convert shm to mmap() */
508 struct private_bcb *privbcb_other;
509 gint64 privbcb_other_offset_relative;
510 gpointer mapped_other,errptr;
512 g_assert(pagepos->shmid!=-1);
513 if (value==pagepos->privbcb_list->data)
514 privbcb_other=pagepos->privbcb_list->next->data;
516 privbcb_other=pagepos->privbcb_list->data;
517 g_assert(value==pagepos->privbcb_list->next->data);
519 privbcb_other_offset_relative=pagepos->FileOffset.QuadPart-privbcb_other->MappedFileOffset.QuadPart;
520 /* privbcb_other_offset_relative may be negative up to -PAGE_SIZE
521 * as 'MappedFileOffset' and 'base' are not page-aligned.
523 mapped_other=privbcb_other->base+privbcb_other_offset_relative;
524 /* TODO:thread; shmdt()..mmap() window */
525 errint=shmdt(mapped_other);
528 mapped_other, /* start */
529 PAGE_SIZE, /* length */
530 PROT_READ|PROT_WRITE, /* prot */
531 MAP_PRIVATE|MAP_ANONYMOUS, /* flags */
532 -1, /* fd; ignored due to MAP_ANONYMOUS */
533 0); /* offset; ignored due to MAP_ANONYMOUS */
534 g_assert(errptr==mapped_other);
535 memcpy(mapped_other,((char *)base_aligned)+offset,PAGE_SIZE);
536 errint=shmdt(((char *)base_aligned)+offset); /* destroys shm */
538 /* It should be destroyed automatically as IPC_RMID should be pending from its foundation. */
541 else { /* mappings (>=3) -> (>=2) */
542 g_assert(pagepos->shmid!=-1);
543 errint=shmdt(((char *)base_aligned)+offset);
547 g_assert(g_list_find(pagepos->privbcb_list,value)!=NULL);
548 pagepos->privbcb_list=g_list_remove(pagepos->privbcb_list,value);
549 g_assert(g_list_find(pagepos->privbcb_list,value)==NULL);
551 if (pagepos->privbcb_list==NULL) { /* last mapping by mmap() removed */
552 g_assert(pagepos->shmid==-1);
553 errbool=g_hash_table_remove(page_position_hash,&pagepos_local);
554 g_assert(errbool==TRUE);
556 else /* mapping is now >=1, either by mmap() or shm */
557 g_assert(validate_page_position(pagepos));
563 static void private_bcb_hash_init(void)
565 if (private_bcb_hash)
567 private_bcb_hash=g_hash_table_new_full(
568 g_direct_hash, /* hash_func */
569 g_direct_equal, /* key_equal_func */
570 (GDestroyNotify)private_bcb_hash_key_destroy_func, /* key_destroy_func */
571 (GDestroyNotify)private_bcb_hash_value_destroy_func); /* value_destroy_func */
575 static gboolean captive_cc_FileObject_delete_private_bcb_hash_foreach(
576 PUBLIC_BCB *PublicBcb, /* key */
577 struct private_bcb *privbcb, /* value */
578 FILE_OBJECT *FileObject) /* user_data */
580 g_return_val_if_fail(validate_Bcb(PublicBcb),FALSE); /* meaning: do not remove this 'privbcb' */
581 g_return_val_if_fail(privbcb!=NULL,FALSE); /* meaning: do not remove this 'privbcb' */
582 g_return_val_if_fail(PublicBcb==privbcb->PublicBcb,FALSE); /* meaning: do not remove this 'privbcb' */
583 g_return_val_if_fail(FileObject!=NULL,FALSE); /* meaning: do not remove this 'privbcb' */
585 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,"%s: PublicBcb=%p,privbcb=%p,privbcb->ref_count=%d,privbcb->leave_func_pending=%d"
586 ",FileObject=%p",G_STRLOC,
587 PublicBcb,privbcb,privbcb->ref_count,privbcb->leave_func_pending,FileObject);
590 if (privbcb->FileObject!=FileObject)
591 return FALSE; /* do not remove this 'privbcb' */
593 /* It is OK to leave it in 'private_bcb_hash' as it is protected
594 * against reincarnation.
595 * Such check is here to allow it to keep 'dirty' data.
597 if (privbcb->leave_func_pending)
598 return FALSE; /* do not remove this 'privbcb' */
601 /* Do not reuse captive_privbcb_flush_ordered() destructor here as we cannot
602 * call g_hash_table_remove() from inside g_hash_table_foreach_remove() callback.
605 g_assert(privbcb->dirty==FALSE); /* it would be fatal */
607 g_assert(privbcb->leave_func_pending==FALSE);
608 /* Force 'ref_count' drop to 0 to pass private_bcb_hash_value_destroy_func(). */
609 privbcb_set(privbcb,PRIVBCB_ITEM_REF_COUNT_DESTRUCTOR,-privbcb->ref_count);
610 /* Unset LSN to unlink from 'private_bcb_lsn_tree'. */
611 privbcb_set(privbcb,PRIVBCB_ITEM_LSN_VALID,FALSE);
613 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,"%s: WARNING: Deleting file with pending (fortunately non-dirty) BCBs"
614 "; privbcb=%p,PublicBcb=%p,FileObject=%p,FileOffset=0x%llX,Length=0x%lX",G_STRLOC,
615 privbcb,PublicBcb,privbcb->FileObject,(guint64)privbcb->MappedFileOffset.QuadPart,(gulong)privbcb->MappedLength);
617 return TRUE; /* remove this 'privbcb' */
620 BOOLEAN captive_cc_FileObject_delete(FILE_OBJECT *FileObject)
622 struct fileobject_cached *fileobject_cached;
625 /* 'FileObject' may be NULL to check/clear the whole cache. */
627 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,"%s: FileObject=%p",G_STRLOC,FileObject);
629 fileobject_cached_hash_init();
630 private_bcb_hash_init();
632 if (!FileObject || !(fileobject_cached=g_hash_table_lookup(fileobject_cached_hash,FileObject)))
635 #ifdef CAPTIVE_FILE_INITIALIZED_CACHE_IS_LINEAR
636 CcUnpinData(fileobject_cached->Bcb);
638 g_hash_table_remove(fileobject_cached_hash,FileObject);
641 g_hash_table_foreach_remove(
642 private_bcb_hash, /* hash_table */
643 (GHRFunc)captive_cc_FileObject_delete_private_bcb_hash_foreach, /* func */
644 FileObject); /* user_data */
646 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,"%s: returning r=%d",G_STRLOC,r);
652 static gboolean captive_privbcb_flush_unordered(struct private_bcb *privbcb);
654 static void captive_cc_flush_private_bcb_hash_foreach(
655 PUBLIC_BCB *PublicBcb, /* key */
656 struct private_bcb *privbcb, /* value */
657 gboolean *flushedp) /* user_data */
661 g_return_if_fail(validate_Bcb(PublicBcb));
662 g_return_if_fail(privbcb!=NULL);
663 g_return_if_fail(PublicBcb==privbcb->PublicBcb);
665 if (!privbcb->dirty) /* OK */
668 /* Such privbcb should have been flushed by captive_privbcb_flush_ordered(NULL) before
669 * to ensure its LSN ordering.
671 g_assert(!privbcb->lsn_valid);
674 errbool=captive_privbcb_flush_unordered(privbcb);
675 g_assert(errbool==TRUE);
678 static gboolean captive_privbcb_flush_ordered(struct private_bcb *privbcb_req);
680 void captive_cc_flush(void)
684 fileobject_cached_hash_init();
685 private_bcb_hash_init();
688 /* Trace it by g_tree first to attempt to keep LSN ordering */
689 flushed=captive_privbcb_flush_ordered(NULL);
690 g_hash_table_foreach(
691 private_bcb_hash, /* hash_table */
692 (GHFunc)captive_cc_flush_private_bcb_hash_foreach, /* func */
693 &flushed); /* user_data */
697 /* We must not call: captive_cc_FileObject_delete(NULL);
698 * here as it would destroy all the Bcbs needed for the forthcoming
699 * IoShutdownRegisteredFileSystems().
704 static ULONG captive_Cc_IoPageRead(FILE_OBJECT *FileObject,gpointer address,ULONG length,LARGE_INTEGER *FileOffset)
708 IO_STATUS_BLOCK IoStatus;
711 g_return_val_if_fail(FileObject!=NULL,0);
712 g_return_val_if_fail(address!=0,0);
713 g_return_val_if_fail(length!=0,0);
714 g_return_val_if_fail(FileOffset!=NULL,0);
716 /* VolumeRead on ext2fsd.sys will return IoStatus.Information==0 although it
717 * successfuly read the data. Workaround it - preclear (not postclear) the
718 * buffer and do not make any other assumptions about the data read.
720 memset(address,0,PAGE_SIZE); /* pre-clear the buffer */
721 Mdl=MmCreateMdl(NULL,address,PAGE_SIZE); /* FIXME: Deprecated in favor of IoAllocateMdl() */
723 MmBuildMdlForNonPagedPool(Mdl);
724 KeInitializeEvent(&Event,NotificationEvent,FALSE);
725 IoStatus.Information=0; /* preventive pre-clear for buggy filesystems */
726 err=IoPageRead(FileObject,Mdl,FileOffset,&Event,&IoStatus);
727 g_assert(NT_SUCCESS(err));
728 g_assert(NT_SUCCESS(IoStatus.Status));
729 /* It is not == as the file may be shorter than requested */
730 g_assert(IoStatus.Information<=length);
733 /* Forbidden, see the comment above about ext2fsd.sys.
734 * memset(((char *)address)+IoStatus.Information,0,(length-IoStatus.Information));
737 return IoStatus.Information; /* may be shorter than real! */
741 static struct private_bcb *captive_privbcb_find(IN PFILE_OBJECT FileObject,IN PLARGE_INTEGER FileOffset,IN ULONG Length,
742 PUBLIC_BCB *Bcb_find)
744 struct page_position pagepos_local,*pagepos;
745 struct private_bcb *privbcb,*privbcb_listitem;
748 g_return_val_if_fail(FileObject!=NULL,NULL);
749 g_return_val_if_fail(FileOffset!=NULL,NULL);
750 /* 'Bcb_find' may be NULL */
752 page_position_hash_init();
754 pagepos_local.FileObject=FileObject;
755 pagepos_local.FileOffset.QuadPart=CAPTIVE_ROUND_DOWN64(FileOffset->QuadPart,PAGE_SIZE);
756 pagepos_local.privbcb_list=NULL;
757 pagepos_local.shmid=-1;
758 if (!(pagepos=g_hash_table_lookup(page_position_hash,&pagepos_local)))
760 g_assert(validate_page_position(pagepos));
761 g_assert(pagepos->privbcb_list!=NULL);
764 for (privbcb_list=pagepos->privbcb_list;privbcb_list;privbcb_list=privbcb_list->next) {
765 privbcb_listitem=privbcb_list->data;
767 && privbcb_listitem->MappedFileOffset.QuadPart==FileOffset->QuadPart
768 && privbcb_listitem->MappedLength==Length
769 && (!Bcb_find || Bcb_find==privbcb_listitem->PublicBcb)) {
770 g_assert(privbcb==NULL); /* appropriate 'Bcb_find'-matching privbcb found twice */
771 privbcb=privbcb_listitem;
779 /* Sanity check 'privbcb': */
780 g_return_val_if_fail(FileObject==privbcb->FileObject,FALSE);
788 * @FileObject: Initialized open #FileObject to map.
789 * %NULL value is forbidden.
790 * @FileOffset: The @FileObject file offset from where to map the region from.
791 * Negative value is forbidden.
792 * @Length: Requested length of the region to map from @FileObject.
793 * FIXME: Value %0 is currently forbidden by libcaptive; it should be allowed.
794 * @Flags: %MAP_WAIT means whether disk waiting is permitted for this function.
795 * Value without %MAP_WAIT is currently forbidden by libcaptive as we have no on-demand loading implemented.
796 * %MAP_NO_READ will leave the pages unread (libcaptive: unread pages zeroed,
797 * already mapped pages shared with existing content) - needed by ntfs.sys of NT-5.1sp1
798 * as during file write it will %MAP_NO_READ and consequently push the data there;
799 * any request for the same file range read in the meantime will destroy the prepared data!
800 * @Bcb: Returns initialized #PUBLIC_BCB to refer to the mapped region.
801 * The memory region can be larger than requested as it is %PAGE_SIZE aligned.
802 * %NULL pointer is forbidden.
803 * @Buffer: Returns the mapped memory region start address.
804 * This address may not be %PAGE_SIZE aligned.
805 * %NULL pointer is forbidden.
807 * Maps the specified region of @FileObject to automatically chosen address space.
808 * FIXME: No on-demand loading implemented yet - the whole region is read at the time of this function call.
810 * WARNING: If you modify the data in the returned @Buffer you must call some CcPinMappedData()
811 * or CcPinRead() afterwards. W32 docs say you should never modify the data in any way from this function
812 * but W32 filesystems apparently do not conform to it. :-) If you do not take care of the
813 * modified data by some dirty-marking facility such data will be carelessly dropped without
814 * their commit to the disk.
816 * Every call to this function must be matched by a one corresponding CcUnpinData() call.
818 * We can be called as full CcMapData() (e.g. CcPinRead() from fastfat.sys)
819 * even if such mapping for such file already exists.
820 * We should probably create a new #Bcb for the same space,
821 * at least ntfs.sys of NT-5.1sp1 appears to expect it. Bleech.
823 * Returns: %TRUE if the region was successfuly mapped.
824 * @Bcb with the initialized new memory region.
825 * @Buffer with the address of the exact byte specified by @FileOffset.
827 BOOLEAN CcMapData(IN PFILE_OBJECT FileObject,
828 IN PLARGE_INTEGER FileOffset,IN ULONG Length,IN ULONG Flags,OUT PVOID *Bcb,OUT PVOID *Buffer)
830 PUBLIC_BCB **PublicBcbp,*PublicBcb;
831 struct page_position pagepos_local;
832 LARGE_INTEGER FileOffset_bottom,FileOffset_top;
833 gpointer base_aligned;
834 size_t length_mapped_aligned;
835 gint length_pages_aligned;
836 struct page_position **pagepos_array;
839 struct private_bcb *privbcb;
840 gboolean after_eof=FALSE; /* Did we reached the end of file already? */
842 g_return_val_if_fail(FileObject!=NULL,FALSE);
843 g_return_val_if_fail(FileOffset!=NULL,FALSE);
844 g_return_val_if_fail(FileOffset->QuadPart>=0,FALSE);
845 g_return_val_if_fail(Length>0,FALSE); /* FIXME: not handled below; 0 should be allowed */
846 g_return_val_if_fail(Flags&MAP_WAIT,FALSE); /* FIXME: on-demand loading not yet implemented */
847 g_return_val_if_fail(!(Flags&~(MAP_WAIT|MAP_NO_READ)),FALSE); /* unknown flags? */
848 g_return_val_if_fail(Bcb!=NULL,FALSE);
849 g_return_val_if_fail(Buffer!=NULL,FALSE);
851 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,"%s: FileObject=%p,FileOffset=0x%llX,Length=0x%lX,Flags=0x%lX",G_STRLOC,
852 FileObject,(guint64)FileOffset->QuadPart,(gulong)Length,(gulong)Flags);
854 if (Flags&MAP_NO_READ) {
855 g_assert(0==CAPTIVE_ROUND_DOWN_EXCEEDING64(FileOffset->QuadPart,PAGE_SIZE)); /* NOT IMPLEMENTED YET */
856 /* It may not be aligned as this function is prepared by 'after_eof' for incomplete tails.
857 * It is being used at least by ntfs.sys of NT-5.1sp1 CcCopyWrite().
860 g_assert(0==CAPTIVE_ROUND_DOWN_EXCEEDING64(FileOffset->QuadPart+Length,PAGE_SIZE)); /* NOT IMPLEMENTED YET */
864 g_return_val_if_fail(FileObject->SectionObjectPointers!=NULL,FALSE);
865 g_return_val_if_fail(FileObject->DeviceObject!=NULL,FALSE);
866 #if 0 /* SectorSize can be really weird but we do not use it anyway */
867 /* Is PAGE_SIZE aligned with 'FileObject->DeviceObject->SectorSize'?
868 * 'SectorSize' may not yet be initialized during mount operation
869 * and 'FileObject->DeviceObject->Vpb' may exist in such case.
871 g_return_val_if_fail(0
872 || FileObject->DeviceObject->SectorSize==0 /* prevent division by 0 */
873 || 0==CAPTIVE_ROUND_DOWN_EXCEEDING(PAGE_SIZE,FileObject->DeviceObject->SectorSize),
877 page_position_hash_init();
878 private_bcb_hash_init();
880 PublicBcbp=(PUBLIC_BCB **)Bcb;
881 /* extend 'FileOffset' and 'Length' to page boundaries */
882 FileOffset_bottom.QuadPart=CAPTIVE_ROUND_DOWN64(FileOffset->QuadPart,PAGE_SIZE);
883 FileOffset_top.QuadPart=CAPTIVE_ROUND_UP64(FileOffset->QuadPart+Length,PAGE_SIZE);
884 length_mapped_aligned=(FileOffset_top.QuadPart-FileOffset_bottom.QuadPart);
885 g_assert(0==CAPTIVE_ROUND_DOWN_EXCEEDING(length_mapped_aligned,PAGE_SIZE));
886 length_pages_aligned=length_mapped_aligned/PAGE_SIZE;
888 /* We can be called as full CcMapData() (e.g. CcPinRead() from fastfat.sys)
889 * even if such mapping for such file already exists.
890 * We should probably create a new Bcb for the same space,
891 * at least ntfs.sys of NT-5.1sp1 appears to expect it. Bleech.
893 if ((privbcb=captive_privbcb_find(FileObject,FileOffset,Length,NULL)))
894 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,"%s: FileObject=%p,FileOffset=0x%llX,Length=0x%lX already mapped by privbcb %p",
895 G_STRLOC,FileObject,(guint64)FileOffset->QuadPart,(gulong)Length,privbcb);
897 /* Create 'base_aligned'; referenced as unaligned by 'privbcb'. */
898 /* TODO: on-demand loading */
899 /* Although we do zeroed-page mapping here we just reserve the linear
904 PAGE_SIZE+length_mapped_aligned+PAGE_SIZE, /* length; leading and trailing boundary check pages */
905 PROT_READ|PROT_WRITE, /* prot; read/write must be possible although write is not guaranteed to be flushed yet */
906 MAP_PRIVATE|MAP_ANONYMOUS, /* flags */
907 -1, /* fd; ignored due to MAP_ANONYMOUS */
908 0); /* offset; ignored due to MAP_ANONYMOUS */
909 g_assert(base_aligned!=NULL);
911 base_aligned+=PAGE_SIZE;
912 errint=munmap(base_aligned-PAGE_SIZE,PAGE_SIZE); /* unmap leading boundary check page */
914 errint=munmap(base_aligned+length_mapped_aligned,PAGE_SIZE); /* unmap trailing boundary check page */
917 /* Create 'PublicBcb'; referenced by 'privbcb'. */
918 captive_new(PublicBcb);
919 PublicBcb->NodeTypeCode=CAPTIVE_PUBLIC_BCB_NODETYPECODE;
920 PublicBcb->NodeByteSize=sizeof(*PublicBcb); /* we have no extensions there */
921 PublicBcb->MappedLength=Length;
922 PublicBcb->MappedFileOffset=*FileOffset;
924 /* Create 'privbcb'; referenced by created 'pagepos'es. */
925 captive_new(privbcb);
926 privbcb->PublicBcb=PublicBcb;
927 privbcb->FileObject=FileObject;
928 privbcb->ref_count=1;
929 privbcb->leave_func_pending=FALSE;
930 privbcb->MappedLength=PublicBcb->MappedLength;
931 privbcb->MappedFileOffset=PublicBcb->MappedFileOffset;
932 privbcb->base=base_aligned+CAPTIVE_ROUND_DOWN_EXCEEDING64(FileOffset->QuadPart,PAGE_SIZE);
933 privbcb->dirty=FALSE;
934 privbcb->lsn_valid=FALSE;
935 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,"%s: g_hash_table_insert: PublicBcb=%p,privbcb=%p",G_STRLOC,
937 g_hash_table_insert(private_bcb_hash,
939 privbcb); /* value */
941 privbcb_set(privbcb,PRIVBCB_ITEM_NOP,0); /* just for the assertions */
943 /* We MUST NOT call captive_Cc_IoPageRead() inside our pagepos filling loop
944 * below as captive_Cc_IoPageRead() has very big consequences as it calls
945 * the filesystem code and we may get reentrancy.
946 * Therefore we store all missing page read requests to 'pagepos_array' and we
947 * fill them when all the memory structures are in consistent state.
948 * We can also coalescence the requests more easily this way.
950 captive_newn_alloca(pagepos_array,length_pages_aligned);
952 pagepos_local.FileObject=FileObject;
953 pagepos_local.shmid=-1;
954 pagepos_local.privbcb_list=NULL;
960 offset<length_mapped_aligned;
963 struct page_position *pagepos;
965 pagepos_local.FileOffset.QuadPart=FileOffset_bottom.QuadPart+offset;
966 pageaddr=(gpointer)(((char *)base_aligned)+offset);
967 if (!(pagepos=g_hash_table_lookup(page_position_hash,&pagepos_local))) {
968 captive_new(pagepos);
969 *pagepos=pagepos_local;
971 pagepos->privbcb_list=NULL;
972 pagepos->building=TRUE;
973 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,"%s: read of offset %llu to new pagepos %p of pure mmap() to address %p",
974 G_STRLOC,(unsigned long long)offset,pagepos,pageaddr);
976 else if (pagepos->privbcb_list->next==NULL) { /* exactly one item (no IPC shm yet) */
977 g_assert(pagepos->shmid==-1);
978 if (-1==(pagepos->shmid=shmget(IPC_PRIVATE,PAGE_SIZE,IPC_CREAT|IPC_CREAT|0600)))
979 g_error("%s: Failed shmget(2), you may be out of maximum system IPC shared pages",G_STRLOC);
980 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,"%s: created shmid %d out of mmap() for offset %llu to existing pagepos %p to address %p",
981 G_STRLOC,pagepos->shmid,(unsigned long long)offset,pagepos,pageaddr);
982 /* Reentrancy occured? */
983 g_assert(Flags&MAP_NO_READ || !pagepos->building);
985 else { /* already >=2 mappings, already IPC shared mem */
986 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,"%s: already shared shmid of offset %llu by existing pagepos %p shmid %d to address %p",
987 G_STRLOC,(unsigned long long)offset,pagepos,pagepos->shmid,pageaddr);
988 g_assert(pagepos->shmid!=-1);
989 g_assert(pagepos->privbcb_list!=NULL);
990 /* Reentrancy occured? */
991 g_assert(Flags&MAP_NO_READ || !pagepos->building);
993 pagepos_array[offset/PAGE_SIZE]=pagepos;
994 if (pagepos->privbcb_list) { /* Not the first one - some shm in use now? */
995 /* It appears as shmat(2) cannot override previously mmap(2)ed memory;
996 * mmap(2) is still needed to get linear block of memory assignment.
998 /* TODO:thread; munmap()..shmat() window */
999 errint=munmap(pageaddr,PAGE_SIZE);
1000 g_assert(errint==0);
1001 errptr=shmat(pagepos->shmid,
1002 pageaddr, /* shmaddr */
1003 0); /* shmflg; !SHM_RDONLY==r/w */
1004 g_assert(errptr==pageaddr);
1007 g_assert(g_list_find(pagepos->privbcb_list,privbcb)==NULL);
1008 pagepos->privbcb_list=g_list_prepend(pagepos->privbcb_list,privbcb); /* order not important */
1009 g_assert(g_list_find(pagepos->privbcb_list,privbcb)!=NULL);
1010 if (pagepos->privbcb_list->next==NULL) { /* exactly one item (we just added it now) */
1012 g_assert(pagepos->shmid==-1);
1013 g_hash_table_insert(page_position_hash,
1015 pagepos); /* value */
1017 else if (pagepos->privbcb_list->next->next==NULL) { /* second mapping - new shm */
1018 struct private_bcb *privbcb_orig;
1019 gint64 privbcb_orig_offset_relative;
1020 gpointer mapped_orig;
1022 g_assert(pagepos->shmid!=-1);
1023 errint=shmctl(pagepos->shmid,
1026 g_assert(errint==0);
1027 g_assert(pagepos->privbcb_list->data==privbcb); /* our privbcb should be the first */
1028 g_assert(pagepos->privbcb_list->next!=NULL); /* we have exactly two items in the list */
1029 g_assert(pagepos->privbcb_list->next->next==NULL); /* we have exactly two items in the list */
1030 privbcb_orig=pagepos->privbcb_list->next->data;
1031 privbcb_orig_offset_relative=pagepos->FileOffset.QuadPart-privbcb_orig->MappedFileOffset.QuadPart;
1032 /* privbcb_orig_offset_relative may be negative up to -PAGE_SIZE
1033 * as 'MappedFileOffset' and 'base' are not page-aligned.
1035 mapped_orig=privbcb_orig->base+privbcb_orig_offset_relative;
1036 memcpy(pageaddr,mapped_orig,PAGE_SIZE);
1037 /* TODO:thread; munmap()..shmat() window */
1038 errint=munmap(mapped_orig,PAGE_SIZE);
1039 g_assert(errint==0);
1040 errptr=shmat(pagepos->shmid,
1041 mapped_orig, /* shmaddr */
1042 0); /* shmflg; !SHM_RDONLY==r/w */
1043 g_assert(errptr==mapped_orig);
1045 g_assert(validate_page_position(pagepos));
1049 /* Fill in the missing pages content todo-list by stored 'pagepos_array' '->building' flags: */
1050 if (!(Flags&MAP_NO_READ)) {
1051 size_t offset_start,offset_end;
1055 offset_start<length_mapped_aligned;
1056 offset_start=offset_end) {
1057 struct page_position *pagepos_start;
1058 size_t offset_built;
1062 offset_end=offset_start+PAGE_SIZE;
1063 pagepos_start=pagepos_array[offset_start/PAGE_SIZE];
1064 if (!pagepos_start->building)
1066 g_assert(offset_start==pagepos_start->FileOffset.QuadPart-FileOffset_bottom.QuadPart);
1067 pageaddr=(gpointer)(((char *)base_aligned)+offset_start);
1068 /* Coalescence of the requests. */
1070 offset_end=offset_start+PAGE_SIZE;
1071 offset_end<length_mapped_aligned;
1072 offset_end+=PAGE_SIZE) {
1073 struct page_position *pagepos_end;
1075 pagepos_end=pagepos_array[offset_end/PAGE_SIZE];
1076 g_assert(offset_end==pagepos_end->FileOffset.QuadPart-FileOffset_bottom.QuadPart);
1077 if (!pagepos_end->building)
1080 /* Read the range content: */
1081 got=captive_Cc_IoPageRead(FileObject,pageaddr,offset_end-offset_start,&pagepos_start->FileOffset);
1085 g_assert(got<=PAGE_SIZE);
1086 after_eof=(got<PAGE_SIZE);
1087 /* Unmark 'building' flags. */
1089 offset_built=offset_start;
1090 offset_built<offset_end;
1091 offset_built+=PAGE_SIZE) {
1092 struct page_position *pagepos_built;
1094 pagepos_built=pagepos_array[offset_built/PAGE_SIZE];
1095 g_assert(offset_built==pagepos_built->FileOffset.QuadPart-FileOffset_bottom.QuadPart);
1096 g_assert(pagepos_built->building==TRUE);
1097 pagepos_built->building=FALSE;
1102 /* offset _into_ page, may not be PAGE_SIZE aligned: */
1103 *Buffer=privbcb->base;
1104 *PublicBcbp=PublicBcb;
1105 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,
1106 "%s: result: privbcb=%p,privbcb->base=%p,privbcb->base+privbcb->MappedLength=%p,privbcb->MappedLength=0x%lX",
1107 G_STRLOC,privbcb,privbcb->base,((char *)privbcb->base)+privbcb->MappedLength,(unsigned long)privbcb->MappedLength);
1108 g_assert(validate_Bcb(PublicBcb)==TRUE);
1109 if (!FileObject->SectionObjectPointers->SharedCacheMap)
1110 FileObject->SectionObjectPointers->SharedCacheMap=PublicBcb;
1112 /* FIXME: (NOTE*1) Weird but it appears as fastfat.sys during make_directory()
1113 * can pass us an already cached 'FileObject' (with different offset/size).
1114 * We must not CcUnpinData() it as its BCB is still referenced (CcUnpinData()ed) by fastfat.sys.
1116 FileObject->SectionObjectPointers->SharedCacheMap=NULL;
1118 FileObject->SectionObjectPointers->SharedCacheMap=PublicBcb;
1126 * @FileObject: Initialized open #FileObject to map.
1127 * %NULL value is forbidden.
1128 * @MappedFileOffset: The @FileObject file offset from where to map the region from.
1129 * Negative value is forbidden.
1130 * @MappedLength: Requested length of the region to map from @FileObject.
1131 * FIXME: Value %0 is currently forbidden by libcaptive; it should be allowed.
1132 * @Wait: Whether disk waiting is permitted for this function.
1133 * Value currently ignored by libcaptive as the data must have been mapped by CcMapData() already anyway.
1134 * @Flags: %PIN_WAIT means whether disk waiting is permitted for this function.
1135 * Value without %PIN_WAIT is currently permtted by libcaptive as the data must have been mapped by CcMapData() already anyway.
1136 * %PIN_NO_READ is the same as %MAP_NO_READ - see CcMapData().
1137 * FIXME: %PIN_EXCLUSIVE for exclusive @Bcb access is now ignored by libcaptive.
1138 * %PIN_IF_BCB if @Bcb should never be created; function is successful only if @Bcb already exists.
1139 * @Bcb: Returns initialized #PUBLIC_BCB to refer to the mapped region.
1140 * The memory region can be larger than requested as it is %PAGE_SIZE aligned.
1141 * %NULL pointer is forbidden.
1142 * @Buffer: Returns the mapped memory region start address.
1143 * This address may not be %PAGE_SIZE aligned.
1144 * %NULL pointer is forbidden.
1146 * This function will allow you to modify the data mapped by CcMapData().
1147 * libcaptive does not differentiate this function with CcMapData().
1149 * NEVER re-read any memory from FileObject here!
1150 * at least fastfat.sys directory create relies on the fact of CcPinRead()
1151 * with already modified buffers to be left intact.
1153 * This call will proceed as CcPinRead() if such #Bcb does not yet exist.
1154 * This is IMO just a bug workaround for a peruse by fastfat.sys FatLocateVolumeLabel().
1156 * Every call to this function must be matched by a one corresponding CcUnpinData() call.
1158 * Returns: %TRUE if the region was successfuly mapped.
1159 * @Bcb with the initialized new memory region.
1160 * @Buffer with the address of the exact byte specified by @FileOffset.
1162 BOOLEAN CcPinMappedData
1163 (IN PFILE_OBJECT FileObject,IN PLARGE_INTEGER FileOffset,IN ULONG Length,IN ULONG Flags,OUT PVOID *Bcb)
1165 struct private_bcb *privbcb;
1167 g_return_val_if_fail(FileObject!=NULL,FALSE);
1168 g_return_val_if_fail(FileOffset!=NULL,FALSE);
1169 g_return_val_if_fail(FileOffset->QuadPart>=0,FALSE);
1170 g_return_val_if_fail(Length>0,FALSE); /* FIXME: not handled below; 0 should be allowed */
1171 /* 'Flags&PIN_WAIT' ignored as we already must have the data mapped */
1172 g_return_val_if_fail(!(Flags&~(PIN_WAIT|PIN_EXCLUSIVE|PIN_NO_READ|PIN_IF_BCB)),FALSE); /* unknown flags? */
1173 g_return_val_if_fail(Bcb!=NULL,FALSE);
1175 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,"%s: FileObject=%p,FileOffset=0x%llX,Length=0x%lX,Flags=0x%lX",G_STRLOC,
1176 FileObject,(guint64)FileOffset->QuadPart,(gulong)Length,(gulong)Flags);
1178 privbcb=captive_privbcb_find(FileObject,FileOffset,Length,NULL);
1179 if (!privbcb && (Flags & PIN_IF_BCB)) /* BCB does not exist */
1181 /* Appropriate privbcb not found.
1182 * This IMO should not happen and it is a bug in the client.
1183 * Unfortuantely fastfat.sys FatLocateVolumeLabel() will CcPinMappedData()
1184 * the volume label dirent without any previous CcMapData() or CcPinRead() !
1194 | (Flags&PIN_NO_READ ? MAP_NO_READ : 0)
1195 | (Flags&PIN_WAIT ? MAP_WAIT : 0),
1200 /* NEVER re-read any memory from FileObject here! */
1202 privbcb_set(privbcb,PRIVBCB_ITEM_REF_COUNT,+1);
1204 /* Memory already mapped by CcMapData(). */
1205 *Bcb=privbcb->PublicBcb;
1212 * @FileObject: Initialized open #FileObject to map.
1213 * %NULL value is forbidden.
1214 * @FileOffset: The @FileObject file offset from where to map the region from.
1215 * Negative value is forbidden.
1216 * @Length: Requested length of the region to map from @FileObject.
1217 * FIXME: Value %0 is currently forbidden by libcaptive; it should be allowed.
1218 * @Flags: %PIN_WAIT means whether disk waiting is permitted for this function.
1219 * Value without %PIN_WAIT is currently permtted by libcaptive as the data must have been mapped by CcMapData() already anyway.
1220 * %PIN_NO_READ is the same as %MAP_NO_READ - see CcMapData().
1221 * FIXME: %PIN_EXCLUSIVE for exclusive @Bcb access is now ignored by libcaptive.
1222 * %PIN_IF_BCB if @Bcb should never be created; function is successful only if @Bcb already exists.
1223 * @Bcb: Returns initialized #PUBLIC_BCB to refer to the mapped region.
1224 * The memory region can be larger than requested as it is %PAGE_SIZE aligned.
1225 * %NULL pointer is forbidden.
1226 * @Buffer: Returns the mapped memory region start address.
1227 * This address may not be %PAGE_SIZE aligned.
1228 * %NULL pointer is forbidden.
1230 * Merely a shortcut call for CcMapData() and CcPinMappedData() afterwards.
1231 * See these two functions for the details. It has a difference to subsequent
1232 * calling of CcMapData() and CcPinMappedData() instead as this call counts
1233 * only as one function for a corresponding CcUnpinData() call.
1235 * Every call to this function must be matched by a one corresponding CcUnpinData() call.
1237 * Returns: %TRUE if the region was successfuly mapped.
1238 * @Bcb with the initialized new memory region.
1239 * @Buffer with the address of the exact byte specified by @FileOffset.
1241 BOOLEAN CcPinRead(IN PFILE_OBJECT FileObject,
1242 IN PLARGE_INTEGER FileOffset,IN ULONG Length,IN ULONG Flags,OUT PVOID *Bcb,OUT PVOID *Buffer)
1244 PVOID Bcb_CcPinMappedData;
1246 gboolean count_CcMapData;
1247 struct private_bcb *privbcb;
1249 g_return_val_if_fail(FileObject!=NULL,FALSE);
1250 g_return_val_if_fail(FileOffset!=NULL,FALSE);
1251 g_return_val_if_fail(FileOffset->QuadPart>=0,FALSE);
1252 g_return_val_if_fail(Length>0,FALSE); /* FIXME: not handled below; 0 should be allowed */
1253 /* 'Flags&PIN_WAIT' ignored as we already must have the data mapped */
1254 g_return_val_if_fail(!(Flags&~(PIN_WAIT|PIN_EXCLUSIVE|PIN_NO_READ|PIN_IF_BCB)),FALSE); /* unknown flags? */
1255 g_return_val_if_fail(Bcb!=NULL,FALSE);
1256 g_return_val_if_fail(Buffer!=NULL,FALSE);
1258 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,"%s: FileObject=%p,FileOffset=0x%llX,Length=0x%lX,Flags=0x%lX",G_STRLOC,
1259 FileObject,(guint64)FileOffset->QuadPart,(gulong)Length,(gulong)Flags);
1261 if (!(Flags&PIN_IF_BCB)) {
1262 errbool=CcMapData(FileObject,FileOffset,Length,
1264 | (Flags&PIN_NO_READ ? MAP_NO_READ : 0)
1265 | (Flags&PIN_WAIT ? MAP_WAIT : 0),
1267 g_return_val_if_fail(errbool==TRUE,FALSE);
1268 count_CcMapData=TRUE;
1271 count_CcMapData=FALSE;
1273 errbool=CcPinMappedData(FileObject,FileOffset,Length,Flags,&Bcb_CcPinMappedData);
1274 if (!(Flags&PIN_IF_BCB)) {
1275 g_return_val_if_fail(errbool==TRUE,FALSE);
1276 g_return_val_if_fail(Bcb_CcPinMappedData==*Bcb,FALSE);
1279 if (errbool==FALSE) /* FALSE permitted; We may fail if Bcb does not exist yet. */
1281 *Bcb=Bcb_CcPinMappedData;
1284 privbcb=captive_privbcb_find(FileObject,FileOffset,Length,*Bcb);
1285 g_assert(privbcb!=NULL);
1286 g_assert(privbcb->ref_count>=1);
1287 g_assert(privbcb->PublicBcb==*Bcb);
1288 if (count_CcMapData) {
1289 /* CcPinRead() must always reference-count only by 1 despite any sub-called functions! */
1290 g_assert(privbcb->ref_count>=2);
1291 privbcb_set(privbcb,PRIVBCB_ITEM_REF_COUNT,-1);
1298 static void logging_notify_privbcb_flush(struct private_bcb *privbcb);
1300 /* Returns: The block was dirty and it was flushed to disk.
1302 static gboolean captive_privbcb_flush_unordered(struct private_bcb *privbcb)
1306 IO_STATUS_BLOCK IoStatus;
1308 gpointer base_sectoraligned;
1309 gsize length_sectoraligned;
1310 LARGE_INTEGER FileOffset_sectoraligned;
1312 struct fileobject_cached *fileobject_cached;
1313 IRP *saved_TopLevelIrp;
1314 static gint64 last_written_lsn=G_MININT64;
1316 g_assert(privbcb->ref_count>0);
1318 if (!privbcb->dirty)
1321 privbcb_set(privbcb,PRIVBCB_ITEM_REF_COUNT_DESTRUCTOR,+1);
1322 logging_notify_privbcb_flush(privbcb);
1323 g_assert(privbcb->ref_count>=2);
1324 privbcb_set(privbcb,PRIVBCB_ITEM_REF_COUNT_DESTRUCTOR,-1);
1326 if (privbcb->lsn_valid) {
1327 if (!(last_written_lsn<=privbcb->lsn.QuadPart))
1328 g_error("%s: last_written_lsn=%" G_GINT64_FORMAT " !<= privbcb->lsn=%" G_GINT64_FORMAT,G_STRLOC,
1329 last_written_lsn,(gint64)privbcb->lsn.QuadPart);
1330 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,"%s: LSN write: last_written_lsn was %" G_GINT64_FORMAT ", is %" G_GINT64_FORMAT,
1331 G_STRLOC,last_written_lsn,(gint64)privbcb->lsn.QuadPart);
1332 last_written_lsn=privbcb->lsn.QuadPart;
1335 /* Prepare NULL TopLevelIrp for fileobject_cached->CallBacks.{AcquireForLazyWrite,ReleaseFromLazyWrite}
1337 saved_TopLevelIrp=IoGetTopLevelIrp();
1338 IoSetTopLevelIrp(NULL);
1340 fileobject_cached_hash_init();
1341 if ((fileobject_cached=g_hash_table_lookup(fileobject_cached_hash,privbcb->FileObject)))
1342 (*fileobject_cached->CallBacks.AcquireForLazyWrite)(
1343 fileobject_cached->LazyWriterContext, /* Context */
1346 g_assert(privbcb->FileObject->DeviceObject!=NULL);
1348 /* We can get 0=='privbcb->FileObject->DeviceObject->SectorSize' during mount of ext2fsd.sys.
1349 * FIXME: We are unable to find the correct sectorsize for a filesystem as
1350 * even the 'CommonFcb' below contains invalid information.
1351 * As we need to have 'sectorsize' <=filesystem_blocksize at least for ext2fsd.sys
1352 * we choose PAGE_SIZE - the maximum libcaptive can with its design and also the maximum
1353 * size ever needed for ext2fsd.sys (PAGE_SIZE is the maximum ext2 block size).
1355 sectorsize=PAGE_SIZE;
1357 sectorsize=privbcb->FileObject->DeviceObject->SectorSize;
1358 if (privbcb->FileObject->FsContext) {
1359 REACTOS_COMMON_FCB_HEADER *CommonFcb=(REACTOS_COMMON_FCB_HEADER *)privbcb->FileObject->FsContext;
1361 /* FIXME: Check CommonFcb->Type */
1362 /* 'AllocationSize' can be less than 'sectorsize' if the total file length is smaller.
1363 * Observed with ext2fsd.sys volume-file.
1365 if (sectorsize<CommonFcb->AllocationSize.QuadPart)
1366 sectorsize=CommonFcb->AllocationSize.QuadPart;
1370 /* Is PAGE_SIZE aligned with 'privbcb->FileObject->DeviceObject->SectorSize'? */
1371 g_assert(sectorsize>0);
1372 g_assert(0==CAPTIVE_ROUND_DOWN_EXCEEDING(PAGE_SIZE,sectorsize));
1373 /* We align here directly the 'privbcb->base' which is not correct.
1374 * We should rather aligned according to 'privbcb->MappedOffset' but
1375 * as 'privbcb->base' with PAGE_SIZE alignment is just a possibly
1376 * better alignment than 'privbcb->FileObject->DeviceObject->SectorSize' it must the same operation.
1378 g_assert(CAPTIVE_ROUND_DOWN_EXCEEDING(privbcb->base,sectorsize)
1379 ==CAPTIVE_ROUND_DOWN_EXCEEDING64(privbcb->MappedFileOffset.QuadPart,sectorsize));
1380 base_sectoraligned =CAPTIVE_ROUND_DOWN(privbcb->base,sectorsize);
1381 length_sectoraligned=CAPTIVE_ROUND_UP(((char *)privbcb->base)+privbcb->MappedLength,sectorsize)
1382 -((char *)base_sectoraligned);
1383 g_assert(0==CAPTIVE_ROUND_DOWN_EXCEEDING(length_sectoraligned,sectorsize));
1384 FileOffset_sectoraligned.QuadPart=CAPTIVE_ROUND_DOWN64(privbcb->MappedFileOffset.QuadPart,sectorsize);
1386 Mdl=MmCreateMdl(NULL,base_sectoraligned,length_sectoraligned);
1387 g_assert(Mdl!=NULL);
1388 MmBuildMdlForNonPagedPool(Mdl);
1390 KeInitializeEvent(&Event,NotificationEvent,FALSE);
1392 /* Use rather IoSynchronousPageWrite() than IoPageWrite() to prevent STATUS_PENDING. */
1393 err=IoSynchronousPageWrite(privbcb->FileObject,Mdl,&FileOffset_sectoraligned,&Event,&IoStatus);
1394 g_assert(NT_SUCCESS(err));
1395 g_assert(NT_SUCCESS(IoStatus.Status));
1396 /* We should write at least the unaligned mapped data although we
1397 * do not need to successfuly write the whole aligned amount.
1398 * FIXME: Also we can get just value 0 if the write is considered 'not dirty'
1399 * during FAT write by fastfat.sys.
1401 g_assert(IoStatus.Information==0 || IoStatus.Information>=CAPTIVE_ROUND_DOWN_EXCEEDING(privbcb->base,sectorsize)
1402 +privbcb->MappedLength);
1403 g_assert(IoStatus.Information<=length_sectoraligned);
1405 if (fileobject_cached)
1406 (*fileobject_cached->CallBacks.ReleaseFromLazyWrite)(
1407 fileobject_cached->LazyWriterContext); /* Context */
1409 /* Restore TopLevelIrp for fileobject_cached->CallBacks.{AcquireForLazyWrite,ReleaseFromLazyWrite}
1411 g_assert(NULL==IoGetTopLevelIrp());
1412 IoSetTopLevelIrp(saved_TopLevelIrp);
1414 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,"%s: 'dirty' flush: FileObject=%p,MappedFileOffset=0x%llX,MappedLength=0x%lX,base=%p"
1415 "; base_sectoraligned=%p,FileOffset_sectoraligned=0x%llX,length_sectoraligned=0x%lX; ->Information=0x%lX",G_STRLOC,
1416 privbcb->FileObject,(guint64)privbcb->MappedFileOffset.QuadPart,(gulong)privbcb->MappedLength,privbcb->base,
1417 base_sectoraligned,(guint64)FileOffset_sectoraligned.QuadPart,(gulong)length_sectoraligned,
1418 (gulong)IoStatus.Information);
1420 privbcb_set(privbcb,PRIVBCB_ITEM_DIRTY,FALSE);
1424 struct captive_privbcb_flush_ordered_param {
1425 struct private_bcb *privbcb_req;
1426 struct private_bcb *found; /* return */
1429 static gboolean captive_privbcb_flush_ordered_foreach_get_first(struct private_bcb *key,struct private_bcb *value,
1430 struct captive_privbcb_flush_ordered_param *captive_privbcb_flush_ordered_param /* data */)
1432 g_return_val_if_fail(key!=NULL,TRUE); /* meaning: stop the traversal */
1433 g_return_val_if_fail(value!=NULL,TRUE); /* meaning: stop the traversal */
1434 g_return_val_if_fail(key==value,TRUE); /* meaning: stop the traversal */
1435 g_return_val_if_fail(validate_Bcb(key->PublicBcb),TRUE); /* meaning: stop the traversal */
1436 g_return_val_if_fail(captive_privbcb_flush_ordered_param!=NULL,TRUE); /* meaning: stop the traversal */
1437 g_return_val_if_fail(captive_privbcb_flush_ordered_param->found==NULL,TRUE); /* meaning: stop the traversal */
1439 g_assert(key->lsn_valid==TRUE);
1441 if (key==captive_privbcb_flush_ordered_param->privbcb_req) {
1442 captive_privbcb_flush_ordered_param->found=key;
1443 return TRUE; /* stop the traversal */
1447 return FALSE; /* continue the traversal */
1449 captive_privbcb_flush_ordered_param->found=key; /* first dirty LSNed buffer */
1450 return TRUE; /* stop the traversal */
1453 /* Use 'privbcb==NULL' to flush all LSNed entries of cache.
1454 * WARNING: Non-LSNed entries will NOT be flushed!
1455 * Returns: Anything was really flushed to disk.
1457 static gboolean captive_privbcb_flush_ordered(struct private_bcb *privbcb_req)
1459 struct private_bcb *privbcb;
1460 struct captive_privbcb_flush_ordered_param captive_privbcb_flush_ordered_param;
1464 if ((privbcb=privbcb_req) && !privbcb->dirty)
1467 if ((privbcb=privbcb_req) && !privbcb->lsn_valid) {
1468 r=captive_privbcb_flush_unordered(privbcb);
1473 private_bcb_lsn_tree_init();
1476 captive_privbcb_flush_ordered_param.privbcb_req=privbcb_req;
1477 captive_privbcb_flush_ordered_param.found=NULL;
1478 g_tree_foreach(private_bcb_lsn_tree,
1479 (GTraverseFunc)captive_privbcb_flush_ordered_foreach_get_first, /* func */
1480 &captive_privbcb_flush_ordered_param); /* user_data */
1481 if (captive_privbcb_flush_ordered_param.found==NULL) {
1482 g_assert(privbcb_req==NULL); /* Global LSN-ordered flush has no more entries. */
1485 privbcb=captive_privbcb_flush_ordered_param.found;
1487 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,
1488 "%s: privbcb->FileObject=%p,privbcb->MappedFileOffset=0x%llX,privbcb->MappedLength=0x%lX,privbcb->ref_count=%d"
1489 ",privbcb->leave_func_pending=%d",G_STRLOC,
1490 privbcb->FileObject,(guint64)privbcb->MappedFileOffset.QuadPart,(gulong)privbcb->MappedLength,(int)privbcb->ref_count,
1491 (int)privbcb->leave_func_pending);
1493 if (privbcb->dirty) {
1494 errbool=captive_privbcb_flush_unordered(privbcb);
1495 g_assert(errbool==TRUE);
1497 continue; /* Restart as anything could change by calling W32 hassle. */
1500 if (privbcb!=privbcb_req)
1501 continue; /* We just flushed a LSNed buffer not yet requested to be destroyed. */
1503 g_assert(privbcb==g_tree_lookup(private_bcb_lsn_tree,privbcb));
1507 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,"%s: return %d",G_STRLOC,(int)r);
1512 static void CcUnpinData_leave_func_finalize(struct private_bcb *privbcb)
1516 g_assert(privbcb->dirty==FALSE);
1517 g_assert(privbcb->lsn_valid==FALSE);
1518 g_assert(NULL==g_tree_lookup(private_bcb_lsn_tree,privbcb));
1519 g_assert(privbcb->leave_func_pending==TRUE);
1520 g_assert(privbcb->ref_count==1);
1521 privbcb_set(privbcb,PRIVBCB_ITEM_LEAVE_FUNC_PENDING,FALSE);
1522 privbcb_set(privbcb,PRIVBCB_ITEM_REF_COUNT_DESTRUCTOR,-1);
1523 errbool=g_hash_table_remove(private_bcb_hash,privbcb->PublicBcb);
1524 g_assert(errbool==TRUE);
1527 static void CcUnpinData_leave_func(struct private_bcb *privbcb) /* NULL to traverse the whole tree */
1529 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,"%s: privbcb=%p,privbcb->ref_count=%d,privbcb->leave_func_pending=%d"
1530 ",privbcb->lsn_valid=%d",G_STRLOC,
1531 privbcb,(!privbcb ? -1 : privbcb->ref_count),(!privbcb ? -1 : privbcb->leave_func_pending),
1532 (!privbcb ? -1 : privbcb->lsn_valid));
1534 g_assert(privbcb->leave_func_pending==TRUE);
1535 g_assert(privbcb->ref_count==1);
1536 captive_privbcb_flush_ordered(privbcb);
1537 privbcb_set(privbcb,PRIVBCB_ITEM_LSN_VALID,FALSE);
1538 CcUnpinData_leave_func_finalize(privbcb);
1539 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,"%s: return",G_STRLOC);
1544 * @Bcb: Initialized #PUBLIC_BCB structure.
1545 * %NULL value is forbidden.
1547 * Dereferences @Bcb with the possible cleanup operations if you were the last owner.
1549 VOID CcUnpinData(IN PVOID Bcb)
1551 PUBLIC_BCB *PublicBcb;
1552 struct private_bcb *privbcb;
1554 g_return_if_fail(validate_Bcb(Bcb));
1556 private_bcb_hash_init();
1558 PublicBcb=(PUBLIC_BCB *)Bcb;
1559 privbcb=g_hash_table_lookup(private_bcb_hash,PublicBcb);
1560 g_return_if_fail(privbcb!=NULL);
1561 g_assert(!privbcb->leave_func_pending);
1563 g_assert(privbcb->FileObject->SectionObjectPointers!=NULL);
1564 /* It may not 'privbcb->FileObject->SectionObjectPointers->SharedCacheMap==PublicBcb'; see (NOTE*1) */
1566 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,
1567 "%s: privbcb->FileObject=%p,privbcb->MappedFileOffset=0x%llX,privbcb->MappedLength=0x%lX,privbcb->ref_count=%d"
1568 ",privbcb->leave_func_pending=%d",G_STRLOC,
1569 privbcb->FileObject,(guint64)privbcb->MappedFileOffset.QuadPart,(gulong)privbcb->MappedLength,(int)privbcb->ref_count,
1570 (int)privbcb->leave_func_pending);
1572 privbcb_set(privbcb,PRIVBCB_ITEM_REF_COUNT_DESTRUCTOR,-1);
1573 if (privbcb->ref_count>0)
1576 g_assert(privbcb->FileObject->SectionObjectPointers!=NULL);
1577 /* It may not 'privbcb->FileObject->SectionObjectPointers->SharedCacheMap==PublicBcb'; see (NOTE*1) */
1578 if (privbcb->FileObject->SectionObjectPointers->SharedCacheMap==PublicBcb)
1579 privbcb->FileObject->SectionObjectPointers->SharedCacheMap=NULL;
1581 /* Caboom: lfs (log file system) of ntfs.sys-NT5.1sp1 will do:
1582 * CcPinRead(); CcUnpinData(); access Buffer (wanna-crash);
1583 * Therefore we must postpone the buffer unmapping to some idle function...
1584 * I expect it a bug in ntfs.sys.
1586 if (!privbcb->leave_func_pending) {
1587 privbcb_set(privbcb,PRIVBCB_ITEM_REF_COUNT_DESTRUCTOR,+1); /* '+1' gets decreased by 'leave_func_pending'. */
1588 privbcb_set(privbcb,PRIVBCB_ITEM_LEAVE_FUNC_PENDING,TRUE);
1589 captive_leave_register(
1590 (captive_leave_func)CcUnpinData_leave_func, /* func */
1591 privbcb); /* data; privbcb */
1594 if (captive_cc_unmounting)
1599 VOID CcRepinBcb(IN PVOID Bcb)
1601 PUBLIC_BCB *PublicBcb;
1602 struct private_bcb *privbcb;
1604 g_return_if_fail(validate_Bcb(Bcb));
1606 private_bcb_hash_init();
1608 PublicBcb=(PUBLIC_BCB *)Bcb;
1609 privbcb=g_hash_table_lookup(private_bcb_hash,PublicBcb);
1610 g_return_if_fail(privbcb!=NULL);
1612 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,"%s: Bcb=%p; privbcb->FileObject=%p",G_STRLOC,
1613 Bcb,privbcb->FileObject);
1615 privbcb_set(privbcb,PRIVBCB_ITEM_REF_COUNT,+1);
1619 VOID CcUnpinRepinnedBcb(IN PVOID Bcb,IN BOOLEAN WriteThrough,IN PIO_STATUS_BLOCK IoStatus)
1621 PUBLIC_BCB *PublicBcb;
1622 struct private_bcb *privbcb;
1624 g_return_if_fail(validate_Bcb(Bcb));
1625 g_return_if_fail(IoStatus!=NULL);
1627 private_bcb_hash_init();
1629 PublicBcb=(PUBLIC_BCB *)Bcb;
1630 privbcb=g_hash_table_lookup(private_bcb_hash,PublicBcb);
1631 g_return_if_fail(privbcb!=NULL);
1633 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,"%s: Bcb=%p,WriteThrough=%d,IoStatus=%p; privbcb->FileObject=%p",G_STRLOC,
1634 Bcb,(gint)WriteThrough,IoStatus,privbcb->FileObject);
1636 /* FIXME: Should we really mark it as dirty by this function?
1637 * Undocumented by W32.
1639 privbcb_set(privbcb,PRIVBCB_ITEM_DIRTY,TRUE);
1641 /* FIXME: Should we really flush the whole 'Bcb'?
1642 * Or maybe just some writes between CcRepinBcb(Bcb) and now? Who knows?
1643 * Undocumented by W32.
1646 captive_privbcb_flush_ordered(privbcb);
1648 IoStatus->Status=STATUS_SUCCESS;
1649 IoStatus->Information=privbcb->MappedLength;
1655 VOID CcSetDirtyPinnedData(IN PVOID Bcb,IN PLARGE_INTEGER Lsn OPTIONAL)
1657 PUBLIC_BCB *PublicBcb;
1658 struct private_bcb *privbcb;
1660 g_return_if_fail(validate_Bcb(Bcb));
1662 private_bcb_hash_init();
1664 PublicBcb=(PUBLIC_BCB *)Bcb;
1665 privbcb=g_hash_table_lookup(private_bcb_hash,PublicBcb);
1666 g_return_if_fail(privbcb!=NULL);
1668 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,"%s: Bcb=%p,Lsn=0x%llX; privbcb->FileObject=%p",G_STRLOC,
1669 Bcb,(guint64)(!Lsn ? -1 : Lsn->QuadPart),privbcb->FileObject);
1671 /* 'privbcb->ref_count' not to be increased by this function. */
1674 /* Unset it first to not to get into unreachable privbcb in 'private_bcb_lsn_tree'. */
1675 privbcb_set(privbcb,PRIVBCB_ITEM_LSN_VALID,FALSE);
1677 privbcb_set(privbcb,PRIVBCB_ITEM_LSN_VALID,TRUE);
1680 /* FIXME: Unset 'lsn_valid' if !Lsn ? Undocumented by W32. */
1681 g_assert(privbcb->lsn_valid==FALSE); /* NOT IMPLEMENTED YET */
1684 privbcb_set(privbcb,PRIVBCB_ITEM_DIRTY,TRUE);
1688 struct CcSetFileSizes_param {
1689 PFILE_OBJECT FileObject;
1690 PCC_FILE_SIZES FileSizes;
1693 /* map: (PUBLIC_BCB *)PublicBcb -> (struct private_bcb *)privbcb */
1694 static void CcSetFileSizes_private_bcb_hash_foreach(
1695 PUBLIC_BCB *PublicBcb, /* key */
1696 struct private_bcb *privbcb, /* value */
1697 struct CcSetFileSizes_param *CcSetFileSizes_param) /* user_data */
1699 g_return_if_fail(PublicBcb!=NULL);
1700 g_return_if_fail(privbcb!=NULL);
1701 g_return_if_fail(CcSetFileSizes_param!=NULL);
1703 if (privbcb->FileObject!=CcSetFileSizes_param->FileObject)
1706 /* size changes behind our cached range? */
1708 && CcSetFileSizes_param->FileSizes->AllocationSize .QuadPart>=privbcb->MappedFileOffset.QuadPart+privbcb->MappedLength
1709 && CcSetFileSizes_param->FileSizes->FileSize .QuadPart>=privbcb->MappedFileOffset.QuadPart+privbcb->MappedLength
1710 && CcSetFileSizes_param->FileSizes->ValidDataLength.QuadPart>=privbcb->MappedFileOffset.QuadPart+privbcb->MappedLength)
1713 /* FIXME: check BCB && 'struct page_position' invalidities */
1714 g_assert_not_reached(); /* NOT IMPLEMENTED YET */
1719 * @FileObject: Initialized open #FileObject to update file sizes of.
1720 * %NULL value is forbidden.
1721 * @FileSizes: New file sizes to update cache to.
1722 * %NULL value is forbidden.
1724 * Update cache properties after file sizes were updated.
1725 * Probably only the exceeding pages need to be unmapped and BCBs updated
1726 * if FileSizes->AllocationSize gets shrunk.
1728 * FIXME: Currently a NOP with no effect by libcaptive.
1730 VOID CcSetFileSizes(IN PFILE_OBJECT FileObject,IN PCC_FILE_SIZES FileSizes)
1732 struct CcSetFileSizes_param CcSetFileSizes_param;
1734 g_return_if_fail(FileObject!=NULL);
1735 g_return_if_fail(FileSizes!=NULL);
1737 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,"%s: FileObject=%p,"
1738 "FileSizes->AllocationSize=0x%llX,FileSizes->FileSize=0x%llX,FileSizes->ValidDataLength=0x%llX",G_STRLOC,
1739 FileObject,(guint64)FileSizes->AllocationSize.QuadPart,(guint64)FileSizes->FileSize.QuadPart,
1740 (guint64)FileSizes->ValidDataLength.QuadPart);
1742 CcSetFileSizes_param.FileObject=FileObject;
1743 CcSetFileSizes_param.FileSizes=FileSizes;
1744 g_hash_table_foreach(
1745 private_bcb_hash, /* hash_table */
1746 (GHFunc)CcSetFileSizes_private_bcb_hash_foreach, /* func */
1747 &CcSetFileSizes_param); /* user_data */
1752 * CcPurgeCacheSection:
1753 * @SectionObjectPointer: Pointer specifying file to purge;
1754 * %NULL value is forbidden.
1755 * libcaptive interprets only #SharedCacheMap field as #PUBLIC_BCB pointer.
1756 * Field #SharedCacheMap value %NULL is permitted; libcaptive does a NOP with %TRUE return code in such case.
1757 * @FileOffset: Starting offset of the ranger to purge.
1758 * %NULL pointer is permitted and it means to purge the whole whole.
1759 * FIXME: Non %NULL pointer is NOT IMPLEMENTED YET by libcaptive.
1760 * @Length: Length of the range to purge. Ignored if @FileOffset==NULL.
1761 * @UninitializeCacheMaps: Purge also private cache maps (FIXME: ???).
1763 * Drop any caching for shrunken file which is not being deleted.
1764 * libcaptive will no longer consider such #BCB as dirty.
1766 * Undocumented: It is required during %FSCTL_LOCK_VOLUME by ntfs.sys of NT-5.1sp1
1767 * to return %TRUE value if #SharedCacheMap value is %NULL.
1769 * Returns: %TRUE if the range was purged successfuly.
1771 BOOLEAN CcPurgeCacheSection(IN PSECTION_OBJECT_POINTERS SectionObjectPointer,
1772 IN PLARGE_INTEGER FileOffset OPTIONAL,IN ULONG Length,IN BOOLEAN UninitializeCacheMaps)
1774 PUBLIC_BCB *PublicBcb;
1775 struct private_bcb *privbcb;
1777 g_return_val_if_fail(SectionObjectPointer!=NULL,FALSE);
1778 if (SectionObjectPointer->SharedCacheMap==NULL)
1779 return TRUE; /* nothing to purge; never return FALSE for ntfs.sys of NT-5.1sp1! */
1780 g_return_val_if_fail(FileOffset==NULL,FALSE); /* NOT IMPLEMENTED YET */
1782 PublicBcb=SectionObjectPointer->SharedCacheMap;
1783 g_return_val_if_fail(validate_Bcb(PublicBcb),FALSE);
1785 private_bcb_hash_init();
1787 privbcb=g_hash_table_lookup(private_bcb_hash,PublicBcb);
1788 g_return_val_if_fail(privbcb!=NULL,FALSE);
1790 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,"%s: SectionObjectPointer=%p(Bcb=%p,privbcb=%p,privbcb->FileObject=%p),"
1791 "FileOffset=0x%llX,Length=0x%lX,UninitializeCacheMaps=%d",G_STRLOC,
1792 SectionObjectPointer,PublicBcb,privbcb,privbcb->FileObject,
1793 (guint64)(!FileOffset ? -1 : FileOffset->QuadPart),(gulong)Length,(gint)UninitializeCacheMaps);
1795 g_assert_not_reached();
1797 privbcb_set(privbcb,PRIVBCB_ITEM_DIRTY,FALSE); /* purge it */
1805 * @FileObject: Initialized open #FileObject to map.
1806 * %NULL value is forbidden.
1807 * @FileOffset: The @FileObject file offset from where to map the region from.
1808 * Negative value is forbidden.
1809 * @Length: Requested length of the region to map from @FileObject.
1810 * Value %0 is permitted (no effect of this function call).
1811 * @Wait: Whether disk waiting is permitted for this function.
1812 * Value %FALSE is currently forbidden by libcaptive as we have no on-demand loading implemented.
1813 * @Buffer: Address of memory region with already allocated memory of size @Length.
1814 * This address may not be %PAGE_SIZE aligned.
1815 * %NULL pointer is forbidden.
1816 * @IoStatus: #PIO_STATUS_BLOCK to return status of this operation.
1817 * %NULL pointer is forbidden.
1819 * Reads the specified region of @FileObject to the given @Buffer.
1820 * No on-demand loading is in effect.
1822 * Returns: %TRUE if the region was successfuly filled with @Length bytes.
1823 * @IoStatus.Status initialized by %STATUS_SUCCESS if successful.
1824 * @IoStatus.Information initialized by @Length if successful.
1826 BOOLEAN CcCopyRead(IN PFILE_OBJECT FileObject,
1827 IN PLARGE_INTEGER FileOffset,IN ULONG Length,IN BOOLEAN Wait,OUT PVOID Buffer,OUT PIO_STATUS_BLOCK IoStatus)
1833 g_return_val_if_fail(FileObject!=NULL,FALSE);
1834 g_return_val_if_fail(FileOffset!=NULL,FALSE);
1835 g_return_val_if_fail(Wait==TRUE || Wait==FALSE,FALSE); /* Prevent 'Wait' upgrade to 'Flags'. */
1836 g_return_val_if_fail(Buffer!=NULL,FALSE);
1837 g_return_val_if_fail(IoStatus!=NULL,FALSE);
1839 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,"%s: FileObject=%p,FileOffset=0x%llX,Length=0x%lX,Wait=%d",G_STRLOC,
1840 FileObject,(guint64)FileOffset->QuadPart,(gulong)Length,(gint)Wait);
1842 IoStatus->Status=STATUS_UNSUCCESSFUL;
1843 IoStatus->Information=0;
1847 FileObject, /* FileObject */
1848 FileOffset, /* FileOffset */
1849 Length, /* Length */
1850 0 /* Flags; !PIN_NO_READ */
1851 | (Wait ? PIN_WAIT : 0),
1852 &MappedBcb, /* Bcb */
1853 &MappedBuffer); /* Buffer */
1854 g_return_val_if_fail(errbool==TRUE,FALSE);
1856 memcpy(Buffer,MappedBuffer,Length);
1858 CcUnpinData(MappedBcb); /* no error code */
1861 IoStatus->Status=STATUS_SUCCESS;
1862 IoStatus->Information=Length;
1870 * @FileObject: Initialized open #FileObject to map.
1871 * %NULL value is forbidden.
1872 * @FileOffset: The @FileObject file offset from where to map the region from.
1873 * Negative value is forbidden.
1874 * @Length: Requested length of the region to map from @FileObject.
1875 * Value %0 is permitted (no effect of this function call).
1876 * @Wait: Whether disk waiting is permitted for this function.
1877 * Value %FALSE is currently forbidden by libcaptive as we have no on-demand loading implemented.
1878 * @Buffer: Address of memory region with already allocated memory of size @Length.
1879 * This address may not be %PAGE_SIZE aligned.
1880 * %NULL pointer is forbidden.
1882 * Writes the specified region of the given @Buffer to @FileObject.
1884 * Returns: %TRUE if the region was successfuly written with @Length bytes.
1886 BOOLEAN CcCopyWrite(IN PFILE_OBJECT FileObject,
1887 IN PLARGE_INTEGER FileOffset,IN ULONG Length,IN BOOLEAN Wait,IN PVOID Buffer)
1893 g_return_val_if_fail(FileObject!=NULL,FALSE);
1894 g_return_val_if_fail(FileOffset!=NULL,FALSE);
1895 g_return_val_if_fail(Wait==TRUE || Wait==FALSE,FALSE); /* Prevent 'Wait' upgrade to 'Flags'. */
1896 g_return_val_if_fail(Buffer!=NULL,FALSE);
1898 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,"%s: FileObject=%p,FileOffset=0x%llX,Length=0x%lX,Wait=%d",G_STRLOC,
1899 FileObject,(guint64)FileOffset->QuadPart,(gulong)Length,(gint)Wait);
1903 FileObject, /* FileObject */
1904 FileOffset, /* FileOffset */
1905 Length, /* Length */
1906 PIN_NO_READ /* Flags */
1907 | (Wait ? PIN_WAIT : 0),
1908 &MappedBcb, /* Bcb */
1909 &MappedBuffer); /* Buffer */
1910 g_return_val_if_fail(errbool==TRUE,FALSE);
1912 memcpy(MappedBuffer,Buffer,Length);
1914 CcSetDirtyPinnedData(
1915 MappedBcb, /* Bcb */
1917 CcUnpinData(MappedBcb); /* no error code */
1926 * @FileObject: Initialized open #FileObject to map.
1927 * %NULL value is forbidden.
1928 * @BytesToWrite: Amount of data to be asked whether it will be accepted.
1929 * Value %0 is permitted.
1930 * @Wait: Whether disk waiting would be permitted during the forthcoming write call.
1931 * @Retrying: Use %TRUE iff calling this function for the second and further times for one request.
1933 * Asks cache manager if it would currently accept write request to @FileObject
1934 * of @BytesToWrite bytes with @Wait condition.
1935 * libcaptive will always accept any writes. This function is a NOP.
1937 * Returns: libcaptive always returns %TRUE.
1939 BOOLEAN CcCanIWrite(IN PFILE_OBJECT FileObject,IN ULONG BytesToWrite,IN BOOLEAN Wait,IN BOOLEAN Retrying)
1941 g_return_val_if_fail(FileObject!=NULL,FALSE);
1942 g_return_val_if_fail(Wait==TRUE || Wait==FALSE,FALSE); /* Prevent 'Wait' upgrade to 'Flags'. */
1943 g_return_val_if_fail(Retrying==TRUE || Retrying==FALSE,FALSE);
1945 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,"%s: FileObject=%p,BytesToWrite=0x%lX,Wait=%d,Retrying=%d",G_STRLOC,
1946 FileObject,(gulong)BytesToWrite,(gint)Wait,(gint)Retrying);
1953 * CcSetReadAheadGranularity:
1954 * @FileObject: Initialized open #FileObject to map.
1955 * %NULL value is forbidden.
1956 * @Granularity: Suggested size of the cache element.
1957 * Value must be larger or requal to %PAGE_SIZE and it must be even power of two.
1959 * libcaptive does not implement any caching and therefore this function
1962 VOID CcSetReadAheadGranularity(IN PFILE_OBJECT FileObject,IN ULONG Granularity)
1964 g_return_if_fail(FileObject!=NULL);
1965 g_return_if_fail(Granularity>=PAGE_SIZE);
1966 g_return_if_fail((Granularity&(Granularity-1))==0); /* Power of two */
1968 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,"%s: FileObject=%p,Granularity=0x%lX",G_STRLOC,
1969 FileObject,(gulong)Granularity);
1971 /* NOP; no caching by libcaptive */
1977 * @SectionObjectPointer: Pointer specifying file to flush;
1978 * %NULL value is forbidden.
1979 * libcaptive interprets only #SharedCacheMap field as #PUBLIC_BCB pointer.
1980 * Field #SharedCacheMap value %NULL is permitted; libcaptive does a NOP in such case.
1981 * @FileOffset: Optional starting point of the range to flush.
1982 * %NULL value is permitted.
1983 * @Length: Length of the range to flush. Ignored if @FileOffset is %NULL.
1984 * @IoStatus: Optionally returns the resulting operation status.
1985 * #Information field will contain the number of bytes flushed.
1986 * %NULL value is permitted.
1988 * Flushes out any pending dirty data in cache manager BCB mapping.
1989 * FIXME: libcaptive currently always flushes the full file ignoring any @FileOffset or @Length.
1991 VOID CcFlushCache(IN PSECTION_OBJECT_POINTERS SectionObjectPointer,
1992 IN PLARGE_INTEGER FileOffset OPTIONAL,IN ULONG Length,OUT PIO_STATUS_BLOCK IoStatus OPTIONAL)
1994 PUBLIC_BCB *PublicBcb;
1995 struct private_bcb *privbcb;
1996 IO_STATUS_BLOCK IoStatus_CcUnpinRepinnedBcb_local;
1998 g_return_if_fail(SectionObjectPointer!=NULL);
2000 if (SectionObjectPointer->SharedCacheMap==NULL) {
2003 IoStatus->Status=STATUS_SUCCESS;
2004 IoStatus->Information=0;
2009 PublicBcb=SectionObjectPointer->SharedCacheMap;
2010 g_return_if_fail(validate_Bcb(PublicBcb));
2012 private_bcb_hash_init();
2014 privbcb=g_hash_table_lookup(private_bcb_hash,PublicBcb);
2015 g_return_if_fail(privbcb!=NULL);
2017 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,"%s: SectionObjectPointer=%p(Bcb=%p,privbcb=%p,privbcb->FileObject=%p),"
2018 "FileOffset=0x%llX,Length=0x%lX,IoStatus=%p",G_STRLOC,
2019 SectionObjectPointer,PublicBcb,privbcb,privbcb->FileObject,
2020 (guint64)(!FileOffset ? -1 : FileOffset->QuadPart),(gulong)Length,IoStatus);
2023 if (FileOffset->QuadPart >=privbcb->MappedFileOffset.QuadPart+privbcb->MappedLength)
2025 if (FileOffset->QuadPart+Length<=privbcb->MappedFileOffset.QuadPart)
2029 /* We may find some 'privbcb' being already sheduled to be destroyed.
2030 * We need to reference it to not to loose it in the middle of our flush operation.
2032 CcRepinBcb(PublicBcb);
2034 /* FIXME: Flush just FileOffset..FileOfset+Length part */
2035 captive_privbcb_flush_ordered(privbcb);
2038 PublicBcb, /* Bcb */
2039 TRUE, /* WriteThrough; ignored by libcaptive */
2040 &IoStatus_CcUnpinRepinnedBcb_local); /* IoStatus; ignored here */
2043 IoStatus->Status=STATUS_SUCCESS;
2044 IoStatus->Information=(FileOffset && Length ? MIN(privbcb->MappedLength,Length) : privbcb->MappedLength);
2049 BOOLEAN CcZeroData(IN PFILE_OBJECT FileObject,IN PLARGE_INTEGER StartOffset,IN PLARGE_INTEGER EndOffset,IN BOOLEAN Wait)
2051 SECTION_OBJECT_POINTERS *SectionObjectPointers_orig;
2056 g_return_val_if_fail(FileObject!=NULL,FALSE);
2057 g_return_val_if_fail(StartOffset!=NULL,FALSE);
2058 g_return_val_if_fail(EndOffset!=NULL,FALSE);
2059 g_return_val_if_fail(StartOffset->QuadPart<=EndOffset->QuadPart,FALSE);
2060 g_return_val_if_fail((EndOffset->QuadPart-StartOffset->QuadPart)
2061 ==(ULONG)(EndOffset->QuadPart-StartOffset->QuadPart),FALSE);
2062 g_return_val_if_fail(Wait==TRUE || Wait==FALSE,FALSE); /* Prevent 'Wait' upgrade to 'Flags'. */
2064 SectionObjectPointers_orig=FileObject->SectionObjectPointers;
2066 errboolean=CcPreparePinWrite(
2067 FileObject, /* FileObject */
2068 StartOffset, /* FileOffset */
2069 EndOffset->QuadPart-StartOffset->QuadPart, /* Length */
2071 PIN_WAIT|PIN_NO_READ, /* Flags */
2073 &Buffer); /* Buffer */
2074 g_assert(errboolean==TRUE);
2078 FileObject->SectionObjectPointers=SectionObjectPointers_orig;
2084 /* map (PVOID LogHandle) -> (GList (of FILE_OBJECT *) *FileObject_list) */
2085 static GHashTable *log_handle_hash;
2087 static void log_handle_hash_init(void)
2089 if (log_handle_hash)
2091 log_handle_hash=g_hash_table_new(
2092 g_direct_hash, /* hash_func */
2093 g_direct_equal); /* key_equal_func */
2096 /* map (FILE_OBJECT *FileObject) -> (struct FileObject_logging *) */
2097 struct FileObject_logging {
2099 PFLUSH_TO_LSN FlushToLsnRoutine;
2102 static GHashTable *FileObject_logging_hash;
2104 static void FileObject_logging_hash_init(void)
2106 if (FileObject_logging_hash)
2108 FileObject_logging_hash=g_hash_table_new(
2109 g_direct_hash, /* hash_func */
2110 g_direct_equal); /* key_equal_func */
2113 static void logging_notify_privbcb_flush(struct private_bcb *privbcb)
2115 struct FileObject_logging *FileObject_logging;
2117 g_return_if_fail(privbcb!=NULL);
2119 if (!privbcb->lsn_valid) /* nothing to report anyway */
2122 FileObject_logging_hash_init();
2124 if (!(FileObject_logging=g_hash_table_lookup(FileObject_logging_hash,privbcb->FileObject)))
2127 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,"%s: privbcb=%p,privbcb->FileObject=%p,privbcb->lsn=0x%llX: call",G_STRLOC,
2128 privbcb,privbcb->FileObject,(guint64)privbcb->lsn.QuadPart);
2130 (*FileObject_logging->FlushToLsnRoutine)(FileObject_logging->LogHandle,privbcb->lsn);
2132 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,"%s: privbcb=%p,privbcb->FileObject=%p,privbcb->lsn=0x%llX: finish",G_STRLOC,
2133 privbcb,privbcb->FileObject,(guint64)privbcb->lsn.QuadPart);
2136 VOID CcSetLogHandleForFile(IN PFILE_OBJECT FileObject,IN PVOID LogHandle,IN PFLUSH_TO_LSN FlushToLsnRoutine)
2138 GList *LogHandle_list;
2139 struct FileObject_logging *FileObject_logging;
2141 g_return_if_fail(FileObject!=NULL);
2142 /* 'LogHandle' may be NULL */
2143 g_return_if_fail(FlushToLsnRoutine!=NULL);
2145 log_handle_hash_init();
2146 FileObject_logging_hash_init();
2148 if (!(FileObject_logging=g_hash_table_lookup(
2149 FileObject_logging_hash,FileObject))) {
2150 captive_new(FileObject_logging);
2151 g_hash_table_insert(FileObject_logging_hash,
2152 FileObject,FileObject_logging);
2155 LogHandle_list=g_hash_table_lookup(log_handle_hash,FileObject_logging->LogHandle);
2156 g_assert(NULL!=g_list_find(LogHandle_list,FileObject));
2157 LogHandle_list=g_list_remove(LogHandle_list,FileObject);
2158 g_assert(NULL==g_list_find(LogHandle_list,FileObject));
2159 g_hash_table_insert(log_handle_hash,FileObject_logging->LogHandle,LogHandle_list);
2162 FileObject_logging->LogHandle=LogHandle;
2163 FileObject_logging->FlushToLsnRoutine=FlushToLsnRoutine;
2165 LogHandle_list=g_hash_table_lookup(log_handle_hash,LogHandle);
2166 LogHandle_list=g_list_prepend(LogHandle_list,FileObject);
2167 g_hash_table_insert(log_handle_hash,LogHandle,LogHandle_list);
2171 struct CcGetDirtyPages_param {
2172 PDIRTY_PAGE_ROUTINE DirtyPageRoutine; /* arg of CcGetDirtyPages() */
2173 IN PVOID Context1; /* arg of CcGetDirtyPages() */
2174 IN PVOID Context2; /* arg of CcGetDirtyPages() */
2175 FILE_OBJECT *FileObject; /* search through 'page_position_hash' for 'FileObject' */
2176 LARGE_INTEGER OldestLsn; gboolean OldestLsn_found; /* intermediate return value of CcGetDirtyPages() */
2179 static void CcGetDirtyPages_page_position_hash_foreach(
2180 struct page_position *pagepos, /* key */
2181 struct page_position *pagepos2, /* value */
2182 struct CcGetDirtyPages_param *CcGetDirtyPages_param) /* user_data */
2184 LARGE_INTEGER FileOffset_local;
2185 LARGE_INTEGER OldestLsn,NewestLsn;
2186 LARGE_INTEGER OldestLsn_check,NewestLsn_check;
2187 gboolean lsn_found=FALSE;
2188 GList *privbcb_list;
2190 g_return_if_fail(pagepos!=NULL);
2191 g_return_if_fail(pagepos==pagepos2);
2192 g_return_if_fail(CcGetDirtyPages_param!=NULL);
2194 FileOffset_local=pagepos->FileOffset;
2197 privbcb_list=pagepos->privbcb_list;
2199 privbcb_list=privbcb_list->next) {
2200 struct private_bcb *privbcb=privbcb_list->data;
2202 if (!privbcb->lsn_valid)
2205 OldestLsn=NewestLsn=privbcb->lsn;
2208 OldestLsn.QuadPart=MIN(OldestLsn.QuadPart,privbcb->lsn.QuadPart);
2209 NewestLsn.QuadPart=MAX(NewestLsn.QuadPart,privbcb->lsn.QuadPart);
2215 if (!CcGetDirtyPages_param->OldestLsn_found) {
2216 CcGetDirtyPages_param->OldestLsn=OldestLsn;
2217 CcGetDirtyPages_param->OldestLsn_found=TRUE;
2220 CcGetDirtyPages_param->OldestLsn.QuadPart=MIN(CcGetDirtyPages_param->OldestLsn.QuadPart,OldestLsn.QuadPart);
2222 OldestLsn_check=OldestLsn;
2223 NewestLsn_check=NewestLsn;
2225 (*CcGetDirtyPages_param->DirtyPageRoutine)(
2226 pagepos->FileObject, /* FileObject */
2227 &FileOffset_local, /* FileOffset */
2228 PAGE_SIZE, /* Length */
2229 &OldestLsn, /* OldestLsn */
2230 &NewestLsn, /* NewestLsn */
2231 CcGetDirtyPages_param->Context1, /* Context1 */
2232 CcGetDirtyPages_param->Context2); /* Context2 */
2234 /* just unconfirmed sanity: */
2235 g_assert(FileOffset_local.QuadPart==pagepos->FileOffset.QuadPart); /* check for possible corruption */
2236 g_assert(OldestLsn_check.QuadPart==OldestLsn.QuadPart);
2237 g_assert(NewestLsn_check.QuadPart==NewestLsn.QuadPart);
2240 /* libcaptive must return #gint64 instead of the official #LARGE_INTEGER
2241 * as W32 expects it as value in EAX:EDX but GCC returns the structure address in EAX.
2243 gint64 /* instead of LARGE_INTEGER */ CcGetDirtyPages(IN PVOID LogHandle,
2244 IN PDIRTY_PAGE_ROUTINE DirtyPageRoutine,IN PVOID Context1,IN PVOID Context2)
2246 GList *LogHandle_list;
2247 struct CcGetDirtyPages_param CcGetDirtyPages_param;
2249 /* 'LogHandle' may be NULL */
2250 g_return_val_if_fail(DirtyPageRoutine!=NULL,0);
2252 log_handle_hash_init();
2253 page_position_hash_init();
2255 CcGetDirtyPages_param.DirtyPageRoutine=DirtyPageRoutine;
2256 CcGetDirtyPages_param.Context1=Context1;
2257 CcGetDirtyPages_param.Context2=Context2;
2258 CcGetDirtyPages_param.OldestLsn_found=FALSE;
2261 LogHandle_list=g_hash_table_lookup(log_handle_hash,LogHandle);
2263 LogHandle_list=LogHandle_list->next) {
2264 CcGetDirtyPages_param.FileObject=LogHandle_list->data;
2265 g_hash_table_foreach(
2266 page_position_hash, /* hash_table */
2267 (GHFunc)CcGetDirtyPages_page_position_hash_foreach, /* func */
2268 &CcGetDirtyPages_param); /* user_data */
2271 if (!CcGetDirtyPages_param.OldestLsn_found)
2273 return CcGetDirtyPages_param.OldestLsn.QuadPart;
2278 * CcSetAdditionalCacheAttributes:
2279 * @FileObject: Initialized open #FileObject to map.
2280 * %NULL value is forbidden.
2281 * @DisableReadAhead: Read-ahead should not be done by Cache Manager.
2282 * @DisableWriteBehind: Write-behind should not be done by Cache Manager.
2284 * libcaptive does not implement any caching and therefore this function
2287 VOID CcSetAdditionalCacheAttributes(IN PFILE_OBJECT FileObject,IN BOOLEAN DisableReadAhead,IN BOOLEAN DisableWriteBehind)
2289 g_return_if_fail(FileObject!=NULL);
2291 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,"%s: FileObject=%p,DisableReadAhead=%s,DisableWriteBehind=%s",G_STRLOC,
2292 FileObject,(DisableReadAhead ? "TRUE" : "FALSE"),(DisableWriteBehind ? "TRUE" : "FALSE"));
2294 /* NOP; no caching by libcaptive */
2299 * CcSetBcbOwnerPointer:
2300 * @Bcb: Initialized #PUBLIC_BCB structure.
2301 * %NULL value is forbidden.
2302 * @Owner: Thread-specific pointer (FIXME: Is it KeGetCurrentThread()?).
2303 * %NULL value is forbidden (FIXME: Is it W32 compliant?).
2305 * Set thread-specific pointer for a pinned @Bcb. Use CcUnpinDataForThread()
2306 * when @Bcb is no longer needed. CcUnpinDataForThread() is NOT a reverse
2307 * operation for this single call CcSetBcbOwnerPointer(), see CcUnpinDataForThread().
2309 * libcaptive implements this function as no-operation as it does not yet
2310 * support any threading.
2312 VOID CcSetBcbOwnerPointer(IN PVOID Bcb,IN PVOID Owner)
2314 g_return_if_fail(Bcb!=NULL);
2315 g_return_if_fail(Owner!=NULL);
2317 /* FIXME:thread; NOP if no threads present */
2322 * CcUnpinDataForThread:
2323 * @Bcb: Initialized #PUBLIC_BCB structure.
2324 * %NULL value is forbidden.
2325 * @ResourceThreadId: Thread-specific pointer (FIXME: Is it KeGetCurrentThread()?).
2326 * This pointer had to be passed to CcSetBcbOwnerPointer() #Owner parameter previously.
2327 * %NULL value is forbidden (FIXME: is it W32 compliant?).
2329 * CcUnpinData() for a thread specified by @ResourceThreadId.
2330 * Reverse operation for a pair of CcMapData() and CcSetBcbOwnerPointer().
2332 * libcaptive implements this function as a simple pass to CcUnpinData() as it does not yet
2333 * support any threading.
2335 VOID CcUnpinDataForThread(IN PVOID Bcb,IN ERESOURCE_THREAD ResourceThreadId)
2337 g_return_if_fail(Bcb!=NULL);
2338 g_return_if_fail(ResourceThreadId!=0);
2348 * @Bcb: Initialized #PUBLIC_BCB structure.
2349 * %NULL value is forbidden.
2351 * Create a copy of @Bcb for the exactly same file contents as is @Bcb.
2352 * The returned copy has the same attributes as the result of CcMapData()
2353 * notwithstanding the current state of input @Bcb, therefore it is only
2354 * for read/only access etc.
2356 * libcaptive calls CcMapData() internally with @Bcb parameters.
2358 * Returns: Copy of @Bcb. This _pointer_ never equals to @Bcb.
2359 * It should be some different
2360 * #PUBLIC_BCB structure according to W32 doc.
2362 PVOID CcRemapBcb(IN PVOID Bcb)
2365 PVOID Buffer_unused;
2367 PUBLIC_BCB *PublicBcb;
2368 struct private_bcb *privbcb;
2370 g_return_val_if_fail(validate_Bcb(Bcb),NULL);
2372 private_bcb_hash_init();
2374 PublicBcb=(PUBLIC_BCB *)Bcb;
2375 privbcb=g_hash_table_lookup(private_bcb_hash,PublicBcb);
2376 g_return_val_if_fail(privbcb!=NULL,NULL);
2378 g_log(G_LOG_DOMAIN,G_LOG_LEVEL_DEBUG,
2379 "%s: privbcb->FileObject=%p,privbcb->MappedFileOffset=0x%llX,privbcb->MappedLength=0x%lX,privbcb->ref_count=%d",G_STRLOC,
2380 privbcb->FileObject,(guint64)privbcb->MappedFileOffset.QuadPart,(gulong)privbcb->MappedLength,(int)privbcb->ref_count);
2383 privbcb->FileObject, /* FileObject */
2384 &privbcb->MappedFileOffset, /* FileOffset */
2385 privbcb->MappedLength, /* Length */
2386 MAP_WAIT, /* Flags; && !MAP_NO_READ */
2388 &Buffer_unused); /* Buffer */
2389 g_return_val_if_fail(errbool==TRUE,NULL);
2390 g_return_val_if_fail(r!=NULL,NULL);
2391 g_return_val_if_fail(Buffer_unused!=NULL,NULL);
2399 * CcPreparePinWrite:
2400 * @FileObject: Initialized open #FileObject to map.
2401 * %NULL value is forbidden.
2402 * @FileOffset: The @FileObject file offset from where to map the region from.
2403 * Negative value is forbidden.
2404 * @Length: Requested length of the region to map from @FileObject.
2405 * FIXME: Value %0 is currently forbidden by libcaptive; it should be allowed.
2406 * @Zero: %TRUE if the area of @FileOffset...@FileOffset+@Length should be cleared.
2407 * @Flags: %PIN_WAIT means whether disk waiting is permitted for this function.
2408 * Value without %PIN_WAIT is currently permtted by libcaptive as the data must have been mapped by CcMapData() already anyway.
2409 * %PIN_NO_READ is the same as %MAP_NO_READ - see CcMapData().
2410 * FIXME: %PIN_EXCLUSIVE for exclusive @Bcb access is now ignored by libcaptive.
2411 * %PIN_IF_BCB if @Bcb should never be created; function is successful only if @Bcb already exists.
2412 * @Bcb: Returns initialized #PUBLIC_BCB to refer to the mapped region.
2413 * The memory region can be larger than requested as it is %PAGE_SIZE aligned.
2414 * %NULL pointer is forbidden.
2415 * @Buffer: Returns the mapped memory region start address.
2416 * This address may not be %PAGE_SIZE aligned.
2417 * %NULL pointer is forbidden.
2419 * Wrapper for a pair of CcPinRead() and CcSetDirtyPinnedData().
2420 * The mapped range can be also optionally cleared if @Zero is specified.
2421 * See CcPinRead() for a more detailed documentation.
2423 * FIXME: libcaptive will read even the file pages completely not need
2424 * in the case @Zero was specified.
2426 * Returns: %TRUE if the mapping was successful.
2428 BOOLEAN CcPreparePinWrite(IN PFILE_OBJECT FileObject,
2429 IN PLARGE_INTEGER FileOffset,IN ULONG Length,IN BOOLEAN Zero,IN ULONG Flags,OUT PVOID *Bcb,OUT PVOID *Buffer)
2433 g_return_val_if_fail(FileObject!=NULL,FALSE);
2434 g_return_val_if_fail(FileOffset!=NULL,FALSE);
2435 g_return_val_if_fail(FileOffset->QuadPart>=0,FALSE);
2436 g_return_val_if_fail(Length>0,FALSE); /* FIXME: not handled below; 0 should be allowed */
2437 /* 'Flags' passed to CcPinRead() */
2438 g_return_val_if_fail(Bcb!=NULL,FALSE);
2439 g_return_val_if_fail(Buffer!=NULL,FALSE);
2441 errbool=CcPinRead(FileObject,FileOffset,Length,Flags|(Zero ? PIN_NO_READ : 0),Bcb,Buffer);
2442 g_return_val_if_fail(errbool==TRUE,FALSE);
2444 CcSetDirtyPinnedData(
2446 NULL); /* Lsn; OPTIONAL */
2449 memset(*Buffer,0,Length);
2456 VOID FsRtlIncrementCcFastReadNoWait(VOID)
2458 /* FIXME: {{%fs:[0]}+0x4E0}:LONG++ */
2462 NTSTATUS CcWaitForCurrentLazyWriterActivity(VOID)
2464 return STATUS_SUCCESS;