X-Git-Url: http://git.code-monkey.de/?a=blobdiff_plain;f=lib%2Fredact%2Fprogram.rb;h=a77536748aab2b036a9729dd6e33977d29acef77;hb=e6589624744430b826a27a71e3d4894516969fb3;hp=78f2ca960a3904912650ea32daa252979e99b9ad;hpb=2c25c90e2aaf57a7508a7988f58b2784d5071a7e;p=redact.git

diff --git a/lib/redact/program.rb b/lib/redact/program.rb
index 78f2ca9..a775367 100644
--- a/lib/redact/program.rb
+++ b/lib/redact/program.rb
@@ -1,5 +1,5 @@
 #--
-# $Id: program.rb 1 2005-03-26 01:32:38Z tilman $
+# $Id: program.rb 28 2005-04-14 19:53:45Z tilman $
 #
 # Copyright (c) 2005 Tilman Sauerbeck (tilman at code-monkey de)
 #
@@ -35,8 +35,8 @@ module Redact
 
 		include Comparable
 
-		attr_reader :collection, :id, :name, :after
-		attr_accessor :signal, :source, :in_from, :in_range
+		attr_reader :collection, :id, :name, :after, :signal, :source,
+		            :in_from, :in_range
 
 		def initialize(collection, id, name)
 			@collection = collection
@@ -56,6 +56,35 @@ module Redact
 			@id <=> b.id
 		end
 
+		def signal=(v)
+			@signal = v.to_str.dup
+		end
+
+		def source=(v)
+			@source = v.to_str.dup
+		end
+
+		def in_from=(v)
+			unless v.is_a?(Float)
+				raise(ArgumentError,
+				      "wrong argument type #{v.class.name} " +
+				      "(expected Float)")
+			end
+
+			@in_from = v
+		end
+
+		def in_range=(v)
+			unless v.is_a?(Float)
+				raise(ArgumentError,
+				      "wrong argument type #{v.class.name} " +
+				      "(expected Float)")
+			end
+
+			@in_range = v
+		end
+
+		protected
 		def to_eet_name
 			"Edje_Program"
 		end
@@ -73,13 +102,8 @@ module Redact
 	end
 
 	class SetStateProgram < Program
-		MODE_LINEAR = 1
-		MODE_SINUSOIDAL = 2
-		MODE_ACCELERATE = 3
-		MODE_DECELERATE = 4
-
-		attr_reader :targets
-		attr_accessor :state, :value, :mode, :time
+		attr_reader :targets, :state, :value, :time
+		attr_accessor :mode
 
 		def initialize(collection, id, name)
 			super
@@ -87,16 +111,50 @@ module Redact
 			@type = TYPE_SET_STATE
 			@state = "default"
 			@value = 0.0
-			@mode = MODE_LINEAR
+			@mode = :linear
 			@time = 0.0
 			@targets = ProgramArgs.new(collection)
 		end
 
+		def state=(v)
+			@state = v.to_str.dup
+		end
+
+		def value=(v)
+			unless v.is_a?(Float)
+				raise(ArgumentError,
+				      "wrong argument type #{v.class.name} " +
+				      "(expected Float)")
+			end
+
+			@value = v
+		end
+
+		def time=(v)
+			unless v.is_a?(Float)
+				raise(ArgumentError,
+				      "wrong argument type #{v.class.name} " +
+				      "(expected Float)")
+			end
+
+			@time = v
+		end
+
+		protected
 		def to_eet_properties
+			mode = case @mode
+			when :linear: 1
+			when :sinusoidal: 2
+			when :accelerate: 3
+			when :decelerate: 4
+			else
+				raise(RedactError, "invalid mode - #{@mode}")
+			end
+
 			super.merge!(
 			{"state" => [@state],
 			 "value" => [@value, :double],
-			 "tween.mode" => [@mode],
+			 "tween.mode" => [mode],
 			 "tween.time" => [@time, :double],
 			 "targets" => [@targets]})
 		end
@@ -110,13 +168,14 @@ module Redact
 			@targets = ProgramArgs.new(collection)
 		end
 
+		protected
 		def to_eet_properties
 			super.merge!({"targets" => [@targets]})
 		end
 	end
 
 	class EmitSignalProgram < Program
-		attr_accessor :emission_signal, :emission_source
+		attr_reader :emission_signal, :emission_source
 
 		def initialize(collection, id, name)
 			super
@@ -126,6 +185,15 @@ module Redact
 			@emission_source = nil
 		end
 
+		def emission_signal=(v)
+			@emission_signal = v.to_str.dup
+		end
+
+		def emission_source=(v)
+			@emission_source = v.to_str.dup
+		end
+
+		protected
 		def to_eet_properties
 			super.merge!(
 			{"state" => [@emission_signal],
@@ -134,7 +202,7 @@ module Redact
 	end
 
 	class ExecScriptProgram < Program
-		attr_accessor :script
+		attr_reader :script
 
 		def initialize(collection, id, name)
 			super
@@ -142,6 +210,10 @@ module Redact
 			@type = TYPE_EXEC_SCRIPT
 			@script = nil
 		end
+
+		def script=(v)
+			@script = v.to_str.dup
+		end
 	end
 
 	class ProgramArgs < Array
@@ -168,18 +240,21 @@ module Redact
 			@id = v.id
 		end
 
+		protected
 		def to_eet_properties
 			{"id" => [@id]}
 		end
 	end
 
 	class ProgramAfter < ProgramArg
+		protected
 		def to_eet_name
 			"Edje_Program_After"
 		end
 	end
 
 	class ProgramTarget < ProgramArg
+		protected
 		def to_eet_name
 			"Edje_Program_Target"
 		end