require 'spec_helper'

module Daemons
  describe Application do
    subject(:application) { described_class.new group, additional_options }

    let(:app_name) { 'my_app' }
    let(:group)    { ApplicationGroup.new app_name }
    let(:options)  { Hash.new }
    let(:log_dir)  { nil }
    let(:dir_mode) { nil }
    let(:dir)      { nil }
    let(:user)     { nil }
    let(:options)  {
      {
        log_dir:  log_dir,
        dir_mode: dir_mode,
        user:     user,
        group:    group
      }
    }
    let(:additional_options) {
      {}
    }

    before do
      allow(group)
        .to receive(:options)
        .and_return options
    end

    describe '#app_argv' do
      let(:app_argv) { "some value" }

      it 'allows an arbitrary value to be set' do
        application.app_argv = app_argv
        expect(application.app_argv).to eq app_argv
      end
    end

    describe '#controller_argv' do
      let(:controller_argv) { "some value" }

      it 'allows an arbitrary value to be set' do
        application.controller_argv = controller_argv
        expect(application.controller_argv).to eq controller_argv
      end
    end

    describe '#pid' do
      subject { application.pid }
      it { is_expected.to be_a PidMem }

      context 'when valid pid dir specified' do
        before do
          allow_any_instance_of(described_class)
            .to receive(:dir_mode)
            .and_return :system
        end

        context 'but :pid_delimiter and not provided' do
          it 'the pid file uses default' do
            expect(PidFile)
              .to receive(:new)
              .with('/var/run', group.app_name, group.multiple, nil)
            subject
          end
        end
        context 'and :pid_delimiter provided' do
          let(:additional_options) {
            { pid_delimiter: 'a.b' }
          }
          it 'is used for pid file' do
            expect(PidFile)
              .to receive(:new)
              .with('/var/run', group.app_name, group.multiple, 'a.b')
            subject
          end
        end
        context 'group with multiple processes is provided' do
          let(:group) { ApplicationGroup.new app_name, multiple: true }

          it 'uses the number in filename' do
            expect(subject.filename).to eq "/var/run/#{group.app_name}_num0.pid"
          end
        end
      end
    end

    describe '#group' do
      subject { application.group }
      it { is_expected.to eq group }
    end

    describe '#options' do
      subject { application.options }
      it { is_expected.to eq options }
    end

    describe '#show_status_callback=' do
      context 'when the Daemons::Application responds to the supplied method' do
        let(:callback_method) { :inspect }

        it 'sets the callback method on the instance' do
          expect {
            subject.show_status_callback = callback_method
          }.not_to raise_error
        end
      end

      context 'when it does NOT respond' do
        let(:callback_method) { :non_existant_method }

        it 'raises a NameError' do
          expect {
            subject.show_status_callback = callback_method
          }.to raise_error NameError
        end
      end
    end

    describe '#change_privilege' do
      before do
        allow(CurrentProcess)
          .to receive(:change_privilege)
          .with(user, group)
      end

      context 'with :user' do
        let(:user) { double :user }

        before { application.change_privilege }

        it 'changes privileges on the user' do
          expect(CurrentProcess)
            .to have_received(:change_privilege)
            .with(user, group)
        end
      end
    end

    describe '#script' do
      subject { application.script }

      let(:script) { 'my_app_script.rb' }

      context 'when @script is set' do
        before { application.instance_variable_set :@script, script }

        it { is_expected.to eq script }
      end

      context 'when @script is not set' do
        let(:script) { 'my_app_group_script.rb' }

        before do
          allow(application.group)
            .to receive(:script)
            .and_return script
        end

        it { is_expected.to eq script }
      end
    end

    describe '#pidfile_dir' do
      let(:dir_mode) { application.send :dir_mode }
      let(:dir)      { application.send :dir }
      let(:script)   { application.script }
      let(:pidfile_dir) { '/path/to/pid' }

      before do
        allow(Pid).to receive(:dir)
      end

      it 'delegates to Pid' do
        application.pidfile_dir

        expect(Pid)
          .to have_received(:dir)
          .with(dir_mode, dir, script)
      end
    end

    describe '#logdir' do
      subject { application.logdir }

      context 'with :log_dir' do
        let(:log_dir) { '/path/to/logs/' }

        it { is_expected.to eq log_dir }
      end

      context 'without :log_dir' do
        let(:log_dir) { nil }

        context 'and :dir_mode is :system' do
          let(:dir_mode) { :system }

          it { is_expected.to eq '/var/log' }
        end

        context 'and :dir_mode is other' do
          let(:pidfile_dir) { '/path/to/pid' }

          before do
            allow(application)
              .to receive(:pidfile_dir)
              .and_return pidfile_dir
          end

          it { is_expected.to eq pidfile_dir }
        end
      end
    end

    describe '#output_logfilename' do
      subject { application.output_logfilename }

      context 'when an output_logfilename is specified' do
        let(:output_logfilename) {
          'logname.log'
        }
        let(:additional_options) {
          { output_logfilename: output_logfilename }
        }

        it { is_expected.to eq output_logfilename }
      end

      context 'when an output_logfilename is NOT specified' do
        it { is_expected.to eq app_name + '.output' }
      end
    end

    describe '#output_logfile' do
      subject { application.output_logfile }

      let(:log_dir) { nil }
      let(:additional_options) {
        {
          log_output: log_output,
          log_dir: log_dir
        }
      }

      context 'when log_output is off' do
        let(:log_output) { false }
        it { is_expected.to be_nil }
      end

      context 'when log_output is on and log_dir is set' do
        let(:log_output) { true }
        let(:log_dir) { '/path/to/log' }
        let(:output_logfile) { File.join log_dir, application.output_logfilename }

        it { is_expected.to eq output_logfile }
      end
    end

    describe '#logfilename' do
      subject { application.logfilename }

      context 'when an logfilename is specified' do
        let(:logfilename) {
          'logname.log'
        }
        let(:additional_options) {
          { logfilename: logfilename }
        }

        it { is_expected.to eq logfilename }
      end

      context 'when a logfilename is NOT specified' do
        it { is_expected.to eq app_name + '.log' }
      end
    end

    describe '#logfile' do
      subject { application.logfile }

      let(:additional_options) {
        { log_dir: log_dir }
      }

      context 'when log_dir is nil' do
        let(:log_dir) { nil }
        it { is_expected.to be_nil }
      end

      context 'when log_dir is set' do
        let(:log_dir) { '/path/to/log' }
        let(:logfile) { File.join log_dir, application.logfilename }

        it { is_expected.to eq logfile }
      end
    end

    describe '#running?' do
      let(:pid) { application.instance_variable_get :@pid }

      before do
        allow(pid)
          .to receive(:exist?)
          .and_return pid_exist?
      end

      context 'when the pid exists' do
        let(:exist?) { true }
        let(:running?) { true }

        before do
          allow(Pid)
            .to receive(:running?)
            .and_return running?
        end

        context 'when @pid exists' do
          let(:pid_exist?) { true }
          it { expect(application).to be_running }

          context 'when not running' do
            let(:running?) { false }
            it { expect(application).to_not be_running }
          end
        end

        context 'when @pid does NOT exists' do
          let(:pid_exist?) { false }
          it { expect(application).to_not be_running }
        end
      end

      context 'when the pid does NOT exist' do
        let(:exist?) { false }
      end
    end
  end
end