gluez 0.2.1 → 0.3

data/lib/gluez.rb

@@ -1,168 +1,85 @@
-require 'gluez/ext/string'
-
-require 'gluez/option_wrapper'
-require 'gluez/formatter'
-require 'gluez/erb/engine'
-
-require 'gluez/impl/linux'
-
-module Gluez
-
-  def self.run(entries, cfg={})
-    
-    cfg = {
-      :file_dir => ".",
-      :simulate => false
-    }.merge(cfg)
-    
-    lines = []
-    lines << "#!/bin/bash"
-    # 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)
-      
-      steps.each do |step|
-        if step[:check].is_a?(Array)
-          step[:check].each_with_index do |check, idx|
-            step[:check][idx] = step[:check][idx].gsub("\"", "\\\"")
-          end
-        else
-          step[:check] = step[:check].gsub("\"", "\\\"")
-        end
-        step[:code] = step[:code].gsub("\"", "\\\"")
-      end
-      
-      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
-      
-      if cfg[:simulate]
-        generate_simulate(lines, opts[:user, 'root'], fun, steps, notifies)
-      else
-        generate_execute(lines, opts[:user, 'root'], fun, steps, notifies)
-      end
-      
-      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"))
+class Object
+  def context(&block)
+    Gluez::Context.new(&block)
+  end
+  def recipe(&block)
+    $gluez.instance_eval(&block)
+  end
+  def resource(name, &block)
+    Gluez::Context.register(name.to_s.underscore, &block)
   end
+end
+
+# Gluez does a lot of text processing and maniputation. The string class is extended to dry up code. 
+class String
   
-  private
+  # Return the string as underscored version e.g. SomeTextValue becomes some_text_value.
+  def underscore
+    word = self.dup
+    word.gsub!(/::/, '/')
+    word.gsub!(/([A-Z]+)([A-Z][a-z])/,'\1_\2')
+    word.gsub!(/([a-z\d])([A-Z])/,'\1_\2')
+    word.tr!("-", "_")
+    word.downcase!
+    word
+  end
   
-  def self.function_name(task, name)
-    "#{task}_#{name}".gsub('/', '_').gsub(':', '_').gsub("@", "_").gsub("~", "_").gsub(".", "_")
+  # Return the string as camelcased version e.g. some_text_value becomes SomeTextValue.
+  def camelize(first_letter_in_uppercase=true)
+    word = self.dup
+    if first_letter_in_uppercase
+      word.gsub(/\/(.?)/) { "::#{$1.upcase}" }.gsub(/(?:^|_)(.)/) { $1.upcase }
+    else
+      word.to_s[0].chr.downcase + word.camelize[1..-1]
+    end
   end
   
-  def self.generate_simulate(lines, user, fun, steps, notifies)
-
-    lines << code_check(steps, user, true)
+end
 
-    lines << "if [[ $? -eq 0 ]]; then"
-    lines << "  echo \"[ up2date     ] #{fun}\""
-    lines << "else"
-    lines << "  echo \"[ not up2date ] #{fun}\""
-    
-    notifies.each do |notify|
-      lines << notify
-    end
-    
-    lines << "fi"
+module Gluez
+  
+  def self.args()
+    ARGV.select{|a| !(a =~ /^-/)}
   end
 
-  def self.code_check(steps, user, applied)
-    steps.collect do |step|
+  def self.options()
+    ARGV.select{|a| a =~ /^-/}
+  end
+  
+  # Takes an array of bash code lines and returns it as a nicely formatted string.
+  def self.format(lines)
+    indent = 0
+    num_line = 0
+
+    prev_line = nil
+    lines.split("\n").collect do |line|
+      num_line += 1
+      begin
+        line = line.strip
       
-      if step[:check].is_a?(Array)
-        
-        step[:check].collect do |check|
-          "su -l #{user} -c \"test " + check + "\""
-        end.join(" && ")
-        
-      else
-        "su -l #{user} -c \"test " + step[:check] + "\"" unless (applied && step[:check] == '1 -eq 0')
-      end
+        indent -= 2 if ['}', 'fi', 'else'].include?(line)
       
-    end.join(" && ")
-  end
+        l = (' ' * indent) + line
+        indent += 2 if [/^function /, /^if /, /^else/].any?{|e| line =~ e}
 
-  def self.generate_execute(lines, user, fun, steps, notifies)
-    
-    lines << code_check(steps, user, false)
-    
-    lines << "if [[ $? -eq 0 ]]; then"
-    lines << "  echo \"[ up2date     ] #{fun}\""
-    lines << "else"
-
-    if steps.length > 1
-      (0..steps.length-1).to_a.each do |limit|
-
-        lines << code_check(steps[0..limit], user, false)
+        indent -= 2 if line.index('cat >~/.gluez_transfer <<\DATA')
+        indent += 2 if line == 'DATA"'
+      
+        prev_line = line
+      
+        l
+      rescue Exception => e
+        puts "error on line: #{num_line}"
+        raise e
+      end
+    end.join("\n")
+  end  
+end
 
-        lines << "if [[ $? -eq 0 ]]; then"
-        lines << "  echo \"[ up2date     ] #{fun}\""
-        lines << "else"
-        
-        lines << "  su -l #{user} -c \"#{steps[limit][:code]}\""
+$simulate = true if $simulate.nil?
+$env = :development if $env.nil?
 
-        lines << code_check(steps[0..limit], user, true)
-        
-        lines << "  if [[ $? -eq 0 ]]; then"
-        lines << "    echo \"[ applied     ] #{fun}\""
-        lines << "  else"
-        lines << "    echo \"[ not applied ] #{fun}\""
-        lines << "    exit 1"
-        lines << "  fi"
-        lines << "fi"
-      end
-    else
-      lines << "  su -l #{user} -c \"#{steps[0][:code]}\""
+require 'gluez/resource'
+require 'gluez/context'
 
-      lines << code_check([steps[0]], user, true)
-      
-      lines << "  if [[ $? -eq 0 ]]; then"
-      lines << "    echo \"[ applied     ] #{fun}\""
-      lines << "  else"
-      lines << "    echo \"[ not applied ] #{fun}\""
-      lines << "    exit 1"
-      lines << "  fi"
-    end
-    
-    notifies.each do |notify|
-      lines << notify
-    end
-    
-    lines << "fi"
-  end
-      
-end
+Gluez::Context.load_resources

metadata

@@ -1,63 +1,66 @@
---- !ruby/object:Gem::Specification 
+--- !ruby/object:Gem::Specification
 name: gluez
-version: !ruby/object:Gem::Version 
+version: !ruby/object:Gem::Version
+  version: '0.3'
   prerelease: 
-  version: 0.2.1
 platform: ruby
-authors: 
+authors:
 - Jan Zimmek
 autorequire: 
 bindir: bin
 cert_chain: []
-
-date: 2011-06-06 00:00:00 +02:00
-default_executable: 
+date: 2011-10-27 00:00:00.000000000Z
 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
+files:
+- lib/gluez/context.rb
+- lib/gluez/resource.rb
+- lib/gluez/resources/bash.rb
+- lib/gluez/resources/bash_once.rb
+- lib/gluez/resources/dir.rb
+- lib/gluez/resources/disable.rb
+- lib/gluez/resources/enable.rb
+- lib/gluez/resources/file.rb
+- lib/gluez/resources/gem.rb
+- lib/gluez/resources/group.rb
+- lib/gluez/resources/link.rb
+- lib/gluez/resources/mount.rb
+- lib/gluez/resources/package.rb
+- lib/gluez/resources/path.rb
+- lib/gluez/resources/restart.rb
+- lib/gluez/resources/source.rb
+- lib/gluez/resources/start.rb
+- lib/gluez/resources/stop.rb
+- lib/gluez/resources/transfer.rb
+- lib/gluez/resources/umount.rb
+- lib/gluez/resources/user.rb
 - lib/gluez.rb
-has_rdoc: true
 homepage: 
 licenses: []
-
 post_install_message: 
 rdoc_options: []
-
-require_paths: 
+require_paths:
 - lib
-required_ruby_version: !ruby/object:Gem::Requirement 
+required_ruby_version: !ruby/object:Gem::Requirement
   none: false
-  requirements: 
-  - - ">="
-    - !ruby/object:Gem::Version 
-      version: "0"
-required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
   none: false
-  requirements: 
-  - - ">="
-    - !ruby/object:Gem::Version 
-      version: "0"
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
 requirements: []
-
 rubyforge_project: 
-rubygems_version: 1.6.2
+rubygems_version: 1.8.6
 signing_key: 
 specification_version: 3
 summary: a system configuration toolkit
 test_files: []
-

data/lib/gluez/erb/engine.rb

@@ -1,19 +0,0 @@
-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

@@ -1,19 +0,0 @@
-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

@@ -1,18 +0,0 @@
-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

@@ -1,32 +0,0 @@
-module Gluez
-  class Formatter
-    def self.format(lines)
-      indent = 0
-      num_line = 0
-
-      prev_line = nil
-      lines.split("\n").collect do |line|
-        num_line += 1
-        begin
-          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.index('cat >~/.gluez_transfer <<\DATA')
-          indent += 2 if line == '"' && prev_line == 'DATA'
-        
-          prev_line = line
-        
-          l
-        rescue Exception => e
-          puts "error on line: #{num_line}"
-          raise e
-        end
-      end.join("\n")
-    end
-  end
-end

data/lib/gluez/impl/linux.rb

@@ -1,233 +0,0 @@
-module Gluez
-  module Impl
-    class Linux
-      def self.steps(cfg, task, name, opts)
-        
-        setup = nil
-        steps = []
-        
-        case task
-          when :gem
-            steps << {
-              :check  => "\\$(gem list | awk '{print \\$1}' | grep ^#{name}$ | wc -l) -eq 1",
-              :code   => "gem install #{name} --version #{opts[:version]} --user-install --no-rdoc --no-ri"
-            }
-
-          when :file
-            steps << {
-              :check  => "-f #{name}",
-              :code   => "touch #{name}"
-            }
-
-            steps << {
-              :check  => %Q("\\$(stat -L --format=%a #{name})" = "#{opts[:chmod, "644"]}"),
-              :code   => "chmod #{opts[:chmod, "644"]} #{name}"
-            }
-            
-          when :dir
-            steps << {
-              :check  => "-d #{name}",
-              :code   => "mkdir #{name}"
-            }
-
-            steps << {
-              :check  => %Q("\\$(stat -L --format=%a #{name})" = "#{opts[:chmod, "755"]}"),
-              :code   => "chmod #{opts[:chmod, "755"]} #{name}"
-            }
-
-          when :package
-            steps << {
-              :check  => [
-                "\\$(apt-cache policy #{name} | grep Installed | wc -l) -eq 1",
-                "\\$(apt-cache policy #{name} | grep Installed | grep '(none)' | wc -l) -eq 0"
-              ],
-              :code   => "apt-get install #{name} --yes"
-            }
-
-          when :crontab
-            default_file = "crontab.#{name}.erb"
-            
-            raw = File.read(cfg[:file_dir] + "/files/" + opts[:source, default_file])
-            
-            content = Gluez::Erb::Engine.parse(raw, opts[:vars, {}])
-
-#             setup = <<-CMD
-# data=$(cat <<\\DATA
-# #{content.strip}
-# DATA
-# )
-# CMD
-
-            setup = <<-CMD
-su -l #{opts[:user, 'root']} -c "cat >~/.gluez_transfer <<\\DATA
-#{content.strip}
-DATA
-"
-CMD
-
-
-            steps << {
-              :check  => %Q("\\$(cat ~/.gluez_transfer | base64 -i -d - | md5sum - | awk '{print \\$1}')" = "\\$(crontab -u #{name} -l | md5sum - | awk '{print \\$1}')"),
-              :code   => "cat ~/.gluez_transfer | base64 -i -d - | crontab -u #{name} -"
-            }
-            
-          when :transfer
-            default_file = name.split("/").last.gsub(/^\./, "") + ".erb"
-            
-            raw = File.read(cfg[:file_dir] + "/files/" + opts[:source, default_file])
-            
-            content = Gluez::Erb::Engine.parse(raw, opts[:vars, {}])
-
-            setup = <<-CMD
-su -l #{opts[:user, 'root']} -c "cat >~/.gluez_transfer <<\\DATA
-#{content.strip}
-DATA
-"
-CMD
-
-            steps << {
-              :check  => "-f #{name}",
-              :code   => "touch #{name}"
-            }
-
-            steps << {
-              :check  => %Q("\\$(stat -L --format=%a #{name})" = "#{opts[:chmod, "644"]}"),
-              :code   => "chmod #{opts[:chmod, "644"]} #{name}"
-            }
-
-            steps << {
-              :check  => %Q("\\$(cat ~/.gluez_transfer | base64 -i -d - | md5sum - | awk '{print \\$1}')" = "\\$(md5sum #{name} | awk '{print \\$1}')"),
-              :code   => "chmod +w #{name} && cat ~/.gluez_transfer | base64 -i -d - > #{name} && chmod #{opts[:chmod, "644"]} #{name}"
-            }
-
-          when :group
-            steps << {
-              :check  => "$(cat /etc/group | grep ^#{name}: | wc -l) -eq 1",
-              :code   => "groupadd --gid #{opts[:gid]} #{name}"
-            }
-
-          when :user
-            steps << {
-              :check  => "$(cat /etc/passwd | grep ^#{name}: | wc -l) -eq 1",
-              :code   => "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 << {
-              :check  => [
-                %Q("\\$(grep #{name} /tmp/gluez.tmp | wc -l)" = "1"),
-                %Q("\\$(service #{name} status | grep -E 'is running|start/running' | wc -l)" = "1")
-              ],
-               
-              :code   => "service #{name} start"
-            }
-
-          when :stop
-            setup = "service --status-all 1>/tmp/gluez.tmp 2>&1"
-            steps << {
-              :check  => [
-                %Q("\\$(grep #{name} /tmp/gluez.tmp | wc -l)" = "1"),
-                %Q("\\$(service #{name} status | grep -E 'is running|start/running' | wc -l)" = "0"),
-              ],
-              :code   => "service #{name} stop"
-            }
-
-          when :restart
-            setup = "service --status-all 1>/tmp/gluez.tmp 2>&1"
-
-            steps << {
-              :check  => '1 -eq 0',
-              :code   => "service #{name} restart"
-            }
-
-          when :bash
-            steps << {
-              :check  => opts[:not_if],
-              :code   => opts[:code]
-            }
-            
-          when :bash_once
-            home_dir = (opts[:user, 'root'] == 'root') ? "/root" : "/home/#{opts[:user, 'root']}"
-            steps << {
-              :check  => "-f #{home_dir}/.gluez/#{name}",
-              :code   => opts[:code] + "\n" + "touch #{home_dir}/.gluez/#{name}"
-            }
-
-          when :bundler
-            steps << {
-              :check    => "\"\\$(cd #{name} && bundle check > /dev/null && echo 'up2date')\" = \"up2date\"",
-              :code     => "cd #{name} && bundle install"
-            }
-          
-          when :umount
-            steps << {
-              :check  => "\\$(mount | grep \"on #{name} type\" | wc -l) -eq 0",
-              :code   => "umount #{name}"
-            }
-            
-          when :mount
-            
-            cmd = "mount -t #{opts[:type]}"
-            cmd = "#{cmd} -o #{opts[:options]}" if opts.key?(:options)
-            cmd = "#{cmd} #{opts[:device]} #{name}"
-            
-            steps << {
-              :check  => "\\$(mount | grep \"on #{name} type\" | wc -l) -eq 1",
-              :code   => cmd
-            }
-
-          when :link
-            steps << {
-              :check  => [
-                "-L #{name}",
-                "\\$(file #{name} | grep \"#{name.gsub('~', '\$HOME')}: symbolic link to \\\\\\`#{opts[:target].gsub('~', '\$HOME')}'\" | wc -l) -eq 1"
-              ],
-              :code   => "ln -f -s #{opts[:target]} #{name}"
-            }
-            
-          when :enable
-            steps << {
-              :check  => "\\$(update-rc.d -n -f #{name} remove | grep '/etc/rc' | wc -l) -gt 0",
-              :code   => "/usr/sbin/update-rc.d #{name} defaults"
-            }
-
-          when :disable
-            steps << {
-              :check  => "\\$(update-rc.d -n -f #{name} remove | grep '/etc/rc' | wc -l) -eq 0",
-              :code   => "/usr/sbin/update-rc.d -f #{name} remove"
-            }
-
-          when :source
-            user = opts[:user, "root"]
-            home_dir = (user != "root") ? "/home/#{opts[:user]}" : "/root"
-            
-            steps << {
-              :check  => "-d ~/tmp",
-              :code   => "mkdir ~/tmp"
-            }
-
-            steps << {
-              :check  => opts[:test],
-              :code   => <<-CODE
-                [ -f ~/tmp/#{opts[:filename]} ] && rm ~/tmp/#{opts[:filename]}
-                [ -d ~/tmp/#{opts[:folder]} ] && rm -rf ~/tmp/#{opts[:folder]}
-
-                wget --no-check-certificate -O ~/tmp/#{opts[:filename]} #{name}
-                tar -C ~/tmp/ -x#{opts[:filename] =~ /\.tar\.bz2/ ? "j" : "z"}f ~/tmp/#{opts[:filename]}
-                cd ~/tmp/#{opts[:folder]} && #{opts[:steps].join(' && ')}
-              CODE
-            }
-            
-          else
-            raise "unsupported task: #{task}, name: #{name}, opts: #{opts.inspect}"
-        end
-
-        name = "#{name}@#{opts[:user]}" if opts.key?(:user)
-        
-        [name, setup, steps]
-      end
-    end
-  end
-end