From 378b76bd8ebf747c0e4255ec8728fe0f94d0d757 Mon Sep 17 00:00:00 2001
From: steve <none@none>
Date: Sun, 18 Dec 2005 03:45:26 +0000
Subject: [PATCH] 2005-12-18 03:45:26 by steve   Allow virtual machine's memory
 size to be set.

---
 xen-create-image | 15 ++++++++++++---
 1 file changed, 12 insertions(+), 3 deletions(-)

diff --git a/xen-create-image b/xen-create-image
index f537982..1ce2c93 100755
--- a/xen-create-image
+++ b/xen-create-image
@@ -48,7 +48,7 @@
 # --
 # http://www.steve.org.uk/
 #
-# $Id: xen-create-image,v 1.6 2005-12-18 03:43:29 steve Exp $
+# $Id: xen-create-image,v 1.7 2005-12-18 03:45:26 steve Exp $
 #
 
 use strict;
@@ -78,6 +78,8 @@ my $DHCP=0;                    # This setting overides the other network options
 my $MIRROR="http://ftp.us.debian.org/debian"; # set with '--mirror=http://www.etc.com"'
 my $SIZE="2000M";		# set with '--size=1000M[b] / 1G[b]"
 my $SWAP_SIZE="128M";		# set with '--swapsize=... like --size"
+my $MEMORY="96M";              # set with --memory=128Mb/128M
+
 
 #
 #  Parse options.
@@ -93,7 +95,8 @@ GetOptions(
 	   "dhcp", \$DHCP,
 	   "mirror=s", \$MIRROR,
 	   "size=s", \$SIZE,
-	   "swapsize=s", \$SWAP_SIZE
+	   "swapsize=s", \$SWAP_SIZE,
+	   "memory=s", \$MEMORY
 	  );
 
 
@@ -278,7 +281,7 @@ print "Setting up Xen configuration file .. ";
 open( XEN, ">", "/etc/xen/$HOSTNAME.cfg" );
 print XEN<<E_O_XEN;
 kernel = "/boot/vmlinuz-2.6.12-xenU"
-memory = 96
+memory = $MEMORY
 name   = "$HOSTNAME"
 disk   = [ 'file:$image,sda1,w','file:$swap,sda2,w' ]
 root   = "/dev/sda1 ro"
@@ -397,6 +400,12 @@ EOF
 	$SWAP_SIZE = $1 * 1024 . "M";
     }
 
+    # Strip trailing Mb from the memory size.
+    if ( $MEMORY =~ /^(\d+)Mb*$/i )
+    {
+	$MEMORY = $1;
+    }
+
 
     #    
     #  Check mirror format