From 3dbbb39a3b215fca6e4811a7521ebd943711e5bd Mon Sep 17 00:00:00 2001
From: Scott Schneider <sschneider@puppetlabs.com>
Date: Fri, 22 Aug 2014 11:03:55 -0700
Subject: [PATCH] Allow a PUT to modify running VMs

---
 lib/vmpooler/api.rb | 22 ++++++++++++++++++++++
 1 file changed, 22 insertions(+)

diff --git a/lib/vmpooler/api.rb b/lib/vmpooler/api.rb
index 9fbde20..dd1cfb7 100644
--- a/lib/vmpooler/api.rb
+++ b/lib/vmpooler/api.rb
@@ -305,6 +305,28 @@ module Vmpooler
 
           JSON.pretty_generate(result)
         end
+
+        put '/vm/:hostname/?' do
+          content_type :json
+
+          result = {}
+
+          result['ok'] = false
+
+          if $redis.exists('vmpooler__vm__'+params[:hostname])
+            jdata = JSON.parse(request.body.read)
+
+            jdata.each do |param, arg|
+              case param
+                when 'lifetime'
+                  $redis.hset('vmpooler__vm__'+params[:hostname], param, arg)
+                  result['ok'] = true
+              end
+            end
+          end
+
+          JSON.pretty_generate(result)
+        end
       }
 
       my_app.run!