+++ /dev/null
-
-
-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
$share->store("dummy text");
#print "store res: $r\n";
+my $USE_LOCK = 0;
+
my $hitregister = 0xc001;
my @valid_interval = (0x8000, 0x9000);
$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) {
#sleep 10 if($current_channel == 15 && $chain==1);
#sleep 1;
- $share->unlock();
+ if($USE_LOCK) {
+ $share->unlock();
+ }
return \@thresh;
$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);
#sleep 10 if($current_channel == 15 && $chain==1);
#sleep 1;
- $share->unlock();
-
+ if($USE_LOCK) {
+ $share->unlock();
+ }
+
}
sub send_command {
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
+
+
!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
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
# 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
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;
$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'";