1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
|
#ifndef _I386_PGALLOC_H
#define _I386_PGALLOC_H
#include <linux/config.h>
#include <asm/processor.h>
#include <asm/hypervisor.h>
#include <linux/threads.h>
/*
* Quick lists are aligned so that least significant bits of array pointer
* are all zero when list is empty, and all one when list is full.
*/
#define QUICKLIST_ENTRIES 256
#define QUICKLIST_EMPTY(_l) !((unsigned long)(_l) & ((QUICKLIST_ENTRIES*4)-1))
#define QUICKLIST_FULL(_l) QUICKLIST_EMPTY((_l)+1)
#define pgd_quicklist (current_cpu_data.pgd_quick)
#define pmd_quicklist (current_cpu_data.pmd_quick)
#define pte_quicklist (current_cpu_data.pte_quick)
#define pgtable_cache_size (current_cpu_data.pgtable_cache_sz)
#define pmd_populate(mm, pmd, pte) \
do { \
set_pmd(pmd, __pmd(_PAGE_TABLE + __pa(pte))); \
XENO_flush_page_update_queue(); \
} while ( 0 )
static __inline__ pgd_t *get_pgd_slow(void)
{
pgd_t *pgd = (pgd_t *)__get_free_page(GFP_KERNEL);
pgd_t *kpgd;
pmd_t *kpmd;
pte_t *kpte;
if (pgd) {
memset(pgd, 0, USER_PTRS_PER_PGD * sizeof(pgd_t));
memcpy(pgd + USER_PTRS_PER_PGD,
init_mm.pgd + USER_PTRS_PER_PGD,
(PTRS_PER_PGD - USER_PTRS_PER_PGD) * sizeof(pgd_t));
kpgd = pgd_offset_k((unsigned long)pgd);
kpmd = pmd_offset(kpgd, (unsigned long)pgd);
kpte = pte_offset(kpmd, (unsigned long)pgd);
queue_l1_entry_update(__pa(kpte), (*(unsigned long *)kpte)&~_PAGE_RW);
queue_pgd_pin(__pa(pgd));
}
return pgd;
}
static __inline__ void free_pgd_slow(pgd_t *pgd)
{
pgd_t *kpgd;
pmd_t *kpmd;
pte_t *kpte;
queue_pgd_unpin(__pa(pgd));
kpgd = pgd_offset_k((unsigned long)pgd);
kpmd = pmd_offset(kpgd, (unsigned long)pgd);
kpte = pte_offset(kpmd, (unsigned long)pgd);
queue_l1_entry_update(__pa(kpte), (*(unsigned long *)kpte)|_PAGE_RW);
free_page((unsigned long)pgd);
}
static __inline__ pgd_t *get_pgd_fast(void)
{
unsigned long ret;
if ( !QUICKLIST_EMPTY(pgd_quicklist) ) {
ret = *(--pgd_quicklist);
pgtable_cache_size--;
} else
ret = (unsigned long)get_pgd_slow();
return (pgd_t *)ret;
}
static __inline__ void free_pgd_fast(pgd_t *pgd)
{
if ( !QUICKLIST_FULL(pgd_quicklist) ) {
*(pgd_quicklist++) = (unsigned long)pgd;
pgtable_cache_size++;
} else
free_pgd_slow(pgd);
}
static inline pte_t *pte_alloc_one(struct mm_struct *mm, unsigned long address)
{
pte_t *pte;
pgd_t *kpgd;
pmd_t *kpmd;
pte_t *kpte;
pte = (pte_t *) __get_free_page(GFP_KERNEL);
if (pte)
{
clear_page(pte);
kpgd = pgd_offset_k((unsigned long)pte);
kpmd = pmd_offset(kpgd, (unsigned long)pte);
kpte = pte_offset(kpmd, (unsigned long)pte);
queue_l1_entry_update(__pa(kpte), (*(unsigned long *)kpte)&~_PAGE_RW);
queue_pte_pin(__pa(pte));
}
return pte;
}
static __inline__ void pte_free_slow(pte_t *pte)
{
pgd_t *kpgd;
pmd_t *kpmd;
pte_t *kpte;
queue_pte_unpin(__pa(pte));
kpgd = pgd_offset_k((unsigned long)pte);
kpmd = pmd_offset(kpgd, (unsigned long)pte);
kpte = pte_offset(kpmd, (unsigned long)pte);
queue_l1_entry_update(__pa(kpte), (*(unsigned long *)kpte)|_PAGE_RW);
free_page((unsigned long)pte);
}
static inline pte_t *pte_alloc_one_fast(struct mm_struct *mm, unsigned long address)
{
unsigned long ret = 0;
if ( !QUICKLIST_EMPTY(pte_quicklist) ) {
ret = *(--pte_quicklist);
pgtable_cache_size--;
}
return (pte_t *)ret;
}
static __inline__ void pte_free_fast(pte_t *pte)
{
if ( !QUICKLIST_FULL(pte_quicklist) ) {
*(pte_quicklist++) = (unsigned long)pte;
pgtable_cache_size++;
} else
pte_free_slow(pte);
}
#define pte_free(pte) pte_free_fast(pte)
#define pgd_alloc(mm) get_pgd_fast()
#define pgd_free(pgd) free_pgd_fast(pgd)
#define pmd_alloc_one_fast(mm, addr) ({ BUG(); ((pmd_t *)1); })
#define pmd_alloc_one(mm, addr) ({ BUG(); ((pmd_t *)2); })
#define pmd_free_slow(x) do { } while (0)
#define pmd_free_fast(x) do { } while (0)
#define pmd_free(x) do { } while (0)
#define pgd_populate(mm, pmd, pte) BUG()
extern int do_check_pgt_cache(int, int);
/*
* - flush_tlb() flushes the current mm struct TLBs
* - flush_tlb_all() flushes all processes TLBs
* - flush_tlb_mm(mm) flushes the specified mm context TLB's
* - flush_tlb_page(vma, vmaddr) flushes one page
* - flush_tlb_range(mm, start, end) flushes a range of pages
* - flush_tlb_pgtables(mm, start, end) flushes a range of page tables
*/
#define flush_tlb() __flush_tlb()
#define flush_tlb_all() __flush_tlb_all()
#define local_flush_tlb() __flush_tlb()
static inline void flush_tlb_mm(struct mm_struct *mm)
{
if ( mm == current->active_mm ) queue_tlb_flush();
XENO_flush_page_update_queue();
}
static inline void flush_tlb_page(struct vm_area_struct *vma,
unsigned long addr)
{
if ( vma->vm_mm == current->active_mm ) queue_invlpg(addr);
XENO_flush_page_update_queue();
}
static inline void flush_tlb_range(struct mm_struct *mm,
unsigned long start, unsigned long end)
{
if ( mm == current->active_mm ) queue_tlb_flush();
XENO_flush_page_update_queue();
}
static inline void flush_tlb_pgtables(struct mm_struct *mm,
unsigned long start, unsigned long end)
{
/* i386 does not keep any page table caches in TLB */
XENO_flush_page_update_queue();
}
#endif /* _I386_PGALLOC_H */
|
