Class: Simul

Inherits:
Radio show all
Defined in:
lib/rbtune/simul.rb

Instance Attribute Summary

Attributes inherited from Radio

#area_en, #area_id, #area_ja, #ext, #outdir

Instance Method Summary collapse

Methods inherited from Radio

#agent, bands, channels, #close, #convert, #convert_ffmpeg, #datetime, db, #fetch_stations, find, inherited, #login, #make_recfile, #make_tmpfile, match, #open, #out_ext, #play, #record, search, stations, #tune

Constructor Details

#initialize ⇒ Simul

Returns a new instance of Simul.



9
10
11
12
 
# File 'lib/rbtune/simul.rb', line 9

def initialize
  super
  @ext     = 'asf'
end

Instance Method Details

#channel_to_uri ⇒ Object 



15
16
17
18
19
20
21
22
 
# File 'lib/rbtune/simul.rb', line 15

def channel_to_uri
  ch = super
  if ch.end_with?('.asx')
    parse_asx ch
  else
    ch
  end
end

#create_player(uri) ⇒ Object 



39
40
41
42
43
 
# File 'lib/rbtune/simul.rb', line 39

def create_player(uri)
  mplayer = Mplayer.new uri
  mplayer.merge! 'benchmark' => '',  'vo' => 'null'
  mplayer
end

#link_to_station_id(link) ⇒ Object 



46
47
48
49
 
# File 'lib/rbtune/simul.rb', line 46

def link_to_station_id(link)
  link =~ %r{(/asx/([\w-]+).asx|nkansai.tv/(\w+)/?\Z|(flower|redswave|fm-tanba|darazfm|AmamiFM|comiten|fm-shimabara|fm-kitaq))}
  id = ($2 || $3 || $4).sub(/fm[-_]/, 'fm').sub(/[-_]fm/, 'fm')
end

#parse_asx(uri) ⇒ Object 



25
26
27
28
29
30
31
32
33
34
35
36
 
# File 'lib/rbtune/simul.rb', line 25

def parse_asx(uri)
  asx = Net::HTTP::get URI::parse(uri)
  asx.force_encoding "Shift_JIS"
  asx.encode! 'utf-8'
  asx.downcase!
  if asx.gsub!(%r(</ask>), '</asx>')
    $stderr.puts 'fix!! </ask> to <asx>'
  end
  doc = REXML::Document.new(asx)
  ref = doc.get_elements('//entry/ref')[0]
  ref.attribute('href').value
end

#parse_stations(body) ⇒ Object 



57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
 
# File 'lib/rbtune/simul.rb', line 57

def parse_stations(body)
  radioboxes = body / 'div.radiobox'
  radioboxes.map do |station|
    rows   = station / 'tr'
    cols   = rows[1] / 'td'
    ankers = station / 'a'

    player = ankers.select {|a|
      img = a.at 'img'
      img && img['alt'] == '放送を聴く'
    }

    title  = station.at('td > p > strong > a').text.strip
    links0 = player.map! {|e| e['href']}
    links  = links0.select { |uri| uri =~ %r{\.asx\Z|nkansai.tv} }
    if links.empty?
      # $stderr.puts "#{title}: #{links0 * ', '}"
    else
      link = links[0]
      id   = link_to_station_id(link)
      if id
        Station.new(id, link, name: title, ascii_name: id)
      else
        $stderr.puts "!!! #{title}: #{link}"
      end
    end
  end.compact
end

#stations_uri ⇒ Object 



52
53
54
 
# File 'lib/rbtune/simul.rb', line 52

def stations_uri
  'http://www.simulradio.info'
end