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.
31 for (i
= 0; i
< 512*1024; i
++) {
38 static void noinline
test2(const struct marker
*mdata
,
39 void *call_private
, ...)
41 unsigned char *ins
= __builtin_return_address(0) - 5;
44 printk("ip %p\n", __builtin_return_address(0));
45 printk("prev_ins %hX %hX %hX %hX %hX\n",
46 ins
[0], ins
[1], ins
[2], ins
[3], ins
[4]);
56 * Generic marker flavor always available.
57 * Note : the empty asm volatile with read constraint is used here instead of a
58 * "used" attribute to fix a gcc 4.1.x bug.
59 * Make sure the alignment of the structure in the __markers section will
60 * not add unwanted padding between the beginning of the section and the
61 * structure. Force alignment to the same alignment as the section start.
63 #define __my_trace_mark(generic, name, call_private, format, args...) \
65 static const char __mstrtab_##name[] \
66 __attribute__((section("__markers_strings"))) \
67 = #name "\0" format; \
68 static struct marker __mark_##name \
69 __attribute__((section("__markers"), aligned(8))) = \
70 { __mstrtab_##name, &__mstrtab_##name[sizeof(#name)], \
71 0, 0, marker_probe_cb, \
72 { __mark_empty_function, NULL}, NULL }; \
73 __mark_check_format(format, ## args); \
75 if (unlikely(imv_read(__mark_##name.state))) \
77 (&__mark_##name, call_private, \
80 if (unlikely(_imv_read(__mark_##name.state))) \
82 (&__mark_##name, call_private, \
88 struct proc_dir_entry
*pentry
= NULL
;
90 static inline void test(unsigned long arg
, unsigned long arg2
)
94 clflush(¤t
->pid
);
97 temp
[2] = (temp
[0] + 60) << 10;
98 temp
[3] = (temp
[2] + 60) << 10;
99 temp
[4] = (temp
[3] + 60) << 10;
100 temp
[0] = (temp
[4] + 60) << 10;
102 //__my_trace_mark(1, kernel_debug_test, NULL, "%d %d %ld %ld", 2, current->pid, arg, arg2);
104 test2(NULL
, NULL
, 2, current
->pid
, arg
, arg2
);
106 //__my_trace_mark(0, kernel_debug_test, NULL, "%d %d %ld %ld", 2, current->pid, arg, arg2);
109 static int my_open(struct inode
*inode
, struct file
*file
)
112 cycles_t cycles1
, cycles2
;
115 local_irq_save(flags
);
117 //pmc_flush_cache(); /* initial write back, without cycle count */
118 //msleep(20); /* wait for L2 flush */
121 cycles1
= get_cycles();
123 for(i
=0; i
<2000; i
++) {
136 cycles2
= get_cycles();
138 local_irq_restore(flags
);
139 printk("cycles : %llu\n", cycles2
-cycles1
);
144 static struct file_operations my_operations
= {
148 int init_module(void)
150 pentry
= create_proc_entry("testmark", 0444, NULL
);
152 pentry
->proc_fops
= &my_operations
;
157 void cleanup_module(void)
159 remove_proc_entry("testmark", NULL
);
162 MODULE_LICENSE("GPL");
163 MODULE_AUTHOR("Mathieu Desnoyers");
164 MODULE_DESCRIPTION("Marker Test");
165 MODULE_VERSION("1.0");