src/simix/simcalls.py

   1 #!/usr/bin/env python
   2 # -*- coding: utf-8 -*-
   3 import re
   4
   5 types = [('TCHAR', 'char', 'c')
   6         ,('TSTRING', 'const char*', 'cc')
   7         ,('TINT', 'int', 'i')
   8         ,('TLONG', 'long', 'l')
   9         ,('TUCHAR', 'unsigned char', 'uc')
  10         ,('TUSHORT', 'unsigned short', 'us')
  11         ,('TUINT', 'unsigned int', 'ui')
  12         ,('TULONG', 'unsigned long', 'ul')
  13         ,('TFLOAT', 'float', 'f')
  14         ,('TDOUBLE', 'double', 'd')
  15         ,('TDPTR', 'void*', 'dp')
  16         ,('TFPTR', 'FPtr', 'fp')
  17         ,('TCPTR', 'const void*', 'cp')
  18         ,('TSIZE', 'size_t', 'sz')
  19         ,('TSGSIZE', 'sg_size_t', 'sgsz')
  20         ,('TVOID', 'void', '')
  21         ,('TDSPEC', 'void*', 'dp')
  22         ,('TFSPEC', 'FPtr', 'fp')]
  23
  24 class Arg(object):
  25   simcall_types = {k:v for _,k,v in types}
  26   def __init__(self, name, type, casted=None):
  27     self.name = name
  28     self.type = type
  29     self.casted = casted
  30     assert type in self.simcall_types, '%s not in (%s)'%(type, ', '.join(self.simcall_types.keys()))
  31
  32   def field(self):
  33     return self.simcall_types[self.type]
  34
  35   def ret(self):
  36     return '%s'%self.casted if self.casted else self.type
  37
  38   def cast(self):
  39     return '(%s)'%self.casted if self.casted else ''
  40
  41 class Simcall(object):
  42   def __init__(self, name, res, args, has_answer=True):
  43     self.name = name
  44     self.res = res
  45     self.args = args
  46     self.has_answer = has_answer
  47
  48   def enum(self):
  49     return 'SIMCALL_%s,'%(self.name.upper())
  50
  51   def string(self):
  52     return '[SIMCALL_%s] = "SIMCALL_%s",'%(self.name.upper(), self.name.upper())
  53
  54   def result_getter_setter(self):
  55     return '%s\n%s'%(self.result_getter(), self.result_setter())
  56
  57   def result_getter(self):
  58     return '' if self.res.type == 'void' else '''static inline %s simcall_%s__get__result(smx_simcall_t simcall){
  59   return %s simcall->result.%s;
  60 }'''%(self.res.ret(), self.name, self.res.cast(), self.res.field())
  61
  62   def result_setter(self):
  63     return '' if self.res.type == 'void' else '''static inline void simcall_%s__set__result(smx_simcall_t simcall, %s result){
  64     simcall->result.%s = result;
  65 }'''%(self.name, self.res.type, self.res.field())
  66
  67   def args_getter_setter(self):
  68     res = []
  69     for i in range(len(self.args)):
  70       res.append(self.arg_getter(i))
  71       res.append(self.arg_setter(i))
  72     return '\n'.join(res)
  73
  74   def arg_getter(self, i):
  75     arg = self.args[i]
  76     return '''static inline %s simcall_%s__get__%s(smx_simcall_t simcall){
  77   return %s simcall->args[%i].%s;
  78 }'''%(arg.ret(), self.name, arg.name, arg.cast(), i, arg.field())
  79
  80   def arg_setter(self, i):
  81     arg = self.args[i]
  82     return '''static inline void simcall_%s__set__%s(smx_simcall_t simcall, %s arg){
  83     simcall->args[%i].%s = arg;
  84 }'''%(self.name, arg.name, arg.type, i, arg.field())
  85
  86   def case(self):
  87     return '''case SIMCALL_%s:
  88       %sSIMIX_pre_%s(simcall %s);
  89       %s
  90       break;
  91 '''%(self.name.upper(),
  92      'simcall->result.%s = '%self.res.field() if self.res.type != 'void' and self.has_answer else ' ',
  93      self.name,
  94      ''.join(', %s simcall->args[%d].%s'%(arg.cast(), i, arg.field())
  95              for i, arg in enumerate(self.args)),
  96      'SIMIX_simcall_answer(simcall);' if self.has_answer else ' ')
  97
  98   def body(self):
  99     return '''  inline static %s simcall_BODY_%s(%s) {
 100     smx_process_t self = SIMIX_process_self();
 101     self->simcall.call = SIMCALL_%s;
 102     memset(&self->simcall.result, 0, sizeof(self->simcall.result));
 103     memset(self->simcall.args, 0, sizeof(self->simcall.args));
 104 %s
 105     if (self != simix_global->maestro_process) {
 106       XBT_DEBUG("Yield process '%%s' on simcall %%s (%%d)", self->name,
 107                 SIMIX_simcall_name(self->simcall.call), (int)self->simcall.call);
 108       SIMIX_process_yield(self);
 109     } else {
 110       SIMIX_simcall_pre(&self->simcall, 0);
 111     }
 112     %s
 113   }'''%(self.res.ret()
 114        ,self.name
 115        ,', '.join('%s %s'%(arg.ret(), arg.name)
 116                   for arg in self.args)
 117        ,self.name.upper()
 118        ,'\n'.join('    self->simcall.args[%d].%s = (%s) %s;'%(i, arg.field(), arg.type, arg.name)
 119                   for i, arg in enumerate(self.args))
 120        ,'' if self.res.type == 'void' else 'return self->simcall.result.%s;'%self.res.field())
 121
 122 def parse(fn):
 123   res = []
 124   resdi = None
 125   resd = {}
 126   for line in open(fn).read().split('\n'):
 127     if line.startswith('##'):
 128       resdi = []
 129       resd[re.search(r'## *(.*)', line).group(1)] = resdi
 130     if line.startswith('#') or not line:
 131       continue
 132     match = re.match(r'(\S*?) *(\S*?) *\((.*?)(?:, *(.*?))?\) *(.*)', line)
 133     assert match, line
 134     name, ans, rest, resc, args = match.groups()
 135     sargs = []
 136     for n,t,c in re.findall(r'\((.*?), *(.*?)(?:, *(.*?))?\)', args):
 137       sargs.append(Arg(n,t,c))
 138     sim = Simcall(name, Arg('result', rest, resc), sargs, ans == 'True')
 139     if resdi is None:
 140       res.append(sim)
 141     else:
 142       resdi.append(sim)
 143   return res, resd
 144
 145 def write(fn, func, scs, scd):
 146   f = open(fn, 'w')
 147   f.write('\n'.join(func(sc) for sc in scs))
 148   for k, v in scd.items():
 149     f.write('\n#ifdef %s\n%s\n#endif\n'%(k, '\n'.join(func(sc) for sc in v)))
 150   f.close()
 151
 152 if __name__=='__main__':
 153   simcalls, simcalls_dict = parse('simcalls.in')
 154
 155   write('simcalls_generated_enum.h', Simcall.enum, simcalls, simcalls_dict)
 156   write('simcalls_generated_string.c', Simcall.string, simcalls, simcalls_dict)
 157   write('simcalls_generated_res_getter_setter.h', Simcall.result_getter_setter, simcalls, simcalls_dict)
 158   write('simcalls_generated_args_getter_setter.h', Simcall.args_getter_setter, simcalls, simcalls_dict)
 159   write('simcalls_generated_case.c', Simcall.case, simcalls, simcalls_dict)
 160   write('simcalls_generated_body.c', Simcall.body, simcalls, simcalls_dict)
 161