#!/usr/bin/env ruby
require 'fsr'
require 'fsr/listener/outbound'
require 'activerecord'

FSR.load_all_commands

class Card < ActiveRecord::Base
  ActiveRecord::Base.establish_connection(
    :adapter  => "mysql",
    :host     => "localhost",
    :username => "root",
    :password => "leenuhks",
    :database => "fs_bill_development"
  )
end

class CallCard < FSR::Listener::Outbound
  def session_initiated
    exten = @session.headers[:caller_caller_id_number]
    pin_wav = "/usr/local/freeswitch/sounds/en/us/callie/conference/8000/conf-pin.wav"
    bad_pin_wav = "/usr/local/freeswitch/sounds/en/us/callie/conference/8000/conf-bad-pin.wav"
    dial_tone = "tone_stream://%(10000,0,350,440)"
    FSR::Log.info "*** Answering incoming call from #{exten}"
    answer do
      play_and_get_digits(pin_wav, bad_pin_wav, 2, 10, 3, 7000, ["#"], "pin_number", "\\d") do |pin_number|
        @card = Card.find_by_card_number(pin_number)
        if @card then
          FSR::Log.info "*** Success, grabbed #{pin_number} from #{exten}"
          play_and_get_digits(dial_tone, bad_pin_wav, 2, 10, 3, 7000, ["#"], "destination_number", "\\d") do |destination_number|
            FSR::Log.info "*** Success, grabbed #{destination_number} from #{exten}"
            FSR::Log.info "*** Setting up the billing variables."
            uuid_setvar(@session.headers[:unique_id], 'nibble_rate', @card.rate)
            uuid_setvar(@session.headers[:unique_id], 'nibble_account', @card.id)
            FSR::Log.info "*** Bridging."
            FSR::Log.info "*** You have #{duration} minutes to talk."
            speak("You have #{duration} minutes to talk.")
            api("sched_api +#{(duration*60)-60} none uuid_displace #{@session.headers[:unique_id]} start tone_stream://%(500,0,500)")
            transfer("#{destination_number}", "XML", "default") { close_connection }
            #bridge("sofia/internal/#{destination_number}@63.211.239.19")
          end
        else
          FSR::Log.info "*** Failure, grabbed #{pin_number} from #{exten}"
          playback(bad_pin_wav)
          FSR::Log.info "*** Hanging up the call."
          hangup
        end
      end
    end
  end

  def duration
    @duration = @card.balance.to_i / @card.rate.to_i
    return @duration
  end
end

FSR.start_oes! CallCard, :port => 8084, :host => "127.0.0.1"