5 #include <linux/module.h>
6 #include <linux/proc_fs.h>
7 #include <linux/sched.h>
8 #include <linux/timex.h>
9 #include <linux/marker.h>
10 #include <asm/ptrace.h>
11 #include <asm/system.h>
13 static void pmc_flush_cache(void)
15 /* write back and invalidate cache (a serializing instruction) */
17 __asm__
__volatile__ ( "wbinvd" : : : "memory" );
19 /* The wbinvd instruction does not wait for the external caches
20 * to be flushed, but only requests that it be done. The loop
21 * is to be sure that enough time has elapsed, but the compiler
22 * might simplify or even remove it. The loop bound is for a
23 * 512 KB L2 cache. On a Pentium Pro/II/III, the loop uses
24 * 2 cycles per iteration.
26 * Does wbinvd also cause the TLB to be flushed?
27 * A comment in mtrr.c suggests that it does.
29 { register int i
; for (i
= 0; i
< 512*1024; i
++) { } }
34 static void noinline
test2(const struct marker
*mdata
,
35 void *call_private
, ...)
37 unsigned char *ins
= __builtin_return_address(0) - 5;
40 printk("ip %p\n", __builtin_return_address(0));
41 printk("prev_ins %hX %hX %hX %hX %hX\n",
42 ins
[0], ins
[1], ins
[2], ins
[3], ins
[4]);
52 * Generic marker flavor always available.
53 * Note : the empty asm volatile with read constraint is used here instead of a
54 * "used" attribute to fix a gcc 4.1.x bug.
55 * Make sure the alignment of the structure in the __markers section will
56 * not add unwanted padding between the beginning of the section and the
57 * structure. Force alignment to the same alignment as the section start.
59 #define __my_trace_mark(generic, name, call_private, format, args...) \
61 static const char __mstrtab_##name[] \
62 __attribute__((section("__markers_strings"))) \
63 = #name "\0" format; \
64 static struct marker __mark_##name \
65 __attribute__((section("__markers"), aligned(8))) = \
66 { __mstrtab_##name, &__mstrtab_##name[sizeof(#name)], \
67 0, 0, marker_probe_cb, \
68 { __mark_empty_function, NULL}, NULL }; \
69 __mark_check_format(format, ## args); \
71 if (unlikely(imv_read(__mark_##name.state))) \
73 (&__mark_##name, call_private, \
76 if (unlikely(_imv_read(__mark_##name.state))) \
78 (&__mark_##name, call_private, \
84 struct proc_dir_entry
*pentry
= NULL
;
86 static inline void test(unsigned long arg
, unsigned long arg2
)
92 temp
[2] = (temp
[0] + 60) << 10;
93 temp
[3] = (temp
[2] + 60) << 10;
94 temp
[4] = (temp
[3] + 60) << 10;
95 temp
[0] = (temp
[4] + 60) << 10;
97 //__my_trace_mark(1, kernel_debug_test, NULL, "%d %d %ld %ld", 2, current->pid, arg, arg2);
99 test2(NULL
, NULL
, 2, current
->pid
, arg
, arg2
);
101 //__my_trace_mark(0, kernel_debug_test, NULL, "%d %d %ld %ld", 2, current->pid, arg, arg2);
104 static int my_open(struct inode
*inode
, struct file
*file
)
107 cycles_t cycles1
, cycles2
;
110 local_irq_save(flags
);
112 pmc_flush_cache(); /* initial write back, without cycle count */
113 msleep(20); /* wait for L2 flush */
116 cycles1
= get_cycles();
118 for(i
=0; i
<2000; i
++) {
131 cycles2
= get_cycles();
133 local_irq_restore(flags
);
134 printk("cycles : %llu\n", cycles2
-cycles1
);
139 static struct file_operations my_operations
= {
143 int init_module(void)
145 pentry
= create_proc_entry("testmark", 0444, NULL
);
147 pentry
->proc_fops
= &my_operations
;
152 void cleanup_module(void)
154 remove_proc_entry("testmark", NULL
);
157 MODULE_LICENSE("GPL");
158 MODULE_AUTHOR("Mathieu Desnoyers");
159 MODULE_DESCRIPTION("Marker Test");
160 MODULE_VERSION("1.0");