1 #include <linux/init.h>
2 #include <linux/proc_fs.h>
3 #include <linux/ctype.h>
4 #include <linux/module.h>
5 #include <linux/seq_file.h>
6 #include <asm/uaccess.h>
13 /* RED-PEN: this is accessed without any locking */
14 extern unsigned int *usage_table
;
17 #define FILE_FCOUNT(f) (((struct seq_file *)((f)->private_data))->private)
19 static char *mtrr_strings
[MTRR_NUM_TYPES
] =
22 "write-combining", /* 1 */
25 "write-through", /* 4 */
26 "write-protect", /* 5 */
30 char *mtrr_attrib_to_str(int x
)
32 return (x
<= 6) ? mtrr_strings
[x
] : "?";
38 mtrr_file_add(unsigned long base
, unsigned long size
,
39 unsigned int type
, char increment
, struct file
*file
, int page
)
42 unsigned int *fcount
= FILE_FCOUNT(file
);
46 fcount
= kmalloc(max
* sizeof *fcount
, GFP_KERNEL
);
49 memset(fcount
, 0, max
* sizeof *fcount
);
50 FILE_FCOUNT(file
) = fcount
;
53 if ((base
& (PAGE_SIZE
- 1)) || (size
& (PAGE_SIZE
- 1)))
58 reg
= mtrr_add_page(base
, size
, type
, 1);
65 mtrr_file_del(unsigned long base
, unsigned long size
,
66 struct file
*file
, int page
)
69 unsigned int *fcount
= FILE_FCOUNT(file
);
72 if ((base
& (PAGE_SIZE
- 1)) || (size
& (PAGE_SIZE
- 1)))
77 reg
= mtrr_del_page(-1, base
, size
);
88 /* RED-PEN: seq_file can seek now. this is ignored. */
90 mtrr_write(struct file
*file
, const char __user
*buf
, size_t len
, loff_t
* ppos
)
91 /* Format of control line:
92 "base=%Lx size=%Lx type=%s" OR:
98 unsigned long long base
, size
;
100 char line
[LINE_SIZE
];
102 if (!capable(CAP_SYS_ADMIN
))
104 memset(line
, 0, LINE_SIZE
);
107 if (copy_from_user(line
, buf
, len
- 1))
109 ptr
= line
+ strlen(line
) - 1;
112 if (!strncmp(line
, "disable=", 8)) {
113 reg
= simple_strtoul(line
+ 8, &ptr
, 0);
114 err
= mtrr_del_page(reg
, 0, 0);
119 if (strncmp(line
, "base=", 5))
121 base
= simple_strtoull(line
+ 5, &ptr
, 0);
122 for (; isspace(*ptr
); ++ptr
) ;
123 if (strncmp(ptr
, "size=", 5))
125 size
= simple_strtoull(ptr
+ 5, &ptr
, 0);
126 if ((base
& 0xfff) || (size
& 0xfff))
128 for (; isspace(*ptr
); ++ptr
) ;
129 if (strncmp(ptr
, "type=", 5))
132 for (; isspace(*ptr
); ++ptr
) ;
133 for (i
= 0; i
< MTRR_NUM_TYPES
; ++i
) {
134 if (strcmp(ptr
, mtrr_strings
[i
]))
139 mtrr_add_page((unsigned long) base
, (unsigned long) size
, i
,
149 mtrr_ioctl(struct inode
*inode
, struct file
*file
,
150 unsigned int cmd
, unsigned long __arg
)
154 struct mtrr_sentry sentry
;
155 struct mtrr_gentry gentry
;
156 void __user
*arg
= (void __user
*) __arg
;
161 case MTRRIOC_ADD_ENTRY
:
162 if (!capable(CAP_SYS_ADMIN
))
164 if (copy_from_user(&sentry
, arg
, sizeof sentry
))
167 mtrr_file_add(sentry
.base
, sentry
.size
, sentry
.type
, 1,
172 case MTRRIOC_SET_ENTRY
:
173 if (!capable(CAP_SYS_ADMIN
))
175 if (copy_from_user(&sentry
, arg
, sizeof sentry
))
177 err
= mtrr_add(sentry
.base
, sentry
.size
, sentry
.type
, 0);
181 case MTRRIOC_DEL_ENTRY
:
182 if (!capable(CAP_SYS_ADMIN
))
184 if (copy_from_user(&sentry
, arg
, sizeof sentry
))
186 err
= mtrr_file_del(sentry
.base
, sentry
.size
, file
, 0);
190 case MTRRIOC_KILL_ENTRY
:
191 if (!capable(CAP_SYS_ADMIN
))
193 if (copy_from_user(&sentry
, arg
, sizeof sentry
))
195 err
= mtrr_del(-1, sentry
.base
, sentry
.size
);
199 case MTRRIOC_GET_ENTRY
:
200 if (copy_from_user(&gentry
, arg
, sizeof gentry
))
202 if (gentry
.regnum
>= num_var_ranges
)
204 mtrr_if
->get(gentry
.regnum
, &gentry
.base
, &gentry
.size
, &type
);
206 /* Hide entries that go above 4GB */
207 if (gentry
.base
+ gentry
.size
> 0x100000
208 || gentry
.size
== 0x100000)
209 gentry
.base
= gentry
.size
= gentry
.type
= 0;
211 gentry
.base
<<= PAGE_SHIFT
;
212 gentry
.size
<<= PAGE_SHIFT
;
216 if (copy_to_user(arg
, &gentry
, sizeof gentry
))
219 case MTRRIOC_ADD_PAGE_ENTRY
:
220 if (!capable(CAP_SYS_ADMIN
))
222 if (copy_from_user(&sentry
, arg
, sizeof sentry
))
225 mtrr_file_add(sentry
.base
, sentry
.size
, sentry
.type
, 1,
230 case MTRRIOC_SET_PAGE_ENTRY
:
231 if (!capable(CAP_SYS_ADMIN
))
233 if (copy_from_user(&sentry
, arg
, sizeof sentry
))
235 err
= mtrr_add_page(sentry
.base
, sentry
.size
, sentry
.type
, 0);
239 case MTRRIOC_DEL_PAGE_ENTRY
:
240 if (!capable(CAP_SYS_ADMIN
))
242 if (copy_from_user(&sentry
, arg
, sizeof sentry
))
244 err
= mtrr_file_del(sentry
.base
, sentry
.size
, file
, 1);
248 case MTRRIOC_KILL_PAGE_ENTRY
:
249 if (!capable(CAP_SYS_ADMIN
))
251 if (copy_from_user(&sentry
, arg
, sizeof sentry
))
253 err
= mtrr_del_page(-1, sentry
.base
, sentry
.size
);
257 case MTRRIOC_GET_PAGE_ENTRY
:
258 if (copy_from_user(&gentry
, arg
, sizeof gentry
))
260 if (gentry
.regnum
>= num_var_ranges
)
262 mtrr_if
->get(gentry
.regnum
, &gentry
.base
, &gentry
.size
, &type
);
265 if (copy_to_user(arg
, &gentry
, sizeof gentry
))
273 mtrr_close(struct inode
*ino
, struct file
*file
)
276 unsigned int *fcount
= FILE_FCOUNT(file
);
278 if (fcount
!= NULL
) {
279 max
= num_var_ranges
;
280 for (i
= 0; i
< max
; ++i
) {
281 while (fcount
[i
] > 0) {
287 FILE_FCOUNT(file
) = NULL
;
289 return single_release(ino
, file
);
292 static int mtrr_seq_show(struct seq_file
*seq
, void *offset
);
294 static int mtrr_open(struct inode
*inode
, struct file
*file
)
300 return single_open(file
, mtrr_seq_show
, NULL
);
303 static struct file_operations mtrr_fops
= {
304 .owner
= THIS_MODULE
,
310 .release
= mtrr_close
,
314 static struct proc_dir_entry
*proc_root_mtrr
;
317 static int mtrr_seq_show(struct seq_file
*seq
, void *offset
)
326 max
= num_var_ranges
;
327 for (i
= 0; i
< max
; i
++) {
328 mtrr_if
->get(i
, &base
, &size
, &type
);
332 if (size
< (0x100000 >> PAGE_SHIFT
)) {
335 size
<<= PAGE_SHIFT
- 10;
338 size
>>= 20 - PAGE_SHIFT
;
340 /* RED-PEN: base can be > 32bit */
341 len
+= seq_printf(seq
,
342 "reg%02i: base=0x%05lx000 (%4liMB), size=%4i%cB: %s, count=%d\n",
343 i
, base
, base
>> (20 - PAGE_SHIFT
), size
, factor
,
344 mtrr_attrib_to_str(type
), usage_table
[i
]);
350 static int __init
mtrr_if_init(void)
352 struct cpuinfo_x86
*c
= &boot_cpu_data
;
354 if ((!cpu_has(c
, X86_FEATURE_MTRR
)) &&
355 (!cpu_has(c
, X86_FEATURE_K6_MTRR
)) &&
356 (!cpu_has(c
, X86_FEATURE_CYRIX_ARR
)) &&
357 (!cpu_has(c
, X86_FEATURE_CENTAUR_MCR
)))
361 create_proc_entry("mtrr", S_IWUSR
| S_IRUGO
, &proc_root
);
362 if (proc_root_mtrr
) {
363 proc_root_mtrr
->owner
= THIS_MODULE
;
364 proc_root_mtrr
->proc_fops
= &mtrr_fops
;
369 arch_initcall(mtrr_if_init
);
370 #endif /* CONFIG_PROC_FS */