sup 0.8.1 → 0.9

data/lib/sup/hook.rb

@@ -1,33 +1,11 @@
 module Redwood
 
 class HookManager
-  ## there's probably a better way to do this, but to evaluate a hook
-  ## with a bunch of pre-set "local variables" i define a function
-  ## per variable and then instance_evaluate the code.
-  ##
-  ## how does rails do it, when you pass :locals into a partial?
-  ##
-  ## i don't bother providing setters, since i'm pretty sure the
-  ## charade will fall apart pretty quickly with respect to scoping.
-  ## "fail-fast", we'll call it.
   class HookContext
     def initialize name
       @__say_id = nil
       @__name = name
-      @__locals = {}
-    end
-
-    attr_writer :__locals
-
-    def method_missing m, *a
-      case @__locals[m]
-      when Proc
-        @__locals[m] = @__locals[m].call(*a) # only call the proc once
-      when nil
-        super
-      else
-        @__locals[m]
-      end
+      @__cache = {}
     end
 
     def say s
@@ -40,7 +18,7 @@ class HookManager
     end
 
     def log s
-      Redwood::log "hook[#@__name]: #{s}"
+      info "hook[#@__name]: #{s}"
     end
 
     def ask_yes_or_no q
@@ -60,12 +38,24 @@ class HookManager
       HookManager.tags[tag] = value
     end
 
-    def __binding 
-      binding
-    end
-
-    def __cleanup
+    def __run __hook, __filename, __locals
+      __binding = binding
+      __lprocs, __lvars = __locals.partition { |k, v| v.is_a?(Proc) }
+      eval __lvars.map { |k, v| "#{k} = __locals[#{k.inspect}];" }.join, __binding
+      ## we also support closures for delays evaluation. unfortunately
+      ## we have to do this via method calls, so you don't get all the
+      ## semantics of a regular variable. not ideal.
+      __lprocs.each do |k, v|
+        self.class.instance_eval do
+          define_method k do
+            @__cache[k] ||= v.call
+          end
+        end
+      end
+      ret = eval __hook, __binding, __filename
       BufferManager.clear @__say_id if @__say_id
+      @__cache = {}
+      ret
     end
   end
 
@@ -79,8 +69,6 @@ class HookManager
     @tags = {}
 
     Dir.mkdir dir unless File.exists? dir
-
-    self.class.i_am_the_instance self
   end
 
   attr_reader :tags
@@ -88,18 +76,16 @@ class HookManager
   def run name, locals={}
     hook = hook_for(name) or return
     context = @contexts[hook] ||= HookContext.new(name)
-    context.__locals = locals
 
     result = nil
     begin
-      result = context.instance_eval @hooks[name], fn_for(name)
+      result = context.__run hook, fn_for(name), locals
     rescue Exception => e
       log "error running hook: #{e.message}"
       log e.backtrace.join("\n")
       @hooks[name] = nil # disable it
       BufferManager.flash "Error running hook: #{e.message}" if BufferManager.instantiated?
     end
-    context.__cleanup
     result
   end
 
@@ -125,19 +111,20 @@ EOS
 
   def enabled? name; !hook_for(name).nil? end
 
+  def clear; @hooks.clear; end
+
 private
 
   def hook_for name
     unless @hooks.member? name
-      @hooks[name] =
-        begin
-          returning IO.read(fn_for(name)) do
-            log "read '#{name}' from #{fn_for(name)}"
-          end
-        rescue SystemCallError => e
-          #log "disabled hook for '#{name}': #{e.message}"
-          nil
+      @hooks[name] = begin
+        returning IO.read(fn_for(name)) do
+          debug "read '#{name}' from #{fn_for(name)}"
         end
+      rescue SystemCallError => e
+        #debug "disabled hook for '#{name}': #{e.message}"
+        nil
+      end
     end
 
     @hooks[name]
@@ -148,7 +135,7 @@ private
   end
 
   def log m
-    Redwood::log("hook: " + m)
+    info("hook: " + m)
   end
 end
 

data/lib/sup/hook.rb.BACKUP.8625.rb

@@ -0,0 +1,158 @@
+module Redwood
+
+class HookManager
+  class HookContext
+    def initialize name
+      @__say_id = nil
+      @__name = name
+<<<<<<< HEAD:lib/sup/hook.rb
+      @__cache = {}
+=======
+      @__locals = {}
+    end
+
+    attr_writer :__locals
+    def method_missing m, *a
+      case @__locals[m]
+      when Proc
+        @__locals[m] = @__locals[m].call(*a) # only call the proc once
+      when nil
+        super
+      else
+        @__locals[m]
+      end
+>>>>>>> custom-search-hook:lib/sup/hook.rb
+    end
+
+    def say s
+      if BufferManager.instantiated?
+        @__say_id = BufferManager.say s, @__say_id
+        BufferManager.draw_screen
+      else
+        log s
+      end
+    end
+
+    def log s
+      info "hook[#@__name]: #{s}"
+    end
+
+    def ask_yes_or_no q
+      if BufferManager.instantiated?
+        BufferManager.ask_yes_or_no q
+      else
+        print q
+        gets.chomp.downcase == 'y'
+      end
+    end
+
+    def get tag
+      HookManager.tags[tag]
+    end
+
+    def set tag, value
+      HookManager.tags[tag] = value
+    end
+
+    def __run __hook, __filename, __locals
+      __binding = binding
+      __lprocs, __lvars = __locals.partition { |k, v| v.is_a?(Proc) }
+      eval __lvars.map { |k, v| "#{k} = __locals[#{k.inspect}];" }.join, __binding
+      ## we also support closures for delays evaluation. unfortunately
+      ## we have to do this via method calls, so you don't get all the
+      ## semantics of a regular variable. not ideal.
+      __lprocs.each do |k, v|
+        self.class.instance_eval do
+          define_method k do
+            @__cache[k] ||= v.call
+          end
+        end
+      end
+      ret = eval __hook, __binding, __filename
+      BufferManager.clear @__say_id if @__say_id
+      @__cache = {}
+      ret
+    end
+  end
+
+  include Singleton
+
+  def initialize dir
+    @dir = dir
+    @hooks = {}
+    @descs = {}
+    @contexts = {}
+    @tags = {}
+
+    Dir.mkdir dir unless File.exists? dir
+  end
+
+  attr_reader :tags
+
+  def run name, locals={}
+    hook = hook_for(name) or return
+    context = @contexts[hook] ||= HookContext.new(name)
+
+    result = nil
+    begin
+      result = context.__run hook, fn_for(name), locals
+    rescue Exception => e
+      log "error running hook: #{e.message}"
+      log e.backtrace.join("\n")
+      @hooks[name] = nil # disable it
+      BufferManager.flash "Error running hook: #{e.message}" if BufferManager.instantiated?
+    end
+    result
+  end
+
+  def register name, desc
+    @descs[name] = desc
+  end
+
+  def print_hooks f=$stdout
+puts <<EOS
+Have #{@descs.size} registered hooks:
+
+EOS
+
+    @descs.sort.each do |name, desc|
+      f.puts <<EOS
+#{name}
+#{"-" * name.length}
+File: #{fn_for name}
+#{desc}
+EOS
+    end
+  end
+
+  def enabled? name; !hook_for(name).nil? end
+
+  def clear; @hooks.clear; end
+
+private
+
+  def hook_for name
+    unless @hooks.member? name
+      @hooks[name] = begin
+        returning IO.read(fn_for(name)) do
+          debug "read '#{name}' from #{fn_for(name)}"
+        end
+      rescue SystemCallError => e
+        #debug "disabled hook for '#{name}': #{e.message}"
+        nil
+      end
+    end
+
+    @hooks[name]
+  end
+
+  def fn_for name
+    File.join @dir, "#{name}.rb"
+  end
+
+  def log m
+    info("hook: " + m)
+  end
+end
+
+end

data/lib/sup/hook.rb.BACKUP.8681.rb

@@ -0,0 +1,158 @@
+module Redwood
+
+class HookManager
+  class HookContext
+    def initialize name
+      @__say_id = nil
+      @__name = name
+<<<<<<< HEAD:lib/sup/hook.rb
+      @__cache = {}
+=======
+      @__locals = {}
+    end
+
+    attr_writer :__locals
+    def method_missing m, *a
+      case @__locals[m]
+      when Proc
+        @__locals[m] = @__locals[m].call(*a) # only call the proc once
+      when nil
+        super
+      else
+        @__locals[m]
+      end
+>>>>>>> custom-search-hook:lib/sup/hook.rb
+    end
+
+    def say s
+      if BufferManager.instantiated?
+        @__say_id = BufferManager.say s, @__say_id
+        BufferManager.draw_screen
+      else
+        log s
+      end
+    end
+
+    def log s
+      info "hook[#@__name]: #{s}"
+    end
+
+    def ask_yes_or_no q
+      if BufferManager.instantiated?
+        BufferManager.ask_yes_or_no q
+      else
+        print q
+        gets.chomp.downcase == 'y'
+      end
+    end
+
+    def get tag
+      HookManager.tags[tag]
+    end
+
+    def set tag, value
+      HookManager.tags[tag] = value
+    end
+
+    def __run __hook, __filename, __locals
+      __binding = binding
+      __lprocs, __lvars = __locals.partition { |k, v| v.is_a?(Proc) }
+      eval __lvars.map { |k, v| "#{k} = __locals[#{k.inspect}];" }.join, __binding
+      ## we also support closures for delays evaluation. unfortunately
+      ## we have to do this via method calls, so you don't get all the
+      ## semantics of a regular variable. not ideal.
+      __lprocs.each do |k, v|
+        self.class.instance_eval do
+          define_method k do
+            @__cache[k] ||= v.call
+          end
+        end
+      end
+      ret = eval __hook, __binding, __filename
+      BufferManager.clear @__say_id if @__say_id
+      @__cache = {}
+      ret
+    end
+  end
+
+  include Singleton
+
+  def initialize dir
+    @dir = dir
+    @hooks = {}
+    @descs = {}
+    @contexts = {}
+    @tags = {}
+
+    Dir.mkdir dir unless File.exists? dir
+  end
+
+  attr_reader :tags
+
+  def run name, locals={}
+    hook = hook_for(name) or return
+    context = @contexts[hook] ||= HookContext.new(name)
+
+    result = nil
+    begin
+      result = context.__run hook, fn_for(name), locals
+    rescue Exception => e
+      log "error running hook: #{e.message}"
+      log e.backtrace.join("\n")
+      @hooks[name] = nil # disable it
+      BufferManager.flash "Error running hook: #{e.message}" if BufferManager.instantiated?
+    end
+    result
+  end
+
+  def register name, desc
+    @descs[name] = desc
+  end
+
+  def print_hooks f=$stdout
+puts <<EOS
+Have #{@descs.size} registered hooks:
+
+EOS
+
+    @descs.sort.each do |name, desc|
+      f.puts <<EOS
+#{name}
+#{"-" * name.length}
+File: #{fn_for name}
+#{desc}
+EOS
+    end
+  end
+
+  def enabled? name; !hook_for(name).nil? end
+
+  def clear; @hooks.clear; end
+
+private
+
+  def hook_for name
+    unless @hooks.member? name
+      @hooks[name] = begin
+        returning IO.read(fn_for(name)) do
+          debug "read '#{name}' from #{fn_for(name)}"
+        end
+      rescue SystemCallError => e
+        #debug "disabled hook for '#{name}': #{e.message}"
+        nil
+      end
+    end
+
+    @hooks[name]
+  end
+
+  def fn_for name
+    File.join @dir, "#{name}.rb"
+  end
+
+  def log m
+    info("hook: " + m)
+  end
+end
+
+end