pinky

#!/usr/bin/env lua

package.cpath = package.cpath .. ";" .. os.getenv("HOME") .. "/.luarocks/lib/lua/5.1/?.so;;"
package.path = package.path .. ";" .. os.getenv("HOME") .. "/.luarocks/share/lua/5.1/?.lua;;"

local p = require 'pinky'

if #arg < 1 then
   return print("Usage: pinky <uri>")
end

function print_table(in_table)
   local out2 = ""
   for k,v in pairs(in_table) do
      out2 = out2 .. " " .. k -- .. " " .. v
   end
   print(out2)
end

local uri = arg[1]

if not string.find(uri,"^/pinky/") then
   uri = string.gsub("/pinky/" .. uri,"//","/")
end

out = p.dispatch(uri)

if type(out) == "table" then
   print("XXX FIXME: " .. uri .. " is not sending me json back!")
   if out.status then
      if out.status.value == "FAIL" then
         print("msg:" .. tostring(out.status.error) .. " data:" .. tostring(out.data))
      else
         print_table(out.data)
      end
   else
      print("Got nil back on out.status: " .. tostring(out.status))
   end
else
   print(tostring(out))
end