eewamp bug (work done with @luca-s): the horizontal channel clip mask…

… is not long enough for checking all samples, happens only with combining horizontal channels from faulty sensor continuously close to clipping level.

libs/seiscomp/processing/eewamps/processors/envelope.cpp

@@ -108,6 +108,13 @@ void EnvelopeProcessor::process(const Record *rec, const DoubleArray &data) {
 	Core::Time ts = rec->startTime();
 	const BitSet *clipMask = rec->clipMask();
 
+	if ( clipMask != NULL && ((unsigned int)data.size()) != clipMask->size() ) {
+		SEISCOMP_WARNING("%s: data.size() != clipMask->size() (%d != %zu)",
+		                  rec->streamID().c_str(), 
+						  data.size(), 
+						  clipMask->size());
+	}
+
 	// Process all samples
 	if ( clipMask == NULL ) {
 		for ( int i = 0; i < data.size(); ++i ) {
@@ -135,9 +142,14 @@ void EnvelopeProcessor::process(const Record *rec, const DoubleArray &data) {
 			}
 
 			_samplePool.push(data[i]);
-			if ( clipMask->test(i) )
+			if ( ((unsigned int)i) < clipMask->size() && clipMask->test(i) )
 				_samplePool.clipped = true;
 
+			if ( ((unsigned int)i) >= clipMask->size() ){
+				SEISCOMP_WARNING("%s: cannot check if data[%d] is clipped (clip mask too short) unreliable data.",
+								rec->streamID().c_str(), 
+								i);
+			}
 			ts += _dt;
 		}
 	}

libs/seiscomp/processing/eewamps/recordfilter/gainandbaselinecorrection.cpp

@@ -191,7 +191,15 @@ Record *GainAndBaselineCorrectionRecordFilter<T>::feed(const Record *rec) {
 	}
 
 	if ( clipMask ) {
-		std::cerr << rec->streamID() << ": set clip mask: clipped = " << clipMask->numberOfBitsSet() << std::endl;
+		//std::cerr << rec->streamID() << ": set clip mask: clipped = " << clipMask->numberOfBitsSet() << std::endl;
+		SEISCOMP_INFO("%s: set clip mask: clipped = %zu",
+		              rec->streamID().c_str(), 
+					  clipMask->numberOfBitsSet());
+		SEISCOMP_DEBUG("%s: rec.size()=%d clipMask->size()=%zu correctedData->size()=%d",
+		               rec->streamID().c_str(), 
+					   rec->data()->size(), 
+					   clipMask->size(), 
+					   correctedData->size());
 	}
 
 	*correctedData *= _gainCorrectionFactor;