mvkcontroller.xml 12 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247
  1. <class name="MvKController">
  2. <relationships>
  3. <association name="to_mvi" class="Server" min="1" max="1"/>
  4. </relationships>
  5. <constructor>
  6. <parameter name="params"/>
  7. <body>
  8. <![CDATA[
  9. self.mvs = ModelverseState("../bootstrap/bootstrap.m.gz")
  10. # Enable Garbage Collection
  11. self.mvs.GC = True
  12. self.root = self.mvs.read_root()[0]
  13. self.mvk = ModelverseKernel(self.root)
  14. self.all_failed = False
  15. self.timeout = False
  16. self.init_time = time.time()
  17. self.users = set()
  18. self.input_queue = defaultdict(list)
  19. self.output_queue = defaultdict(list)
  20. self.source = None
  21. self.port = int(sys.argv[1])
  22. self.count = 0
  23. self.debugged_users = set()
  24. self.debug_info = {}
  25. self.done_something = False
  26. self.mvs_operations = {
  27. "CN": self.mvs.create_node,
  28. "CE": self.mvs.create_edge,
  29. "CNV": self.mvs.create_nodevalue,
  30. "CD": self.mvs.create_dict,
  31. "RV": self.mvs.read_value,
  32. "RO": self.mvs.read_outgoing,
  33. "RI": self.mvs.read_incoming,
  34. "RE": self.mvs.read_edge,
  35. "RD": self.mvs.read_dict,
  36. "RDN": self.mvs.read_dict_node,
  37. "RDNE": self.mvs.read_dict_node_edge,
  38. "RDE": self.mvs.read_dict_edge,
  39. "RRD": self.mvs.read_reverse_dict,
  40. "RR": self.mvs.read_root,
  41. "RDK": self.mvs.read_dict_keys,
  42. "DE": self.mvs.delete_edge,
  43. "DN": self.mvs.delete_node,
  44. }
  45. self.execute_modelverse("", "load_primitives", [])
  46. ]]>
  47. </body>
  48. </constructor>
  49. <method name="execute_modelverse">
  50. <parameter name="username"/>
  51. <parameter name="operation"/>
  52. <parameter name="params"/>
  53. <body>
  54. <![CDATA[
  55. reply = None
  56. commands = []
  57. while 1:
  58. commands = self.mvk.execute_yields(username, operation, params, reply)
  59. if commands is None:
  60. break
  61. reply = [self.mvs_operations[command[0]](*(command[1]))[0] for command in commands]
  62. #for c, r in zip(commands, reply):
  63. # print("%s --> %s" % (c, r))
  64. ]]>
  65. </body>
  66. </method>
  67. <scxml initial="init_server">
  68. <state id="init_server">
  69. <onentry>
  70. <raise scope="cd" event="create_instance">
  71. <parameter expr="'to_mvi'"/>
  72. <parameter expr="'Server'"/>
  73. <parameter expr="''"/>
  74. <parameter expr="self.port"/>
  75. </raise>
  76. </onentry>
  77. <transition event="instance_created" target="../running">
  78. <parameter name="instancename"/>
  79. <raise scope="cd" event="start_instance">
  80. <parameter expr="instancename"/>
  81. </raise>
  82. </transition>
  83. </state>
  84. <parallel id="running">
  85. <state id="wait_for_requests">
  86. <state id="wait">
  87. <transition event="from_mvi" target=".">
  88. <parameter name="source"/>
  89. <parameter name="data"/>
  90. <script>
  91. # No JSON encoding necessary, as it is not complex
  92. try:
  93. self.done_something = False
  94. if data["op"] == "set_input":
  95. if "value" in data:
  96. value = [json.loads(data["value"])]
  97. else:
  98. value = json.loads(data["data"])
  99. self.input_queue[data["username"]].append((source, value))
  100. elif data["op"] == "get_output":
  101. self.output_queue[data["username"]].append(source)
  102. elif data["op"] == "attach_debugger":
  103. self.debugged_users.add(data["username"])
  104. self.done_something = True
  105. self.source = source
  106. self.debug_info[data["username"]] = {'state': 'running', 'breakpoints': []}
  107. elif data["op"] == "detach_debugger":
  108. self.debugged_users.discard(data["username"])
  109. self.done_something = True
  110. self.source = source
  111. del self.debug_info[data["username"]]
  112. elif data["op"] == "pause":
  113. if data["username"] in self.debugged_users:
  114. self.debug_info[data["username"]]['state'] = 'paused'
  115. self.done_something = True
  116. self.source = source
  117. elif data["op"] == "resume":
  118. if data["username"] in self.debugged_users:
  119. self.debug_info[data["username"]]['state'] = 'running'
  120. self.done_something = True
  121. self.source = source
  122. elif data["op"] == "step_over":
  123. pass
  124. self.done_something = True
  125. self.source = source
  126. elif data["op"] == "step_into":
  127. pass
  128. self.done_something = True
  129. self.source = source
  130. else:
  131. raise Exception("DROPPING unknown operation: " + str(data["op"]))
  132. except ValueError:
  133. print("Error when deserializing request: " + str(data))
  134. raise
  135. </script>
  136. </transition>
  137. <transition cond="self.done_something" target=".">
  138. <raise event="HTTP_input" scope="narrow" target="'to_mvi/%s' % self.source">
  139. <parameter expr="json.dumps(True)"/>
  140. </raise>
  141. <script>
  142. self.done_something = False
  143. </script>
  144. </transition>
  145. </state>
  146. </state>
  147. <state id="execution">
  148. <state id="execution">
  149. <onentry>
  150. <script>
  151. self.timeout = False
  152. self.destination = None
  153. if self.users:
  154. user = self.users.pop()
  155. if not user in self.debugged_users or self.debug_info[user]['state'] == 'running':
  156. # Check if there are values to input
  157. if self.input_queue[user]:
  158. source, args = self.input_queue[user].pop(0)
  159. for args_entry in args:
  160. self.execute_modelverse(user, "set_input", [args_entry])
  161. self.destination = source
  162. self.value = "OK"
  163. self.all_failed = False
  164. nr_of_steps = 1 if user in self.debugged_users else 100
  165. # Now process for some steps, or until we are again blocked for input
  166. for x in xrange(nr_of_steps):
  167. self.execute_modelverse(user, "execute_rule", [])
  168. if not self.mvk.success:
  169. # Blocking or broken, so quit already to stop wasting CPU
  170. break
  171. # Could at least execute one instruction, so mark it as "not failed"
  172. self.all_failed = False
  173. # Check that we don't have anything to output yet, otherwise we wait
  174. if self.destination is None:
  175. # Perform output if there is anything
  176. if self.output_queue[user]:
  177. self.execute_modelverse(user, "get_output", [])
  178. if self.mvk.success:
  179. self.destination = self.output_queue[user].pop(0)
  180. self.value = self.mvk.returnvalue
  181. self.all_failed = False
  182. else:
  183. if self.count >= 2000:
  184. self.count = 0
  185. self.mvs.purge()
  186. else:
  187. self.count += 1
  188. self.mvs.garbage_collect()
  189. out = self.mvs.read_outgoing(self.root)[0]
  190. for m in out:
  191. src, user = self.mvs.read_edge(m)[0]
  192. outgoing = self.mvs.read_outgoing(m)[0]
  193. first = self.mvs.read_edge(outgoing[0])[0]
  194. dest = first[1]
  195. name = self.mvs.read_value(dest)[0]
  196. if name.startswith("__"):
  197. continue
  198. self.users.add(name)
  199. self.timeout = self.all_failed
  200. self.all_failed = True
  201. </script>
  202. </onentry>
  203. <transition cond="self.destination is not None" after="self.sccd_yield()" target=".">
  204. <raise event="HTTP_input" scope="narrow" target="'to_mvi/%s' % self.destination">
  205. <parameter expr="json.dumps(self.value)"/>
  206. </raise>
  207. </transition>
  208. <transition cond="self.timeout and self.destination is None" after="self.sccd_yield() + 0.10" target="."/>
  209. <transition cond="not self.timeout and self.destination is None" after="self.sccd_yield()" target="."/>
  210. </state>
  211. </state>
  212. <state id="remove_sockets">
  213. <state id="remove_sockets">
  214. <transition event="delete_socket" target=".">
  215. <parameter name="socket"/>
  216. <script>
  217. for user in self.output_queue.keys():
  218. self.output_queue[user] = [s for s in self.output_queue[user] if s != socket]
  219. </script>
  220. </transition>
  221. </state>
  222. </state>
  223. </parallel>
  224. </scxml>
  225. </class>