From fb1593ffedca18d7f1b9530d80ac263aa8a215d7 Mon Sep 17 00:00:00 2001 From: hadaq Date: Thu, 7 May 2015 12:37:39 +0200 Subject: [PATCH] current status, mt --- thresholds/padiwa_status_april.txt | 105 ------------------------ thresholds/thresholds_automatic.pl | 36 +++++--- users/gsi_dirc/addresses_trb3.db | 45 +++++++--- users/gsi_dirc/register_config_tdc.db | 16 ++-- users/gsi_dirc/register_configgbe.db | 6 +- users/gsi_dirc/register_configgbe_ip.db | 12 +-- users/gsi_dirc/start_readout.pl | 18 ++-- 7 files changed, 83 insertions(+), 155 deletions(-) delete mode 100644 thresholds/padiwa_status_april.txt diff --git a/thresholds/padiwa_status_april.txt b/thresholds/padiwa_status_april.txt deleted file mode 100644 index 8602c4d..0000000 --- a/thresholds/padiwa_status_april.txt +++ /dev/null @@ -1,105 +0,0 @@ - - -stronger corrosion: some dirt at the plug, unknown origin - -002 gabi -013 gabi -014 47u 200R -016 gabi -015 47u 200R -022 47u 200R -040 47u 200R -056 47u 200R 2.8V -057 47u 200R 2.8V -059 gabi CS_6-apr-15:some capacitors missing -100 -101 47u 200R -103 -104 47u 200R -105 47u 200R -106 gabi -109 47u 200R -110 -111 gabi -112 gabi -113 gabi -114 -115 47u 200R -116 -118 gabi -119 gabi -120 gabi -123 -124 47u 200R -125 47u 200R -126 -127 gabi 2.8V -128 gabi -129 -130 gabi -131 47u 200R -132 47u 200R -133 gabi 2.8V -134 gabi -135 gabi -137 47u 200R -141 gabi CS_6-apr-15: no 5,8 -143 47u 200R -145 gabi -148 gabi -149 gabi -150 -152 -153 -154 gabi CS_6-apr-15: no 4 -155 gabi CS_6-apr-15: no 14 -156 gabi CS_6-apr-15: no 9 -157 -160 -163 gabi -164 gabi -165 gabi -167 47u 200R -170 -171 47u 200R CS_6-apr-15:tested -172 -176 47u 200R -178 47u 200R -182 47u 200R -181 -183 gabi -188 47u 200R -189 gabi -190 gabi -192 47u 200R -193 47u 200R -195 gabi 2.8V -196 gabi 2.8V -197 gabi 2.8V -198 gabi 2.8V -=== - -missing: 16 - 100,103,110,114,116,123,126,129,150,152,153,157,160,170,172,181 -47u 200R: 25 -gabi: 34 (#59 to reapair) -channel miss 4 - -Haribo box -108 std CS_6-apr-15: no communication uid 0x8000000080010000 -117 std CS_6-apr-15: no communication uid 0x8000100080000000 -136 CS_6-apr-15:disappeared???std broken channels -139 std CS_6-apr-15: no communication uid 0x8000000080010000 -144 std CS_6-apr-15: no communication uid 0x800000008001000 -146 CS_6-apr-15:disappeared??? std channel 7 -162 std CS_6-apr-15: no communication uid 0x800000008001000 -177 std CS_6-apr-15: no communication uid 0x800000008001000 -no power -no power -no power -=== -20 - -no power: 3 -no comm: 6 -missing: 3 diff --git a/thresholds/thresholds_automatic.pl b/thresholds/thresholds_automatic.pl index 5031de2..0775a31 100755 --- a/thresholds/thresholds_automatic.pl +++ b/thresholds/thresholds_automatic.pl @@ -26,6 +26,8 @@ my $share = IPC::ShareLite->new( $share->store("dummy text"); #print "store res: $r\n"; +my $USE_LOCK = 0; + my $hitregister = 0xc001; my @valid_interval = (0x8000, 0x9000); @@ -313,12 +315,17 @@ sub read_thresholds { $share->store($chain); - my $res = $share->lock(LOCK_EX); - if(!defined $res || $res != 1) { - die "could not lock shared element"; + my $res; + + if($USE_LOCK) { + $res = $share->lock(LOCK_EX); + if(!defined $res || $res != 1) { + die "could not lock shared element"; + } } -# my $rh_res = trb_register_write($endpoint,0xd410, 1 << $chain); +my $rh_res; +# $rh_res = trb_register_write($endpoint,0xd410, 1 << $chain); foreach my $current_channel (0 .. 15) { @@ -343,7 +350,9 @@ sub read_thresholds { #sleep 10 if($current_channel == 15 && $chain==1); #sleep 1; - $share->unlock(); + if($USE_LOCK) { + $share->unlock(); + } return \@thresh; @@ -356,11 +365,14 @@ sub write_thresholds { $share->store($chain); - my $res = $share->lock(LOCK_EX); - if(!defined $res || $res != 1) { - die "could not lock shared element"; - } + my $res; + if($USE_LOCK) { + $res = $share->lock(LOCK_EX); + if(!defined $res || $res != 1) { + die "could not lock shared element"; + } + } ### old and wrong way #my $rh_res = trb_register_write($endpoint,0xd410, 1 << $chain); my @range = (0 .. 15); @@ -393,8 +405,10 @@ sub write_thresholds { #sleep 10 if($current_channel == 15 && $chain==1); #sleep 1; - $share->unlock(); - + if($USE_LOCK) { + $share->unlock(); + } + } sub send_command { diff --git a/users/gsi_dirc/addresses_trb3.db b/users/gsi_dirc/addresses_trb3.db index 4823542..d676916 100644 --- a/users/gsi_dirc/addresses_trb3.db +++ b/users/gsi_dirc/addresses_trb3.db @@ -10,17 +10,36 @@ 0x8103 56 3 0x7999 56 5 -# test board 1 -0x0110 83 0 -0x0111 83 1 -0x0112 83 2 -0x0113 83 3 -0x8000 83 5 - -# test board 2 -0x0210 84 0 -0x0211 84 1 -0x0212 84 2 -0x0213 84 3 -0x8001 84 5 +0x2000 72 0 +0x2001 72 1 +0x2002 72 2 +0x2003 72 3 +0x8000 72 5 + +0x2004 99 0 +0x2005 99 1 +0x2006 99 2 +0x2007 99 3 +0x8001 99 5 + + +0x2008 101 0 +0x2009 101 1 +0x2010 101 2 +0x2011 101 3 +0x8002 101 5 + +0x2012 74 0 +0x2013 74 1 +0x2014 74 2 +0x2015 74 3 +0x8003 74 5 + +0x2016 104 0 +0x2017 104 1 +0x2018 104 2 +0x2019 104 3 +0x8004 104 5 + + diff --git a/users/gsi_dirc/register_config_tdc.db b/users/gsi_dirc/register_config_tdc.db index 25ff1a4..66789a1 100644 --- a/users/gsi_dirc/register_config_tdc.db +++ b/users/gsi_dirc/register_config_tdc.db @@ -9,13 +9,13 @@ !Value table # Hub # Type # lower 32 channels # upper 32 channels # ################################################################# - 0x0110 0 0xffffffff 0x00000000 - 0x0111 0 0xffffffff 0x00000000 - 0x0112 0 0xffffffff 0x00000000 - 0x0113 0 0xffffffff 0x00000000 + 0x0010 0 0xffffffff 0x00000000 + 0x0011 0 0xffffffff 0x00000000 + 0x0012 0 0xffffffff 0x00000000 + 0x0013 0 0xffffffff 0x00000000 - 0x0210 0 0xffffffff 0x00000000 - 0x0211 0 0xffffffff 0x00000000 - 0x0212 0 0xffffffff 0x00000000 - 0x0213 0 0xffffffff 0x00000000 + 0x0014 0 0xffffffff 0x00000000 + 0x0015 0 0xffffffff 0x00000000 + 0x0016 0 0xffffffff 0x00000000 + 0x0017 0 0xffffffff 0x00000000 diff --git a/users/gsi_dirc/register_configgbe.db b/users/gsi_dirc/register_configgbe.db index 375c121..ef16b5a 100755 --- a/users/gsi_dirc/register_configgbe.db +++ b/users/gsi_dirc/register_configgbe.db @@ -14,9 +14,9 @@ 0x7999 0 0x7999 0x00020001 0x00030064 0x1DE8 0x578 1 0 1 1 0x1 0x8000 0 0x8000 0x00020001 0x00030064 0x1DE8 0x578 1 0 1 1 0x0 0x8001 0 0x8001 0x00020001 0x00030064 0x1DE8 0x578 1 0 1 1 0x0 -# 0x8002 0 0x8002 0x00020001 0x00030064 0x1DE8 0x578 1 0 1 1 0x0 -# 0x8003 0 0x8003 0x00020001 0x00030064 0x1DE8 0x578 1 0 1 1 0x0 -# 0x8004 0 0x8004 0x00020001 0x00030064 0x1DE8 0x578 1 0 1 1 0x0 + 0x8002 0 0x8002 0x00020001 0x00030064 0x1DE8 0x578 1 0 1 1 0x0 + 0x8003 0 0x8003 0x00020001 0x00030064 0x1DE8 0x578 1 0 1 1 0x0 + 0x8004 0 0x8004 0x00020001 0x00030064 0x1DE8 0x578 1 0 1 1 0x0 # 0x8005 0 0x8005 0x00020001 0x00030064 0x1DE8 0x578 1 0 1 1 0x0 # 0x8006 0 0x8006 0x00020001 0x00030064 0x1DE8 0x578 1 0 1 1 0x0 # 0x8007 0 0x8007 0x00020001 0x00030064 0x1DE8 0x578 1 0 1 1 0x0 diff --git a/users/gsi_dirc/register_configgbe_ip.db b/users/gsi_dirc/register_configgbe_ip.db index b86f947..dd3c8ac 100755 --- a/users/gsi_dirc/register_configgbe_ip.db +++ b/users/gsi_dirc/register_configgbe_ip.db @@ -28,12 +28,12 @@ # Hub # Type # C0 # C1 # C2 # C3 # C4 # C5 # C6 # C7 # C8 # ######################################################################################################################################## - 0x7999 0 0x7a0b83ca 0x0cc4 0xc0a80002 0xc350 0xdead8000 0x001b 0xc0a80000 0xc350 0x0578 - 0x8000 0 0x7a0b83ca 0x0cc4 0xc0a80002 0xc351 0xdead8001 0x001b 0xc0a80001 0xc351 0x0578 - 0x8001 0 0x7a0b83ca 0x0cc4 0xc0a80002 0xc352 0xdead8002 0x001b 0xc0a80002 0xc352 0x0578 -# 0x8002 0 0x7a0b83ca 0x0cc4 0xc0a80002 0xc353 0xdead8003 0x001b 0xc0a80003 0xc353 0x0578 -# 0x8003 0 0x7a0b83ca 0x0cc4 0xc0a80002 0xc354 0xdead8004 0x001b 0xc0a80004 0xc354 0x0578 -# 0x8004 0 0x7a0b83ca 0x0cc4 0xc0a80002 0xc355 0xdead8005 0x001b 0xc0a80005 0xc355 0x0578 + 0x7999 0 0x1e04f330 0x000e 0xc0a80003 0xc350 0xdead8000 0x001b 0xc0a80000 0xc350 0x0578 + 0x8000 0 0x1e04f330 0x000e 0xc0a80003 0xc351 0xdead8001 0x001b 0xc0a80001 0xc351 0x0578 + 0x8001 0 0x1e04f330 0x000e 0xc0a80003 0xc352 0xdead8002 0x001b 0xc0a80002 0xc352 0x0578 + 0x8002 0 0x1e04f330 0x000e 0xc0a80003 0xc353 0xdead8003 0x001b 0xc0a80003 0xc353 0x0578 + 0x8003 0 0x1e04f330 0x000e 0xc0a80003 0xc354 0xdead8004 0x001b 0xc0a80004 0xc354 0x0578 + 0x8004 0 0x1e04f330 0x000e 0xc0a80003 0xc355 0xdead8005 0x001b 0xc0a80005 0xc355 0x0578 # 0x8005 0 0x7a0b83ca 0x0cc4 0xc0a80002 0xc356 0xdead8006 0x001b 0xc0a80006 0xc356 0x0578 # 0x8006 0 0x7a0b83ca 0x0cc4 0xc0a80002 0xc357 0xdead8007 0x001b 0xc0a80007 0xc357 0x0578 # 0x8007 0 0x7a0b83ca 0x0cc4 0xc0a80002 0xc358 0xdead8008 0x001b 0xc0a80008 0xc358 0x0578 diff --git a/users/gsi_dirc/start_readout.pl b/users/gsi_dirc/start_readout.pl index ad23772..46b5bc5 100755 --- a/users/gsi_dirc/start_readout.pl +++ b/users/gsi_dirc/start_readout.pl @@ -5,11 +5,6 @@ use Getopt::Long; my $help = ""; my $dataPath = "/d/"; -my $source1 = "50000"; # don't use 50001 -my $source2 = "50002"; # it is assigned for GbE debug -my $source3 = "50003"; -my $source4 = "50004"; -my $source5 = "50005"; my $label = "test"; my $time = -1; my $c; @@ -37,15 +32,20 @@ $c=qq|pkill -f "daq_evtbuild -S $label"|; qx($c); # if any, kill existing daq_ev $c=qq|pkill -f "daq_netmem -S $label"|; qx($c); # if any, kill existing daq_netmem -#$c=qq|xterm -geometry 122x14-0+0 -e bash -c 'daq_evtbuild -S $label -m 2 -x cc -d file -o $dataPath'|; -$c=qq|xterm -geometry 122x16-0+0 -e bash -c 'daq_evtbuild -S $label -m 23 -x cc -d file -o $dataPath'|; +$c=qq|xterm -geometry 122x14-0+0 -e bash -c 'daq_evtbuild -S $label -m 6 -x cc -d file -o $dataPath'|; +#$c=qq|xterm -geometry 122x16-0+0 -e bash -c 'daq_evtbuild -S $label -m 23 -x cc -d file -o $dataPath'|; #print $c; system("$c &"); sleep 1; -#$c=qq"xterm -geometry 82x17-0+210 -e bash -c 'daq_netmem -S $label -m 2 -i UDP:127.0.0.1:50016 -i UDP:127.0.0.1:50022 '"; -$c=qq"xterm -geometry 82x44-0+234 -e bash -c 'daq_netmem -S $label -m 23 -i UDP:127.0.0.1:50000 -i UDP:127.0.0.1:50001 -i UDP:127.0.0.1:50002 -i UDP:127.0.0.1:50003 -i UDP:127.0.0.1:50004 -i UDP:127.0.0.1:50005 -i UDP:127.0.0.1:50006 -i UDP:127.0.0.1:50007 -i UDP:127.0.0.1:50008 -i UDP:127.0.0.1:50009 -i UDP:127.0.0.1:50010 -i UDP:127.0.0.1:50011 -i UDP:127.0.0.1:50012 -i UDP:127.0.0.1:50013 -i UDP:127.0.0.1:50014 -i UDP:127.0.0.1:50015 -i UDP:127.0.0.1:50016 -i UDP:127.0.0.1:50017 -i UDP:127.0.0.1:50018 -i UDP:127.0.0.1:50019 -i UDP:127.0.0.1:50020 -i UDP:127.0.0.1:50021 -i UDP:127.0.0.1:50022; sleep 2'"; +$c=qq"xterm -geometry 82x17-0+210 -e bash -c 'daq_netmem -S $label -m 6 -i UDP:127.0.0.1:50000 -i UDP:127.0.0.1:50001 -i UDP:127.0.0.1:50002 -i UDP:127.0.0.1:50003 -i UDP:127.0.0.1:50004 -i UDP:127.0.0.1:50005 '"; + + + + + +#$c=qq"xterm -geometry 82x44-0+234 -e bash -c 'daq_netmem -S $label -m 23 -i UDP:127.0.0.1:50000 -i UDP:127.0.0.1:50001 -i UDP:127.0.0.1:50002 -i UDP:127.0.0.1:50003 -i UDP:127.0.0.1:50004 -i UDP:127.0.0.1:50005 -i UDP:127.0.0.1:50006 -i UDP:127.0.0.1:50007 -i UDP:127.0.0.1:50008 -i UDP:127.0.0.1:50009 -i UDP:127.0.0.1:50010 -i UDP:127.0.0.1:50011 -i UDP:127.0.0.1:50012 -i UDP:127.0.0.1:50013 -i UDP:127.0.0.1:50014 -i UDP:127.0.0.1:50015 -i UDP:127.0.0.1:50016 -i UDP:127.0.0.1:50017 -i UDP:127.0.0.1:50018 -i UDP:127.0.0.1:50019 -i UDP:127.0.0.1:50020 -i UDP:127.0.0.1:50021 -i UDP:127.0.0.1:50022; sleep 2'"; #$c=qq"xterm -geometry 82x17-0+210 -e bash -c 'daq_netmem -S $label -m 2 -i UDP:127.0.0.1:50000 -i UDP:127.0.0.1:50002'"; -- 2.43.0