uk_planning_scraper/lib/uk_planning_scraper/idox.rb

require 'mechanize'
require 'pp'

module UKPlanningScraper
  class Authority
    private
    def scrape_idox(params, options)
      puts "Using Idox scraper."
      base_url = @url.match(/(https?:\/\/.+?)\//)[1]
      
      apps = []

      agent = Mechanize.new
      puts "Getting: #{@url}"
      page = agent.get(@url) # load the search form page

      # Check that the search form is actually present.
      # When Idox has an internal error it returns an error page with HTTP 200.
      unless form = page.form('searchCriteriaForm')
        puts "Error: Search form page failed to load due to Idox internal error."
        return []
      end
      # form.action = form.action + '&searchCriteria.resultsPerPage=100'

      # Fill out and submit search form

      # Add expected fields to form if they're not already present so that searches using these terms work
      %w{
        date(applicationReceivedStart)
        date(applicationReceivedEnd)
      }.each { |f| form.add_field!(f) unless form.has_field?(f) }

      date_format = "%d/%m/%Y"
      
      form.send(:"date(applicationReceivedStart)", params[:received_from].strftime(date_format)) if params[:received_from]
      form.send(:"date(applicationReceivedEnd)", params[:received_to].strftime(date_format)) if params[:received_to]

      form.send(:"date(applicationValidatedStart)", params[:validated_from].strftime(date_format)) if params[:validated_from]
      form.send(:"date(applicationValidatedEnd)", params[:validated_to].strftime(date_format)) if params[:validated_to]

      form.send(:"date(applicationDecisionStart)", params[:decided_from].strftime(date_format)) if params[:decided_from]
      form.send(:"date(applicationDecisionEnd)", params[:decided_to].strftime(date_format)) if params[:decided_to]

      form.send(:"searchCriteria\.reference", params[:council_reference])
      form.send(:"searchCriteria\.description", params[:keywords])
      
      # Some councils don't have the applicant name on their form, eg Bexley
      form.send(:"searchCriteria\.applicantName", params[:applicant_name]) if form.has_field? 'searchCriteria.applicantName'
      
      form.send(:"searchCriteria\.caseType", params[:application_type]) if form.has_field? 'searchCriteria.caseType'
      
      # Only some Idox sites (eg Bolton) have a 'searchCriteria.developmentType' parameter
      form.send(:"searchCriteria\.developmentType", params[:development_type]) if form.has_field? 'searchCriteria.developmentType'

      page = form.submit

      if page.search('.errors').inner_text.match(/Too many results found/i)
        raise TooManySearchResults.new("Scrape in smaller chunks. Use shorter date ranges and/or more search parameters.")
      end
      
      loop do
        # Parse search results
        items = page.search('li.searchresult')

        puts "Found #{items.size} apps on this page."

        items.each do |app|
          data = Application.new

          # Parse info line
          info_line = app.at("p.metaInfo").inner_text.strip
          bits = info_line.split('|').map { |e| e.strip.delete("\r\n") }
          
          bits.each do |bit|
            if matches = bit.match(/Ref\. No:\s+(.+)/)
              data.council_reference = matches[1]
            end

            if matches = bit.match(/(Received|Registered):\s+.*(\d{2}\s\w{3}\s\d{2}\d{2}?)/)
              data.date_received = Date.parse(matches[2])
            end
            
            if matches = bit.match(/Validated:\s+.*(\d{2}\s\w{3}\s\d{2}\d{2}?)/)
              data.date_validated = Date.parse(matches[1])
            end

            if matches = bit.match(/Status:\s+(.+)/)
              data.status = matches[1]
            end
          end

          data.scraped_at = Time.now
          data.info_url = base_url + app.at('a')['href']
          data.address = app.at('p.address').inner_text.strip
          data.description = app.at('a').inner_text.strip
          
          apps << data
        end
        
        # Get the Next button from the pager, if there is one
        if next_button = page.at('a.next')
          next_url = base_url + next_button[:href]# + '&searchCriteria.resultsPerPage=100'
          sleep options[:delay]
          puts "Getting: #{next_url}"
          page = agent.get(next_url)
        else
          break
        end
      end
      
      # Scrape the summary tab for each app
      apps.each_with_index do |app, i|
        sleep options[:delay]
        puts "#{i + 1} of #{apps.size}: #{app.info_url}"
        res = agent.get(app.info_url)
        
        if res.code == '200' # That's a String not an Integer, ffs
          # Parse the summary tab for this app
          parse_summary(app, res)
        else
          puts "Error: HTTP #{res.code}"
        end # if
      end # scrape summary tab for apps

      if apps == [] && page.search('pa')
        app = Application.new
        app.council_reference = params[:council_reference] if params[:council_reference]
        parse_summary(app, page)
        apps << app
      end # direct hit
      apps
    end # scrape_idox

    def parse_summary(app, res)
      base_url = @url.match(/(https?:\/\/.+?)\//)[1]

      app.scraped_at = Time.now

      unless app.info_url
        key_val = res.link_with(id: 'tab_summary')&.href
        app.info_url = "#{base_url}#{key_val}"
      end

      # The Documents tab doesn't show if there are no documents (we get li.nodocuments instead)
      # Bradford has #tab_documents but without the document count on it
      app.documents_count = 0

      if documents_link = res.at('.associateddocument a')
        if documents_link.inner_text.match(/\d+/)
          app.documents_count = documents_link.inner_text.match(/\d+/)[0].to_i
          app.documents_url = base_url + documents_link[:href]
        end
      elsif documents_link = res.at('#tab_documents')
        if documents_link.inner_text.match(/\d+/)
          app.documents_count = documents_link.inner_text.match(/\d+/)[0].to_i
          app.documents_url = base_url + documents_link[:href]
        end
      end
      
      # We need to find values in the table by using the th labels.
      # The row indexes/positions change from site to site (or even app to app) so we can't rely on that.
      res.search('#simpleDetailsTable tr').each do |row|
        key = row.at('th').inner_text.strip
        value = row.at('td').inner_text.strip
        
        case key
          when 'Reference'
            app.council_reference = value
          when 'Alternative Reference'
            app.alternative_reference = value unless value.empty?
          when 'Planning Portal Reference'
            app.alternative_reference = value unless value.empty?
          when 'Application Received'
            app.date_received = Date.parse(value) if value.match(/\d/)
          when 'Application Registered'
            app.date_received = Date.parse(value) if value.match(/\d/)
          when 'Application Validated'
            app.date_validated = Date.parse(value) if value.match(/\d/)
          when 'Address'
            app.address = value unless value.empty?
          when 'Proposal'
            app.description = value unless value.empty?
          when 'Status'
            app.status = value unless value.empty?
          when 'Decision'
            app.decision = value unless value.empty?
          when 'Decision Issued Date'
            app.date_decision = Date.parse(value) if value.match(/\d/)
          when 'Appeal Status'
            app.appeal_status = value unless value.empty?
          when 'Appeal Decision'
            app.appeal_decision = value unless value.empty?
          else
            puts "Error: key '#{key}' not found"
        end # case
      end
    end
  end # class
end