zik 0.16.1

data/player/cdplayer.rb

@@ -0,0 +1,108 @@
+# encoding: UTF-8
+=begin
+Copyright 2007-2011 Vincent Carmona
+vinc4mai@gmail.com
+
+This file is part of ZiK.
+
+    ZiK is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    (at your option) any later version.
+
+    ZiK is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with ZiK; if not, write to the Free Software
+    Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
+=end
+
+module Cd
+class Player
+	attr_writer :gui
+	
+	def initialize(d='/dev/cdrom')
+		@playing=false
+	
+		@src=Gst::ElementFactory.make('cdiocddasrc')
+		device=d
+		
+		@sink=Gst::ElementFactory.make('autoaudiosink')
+		
+		@vol=Gst::ElementFactory.make('volume')
+		
+		@pipeline=Gst::Pipeline.new
+		@pipeline.bus.add_watch {|bus, message| got_bus_message(message)}
+		@pipeline.add(@src, @vol, @sink)
+		@src >> @vol >> @sink
+	end
+	
+	def device=(d)
+		@src.device=d
+	end
+	
+	def playing?
+		@playing
+	end
+	
+	def stop
+		@playing=false
+		@pipeline.stop
+		ErrorInfo.new("Player stopped.")
+	end
+	
+	def pause
+		if playing?
+			@playing=false
+			@pipeline.pause
+			ErrorInfo.new("Pause.")
+		end
+	end
+	
+	def play(song)
+		begin
+			@playing=true
+			@src.track=song.track
+			@pipeline.play
+			ErrorInfo.new("Playing #{song.name}.")
+		rescue
+			ErrorError.new(_("Playing track #{song.track}."), true)
+		end
+	end
+	
+	def position
+		q=Gst::QueryPosition.new(Gst::Format::Type::TIME)
+		@pipeline.query(q)
+		q.parse[1]/1000000000
+	end
+	
+	def position=(pos)
+		@pipeline.send_event(Gst::EventSeek.new(1.0,
+		Gst::Format::Type::TIME, Gst::Seek::FLAG_FLUSH.to_i | Gst::Seek::FLAG_KEY_UNIT.to_i, Gst::Seek::TYPE_SET,
+		pos*1000000000, Gst::Seek::TYPE_NONE, -1))
+		#@pipeline.seek(1.0, Gst::Format::Type::TIME, Gst::Seek::FLAG_FLUSH.to_i | Gst::Seek::FLAG_KEY_UNIT.to_i, Gst::Seek::TYPE_SET, pos*1000000000, Gst::Seek::TYPE_NONE, -1)
+		#Arguments for Gst::EventSeek taken from the ruby-gstreamer0.10  (and not from ruby-gnome2) binding examples (cf:video-player)
+	end
+	
+	def volume=(n)
+		@vol.volume=n
+		ErrorInfo.new("Set volume to #{n}.")
+	end
+	
+	private
+	
+	def got_bus_message(message)
+		case message.type
+			when Gst::Message::ERROR
+				ErrorError.new(_("Gstreamer error."), true)
+				stop
+			when Gst::Message::EOS
+				@gui.next_song#Use Dbus to propagate message instead of :gui ???
+		end
+		true#Without this line only the first message is processed
+	end
+end
+end

data/player/player.rb

@@ -0,0 +1,132 @@
+# encoding: UTF-8
+=begin
+Copyright 2007-2011 Vincent Carmona
+vinc4mai@gmail.com
+
+This file is part of ZiK.
+
+    ZiK is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    (at your option) any later version.
+
+    ZiK is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with ZiK; if not, write to the Free Software
+    Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
+=end
+
+class Player
+
+	attr_writer :gui
+	
+	def initialize
+		@playing=false
+		@playbin=Gst::ElementFactory.make('playbin')
+		@playbin.ready
+		@playbin.bus.add_watch {|bus, message| got_bus_message(message)}
+	end
+	
+	def stop
+		@playing=false
+		@playbin.stop
+		ErrorInfo.new("Player stopped.")
+	end
+	
+	def play(song)
+		begin
+			@playing=true
+			@playbin.uri=GLib.filename_to_uri(song.path)
+			@playbin.play
+			ErrorInfo.new("Playing #{song.name}.")
+		rescue
+			ErrorError.new(_("Playing file://#{song.path}"))
+			@gui.next_song
+		end
+	end
+
+	def pause
+		if playing?
+			@playing=false
+			@playbin.pause
+			ErrorInfo.new("Pause.")
+		end
+	end
+
+	def playing?
+		@playing
+	end
+	
+	def position
+		q=Gst::QueryPosition.new(Gst::Format::Type::TIME)
+		@playbin.query(q)
+		q.parse[1]/1000000000
+	end
+
+	def position=(pos)
+		@playbin.send_event(Gst::EventSeek.new(1.0,
+		Gst::Format::Type::TIME, Gst::Seek::FLAG_FLUSH.to_i | Gst::Seek::FLAG_KEY_UNIT.to_i, Gst::Seek::TYPE_SET,
+		pos*1000000000, Gst::Seek::TYPE_NONE, -1))
+		#@playbin.seek(1.0, Gst::Format::Type::TIME, Gst::Seek::FLAG_FLUSH.to_i | Gst::Seek::FLAG_KEY_UNIT.to_i, Gst::Seek::TYPE_SET, pos*1000000000, Gst::Seek::TYPE_NONE, -1)
+		#Arguments for Gst::EventSeek taken from the ruby-gstreamer0.10  (and not from ruby-gnome2) binding examples (cf:video-player)
+	end
+
+
+	def duration
+		q=Gst::QueryDuration.new(Gst::Format::Type::TIME)
+		@playbin.query(q)
+		q.parse[1]/1000000000
+	end
+	
+	def volume
+		@playbin.volume
+	end
+	
+	def volume=(n)
+		@playbin.volume=n
+		ErrorInfo.new("Set volume to #{n}.")
+	end
+	
+private
+
+	begin
+		Gst::InstallPlugins
+		def got_bus_message(message)
+			case message
+				when Gst::Message::ERROR
+					ErrorError.new(_("Gstreamer error."), true)
+					@gui.next_song_on_error
+				when Gst::Message::EOS
+					@gui.next_song#Use Dbus to propagate message instead of :gui  or a SIGNAL???
+				when Gst::MissingMessage
+					ErrorInfo.new("Missing plugins.")
+					context=Gst::InstallPluginsContext.new
+					Gst::InstallPlugins.async([message.installer_detail], context){|ret|
+						case ret
+						when Gst::InstallPluginsReturn::SUCCESS, Gst::InstallPluginsReturn::PARTIAL_SUCCESS
+							@gui.update_gst_registry
+						else
+							ErrorInfo.new("Missing plugins return: "+ret.name)
+							@gui.next_song
+						end
+					}
+			end
+			true#Without this line only the first message is processed
+		end
+	rescue NameError
+		def got_bus_message(message)
+			case message.type
+				when Gst::Message::ERROR
+					ErrorError.new(_("Gstreamer error."), true)
+					@gui.next_song_on_error
+				when Gst::Message::EOS
+					@gui.next_song#Use Dbus to propagate message instead of :gui  or a SIGNAL???
+			end
+			true#Without this line only the first message is processed
+		end
+	end
+end

data/player/radioplayer.rb

@@ -0,0 +1,124 @@
+# encoding: UTF-8
+=begin
+Copyright 2007-2011 Vincent Carmona
+vinc4mai@gmail.com
+
+This file is part of ZiK.
+
+    ZiK is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    (at your option) any later version.
+
+    ZiK is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with ZiK; if not, write to the Free Software
+    Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
+=end
+module Radio
+class Player < Player
+	def play(radio)
+		@streams=[]
+		begin
+			url=radio.url
+			case url
+				when /^http:\/\/.*\.m3u$/i
+					list=get_list(url)
+					@streams=list.to_a
+					@streams.reject!{|a| a=~/^\#/}
+					@streams.each{|a| a.chomp!}
+				when /^http:\/\/.*\.pls$/i, /^http:\/\/.*\.asx$/i
+					list=get_list(url)
+					@streams=URI::extract(list)	
+				else
+					@streams=url.to_a
+			end
+		rescue
+			ErrorError.new(_("Parsing #{radio.url}."), true)
+		end
+		@i=-1
+		next_stream
+	end
+	
+private
+	
+	def get_list(url)
+		reponse=Net::HTTP.get_response(URI.parse(url))
+		case reponse
+			when Net::HTTPSuccess
+				list=reponse.body
+			when Net::HTTPRedirection
+				ErrorWarning.new("#{url} is moved to #{reponse['location']}")
+				list=Net::HTTP.get(URI.parse(reponse['location']))
+			else
+				ErrorError.new(response.error!)
+				raise response.error!
+		end
+	end
+	
+	begin
+		Gst::InstallPlugins
+		def got_bus_message(message)
+			case message.type
+				when Gst::Message::ERROR
+					ErrorError.new(_('Gstreamer error'), true)
+					stop
+					next_stream
+				when Gst::Message::EOS
+					@gui.next_song#Use Dbus to propagate message instead of :gui ???
+				when Gst::MissingMessage
+					ErrorInfo.new("Missing plugins.")
+					context=Gst::InstallPluginsContext.new
+					Gst::InstallPlugins.async([message.installer_detail], context){|ret|
+						case ret
+						when Gst::InstallPluginsReturn::SUCCESS, Gst::InstallPluginsReturn::PARTIAL_SUCCESS
+							@gui.update_gst_registry
+						else
+							ErrorInfo.new("Missing plugins return: "+ret.name)
+							stop
+							next_stream
+						end
+					}
+			end
+			true#Without this line only the first message is processed
+		end
+	rescue NameError
+		def got_bus_message(message)
+			case message.type
+				when Gst::Message::ERROR
+					ErrorError.new(_('Gstreamer error'), true)
+					stop
+					next_stream
+				when Gst::Message::EOS
+					@gui.next_song#Use Dbus to propagate message instead of :gui ???
+			end
+			true#Without this line only the first message is processed
+		end
+	end
+
+	def next_stream
+		@i+=1
+		if @i<@streams.length
+			begin
+				@playing=true
+				@playbin.uri=@streams[@i]
+				##On some platform total freeze can happened when playing some webradio.
+				##i.e. http://mp3.live.tv-radio.com/centpourcent/all/centpourcent-128k.mp3
+				##gstreamer-good-plugin/souphttpsrc + ruby/gtk may be in cause.
+				##Using a thread as a workaround
+				##Thread.new{@playbin.play}.join also freeze!!
+				#@playbin.play
+				#puts "Playing #{@streams[@i]}."
+				Thread.new{@playbin.play; ErrorInfo.new("Playing #{@streams[@i]}.")}
+			rescue
+				ErrorError.new(_("Playing #{@streams[@i]}"), true)
+				next_stream
+			end
+		end
+	end
+end
+end

data/playlist/cdlist.rb

@@ -0,0 +1,140 @@
+# encoding: UTF-8
+=begin
+Copyright 2007-2011 Vincent Carmona
+vinc4mai@gmail.com
+
+This file is part of ZiK.
+
+    ZiK is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    (at your option) any later version.
+
+    ZiK is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with ZiK; if not, write to the Free Software
+    Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
+=end
+module Cd
+
+class Song
+	attr_reader :track, :duration, :name, :type
+	attr_accessor :artist, :album, :title
+
+	def initialize(track, duration)
+		@track=track; @duration=duration
+		@artist=''; @album=''; @title=''
+		@type=SONG_CD
+		refresh_name
+	end
+	
+	def refresh_name
+		if @title.empty?
+			@name='Track '+@track.to_s
+		else
+			if @artist.empty?
+				@name=@title
+			else
+				@name=@artist+' - '+@title
+			end
+		end
+	end
+end
+
+class List
+	include ListPlay 
+
+	attr_reader :songs, :current
+	attr_writer :web
+
+	def initialize(config)
+		@songs=[]
+		@order=[]
+		@config=config
+		@shuffle=config['shuffle'];@repeat=config['repeat']
+		@web=config['cd_web']
+		
+		@current=0; @n=0
+		
+		@mb=MusicBrainz::Client.new
+		#@mb.utf8=true
+		refresh
+				
+		@current=@order[0] if @shuffle
+	end
+	
+	def device=(device)
+		@mb.device=device
+	end
+	
+	def clear
+		@songs.clear
+		@order.clear
+		@current=0; @n=0
+	end
+	
+	def refresh
+		refresh_off
+		refresh_on if @web
+	end
+	
+	private
+	
+	def refresh_on
+		refresh_off
+		if @mb.query(MusicBrainz::Query::GetCDInfo)
+			nbAlbums=@mb.result(MusicBrainz::Query::GetNumAlbums).to_i
+			if nbAlbums < 1
+				ErrorWarning.new("No album found.")
+			else
+				if nbAlbums >1
+					ErrorWarning.new("#{nbAlbums} albums are found. Use the first one.")
+				end
+				@mb.select(MusicBrainz::Query::SelectAlbum, 1)
+				album=@mb.result(MusicBrainz::Query::MBE_AlbumGetAlbumName)
+				nbTracks=@mb.result(MusicBrainz::Query::AlbumGetNumTracks).to_i
+				for i in 1..nbTracks
+					artist=@mb.result(MusicBrainz::Query::MBE_AlbumGetArtistName, i)
+					title=@mb.result(MusicBrainz::Query::MBE_AlbumGetTrackName, i)
+					s=@songs[i-1]
+					s.artist=artist;s.album=album;s.title=title;s.refresh_name
+				end
+			end
+		else
+			ErrorWarning.new("CD not found on MusicBrainz.")
+		end
+	end
+	
+	def refresh_off
+		self.clear
+		self.device=@config['cd_device']
+		if @mb.query(MusicBrainz::Query::GetCDTOC)
+			nbTracks=@mb.result(MusicBrainz::Query::TOCGetLastTrack).to_i			
+			offset=[]
+			for i in 1..nbTracks+1
+				offset.push(@mb.result(MusicBrainz::Query::TOCGetTrackSectorOffset, i).to_i)
+			end
+			offset.sort!#Apparently the offset are not given in tracks order.
+			temp=[];temp[0]=0;temp.concat(offset[0...nbTracks])
+			d=[]
+			[temp, offset].transpose.each{|a,b|
+				dur=((b-a+1).to_f/75.0).round#Calcul track duration from frame offset.
+				d.push(dur)
+			}
+			d.delete_at(0)
+			i=1
+			d.each{|duration| 
+				@songs.push(Cd::Song.new(i, duration))
+				@order.push(i-1)
+				i+=1
+			}
+			@order.sort_by{rand}
+		end
+	end
+end
+
+end