update
[lttv.git] / markers-test / test-mark-speed-edit.c
1 /* test-mark.c
2 *
3 */
4
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>
12
13 static void pmc_flush_cache(void)
14 {
15 /* write back and invalidate cache (a serializing instruction) */
16
17 __asm__ __volatile__ ( "wbinvd" : : : "memory" );
18
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.
25 *
26 * Does wbinvd also cause the TLB to be flushed?
27 * A comment in mtrr.c suggests that it does.
28 */
29 { register int i; for (i = 0; i < 512*1024; i++) { } }
30 }
31
32
33
34 static void noinline test2(const struct marker *mdata,
35 void *call_private, ...)
36 {
37 unsigned char *ins = __builtin_return_address(0) - 5;
38 #if 0
39 /* not called */
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]);
43 #endif //0
44 ins[0] = 0x90;
45 ins[1] = 0x8d;
46 ins[2] = 0x74;
47 ins[3] = 0x26;
48 ins[4] = 0x00;
49 }
50
51 /*
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.
58 */
59 #define __my_trace_mark(generic, name, call_private, format, args...) \
60 do { \
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); \
70 if (!generic) { \
71 if (unlikely(imv_read(__mark_##name.state))) \
72 test2 \
73 (&__mark_##name, call_private, \
74 ## args); \
75 } else { \
76 if (unlikely(_imv_read(__mark_##name.state))) \
77 test2 \
78 (&__mark_##name, call_private, \
79 ## args); \
80 } \
81 } while (0)
82
83 //asm volatile ("");
84 struct proc_dir_entry *pentry = NULL;
85
86 char temp0[8192];
87 int temp[8192] __cacheline_aligned;
88 char temp5[8192];
89
90 static inline void test(unsigned long arg, unsigned long arg2)
91 {
92 #ifdef CACHEFLUSH
93 pmc_flush_cache();
94 #endif
95 temp[2] = (temp[0] + 60) << 10;
96 temp[3] = (temp[2] + 60) << 10;
97 temp[4] = (temp[3] + 60) << 10;
98 temp[0] = (temp[4] + 60) << 10;
99 //asm volatile ("");
100 //__my_trace_mark(1, kernel_debug_test, NULL, "%d %d %ld %ld", 2, current->pid, arg, arg2);
101 barrier();
102 test2(NULL, NULL, 2, current->pid, arg, arg2);
103 barrier();
104 //__my_trace_mark(0, kernel_debug_test, NULL, "%d %d %ld %ld", 2, current->pid, arg, arg2);
105 }
106
107 static int my_open(struct inode *inode, struct file *file)
108 {
109 unsigned int i;
110 cycles_t cycles1, cycles2;
111 unsigned long flags;
112
113 local_irq_save(flags);
114 #ifdef CACHEFLUSH
115 pmc_flush_cache(); /* initial write back, without cycle count */
116 msleep(20); /* wait for L2 flush */
117 #endif
118 rdtsc_barrier();
119 cycles1 = get_cycles();
120 rdtsc_barrier();
121 for(i=0; i<2000; i++) {
122 test(i, i);
123 test(i, i);
124 test(i, i);
125 test(i, i);
126 test(i, i);
127 test(i, i);
128 test(i, i);
129 test(i, i);
130 test(i, i);
131 test(i, i);
132 }
133 rdtsc_barrier();
134 cycles2 = get_cycles();
135 rdtsc_barrier();
136 local_irq_restore(flags);
137 printk("cycles : %llu\n", cycles2-cycles1);
138 return -EPERM;
139 }
140
141
142 static struct file_operations my_operations = {
143 .open = my_open,
144 };
145
146 int init_module(void)
147 {
148 pentry = create_proc_entry("testmark", 0444, NULL);
149 if (pentry)
150 pentry->proc_fops = &my_operations;
151
152 return 0;
153 }
154
155 void cleanup_module(void)
156 {
157 remove_proc_entry("testmark", NULL);
158 }
159
160 MODULE_LICENSE("GPL");
161 MODULE_AUTHOR("Mathieu Desnoyers");
162 MODULE_DESCRIPTION("Marker Test");
163 MODULE_VERSION("1.0");
164
This page took 0.032791 seconds and 5 git commands to generate.