source: trunk/src/kernel32/mmap.cpp@ 2032

Last change on this file since 2032 was 2032, checked in by sandervl, 26 years ago

code heap added + changed back winres fix (breaks Notes) + heapstring fixes
File size: 20.1 KB
Line 
1/* $Id: mmap.cpp,v 1.26 1999-12-09 00:52:21 sandervl Exp $ */
2
3/*
4 * Win32 Memory mapped file & view classes
5 *
6 * Copyright 1999 Sander van Leeuwen (sandervl@xs4all.nl)
7 *
8 * NOTE: Memory mapping DOES NOT work when kernel-mode code causes
9 * a pagefault in the memory mapped object. (exceptions aren't
10 * dispatched to our exception handler until after the kernel mode
11 * call returns (too late))
12 *
13 * NOTE: Are apps allowed to change the protection flags of memory mapped pages?
14 * I'm assuming they aren't for now.
15 *
16 * TODO: Handles returned should be usable by all apis that accept file handles
17 * TODO: Sharing memory mapped files between multiple processes
18 *
19 * Project Odin Software License can be found in LICENSE.TXT
20 *
21 */
22#include <os2win.h>
23#include <stdio.h>
24#include <stdlib.h>
25#include <string.h>
26#include <win\virtual.h>
27#include <vmutex.h>
28#include <handlemanager.h>
29#include "mmap.h"
30#include "oslibdos.h"
31#include <winimagepeldr.h>
32
33//Global DLL Data
34#pragma data_seg(_GLOBALDATA)
35Win32MemMap *Win32MemMap::memmaps = NULL;
36VMutex globalmapMutex(VMUTEX_SHARED);
37#pragma data_seg()
38VMutex globalviewMutex;
39Win32MemMapView *Win32MemMapView::mapviews = NULL;
40
41//******************************************************************************
42//TODO: sharing between processes
43//******************************************************************************
44Win32MemMap::Win32MemMap(HFILE hfile, ULONG size, ULONG fdwProtect, LPSTR lpszName)
45 : nrMappings(0), pMapping(NULL), mMapAccess(0), referenced(0), image(0)
46{
47 globalmapMutex.enter();
48 next = memmaps;
49 memmaps = this;
50 globalmapMutex.leave();
51
52 hMemFile = hfile;
53
54 mSize = size;
55 mProtFlags = fdwProtect;
56 mProcessId = GetCurrentProcess();
57
58 if(lpszName) {
59 lpszMapName = (char *)_smalloc(strlen(lpszName)+1);
60 strcpy(lpszMapName, lpszName);
61 }
62 else lpszMapName = NULL;
63}
64//******************************************************************************
65//Map constructor used for executable image maps (only used internally)
66//******************************************************************************
67Win32MemMap::Win32MemMap(Win32PeLdrImage *pImage, ULONG baseAddress, ULONG size)
68 : nrMappings(0), pMapping(NULL), mMapAccess(0), referenced(0)
69{
70 globalmapMutex.enter();
71 next = memmaps;
72 memmaps = this;
73 globalmapMutex.leave();
74
75 hMemFile = -1;
76
77 mSize = size;
78 mProtFlags = PAGE_READWRITE;
79 mProcessId = GetCurrentProcess();
80
81 pMapping = (LPVOID)baseAddress;
82
83 image = pImage;
84 lpszMapName= NULL;
85}
86//******************************************************************************
87//******************************************************************************
88BOOL Win32MemMap::Init(HANDLE hMemMap)
89{
90 mapMutex.enter();
91 if(hMemFile != -1)
92 {
93 if(DuplicateHandle(mProcessId, hMemFile, GetCurrentProcess(),
94 &hMemFile, 0, FALSE, DUPLICATE_SAME_ACCESS) == FALSE)
95 {
96 dprintf(("Win32MemMap::Init: DuplicateHandle failed!"));
97 goto fail;
98 }
99 mSize = SetFilePointer(hMemFile, 0, NULL, FILE_END);
100 if(mSize == -1) {
101 dprintf(("Win32MemMap::init: SetFilePointer failed to set pos end"));
102 goto fail;
103 }
104 //SvL: Temporary limitation of size (Warp Server Advanced doesn't allow
105 // one to reserve more than 450 MB of continuous memory; (Warp 4
106 // much less))
107 if(mSize > 64*1024*1024) {
108 mSize = 64*1024*1024;
109 }
110 }
111
112 dprintf(("CreateFileMappingA for file %x, prot %x size %d, name %s", hMemFile, mProtFlags, mSize, lpszMapName));
113 this->hMemMap = hMemMap;
114 mapMutex.leave();
115 return TRUE;
116fail:
117 mapMutex.leave();
118 return FALSE;
119}
120//******************************************************************************
121//******************************************************************************
122Win32MemMap::~Win32MemMap()
123{
124 Win32MemMapView::deleteViews(this); //delete all views of our memory mapped file
125
126 dprintf(("Win32MemMap dtor: deleting view %x %x", pMapping, mSize));
127
128 mapMutex.enter();
129 if(lpszMapName) {
130 free(lpszMapName);
131 }
132 if(pMapping && !image) {
133 if(lpszMapName) {
134 OSLibDosFreeMem(pMapping);
135 }
136 else VirtualFree(pMapping, mSize, MEM_RELEASE);
137
138 pMapping = NULL;
139 }
140 if(hMemFile != -1) {
141 CloseHandle(hMemFile);
142 hMemFile = -1;
143 }
144 mapMutex.leave();
145
146 globalmapMutex.enter();
147 Win32MemMap *map = memmaps;
148
149 if(map == this) {
150 memmaps = next;
151 }
152 else {
153 while(map->next) {
154 if(map->next == this)
155 break;
156 map = map->next;
157 }
158 if(map->next) {
159 map->next = next;
160 }
161 else dprintf(("Win32MemMap::~Win32MemMap: map not found!! (%x)", this));
162 }
163 globalmapMutex.leave();
164}
165//******************************************************************************
166//We determine whether a page has been modified by checking it's protection flags
167//If the write flag is set, this means commitPage had to enable this due to a pagefault
168//(all pages are readonly until the app tries to write to it)
169//******************************************************************************
170BOOL Win32MemMap::commitPage(ULONG offset, BOOL fWriteAccess, int nrpages)
171{
172 MEMORY_BASIC_INFORMATION memInfo;
173 LPVOID lpPageFaultAddr = (LPVOID)((ULONG)pMapping + offset);
174 DWORD pageAddr = (DWORD)lpPageFaultAddr & ~0xFFF;
175 DWORD oldProt, newProt, nrBytesRead, size;
176
177// mapMutex.enter();
178
179 if(image) {
180 return image->commitPage(pageAddr, fWriteAccess);
181 }
182 newProt = mProtFlags & (PAGE_READONLY | PAGE_READWRITE | PAGE_WRITECOPY);
183
184 dprintf(("Win32MemMap::commitPage %x (faultaddr %x)", pageAddr, lpPageFaultAddr));
185 if(hMemFile != -1) {
186 if(VirtualQuery((LPSTR)pageAddr, &memInfo, nrpages*PAGE_SIZE) == 0) {
187 dprintf(("Win32MemMap::commitPage: VirtualQuery (%x,%x) failed for %x", pageAddr, nrpages*PAGE_SIZE));
188 goto fail;
189 }
190 //Only changes the state of the pages with the same attribute flags
191 //(returned in memInfo.RegionSize)
192 //If it's smaller than the mNrPages, it simply means one or more of the
193 //other pages have already been committed
194 if(memInfo.State & MEM_COMMIT)
195 {//if it's already committed, then the app tried to write to it
196 if(!fWriteAccess) {
197 dprintf(("Win32MemMap::commitPage: Huh? Already committed and not trying to write (%x,%x) failed for %x", pageAddr, memInfo.RegionSize));
198 goto fail;
199 }
200 if(VirtualProtect((LPVOID)pageAddr, memInfo.RegionSize, newProt, &oldProt) == FALSE) {
201 dprintf(("Win32MemMap::commitPage: Failed to set write flag on page (%x,%x) failed for %x", pageAddr, memInfo.RegionSize));
202 goto fail;
203 }
204 }
205 else {
206 if(VirtualAlloc((LPVOID)pageAddr, memInfo.RegionSize, MEM_COMMIT, PAGE_READWRITE) == FALSE) {
207 goto fail;
208 }
209 offset = pageAddr - (ULONG)pMapping;
210 size = memInfo.RegionSize;
211 if(offset + size > mSize) {
212 dprintf(("Adjusting size from %d to %d", size, mSize - offset));
213 size = mSize - offset;
214 }
215 if(SetFilePointer(hMemFile, offset, NULL, FILE_BEGIN) != offset) {
216 dprintf(("Win32MemMap::commitPage: SetFilePointer failed to set pos to %x", offset));
217 goto fail;
218 }
219 if(ReadFile(hMemFile, (LPSTR)pageAddr, size, &nrBytesRead, NULL) == FALSE) {
220 dprintf(("Win32MemMap::commitPage: ReadFile failed for %x", pageAddr));
221 goto fail;
222 }
223 if(nrBytesRead != size) {
224 dprintf(("Win32MemMap::commitPage: ReadFile didn't read all bytes for %x", pageAddr));
225 goto fail;
226 }
227 if(mProtFlags != PAGE_READWRITE) {
228 if(VirtualProtect((LPVOID)pageAddr, memInfo.RegionSize, newProt, &oldProt) == FALSE) {
229 goto fail;
230 }
231 }
232 }
233 }
234 else {
235 if(VirtualQuery((LPSTR)pageAddr, &memInfo, nrpages*PAGE_SIZE) == 0) {
236 dprintf(("Win32MemMap::commitPage: VirtualQuery (%x,%x) failed for %x", pageAddr, nrpages*PAGE_SIZE));
237 goto fail;
238 }
239 if(!(memInfo.State & MEM_COMMIT))
240 {//if it's already committed, then the app tried to write to it
241 if(VirtualAlloc((LPVOID)pageAddr, memInfo.RegionSize, MEM_COMMIT, newProt) == FALSE)
242 goto fail;
243 }
244 }
245
246// mapMutex.leave();
247 return TRUE;
248fail:
249// mapMutex.leave();
250 return FALSE;
251}
252//******************************************************************************
253//******************************************************************************
254BOOL Win32MemMap::unmapViewOfFile(Win32MemMapView *view)
255{
256 mapMutex.enter();
257
258 if(nrMappings == 0)
259 goto fail;
260
261 delete view;
262
263 if(--nrMappings) {
264 VirtualFree(pMapping, mSize, MEM_RELEASE);
265 pMapping = NULL;
266 }
267 mapMutex.leave();
268 return TRUE;
269fail:
270 mapMutex.leave();
271 return FALSE;
272}
273//******************************************************************************
274//******************************************************************************
275LPVOID Win32MemMap::mapViewOfFile(ULONG size, ULONG offset, ULONG fdwAccess)
276{
277 DWORD processId = GetCurrentProcess();
278
279 mapMutex.enter();
280 ULONG memFlags = (mProtFlags & (PAGE_READONLY | PAGE_READWRITE | PAGE_WRITECOPY));
281 ULONG fAlloc = 0;
282 Win32MemMapView *mapview;
283
284 //@@@PH: if(fdwAccess & ~(FILE_MAP_WRITE|FILE_MAP_READ|FILE_MAP_COPY))
285 // Docs say FILE_MAP_ALL_ACCESS is same as FILE_MAP_WRITE. Doesn't match reality though.
286 if(fdwAccess & ~FILE_MAP_ALL_ACCESS)
287 goto parmfail;
288 if((fdwAccess & FILE_MAP_WRITE) && !(mProtFlags & PAGE_READWRITE))
289 goto parmfail;
290 if((fdwAccess & FILE_MAP_READ) && !(mProtFlags & (PAGE_READWRITE|PAGE_READONLY)))
291 goto parmfail;
292
293 //@@@PH
294 if (fdwAccess != FILE_MAP_ALL_ACCESS)
295 if((fdwAccess & FILE_MAP_COPY) && !(mProtFlags & PAGE_WRITECOPY))
296 goto parmfail;
297
298 if(offset+size > mSize)
299 goto parmfail;
300
301//TODO: If committed, read file into memory
302#if 0
303 if(mProtFlags & SEC_COMMIT)
304 fAlloc |= MEM_COMMIT;
305 else
306 if(mProtFlags & SEC_RESERVE)
307 fAlloc |= MEM_RESERVE;
308#else
309 fAlloc = MEM_RESERVE;
310#endif
311
312 //Memory has already been allocated for executable image maps (only used internally)
313 if(!pMapping && nrMappings == 0) {//if not mapped, reserve/commit entire view
314 //SvL: Always read/write access or else ReadFile will crash once we
315 // start committing pages.
316 // This is most likely an OS/2 bug and doesn't happen in Aurora
317 // when allocating memory with the PAG_ANY bit set. (without this
318 // flag it will also crash)
319 if(lpszMapName) {
320 pMapping = VirtualAllocShared(mSize, fAlloc, PAGE_READWRITE, lpszMapName);
321 }
322 else {
323 pMapping = VirtualAlloc(0, mSize, fAlloc, PAGE_READWRITE);
324 }
325 if(pMapping == NULL) {
326 dprintf(("Win32MemMap::mapFileView: VirtualAlloc %x %x %x failed!", mSize, fAlloc, memFlags));
327 goto fail;
328 }
329 if(hMemFile == -1 && !image && (mProtFlags & SEC_COMMIT)) {//commit memory
330 VirtualAlloc(pMapping, mSize, MEM_COMMIT, PAGE_READWRITE);
331 }
332 }
333 mapview = new Win32MemMapView(this, offset, (size == 0) ? mSize : size, fdwAccess);
334 if(mapview == NULL) {
335 goto fail;
336 }
337 if(mapview->everythingOk() == FALSE) {
338 dprintf(("Win32MemMap::mapFileView: !mapview->everythingOk"));
339 delete mapview;
340 goto fail;
341 }
342 nrMappings++;
343 mapMutex.leave();
344 return mapview->getViewAddr();
345
346parmfail:
347 dprintf(("Win32MemMap::mapFileView: ERROR_INVALID_PARAMETER"));
348 SetLastError(ERROR_INVALID_PARAMETER);
349fail:
350 mapMutex.leave();
351 return 0;
352}
353//******************************************************************************
354//We determine whether a page has been modified by checking it's protection flags
355//If the write flag is set, this means commitPage had to enable this due to a pagefault
356//(all pages are readonly until the app tries to modify the contents of the page)
357//
358//TODO: Are apps allowed to change the protection flags of memory mapped pages?
359// I'm assuming they aren't for now.
360//******************************************************************************
361BOOL Win32MemMap::flushView(ULONG offset, ULONG cbFlush)
362{
363 LPVOID lpvBase = (LPVOID)((ULONG)pMapping+offset);
364 MEMORY_BASIC_INFORMATION memInfo;
365 ULONG nrBytesWritten, size;
366 int i;
367
368 if(image) //no flushing for image maps
369 return TRUE;
370
371 dprintf(("Win32MemMap::flushView: %x %x", lpvBase, cbFlush));
372 if(nrMappings == 0)
373 goto parmfail;
374
375 if(cbFlush == 0)
376 cbFlush = mSize;
377
378 if(lpvBase < pMapping || (ULONG)lpvBase+cbFlush > (ULONG)pMapping+mSize)
379 goto parmfail;
380
381 if(mProtFlags & PAGE_READONLY)
382 goto parmfail;
383
384 if(hMemFile == -1)
385 goto success; //TODO: Return an error here?
386
387 while(cbFlush) {
388 if(VirtualQuery((LPSTR)lpvBase, &memInfo, cbFlush) == 0) {
389 dprintf(("Win32MemMap::flushView: VirtualQuery (%x,%x) failed for %x", lpvBase, cbFlush, (ULONG)lpvBase+i*PAGE_SIZE));
390 goto fail;
391 }
392 //If a page (or range of pages) is reserved or write protected, we
393 //won't bother flushing it to disk
394 if(memInfo.State & MEM_COMMIT &&
395 memInfo.AllocationProtect & (PAGE_READWRITE|PAGE_WRITECOPY|PAGE_EXECUTE_READWRITE|PAGE_EXECUTE_WRITECOPY))
396 {//committed and allowed for writing?
397 offset = (ULONG)lpvBase - (ULONG)pMapping;
398 size = memInfo.RegionSize;
399 if(size > cbFlush) {
400 size = cbFlush;
401 }
402 dprintf(("Win32MemMap::flushView for offset %x, size %d", offset, size));
403
404 if(SetFilePointer(hMemFile, offset, NULL, FILE_BEGIN) != offset) {
405 dprintf(("Win32MemMap::flushView: SetFilePointer failed to set pos to %x", offset));
406 goto fail;
407 }
408 if(WriteFile(hMemFile, (LPSTR)lpvBase, size, &nrBytesWritten, NULL) == FALSE) {
409 dprintf(("Win32MemMap::flushView: WriteFile failed for %x", (ULONG)lpvBase));
410 goto fail;
411 }
412 if(nrBytesWritten != size) {
413 dprintf(("Win32MemMap::flushView: WriteFile didn't write all bytes for %x", (ULONG)lpvBase));
414 goto fail;
415 }
416 }
417 lpvBase = (LPVOID)((ULONG)lpvBase + memInfo.RegionSize);
418
419 if(cbFlush < memInfo.RegionSize)
420 break;
421
422 cbFlush -= memInfo.RegionSize;
423 }
424success:
425 return TRUE;
426parmfail:
427 SetLastError(ERROR_INVALID_PARAMETER);
428 return FALSE;
429fail:
430 return FALSE;
431}
432//******************************************************************************
433//******************************************************************************
434Win32MemMap *Win32MemMap::findMap(LPSTR lpszName)
435{
436 if(lpszName == NULL)
437 return NULL;
438
439 globalmapMutex.enter();
440 Win32MemMap *map = memmaps;
441
442 if(map != NULL) {
443 while(map) {
444 if(map->lpszMapName && !strcmp(map->lpszMapName, lpszName))
445 break;
446 map = map->next;
447 }
448 }
449 globalmapMutex.leave();
450 if(!map) dprintf(("Win32MemMap::findMap: couldn't find map %s", lpszName));
451 return map;
452}
453//******************************************************************************
454//******************************************************************************
455Win32MemMap *Win32MemMap::findMap(ULONG address)
456{
457 globalmapMutex.enter();
458 Win32MemMap *map = memmaps;
459
460 if(map != NULL) {
461 while(map) {
462 if(map->pMapping && (ULONG)map->pMapping <= address &&
463 (ULONG)map->pMapping + map->mSize > address)
464 {
465 break;
466 }
467 map = map->next;
468 }
469 }
470 globalmapMutex.leave();
471 return map;
472}
473//******************************************************************************
474//Assumes mutex has been acquired
475//******************************************************************************
476void Win32MemMap::deleteAll()
477{
478 Win32MemMap *map = memmaps, *nextmap;
479 DWORD processId = GetCurrentProcess();
480
481 //delete all maps created by this process
482 while(map) {
483 nextmap = map->next;
484 if(map->getProcessId() == processId) {
485 //Delete map directly for executable images (only used internally)
486 if(map->getImage()) {
487 delete map;
488 }
489 else CloseHandle(memmaps->hMemMap);
490 }
491 else {
492 //delete all views created by this process for this map
493 Win32MemMapView::deleteViews(map);
494 }
495 map = nextmap;
496 }
497}
498//******************************************************************************
499//******************************************************************************
500Win32MemMapView::Win32MemMapView(Win32MemMap *map, ULONG offset, ULONG size,
501 ULONG fdwAccess)
502{
503 LPVOID viewaddr = (LPVOID)((ULONG)map->getMappingAddr()+offset);
504 ULONG accessAttr = 0;
505 Win32MemMapView *tmpview = mapviews;
506
507 errorState = 0;
508 mParentMap = map;
509 mSize = size;
510 mOffset = offset;
511 mProcessId = GetCurrentProcess();
512
513 switch(fdwAccess) {
514 case FILE_MAP_READ:
515 accessAttr = PAG_READ;
516 mfAccess = MEMMAP_ACCESS_READ;
517 break;
518 case FILE_MAP_ALL_ACCESS:
519 case FILE_MAP_WRITE:
520 case FILE_MAP_COPY:
521 accessAttr = (PAG_READ|PAG_WRITE);
522 mfAccess = MEMMAP_ACCESS_READ | MEMMAP_ACCESS_WRITE;
523 break;
524 }
525 if(map->getMemName() != NULL) {
526 //shared memory map, so map it into our address space
527 if(OSLibDosGetNamedSharedMem((LPVOID *)&viewaddr, map->getMemName()) != OSLIB_NOERROR) {
528 dprintf(("new OSLibDosGetNamedSharedMem FAILED"));
529 SetLastError(ERROR_NOT_ENOUGH_MEMORY);
530 errorState = 1;
531 return;
532 }
533 }
534
535 //view == memory mapping for executable images (only used internally)
536 if(map->getImage()) {
537 pMapView = map->getMappingAddr();
538 }
539 else {
540 if(OSLibDosAliasMem(viewaddr, size, &pMapView, accessAttr) != OSLIB_NOERROR) {
541 dprintf(("new OSLibDosAliasMem FAILED"));
542 SetLastError(ERROR_NOT_ENOUGH_MEMORY);
543 errorState = 1;
544 return;
545 }
546 }
547
548 dprintf(("Win32MemMapView::Win32MemMapView: created %x (alias for %x), size %d", pMapView, viewaddr, size));
549
550 globalviewMutex.enter();
551 if(tmpview == NULL || tmpview->getViewAddr() > pMapView) {
552 next = mapviews;
553 mapviews = this;
554 }
555 else {
556 while(tmpview->next) {
557 if(tmpview->next->getViewAddr() > pMapView) {
558 break;
559 }
560 tmpview = tmpview->next;
561 }
562 next = tmpview->next;
563 tmpview->next = this;
564 }
565 globalviewMutex.leave();
566}
567//******************************************************************************
568//******************************************************************************
569Win32MemMapView::~Win32MemMapView()
570{
571 if(errorState != 0)
572 return;
573
574 dprintf(("Win32MemMapView dtor: deleting view %x %x", mOffset, mSize));
575
576 if(mfAccess & MEMMAP_ACCESS_WRITE)
577 mParentMap->flushView(mOffset, mSize);
578
579 //Don't free memory for executable image map views (only used internally)
580 if(!mParentMap->getImage())
581 OSLibDosFreeMem(pMapView);
582
583 globalviewMutex.enter();
584 Win32MemMapView *view = mapviews;
585
586 if(view == this) {
587 mapviews = next;
588 }
589 else {
590 while(view->next) {
591 if(view->next == this)
592 break;
593 view = view->next;
594 }
595 if(view->next) {
596 view->next = next;
597 }
598 else dprintf(("Win32MemMapView::~Win32MemMapView: map not found!! (%x)", this));
599 }
600 globalviewMutex.leave();
601}
602//******************************************************************************
603//******************************************************************************
604void Win32MemMapView::deleteViews(Win32MemMap *map)
605{
606 globalviewMutex.enter();
607 Win32MemMapView *view = mapviews, *nextview;
608
609 if(view != NULL) {
610 while(view) {
611 nextview = view->next;
612 if(view->getParentMap() == map)
613 {
614 globalviewMutex.leave();
615 delete view;
616 globalviewMutex.enter();
617 }
618 view = nextview;
619 }
620 }
621 globalviewMutex.leave();
622}
623//******************************************************************************
624//******************************************************************************
625Win32MemMap *Win32MemMapView::findMapByView(ULONG address, ULONG *offset,
626 ULONG accessType,
627 Win32MemMapView **pView)
628{
629 globalviewMutex.enter();
630 Win32MemMapView *view = mapviews;
631
632 *offset = 0;
633
634 if(view != NULL) {
635 while(view && (ULONG)view->getViewAddr() <= address) {
636 if((ULONG)view->getViewAddr() <= address &&
637 (ULONG)view->getViewAddr() + view->getSize() > address &&
638 view->getAccessFlags() >= accessType)
639 {
640 *offset = view->getOffset() + (address - (ULONG)view->getViewAddr());
641 goto success;
642 }
643 view = view->next;
644 }
645 //failure if we get here
646 view = NULL;
647 }
648success:
649 if(view)
650 dprintf(("findMapByView %x %x -> %x off %x", address, accessType, view->getViewAddr(), *offset));
651
652 globalviewMutex.leave();
653 if(pView) *pView = view;
654 return (view) ? view->getParentMap() : NULL;
655}
656//******************************************************************************
657//******************************************************************************
658Win32MemMapView *Win32MemMapView::findView(LPVOID address)
659{
660 Win32MemMapView *view = mapviews;
661
662 if(view != NULL) {
663 while(view) {
664 if(view->getViewAddr() == address)
665 {
666 break;
667 }
668 view = view->next;
669 }
670 }
671 return view;
672}
673//******************************************************************************
674//******************************************************************************
675
Note: See TracBrowser for help on using the repository browser.