gluez 0.1

data/bin/gluez

@@ -0,0 +1,3 @@
+#!/bin/bash
+
+# /usr/bin/env ruby "require gluez; Gluez::run"

data/lib/gluez.rb

@@ -0,0 +1,129 @@
+require 'json'
+
+require 'gluez/ext/string'
+
+require 'gluez/option_wrapper'
+require 'gluez/formatter'
+require 'gluez/erb/engine'
+
+require 'gluez/impl/linux'
+# require 'gluez/impl/mac'
+
+module Gluez
+
+  def self.run(entries, cfg={})
+    
+    cfg = {
+      :file_dir => "."
+    }.merge(cfg)
+    
+    lines = []
+    lines << "#!/bin/bash"
+    # lines << "set -x"
+    lines << "set -e"
+    
+    entries.each do |entry|
+
+      task, name, opts = entry
+      
+      opts ||= {}
+      opts = OptionWrapper.new(opts)
+
+      name, setup, steps = Gluez::Impl::Linux.steps(cfg, task, name, opts)
+      entry[1] = name
+
+      fun = function_name(task, name)
+
+      lines << "function #{fun} {"
+      lines << setup if setup
+      
+      notifies = []
+      opts[:notifies, Array.new].each do |notify|
+        notify_task, notify_name = notify
+        notify_fun = function_name(notify_task, notify_name)
+        
+        notifies << notify_fun
+        
+        unless entries.detect{|entry| entry[0] == notify_task && entry[1] == notify_name}
+          entries << [notify_task, notify_name, {:embedded => true}]
+        end
+      end
+            
+      add_steps(true, lines, [], [fun, steps], notifies)
+      
+      lines << "}"
+      
+    end    
+
+    entries.each do |entry|
+      task, name, opts = entry
+      opts ||= {}
+      
+      lines << function_name(task, name) unless opts[:embedded]
+    end
+
+    
+    Formatter.format(lines.join("\n"))
+  end
+  
+  private
+  
+  def self.function_name(task, name)
+    "#{task}_#{name}".gsub('/', '_').gsub(':', '_').gsub("@", "_").gsub("~", "_").gsub(".", "_")
+  end
+  
+  def self.add_steps(first, lines, completed, steps_wrapper, notifies)
+    
+    fun, steps = steps_wrapper
+    
+    if first
+      if steps.length == 2
+        add_steps(false, lines, [], [fun, steps], notifies)
+      else
+        checks = []
+        steps.each_with_index do |step, idx|
+          checks << step if idx % 2 == 0
+        end
+
+        lines << "if [[ #{checks.join(' && ')} ]]; then"
+        lines << "  echo \"[ #{fun} ] up2date\""
+        lines << "else"
+        lines << "  echo \"[ #{fun} ] NOT up2date\""
+        add_steps(false, lines, [], [fun, steps], notifies)
+        lines << "fi"
+      end
+      
+    else
+      check, code = steps.slice!(0,2)
+      
+      if check == "1 -eq 0"
+        completed << "1 -eq 1"
+      else
+        completed << check
+      end
+      
+      lines << "if [[ #{check} ]]; then"
+      lines << "  echo \"[ #{fun} ] up2date\""
+      lines << "else"
+      lines << "  #{code}"
+      lines << "  if [[ #{completed.join(' && ')} ]]; then"
+      lines << "    echo \"[ #{fun} ] applied\""
+      lines << "  else"
+      lines << "    exit 1"
+      lines << "  fi"
+      
+      lines << "fi"
+
+      if steps.empty?
+        notifies.each do |notify|
+          lines << notify
+        end
+      else
+        add_steps(false, lines, completed, [fun, steps], notifies) 
+      end
+    end
+    
+    
+  end
+    
+end

data/lib/gluez/erb/engine.rb

@@ -0,0 +1,19 @@
+require 'erb'
+require 'base64'
+
+require 'gluez/erb/vars'
+
+module Gluez
+  module Erb
+    class Engine
+      def self.parse(content, vars={})
+        v = Gluez::Vars.new(vars)
+      
+        erb = ERB.new(content)
+        content2 = erb.result(v.get_binding)
+      
+        Base64.encode64(content2)
+      end
+    end
+  end
+end

data/lib/gluez/erb/vars.rb

@@ -0,0 +1,19 @@
+module Gluez
+  class Vars
+    def initialize(hash={})
+      hash.each_pair do |key, val|
+        self.metaclass.send(:define_method, key) do
+          val
+        end
+      end
+    end
+    
+    def metaclass
+      class << self; self; end
+    end
+
+    def get_binding
+      binding
+    end
+  end
+end

data/lib/gluez/ext/string.rb

@@ -0,0 +1,18 @@
+class String
+  def strip2
+    unless self.empty?
+      lines = self.split("\n")
+      indent = 0
+      lines[0].each_char do |char|
+        if char == " "
+          indent += 1
+        else
+          break
+        end
+      end
+      lines.collect{|line| line.gsub(/^([ ]{0,#{indent}})/, "")}.join("\n")
+    else
+      self
+    end
+  end
+end

data/lib/gluez/formatter.rb

@@ -0,0 +1,24 @@
+module Gluez
+  class Formatter
+    def self.format(lines)
+      indent = 0
+
+      prev_line = nil
+      lines.split("\n").collect do |line|
+        line = line.strip
+        
+        indent -= 2 if ['}', 'fi', 'else'].include?(line)
+        
+        l = (' ' * indent) + line
+        indent += 2 if [/^function /, /^if /, /^else/].any?{|e| line =~ e}
+
+        indent -= 2 if line =~ /^data=/
+        indent += 2 if line == ')' && prev_line == 'DATA'
+        
+        prev_line = line
+        
+        l
+      end.join("\n")
+    end
+  end
+end

data/lib/gluez/impl/linux.rb

@@ -0,0 +1,146 @@
+module Gluez
+  module Impl
+    class Linux
+      def self.steps(cfg, task, name, opts)
+        
+        setup = nil
+        steps = []
+        
+        case task
+          when :gem
+            steps << "$(su -l #{opts[:user]} -c \"gem list | awk '{print \\$1}' | grep ^#{name}$ | wc -l\") -eq 1"
+            steps << "su -l #{opts[:user]} -c \"gem install #{name} --version #{opts[:version]} --user-install --no-rdoc --no-ri\""
+
+            name = "#{name}@#{opts[:user]}"
+
+          when :file
+            steps << "-f #{name}"
+            steps << "touch #{name}"
+
+            steps << "\"$(stat -L --format=%a #{name})\" = \"#{opts[:chmod, "644"]}\""
+            steps << "chmod #{opts[:chmod, "644"]} #{name}"
+
+            steps << "\"$(stat -L --format=%G:%U #{name})\" = \"#{opts[:chown, "root:root"]}\""
+            steps << "chown --no-dereference #{opts[:chown, "root:root"]} #{name}"
+
+          when :dir
+            steps << "-d #{name}"
+            steps << "mkdir #{name}"
+
+            steps << "\"$(stat -L --format=%a #{name})\" = \"#{opts[:chmod, "755"]}\""
+            steps << "chmod #{opts[:chmod, "755"]} #{name}"
+
+            steps << "\"$(stat -L --format=%G:%U #{name})\" = \"#{opts[:chown, "root:root"]}\""
+            steps << "chown --no-dereference #{opts[:chown, "root:root"]} #{name}"
+
+          when :package
+            steps << "$(apt-cache policy #{name} | grep Installed | wc -l) -eq 1 && $(apt-cache policy #{name} | grep Installed | grep '(none)' | wc -l) -eq 0"
+            steps << "apt-get install #{name} --yes"
+
+          when :transfer
+            raw = File.read(cfg[:file_dir] + "/files/" + opts[:source])
+            
+            content = Gluez::Erb::Engine.parse(raw, opts[:vars, {}])
+
+            setup = <<-CMD
+data=$(cat <<\\DATA
+#{content.strip}
+DATA
+)
+CMD
+
+            steps << "-f #{name}"
+            steps << "touch #{name}"
+
+            steps << "\"$(stat -L --format=%a #{name})\" = \"#{opts[:chmod, "644"]}\""
+            steps << "chmod #{opts[:chmod, "644"]} #{name}"
+
+            steps << "\"$(stat -L --format=%G:%U #{name})\" = \"#{opts[:chown, "root:root"]}\""
+            steps << "chown --no-dereference #{opts[:chown, "root:root"]} #{name}"
+
+            steps << "\"$(echo -n $data | base64 -i -d | md5sum - | awk '{print $1}')\" = \"$(md5sum #{name} | awk '{print $1}')\""
+            steps << "echo -n ${data} | base64 -i -d > #{name}"
+
+          when :group
+            steps << "$(cat /etc/group | grep ^#{name}: | wc -l) -eq 1"
+            steps << "groupadd --gid #{opts[:gid]} #{name}"
+
+          when :user
+            steps << "$(cat /etc/passwd | grep ^#{name}: | wc -l) -eq 1"
+            steps << "useradd --create-home --uid #{opts[:uid]} --gid #{opts[:gid]} --shell #{opts[:shell, "/bin/bash"]} #{name}"
+
+          when :start
+            setup = "service --status-all 1>/tmp/gluez.tmp 2>&1"
+            steps << "\"$(grep #{name} /tmp/gluez.tmp | wc -l)\" = \"1\" && \"$(service #{name} status | grep -E 'is running|start/running' | wc -l)\" = \"1\""
+            steps << "service #{name} start"
+
+          when :stop
+            setup = "service --status-all 1>/tmp/gluez.tmp 2>&1"
+            steps << "\"$(grep #{name} /tmp/gluez.tmp | wc -l)\" = \"1\" && \"$(service #{name} status | grep -E 'is running|start/running' | wc -l)\" = \"0\""
+            steps << "service #{name} stop"
+
+          when :restart
+            setup = "service --status-all 1>/tmp/gluez.tmp 2>&1"
+            steps << "1 -eq 0"
+            steps << <<-CODE
+              if [[ "$(grep #{name} /tmp/gluez.tmp | wc -l)" = "1" && "$(service #{name} status | grep -E 'is running|start/running' | wc -l)" = "1" ]]; then
+                service #{name} restart
+              else
+                service #{name} start
+              fi
+            CODE
+
+          when :bash
+            steps << opts[:not_if]
+            steps << "su -l #{opts[:user, 'root']} -c '#{opts[:code]}'"
+
+          when :link
+            steps << "-L #{name} && $(file #{name} | grep \"#{name}: symbolic link to \\`#{opts[:target]}'\" | wc -l) -eq 1"
+            steps << "ln -f -s #{opts[:target]} #{name}"
+            
+            steps << "\"$(stat --format=%G:%U #{name})\" = \"#{opts[:chown]}\""
+            steps << "chown --no-dereference #{opts[:chown]} #{name}"
+
+          when :enable
+            steps << "$(update-rc.d -n -f #{name} remove | grep '/etc/rc' | wc -l) -gt 0"
+            steps << "/usr/sbin/update-rc.d #{name} defaults"
+
+          when :disable
+            steps << "$(update-rc.d -n -f #{name} remove | grep '/etc/rc' | wc -l) -eq 0"
+            steps << "/usr/sbin/update-rc.d -f #{name} remove"
+
+          when :source
+            user = opts[:user, "root"]
+            home_dir = (user != "root") ? "/home/#{opts[:user]}" : "/root"
+            
+            steps << "-d #{home_dir}/tmp"
+            steps << "mkdir #{home_dir}/tmp && chown #{user}:#{user} #{home_dir}/tmp"
+
+            steps << "-f #{opts[:binary]}"
+            steps << <<-CODE
+              [ -f #{home_dir}/tmp/#{opts[:filename]} ] && rm #{home_dir}/tmp/#{opts[:filename]}
+              [ -d #{home_dir}/tmp/#{opts[:folder]} ] && rm -rf #{home_dir}/tmp/#{opts[:folder]}
+
+              wget --no-check-certificate -O #{home_dir}/tmp/#{opts[:filename]} #{name}
+
+              chown #{user}:#{user} #{home_dir}/tmp/#{opts[:filename]}
+
+              tar -C #{home_dir}/tmp/ -x#{opts[:filename] =~ /\.tar\.bz2/ ? "j" : "z"}f #{home_dir}/tmp/#{opts[:filename]}
+
+              chown -R #{user}:#{user} #{home_dir}/tmp/#{opts[:folder]}
+
+              su -l #{user} -c 'cd #{home_dir}/tmp/#{opts[:folder]} && #{opts[:steps].join(' && ')}'
+
+              chown -R #{user}:#{user} #{home_dir}/tmp/#{opts[:folder].split('/').first}
+            CODE
+            
+          else
+            raise "unsupported task: #{task}, name: #{name}, opts: #{opts.inspect}"
+        end
+        
+        
+        [name, setup, steps]
+      end
+    end
+  end
+end

data/lib/gluez/impl/mac.rb

@@ -0,0 +1,34 @@
+module Gluez
+  module Impl
+    class Mac
+      def self.steps(cfg, task, name, opts)
+        
+        setup = nil
+        steps = []
+        
+        case task
+
+          when :group
+            steps << "$(/usr/bin/dscl . -list Groups | grep ^#{name}$ | wc -l) -eq 1"
+            steps << "$(/usr/bin/dscl . -create /Groups/#{name} PrimaryGroupID #{opts[:gid]})"
+
+          when :user
+            steps << "$(/usr/bin/dscl . -list Users | grep ^#{name}$ | wc -l) -eq 1"
+            steps << "$(/usr/bin/dscl . -create /Users/#{name} UniqueID #{opts[:uid]} PrimaryGroupID #{opts[:gid]} UserShell #{opts[:shell, "/bin/bash"]} NFSHomeDir /Users/#{name})"
+
+            steps << "-d /Users/#{name}"
+            steps << "mkdir /Users/#{name}"
+            
+            steps << "\"$(stat -L -f %Sg:%Su /Users/#{name})\" = \"#{name}:#{name}\""
+            steps << "chown #{name}:#{name} /Users/#{name}"
+
+          else
+            raise "unsupported task: #{task}, name: #{name}, opts: #{opts.inspect}"
+        end
+        
+        
+        [name, setup, steps]
+      end
+    end
+  end
+end

data/lib/gluez/option_wrapper.rb

@@ -0,0 +1,20 @@
+module Gluez
+  class OptionWrapper
+    def initialize(options)
+      @options = options
+    end
+
+    def [](name, default=nil)
+      value = @options[name]
+      if value
+        value
+      else
+        if default
+          default
+        else
+          raise "missing option: #{name}"
+        end
+      end
+    end
+  end
+end

metadata

@@ -0,0 +1,64 @@
+--- !ruby/object:Gem::Specification 
+name: gluez
+version: !ruby/object:Gem::Version 
+  prerelease: 
+  version: "0.1"
+platform: ruby
+authors: 
+- Jan Zimmek
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2011-05-01 00:00:00 +02:00
+default_executable: 
+dependencies: []
+
+description: a server configuration toolkit
+email: jan.zimmek@web.de
+executables: []
+
+extensions: []
+
+extra_rdoc_files: []
+
+files: 
+- lib/gluez/erb/engine.rb
+- lib/gluez/erb/vars.rb
+- lib/gluez/ext/string.rb
+- lib/gluez/formatter.rb
+- lib/gluez/impl/linux.rb
+- lib/gluez/impl/mac.rb
+- lib/gluez/option_wrapper.rb
+- lib/gluez.rb
+- bin/gluez
+has_rdoc: true
+homepage: 
+licenses: []
+
+post_install_message: 
+rdoc_options: []
+
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.6.2
+signing_key: 
+specification_version: 3
+summary: a server configuration toolkit
+test_files: []
+