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)
16 /* write back and invalidate cache (a serializing instruction) */
18 __asm__
__volatile__ ( "wbinvd" : : : "memory" );
20 /* The wbinvd instruction does not wait for the external caches
21 * to be flushed, but only requests that it be done. The loop
22 * is to be sure that enough time has elapsed, but the compiler
23 * might simplify or even remove it. The loop bound is for a
24 * 512 KB L2 cache. On a Pentium Pro/II/III, the loop uses
25 * 2 cycles per iteration.
27 * Does wbinvd also cause the TLB to be flushed?
28 * A comment in mtrr.c suggests that it does.
30 for (i
= 0; i
< 512*1024; i
++) {
35 static void noinline
test2(const struct marker
*mdata
,
36 void *call_private
, ...)
43 #define myclflush(a) clflush(a)
49 * Generic marker flavor always available.
50 * Note : the empty asm volatile with read constraint is used here instead of a
51 * "used" attribute to fix a gcc 4.1.x bug.
52 * Make sure the alignment of the structure in the __markers section will
53 * not add unwanted padding between the beginning of the section and the
54 * structure. Force alignment to the same alignment as the section start.
56 #define __my_trace_mark(generic, name, call_private, format, args...) \
58 static const char __mstrtab_##name[] \
59 __attribute__((section("__markers_strings"))) \
60 = #name "\0" format; \
61 static struct marker __mark_##name \
62 __attribute__((section("__markers"), aligned(8))) = \
63 { __mstrtab_##name, &__mstrtab_##name[sizeof(#name)], \
64 0, 0, marker_probe_cb, \
65 { __mark_empty_function, NULL}, NULL }; \
66 __mark_check_format(format, ## args); \
68 if (unlikely(imv_read(__mark_##name.state))) \
70 (&__mark_##name, call_private, \
73 myclflush(&_imv_read(__mark_##name.state)); \
74 if (unlikely(_imv_read(__mark_##name.state))) \
76 (&__mark_##name, call_private, \
82 struct proc_dir_entry
*pentry
= NULL
;
84 static inline void test(unsigned long arg
, unsigned long arg2
)
87 temp
[2] = (temp
[0] + 60) << 10;
88 temp
[3] = (temp
[2] + 60) << 10;
89 temp
[4] = (temp
[3] + 60) << 10;
90 temp
[0] = (temp
[4] + 60) << 10;
93 __my_trace_mark(1, kernel_debug_test
, NULL
, "%d %d %ld %ld", 2, current
->pid
, arg
, arg2
);
95 //__my_trace_mark(0, kernel_debug_test, NULL, "%d %d %ld %ld", 2, current->pid, arg, arg2);
98 static int my_open(struct inode
*inode
, struct file
*file
)
101 cycles_t cycles1
, cycles2
;
104 local_irq_save(flags
);
106 //pmc_flush_cache(); /* initial write back, without cycle count */
107 //msleep(20); /* wait for L2 flush */
110 cycles1
= get_cycles();
112 for(i
=0; i
<2000; i
++) {
125 cycles2
= get_cycles();
127 local_irq_restore(flags
);
128 printk("cycles : %llu\n", cycles2
-cycles1
);
133 static struct file_operations my_operations
= {
137 int init_module(void)
139 pentry
= create_proc_entry("testmark", 0444, NULL
);
141 pentry
->proc_fops
= &my_operations
;
146 void cleanup_module(void)
148 remove_proc_entry("testmark", NULL
);
151 MODULE_LICENSE("GPL");
152 MODULE_AUTHOR("Mathieu Desnoyers");
153 MODULE_DESCRIPTION("Marker Test");
154 MODULE_VERSION("1.0");