http_response_eval

require("msys.core")
require("msys.delivery")
require("msys.httpclnt")
require("msys.gcm")
require("json")
local mod = {}
function mod:http_response_eval(sess)
  -- get message associated with this response
  local msg = msys.delivery.ob_get_current_message(sess.connh)
  if msg == nil then
    print ("http_response_eval_hook: Associated message missing")
    return msys.delivery.DELIVERY_FAIL;
  end
  -- check response for registration id update info
  if sess.response.status_code.buffer == "200" then
    -- get json response
    local json_response, code, err = json.decode(sess.response.body)
    if (code ~= nil) then
      error(err)
    end
    if json_response.canonical_ids and json_response.canonical_ids > 0 then
      -- Add test entry to log for receipt of canonical response
      print ("canonical_ids = ", json_response.canonical_ids)
      if json_response.results[1].registration_id then
        -- The customer would want to use this updated Registration Feedback and would
        -- insert appropriate logic here.
        print("GCM: Found canonical registration id feedback:",
          json_response.results[1].registration_id)
      else
        print("GCM: Missing canonical registration id value")
      end
    else
      print("GCM: No canonical registration id feedback indicated")
    end
  end
  return msys.delivery.DELIVERY_CONTINUE;
end

msys.registerModule("gcm_hooks", mod);