markers-test/test-mark-speed-local.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 noinline test2(const struct marker *mdata,
  14         void *call_private, ...)
  15 {
  16         unsigned char *ins = __builtin_return_address(0) - 5;
  17 #if 0
  18         /* not called */
  19         printk("ip %p\n", __builtin_return_address(0));
  20         printk("prev_ins %hX %hX %hX %hX %hX\n",
  21                 ins[0], ins[1], ins[2], ins[3], ins[4]);
  22 #endif //0
  23         ins[0] = 0x90;
  24         ins[1] = 0x8d;
  25         ins[2] = 0x74;
  26         ins[3] = 0x26;
  27         ins[4] = 0x00;
  28 }
  29
  30 /*
  31  * Generic marker flavor always available.
  32  * Note : the empty asm volatile with read constraint is used here instead of a
  33  * "used" attribute to fix a gcc 4.1.x bug.
  34  * Make sure the alignment of the structure in the __markers section will
  35  * not add unwanted padding between the beginning of the section and the
  36  * structure. Force alignment to the same alignment as the section start.
  37  */
  38 #define __my_trace_mark(generic, name, call_private, format, args...)   \
  39         do {                                                            \
  40                 static const char __mstrtab_##name[]                    \
  41                 __attribute__((section("__markers_strings")))           \
  42                 = #name "\0" format;                                    \
  43                 static struct marker __mark_##name                      \
  44                 __attribute__((section("__markers"), aligned(8))) =     \
  45                 { __mstrtab_##name, &__mstrtab_##name[sizeof(#name)],   \
  46                 0, 0, marker_probe_cb,                                  \
  47                 { __mark_empty_function, NULL}, NULL };                 \
  48                 __mark_check_format(format, ## args);                   \
  49                 if (!generic) {                                         \
  50                         if (unlikely(imv_read(__mark_##name.state)))    \
  51                                 test2                   \
  52                                         (&__mark_##name, call_private,  \
  53                                         ## args);               \
  54                 } else {                                                \
  55                         if (unlikely(_imv_read(__mark_##name.state)))   \
  56                                 test2                   \
  57                                         (&__mark_##name, call_private,  \
  58                                         ## args);               \
  59                 }                                                       \
  60         } while (0)
  61
  62 struct proc_dir_entry *pentry = NULL;
  63
  64 char temp0[8192];
  65 int temp[8192] __cacheline_aligned;
  66 char temp5[8192];
  67
  68 static inline void test(unsigned long arg, unsigned long arg2)
  69 {
  70 #ifdef CACHEFLUSH
  71         wbinvd();
  72 #endif
  73         temp[2] = (temp[0] + 60) << 10;
  74         temp[3] = (temp[2] + 60) << 10;
  75         temp[4] = (temp[3] + 60) << 10;
  76         temp[0] = (temp[4] + 60) << 10;
  77         //asm volatile ("");
  78         //__my_trace_mark(1, kernel_debug_test, NULL, "%d %d %ld %ld", 2, current->pid, arg, arg2);
  79         barrier();
  80         test2(NULL, NULL, 2, 10, arg, arg2);
  81         barrier();      // make sure the compiler does not optimize marker conditions away!
  82         //__my_trace_mark(0, kernel_debug_test, NULL, "%d %d %ld %ld", 2, current->pid, arg, arg2);
  83 }
  84
  85 static int my_open(struct inode *inode, struct file *file)
  86 {
  87         unsigned int i;
  88         cycles_t cycles1, cycles2;
  89         unsigned long flags;
  90
  91         local_irq_save(flags);
  92 #ifdef CACHEFLUSH
  93         wbinvd();       /* initial write back, without cycle count */
  94         msleep(20);     /* wait for L2 flush */
  95 #endif
  96         rdtsc_barrier();
  97         cycles1 = get_cycles();
  98         rdtsc_barrier();
  99         for(i=0; i<2000; i++) {
 100                 test(i, i);
 101                 test(i, i);
 102                 test(i, i);
 103                 test(i, i);
 104                 test(i, i);
 105                 test(i, i);
 106                 test(i, i);
 107                 test(i, i);
 108                 test(i, i);
 109                 test(i, i);
 110         }
 111         rdtsc_barrier();
 112         cycles2 = get_cycles();
 113         rdtsc_barrier();
 114         local_irq_restore(flags);
 115         printk("cycles : %llu\n", cycles2-cycles1);
 116         return -EPERM;
 117 }
 118
 119
 120 static struct file_operations my_operations = {
 121         .open = my_open,
 122 };
 123
 124 int init_module(void)
 125 {
 126         pentry = create_proc_entry("testmark", 0444, NULL);
 127         if (pentry)
 128                 pentry->proc_fops = &my_operations;
 129
 130         return 0;
 131 }
 132
 133 void cleanup_module(void)
 134 {
 135         remove_proc_entry("testmark", NULL);
 136 }
 137
 138 MODULE_LICENSE("GPL");
 139 MODULE_AUTHOR("Mathieu Desnoyers");
 140 MODULE_DESCRIPTION("Marker Test");
 141 MODULE_VERSION("1.0");
 142