arch/x86/xen/multicalls.c

   1 /*
   2  * Xen hypercall batching.
   3  *
   4  * Xen allows multiple hypercalls to be issued at once, using the
   5  * multicall interface.  This allows the cost of trapping into the
   6  * hypervisor to be amortized over several calls.
   7  *
   8  * This file implements a simple interface for multicalls.  There's a
   9  * per-cpu buffer of outstanding multicalls.  When you want to queue a
  10  * multicall for issuing, you can allocate a multicall slot for the
  11  * call and its arguments, along with storage for space which is
  12  * pointed to by the arguments (for passing pointers to structures,
  13  * etc).  When the multicall is actually issued, all the space for the
  14  * commands and allocated memory is freed for reuse.
  15  *
  16  * Multicalls are flushed whenever any of the buffers get full, or
  17  * when explicitly requested.  There's no way to get per-multicall
  18  * return results back.  It will BUG if any of the multicalls fail.
  19  *
  20  * Jeremy Fitzhardinge <jeremy@xensource.com>, XenSource Inc, 2007
  21  */
  22 #include <linux/percpu.h>
  23 #include <linux/hardirq.h>
  24
  25 #include <asm/xen/hypercall.h>
  26
  27 #include "multicalls.h"
  28
  29 #define MC_DEBUG        1
  30
  31 #define MC_BATCH        32
  32 #define MC_ARGS         (MC_BATCH * 16)
  33
  34 struct mc_buffer {
  35         struct multicall_entry entries[MC_BATCH];
  36 #if MC_DEBUG
  37         struct multicall_entry debug[MC_BATCH];
  38 #endif
  39         unsigned char args[MC_ARGS];
  40         struct callback {
  41                 void (*fn)(void *);
  42                 void *data;
  43         } callbacks[MC_BATCH];
  44         unsigned mcidx, argidx, cbidx;
  45 };
  46
  47 static DEFINE_PER_CPU(struct mc_buffer, mc_buffer);
  48 DEFINE_PER_CPU(unsigned long, xen_mc_irq_flags);
  49
  50 void xen_mc_flush(void)
  51 {
  52         struct mc_buffer *b = &__get_cpu_var(mc_buffer);
  53         int ret = 0;
  54         unsigned long flags;
  55         int i;
  56
  57         BUG_ON(preemptible());
  58
  59         /* Disable interrupts in case someone comes in and queues
  60            something in the middle */
  61         local_irq_save(flags);
  62
  63         if (b->mcidx) {
  64 #if MC_DEBUG
  65                 memcpy(b->debug, b->entries,
  66                        b->mcidx * sizeof(struct multicall_entry));
  67 #endif
  68
  69                 if (HYPERVISOR_multicall(b->entries, b->mcidx) != 0)
  70                         BUG();
  71                 for (i = 0; i < b->mcidx; i++)
  72                         if (b->entries[i].result < 0)
  73                                 ret++;
  74
  75 #if MC_DEBUG
  76                 if (ret) {
  77                         printk(KERN_ERR "%d multicall(s) failed: cpu %d\n",
  78                                ret, smp_processor_id());
  79                         for (i = 0; i < b->mcidx; i++) {
  80                                 printk("  call %2d/%d: op=%lu arg=[%lx] result=%ld\n",
  81                                        i+1, b->mcidx,
  82                                        b->debug[i].op,
  83                                        b->debug[i].args[0],
  84                                        b->entries[i].result);
  85                         }
  86                 }
  87 #endif
  88
  89                 b->mcidx = 0;
  90                 b->argidx = 0;
  91         } else
  92                 BUG_ON(b->argidx != 0);
  93
  94         local_irq_restore(flags);
  95
  96         for (i = 0; i < b->cbidx; i++) {
  97                 struct callback *cb = &b->callbacks[i];
  98
  99                 (*cb->fn)(cb->data);
 100         }
 101         b->cbidx = 0;
 102
 103         BUG_ON(ret);
 104 }
 105
 106 struct multicall_space __xen_mc_entry(size_t args)
 107 {
 108         struct mc_buffer *b = &__get_cpu_var(mc_buffer);
 109         struct multicall_space ret;
 110         unsigned argidx = roundup(b->argidx, sizeof(u64));
 111
 112         BUG_ON(preemptible());
 113         BUG_ON(b->argidx > MC_ARGS);
 114
 115         if (b->mcidx == MC_BATCH ||
 116             (argidx + args) > MC_ARGS) {
 117                 xen_mc_flush();
 118                 argidx = roundup(b->argidx, sizeof(u64));
 119         }
 120
 121         ret.mc = &b->entries[b->mcidx];
 122         b->mcidx++;
 123         ret.args = &b->args[argidx];
 124         b->argidx = argidx + args;
 125
 126         BUG_ON(b->argidx > MC_ARGS);
 127         return ret;
 128 }
 129
 130 struct multicall_space xen_mc_extend_args(unsigned long op, size_t size)
 131 {
 132         struct mc_buffer *b = &__get_cpu_var(mc_buffer);
 133         struct multicall_space ret = { NULL, NULL };
 134
 135         BUG_ON(preemptible());
 136         BUG_ON(b->argidx > MC_ARGS);
 137
 138         if (b->mcidx == 0)
 139                 return ret;
 140
 141         if (b->entries[b->mcidx - 1].op != op)
 142                 return ret;
 143
 144         if ((b->argidx + size) > MC_ARGS)
 145                 return ret;
 146
 147         ret.mc = &b->entries[b->mcidx - 1];
 148         ret.args = &b->args[b->argidx];
 149         b->argidx += size;
 150
 151         BUG_ON(b->argidx > MC_ARGS);
 152         return ret;
 153 }
 154
 155 void xen_mc_callback(void (*fn)(void *), void *data)
 156 {
 157         struct mc_buffer *b = &__get_cpu_var(mc_buffer);
 158         struct callback *cb;
 159
 160         if (b->cbidx == MC_BATCH)
 161                 xen_mc_flush();
 162
 163         cb = &b->callbacks[b->cbidx++];
 164         cb->fn = fn;
 165         cb->data = data;
 166 }