show/hide of conversion tools

diff --git a/layout/jtageditor_blue.css b/layout/jtageditor_blue.css
index 84e7c60b31d6e9d5246434ed2577b08cfcac65e9..081f15601215f72371fff4fdec53744f4d1fa686 100644 (file)
--- a/layout/jtageditor_blue.css
+++ b/layout/jtageditor_blue.css
@@ -190,6 +190,15 @@ tr.bitfield{
     cursor:auto;
 }
 
+table.conversion {
+  visibility:collapse;
+  font-size:9pt;
+}
+
+tr.fileLevel:hover td table.conversion {
+  visibility:visible;
+}
+
 table.registers tr.bitfield td:first-child{
     background:transparent;
     cursor:default;

diff --git a/tools/xmlOperation.pl b/tools/xmlOperation.pl
index fcb069f3d9a679d7325ea814140406af8d6192fe..7c75f5376d84ba7e654e56f89589991798c62f01 100755 (executable)
--- a/tools/xmlOperation.pl
+++ b/tools/xmlOperation.pl
@@ -39,8 +39,8 @@ unless ($q->param()){
   print br,br;
   print "possible actions: save, delete, copyDefaultRegister, createFile, deleteFile, changeAncestor",br,br;
   print "parameter summary:",br;
-  print "save a value into a specific field:",br;
-  print escapeHTML("action=save&configFile=[configFile]&register=[register]&field=[field]&value=[value]"),br,br;
+  print "save a value into a specific field, optional: if you enter a numeric base, value will be saved in the specified format.:",br;
+  print escapeHTML("action=save&configFile=[configFile]&register=[register]&field=[field]&value=[value]&base=[base]"),br,br;
   print "delete a specific field:",br;
   print escapeHTML("action=delete&configFile=[configFile]&register=[register]&field=[field]"),br,br;
   print "delete a whole register:",br;

diff --git a/tools/xmlOperations.pm b/tools/xmlOperations.pm
index 72363b66fed0729b2346209330140a8029224d2b..b7c736908dc9fa4d51fbf455290bf6134d734b2e 100644 (file)
--- a/tools/xmlOperations.pm
+++ b/tools/xmlOperations.pm
@@ -351,7 +351,7 @@ sub save {
   my $fieldName    = $_[1];
   my $xmlfile      = $configFile;
   my $newValue;
-  $newValue     = $_[2];
+  $newValue        = $_[2];
   my $base         = $_[3];
   
   my $xmltree = $configTree;
@@ -403,10 +403,13 @@ sub save {
 #   print SCHREIBEN $xmltree->toString();
 #   close SCHREIBEN;
 }
-# args: registerName,fieldName,newValue
+# args: registerName,fieldName,newValue,base
 # globs: $configFile,$configTree,
 # description: saves value "newValue" in field "fieldName" in register "registerName" (in the $configTree)
 # if field or register does not exist yet, it is created.
+# If you enter "hex", "dec" or "bin" for base, the value gets converted to the
+# corresponding number format. If only base and no newValue is given, the
+# current value wil be converted to the new base.
 # make change permanent by calling writeConfigFile() hereafter.
 
 sub copyDefaultRegister {

diff --git a/tools/xmlRendering.pm b/tools/xmlRendering.pm
index 9a1e1cb086c4e84845fab59e3741902185296213..1945906e1a2d972e8eab982cdb4e5f4119d34d2c 100644 (file)
--- a/tools/xmlRendering.pm
+++ b/tools/xmlRendering.pm
@@ -230,34 +230,29 @@ sub print_fields {
     print "<td width=120 title=\"$fieldDescr\"";
     print ">$fieldName</td>";
     print "<td> &nbsp;=&nbsp;</td>";
+#     print "<td>";
+#     print_conversionMenu($registerName,$fieldName);
+#     print "</td>";
     if ($readOnlyFlag) {
       print <<EOF;
     <td width=120  align='right'>$fieldValue</td>
 EOF
     }
     else {
-      print <<EOF;
+      print qq%
 <td align='right'>
-<input type='text' align='right' value='$fieldValue' onchange='saveSettings("$configFileName","$registerName","$fieldName",this.value);$editorRefreshCommand'  >
-</td>
-EOF
+<input type='text' align='right' value='$fieldValue' onchange='saveSettings("$configFileName","$registerName","$fieldName",this.value);$editorRefreshCommand'  >%;
+
+     print_conversionMenu($registerName,$fieldName);
+     
+print "</td>";
 
     }
     
     print '</td>';
-    if ( $xmlfile eq $configFile) {
-    print qq%<td onclick='baseConversion("$configFileName","$registerName","$fieldName","hex");$editorRefreshCommand'>%;
-    print "H";
-    print "</td>";
-#     print "<td>";
-    print qq%<td onclick='baseConversion("$configFileName","$registerName","$fieldName","bin");$editorRefreshCommand'>%;
-    print "B";
-    print "</td>";
-#     print "<td>";
-    print qq%<td onclick='baseConversion("$configFileName","$registerName","$fieldName","dec");$editorRefreshCommand'>%;
-    print "D";
-    print "</td>";
-    }
+#     if ( $xmlfile eq $configFile and $isHeritageFrom eq "") {
+#     print_conversionMenu($registerName,$fieldName);
+#     }
     if ( $xmlfile eq $specFile ) { # we are printing the Specifications tree
       print <<EOF;
 <td class='button_move' onclick='saveSettings("$configFileName","$registerName","$fieldName","$fieldValue");$editorRefreshCommand'>&nbsp;&rarr;&nbsp;</td>
@@ -305,6 +300,47 @@ EOF
 
 }
 
+sub print_conversionMenu {
+    
+    my $configFileName= getConfigFileName();
+    my $registerName = shift();
+    my $fieldName = shift();
+    
+    print "<table class='conversion'><tr><td>";
+    print qq%<a onclick='baseConversion("$configFileName","$registerName","$fieldName","hex");$editorRefreshCommand'>%;
+    print "hex ";
+    print "</a>";
+#     print "<td>";
+    print qq%<a onclick='baseConversion("$configFileName","$registerName","$fieldName","bin");$editorRefreshCommand'>%;
+    print "bin ";
+    print "</a>";
+#     print "<td>";
+    print qq%<a onclick='baseConversion("$configFileName","$registerName","$fieldName","dec");$editorRefreshCommand'>%;
+    print "dec";
+    print "</a>";
+    print "</td></tr></table>";
+    
+}
+
+sub print_conversionMenu_bak {
+    
+    my $configFileName= getConfigFileName();
+    my $registerName = shift();
+    my $fieldName = shift();
+    print qq%<td onclick='baseConversion("$configFileName","$registerName","$fieldName","hex");$editorRefreshCommand'>%;
+    print "H";
+    print "</td>";
+#     print "<td>";
+    print qq%<td onclick='baseConversion("$configFileName","$registerName","$fieldName","bin");$editorRefreshCommand'>%;
+    print "B";
+    print "</td>";
+#     print "<td>";
+    print qq%<td onclick='baseConversion("$configFileName","$registerName","$fieldName","dec");$editorRefreshCommand'>%;
+    print "D";
+    print "</td>";
+    
+}
+
 
 
 1;