vagrant-snap 0.01

data/LICENSE.txt

@@ -0,0 +1,20 @@
+Copyright (c) 2010 t9md
+
+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.

data/Manifest

@@ -0,0 +1,7 @@
+LICENSE.txt
+Manifest
+README.md
+VERSION
+lib/vagrant_init.rb
+lib/vagrant_snap.rb
+Rakefile

data/README.md

@@ -0,0 +1,25 @@
+What's this?
+==================================
+vagrant snapshot management plugin
+
+## install
+
+    gem install vagrant-snap
+
+## following commands are added
+
+    Tasks:
+      vagrant snap back              # back to current snapshot
+      vagrant snap delete SNAP_NAME  # delete snapshot
+      vagrant snap go SNAP_NAME      # go to specified snapshot
+      vagrant snap help [COMMAND]    # Describe subcommands or one specific subcommand
+      vagrant snap list              # list snapshot
+      vagrant snap take [desc]       # take snapshot
+
+## limitation
+
+Currently multi-vm environment is not supported
+
+## Similar project
+
+[sahara](https://github.com/jedi4ever/sahara)

data/Rakefile

@@ -0,0 +1,13 @@
+require 'rubygems'
+include Rake::DSL
+
+require 'echoe'
+Echoe.new "vagrant-snap", File.read("./VERSION").chomp do |p|
+  p.author = "t9md"
+  p.email = "taqumd@gmail.com"
+  p.summary = %Q{vagrant snapshot managemen plugin}
+  p.project = nil
+  p.url = "http://github.com/t9md/vagrant-snap"
+  p.runtime_dependencies << 'vagrant'
+  p.runtime_dependencies << 'colored'
+end

data/VERSION

@@ -0,0 +1 @@
+0.01

data/lib/vagrant_init.rb

@@ -0,0 +1,6 @@
+begin
+  require 'vagrant_snap'
+rescue LoadError
+  require 'rubygems'
+  require 'vagrant_snap'
+end

data/lib/vagrant_snap.rb

@@ -0,0 +1,99 @@
+require "colored"
+
+module Snap
+  module VBox
+    class SnapShot #{{{
+      @@snaps = []
+      class << self
+        def is_endnode?() @@current.uuid == @@snaps.last.uuid end
+
+        def snaps() @@snaps end 
+
+        def parse_tree(vmname)
+          vm = VirtualBox::VM.find( vmname )
+          @@current = vm.current_snapshot
+          return unless @@current
+          _parse(vm.root_snapshot)
+        end
+
+        # [TODO] need refactoring
+        def time_elapse(time)
+          _sec  = 1
+          _min  = _sec * 60
+          _hour = _min * 60
+          _day  = _hour * 24
+
+          sec = time.to_i
+          min = sec / _min
+          hour = sec / _hour
+          day  = sec / _day
+
+          case
+          when day  > 0 then "#{day} day#{day == 1 ? '' : 's'}"
+          when hour > 0 then "#{hour} hour#{hour == 1 ? '' : 's'}"
+          when min  > 0 then "#{min} minute#{min == 1 ? '' : 's'}"
+          when sec  > 0 then "#{sec} second#{sec == 1 ? '' : 's'}"
+          end
+        end
+
+        def _parse(snaps, level=0)
+          @@snaps << snaps.name
+          # time = snaps.time_stamp.strftime  "%m%d-%H:%M"
+          time = time_elapse(Time.now - snaps.time_stamp)
+          result = "#{'    ' * level}+-#{snaps.name} [ #{time} ]"
+          result << " #{snaps.description}" unless snaps.description.empty?
+          result = result.yellow  if snaps.uuid == @@current.uuid
+          result << "\n"
+          snaps.children.each do |e|
+            result <<  _parse(e, level+1)
+          end
+          result
+        end
+      end
+    end #}}}
+  end
+	class Command < Vagrant::Command::GroupBase
+	  register "snap","Manages a snap"
+
+    no_tasks {
+      def vmname
+        @vagrant_env ||= Vagrant::Environment.new
+        @instance_name ||= "#{@vagrant_env.vms[:default].vm.name}"
+        @instance_name
+      end
+    }
+
+	  desc "list", "list snapshot"
+	  def list
+      result = VBox::SnapShot.parse_tree( vmname )
+      puts result ? result : "no snapshot"
+	  end
+
+	  desc "go SNAP_NAME", "go to specified snapshot"
+	  def go(snapshot_name)
+      system "VBoxManage controlvm #{vmname} poweroff"
+      system "VBoxManage snapshot  #{vmname} restore #{snapshot_name}"
+      system "VBoxManage startvm   #{vmname} --type headless"
+	  end
+
+	  desc "back", "back to current snapshot"
+	  def back
+      system "VBoxManage controlvm #{vmname} poweroff"
+      system "VBoxManage snapshot  #{vmname} restorecurrent"
+      system "VBoxManage startvm   #{vmname} --type headless"
+	  end
+
+	  desc "take [desc]", "take snapshot"
+	  def take(desc="")
+      VBox::SnapShot.parse_tree( vmname )
+      last_name = VBox::SnapShot.snaps.sort.reverse.first
+      new_name = last_name.nil? ? vmname + "-01" : last_name.succ
+      system "VBoxManage snapshot #{vmname} take #{new_name} --description '#{desc}' --pause"
+	  end
+
+	  desc "delete SNAP_NAME", "delete snapshot"
+	  def delete(snapshot_name)
+      system "VBoxManage snapshot #{vmname} delete #{snapshot_name}"
+	  end
+	end
+end

data/vagrant-snap.gemspec

@@ -0,0 +1,35 @@
+# -*- encoding: utf-8 -*-
+
+Gem::Specification.new do |s|
+  s.name = %q{vagrant-snap}
+  s.version = "0.01"
+
+  s.required_rubygems_version = Gem::Requirement.new(">= 1.2") if s.respond_to? :required_rubygems_version=
+  s.authors = ["t9md"]
+  s.date = %q{2011-06-06}
+  s.description = %q{vagrant snapshot managemen plugin}
+  s.email = %q{taqumd@gmail.com}
+  s.extra_rdoc_files = ["LICENSE.txt", "README.md", "lib/vagrant_init.rb", "lib/vagrant_snap.rb"]
+  s.files = ["LICENSE.txt", "Manifest", "README.md", "VERSION", "lib/vagrant_init.rb", "lib/vagrant_snap.rb", "Rakefile", "vagrant-snap.gemspec"]
+  s.homepage = %q{http://github.com/t9md/vagrant-snap}
+  s.rdoc_options = ["--line-numbers", "--inline-source", "--title", "Vagrant-snap", "--main", "README.md"]
+  s.require_paths = ["lib"]
+  s.rubygems_version = %q{1.3.7}
+  s.summary = %q{vagrant snapshot managemen plugin}
+
+  if s.respond_to? :specification_version then
+    current_version = Gem::Specification::CURRENT_SPECIFICATION_VERSION
+    s.specification_version = 3
+
+    if Gem::Version.new(Gem::VERSION) >= Gem::Version.new('1.2.0') then
+      s.add_runtime_dependency(%q<vagrant>, [">= 0"])
+      s.add_runtime_dependency(%q<colored>, [">= 0"])
+    else
+      s.add_dependency(%q<vagrant>, [">= 0"])
+      s.add_dependency(%q<colored>, [">= 0"])
+    end
+  else
+    s.add_dependency(%q<vagrant>, [">= 0"])
+    s.add_dependency(%q<colored>, [">= 0"])
+  end
+end

metadata

@@ -0,0 +1,109 @@
+--- !ruby/object:Gem::Specification 
+name: vagrant-snap
+version: !ruby/object:Gem::Version 
+  hash: 9
+  prerelease: false
+  segments: 
+  - 0
+  - 1
+  version: "0.01"
+platform: ruby
+authors: 
+- t9md
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2011-06-06 00:00:00 +09:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: vagrant
+  prerelease: false
+  requirement: &id001 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        hash: 3
+        segments: 
+        - 0
+        version: "0"
+  type: :runtime
+  version_requirements: *id001
+- !ruby/object:Gem::Dependency 
+  name: colored
+  prerelease: false
+  requirement: &id002 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        hash: 3
+        segments: 
+        - 0
+        version: "0"
+  type: :runtime
+  version_requirements: *id002
+description: vagrant snapshot managemen plugin
+email: taqumd@gmail.com
+executables: []
+
+extensions: []
+
+extra_rdoc_files: 
+- LICENSE.txt
+- README.md
+- lib/vagrant_init.rb
+- lib/vagrant_snap.rb
+files: 
+- LICENSE.txt
+- Manifest
+- README.md
+- VERSION
+- lib/vagrant_init.rb
+- lib/vagrant_snap.rb
+- Rakefile
+- vagrant-snap.gemspec
+has_rdoc: true
+homepage: http://github.com/t9md/vagrant-snap
+licenses: []
+
+post_install_message: 
+rdoc_options: 
+- --line-numbers
+- --inline-source
+- --title
+- Vagrant-snap
+- --main
+- README.md
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      hash: 3
+      segments: 
+      - 0
+      version: "0"
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      hash: 11
+      segments: 
+      - 1
+      - 2
+      version: "1.2"
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.3.7
+signing_key: 
+specification_version: 3
+summary: vagrant snapshot managemen plugin
+test_files: []
+