Lua CFS script to retrieve sentiment analysis from Haven OnDemand and store in an IDOL document field.

hod_sentiment.lua

local function isempty(s)
  return s == nil or s == ''
end

function handler(document)
   local config = get_config("cfs.cfg")
   local log = get_log(config, "IndexLogStream")
   log:write_line( log_level_error() , "HOD started")

   local sentText = document:getFieldValue("DRECONTENT")
   -- handle case where content is empty or too short
   if isempty(sentText) then
      log:write_line( log_level_error() , "HOD finished, empty DRECONTENT")
      return true
   end
   local sentResponse = " ";
   f = assert (io.popen ("curl -X POST --form \"text=" .. sentText .. "\" --form \"apikey=XXX\" https://api.havenondemand.com/1/api/sync/analyzesentiment/v1") )
   
   for line in f:lines() do
      log:write_line(log_level_error(), line)
      sentResponse = sentResponse .. " " .. line;
   end
   
   f:close()
   document:addField("SENTIMENT", sentResponse)
   log:write_line( log_level_error() , "HOD finished: " .. sentResponse)
   return true
end