require 'spec_helper'
require 'ronin/network/udp'

require 'resolv'

describe Network::UDP do
  describe "helper methods", :network do
    let(:host) { 'scanme.nmap.org' }
    let(:port) { 123 }

    subject do
      obj = Object.new
      obj.extend described_class
      obj
    end

    shared_examples "UDP Server" do
      let(:server_host) { local_host }
      let(:server_port) { 1024 + rand(65535 - 1024) }
      let(:server)      { UDPSocket.new }
      let(:server_bind_ip)   { server.addr[3] }
      let(:server_bind_port) { server.addr[1] }

      before(:each) { server.bind(server_host,server_port) }
      after(:each)  { server.close }
    end

    describe "#udp_open?" do
      let(:host) { server_bind_ip   }
      let(:port) { server_bind_port }

      include_context "UDP Server"

      it "should return true for open ports" do
        expect(subject.udp_open?(host,port)).to be(true)
      end

      let(:closed_port) { port + 1 }

      it "should return false for closed ports" do
        expect(subject.udp_open?(host,closed_port)).to be(false)
      end

      it "should have a timeout for firewalled ports" do
        timeout = 2

        t1 = Time.now
        subject.udp_open?(host,1337,nil,nil,timeout)
        t2 = Time.now

        expect((t2 - t1).to_i).to be <= timeout
      end
    end

    describe "#udp_connect" do
      it "should open a UDPSocket" do
        socket = subject.udp_connect(host,port)

        expect(socket).to be_kind_of(UDPSocket)
        expect(socket).not_to be_closed

        socket.close
      end

      context "when given a local port" do
        let(:local_port) { 1024 + rand(65535 - 1024) }

        it "should bind to a local port" do
          socket      = subject.udp_connect(host,port,nil,local_port)
          bound_port = socket.addr[1]

          expect(bound_port).to eq(local_port)

          socket.close
        end
      end

      context "when given a block" do
        it "should yield the new UDPSocket" do
          socket = nil

          subject.udp_connect(host,port) do |yielded_socket|
            socket = yielded_socket
          end

          expect(socket).not_to be_closed
          socket.close
        end
      end
    end

    describe "#udp_connect_and_send" do
      pending "need to find a UDP Service for these specs" do
        let(:data) { "HELO ronin\n" }
        let(:local_port) { 1024 + rand(65535 - 1024) }

        it "should connect and then send data" do
          socket   = subject.udp_connect_and_send(data,host,port)
          banner   = socket.readline
          response = socket.readline

          expect(response.start_with?('250')).to be_true

          socket.close
        end

        it "should bind to a local port" do
          socket      = subject.udp_connect_and_send(data,host,port,nil,local_port)
          bound_port = socket.addr[1]

          expect(bound_port).to eq(local_port)

          socket.close
        end

        it "should yield the UDPSocket" do
          response = nil

          socket = subject.udp_connect_and_send(data,host,port) do |socket|
            banner   = socket.readline
            response = socket.readline
          end

          expect(response.start_with?('250')).to be_true

          socket.close
        end
      end
    end

    describe "#udp_session" do
      let(:local_port) { 1024 + rand(65535 - 1024) }

      it "should open then close a UDPSocket" do
        socket = nil

        subject.udp_session(host,port) do |yielded_socket|
          socket = yielded_socket
        end

        expect(socket).to be_kind_of(UDPSocket)
        expect(socket).to be_closed
      end

      context "when given a local host and port" do
        it "should bind to a local host and port" do
          bound_port = nil

          subject.udp_session(host,port,nil,local_port) do |socket|
            bound_port = socket.addr[1]
          end

          expect(bound_port).to eq(local_port)
        end
      end
    end

    describe "#udp_banner" do
      pending "need to find a UDP service that sends a banner" do
        let(:host) { 'smtp.gmail.com' }
        let(:port) { 25 }

        let(:local_port) { 1024 + rand(65535 - 1024) }

        it "should read the service banner" do
          banner = subject.udp_banner(host,port)

          expect(banner.start_with?('220')).to be_true
        end

        context "when given a local host and port" do
          it "should bind to a local host and port" do
            banner = subject.udp_banner(host,port,nil,local_port)

            expect(banner.start_with?('220')).to be_true
          end
        end

        context "when given a block" do
          it "should yield the banner" do
            banner = nil

            subject.udp_banner(host,port) do |yielded_banner|
              banner = yielded_banner
            end

            expect(banner.start_with?('220')).to be_true
          end
        end
      end
    end

    let(:local_host) { 'localhost' }
    let(:local_ip)   { '127.0.0.1' } # XXX: UPDSocket defaults to using IPv4

    describe "#udp_send" do
      include_context "UDP Server"

      let(:data) { "hello\n" }

      it "should send data to a service" do
        subject.udp_send(data,server_bind_ip,server_bind_port)

        mesg = server.recvfrom(data.length)

        expect(mesg[0]).to eq(data)
      end

      context "when given a local host and port" do
        let(:local_port) { 1024 + rand(65535 - 1024) }

        it "should bind to a local host and port" do
          subject.udp_send(data,server_bind_ip,server_bind_port,server_bind_ip,local_port)

          mesg = server.recvfrom(data.length)

          client_address = mesg[1]
          expect(client_address[1]).to eq(local_port)
        end
      end
    end

    describe "#udp_server" do
      it "should create a new UDPSocket" do
        server = subject.udp_server

        expect(server).to be_kind_of(UDPSocket)
        expect(server).not_to be_closed

        server.close
      end

      context "when given a port and host" do
        let(:local_port) { 1024 + rand(65535 - 1024) }

        it "should bind to a specific port and host" do
          server      = subject.udp_server(local_port,local_host)
          bound_host = server.addr[3]
          bound_port = server.addr[1]

          expect(bound_host).to eq(local_ip)
          expect(bound_port).to eq(local_port)

          server.close
        end
      end

      context "when a block is given" do
        it "should yield the new UDPSocket" do
          server = nil

          subject.udp_server do |yielded_server|
            server = yielded_server
          end

          expect(server).to be_kind_of(UDPSocket)
          expect(server).not_to be_closed

          server.close
        end
      end
    end

    describe "#udp_server_session" do
      it "should create a temporary UDPSocket" do
        server = nil
        
        subject.udp_server_session do |yielded_server|
          server = yielded_server
        end

        expect(server).to be_kind_of(UDPSocket)
        expect(server).to be_closed
      end

      context "when given a port and a host" do
        let(:local_port) { 1024 + rand(65535 - 1024) }

        it "should bind to a specific port and host" do
          bound_host = nil
          bound_port = nil

          subject.udp_server_session(local_port,local_host) do |new_server|
            bound_host = new_server.addr[3]
            bound_port = new_server.addr[1]
          end

          expect(bound_host).to eq(local_ip)
          expect(bound_port).to eq(local_port)
        end
      end
    end

    describe "#udp_recv" do
      let(:server_port) { 1024 + rand(65535 - 1024) }
    end
  end
end