Class: Gtin2atc::SwissindexDownloader

Inherits:
Downloader
  • Object
show all
Defined in:
lib/gtin2atc/downloader.rb

Instance Attribute Summary

Attributes inherited from Downloader

#type

Instance Method Summary collapse

Constructor Details

#initialize(options = {}, type = :pharma, lang = 'DE') ⇒ SwissindexDownloader

Returns a new instance of SwissindexDownloader.



194
195
196
197
198
199
# File 'lib/gtin2atc/downloader.rb', line 194

def initialize(options={}, type=:pharma, lang='DE')
  @type = (type == :pharma ? 'Pharma' : 'NonPharma')
  @lang = lang
  @url = "https://index.ws.e-mediat.net/Swissindex/#{@type}/ws_#{@type}_V101.asmx?WSDL"
  super(options, @url)
end

Instance Method Details

#downloadObject



213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
# File 'lib/gtin2atc/downloader.rb', line 213

def download
  begin
    file2save, dated = Gtin2atc::Util.get_latest_and_dated_name("swissindex_#{@type}_#{@lang}", '.xml')
    if File.exists?(file2save) and diff_hours = ((Time.now-File.ctime(file2save)).to_i/3600) and diff_hours < 24
      Util.debug_msg "Skip download of #{file2save} as only #{diff_hours} hours old"
      return IO.read(file2save)
    end
    FileUtils.rm_f(file2save, :verbose => false)
    soap = <<XML
<?xml version="1.0" encoding="utf-8"?>
<soap:Envelope xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/">
<soap:Body>
  <lang xmlns="http://swissindex.e-mediat.net/Swissindex#{@type}_out_V101">#{@lang}</lang>
</soap:Body>
</soap:Envelope>
XML
    response = @client.call(:download_all, :xml => soap)
    if response.success?
      if xml = response.to_xml
        response = nil # win
        FileUtils.makedirs(WorkDir)
        File.open(file2save, 'w+') { |file| file.write xml }
        Util.debug_msg "Swissindex download successful"
      else
        # received broken data or internal error
        raise StandardError
      end
    else
      raise Timeout::Error
    end
  rescue HTTPI::SSLError
    exit # catch me in Cli class
  rescue Timeout::Error, Errno::ETIMEDOUT
    retrievable? ? retry : raise
  end
  Util.debug_msg "Download of #{file2save} finished"
  xml
end

#initObject



203
204
205
206
207
208
209
210
211
212
# File 'lib/gtin2atc/downloader.rb', line 203

def init
  config = {
    :log_level       => :info,
    :log             => false, # $stdout
    :raise_errors    => true,
    :ssl_version     => :SSLv3,
    :wsdl            => @url
  }
  @client = Savon::Client.new(config)
end

#originObject



200
201
202
# File 'lib/gtin2atc/downloader.rb', line 200

def origin
  @url
end