Beginning of interactive configuration

src/freedombone

@@ -377,6 +377,61 @@ function show_help {
   exit 0
 }
 
+function interactive_configuration {
+  dialog --title "Install Target" \
+      --backtitle "Freedombone Configuration" \
+      --defaultno \
+      --yesno "\nAre you installing onto a Beaglebone Black?" 7 60
+  sel=$?
+  echo "Result $sel"
+  case $sel in
+      0) INSTALLING_ON_BBB="yes";;
+      1) INSTALLING_ON_BBB="no";;
+      255) exit 0;;
+  esac
+
+  dialog --backtitle "Freedombone Configuration" \
+      --checklist "Choose Dynamic DNS provider:" 15 40 14 \
+      1 dyndns off \
+      2 freedns on \
+      3 zoneedit off \
+      4 no-ip off \
+      5 easydns off \
+      6 tzo off \
+      7 3322 off \
+      8 dnsomatic off \
+      9 tunnelbroker off \
+      10 dns.he.net off \
+      11 dynsip off \
+      12 sitelutions off \
+      13 dnsexit off \
+      14 changeip off
+  sel=$?
+  case $sel in
+      1) DDNS_PROVIDER="default@dyndns.org";;
+      2) DDNS_PROVIDER="default@freedns.afraid.org";;
+      3) DDNS_PROVIDER="default@zoneedit.com";;
+      4) DDNS_PROVIDER="default@no-ip.com";;
+      5) DDNS_PROVIDER="default@easydns.com";;
+      6) DDNS_PROVIDER="default@tzo.com";;
+      7) DDNS_PROVIDER="dyndns@3322.org";;
+      8) DDNS_PROVIDER="default@dnsomatic.com";;
+      9) DDNS_PROVIDER="ipv6tb@he.net";;
+      10) DDNS_PROVIDER="dyndns@he.net";;
+      11) DDNS_PROVIDER="default@dynsip.org";;
+      12) DDNS_PROVIDER="default@sitelutions.com";;
+      13) DDNS_PROVIDER="default@dnsexit.com";;
+      14) DDNS_PROVIDER="default@changeip.com";;
+      255) exit 0;;
+  esac
+
+  exit 0
+}
+
+if [[ $1 == "menuconfig" ]]; then
+    interactive_configuration
+else
+
 # Oddly it appears that command line parsing cannot be done inside of a function
 while [[ $# > 1 ]]
 do
@@ -531,6 +586,7 @@ case $key in
 esac
 shift
 done
+fi
 
 function parse_args {
   if [[ $NO_OF_ARGS == 0 ]]; then