Index: /nodes/genesis-to-py.pl
===================================================================
--- /nodes/genesis-to-py.pl	(revision 6439)
+++ /nodes/genesis-to-py.pl	(revision 6463)
@@ -13,4 +13,6 @@
 do($ARGV[0]) || die;
 
+my %status_labels = ( up => 'up', down => 'dw', planned => 'pl' );
+
 $interfaces = join(',',keys %config);
 if ( ($X =~ /\d+/) and ($Y =~ /\d+/) and ($X > 10) and ($Y > 10)) {
@@ -19,4 +21,6 @@
     $lat = $lon = $h = 0;
 }
+
+$status = $status_labels{$status} || 'up'; # ensure reporting a correct status
 
 print <<EOF;
@@ -29,7 +33,7 @@
 x = $X
 y = $Y
-master_ip = $master_ip
+masterip = $master_ip
 nodetype = $nodetype
-nodename = $nodename
+name = $nodename
 configtype = node
 
@@ -45,5 +49,5 @@
         'dhcp' => 'no',
         'polar' => 'ver',
-        'type' => 'wireless',
+        'type' => '11b',
         'antenna' => 'omni',
         'essid' => 'essid-unused',
@@ -53,5 +57,19 @@
         if ($key and (lc($key) =~ /^[a-z].*/)) {
             #print "$key : $value\n";
-            $tmp{lc($key)} = lc($value);
+            $value = lc($value);
+            if ($key =~ /^type$/i) {
+                if ($value eq 'ethernet') {
+                    $value = 'eth';
+                } else {
+                    $value = '11b';
+                }
+            } elsif ($key =~ /^mode$/i) {
+                if ($value eq 'master') {
+                    $value = 'ms';
+                } else { # managed
+                    $value = 'mn';
+                }
+            }
+            $tmp{lc($key)} = $value;
         }
     }