#!/usr/bin/ruby
#
# This file is part of CPEE.
#
# CPEE is free software: you can redistribute it and/or modify it under the terms
# of the GNU General Public License as published by the Free Software Foundation,
# either version 3 of the License, or (at your option) any later version.
#
# CPEE is distributed in the hope that it will be useful, but WITHOUT ANY
# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A
# PARTICULAR PURPOSE.  See the GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License along with
# CPEE (file COPYING in the main directory).  If not, see
# <http://www.gnu.org/licenses/>.

require 'redis'
require 'daemonite'
require 'riddl/client'
require_relative '../../lib/cpee/redis'

Daemonite.new do |opts|
  opts[:runtime_opts] += [
    ["--url=URL", "-uURL", "Specify redis url", ->(p){ opts[:redis_url] = p }],
    ["--path=PATH", "-pPATH", "Specify redis path, e.g. /tmp/redis.sock", ->(p){ opts[:redis_path] = p }],
    ["--db=DB", "-dDB", "Specify redis db, e.g. 1", ->(p) { opts[:redis_db] = p.to_i }],
    ["--worker=NUM", "-wNUM", "Specify the worker id, e.g. 0", ->(p) { opts[:worker] = p.to_i }]
  ]

  on setup do
    opts[:worker] ||= 0
    opts[:worker] = ('%02i' % opts[:worker]).freeze
    opts[:pidfile] = File.basename(opts[:pidfile],'.pid') + '-' + opts[:worker].to_s + '.pid'
  end

  on startup do
    opts[:redis_path] ||= '/tmp/redis.sock'
    opts[:redis_db] ||= 1
    CPEE::redis_connect opts, 'Server Routing Forward Events'
    opts[:pubsubredis] = opts[:redis_dyn].call 'Server Routing Forward Events Sub'
  end

  run do
    opts[:pubsubredis].psubscribe("event:#{opts[:worker]}:*") do |on|
      on.pmessage do |pat, what, message|
        index = message.index(' ')
        mess = message[index+1..-1]
        instance = message[0...index]
        type, worker, event = what.split(':',3)
        topic = ::File::dirname(event)
        name = ::File::basename(event)
        long = File.join(topic,type,name)
        opts[:redis].smembers("instance:#{instance}/handlers").each do |key|
          if opts[:redis].smembers("instance:#{instance}/handlers/#{key}").include? long
            url = opts[:redis].get("instance:#{instance}/handlers/#{key}/url")
            if url.nil? || url == ""
              opts[:redis].publish("forward:#{instance}/#{key}",mess)
            else
              # Ractor.new(url,type,topic,name,mess) do |url,type,topic,name,mess|
              # sadly typhoes does not support ractors
              Thread.new do
                Riddl::Client.new(url).post [
                  Riddl::Parameter::Simple::new('type',type),
                  Riddl::Parameter::Simple::new('topic',topic),
                  Riddl::Parameter::Simple::new('event',name),
                  Riddl::Parameter::Complex::new('notification','application/json',mess)
                ]
              end
            end
          end
        end
        unless opts[:redis].exists?("instance:#{instance}/state")
          empt = opts[:redis].keys("instance:#{instance}/*").to_a
          opts[:redis].multi do |multi|
            multi.del empt
          end
        end
      rescue => e
        puts e.message
        puts e.backtrace
        p '-----------------'
      end
    end
  end
end.go!