From f9c3b8271d0cde60400b6ae7c94a19d8339493e9 Mon Sep 17 00:00:00 2001
From: Michal Sojka <sojkam1@fel.cvut.cz>
Date: Mon, 21 Oct 2013 13:07:45 +0200
Subject: [PATCH] Add --gen-only option

---
 README.md |  4 ++++
 novaboot  | 13 ++++++++++---
 2 files changed, 14 insertions(+), 3 deletions(-)

diff --git a/README.md b/README.md
index 7ef60dd..0ce3a37 100644
--- a/README.md
+++ b/README.md
@@ -227,6 +227,10 @@ scripts. Finally, binaries can be generated in this phases by running
     Runs _scons_ to build files that are not generated by novaboot
     itself.
 
+- \--gen-only
+
+    Exit novaboot after file generation phase.
+
 ## Target connection check
 
 If supported by the target, the connection to it is made and it is
diff --git a/novaboot b/novaboot
index 49a8cd2..d66f55a 100755
--- a/novaboot
+++ b/novaboot
@@ -86,7 +86,7 @@ read_config($_) foreach $cfg or reverse @cfgs;
 
 ## Command line handling
 
-my ($append, $bender, $builddir, $concat, $config_name_opt, $dhcp_tftp, $dump_opt, $dump_config, $grub_config, $grub_prefix, $grub_preamble, $grub2_prolog, $grub2_config, $help, $iprelay, $iso_image, $man, $no_file_gen, $off_opt, $on_opt, $pulsar, $pulsar_root, $qemu, $qemu_append, $qemu_flags_cmd, $rom_prefix, $rsync_flags, @scriptmod, $scons, $serial, $server);
+my ($append, $bender, $builddir, $concat, $config_name_opt, $dhcp_tftp, $dump_opt, $dump_config, $gen_only, $grub_config, $grub_prefix, $grub_preamble, $grub2_prolog, $grub2_config, $help, $iprelay, $iso_image, $man, $no_file_gen, $off_opt, $on_opt, $pulsar, $pulsar_root, $qemu, $qemu_append, $qemu_flags_cmd, $rom_prefix, $rsync_flags, @scriptmod, $scons, $serial, $server);
 
 $rsync_flags = '';
 $rom_prefix = 'rom://';
@@ -101,6 +101,7 @@ my %opt_spec;
     "dhcp-tftp|d"    => \$dhcp_tftp,
     "dump"	     => \$dump_opt,
     "dump-config"    => \$dump_config,
+    "gen-only"	     => \$gen_only,
     "grub|g:s" 	     => \$grub_config,
     "grub-preamble=s"=> \$grub_preamble,
     "grub-prefix=s"  => \$grub_prefix,
@@ -356,7 +357,7 @@ if (exists $variables->{WVDESC}) {
     print "Testing \"all\" in $last_fn:\n";
 }
 
-## Handle reset and power on/off
+## Handle reset and power on/off - TODO: move after the file generation phase
 
 my $IPRELAY;
 if (defined $iprelay) {
@@ -515,7 +516,7 @@ foreach my $script (@scripts) {
     }
 
 ### Copy files (using rsync)
-    if (defined $server) {
+    if (defined $server && !defined($gen_only)) {
 	(my $real_server = $server) =~ s/\$NAME/$config_name/;
 
 	my ($hostname, $path) = split(":", $real_server, 2);
@@ -555,6 +556,8 @@ if (defined $iso_image) {
     print("ISO image created: $CFG::builddir/$iso_image\n");
 }
 
+exit(0) if defined $gen_only;
+
 ## Boot the system using various methods and send serial output to stdout
 
 if (scalar(@scripts) > 1 && ( defined $dhcp_tftp || defined $serial || defined $iprelay)) {
@@ -938,6 +941,10 @@ I<novaboot>.
 Runs I<scons> to build files that are not generated by novaboot
 itself.
 
+=item --gen-only
+
+Exit novaboot after file generation phase.
+
 =back
 
 =head2 Target connection check
-- 
2.39.2