Mercurial > hg > orthanc
diff UnitTestsSources/LuaTests.cpp @ 1052:cc4ff680e2a0
http requests in lua
| author | Sebastien Jodogne <s.jodogne@gmail.com> |
|---|---|
| date | Wed, 23 Jul 2014 15:08:09 +0200 |
| parents | 92f4bf2c5d73 |
| children | ee5cbe6e48d3 |
line wrap: on
line diff
--- a/UnitTestsSources/LuaTests.cpp Wed Jul 23 12:59:28 2014 +0200 +++ b/UnitTestsSources/LuaTests.cpp Wed Jul 23 15:08:09 2014 +0200 @@ -256,4 +256,19 @@ ASSERT_EQ("MyOrthanc", Orthanc::Toolbox::StripSpaces(s)); #endif +#if 0 + lua.Execute(s, "print(HttpPost(\"http://localhost:8042/tools/execute-script\", \"print('hello world')\"))"); + ASSERT_EQ("hello world", Orthanc::Toolbox::StripSpaces(s)); + + lua.Execute(s, "print(HttpPost(\"http://localhost:8042/tools/execute-script\", \"print('[10,42,1000]')\", true)[2])"); + ASSERT_EQ("42", Orthanc::Toolbox::StripSpaces(s)); +#endif + +#if 1 + lua.Execute(s, "print(HttpGet('http://localhost:8042/modalities'))"); + lua.Execute(s, "print(HttpPut('http://localhost:8042/modalities/lua', '[ \"ORTHANC\", \"localhost\", 4242 ]'))"); + lua.Execute(s, "print(HttpGet('http://localhost:8042/modalities'))"); + lua.Execute(s, "print(HttpDelete('http://localhost:8042/modalities/lua'))"); + lua.Execute(s, "print(HttpGet('http://localhost:8042/modalities'))"); +#endif }