dylanvaughn-bluepill 0.0.39

data/lib/bluepill/group.rb

@@ -0,0 +1,71 @@
+module Bluepill
+  class Group
+    attr_accessor :name, :processes, :logger
+    attr_accessor :process_logger
+    
+    def initialize(name, options = {})
+      self.name = name
+      self.processes = []
+      self.logger = options[:logger]
+    end
+    
+    def add_process(process)
+      process.logger = self.logger.prefix_with(process.name)
+      self.processes << process
+    end
+    
+    def tick
+      self.processes.each do |process|
+        process.tick
+      end
+    end
+    
+    def determine_initial_state
+      self.processes.each do |process|
+        process.determine_initial_state
+      end
+    end
+
+    # proxied events
+    [:start, :unmonitor, :stop, :restart].each do |event|
+      class_eval <<-END
+        def #{event}(process_name = nil)
+          threads = []
+          affected = []
+          self.processes.each do |process|
+            next if process_name && process_name != process.name
+            affected << [self.name, process.name].join(":")
+            threads << Thread.new { process.handle_user_command("#{event}") }
+          end
+          threads.each { |t| t.join }
+          affected
+        end      
+      END
+    end
+    
+    def status(process_name = nil)
+      lines = []
+      if process_name.nil?
+        prefix = self.name ? "  " : ""
+        lines << "#{self.name}:" if self.name
+      
+        self.processes.each do |process|
+          lines << "%s%s(pid:%s): %s" % [prefix, process.name, process.actual_pid, process.state]
+          if process.monitor_children?
+            process.children.each do |child|
+              lines << "  %s%s: %s" % [prefix, child.name, child.state]
+            end
+          end
+        end
+      else
+        self.processes.each do |process|
+          next if process_name != process.name
+          lines << "%s%s(pid:%s): %s" % [prefix, process.name, process.actual_pid, process.state]
+          lines << process.statistics.to_s
+        end
+      end
+      lines << ""
+    end
+    
+  end
+end

data/lib/bluepill/logger.rb

@@ -0,0 +1,62 @@
+module Bluepill  
+  class Logger
+    LOG_METHODS = [:emerg, :alert, :crit, :err, :warning, :notice, :info, :debug]
+    
+    def initialize(options = {})
+      @options  = options
+      @logger   = options[:logger] || self.create_logger
+      @prefix   = options[:prefix]
+      @stdout   = options[:stdout]
+      @prefixes = {}
+    end
+    
+    LOG_METHODS.each do |method|
+      eval <<-END
+        def #{method}(msg, prefix = [])
+          if @logger.is_a?(self.class)
+            @logger.#{method}(msg, [@prefix] + prefix)
+          else
+            s_prefix = prefix.size > 0 ? "[\#{prefix.compact.join(':')}] " : ""
+            if @stdout
+              $stdout.puts("[#{method}]: \#{s_prefix}\#{msg}")
+              $stdout.flush
+            end
+            @logger.#{method}("\#{s_prefix}\#{msg}")
+          end
+        end
+      END
+    end
+    
+    def prefix_with(prefix)
+      @prefixes[prefix] ||= self.class.new(:logger => self, :prefix => prefix)
+    end
+    
+    def reopen
+      if @logger.is_a?(self.class)
+        @logger.reopen
+      else
+        @logger = create_logger
+      end
+    end
+    
+    protected
+    def create_logger
+      if @options[:log_file]
+        LoggerAdapter.new(@options[:log_file])
+      else
+        Syslog.close if Syslog.opened? # need to explictly close it before reopening it
+        Syslog.open(@options[:identity] || 'bluepilld', Syslog::LOG_PID, Syslog::LOG_LOCAL6)
+      end
+    end
+
+    class LoggerAdapter < ::Logger
+      LOGGER_EQUIVALENTS = 
+        {:debug => :debug, :err => :error, :warning => :warn, :info => :info, :emerg => :fatal, :alert => :warn, :crit => :fatal, :notice => :info}
+      
+      LOG_METHODS.each do |method|
+        next if method == LOGGER_EQUIVALENTS[method]
+        alias_method method, LOGGER_EQUIVALENTS[method]
+      end
+    end 
+  end
+end

data/lib/bluepill/process.rb

@@ -0,0 +1,419 @@
+require "state_machine"
+require "daemons"
+
+module Bluepill
+  class Process
+    CONFIGURABLE_ATTRIBUTES = [
+      :start_command, 
+      :stop_command, 
+      :restart_command, 
+      
+      :stdout,
+      :stderr,
+      :stdin,
+      
+      :daemonize, 
+      :pid_file, 
+      :working_dir,
+      :environment,
+      
+      :start_grace_time, 
+      :stop_grace_time, 
+      :restart_grace_time,
+      
+      :start_wait_time, 
+      :stop_wait_time, 
+      :restart_wait_time,
+      
+      :uid,
+      :gid,
+      
+      :monitor_children,
+      :child_process_template
+    ]
+    
+    attr_accessor :name, :watches, :triggers, :logger, :skip_ticks_until
+    attr_accessor *CONFIGURABLE_ATTRIBUTES
+    attr_reader :children, :statistics
+    
+    state_machine :initial => :unmonitored do
+      # These are the idle states, i.e. only an event (either external or internal) will trigger a transition.
+      # The distinction between down and unmonitored is that down
+      # means we know it is not running and unmonitored is that we don't care if it's running.
+      state :unmonitored, :up, :down
+
+      # These are transitionary states, we expect the process to change state after a certain period of time.
+      state :starting, :stopping, :restarting
+
+      event :tick do
+        transition :starting => :up, :if => :process_running?
+        transition :starting => :down, :unless => :process_running?
+
+        transition :up => :up, :if => :process_running?
+        transition :up => :down, :unless => :process_running?
+        
+        # The process failed to die after entering the stopping state. Change the state to reflect
+        # reality.
+        transition :stopping => :up, :if => :process_running? 
+        transition :stopping => :down, :unless => :process_running?
+        
+        transition :down => :up, :if => :process_running?
+        transition :down => :starting, :unless => :process_running?
+        
+        transition :restarting => :up, :if => :process_running?
+        transition :restarting => :down, :unless => :process_running?
+      end
+
+      event :start do
+        transition [:unmonitored, :down] => :starting
+      end
+
+      event :stop do
+        transition :up => :stopping
+      end
+
+      event :unmonitor do
+        transition any => :unmonitored
+      end
+
+      event :restart do
+        transition [:up, :down] => :restarting
+      end
+
+      before_transition any => any, :do => :notify_triggers
+
+      after_transition any => :starting, :do => :start_process
+      after_transition any => :stopping, :do => :stop_process
+      after_transition any => :restarting, :do => :restart_process
+
+      after_transition any => any, :do => :record_transition
+    end
+    
+    def initialize(process_name, options = {})      
+      @name = process_name
+      @event_mutex = Monitor.new
+      @transition_history = Util::RotationalArray.new(10)
+      @watches = []
+      @triggers = []
+      @children = []
+      @statistics = ProcessStatistics.new
+      
+      # These defaults are overriden below if it's configured to be something else.
+      @monitor_children =  false
+      @start_grace_time = @stop_grace_time = @restart_grace_time = 3
+      @start_wait_time = @stop_wait_time = @restart_wait_time = 3
+      @environment = {}
+      
+      CONFIGURABLE_ATTRIBUTES.each do |attribute_name|
+        self.send("#{attribute_name}=", options[attribute_name]) if options.has_key?(attribute_name)
+      end
+            
+      # Let state_machine do its initialization stuff
+      super() # no arguments intentional
+    end
+
+    def tick
+      return if self.skipping_ticks?
+      self.skip_ticks_until = nil
+
+      # clear the memoization per tick
+      @process_running = nil
+
+      # run state machine transitions
+      super
+
+      if self.up?
+        self.run_watches
+        
+        if self.monitor_children?
+          refresh_children!
+          children.each {|child| child.tick}
+        end
+      end
+    end
+    
+    def logger=(logger)
+      @logger = logger
+      self.watches.each {|w| w.logger = logger }
+      self.triggers.each {|t| t.logger = logger }
+    end
+    
+    # State machine methods
+    def dispatch!(event, reason = nil)
+      @event_mutex.synchronize do
+        @statistics.record_event(event, reason)
+        self.send("#{event}")
+      end
+    end
+    
+    def record_transition(transition)
+      unless transition.loopback?
+        @transitioned = true
+        
+        # When a process changes state, we should clear the memory of all the watches
+        self.watches.each { |w| w.clear_history! }
+        
+        # Also, when a process changes state, we should re-populate its child list
+        if self.monitor_children?
+          self.logger.warning "Clearing child list"
+          self.children.clear
+        end
+        logger.info "Going from #{transition.from_name} => #{transition.to_name}"
+      end
+    end
+    
+    def notify_triggers(transition)
+      self.triggers.each {|trigger| trigger.notify(transition)}
+    end
+    
+    # Watch related methods
+    def add_watch(name, options = {})
+      self.watches << ConditionWatch.new(name, options.merge(:logger => self.logger))
+    end
+    
+    def add_trigger(name, options = {})
+      self.triggers << Trigger[name].new(self, options.merge(:logger => self.logger))
+    end
+
+    def run_watches
+      now = Time.now.to_i
+
+      threads = self.watches.collect do |watch|
+        [watch, Thread.new { Thread.current[:events] = watch.run(self.actual_pid, now) }]
+      end
+      
+      @transitioned = false
+      
+      threads.inject([]) do |events, (watch, thread)|
+        thread.join
+        if thread[:events].size > 0
+          logger.info "#{watch.name} dispatched: #{thread[:events].join(',')}"
+          thread[:events].each do |event|
+            events << [event, watch.to_s]
+          end
+        end
+        events
+      end.each do |(event, reason)|
+        break if @transitioned
+        self.dispatch!(event, reason)
+      end
+    end
+    
+    def determine_initial_state
+      if self.process_running?(true)
+        self.state = 'up'
+      else
+        # TODO: or "unmonitored" if bluepill was started in no auto-start mode.
+        self.state = 'down'
+      end
+    end
+    
+    def handle_user_command(cmd)
+      case cmd
+      when "start"
+        if self.process_running?(true)
+          logger.warning("Refusing to re-run start command on an already running process.")
+        else
+          dispatch!(:start, "user initiated")
+        end
+      when "stop"
+        stop_process
+        dispatch!(:unmonitor, "user initiated")
+      when "restart"
+        restart_process
+      when "unmonitor"
+        # When the user issues an unmonitor cmd, reset any triggers so that
+        # scheduled events gets cleared
+        triggers.each {|t| t.reset! }
+        dispatch!(:unmonitor, "user initiated")
+      end
+    end
+    
+    # System Process Methods
+    def process_running?(force = false)
+      @process_running = nil if force # clear existing state if forced
+      
+      @process_running ||= signal_process(0)
+      # the process isn't running, so we should clear the PID
+      self.clear_pid unless @process_running
+      @process_running
+    end
+    
+    def start_process
+      logger.warning "Executing start command: #{start_command}"
+      
+      if self.daemonize?
+        System.daemonize(start_command, self.system_command_options)
+        
+      else
+        # This is a self-daemonizing process
+        with_timeout(start_wait_time) do
+          result = System.execute_blocking(start_command, self.system_command_options)
+          
+          unless result[:exit_code].zero?
+            logger.warning "Start command execution returned non-zero exit code:"
+            logger.warning result.inspect
+          end          
+        end
+      end
+            
+      self.skip_ticks_for(start_grace_time)
+    end
+    
+    def stop_process      
+      if stop_command
+        cmd = self.prepare_command(stop_command)
+        logger.warning "Executing stop command: #{cmd}"
+        
+        with_timeout(stop_wait_time) do
+          result = System.execute_blocking(cmd, self.system_command_options)
+          
+          unless result[:exit_code].zero?
+            logger.warning "Stop command execution returned non-zero exit code:"
+            logger.warning result.inspect
+          end
+        end
+                
+      else
+        logger.warning "Executing default stop command. Sending TERM signal to #{actual_pid}"
+        signal_process("TERM")
+      end
+      self.unlink_pid # TODO: we only write the pid file if we daemonize, should we only unlink it if we daemonize?
+      
+      self.skip_ticks_for(stop_grace_time)
+    end
+    
+    def restart_process
+      if restart_command
+        cmd = self.prepare_command(restart_command)
+        
+        logger.warning "Executing restart command: #{cmd}"
+        
+        with_timeout(restart_wait_time) do
+          result = System.execute_blocking(cmd, self.system_command_options)
+
+          unless result[:exit_code].zero?
+            logger.warning "Restart command execution returned non-zero exit code:"
+            logger.warning result.inspect
+          end
+        end
+        
+        self.skip_ticks_for(restart_grace_time)
+      else
+        logger.warning "No restart_command specified. Must stop and start to restart"
+        self.stop_process
+        # the tick will bring it back.
+      end
+    end
+    
+    def daemonize?
+      !!self.daemonize
+    end
+    
+    def monitor_children?
+      !!self.monitor_children
+    end
+    
+    def signal_process(code)
+      ::Process.kill(code, actual_pid)
+      true
+    rescue
+      false
+    end
+    
+    def actual_pid
+      @actual_pid ||= begin
+        if pid_file
+          if File.exists?(pid_file)
+            str = File.read(pid_file)
+            str.to_i if str.size > 0
+          else
+            logger.warning("pid_file #{pid_file} does not exist or cannot be read")
+            nil
+          end
+        end
+      end
+    end
+    
+    def actual_pid=(pid)
+      @actual_pid = pid
+    end
+    
+    def clear_pid
+      @actual_pid = nil
+    end
+    
+    def unlink_pid
+      File.unlink(pid_file) if pid_file && File.exists?(pid_file)
+    end
+    
+     # Internal State Methods
+    def skip_ticks_for(seconds)
+      # TODO: should this be addative or longest wins?
+      #       i.e. if two calls for skip_ticks_for come in for 5 and 10, should it skip for 10 or 15?
+      self.skip_ticks_until = (self.skip_ticks_until || Time.now.to_i) + seconds.to_i
+    end
+       
+    def skipping_ticks?
+      self.skip_ticks_until && self.skip_ticks_until > Time.now.to_i
+    end
+    
+    def refresh_children!
+      # First prune the list of dead children
+      @children.delete_if {|child| !child.process_running?(true) }
+      
+      # Add new found children to the list
+      new_children_pids = System.get_children(self.actual_pid) - @children.map {|child| child.actual_pid}
+ 
+      unless new_children_pids.empty?
+        logger.info "Existing children: #{@children.collect{|c| c.actual_pid}.join(",")}. Got new children: #{new_children_pids.inspect} for #{actual_pid}"
+      end
+      
+      # Construct a new process wrapper for each new found children
+      new_children_pids.each do |child_pid|
+        child = self.child_process_template.deep_copy
+        
+        child.name = "<child(pid:#{child_pid})>"
+        child.actual_pid = child_pid
+        child.logger = self.logger.prefix_with(child.name)
+        
+        child.initialize_state_machines
+        child.state = "up"
+        
+        @children << child
+      end
+    end
+    
+    def deep_copy
+      Marshal.load(Marshal.dump(self))
+    end
+    
+    def prepare_command(command)
+      command.to_s.gsub("{{PID}}", actual_pid.to_s)
+    end
+    
+    def system_command_options
+      {
+        :uid         => self.uid, 
+        :gid         => self.gid, 
+        :working_dir => self.working_dir,
+        :environment => self.environment,
+        :pid_file    => self.pid_file,
+        :logger      => self.logger,
+        :stdin       => self.stdin,
+        :stdout      => self.stdout,
+        :stderr      => self.stderr
+      }
+    end
+    
+    def with_timeout(secs, &blk)
+      Timeout.timeout(secs.to_f, &blk)
+      
+    rescue Timeout::Error
+      logger.err "Execution is taking longer than expected. Unmonitoring."
+      logger.err "Did you forget to tell bluepill to daemonize this process?"
+      self.dispatch!("unmonitor")
+    end
+  end
+end
+