]> jspc29.x-matter.uni-frankfurt.de Git - mimosis_chain.git/commitdiff
changed mimosis_i2c_cmd.pl
authorBenedikt Gutsche <b.gutsche@gsi.de>
Mon, 27 Feb 2023 13:00:06 +0000 (14:00 +0100)
committerBenedikt Gutsche <b.gutsche@gsi.de>
Mon, 27 Feb 2023 13:00:06 +0000 (14:00 +0100)
scripts/mimosis_i2c_cmd.pl

index 13a13fded9dbb84fa55941123b740c6a3fc22199..8d9127a26eac5ec66eb330d403832fad7a697ac2 100755 (executable)
@@ -11,7 +11,7 @@ my ( $fpga, $addr, $cmd, $cmd_t, $data, $data_t, $word );
 
 Getopt::Long::Configure(qw(gnu_getopt));
 GetOptions(
-    "fpga|f=s"         => \$fpga,
+    "fpga|f=s"         => \$fpga_t,
     "mimosis-reg|r=s"  => \$reg_t,
     "mimosis-data|d=s" => \$data_t,
     "help|h"           => \$help_t,
@@ -28,19 +28,20 @@ END_MESSAGE
     exit();
 }
 
-defined($fpga) ? $fpga = hex($fpga) : die print("Must provide FPGA address.\n");
-defined($reg_t)
-  ? $reg_t = hex($reg_t)
-  : die print("Must provide Mimosis register.\n");
+if ( defined $fpga_t && defined $reg_t) {
+       $fpga_t = hex $fpga_t  if ( $fpga_t =~ /^0x/ );
+       $reg_t  = hex $reg_t if ( $reg_t =~ /^0x/ );
+}
+else {die print "Must provide FPGA address and register.\n";}
 
 trb_init_ports() or die trb_strerror();
 
 if ( defined($data_t) ) {
     $data_t = hex($data_t) if ( $data_t =~ /^0x/ );
-    Mimosis::mimosis_register_write( $fpga, $reg_t, $data_t );
+    Mimosis::mimosis_register_write( $fpga_t, $reg_t, $data_t );
     exit();
 }
 else {
-    printf "%x\n", Mimosis::mimosis_register_read( $fpga, $reg_t );
+    printf "%x\n", Mimosis::mimosis_register_read( $fpga_t, $reg_t );
     exit();
 }