:pserver:cvsanon@mok.lvcm.com:/CVS/ReactOS reactos
[reactos.git] / ntoskrnl / mm / wset.c
1 /*
2  *  ReactOS kernel
3  *  Copyright (C) 1998, 1999, 2000, 2001 ReactOS Team
4  *
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; either version 2 of the License, or
8  *  (at your option) any later version.
9  *
10  *  This program is distributed in the hope that it will be useful,
11  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
12  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13  *  GNU General Public License for more details.
14  *
15  *  You should have received a copy of the GNU General Public License
16  *  along with this program; if not, write to the Free Software
17  *  Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
18  */
19 /* $Id$
20  * 
21  * PROJECT:         ReactOS kernel
22  * FILE:            ntoskrnl/mm/wset.c
23  * PURPOSE:         Manages working sets
24  * PROGRAMMER:      David Welch (welch@cwcom.net)
25  * UPDATE HISTORY:
26  *                  Created 22/05/98
27  */
28
29 /* INCLUDES *****************************************************************/
30
31 #include <ddk/ntddk.h>
32 #include <internal/mm.h>
33 #include <internal/ps.h>
34 #include <ntos/minmax.h>
35
36 #define NDEBUG
37 #include <internal/debug.h>
38
39 /* FUNCTIONS *****************************************************************/
40
41 NTSTATUS
42 MmTrimUserMemory(ULONG Target, ULONG Priority, PULONG NrFreedPages)
43 {
44   PHYSICAL_ADDRESS CurrentPhysicalAddress;
45   PHYSICAL_ADDRESS NextPhysicalAddress;
46   NTSTATUS Status;
47
48   (*NrFreedPages) = 0;
49
50   CurrentPhysicalAddress = MmGetLRUFirstUserPage();
51   while (CurrentPhysicalAddress.QuadPart != 0 && Target > 0)
52     {
53       NextPhysicalAddress = MmGetLRUNextUserPage(CurrentPhysicalAddress);
54
55       Status = MmPageOutPhysicalAddress(CurrentPhysicalAddress);
56       if (NT_SUCCESS(Status))
57         {
58           DPRINT("Succeeded\n");
59           Target--;
60           (*NrFreedPages)++;
61         }
62
63       CurrentPhysicalAddress = NextPhysicalAddress;
64     }
65   return(STATUS_SUCCESS);
66 }