rwdmpd 0.06

data/code/dd0viewphoto/dd0viewphoto.rb

@@ -0,0 +1,3 @@
+def viewphoto
+	@rwd_window = "photo"
+end

data/code/superant.com.rwdmp3/0uninstallapplet.rb

@@ -0,0 +1,11 @@
+
+def rwdwmpd_0_06()
+$tinkerdocumentsarray.delete_if {|x| x == "HowTo_Mpd.txt"}
+$tinkerhelpaboutarray.delete_if {|x| x == "RwdMpd"}
+Helptext.delete_if {|key, value| key == :rwdmpd_help}
+Helptext.delete_if {|key, value| key == :rwdmpd_generalhelp   }
+
+$rwdjumplink.delete_if {|x| x == "RwdMpd"}
+
+
+end

data/code/superant.com.rwdmp3/clearscreendisplay.rb

@@ -0,0 +1,7 @@
+   # this method clears the on screen variables
+   def clearrwdmp3playlistscreendisplay
+   
+ @a_playlistfinename = " "
+ @rwdmpdplaylistcontents = " "
+
+  end

data/code/superant.com.rwdmp3/controlmpd.rb

@@ -0,0 +1,139 @@
+#!/usr/bin/ruby -w
+
+# This is a very simple MPD client that just sends commands to the server
+# from the command line
+#
+# Copyright 2006 Andrew Rader ( bitwise_mcgee AT yahoo.com | http://nymb.us )
+#
+
+def controlmpd(command,argopts = "")
+
+require 'lib/librmpd'
+require 'thread'
+
+		mpd = MPD.new
+		mpd.connect
+		case command
+			when 'seekid'
+			         tmpstats = mpd.seekid( argopts.to_i , argopts.to_i)
+				tmpresulthash = mpd.current_song
+				tmpstats = ""
+				tmpresulthash.each_pair do |key, value|
+					
+					tmpstats = tmpstats +  "#{key} => #{value}\n"
+					end
+				mpd.disconnect
+				return tmpstats
+			when 'albums'
+			 temparrayresult = mpd.albums
+			 tmpresult = ""
+				  temparrayresult.each {|x|
+                                         tmpresult = tmpresult + "\n#{x}"
+                                       }
+				       mpd.disconnect
+                                  return    tmpresult
+	
+		when 'files'
+			 temparrayresult = mpd.files
+			 tmpresult = ""
+				  temparrayresult.each {|x|
+                                         tmpresult = tmpresult + "\n#{x}"
+                                       }
+				       mpd.disconnect
+                                  return    tmpresult  
+			when 'playlists'
+			         tmpstats = mpd.playlists
+				  totalresult = ""
+				 tmpstats.each { |part| 
+				 totalresult = totalresult + "#{part}\n"
+				             }
+				 mpd.disconnect
+				return totalresult
+			when 'load'
+			         mpd.load( argopts.to_s)
+				  mpd.play 
+				tmpresulthash = mpd.current_song
+				tmpstats = ""
+				tmpresulthash.each_pair do |key, value|
+					
+					tmpstats = tmpstats +  "#{key} => #{value}\n"
+					end
+				mpd.disconnect
+				return tmpstats
+			when 'search_artist'
+			         tmpstats = mpd.search( 'artist', argopts.to_s)
+				 mpd.disconnect
+			return tmpstats
+			when 'play'
+                                mpd.play argopts 
+				tmpresulthash = mpd.current_song
+				tmpstats = ""
+				tmpresulthash.each_pair do |key, value|
+					
+					tmpstats = tmpstats +  "#{key} => #{value}\n"
+					end
+				mpd.disconnect
+				return tmpstats
+                        when 'pause'
+				mpd.pause = !mpd.paused?
+				tmpresulthash = mpd.current_song
+				tmpstats = ""
+				tmpresulthash.each_pair do |key, value|
+					
+					tmpstats = tmpstats +  "#{key} => #{value}\n"
+					end
+				mpd.disconnect
+				return tmpstats
+			when 'stop'
+				mpd.stop
+			when 'next'
+				mpd.next
+				tmpresulthash = mpd.current_song
+				tmpstats = ""
+				tmpresulthash.each_pair do |key, value|
+					
+					tmpstats = tmpstats +  "#{key} => #{value}\n"
+					end
+				mpd.disconnect
+				return tmpstats
+			when 'prev'
+				mpd.previous
+				tmpresulthash = mpd.current_song
+				tmpstats = ""
+				tmpresulthash.each_pair do |key, value|
+					
+					tmpstats = tmpstats +  "#{key} => #{value}\n"
+					end
+				mpd.disconnect
+				return tmpstats
+			when 'volume'
+					mpd.volume = argopts.to_i
+			
+			when 'repeat'
+				mpd.repeat = !mpd.repeat?
+			when 'random'
+				mpd.random = !mpd.random?
+			when 'stats'
+				hash = mpd.stats
+				tmpstats = ""
+				hash.each_pair do |key, value|
+					
+					tmpstats = tmpstats +  "#{key} => #{value}\n"
+				end
+				mpd.disconnect
+				return tmpstats
+			when 'status'
+				hash = mpd.status
+				tmpstats = ""
+				hash.each_pair do |key, value|
+					
+					tmpstats = tmpstats +  "#{key} => #{value}\n"
+				end
+				mpd.disconnect
+				return tmpstats
+			else
+				$stderr.puts "Unknown Command #{command}"
+		end
+		mpd.disconnect
+
+end

data/code/superant.com.rwdmp3/helptexthashrwdmp3.rb

@@ -0,0 +1,41 @@
+  
+
+ Helptext.update( :rwdmpd_help => "     This program uses the files from the libmpd project
+      You can play mp3  ogg flac files with this program
+      <p>
+      You need mpd installed",
+      :rwdmpd_generalhelp => "
+             
+       You will need mpd installed
+    <p>
+Commands Available:<p>    
+    next<p>
+    pause<p>
+    play<p>
+    prev<p>
+    stop<p>
+    stats ",
+    
+    :mpdcommand_help => "
+    Commands Available: (use | to divide arguments)<p>
+    albums<p>
+    artists<p>
+    connected?<p>
+    current_song<p>
+    list| (album,artist,title,file)<p>
+    directories<p>
+    files<p>
+    playlists<p>
+    songs<p>
+    songs_by_artist<p>
+    playlist_version<p>
+    playlist<p>
+    song_at_pos|(integer)
+    ",
+    :mpdplaylist_help => "
+   The $rwdmpdplaylist_directory needs to be set<p>
+   on Debian Linux the default is  '/var/lib/mpd/playlists/'<p>
+   You can load and edit playlists<p>
+    The song locations start from the MPD music directory<p>
+    "
+    )

data/code/superant.com.rwdmp3/listplaylistfiles.rb

@@ -0,0 +1,12 @@
+# this code is to list the playlists that are installed
+def loadmpdplaylistfilelist
+
+	fileList      = Dir.new($rwdmpdplaylist_directory ).entries.sort.delete_if { |x| ! (x =~ /m3u/) }
+	@playlistresults  = fileList.rwd_method("superantcomshowplaylistdirsname")
+end
+
+def superantcomshowplaylistdirsname(inffile)
+	applet                = inffile
+	@a_playlistfinename      = applet
+
+end

data/code/superant.com.rwdmp3/loadconfigurationrecord.rb

@@ -0,0 +1,22 @@
+   # this method puts the configuration rexord on the screen
+  def loadrwdmp3configuration
+ 
+         require 'fileutils'
+          
+          @a_mp3configurationfilename = "rwdwmpd-" + RwdMpdVersion + ".cnf" 
+         
+	      
+        begin # exception trapped block
+       
+       Dir.chdir($progdir)
+	      fileName = File.join(ConfigurationDir,  @a_mp3configurationfilename)
+        
+	      fd = File.open(fileName,"r")
+	      @a_mp3configline1=        fd.read
+
+        fd.close
+        rescue SystemCallError, StandardError
+            $stderr.print "system call error: " + $!
+        end # exception rescue
+
+  end

data/code/superant.com.rwdmp3/loadconfigurationvariables.rb

@@ -0,0 +1,13 @@
+   # this method loads the on screen variables into the running class
+   def loadmpdconfigurationvariables
+
+           tmpfilename = "rwdwmpd-" + RwdMpdVersion + ".cnf"
+           configfiletoload = File.join(ConfigurationDir, tmpfilename )
+        begin
+          load configfiletoload
+        rescue
+            if $DEBUG
+                $stderr.puts "config loading error"
+           end
+      end
+  end

data/code/superant.com.rwdmp3/loadplaylistrecord.rb

@@ -0,0 +1,19 @@
+   # this method puts the playlist record on the screen
+  def loadrwdmpdplaylistrecord
+	     require 'fileutils'
+	     
+
+        begin # exception trapped block
+       
+       Dir.chdir($progdir)
+	      fileName = File.join($rwdmpdplaylist_directory,  @a_playlistfinename.to_s.strip)
+        
+	      fd = File.open(fileName,"r")
+	      @rwdmpdplaylistcontents =        fd.read
+
+        fd.close
+        rescue SystemCallError, StandardError
+            $stderr.print "system call error: " + $!
+        end # exception rescue
+
+  end

data/code/superant.com.rwdmp3/mpd_client.rb

@@ -0,0 +1,41 @@
+#
+
+def runmpdcommand
+	
+require 'lib/librmpd'
+require 'thread'
+
+		mpd = MPD.new
+		mpd.connect
+		
+	temparray = @a_mpdcommand.to_s.split('|') 
+   case 	temparray.length
+	   when 1
+	commandtext = @a_mpdcommand.to_s
+	temparrayresult =  mpd.send(commandtext.intern)
+	when 2
+           commandtext =temparray[0]
+           temparrayresult =  mpd.send(commandtext.intern,temparray[1] )
+	   
+        end
+
+mpd.disconnect
+   tmpresult = ""
+   @mpdcommandresult = temparrayresult 
+   begin
+   temparrayresult.each {|x|
+   tmpresult = tmpresult + "\n#{x}"
+                                       }
+        @mpdcommandresult =     tmpresult
+   rescue
+   @mpdcommandresult = temparrayresult 
+   if $DEBUG
+	   $stderr.puts "error mpd_client.rb"
+   end
+   end
+
+end
+
+
+
+

data/code/superant.com.rwdmp3/mpd_seek.rb

@@ -0,0 +1,23 @@
+#
+def runmpdseekcommand
+commandtext = @a_mpdseekcommandinput.to_s
+
+   @mpdseekcommandresult = controlmpd(commandtext , @a_mpdseekname)
+
+@lastmpdseekcommand = commandtext
+# Close the socket after use
+
+end
+
+
+def showmpdseekcommandoptions
+ @mpdseekcommandoptions = ["playlists",'load','search_artist','seekid','albums','files',"next","pause","play","prev","stop","stats","status" ].rwd_options
+ end
+
+def mpdprevbutton
+@mpdseekcommandresult = controlmpd('prev', "")
+end
+
+def mpdnextbutton
+	@mpdseekcommandresult = controlmpd('next', "")
+	end

data/code/superant.com.rwdmp3/openhelpwindowrwdmp3.rb

@@ -0,0 +1,25 @@
+# this code is to call the help window
+def runhelpwindowrwdmp3
+
+     $help_topic = "rwdmpd_generalhelp"
+   if @rwd_tab == "rwdmpd2"
+     $help_topic = "rwdmpd_help"
+   end
+   if @rwd_tab == "rwdmpd3"
+	   $help_topic = "mpdcommand_help"
+   end 
+  if  @rwd_tab == "superantcomeditplaylistfile"
+	   $help_topic = "mpdplaylist_help"
+  end
+   $helptopicsarray =  $helptopicsarray | ["rwdmpd_generalhelp","rwdmpd_help","mpdplaylist_help"]
+  
+   
+  
+ if @rwd_window != "rwdtinkerhelpwindow"
+       $previouswindow = @rwd_window
+      $previoustab = @rwd_tab
+  end
+  runhelpwindow
+end
+
+

data/code/superant.com.rwdmp3/runrwdmpdwindow.rb

@@ -0,0 +1,10 @@
+# Application RwdAddresses orginally (c) 2004 Steven Gibson under GPL. 
+# This application is a contact book
+# For more information about  see http://www.rubyforge.net/projects/rwdapplications
+  
+  # call the window  
+  def runrwdmpdwindow
+   @rwd_window = "rwdmpdwindow"
+   @rwd_tab = "rwdmpd2"
+   end   
+   

data/code/superant.com.rwdmp3/rwdtinkerversion.rb

@@ -0,0 +1,10 @@
+# Application RwdTinker orginally (c) 2004 Steven Gibson under GPL. 
+# This application is a framework for writing programs from RubyWebDialogs
+# For  information see http://www.rubyforge.net/projects/rwdapplications
+
+# return the version constant defined in the config file
+def rwdmpdhelpaboutsetup
+return ["RwdMpd","(c) 2005-2008 Steven Gibson ","Version #{RwdMpdVersion}"]
+end
+
+

data/code/superant.com.rwdmp3/saveconfigurationrecord.rb

@@ -0,0 +1,19 @@
+  # this method adds a new address record
+  def saverwdmp3configuration
+   require 'fileutils'
+               @a_mp3configurationfilename = "rwdwmpd-" + RwdMpdVersion + ".cnf" 
+
+   if @a_mp3configurationfilename
+   newname = "%s" %   [@a_mp3configurationfilename] # grab the filename to create
+   newdata =@a_mp3configline1.to_s 	 
+        begin # exception trapped block
+          fileName = File.join( ConfigurationDir, newname )
+        	fd = File.open(fileName,"w")
+	        fd.print(newdata) # save the record info to the file
+	        fd.close
+          @newmp3configurationresult=newdata # show the record info in the browser
+        rescue SystemCallError, StandardError
+            $stderr.print "system call error: " + $!
+        end # exception rescue
+    end
+  end

data/code/superant.com.rwdmp3/saveplaylistrecord.rb

@@ -0,0 +1,18 @@
+  # this method saves a record
+  def saverwdmp3playlist
+   require 'fileutils'
+         
+   
+   newname = @a_playlistfinename.to_s.strip # grab the filename to create
+   newdata = @rwdmpdplaylistcontents.to_s 	 
+        begin # exception trapped block
+          fileName = File.join( $rwdmpdplaylist_directory , newname )
+        	fd = File.open(fileName,"w")
+	        fd.print(newdata) # save the record info to the file
+	        fd.close
+          
+        rescue SystemCallError, StandardError
+            $stderr.print "system call error: " + $!
+        end # exception rescue
+    
+  end

data/code/superant.com.rwdmp3/startmp3server.rb

@@ -0,0 +1,16 @@
+ 
+ 
+ def startmp3server
+      
+    begin      # begin rescue monitored block	
+
+     command_file_path = File.join( $extras_directory, 'mp3controld' )   
+     
+     @showrwdmp3result = IO::popen("ruby  #{command_file_path}",'r+') 
+        
+   rescue # process exeption
+     @showrwdmp3result = "\n" + "error in eval"
+   end # end of rescue process  # of rescure monitored block        
+
+  end
+