poolparty 0.2.84 → 1.2.2

Sign up to get free protection for your applications and to get access to all the features.
Files changed (642) hide show
  1. data/History.txt +7 -0
  2. data/License.txt +1 -1
  3. data/PostInstall.txt +1 -1
  4. data/README.txt +13 -22
  5. data/Rakefile +26 -35
  6. data/VERSION.yml +4 -0
  7. data/bin/cloud +24 -3
  8. data/bin/cloud-bootstrap +31 -0
  9. data/bin/cloud-configure +36 -20
  10. data/bin/{pool-console → cloud-console} +0 -0
  11. data/bin/cloud-contract +7 -7
  12. data/bin/cloud-describe +28 -0
  13. data/bin/cloud-expand +13 -6
  14. data/bin/cloud-handle-load +3 -3
  15. data/bin/cloud-list +9 -14
  16. data/bin/cloud-osxcopy +6 -5
  17. data/bin/cloud-provision +17 -22
  18. data/bin/cloud-setup-dev +11 -11
  19. data/bin/cloud-show +28 -0
  20. data/bin/cloud-spec +2 -2
  21. data/bin/cloud-ssh +10 -3
  22. data/bin/cloud-start +21 -23
  23. data/bin/cloud-terminate +15 -7
  24. data/bin/cloud-verify +32 -0
  25. data/bin/install-poolparty +216 -0
  26. data/bin/server-butterfly +25 -0
  27. data/bin/server-cloud-elections +37 -0
  28. data/bin/server-ensure-provisioning +33 -0
  29. data/bin/server-get-load +9 -12
  30. data/bin/server-list-active +25 -12
  31. data/bin/server-manage-election +67 -0
  32. data/bin/server-monitor.ru +42 -0
  33. data/bin/server-query-agent +15 -0
  34. data/bin/server-rerun +1 -1
  35. data/bin/server-write-new-nodes +2 -2
  36. data/config/jeweler.rb +52 -0
  37. data/config/requirements.rb +1 -9
  38. data/examples/basic.rb +10 -10
  39. data/examples/deploy.rb +5 -0
  40. data/examples/fairchild.rb +28 -0
  41. data/examples/fairchild_chef.rb +19 -0
  42. data/examples/maize.rb +37 -0
  43. data/examples/paparazzi.conf.erb +21 -0
  44. data/generators/poolspec/poolspec_generator.rb +1 -9
  45. data/generators/poolspec/templates/pool_spec_template.erb +0 -1
  46. data/lib/poolparty/{aska/aska.rb → aska.rb} +19 -28
  47. data/lib/poolparty/base_packages/haproxy.rb +48 -31
  48. data/lib/poolparty/base_packages/heartbeat.rb +6 -62
  49. data/lib/poolparty/base_packages/poolparty.rb +5 -105
  50. data/lib/poolparty/base_packages/ruby.rb +4 -4
  51. data/lib/poolparty/base_packages/runit.rb +1 -1
  52. data/lib/poolparty/core/array.rb +21 -3
  53. data/lib/poolparty/core/hash.rb +45 -10
  54. data/lib/poolparty/core/kernel.rb +30 -8
  55. data/lib/poolparty/core/nil.rb +8 -0
  56. data/lib/poolparty/core/object.rb +34 -25
  57. data/lib/poolparty/core/ordered_hash.rb +99 -0
  58. data/lib/poolparty/core/string.rb +112 -15
  59. data/lib/poolparty/core/symbol.rb +10 -0
  60. data/lib/poolparty/dependencies.rb +49 -0
  61. data/lib/poolparty/dependency_resolver/chef_resolver.rb +237 -0
  62. data/lib/poolparty/dependency_resolver/dependency_resolver.rb +42 -0
  63. data/lib/poolparty/dependency_resolver/dependency_resolver_cloud_extensions.rb +29 -0
  64. data/lib/poolparty/{dependency_resolutions → dependency_resolver}/puppet.rb +34 -29
  65. data/lib/poolparty/dependency_resolver/puppet_resolver.rb +188 -0
  66. data/lib/poolparty/exceptions/MasterException.rb +2 -2
  67. data/lib/poolparty/exceptions/RemoteException.rb +1 -1
  68. data/lib/poolparty/exceptions/dependency_resolver_exception.rb +5 -0
  69. data/lib/poolparty/exceptions/package_exception.rb +7 -0
  70. data/lib/poolparty/extra/deployments.rb +7 -7
  71. data/lib/poolparty/helpers/binary.rb +26 -32
  72. data/lib/poolparty/helpers/console.rb +1 -1
  73. data/lib/poolparty/helpers/display.rb +1 -5
  74. data/lib/poolparty/helpers/hash_printer.rb +44 -0
  75. data/lib/poolparty/helpers/loading.rb +4 -0
  76. data/lib/poolparty/helpers/optioner.rb +39 -25
  77. data/lib/poolparty/lite.rb +30 -0
  78. data/lib/poolparty/modules/callbacks.rb +44 -0
  79. data/lib/poolparty/modules/cloud_dsl.rb +38 -8
  80. data/lib/poolparty/modules/cloud_resourcer.rb +67 -97
  81. data/lib/poolparty/modules/daemonizable.rb +141 -0
  82. data/lib/poolparty/modules/definable_resource.rb +8 -14
  83. data/lib/poolparty/modules/file_writer.rb +25 -17
  84. data/lib/poolparty/modules/pinger.rb +28 -0
  85. data/lib/poolparty/modules/pretty_printer.rb +1 -1
  86. data/lib/poolparty/modules/resourcing_dsl.rb +55 -40
  87. data/lib/poolparty/modules/searchable_paths.rb +91 -0
  88. data/lib/poolparty/modules/thread_pool.rb +107 -106
  89. data/lib/poolparty/modules/user_helpers.rb +20 -0
  90. data/lib/poolparty/monitors/base_monitor.rb +18 -75
  91. data/lib/poolparty/monitors/monitor_rack.rb +123 -0
  92. data/lib/poolparty/monitors/monitors/favicon_monitor.rb +12 -0
  93. data/lib/poolparty/monitors/monitors/load_monitor.rb +9 -0
  94. data/lib/poolparty/monitors/monitors/memory_monitor.rb +9 -9
  95. data/lib/poolparty/monitors/monitors/neighborhood_monitor.rb +77 -0
  96. data/lib/poolparty/monitors/monitors/stats_monitor.rb +187 -0
  97. data/lib/poolparty/monitors/monitors/time_monitor.rb +15 -0
  98. data/lib/poolparty/net/init.rb +10 -0
  99. data/lib/poolparty/net/remote_bases.rb +20 -0
  100. data/lib/poolparty/net/remote_instance.rb +26 -44
  101. data/lib/poolparty/net/remoter/cloud_control.rb +24 -0
  102. data/lib/poolparty/net/remoter/connections.rb +172 -0
  103. data/lib/poolparty/net/remoter/interactive.rb +45 -0
  104. data/lib/poolparty/net/remoter_base.rb +116 -111
  105. data/lib/poolparty/net/remoter_bases/ec2/ec2.rb +245 -0
  106. data/lib/poolparty/net/remoter_bases/ec2/ec2_remote_instance.rb +53 -0
  107. data/lib/poolparty/net/{remote_bases → remoter_bases}/ec2/ec2_response_object.rb +2 -4
  108. data/lib/poolparty/net/remoter_bases/vmrun/utilities/vm_disk.rb +12 -0
  109. data/lib/poolparty/net/remoter_bases/vmrun/utilities/vmx.rb +33 -0
  110. data/lib/poolparty/net/remoter_bases/vmrun/utilities/vmx_file.rb +117 -0
  111. data/lib/poolparty/net/remoter_bases/vmrun/vmrun.rb +158 -0
  112. data/lib/poolparty/net/remoter_bases/vmrun/vmrun_instance.rb +71 -0
  113. data/lib/poolparty/plugins/apache2/apache.rb +340 -0
  114. data/lib/poolparty/plugins/bind.rb +11 -0
  115. data/lib/poolparty/plugins/chef.rb +173 -0
  116. data/lib/poolparty/plugins/chef_deploy.rb +58 -0
  117. data/lib/poolparty/plugins/deploy_directory.rb +49 -0
  118. data/lib/poolparty/plugins/gem_package.rb +61 -0
  119. data/lib/poolparty/plugins/git.rb +41 -24
  120. data/lib/poolparty/plugins/line_in_file.rb +30 -0
  121. data/lib/poolparty/plugins/nanite.rb +41 -0
  122. data/lib/poolparty/plugins/rails_deploy.rb +76 -0
  123. data/lib/poolparty/plugins/svn.rb +56 -39
  124. data/lib/poolparty/poolparty/cloud.rb +137 -167
  125. data/lib/poolparty/poolparty/{base.rb → default.rb} +62 -25
  126. data/lib/poolparty/poolparty/key.rb +78 -0
  127. data/lib/poolparty/poolparty/loggable.rb +28 -27
  128. data/lib/poolparty/poolparty/neighborhoods.rb +102 -0
  129. data/lib/poolparty/poolparty/plugin.rb +53 -18
  130. data/lib/poolparty/poolparty/plugin_model.rb +20 -23
  131. data/lib/poolparty/poolparty/pool.rb +34 -26
  132. data/lib/poolparty/poolparty/poolparty_base_class.rb +190 -0
  133. data/lib/poolparty/poolparty/resource.rb +92 -178
  134. data/lib/poolparty/poolparty/script.rb +32 -20
  135. data/lib/poolparty/poolparty/service.rb +44 -0
  136. data/lib/poolparty/poolparty/template.rb +27 -0
  137. data/lib/poolparty/provision/boot_strapper.rb +164 -0
  138. data/lib/poolparty/provision/configurations/chef.rb +26 -0
  139. data/lib/poolparty/provision/configurations/puppet.rb +28 -0
  140. data/lib/poolparty/provision/dr_configure.rb +142 -0
  141. data/lib/poolparty/resources/cron.rb +51 -0
  142. data/lib/poolparty/resources/directory.rb +36 -0
  143. data/lib/poolparty/resources/exec.rb +47 -0
  144. data/lib/poolparty/resources/file.rb +73 -0
  145. data/lib/poolparty/resources/host.rb +37 -0
  146. data/lib/poolparty/resources/mount.rb +45 -0
  147. data/lib/poolparty/resources/package.rb +41 -0
  148. data/lib/poolparty/resources/remote_file.rb +52 -0
  149. data/lib/poolparty/resources/service.rb +41 -0
  150. data/lib/poolparty/resources/sshkey.rb +49 -0
  151. data/lib/poolparty/resources/symlink.rb +43 -0
  152. data/lib/poolparty/{poolparty/resources/remote_user.rb → resources/user.rb} +1 -5
  153. data/lib/poolparty/resources/variable.rb +34 -0
  154. data/lib/poolparty/resources.rb +42 -0
  155. data/lib/poolparty/schema.rb +79 -0
  156. data/lib/poolparty/templates/apache2/apache2.conf +14 -0
  157. data/lib/poolparty/templates/apache2/base.conf.erb +168 -0
  158. data/lib/poolparty/templates/apache2/browser_fixes.conf.erb +26 -0
  159. data/lib/poolparty/templates/apache2/debian.conf.erb +675 -0
  160. data/lib/poolparty/templates/apache2/default-site.conf.erb +41 -0
  161. data/lib/poolparty/templates/apache2/directory_indexes.conf.erb +101 -0
  162. data/lib/poolparty/templates/apache2/logging-syslog.conf.erb +42 -0
  163. data/lib/poolparty/templates/apache2/mime-extras.conf.erb +211 -0
  164. data/lib/poolparty/templates/apache2/mime-minimal.conf.erb +15 -0
  165. data/lib/poolparty/templates/apache2/mpm-worker.conf.erb +20 -0
  166. data/lib/poolparty/templates/apache2/mpm-worker.erb +20 -0
  167. data/lib/poolparty/templates/apache2/passenger.conf.erb +20 -0
  168. data/lib/poolparty/templates/apache2/php.ini.erb +1253 -0
  169. data/lib/poolparty/templates/apache2/server-status.erb +19 -0
  170. data/lib/poolparty/templates/erlang_cookie_maker +6 -0
  171. data/lib/poolparty/templates/gemrc_template +11 -0
  172. data/lib/poolparty/templates/ha.cf +1 -1
  173. data/lib/poolparty/templates/haproxy.conf +29 -27
  174. data/lib/poolparty/templates/haresources +2 -2
  175. data/lib/poolparty/templates/monitor.ru +16 -0
  176. data/lib/poolparty/templates/php.ini.erb +1253 -0
  177. data/lib/poolparty/templates/puppet/add_puppet_to_hosts +6 -0
  178. data/lib/poolparty/templates/puppet/puppet.conf +2 -0
  179. data/lib/poolparty/templates/puppet/puppetrunner +14 -0
  180. data/lib/poolparty/templates/puppet/site.pp +4 -0
  181. data/lib/poolparty/templates/puppetrunner +11 -5
  182. data/lib/poolparty/verification/verifier_base.rb +17 -0
  183. data/lib/poolparty/verification/verifiers/http_match.rb +43 -0
  184. data/lib/poolparty/verification/verifiers/http_status.rb +59 -0
  185. data/lib/poolparty/verification/verifiers/ping.rb +34 -0
  186. data/lib/poolparty/verification/verify.rb +76 -0
  187. data/lib/poolparty.rb +76 -22
  188. data/lib/poolpartycl.rb +66 -1
  189. data/script/destroy +1 -1
  190. data/script/generate +1 -1
  191. data/spec/bin/bin_spec_helper.rb +7 -0
  192. data/spec/bin/fixtures/bin_cloud_for_test.rb +13 -0
  193. data/spec/bin/server-list-active_spec.rb +24 -0
  194. data/spec/poolparty/aska/aska_spec.rb +5 -5
  195. data/spec/poolparty/base_packages/haproxy_spec.rb +2 -8
  196. data/spec/poolparty/base_packages/heartbeat_spec.rb +3 -26
  197. data/spec/poolparty/bin/console_spec.rb +11 -29
  198. data/spec/poolparty/core/array_spec.rb +20 -3
  199. data/spec/poolparty/core/hash_spec.rb +30 -28
  200. data/spec/poolparty/core/object_spec.rb +2 -3
  201. data/spec/poolparty/core/ordered_hash_spec.rb +48 -0
  202. data/spec/poolparty/core/string_spec.rb +1 -27
  203. data/spec/poolparty/dependencies_spec.rb +11 -0
  204. data/spec/poolparty/dependency_resolver/chef_resolver_spec.rb +107 -0
  205. data/spec/poolparty/dependency_resolver/dependency_resolver_cloud_extensions_spec.rb +122 -0
  206. data/spec/poolparty/dependency_resolver/dependency_resolver_spec.rb +16 -0
  207. data/spec/poolparty/dependency_resolver/puppet_resolver_spec.rb +121 -0
  208. data/spec/poolparty/extra/deployments_spec.rb +9 -5
  209. data/spec/poolparty/fixtures/clouds.json +128 -0
  210. data/spec/poolparty/fixtures/test_template.erb +1 -0
  211. data/spec/poolparty/helpers/binary_spec.rb +1 -1
  212. data/spec/poolparty/helpers/hash_printer_spec.rb +34 -0
  213. data/spec/poolparty/helpers/optioner_spec.rb +1 -1
  214. data/spec/poolparty/id_rsa +27 -0
  215. data/spec/poolparty/modules/cloud_resourcer_spec.rb +26 -111
  216. data/spec/poolparty/modules/definable_resource.rb +1 -1
  217. data/spec/poolparty/modules/file_writer_spec.rb +10 -4
  218. data/spec/poolparty/modules/searchable_paths_spec.rb +76 -0
  219. data/spec/poolparty/monitors/base_monitor_spec.rb +112 -111
  220. data/spec/poolparty/monitors/monitors/cpu_monitor_spec.rb +18 -16
  221. data/spec/poolparty/monitors/monitors/memory_monitor_spec.rb +48 -47
  222. data/spec/poolparty/net/remote_instance_spec.rb +9 -73
  223. data/spec/poolparty/net/remote_spec.rb +287 -310
  224. data/spec/poolparty/net/remoter_base_spec.rb +3 -56
  225. data/spec/poolparty/net/remoter_bases/ec2_mocks_and_stubs.rb +24 -0
  226. data/spec/poolparty/net/remoter_bases/ec2_remote_instance_spec.rb +114 -0
  227. data/spec/poolparty/net/{remote_bases → remoter_bases}/ec2_spec.rb +51 -53
  228. data/spec/poolparty/net/remoter_spec.rb +96 -86
  229. data/spec/poolparty/plugins/chef_spec.rb +7 -0
  230. data/spec/poolparty/plugins/deploydirectory_spec.rb +51 -52
  231. data/spec/poolparty/plugins/git_spec.rb +16 -20
  232. data/spec/poolparty/plugins/line_spec.rb +14 -8
  233. data/spec/poolparty/poolparty/cloud_spec.rb +85 -183
  234. data/spec/poolparty/poolparty/configurers/files/ruby_basic.rb +3 -4
  235. data/spec/poolparty/poolparty/configurers/ruby_spec.rb +7 -23
  236. data/spec/poolparty/poolparty/{base_spec.rb → default_spec.rb} +44 -41
  237. data/spec/poolparty/poolparty/example_spec.rb +43 -11
  238. data/spec/poolparty/poolparty/key_spec.rb +42 -0
  239. data/spec/poolparty/poolparty/neighborhoods_spec.rb +65 -0
  240. data/spec/poolparty/poolparty/plugin_model_spec.rb +14 -24
  241. data/spec/poolparty/poolparty/plugin_spec.rb +25 -96
  242. data/spec/poolparty/poolparty/pool_spec.rb +3 -1
  243. data/spec/poolparty/poolparty/resource_spec.rb +70 -270
  244. data/spec/poolparty/poolparty/script_spec.rb +30 -53
  245. data/spec/poolparty/poolparty/service_spec.rb +5 -0
  246. data/spec/poolparty/poolparty/template_spec.rb +26 -0
  247. data/spec/poolparty/poolparty/test_plugins/webserver.rb +8 -25
  248. data/spec/poolparty/poolparty_base_class_spec.rb +84 -0
  249. data/spec/poolparty/poolparty_spec.rb +7 -4
  250. data/spec/poolparty/resources/cron_spec.rb +44 -0
  251. data/spec/poolparty/resources/directory_spec.rb +40 -0
  252. data/spec/poolparty/resources/exec_spec.rb +37 -0
  253. data/spec/poolparty/resources/file_spec.rb +64 -0
  254. data/spec/poolparty/resources/gem_spec.rb +7 -0
  255. data/spec/poolparty/resources/host_spec.rb +35 -0
  256. data/spec/poolparty/resources/package_spec.rb +26 -0
  257. data/spec/poolparty/resources/service_spec.rb +29 -0
  258. data/spec/poolparty/resources/sshkey_spec.rb +40 -0
  259. data/spec/poolparty/resources/symlink_spec.rb +29 -0
  260. data/spec/poolparty/resources/user_spec.rb +48 -0
  261. data/spec/poolparty/resources/variable_spec.rb +26 -0
  262. data/spec/poolparty/schema_spec.rb +53 -0
  263. data/spec/poolparty/spec_helper.rb +107 -23
  264. data/spec/poolparty/test_spec_helper.rb +13 -0
  265. data/tasks/development.rake +85 -69
  266. data/tasks/poolparty.rake +54 -0
  267. data/tasks/server.rake +41 -39
  268. data/tasks/spec.rake +35 -1
  269. data/test/fixtures/test_template.erb +1 -0
  270. data/test/poolparty/core/array_test.rb +21 -0
  271. data/test/poolparty/core/hash_test.rb +34 -0
  272. data/test/poolparty/core/string_test.rb +29 -0
  273. data/test/poolparty/dependency_resolver/puppet_resolver_test.rb +90 -0
  274. data/test/poolparty/modules/callbacks_test.rb +40 -0
  275. data/test/poolparty/modules/cloud_dsl_test.rb +60 -0
  276. data/test/poolparty/net/remoter_bases/vmrun/vmrun_test.rb +54 -0
  277. data/test/poolparty/net/remoter_test.rb +14 -0
  278. data/test/poolparty/poolparty/neighborhood_test.rb +23 -0
  279. data/test/poolparty/poolparty/poolparty_base_class_test.rb +84 -0
  280. data/test/poolparty/poolparty/template_test.rb +31 -0
  281. data/test/poolparty/provision/boot_strapper_test.rb +6 -0
  282. data/test/poolparty/provision/dr_configure_test.rb +6 -0
  283. data/test/poolparty/verification/verify_test.rb +49 -0
  284. data/test/test_helper.rb +8 -2
  285. data/test/test_poolparty.rb +6 -5
  286. data/vendor/chef/apache2/README.rdoc +59 -0
  287. data/vendor/chef/apache2/attributes/apache.rb +72 -0
  288. data/vendor/chef/apache2/definitions/apache_module.rb +36 -0
  289. data/vendor/chef/apache2/definitions/apache_site.rb +36 -0
  290. data/vendor/chef/apache2/definitions/web_app.rb +45 -0
  291. data/vendor/chef/apache2/files/default/apache2_module_conf_generate.pl +41 -0
  292. data/vendor/chef/apache2/recipes/default.rb +132 -0
  293. data/vendor/chef/apache2/recipes/mod_alias.rb +20 -0
  294. data/vendor/chef/apache2/recipes/mod_auth_basic.rb +20 -0
  295. data/vendor/chef/apache2/recipes/mod_auth_digest.rb +20 -0
  296. data/vendor/chef/apache2/recipes/mod_authn_file.rb +20 -0
  297. data/vendor/chef/apache2/recipes/mod_authnz_ldap.rb +20 -0
  298. data/vendor/chef/apache2/recipes/mod_authz_default.rb +20 -0
  299. data/vendor/chef/apache2/recipes/mod_authz_groupfile.rb +20 -0
  300. data/vendor/chef/apache2/recipes/mod_authz_host.rb +20 -0
  301. data/vendor/chef/apache2/recipes/mod_authz_user.rb +20 -0
  302. data/vendor/chef/apache2/recipes/mod_autoindex.rb +20 -0
  303. data/vendor/chef/apache2/recipes/mod_cgi.rb +20 -0
  304. data/vendor/chef/apache2/recipes/mod_dav.rb +20 -0
  305. data/vendor/chef/apache2/recipes/mod_dav_svn.rb +20 -0
  306. data/vendor/chef/apache2/recipes/mod_deflate.rb +20 -0
  307. data/vendor/chef/apache2/recipes/mod_dir.rb +20 -0
  308. data/vendor/chef/apache2/recipes/mod_env.rb +20 -0
  309. data/vendor/chef/apache2/recipes/mod_expires.rb +20 -0
  310. data/vendor/chef/apache2/recipes/mod_fcgid.rb +35 -0
  311. data/vendor/chef/apache2/recipes/mod_headers.rb +20 -0
  312. data/vendor/chef/apache2/recipes/mod_ldap.rb +20 -0
  313. data/vendor/chef/apache2/recipes/mod_log_config.rb +20 -0
  314. data/vendor/chef/apache2/recipes/mod_mime.rb +20 -0
  315. data/vendor/chef/apache2/recipes/mod_negotiation.rb +20 -0
  316. data/vendor/chef/apache2/recipes/mod_php5.rb +27 -0
  317. data/vendor/chef/apache2/recipes/mod_proxy.rb +20 -0
  318. data/vendor/chef/apache2/recipes/mod_proxy_http.rb +20 -0
  319. data/vendor/chef/apache2/recipes/mod_python.rb +22 -0
  320. data/vendor/chef/apache2/recipes/mod_rewrite.rb +20 -0
  321. data/vendor/chef/apache2/recipes/mod_setenvif.rb +20 -0
  322. data/vendor/chef/apache2/recipes/mod_ssl.rb +20 -0
  323. data/vendor/chef/apache2/recipes/mod_status.rb +20 -0
  324. data/vendor/chef/apache2/templates/default/a2dismod.erb +22 -0
  325. data/vendor/chef/apache2/templates/default/a2dissite.erb +29 -0
  326. data/vendor/chef/apache2/templates/default/a2enmod.erb +37 -0
  327. data/vendor/chef/apache2/templates/default/a2ensite.erb +38 -0
  328. data/vendor/chef/apache2/templates/default/apache2.conf.erb +630 -0
  329. data/vendor/chef/apache2/templates/default/default-site.erb +45 -0
  330. data/vendor/chef/apache2/templates/default/port_apache.erb +2 -0
  331. data/vendor/chef/apache2/templates/default/ports.conf.erb +6 -0
  332. data/vendor/chef/apache2/templates/default/web_app.conf.erb +43 -0
  333. data/vendor/chef/chef-deploy/LICENSE +201 -0
  334. data/vendor/chef/chef-deploy/README.rdoc +24 -0
  335. data/vendor/chef/chef-deploy/Rakefile +57 -0
  336. data/vendor/chef/chef-deploy/TODO +4 -0
  337. data/vendor/chef/chef-deploy/lib/chef-deploy/cached_deploy.rb +230 -0
  338. data/vendor/chef/chef-deploy/lib/chef-deploy/git.rb +132 -0
  339. data/vendor/chef/chef-deploy/lib/chef-deploy/subversion.rb +98 -0
  340. data/vendor/chef/chef-deploy/lib/chef-deploy.rb +183 -0
  341. data/vendor/gems/butterfly/History.txt +4 -0
  342. data/vendor/gems/butterfly/PostInstall.txt +2 -0
  343. data/vendor/gems/butterfly/README.rdoc +48 -0
  344. data/vendor/gems/butterfly/Rakefile +62 -0
  345. data/vendor/gems/butterfly/VERSION.yml +4 -0
  346. data/vendor/gems/butterfly/bin/flutter +4 -0
  347. data/vendor/gems/butterfly/butterfly.gemspec +37 -0
  348. data/vendor/gems/butterfly/examples/config.ru +15 -0
  349. data/vendor/gems/butterfly/examples/my_app.rb +12 -0
  350. data/vendor/gems/butterfly/lib/butterfly.rb +14 -0
  351. data/vendor/gems/butterfly/lib/handler.rb +48 -0
  352. data/vendor/gems/butterfly/lib/request.rb +29 -0
  353. data/vendor/gems/butterfly/lib/response.rb +49 -0
  354. data/vendor/gems/butterfly/script/console +10 -0
  355. data/vendor/gems/butterfly/script/destroy +14 -0
  356. data/vendor/gems/butterfly/script/generate +14 -0
  357. data/vendor/gems/butterfly/test/test_adapter_base.rb +23 -0
  358. data/vendor/gems/butterfly/test/test_butterfly_request.rb +46 -0
  359. data/vendor/gems/butterfly/test/test_butterfly_response.rb +43 -0
  360. data/vendor/gems/butterfly/test/test_butterfly_server.rb +16 -0
  361. data/vendor/gems/butterfly/test/test_default.rb +12 -0
  362. data/vendor/gems/butterfly/test/test_helper.rb +6 -0
  363. data/vendor/gems/dslify/History.txt +4 -0
  364. data/vendor/gems/dslify/Manifest.txt +25 -0
  365. data/vendor/gems/dslify/PostInstall.txt +5 -0
  366. data/vendor/gems/dslify/README.txt +60 -0
  367. data/vendor/gems/dslify/Rakefile +56 -0
  368. data/{config → vendor/gems/dslify/config}/hoe.rb +12 -55
  369. data/vendor/gems/dslify/config/requirements.rb +15 -0
  370. data/vendor/gems/dslify/dslify.gemspec +40 -0
  371. data/vendor/gems/dslify/lib/dslify/dslify.rb +76 -0
  372. data/vendor/gems/dslify/lib/dslify/version.rb +10 -0
  373. data/vendor/gems/dslify/lib/dslify.rb +7 -0
  374. data/vendor/gems/dslify/script/console +10 -0
  375. data/vendor/gems/dslify/script/destroy +14 -0
  376. data/vendor/gems/dslify/script/generate +14 -0
  377. data/{script → vendor/gems/dslify/script}/txt2html +4 -4
  378. data/{setup.rb → vendor/gems/dslify/setup.rb} +3 -3
  379. data/{tasks → vendor/gems/dslify/tasks}/deployment.rake +4 -18
  380. data/vendor/gems/dslify/tasks/environment.rake +7 -0
  381. data/{tasks → vendor/gems/dslify/tasks}/website.rake +0 -0
  382. data/vendor/gems/dslify/test/test_dslify.rb +138 -0
  383. data/vendor/gems/dslify/website/index.html +86 -0
  384. data/vendor/gems/dslify/website/index.txt +83 -0
  385. data/{website → vendor/gems/dslify/website}/javascripts/rounded_corners_lite.inc.js +0 -0
  386. data/{website → vendor/gems/dslify/website}/stylesheets/screen.css +18 -27
  387. data/{website → vendor/gems/dslify/website}/template.html.erb +1 -2
  388. data/vendor/gems/parenting/History.txt +4 -0
  389. data/vendor/gems/parenting/Manifest.txt +14 -0
  390. data/vendor/gems/parenting/PostInstall.txt +2 -0
  391. data/vendor/gems/parenting/README.rdoc +47 -0
  392. data/vendor/gems/parenting/Rakefile +28 -0
  393. data/vendor/gems/parenting/lib/parenting/parenting.rb +61 -0
  394. data/vendor/gems/parenting/lib/parenting.rb +10 -0
  395. data/vendor/gems/parenting/parenting.gemspec +39 -0
  396. data/vendor/gems/parenting/script/console +10 -0
  397. data/vendor/gems/parenting/script/destroy +14 -0
  398. data/vendor/gems/parenting/script/generate +14 -0
  399. data/vendor/gems/parenting/test/file_to_eval.rb +9 -0
  400. data/vendor/gems/parenting/test/test_helper.rb +5 -0
  401. data/vendor/gems/parenting/test/test_parenting.rb +117 -0
  402. data/vendor/gems/suitcase/LICENSE +20 -0
  403. data/vendor/gems/suitcase/README.rdoc +31 -0
  404. data/vendor/gems/suitcase/Rakefile +57 -0
  405. data/vendor/gems/suitcase/VERSION.yml +4 -0
  406. data/vendor/gems/suitcase/lib/suitcase/unzipper.rb +15 -0
  407. data/vendor/gems/suitcase/lib/suitcase/zipper.rb +119 -0
  408. data/vendor/gems/suitcase/lib/suitcase.rb +5 -0
  409. data/vendor/gems/suitcase/suitcase.gemspec +32 -0
  410. data/vendor/gems/suitcase/test/suitcase_test.rb +102 -0
  411. data/vendor/gems/suitcase/test/test_dir/box.rb +1 -0
  412. data/vendor/gems/suitcase/test/test_dir/test.txt +1 -0
  413. data/vendor/gems/suitcase/test/test_helper.rb +12 -0
  414. metadata +370 -343
  415. data/Capfile +0 -1
  416. data/Manifest.txt +0 -414
  417. data/bin/cloud-add-keypair +0 -28
  418. data/bin/cloud-ensure-provisioning +0 -39
  419. data/bin/cloud-maintain +0 -30
  420. data/bin/cloud-refresh +0 -17
  421. data/bin/cloud-run +0 -18
  422. data/bin/cloud-stats +0 -17
  423. data/bin/messenger-get-current-nodes +0 -14
  424. data/bin/pool +0 -31
  425. data/bin/pool-describe +0 -8
  426. data/bin/pool-generate +0 -18
  427. data/bin/pool-init +0 -28
  428. data/bin/pool-list +0 -30
  429. data/bin/pool-start +0 -26
  430. data/bin/server-build-messenger +0 -27
  431. data/bin/server-clean-cert-for +0 -15
  432. data/bin/server-list-responding +0 -24
  433. data/bin/server-start-client +0 -29
  434. data/bin/server-start-master +0 -26
  435. data/bin/server-start-node +0 -32
  436. data/bin/server-stop-client +0 -3
  437. data/bin/server-stop-master +0 -3
  438. data/bin/server-stop-node +0 -3
  439. data/bin/server-update-hosts +0 -49
  440. data/lib/erlang/messenger/Emakefile +0 -1
  441. data/lib/erlang/messenger/Makefile +0 -15
  442. data/lib/erlang/messenger/README +0 -5
  443. data/lib/erlang/messenger/Rakefile +0 -72
  444. data/lib/erlang/messenger/control +0 -11
  445. data/lib/erlang/messenger/ebin/client.app +0 -19
  446. data/lib/erlang/messenger/ebin/client_app.beam +0 -0
  447. data/lib/erlang/messenger/ebin/client_server.beam +0 -0
  448. data/lib/erlang/messenger/ebin/erl_crash.dump +0 -10326
  449. data/lib/erlang/messenger/ebin/master.app +0 -19
  450. data/lib/erlang/messenger/ebin/master_app.beam +0 -0
  451. data/lib/erlang/messenger/ebin/node.app +0 -19
  452. data/lib/erlang/messenger/ebin/node_app.beam +0 -0
  453. data/lib/erlang/messenger/ebin/packager.app +0 -19
  454. data/lib/erlang/messenger/ebin/pm_client.beam +0 -0
  455. data/lib/erlang/messenger/ebin/pm_client_old.beam +0 -0
  456. data/lib/erlang/messenger/ebin/pm_client_rel-0.1.rel +0 -1
  457. data/lib/erlang/messenger/ebin/pm_client_supervisor.beam +0 -0
  458. data/lib/erlang/messenger/ebin/pm_cluster.beam +0 -0
  459. data/lib/erlang/messenger/ebin/pm_event_manager.beam +0 -0
  460. data/lib/erlang/messenger/ebin/pm_master.beam +0 -0
  461. data/lib/erlang/messenger/ebin/pm_master_event_handler.beam +0 -0
  462. data/lib/erlang/messenger/ebin/pm_master_rel-0.1.rel +0 -1
  463. data/lib/erlang/messenger/ebin/pm_master_supervisor.beam +0 -0
  464. data/lib/erlang/messenger/ebin/pm_node.beam +0 -0
  465. data/lib/erlang/messenger/ebin/pm_node_rel-0.1.rel +0 -1
  466. data/lib/erlang/messenger/ebin/pm_node_supervisor.beam +0 -0
  467. data/lib/erlang/messenger/ebin/pm_packager.beam +0 -0
  468. data/lib/erlang/messenger/ebin/pm_spawner.beam +0 -0
  469. data/lib/erlang/messenger/ebin/pm_strings.beam +0 -0
  470. data/lib/erlang/messenger/ebin/utils.beam +0 -0
  471. data/lib/erlang/messenger/include/defines.hrl +0 -27
  472. data/lib/erlang/messenger/lib/eunit/AUTHORS +0 -2
  473. data/lib/erlang/messenger/lib/eunit/CHANGELOG +0 -14
  474. data/lib/erlang/messenger/lib/eunit/COPYING +0 -504
  475. data/lib/erlang/messenger/lib/eunit/Makefile +0 -28
  476. data/lib/erlang/messenger/lib/eunit/NOTES +0 -276
  477. data/lib/erlang/messenger/lib/eunit/README +0 -3
  478. data/lib/erlang/messenger/lib/eunit/doc/edoc-info +0 -3
  479. data/lib/erlang/messenger/lib/eunit/doc/erlang.png +0 -0
  480. data/lib/erlang/messenger/lib/eunit/doc/eunit.html +0 -172
  481. data/lib/erlang/messenger/lib/eunit/doc/index.html +0 -17
  482. data/lib/erlang/messenger/lib/eunit/doc/modules-frame.html +0 -12
  483. data/lib/erlang/messenger/lib/eunit/doc/overview-summary.html +0 -984
  484. data/lib/erlang/messenger/lib/eunit/doc/overview.edoc +0 -980
  485. data/lib/erlang/messenger/lib/eunit/doc/packages-frame.html +0 -11
  486. data/lib/erlang/messenger/lib/eunit/doc/stylesheet.css +0 -55
  487. data/lib/erlang/messenger/lib/eunit/ebin/autoload.beam +0 -0
  488. data/lib/erlang/messenger/lib/eunit/ebin/code_monitor.beam +0 -0
  489. data/lib/erlang/messenger/lib/eunit/ebin/eunit.app +0 -21
  490. data/lib/erlang/messenger/lib/eunit/ebin/eunit.appup +0 -1
  491. data/lib/erlang/messenger/lib/eunit/ebin/eunit.beam +0 -0
  492. data/lib/erlang/messenger/lib/eunit/ebin/eunit_autoexport.beam +0 -0
  493. data/lib/erlang/messenger/lib/eunit/ebin/eunit_data.beam +0 -0
  494. data/lib/erlang/messenger/lib/eunit/ebin/eunit_lib.beam +0 -0
  495. data/lib/erlang/messenger/lib/eunit/ebin/eunit_proc.beam +0 -0
  496. data/lib/erlang/messenger/lib/eunit/ebin/eunit_serial.beam +0 -0
  497. data/lib/erlang/messenger/lib/eunit/ebin/eunit_server.beam +0 -0
  498. data/lib/erlang/messenger/lib/eunit/ebin/eunit_striptests.beam +0 -0
  499. data/lib/erlang/messenger/lib/eunit/ebin/eunit_test.beam +0 -0
  500. data/lib/erlang/messenger/lib/eunit/ebin/eunit_tests.beam +0 -0
  501. data/lib/erlang/messenger/lib/eunit/ebin/eunit_tty.beam +0 -0
  502. data/lib/erlang/messenger/lib/eunit/ebin/file_monitor.beam +0 -0
  503. data/lib/erlang/messenger/lib/eunit/examples/eunit_examples.erl +0 -339
  504. data/lib/erlang/messenger/lib/eunit/examples/fib.erl +0 -19
  505. data/lib/erlang/messenger/lib/eunit/examples/tests.txt +0 -1
  506. data/lib/erlang/messenger/lib/eunit/include/eunit.hrl +0 -313
  507. data/lib/erlang/messenger/lib/eunit/src/Makefile +0 -46
  508. data/lib/erlang/messenger/lib/eunit/src/autoload.erl +0 -388
  509. data/lib/erlang/messenger/lib/eunit/src/code_monitor.erl +0 -243
  510. data/lib/erlang/messenger/lib/eunit/src/eunit.app.src +0 -21
  511. data/lib/erlang/messenger/lib/eunit/src/eunit.appup.src +0 -1
  512. data/lib/erlang/messenger/lib/eunit/src/eunit.erl +0 -196
  513. data/lib/erlang/messenger/lib/eunit/src/eunit_autoexport.erl +0 -102
  514. data/lib/erlang/messenger/lib/eunit/src/eunit_data.erl +0 -798
  515. data/lib/erlang/messenger/lib/eunit/src/eunit_internal.hrl +0 -48
  516. data/lib/erlang/messenger/lib/eunit/src/eunit_lib.erl +0 -682
  517. data/lib/erlang/messenger/lib/eunit/src/eunit_proc.erl +0 -552
  518. data/lib/erlang/messenger/lib/eunit/src/eunit_serial.erl +0 -157
  519. data/lib/erlang/messenger/lib/eunit/src/eunit_server.erl +0 -340
  520. data/lib/erlang/messenger/lib/eunit/src/eunit_striptests.erl +0 -64
  521. data/lib/erlang/messenger/lib/eunit/src/eunit_test.erl +0 -334
  522. data/lib/erlang/messenger/lib/eunit/src/eunit_tests.erl +0 -45
  523. data/lib/erlang/messenger/lib/eunit/src/eunit_tty.erl +0 -272
  524. data/lib/erlang/messenger/lib/eunit/src/file_monitor.erl +0 -409
  525. data/lib/erlang/messenger/lib/eunit/sys.config +0 -9
  526. data/lib/erlang/messenger/lib/eunit/vsn.mk +0 -1
  527. data/lib/erlang/messenger/pm_client_rel-0.1.boot +0 -0
  528. data/lib/erlang/messenger/pm_client_rel-0.1.script +0 -238
  529. data/lib/erlang/messenger/pm_master_rel-0.1.boot +0 -0
  530. data/lib/erlang/messenger/pm_master_rel-0.1.script +0 -239
  531. data/lib/erlang/messenger/pm_node_rel-0.1.boot +0 -0
  532. data/lib/erlang/messenger/pm_node_rel-0.1.script +0 -237
  533. data/lib/erlang/messenger/src/client_app.erl +0 -39
  534. data/lib/erlang/messenger/src/client_server.erl +0 -60
  535. data/lib/erlang/messenger/src/master_app.erl +0 -39
  536. data/lib/erlang/messenger/src/node_app.erl +0 -39
  537. data/lib/erlang/messenger/src/pm_client.erl +0 -49
  538. data/lib/erlang/messenger/src/pm_client_supervisor.erl +0 -38
  539. data/lib/erlang/messenger/src/pm_cluster.erl +0 -61
  540. data/lib/erlang/messenger/src/pm_event_manager.erl +0 -27
  541. data/lib/erlang/messenger/src/pm_master.erl +0 -215
  542. data/lib/erlang/messenger/src/pm_master_event_handler.erl +0 -72
  543. data/lib/erlang/messenger/src/pm_master_supervisor.erl +0 -39
  544. data/lib/erlang/messenger/src/pm_node.erl +0 -200
  545. data/lib/erlang/messenger/src/pm_node_supervisor.erl +0 -38
  546. data/lib/erlang/messenger/src/pm_packager.erl +0 -76
  547. data/lib/erlang/messenger/src/pm_spawner.erl +0 -213
  548. data/lib/erlang/messenger/src/pm_strings.erl +0 -11
  549. data/lib/erlang/messenger/src/utils.erl +0 -73
  550. data/lib/erlang/messenger/useful_snippets +0 -17
  551. data/lib/poolparty/capistrano.rb +0 -18
  552. data/lib/poolparty/config/postlaunchmessage.txt +0 -5
  553. data/lib/poolparty/dependency_resolutions/base.rb +0 -12
  554. data/lib/poolparty/modules/configurable.rb +0 -36
  555. data/lib/poolparty/modules/method_missing_sugar.rb +0 -58
  556. data/lib/poolparty/monitors/monitors/cpu_monitor.rb +0 -15
  557. data/lib/poolparty/monitors/monitors/web_monitor.rb +0 -18
  558. data/lib/poolparty/net/messenger.rb +0 -72
  559. data/lib/poolparty/net/remote.rb +0 -38
  560. data/lib/poolparty/net/remote_bases/ec2.rb +0 -190
  561. data/lib/poolparty/net/remoter.rb +0 -343
  562. data/lib/poolparty/plugins/deploydirectory.rb +0 -71
  563. data/lib/poolparty/plugins/line.rb +0 -77
  564. data/lib/poolparty/plugins/rsyncmirror.rb +0 -26
  565. data/lib/poolparty/poolparty/custom_resource.rb +0 -45
  566. data/lib/poolparty/poolparty/resources/class_package.rb +0 -105
  567. data/lib/poolparty/poolparty/resources/conditional.rb +0 -67
  568. data/lib/poolparty/poolparty/resources/cron.rb +0 -14
  569. data/lib/poolparty/poolparty/resources/custom_service.rb +0 -30
  570. data/lib/poolparty/poolparty/resources/directory.rb +0 -26
  571. data/lib/poolparty/poolparty/resources/exec.rb +0 -28
  572. data/lib/poolparty/poolparty/resources/file.rb +0 -23
  573. data/lib/poolparty/poolparty/resources/gem_package.rb +0 -52
  574. data/lib/poolparty/poolparty/resources/host.rb +0 -14
  575. data/lib/poolparty/poolparty/resources/mount.rb +0 -22
  576. data/lib/poolparty/poolparty/resources/package.rb +0 -24
  577. data/lib/poolparty/poolparty/resources/remote_file.rb +0 -26
  578. data/lib/poolparty/poolparty/resources/service.rb +0 -21
  579. data/lib/poolparty/poolparty/resources/sshkey.rb +0 -23
  580. data/lib/poolparty/poolparty/resources/symlink.rb +0 -25
  581. data/lib/poolparty/poolparty/resources/variable.rb +0 -32
  582. data/lib/poolparty/provisioners/capistrano/capistrano.rb +0 -127
  583. data/lib/poolparty/provisioners/capistrano/capistrano_configurer.rb +0 -58
  584. data/lib/poolparty/provisioners/capistrano/recipies/base.rb +0 -104
  585. data/lib/poolparty/provisioners/capistrano/recipies/master.rb +0 -121
  586. data/lib/poolparty/provisioners/capistrano/recipies/slave.rb +0 -12
  587. data/lib/poolparty/provisioners/provisioner_base.rb +0 -204
  588. data/lib/poolparty/spec/core/string.rb +0 -16
  589. data/lib/poolparty/spec/matchers/a_spec_extensions_base.rb +0 -26
  590. data/lib/poolparty/spec/matchers/have_cron.rb +0 -28
  591. data/lib/poolparty/spec/matchers/have_deploydirectory.rb +0 -15
  592. data/lib/poolparty/spec/matchers/have_directory.rb +0 -31
  593. data/lib/poolparty/spec/matchers/have_exec.rb +0 -28
  594. data/lib/poolparty/spec/matchers/have_file.rb +0 -28
  595. data/lib/poolparty/spec/matchers/have_gempackage.rb +0 -28
  596. data/lib/poolparty/spec/matchers/have_git.rb +0 -28
  597. data/lib/poolparty/spec/matchers/have_host.rb +0 -28
  598. data/lib/poolparty/spec/matchers/have_mount.rb +0 -28
  599. data/lib/poolparty/spec/matchers/have_package.rb +0 -28
  600. data/lib/poolparty/spec/matchers/have_remotefile.rb +0 -28
  601. data/lib/poolparty/spec/matchers/have_rsyncmirror.rb +0 -28
  602. data/lib/poolparty/spec/matchers/have_service.rb +0 -28
  603. data/lib/poolparty/spec/matchers/have_sshkey.rb +0 -28
  604. data/lib/poolparty/spec/matchers/have_symlink.rb +0 -28
  605. data/lib/poolparty/spec/matchers/have_variable.rb +0 -32
  606. data/lib/poolparty/spec/spec/dynamic_matchers.rb +0 -63
  607. data/lib/poolparty/spec/spec/ensure_matchers_exist.rb +0 -7
  608. data/lib/poolparty/spec/templates/have_base.rb +0 -28
  609. data/lib/poolparty/templates/puppet.conf +0 -26
  610. data/lib/poolparty/templates/puppetcleaner +0 -12
  611. data/lib/poolparty/templates/puppetrerun +0 -22
  612. data/lib/poolparty/version.rb +0 -9
  613. data/lib/poolpartyspec.rb +0 -34
  614. data/log/pool.log +0 -0
  615. data/poolparty.gemspec +0 -580
  616. data/spec/poolparty/dependency_resolutions/base_spec.rb +0 -11
  617. data/spec/poolparty/modules/configurable_spec.rb +0 -29
  618. data/spec/poolparty/net/log/pool.log +0 -0
  619. data/spec/poolparty/net/messenger_spec.rb +0 -16
  620. data/spec/poolparty/plugins/svn_spec.rb +0 -16
  621. data/spec/poolparty/poolparty/custom_resource_spec.rb +0 -120
  622. data/spec/poolparty/poolparty/resources/class_package_spec.rb +0 -120
  623. data/spec/poolparty/poolparty/resources/conditional_spec.rb +0 -77
  624. data/spec/poolparty/poolparty/resources/cron_spec.rb +0 -50
  625. data/spec/poolparty/poolparty/resources/directory_spec.rb +0 -40
  626. data/spec/poolparty/poolparty/resources/exec_spec.rb +0 -37
  627. data/spec/poolparty/poolparty/resources/file_spec.rb +0 -40
  628. data/spec/poolparty/poolparty/resources/gem_spec.rb +0 -46
  629. data/spec/poolparty/poolparty/resources/host_spec.rb +0 -28
  630. data/spec/poolparty/poolparty/resources/package_spec.rb +0 -44
  631. data/spec/poolparty/poolparty/resources/remote_file_spec.rb +0 -40
  632. data/spec/poolparty/poolparty/resources/service_spec.rb +0 -45
  633. data/spec/poolparty/poolparty/resources/sshkey_spec.rb +0 -48
  634. data/spec/poolparty/poolparty/resources/symlink_spec.rb +0 -22
  635. data/spec/poolparty/poolparty/resources/user_spec.rb +0 -38
  636. data/spec/poolparty/poolparty/resources/variable_spec.rb +0 -24
  637. data/spec/poolparty/provisioners/capistrano/capistrano_spec.rb +0 -27
  638. data/spec/poolparty/provisioners/provisioner_base_spec.rb +0 -120
  639. data/spec/poolparty/spec/core/string_spec.rb +0 -57
  640. data/website/index.html +0 -107
  641. data/website/index.txt +0 -95
  642. data/website/stylesheets/code.css +0 -29
@@ -1,798 +0,0 @@
1
- %% This library is free software; you can redistribute it and/or modify
2
- %% it under the terms of the GNU Lesser General Public License as
3
- %% published by the Free Software Foundation; either version 2 of the
4
- %% License, or (at your option) any later version.
5
- %%
6
- %% This library is distributed in the hope that it will be useful, but
7
- %% WITHOUT ANY WARRANTY; without even the implied warranty of
8
- %% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
9
- %% Lesser General Public License for more details.
10
- %%
11
- %% You should have received a copy of the GNU Lesser General Public
12
- %% License along with this library; if not, write to the Free Software
13
- %% Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
14
- %% USA
15
- %%
16
- %% $Id: eunit_data.erl 253 2008-09-29 17:13:43Z rcarlsson $
17
- %%
18
- %% @author Richard Carlsson <richardc@it.uu.se>
19
- %% @copyright 2006 Richard Carlsson
20
- %% @private
21
- %% @see eunit
22
- %% @doc Interpretation of symbolic test representation
23
-
24
- -module(eunit_data).
25
-
26
- -include("eunit.hrl").
27
- -include("eunit_internal.hrl").
28
-
29
- -include_lib("kernel/include/file.hrl").
30
-
31
- -export([list/1, iter_init/2, iter_next/2, iter_prev/2, iter_id/1,
32
- list_size/1, enter_context/3]).
33
-
34
- -import(lists, [foldr/3]).
35
-
36
- -define(TICKS_PER_SECOND, 1000).
37
-
38
- %% @type tests() =
39
- %% SimpleTest
40
- %% | [tests()]
41
- %% | moduleName()
42
- %% | {module, moduleName()}
43
- %% | {application, appName()}
44
- %% | {application, appName(), [term()]}
45
- %% | fileName()
46
- %% | {file, fileName()}
47
- %% | {string(), tests()}
48
- %% | {generator, () -> tests()}
49
- %% | {generator, M::moduleName(), F::functionName()}
50
- %% | {spawn, tests()}
51
- %% | {spawn, Node::atom(), tests()}
52
- %% | {timeout, T::number(), tests()}
53
- %% | {inorder, tests()}
54
- %% | {inparallel, tests()}
55
- %% | {inparallel, N::integer(), tests()}
56
- %% | {with, X::any(), [AbstractTestFunction]}
57
- %% | {setup, Where::local | spawn | {spawn, Node::atom()},
58
- %% Setup::() -> (R::any()),
59
- %% Cleanup::(R::any()) -> any(),
60
- %% tests() | Instantiator
61
- %% }
62
- %% | {setup, Setup, Cleanup, tests() | Instantiator}
63
- %% | {setup, Where, Setup, tests() | Instantiator}
64
- %% | {setup, Setup, tests() | Instantiator}
65
- %% | {foreach, Where::local | spawn | {spawn, Node::atom()},
66
- %% Setup::() -> (R::any()),
67
- %% Cleanup::(R::any()) -> any(),
68
- %% [tests() | Instantiator]
69
- %% }
70
- %% | {foreach, Setup, Cleanup, [tests() | Instantiator]}
71
- %% | {foreach, Where, Setup, [tests() | Instantiator]}
72
- %% | {foreach, Setup, [tests() | Instantiator]}
73
- %% | {foreachx, Where::local | spawn | {spawn, Node::atom()},
74
- %% SetupX::(X::any()) -> (R::any()),
75
- %% CleanupX::(X::any(), R::any()) -> any(),
76
- %% Pairs::[{X::any(),
77
- %% (X::any(), R::any()) -> tests()}]
78
- %% }
79
- %% | {foreachx, SetupX, CleanupX, Pairs}
80
- %% | {foreachx, Where, SetupX, Pairs}
81
- %% | {foreachx, SetupX, Pairs}
82
- %% | {node, Node::atom(), tests() | Instantiator}
83
- %% | {node, Node, Args::string(), tests() | Instantiator}
84
- %%
85
- %% SimpleTest = TestFunction | {Line::integer(), SimpleTest}
86
- %%
87
- %% TestFunction = () -> any()
88
- %% | {M::moduleName(), F::functionName()}.
89
- %%
90
- %% AbstractTestFunction = (X::any()) -> any()
91
- %%
92
- %% Instantiator = (R::any()) -> tests()
93
- %% | {with, [AbstractTestFunction]}
94
- %%
95
- %% Note that `{string(), ...}' is a short-hand for `{string(), {...}}'
96
- %% if the tuple contains more than two elements.
97
- %%
98
- %% @type moduleName() = atom()
99
- %% @type functionName() = atom()
100
- %% @type appName() = atom()
101
- %% @type fileName() = string()
102
-
103
- %% ---------------------------------------------------------------------
104
- %% Abstract test set iterator
105
-
106
- -record(iter,
107
- {prev = [],
108
- next = [],
109
- tests = [],
110
- pos = 0,
111
- parent = []}).
112
-
113
- %% @spec (tests(), [integer()]) -> testIterator()
114
- %% @type testIterator()
115
-
116
- iter_init(Tests, ParentID) ->
117
- #iter{tests = Tests, parent = lists:reverse(ParentID)}.
118
-
119
- %% @spec (testIterator()) -> [integer()]
120
-
121
- iter_id(#iter{pos = N, parent = Ns}) ->
122
- lists:reverse(Ns, [N]).
123
-
124
- %% @spec (testIterator(), Handler) -> none | {testItem(), testIterator()}
125
- %% Handler = (term()) -> term()
126
-
127
- iter_next(I, H) ->
128
- iter_do(fun iter_next/1, I, H).
129
-
130
- iter_do(F, I, H) ->
131
- try F(I)
132
- catch
133
- throw:R -> H(R)
134
- end.
135
-
136
- iter_next(I = #iter{next = []}) ->
137
- case next(I#iter.tests) of
138
- {T, Tests} ->
139
- {T, I#iter{prev = [T | I#iter.prev],
140
- tests = Tests,
141
- pos = I#iter.pos + 1}};
142
- none ->
143
- none
144
- end;
145
- iter_next(I = #iter{next = [T | Ts]}) ->
146
- {T, I#iter{next = Ts,
147
- prev = [T | I#iter.prev],
148
- pos = I#iter.pos + 1}}.
149
-
150
- %% @spec (testIterator(), Handler) -> none | {testItem(), testIterator()}
151
- %% Handler = (term()) -> term()
152
-
153
- iter_prev(I, H) ->
154
- iter_do(fun iter_prev/1, I, H).
155
-
156
- iter_prev(#iter{prev = []}) ->
157
- none;
158
- iter_prev(#iter{prev = [T | Ts]} = I) ->
159
- {T, I#iter{prev = Ts,
160
- next = [T | I#iter.next],
161
- pos = I#iter.pos - 1}}.
162
-
163
-
164
- %% ---------------------------------------------------------------------
165
- %% Concrete test set representation iterator
166
-
167
- %% @spec (tests()) -> none | {testItem(), tests()}
168
- %% @type testItem() = #test{} | #group{}
169
- %% @throws {bad_test, term()}
170
- %% | {generator_failed, exception()}
171
- %% | {no_such_function, eunit_lib:mfa()}
172
- %% | {module_not_found, moduleName()}
173
- %% | {application_not_found, appName()}
174
- %% | {file_read_error, {Reason::atom(), Message::string(),
175
- %% fileName()}}
176
-
177
- next(Tests) ->
178
- case eunit_lib:dlist_next(Tests) of
179
- [T | Ts] ->
180
- case parse(T) of
181
- {data, T1} ->
182
- next([T1 | Ts]);
183
- T1 ->
184
- {T1, Ts}
185
- end;
186
- [] ->
187
- none
188
- end.
189
-
190
- %% this returns either a #test{} or #group{} record, or {data, T} to
191
- %% signal that T has been substituted for the given representation
192
-
193
- parse({foreach, S, Fs}) when is_function(S), is_list(Fs) ->
194
- parse({foreach, S, fun ok/1, Fs});
195
- parse({foreach, S, C, Fs})
196
- when is_function(S), is_function(C), is_list(Fs) ->
197
- parse({foreach, ?DEFAULT_SETUP_PROCESS, S, C, Fs});
198
- parse({foreach, P, S, Fs})
199
- when is_function(S), is_list(Fs) ->
200
- parse({foreach, P, S, fun ok/1, Fs});
201
- parse({foreach, P, S, C, Fs} = T)
202
- when is_function(S), is_function(C), is_list(Fs) ->
203
- check_arity(S, 0, T),
204
- check_arity(C, 1, T),
205
- case Fs of
206
- [F | Fs1] ->
207
- {data, [{setup, P, S, C, F}, {foreach, P, S, C, Fs1}]};
208
- [] ->
209
- {data, []}
210
- end;
211
- parse({foreachx, S1, Ps}) when is_function(S1), is_list(Ps) ->
212
- parse({foreachx, S1, fun ok/2, Ps});
213
- parse({foreachx, S1, C1, Ps})
214
- when is_function(S1), is_function(C1), is_list(Ps) ->
215
- parse({foreachx, ?DEFAULT_SETUP_PROCESS, S1, C1, Ps});
216
- parse({foreachx, P, S1, Ps})
217
- when is_function(S1), is_list(Ps) ->
218
- parse({foreachx, P, S1, fun ok/2, Ps});
219
- parse({foreachx, P, S1, C1, Ps} = T)
220
- when is_function(S1), is_function(C1), is_list(Ps) ->
221
- check_arity(S1, 1, T),
222
- check_arity(C1, 2, T),
223
- case Ps of
224
- [{X, F1} | Ps1] when is_function(F1) ->
225
- check_arity(F1, 2, T),
226
- S = fun () -> S1(X) end,
227
- C = fun (R) -> C1(X, R) end,
228
- F = fun (R) -> F1(X, R) end,
229
- {data, [{setup, P, S, C, F}, {foreachx, P, S1, C1, Ps1}]};
230
- [_|_] ->
231
- bad_test(T);
232
- [] ->
233
- {data, []}
234
- end;
235
- parse({generator, F} = T) when is_function(F) ->
236
- check_arity(F, 0, T),
237
- %% use run_testfun/1 to handle wrapper exceptions
238
- case eunit_test:run_testfun(F) of
239
- {ok, T1} ->
240
- {data, T1};
241
- {error, {Class, Reason, Trace}} ->
242
- throw({generator_failed, {Class, Reason, Trace}})
243
- end;
244
- parse({generator, M, F}) when is_atom(M), is_atom(F) ->
245
- parse({generator, eunit_test:function_wrapper(M, F)});
246
- parse({inorder, T}) ->
247
- group(#group{tests = T, order = inorder});
248
- parse({inparallel, T}) ->
249
- parse({inparallel, 0, T});
250
- parse({inparallel, N, T}) when is_integer(N), N >= 0 ->
251
- group(#group{tests = T, order = {inparallel, N}});
252
- parse({timeout, N, T}) when is_number(N), N >= 0 ->
253
- group(#group{tests = T, timeout = round(N * ?TICKS_PER_SECOND)});
254
- parse({spawn, T}) ->
255
- group(#group{tests = T, spawn = local});
256
- parse({spawn, N, T}) when is_atom(N) ->
257
- group(#group{tests = T, spawn = {remote, N}});
258
- parse({setup, S, I}) when is_function(S); is_list(S) ->
259
- parse({setup, ?DEFAULT_SETUP_PROCESS, S, I});
260
- parse({setup, S, C, I}) when is_function(S), is_function(C) ->
261
- parse({setup, ?DEFAULT_SETUP_PROCESS, S, C, I});
262
- parse({setup, P, S, I}) when is_function(S) ->
263
- parse({setup, P, S, fun ok/1, I});
264
- parse({setup, P, L, I} = T) when is_list(L) ->
265
- check_setup_list(L, T),
266
- {S, C} = eunit_test:multi_setup(L),
267
- parse({setup, P, S, C, I});
268
- parse({setup, P, S, C, I} = T)
269
- when is_function(S), is_function(C), is_function(I) ->
270
- check_arity(S, 0, T),
271
- check_arity(C, 1, T),
272
- case erlang:fun_info(I, arity) of
273
- {arity, 0} ->
274
- %% if I is nullary, it is a plain test
275
- parse({setup, S, C, fun (_) -> I end});
276
- _ ->
277
- %% otherwise, I must be an instantiator function
278
- check_arity(I, 1, T),
279
- case P of
280
- local -> ok;
281
- spawn -> ok;
282
- {spawn, N} when is_atom(N) -> ok;
283
- _ -> bad_test(T)
284
- end,
285
- group(#group{tests = I,
286
- context = #context{setup = S, cleanup = C,
287
- process = P}})
288
- end;
289
- parse({setup, P, S, C, {with, As}}) when is_list(As) ->
290
- parse({setup, P, S, C, fun (X) -> {with, X, As} end});
291
- parse({setup, P, S, C, T}) when is_function(S), is_function(C) ->
292
- parse({setup, P, S, C, fun (_) -> T end});
293
- parse({node, N, T}) when is_atom(N) ->
294
- parse({node, N, "", T});
295
- parse({node, N, A, T1}=T) when is_atom(N) ->
296
- case eunit_lib:is_string(A) of
297
- true ->
298
- %% TODO: better stack traces for internal funs like these
299
- parse({setup,
300
- fun () ->
301
- %% TODO: auto-start net_kernel if needed
302
- StartedNet = false,
303
- %% The following is commented out because of problems when running
304
- %% eunit as part of the init sequence (from the command line):
305
- %% StartedNet =
306
- %% case whereis(net_kernel) of
307
- %% undefined ->
308
- %% M = list_to_atom(atom_to_list(N)
309
- %% ++ "_master"),
310
- %% case net_kernel:start([M]) of
311
- %% {ok, _} ->
312
- %% true;
313
- %% {error, E} ->
314
- %% throw({net_kernel_start, E})
315
- %% end;
316
- %% _ -> false
317
- %% end,
318
- %% ?debugVal({started, StartedNet}),
319
- {Name, Host} = eunit_lib:split_node(N),
320
- {ok, Node} = slave:start_link(Host, Name, A),
321
- {Node, StartedNet}
322
- end,
323
- fun ({Node, StopNet}) ->
324
- %% ?debugVal({stop, StopNet}),
325
- slave:stop(Node),
326
- case StopNet of
327
- true -> net_kernel:stop();
328
- false -> ok
329
- end
330
- end,
331
- T1});
332
- false ->
333
- bad_test(T)
334
- end;
335
- parse({module, M}) when is_atom(M) ->
336
- {data, {"module '" ++ atom_to_list(M) ++ "'", get_module_tests(M)}};
337
- parse({application, A}) when is_atom(A) ->
338
- try parse({file, atom_to_list(A)++".app"})
339
- catch
340
- {file_read_error,{enoent,_,_}} ->
341
- case code:lib_dir(A) of
342
- Dir when is_list(Dir) ->
343
- %% add "ebin" if it exists, like code_server does
344
- BinDir = filename:join(Dir, "ebin"),
345
- case file:read_file_info(BinDir) of
346
- {ok, #file_info{type=directory}} ->
347
- parse({dir, BinDir});
348
- _ ->
349
- parse({dir, Dir})
350
- end;
351
- _ ->
352
- throw({application_not_found, A})
353
- end
354
- end;
355
- parse({application, A, Info}=T) when is_atom(A) ->
356
- case proplists:get_value(modules, Info) of
357
- Ms when is_list(Ms) ->
358
- case [M || M <- Ms, not is_atom(M)] of
359
- [] ->
360
- {data, {"application '" ++ atom_to_list(A) ++ "'", Ms}};
361
- _ ->
362
- bad_test(T)
363
- end;
364
- _ ->
365
- bad_test(T)
366
- end;
367
- parse({file, F} = T) when is_list(F) ->
368
- case eunit_lib:is_string(F) of
369
- true ->
370
- {data, {"file \"" ++ F ++ "\"", get_file_tests(F)}};
371
- false ->
372
- bad_test(T)
373
- end;
374
- parse({dir, D}=T) when is_list(D) ->
375
- case eunit_lib:is_string(D) of
376
- true ->
377
- {data, {"directory \"" ++ D ++ "\"", get_directory_modules(D)}};
378
- false ->
379
- bad_test(T)
380
- end;
381
- parse({with, X, As}=T) when is_list(As) ->
382
- case As of
383
- [A | As1] ->
384
- check_arity(A, 1, T),
385
- {data, [fun () -> A(X) end, {with, X, As1}]};
386
- [] ->
387
- {data, []}
388
- end;
389
- parse({S, T1} = T) when is_list(S) ->
390
- case eunit_lib:is_string(S) of
391
- true ->
392
- group(#group{tests = T1, desc = S});
393
- false ->
394
- bad_test(T)
395
- end;
396
- parse(T) when is_tuple(T), size(T) > 2, is_list(element(1, T)) ->
397
- [S | Es] = tuple_to_list(T),
398
- parse({S, list_to_tuple(Es)});
399
- parse(M) when is_atom(M) ->
400
- parse({module, M});
401
- parse(T) when is_list(T) ->
402
- case eunit_lib:is_string(T) of
403
- true ->
404
- try parse({dir, T})
405
- catch
406
- {file_read_error,{R,_,_}}
407
- when R =:= enotdir; R =:= enoent ->
408
- parse({file, T})
409
- end;
410
- false ->
411
- bad_test(T)
412
- end;
413
- parse(T) ->
414
- parse_simple(T).
415
-
416
- %% parse_simple always produces a #test{} record
417
-
418
- parse_simple({L, F}) when is_integer(L), L >= 0 ->
419
- (parse_simple(F))#test{line = L};
420
- parse_simple(F) ->
421
- parse_function(F).
422
-
423
- parse_function(F) when is_function(F) ->
424
- check_arity(F, 0, F),
425
- {module, M} = erlang:fun_info(F, module),
426
- #test{f = F, module = M, name = eunit_lib:fun_parent(F)};
427
- parse_function({M,F}) when is_atom(M), is_atom(F) ->
428
- #test{f = eunit_test:function_wrapper(M, F), module = M, name = F};
429
- parse_function(F) ->
430
- bad_test(F).
431
-
432
- check_arity(F, N, T) when is_function(F) ->
433
- case erlang:fun_info(F, arity) of
434
- {arity, N} ->
435
- ok;
436
- _ ->
437
- bad_test(T)
438
- end;
439
- check_arity(_, _, T) ->
440
- bad_test(T).
441
-
442
- check_setup_list([{Tag, S, C} | Es], T)
443
- when is_atom(Tag), is_function(S), is_function(C) ->
444
- check_arity(S, 0, T),
445
- check_arity(C, 1, T),
446
- check_setup_list(Es, T);
447
- check_setup_list([{Tag, S} | Es], T)
448
- when is_atom(Tag), is_function(S) ->
449
- check_arity(S, 0, T),
450
- check_setup_list(Es, T);
451
- check_setup_list([], _T) ->
452
- ok;
453
- check_setup_list(_, T) ->
454
- bad_test(T).
455
-
456
- bad_test(T) ->
457
- throw({bad_test, T}).
458
-
459
- ok(_) -> ok.
460
- ok(_, _) -> ok.
461
-
462
- %% This does some look-ahead and folds nested groups and tests where
463
- %% possible. E.g., {String, Test} -> Test#test{desc = String}.
464
-
465
- group(#group{context = #context{}} = G) ->
466
- %% leave as it is - the test body is an instantiator, which is not
467
- %% suitable for lookahead (and anyway, properties of the setup
468
- %% should not be merged with properties of its body, e.g. spawn)
469
- G;
470
- group(#group{tests = T0, desc = Desc, order = Order, context = Context,
471
- spawn = Spawn, timeout = Timeout} = G) ->
472
- {T1, Ts} = lookahead(T0),
473
- {T2, _} = lookahead(Ts),
474
- case T1 of
475
- #test{desc = Desc1, timeout = Timeout1}
476
- when T2 =:= none, Spawn =:= undefined, Context =:= undefined,
477
- ((Desc =:= undefined) or (Desc1 =:= undefined)),
478
- ((Timeout =:= undefined) or (Timeout1 =:= undefined)) ->
479
- %% a single test within a non-spawn/setup group: put the
480
- %% information directly on the test; drop the order
481
- T1#test{desc = join_properties(Desc, Desc1),
482
- timeout = join_properties(Timeout, Timeout1)};
483
-
484
- #test{timeout = undefined}
485
- when T2 =:= none, Timeout =/= undefined, Context =:= undefined ->
486
- %% a single test without timeout, within a non-joinable
487
- %% group with a timeout and no fixture: push the timeout to
488
- %% the test
489
- G#group{tests = {timeout, (Timeout div ?TICKS_PER_SECOND), T0},
490
- timeout = undefined};
491
-
492
- #group{desc = Desc1, order = Order1, context = Context1,
493
- spawn = Spawn1, timeout = Timeout1}
494
- when T2 =:= none,
495
- ((Desc =:= undefined) or (Desc1 =:= undefined)),
496
- ((Order =:= undefined) or (Order1 =:= undefined)),
497
- ((Context =:= undefined) or (Context1 =:= undefined)),
498
- ((Spawn =:= undefined) or (Spawn1 =:= undefined)),
499
- ((Timeout =:= undefined) or (Timeout1 =:= undefined)) ->
500
- %% two nested groups with non-conflicting properties
501
- group(T1#group{desc = join_properties(Desc, Desc1),
502
- order = join_properties(Order, Order1),
503
- context = join_properties(Context, Context1),
504
- spawn = join_properties(Spawn, Spawn1),
505
- timeout = join_properties(Timeout, Timeout1)});
506
-
507
- #group{order = Order1, timeout = Timeout1}
508
- when T2 =:= none ->
509
- %% two nested groups that cannot be joined: try to push the
510
- %% timeout and ordering properties to the inner group
511
- push_order(Order, Order1, push_timeout(Timeout, Timeout1, G));
512
-
513
- _ ->
514
- %% leave the group as it is and discard the lookahead
515
- G
516
- end.
517
-
518
- lookahead(T) ->
519
- case next(T) of
520
- {T1, Ts} -> {T1, Ts};
521
- none -> {none, []}
522
- end.
523
-
524
- join_properties(undefined, X) -> X;
525
- join_properties(X, undefined) -> X.
526
-
527
- push_timeout(Timeout, undefined, G=#group{context=undefined})
528
- when Timeout =/= undefined ->
529
- %% A timeout on a context (fixture) includes the setup/cleanup time
530
- %% and must not be propagated into the body
531
- G#group{tests = {timeout, (Timeout div ?TICKS_PER_SECOND), G#group.tests},
532
- timeout = undefined};
533
- push_timeout(_, _, G) ->
534
- G.
535
-
536
- push_order(inorder, undefined, G) ->
537
- G#group{tests = {inorder, G#group.tests}, order = undefined};
538
- push_order({inparallel, N}, undefined, G) ->
539
- G#group{tests = {inparallel, N, G#group.tests}, order = undefined};
540
- push_order(_, _, G) ->
541
- G.
542
-
543
- %% ---------------------------------------------------------------------
544
- %% Extracting test funs from a module
545
-
546
- %% @throws {module_not_found, moduleName()}
547
-
548
- get_module_tests(M) ->
549
- TestSuffix = ?DEFAULT_TEST_SUFFIX,
550
- GeneratorSuffix = ?DEFAULT_GENERATOR_SUFFIX,
551
- try M:module_info(exports) of
552
- Es ->
553
- Fs = testfuns(Es, M, TestSuffix, GeneratorSuffix),
554
- Name = atom_to_list(M),
555
- case lists:suffix(?DEFAULT_TESTMODULE_SUFFIX, Name) of
556
- false ->
557
- Name1 = Name ++ ?DEFAULT_TESTMODULE_SUFFIX,
558
- M1 = list_to_atom(Name1),
559
- try get_module_tests(M1) of
560
- Fs1 ->
561
- Fs ++ [{"module '" ++ Name1 ++ "'", Fs1}]
562
- catch
563
- {module_not_found, M1} ->
564
- Fs
565
- end;
566
- true ->
567
- Fs
568
- end
569
- catch
570
- error:undef ->
571
- throw({module_not_found, M})
572
- end.
573
-
574
- testfuns(Es, M, TestSuffix, GeneratorSuffix) ->
575
- foldr(fun ({F, 0}, Fs) ->
576
- N = atom_to_list(F),
577
- case lists:suffix(TestSuffix, N) of
578
- true ->
579
- [{M,F} | Fs];
580
- false ->
581
- case lists:suffix(GeneratorSuffix, N) of
582
- true ->
583
- [{generator, M, F} | Fs];
584
- false ->
585
- Fs
586
- end
587
- end;
588
- (_, Fs) ->
589
- Fs
590
- end,
591
- [],
592
- Es).
593
-
594
-
595
- %% ---------------------------------------------------------------------
596
- %% Getting a test set from a file
597
-
598
- %% @throws {file_read_error, {Reason::atom(), Message::string(),
599
- %% fileName()}}
600
-
601
- get_file_tests(F) ->
602
- case is_module_filename(F) of
603
- true ->
604
- %% look relative to current dir first
605
- case file:read_file_info(F) of
606
- {ok, #file_info{type=file}} ->
607
- objfile_test(F);
608
- _ ->
609
- %% (where_is_file/1 does not take a path argument)
610
- case code:where_is_file(F) of
611
- non_existing ->
612
- %% this will produce a suitable error message
613
- objfile_test(F);
614
- Path ->
615
- objfile_test(Path)
616
- end
617
- end;
618
- false ->
619
- eunit_lib:consult_file(F)
620
- end.
621
-
622
- is_module_filename(F) ->
623
- filename:extension(F) =:= code:objfile_extension().
624
-
625
- objfile_test(File) ->
626
- try
627
- {value, {module, M}} =
628
- lists:keysearch(module, 1, beam_lib:info(File)),
629
- {setup,
630
- fun () ->
631
- %% TODO: better error/stacktrace for this internal fun
632
- code:purge(M),
633
- {module,M} = code:load_abs(filename:rootname(File)),
634
- ok
635
- end,
636
- {module, M}}
637
- catch
638
- _:_ ->
639
- throw({file_read_error,
640
- {undefined, "extracting module name failed", File}})
641
- end.
642
-
643
-
644
- %% ---------------------------------------------------------------------
645
- %% Getting a list of module names from object files in a directory
646
-
647
- %% @throws {file_read_error, {Reason::atom(), Message::string(),
648
- %% fileName()}}
649
-
650
- %% TODO: handle packages (recursive search for files)
651
-
652
- get_directory_modules(D) ->
653
- [objfile_test(filename:join(D, F))
654
- || F <- eunit_lib:list_dir(D), is_module_filename(F)].
655
-
656
-
657
-
658
- %% ---------------------------------------------------------------------
659
- %% Entering a setup-context, with guaranteed cleanup.
660
-
661
- %% @spec (Tests::#context{}, Instantiate, Callback) -> any()
662
- %% Instantiate = (any()) -> tests()
663
- %% Callback = (tests()) -> any()
664
- %% @throws {context_error, Error, eunit_lib:exception()}
665
- %% Error = setup_failed | instantiation_failed | cleanup_failed
666
-
667
- enter_context(#context{setup = S, cleanup = C, process = P}, I, F) ->
668
- F1 = case P of
669
- local -> F;
670
- spawn -> fun (X) -> F({spawn, X}) end;
671
- {spawn, N} -> fun (T) -> F({spawn, N, T}) end
672
- end,
673
- eunit_test:enter_context(S, C, I, F1).
674
-
675
-
676
- %% ---------------------------------------------------------------------
677
- %% Returns a symbolic listing of a set of tests
678
- %%
679
- %% @type testInfoList() = [Entry]
680
- %% Entry = {item, testId(), Description, testName()}
681
- %% | {group, testId(), Description, testInfoList}
682
- %% Description = string()
683
- %% @type testId() = [integer()]
684
- %% @type testName() = {moduleName(), functionName()}
685
- %% | {moduleName(), functionName(), lineNumber()}
686
- %% @type lineNumber() = integer(). Proper line numbers are always >= 1.
687
- %%
688
- %% @throws {bad_test, term()}
689
- %% | {generator_failed, exception()}
690
- %% | {no_such_function, eunit_lib:mfa()}
691
- %% | {module_not_found, moduleName()}
692
- %% | {application_not_found, appName()}
693
- %% | {file_read_error, {Reason::atom(), Message::string(),
694
- %% fileName()}}
695
- %% | {context_error, instantiation_failed, eunit_lib:exception()}
696
-
697
- list(T) ->
698
- list(T, []).
699
-
700
- list(T, ParentID) ->
701
- list_loop(iter_init(T, ParentID)).
702
-
703
- list_loop(I) ->
704
- case iter_next(I, fun (R) -> throw({error, R}) end) of
705
- {T, I1} ->
706
- Id = iter_id(I1),
707
- case T of
708
- #test{} ->
709
- Name = case T#test.line of
710
- 0 -> {T#test.module, T#test.name};
711
- Line -> {T#test.module, T#test.name, Line}
712
- end,
713
- [{item, Id, desc_string(T#test.desc), Name}
714
- | list_loop(I1)];
715
- #group{context = Context} ->
716
- [{group, Id, desc_string(T#group.desc),
717
- list_context(Context, T#group.tests, Id)}
718
- | list_loop(I1)]
719
- end;
720
- none ->
721
- []
722
- end.
723
-
724
- desc_string(undefined) -> "";
725
- desc_string(S) -> S.
726
-
727
- list_context(undefined, T, ParentId) ->
728
- list(T, ParentId);
729
- list_context(#context{process = local}, T, ParentId) ->
730
- browse_context(T, fun (T) -> list(T, ParentId) end);
731
- list_context(#context{process = spawn}, T, ParentId) ->
732
- browse_context(T, fun (T) -> list({spawn, T}, ParentId) end);
733
- list_context(#context{process = {spawn, N}}, T, ParentId) ->
734
- browse_context(T, fun (T) -> list({spawn, N, T}, ParentId) end).
735
-
736
- browse_context(T, F) ->
737
- eunit_test:browse_context(T, F).
738
-
739
- list_size({item, _, _, _}) -> 1;
740
- list_size({group, _, _, Es}) -> list_size(Es);
741
- list_size(Es) when is_list(Es) ->
742
- lists:foldl(fun (E, N) -> N + list_size(E) end, 0, Es).
743
-
744
- -ifdef(TEST).
745
- generator_exported_() ->
746
- generator().
747
-
748
- generator() ->
749
- T = ?_test(ok),
750
- [T, T, T].
751
-
752
- echo_proc() ->
753
- receive {P,X} -> P ! X, echo_proc() end.
754
-
755
- ping(P) ->
756
- P ! {self(),ping}, receive ping -> ok end.
757
-
758
- data_test_() ->
759
- Setup = fun () -> spawn(fun echo_proc/0) end,
760
- Cleanup = fun (Pid) -> exit(Pid, kill) end,
761
- Fail = ?_test(throw(eunit)),
762
- T = ?_test(ok),
763
- Tests = [T,T,T],
764
- [?_assertMatch(ok, eunit:test(T)),
765
- ?_assertMatch(error, eunit:test(Fail)),
766
- ?_assertMatch(ok, eunit:test({generator, fun () -> Tests end})),
767
- ?_assertMatch(ok, eunit:test({generator, fun generator/0})),
768
- ?_assertMatch(ok, eunit:test({generator, ?MODULE, generator_exported_})),
769
- ?_assertMatch(ok, eunit:test({inorder, Tests})),
770
- ?_assertMatch(ok, eunit:test({inparallel, Tests})),
771
- ?_assertMatch(ok, eunit:test({timeout, 10, Tests})),
772
- ?_assertMatch(ok, eunit:test({spawn, Tests})),
773
- ?_assertMatch(ok, eunit:test({setup, Setup, Cleanup,
774
- fun (P) -> ?_test(ok = ping(P)) end})),
775
- %%?_assertMatch(ok, eunit:test({node, test@localhost, Tests})),
776
- ?_assertMatch(ok, eunit:test({module, eunit_lib})),
777
- ?_assertMatch(ok, eunit:test(eunit_lib)),
778
- ?_assertMatch(ok, eunit:test("examples/tests.txt"))
779
-
780
- %%?_test({foreach, Setup, [T, T, T]})
781
- ].
782
-
783
- lazy_test_() ->
784
- {spawn, [?_test(undefined = put(count, 0)),
785
- lazy_gen(7),
786
- ?_assertMatch(7, get(count))]}.
787
-
788
- lazy_gen(N) ->
789
- {generator,
790
- fun () ->
791
- if N > 0 ->
792
- [?_test(put(count,1+get(count)))
793
- | lazy_gen(N-1)];
794
- true ->
795
- []
796
- end
797
- end}.
798
- -endif.