opal 0.0.1 → 0.1.0

data/lib/opal/opal/repl.rb

@@ -0,0 +1,38 @@
+# 
+# repl.rb
+# vienna
+# 
+# Created by Adam Beynon.
+# Copyright 2010 Adam Beynon.
+#
+# Permission is hereby granted, free of charge, to any person obtaining a copy
+# of this software and associated documentation files (the "Software"), to deal
+# in the Software without restriction, including without limitation the rights
+# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+# copies of the Software, and to permit persons to whom the Software is
+# furnished to do so, subject to the following conditions:
+# 
+# The above copyright notice and this permission notice shall be included in
+# all copies or substantial portions of the Software.
+# 
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+# THE SOFTWARE.
+#
+
+module Opal
+  
+  
+  
+  class REPL
+    
+
+    
+    
+    
+  end
+end

data/lib/opal/opalfile/dsl.rb

@@ -0,0 +1,62 @@
+# 
+# dsl.rb
+# vienna
+# 
+# Created by Adam Beynon.
+# Copyright 2010 Adam Beynon.
+#
+# Permission is hereby granted, free of charge, to any person obtaining a copy
+# of this software and associated documentation files (the "Software"), to deal
+# in the Software without restriction, including without limitation the rights
+# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+# copies of the Software, and to permit persons to whom the Software is
+# furnished to do so, subject to the following conditions:
+# 
+# The above copyright notice and this permission notice shall be included in
+# all copies or substantial portions of the Software.
+# 
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+# THE SOFTWARE.
+#
+
+module Vienna
+  
+  class Opalfile
+    
+    # enter the new mode (:debug, :all, :spec, :release, etc.)
+    def mode(mode_name, &block)
+      @current_mode = mode_name
+      # make sure our global env has this mode
+      self.class.env[mode_name] ||= Hash.new
+      # configure all configs within
+      instance_eval(&block)
+      # always go back to :all when outside a mode - modes cannot be nested
+      @current_mode = :all
+    end
+    
+    def config(config_name, opts={})
+      # ensure we have a configuration setting for config_name in current mode
+      self.class.env[@current_mode][config_name] ||= Hash.new
+      # merge in new options with already existing options
+      self.class.env[@current_mode][config_name].merge! opts
+    end
+    
+    def desc(description)
+      @last_desc = description
+    end
+    
+    def task(task_name, &block)
+      define_task task_name, &block
+    end
+    
+    def namespace(name=nil, &block)
+      define_namespace(name, &block)
+    end
+    
+  end
+end

data/lib/opal/opalfile/opalfile.rb

@@ -0,0 +1,133 @@
+# 
+# opalfile.rb
+# vienna
+# 
+# Created by Adam Beynon.
+# Copyright 2010 Adam Beynon.
+#
+# Permission is hereby granted, free of charge, to any person obtaining a copy
+# of this software and associated documentation files (the "Software"), to deal
+# in the Software without restriction, including without limitation the rights
+# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+# copies of the Software, and to permit persons to whom the Software is
+# furnished to do so, subject to the following conditions:
+# 
+# The above copyright notice and this permission notice shall be included in
+# all copies or substantial portions of the Software.
+# 
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+# THE SOFTWARE.
+#
+
+module Vienna
+  
+  class Opalfile
+    
+    @root_opalfile = nil
+    
+    attr_reader :tasks
+    
+    # array of TaskScope instances
+    attr_reader :task_scope_stack
+    
+    attr_reader :opalfile_path
+    
+    # Access the global modes and configs
+    def self.env
+      @opalfile_env ||= {:all => {}}
+    end
+    
+    # Access the global mode/config
+    def self.config_for(mode, config)
+      res = {}
+      # First: merge in all configs that apply to all modes
+      if env.has_key?(:all) and env[:all].has_key?(:all)
+        res.merge!(env[:all][:all]) 
+      end
+      # Second: merge in all configs that apply to current mode
+      if env.has_key?(mode) and env[mode].has_key?(:all)
+        res.merge!(env[mode][:all])
+      end
+      # Third: merge in target configs that apply to all modes
+      if env.has_key?(:all) and env[:all].has_key?(config)
+        res.merge!(env[:all][config])
+      end
+      # Forth: merge in target configs that apply to current mode
+      if env.has_key?(mode) and env[mode].has_key?(config)
+        res.merge!(env[mode][config])
+      end
+      # return our full config
+      res
+    end
+    
+    # set the root opalfile
+    def self.root_opalfile=(path_to_root)
+      @root_opalfile = new(path_to_root)
+    end
+    
+    def self.root_opalfile
+      @root_opalfile
+    end
+    
+    
+    def initialize(root)
+      @opalfile_path = root
+      # default mode is :all
+      @current_mode = :all
+      @configs = {}
+      @namespace_scope = []
+      # stack of TaskScope instanced for instance_evaling context
+      @task_scope_stack = []
+      @tasks = {}
+      
+      # firstly copy tasks etc from root, if it exists?
+      root_opalfile = self.class.root_opalfile
+      # merge unless root_opalfile.nil?
+      @tasks = root_opalfile.tasks.dup unless root_opalfile.nil?
+      
+      instance_eval File.read(root) if File.exist? root
+
+    end
+    
+    def has_task?(task_name)
+      @tasks.has_key?(task_name)
+    end
+    
+    # force invoke the given task name with the given options
+    def invoke(task_name, options={})
+      # puts "need to invoke #{task_name}"
+      @task_scope_stack << (ctx = Vienna::TaskScope.new)
+      ctx.task_variables = options
+      ctx.opalfile = self
+      @tasks[task_name].invoke(ctx)
+      @task_scope_stack.pop
+    end
+    
+    # find task name with scope
+    def [](name, scope=nil)
+      task_name = name.to_s
+      if scope
+        task_name = scope + ":" + task_name
+      end
+      if @tasks[task_name]
+        return @tasks[task_name]
+      end
+      task_name = name.to_s
+      @tasks[task_name] or raise "Don't know how to build task #{name}"
+    end
+    
+    def config_for(config_name)
+      config = {}
+      config_name = config_name.to_sym
+      config.merge!(@configs[:all]) if @configs.has_key? :all
+      config.merge!(@configs[config_name]) if @configs.has_key? config_name
+      config
+    end
+
+  end
+end

data/lib/opal/opalfile/task.rb

@@ -0,0 +1,96 @@
+# 
+# task.rb
+# vienna
+# 
+# Created by Adam Beynon.
+# Copyright 2010 Adam Beynon.
+#
+# Permission is hereby granted, free of charge, to any person obtaining a copy
+# of this software and associated documentation files (the "Software"), to deal
+# in the Software without restriction, including without limitation the rights
+# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+# copies of the Software, and to permit persons to whom the Software is
+# furnished to do so, subject to the following conditions:
+# 
+# The above copyright notice and this permission notice shall be included in
+# all copies or substantial portions of the Software.
+# 
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+# THE SOFTWARE.
+#
+
+module Vienna
+  
+  class Opalfile::Task
+    
+    # action for task
+    attr_accessor :action, :prerequisites
+    
+    def initialize(task_name, opalfile)
+      @task_name = task_name
+      @prerequisites = []
+      @opalfile = opalfile
+      @action = nil
+      @description = nil
+      @scope = opalfile.current_scope
+      @invoke_count = 0
+    end
+    
+    def invoke_with_call_array(invocation_array, task_scope_instance)
+      # puts "invoking #{@task_name}"
+      @task_scope = task_scope_instance
+      # puts "\n##### #@task_name #{self}\n"
+      unless invocation_array.include? @task_name
+        # puts "||||| #{@task_name} actually running"
+        invocation_array << @task_name
+        
+        invocation_array = invoke_prerequisites invocation_array
+        @invoke_count += 1
+        execute(task_scope_instance)
+      
+      else
+        # puts "!!!!! #@task_name already run this task"
+      end
+      # puts "~~~~~ Finished #@task_name\n\n"
+      invocation_array
+    end
+    
+    def invoke(task_scope_instance)
+      invoke_with_call_array [], task_scope_instance
+    end
+    
+    def invoke_prerequisites(invocation_array)
+      @prerequisites.each do |pre|
+        
+        ctx = Vienna::TaskScope.new
+        ctx.opalfile = @task_scope.opalfile
+        ctx.task_variables = @task_scope.task_variables
+        
+        task = @task_scope.opalfile[pre, @scope]
+        
+        @opalfile.task_scope_stack << ctx
+        
+        invocation_array = task.invoke_with_call_array(invocation_array, ctx)
+      end
+      invocation_array
+    end
+    
+    def execute(task_scope_instance)
+      if @action
+        task_scope_instance.instance_eval(&@action)
+      else
+        # puts "no action to run."
+      end
+    end
+    
+    def to_s
+      "#<Task name=#@task_name, scope=#@scope prereq=#{@prerequisites.inspect}>"
+    end
+    
+  end
+end

data/lib/opal/opalfile/task_manager.rb

@@ -0,0 +1,63 @@
+# 
+# task_manager.rb
+# vienna
+# 
+# Created by Adam Beynon.
+# Copyright 2010 Adam Beynon.
+#
+# Permission is hereby granted, free of charge, to any person obtaining a copy
+# of this software and associated documentation files (the "Software"), to deal
+# in the Software without restriction, including without limitation the rights
+# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+# copies of the Software, and to permit persons to whom the Software is
+# furnished to do so, subject to the following conditions:
+# 
+# The above copyright notice and this permission notice shall be included in
+# all copies or substantial portions of the Software.
+# 
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+# THE SOFTWARE.
+#
+
+module Vienna
+  
+  class Opalfile
+    
+    def define_task task_name, &block
+      if task_name.is_a? Hash
+        name = task_name.keys.first
+        dep = task_name[name]
+      else
+        name = task_name
+        dep = []
+      end
+      
+      full_name = @namespace_scope.dup.push(name) * ":"
+      
+      # musrt assign new task to avoid overriding task meaning in other 
+      # opalfiles
+      task = (@tasks[full_name] = Task.new full_name, self)
+      task.action = block
+      task.prerequisites = dep
+      
+      @last_desc = nil
+    end
+    
+    def current_scope
+      @namespace_scope * ":"
+    end
+    
+    def define_namespace(name)
+      # puts "in new namespace #{name}"
+      @namespace_scope.push name
+      yield
+      @namespace_scope.pop
+    end
+    
+  end
+end

data/lib/opal/opalfile/task_scope.rb

@@ -0,0 +1,52 @@
+# 
+# task_scope.rb
+# vienna
+# 
+# Created by Adam Beynon.
+# Copyright 2010 Adam Beynon.
+#
+# Permission is hereby granted, free of charge, to any person obtaining a copy
+# of this software and associated documentation files (the "Software"), to deal
+# in the Software without restriction, including without limitation the rights
+# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+# copies of the Software, and to permit persons to whom the Software is
+# furnished to do so, subject to the following conditions:
+# 
+# The above copyright notice and this permission notice shall be included in
+# all copies or substantial portions of the Software.
+# 
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+# THE SOFTWARE.
+#
+
+module Vienna
+  
+  # When we call each task, we instance_eval it into a scope so we can set
+  # various constants on that scope without effecing anything else....
+  # TaskScope is that context
+  class TaskScope
+    
+    # access the task variables: hash of names => values
+    attr_reader :task_variables
+    
+    # to maintain the righe opalfile for the current scope. The Task's actual
+    # opalfile might have some taks soverridden, so we cannot rely on using that
+    # opalfile to get prerequirement tasks. This task scope keeps us in the 
+    # correct scope.
+    attr_accessor :opalfile
+    
+    # custom setter. Actually set all variables in scope also
+    def task_variables=(task_variables)
+      @task_variables = task_variables
+      
+      task_variables.each do |key, value|
+        instance_variable_set "@#{key}", value
+      end
+    end
+  end
+end