mirror of
https://gitea.osmocom.org/cellular-infrastructure/osmo-trx.git
synced 2025-11-04 14:13:29 +00:00
Compare commits
200 Commits
| Author | SHA1 | Date | |
|---|---|---|---|
|
|
78e1cd20e2 | ||
|
|
db9c1b54cb | ||
|
|
099a44abfb | ||
|
|
8c80095017 | ||
|
|
d49a6aa136 | ||
|
|
81486e053c | ||
|
|
28d8081e25 | ||
|
|
87ed77b937 | ||
|
|
f9d996813d | ||
|
|
aa5acc953c | ||
|
|
934da48618 | ||
|
|
7c405a0c1f | ||
|
|
4cafb0fa15 | ||
|
|
f611569018 | ||
|
|
354741326c | ||
|
|
d2e5c5694e | ||
|
|
a3dce85ffc | ||
|
|
bb0c68ae61 | ||
|
|
87d158cc2d | ||
|
|
7278a87767 | ||
|
|
63eef9faf2 | ||
|
|
d67bd603e9 | ||
|
|
988a464d5d | ||
|
|
1b6ab7d7ee | ||
|
|
980525c8a9 | ||
|
|
70134a01eb | ||
|
|
1fb0ce67d8 | ||
|
|
8ca237b5c2 | ||
|
|
082bbbf8fe | ||
|
|
3bd763d2a1 | ||
|
|
ee57357682 | ||
|
|
8537b90dbe | ||
|
|
038fd7fd70 | ||
|
|
0cd246c27a | ||
|
|
61fbf2ec95 | ||
|
|
15f9d95f5f | ||
|
|
73dbccda78 | ||
|
|
5e65b531e0 | ||
|
|
b992d0a515 | ||
|
|
d6ae8648ff | ||
|
|
e51a8f029e | ||
|
|
e8ae9fcf38 | ||
|
|
f5bf33b287 | ||
|
|
fe9769833f | ||
|
|
7e07cf2346 | ||
|
|
dfe0aef184 | ||
|
|
131f82bfac | ||
|
|
78b5627fa1 | ||
|
|
de116e90c0 | ||
|
|
15da7e1f7e | ||
|
|
6031734f44 | ||
|
|
5d2a36a113 | ||
|
|
2af14407a8 | ||
|
|
92bdfb86ac | ||
|
|
ae91f13ecb | ||
|
|
9d53ecf666 | ||
|
|
e0c12189d4 | ||
|
|
1470fcdb5a | ||
|
|
6e1dffd486 | ||
|
|
0229d22d2e | ||
|
|
f7717acd0c | ||
|
|
b34e60c105 | ||
|
|
4e6c938024 | ||
|
|
4aa548f0c2 | ||
|
|
f9e78beea5 | ||
|
|
f0189c47be | ||
|
|
c708816be1 | ||
|
|
e56bf3a0e5 | ||
|
|
38b69871ae | ||
|
|
7db522b6d9 | ||
|
|
ae09b04e26 | ||
|
|
b61c610cd9 | ||
|
|
132fb247b1 | ||
|
|
1c0b8b355c | ||
|
|
1dd05cf35a | ||
|
|
14d13b67dc | ||
|
|
89bca9b2de | ||
|
|
9270a5aa2e | ||
|
|
4793f4679b | ||
|
|
802b86502d | ||
|
|
a93f789e50 | ||
|
|
72bf762b42 | ||
|
|
2dee3e996e | ||
|
|
1f1cebb2e5 | ||
|
|
d1b28bd766 | ||
|
|
833e97e9ba | ||
|
|
e6d059f0c9 | ||
|
|
012a1b345b | ||
|
|
80cb08071b | ||
|
|
44c7f41d75 | ||
|
|
9436fbbf3c | ||
|
|
93ca09ea61 | ||
|
|
365bc38bee | ||
|
|
43242efc85 | ||
|
|
76b98cf236 | ||
|
|
aa15d62a8c | ||
|
|
2e5e2c537b | ||
|
|
8f0ccf618d | ||
|
|
06676ead63 | ||
|
|
4609f3285c | ||
|
|
7c741ec6a6 | ||
|
|
2f3e60bc1f | ||
|
|
cbfef6e40a | ||
|
|
b577ef014f | ||
|
|
c37594f3b9 | ||
|
|
ffee30d190 | ||
|
|
24575a6530 | ||
|
|
1e9801411b | ||
|
|
64464e6c34 | ||
|
|
e88710881b | ||
|
|
a84e162672 | ||
|
|
7676427816 | ||
|
|
35222296fe | ||
|
|
28670fb5da | ||
|
|
05c6feb71d | ||
|
|
2e4ed10722 | ||
|
|
c8c4eac55e | ||
|
|
37c52c79cf | ||
|
|
58e9591f9e | ||
|
|
19174f581b | ||
|
|
1ba69e7762 | ||
|
|
f931cf226b | ||
|
|
e476231deb | ||
|
|
e90c24c8d5 | ||
|
|
3b093bb13b | ||
|
|
3f4a13f049 | ||
|
|
0fe41a583c | ||
|
|
a5e0f1cdba | ||
|
|
2c650a6895 | ||
|
|
d4555f267e | ||
|
|
047956259b | ||
|
|
d2b070369d | ||
|
|
9664c3a6e7 | ||
|
|
1ab5e7f7bc | ||
|
|
5efe05021a | ||
|
|
78d1fc9a13 | ||
|
|
a8cf208616 | ||
|
|
f84232d30a | ||
|
|
9bd649ec73 | ||
|
|
871b87829f | ||
|
|
d17b189cbc | ||
|
|
7fec3030d4 | ||
|
|
af717b2d3c | ||
|
|
8ee2f38a87 | ||
|
|
4dfd64aa9e | ||
|
|
b0aefcbf47 | ||
|
|
d325343ecc | ||
|
|
5cd70dc4ec | ||
|
|
465694027b | ||
|
|
2079a3c664 | ||
|
|
99cf930f9a | ||
|
|
283b22dbce | ||
|
|
f147b17447 | ||
|
|
d4d3daa12e | ||
|
|
c312905f43 | ||
|
|
c4eab8795f | ||
|
|
cc6f79b1c0 | ||
|
|
5a0680655f | ||
|
|
3722920100 | ||
|
|
f3b9af65ed | ||
|
|
e692ce986c | ||
|
|
81c6873205 | ||
|
|
c052aa1d4c | ||
|
|
130a8007fa | ||
|
|
72e8619632 | ||
|
|
2beb1adcea | ||
|
|
2b542100a0 | ||
|
|
2268c8558c | ||
|
|
50747dc65d | ||
|
|
1e9b4d57da | ||
|
|
954b118bfa | ||
|
|
dbe26abcb9 | ||
|
|
e8905a03a5 | ||
|
|
909ffbfd23 | ||
|
|
351fd76706 | ||
|
|
6a2bf0d87b | ||
|
|
2966048b07 | ||
|
|
f5fd578d60 | ||
|
|
57ef87d061 | ||
|
|
5721920a08 | ||
|
|
194a9b1982 | ||
|
|
1fe5282133 | ||
|
|
4438a9fd8f | ||
|
|
64ad712daa | ||
|
|
5c7c178369 | ||
|
|
90f7a01d1d | ||
|
|
e171425b99 | ||
|
|
4d029d8965 | ||
|
|
6613331459 | ||
|
|
577cd020c1 | ||
|
|
88bbf1aafd | ||
|
|
2cc2ddda41 | ||
|
|
d7610cf0b8 | ||
|
|
722d4f70a4 | ||
|
|
93b7f37309 | ||
|
|
4ad9ea69ab | ||
|
|
eb54bddf47 | ||
|
|
a4d1a41244 | ||
|
|
b999759175 | ||
|
|
1ae25561fa |
46
.gitignore
vendored
Normal file
46
.gitignore
vendored
Normal file
@@ -0,0 +1,46 @@
|
|||||||
|
# build results
|
||||||
|
*.o
|
||||||
|
*.lo
|
||||||
|
*.la
|
||||||
|
Transceiver52M/osmo-trx
|
||||||
|
|
||||||
|
# tests
|
||||||
|
CommonLibs/BitVectorTest
|
||||||
|
CommonLibs/ConfigurationTest
|
||||||
|
CommonLibs/F16Test
|
||||||
|
CommonLibs/InterthreadTest
|
||||||
|
CommonLibs/LogTest
|
||||||
|
CommonLibs/RegexpTest
|
||||||
|
CommonLibs/SocketsTest
|
||||||
|
CommonLibs/TimevalTest
|
||||||
|
CommonLibs/URLEncodeTest
|
||||||
|
CommonLibs/VectorTest
|
||||||
|
CommonLibs/PRBSTest
|
||||||
|
|
||||||
|
# automake/autoconf
|
||||||
|
*.in
|
||||||
|
.deps
|
||||||
|
.libs
|
||||||
|
.dirstamp
|
||||||
|
*~
|
||||||
|
Makefile
|
||||||
|
config.log
|
||||||
|
config.status
|
||||||
|
config.h
|
||||||
|
config.guess
|
||||||
|
config.sub
|
||||||
|
config/*
|
||||||
|
configure
|
||||||
|
compile
|
||||||
|
aclocal.m4
|
||||||
|
autom4te.cache
|
||||||
|
depcomp
|
||||||
|
install-sh
|
||||||
|
libtool
|
||||||
|
ltmain.sh
|
||||||
|
missing
|
||||||
|
stamp-h1
|
||||||
|
INSTALL
|
||||||
|
|
||||||
|
# vim
|
||||||
|
*.sw?
|
||||||
3
.gitreview
Normal file
3
.gitreview
Normal file
@@ -0,0 +1,3 @@
|
|||||||
|
[gerrit]
|
||||||
|
host=gerrit.osmocom.org
|
||||||
|
project=osmo-trx
|
||||||
@@ -30,6 +30,7 @@
|
|||||||
#include <iostream>
|
#include <iostream>
|
||||||
#include <stdio.h>
|
#include <stdio.h>
|
||||||
#include <sstream>
|
#include <sstream>
|
||||||
|
#include <math.h>
|
||||||
|
|
||||||
using namespace std;
|
using namespace std;
|
||||||
|
|
||||||
@@ -199,49 +200,6 @@ void BitVector::LSB8MSB()
|
|||||||
|
|
||||||
|
|
||||||
|
|
||||||
uint64_t BitVector::syndrome(Generator& gen) const
|
|
||||||
{
|
|
||||||
gen.clear();
|
|
||||||
const char *dp = mStart;
|
|
||||||
while (dp<mEnd) gen.syndromeShift(*dp++);
|
|
||||||
return gen.state();
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
uint64_t BitVector::parity(Generator& gen) const
|
|
||||||
{
|
|
||||||
gen.clear();
|
|
||||||
const char *dp = mStart;
|
|
||||||
while (dp<mEnd) gen.encoderShift(*dp++);
|
|
||||||
return gen.state();
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
void BitVector::encode(const ViterbiR2O4& coder, BitVector& target)
|
|
||||||
{
|
|
||||||
size_t sz = size();
|
|
||||||
assert(sz*coder.iRate() == target.size());
|
|
||||||
|
|
||||||
// Build a "history" array where each element contains the full history.
|
|
||||||
uint32_t history[sz];
|
|
||||||
uint32_t accum = 0;
|
|
||||||
for (size_t i=0; i<sz; i++) {
|
|
||||||
accum = (accum<<1) | bit(i);
|
|
||||||
history[i] = accum;
|
|
||||||
}
|
|
||||||
|
|
||||||
// Look up histories in the pre-generated state table.
|
|
||||||
char *op = target.begin();
|
|
||||||
for (size_t i=0; i<sz; i++) {
|
|
||||||
unsigned index = coder.cMask() & history[i];
|
|
||||||
for (unsigned g=0; g<coder.iRate(); g++) {
|
|
||||||
*op++ = coder.stateTable(g,index);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
unsigned BitVector::sum() const
|
unsigned BitVector::sum() const
|
||||||
{
|
{
|
||||||
unsigned sum = 0;
|
unsigned sum = 0;
|
||||||
@@ -287,148 +245,12 @@ ostream& operator<<(ostream& os, const BitVector& hv)
|
|||||||
|
|
||||||
|
|
||||||
|
|
||||||
ViterbiR2O4::ViterbiR2O4()
|
|
||||||
{
|
|
||||||
assert(mDeferral < 32);
|
|
||||||
mCoeffs[0] = 0x019;
|
|
||||||
mCoeffs[1] = 0x01b;
|
|
||||||
computeStateTables(0);
|
|
||||||
computeStateTables(1);
|
|
||||||
computeGeneratorTable();
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
void ViterbiR2O4::initializeStates()
|
|
||||||
{
|
|
||||||
for (unsigned i=0; i<mIStates; i++) clear(mSurvivors[i]);
|
|
||||||
for (unsigned i=0; i<mNumCands; i++) clear(mCandidates[i]);
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
void ViterbiR2O4::computeStateTables(unsigned g)
|
|
||||||
{
|
|
||||||
assert(g<mIRate);
|
|
||||||
for (unsigned state=0; state<mIStates; state++) {
|
|
||||||
// 0 input
|
|
||||||
uint32_t inputVal = state<<1;
|
|
||||||
mStateTable[g][inputVal] = applyPoly(inputVal, mCoeffs[g], mOrder+1);
|
|
||||||
// 1 input
|
|
||||||
inputVal |= 1;
|
|
||||||
mStateTable[g][inputVal] = applyPoly(inputVal, mCoeffs[g], mOrder+1);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
void ViterbiR2O4::computeGeneratorTable()
|
|
||||||
{
|
|
||||||
for (unsigned index=0; index<mIStates*2; index++) {
|
|
||||||
mGeneratorTable[index] = (mStateTable[0][index]<<1) | mStateTable[1][index];
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
void ViterbiR2O4::branchCandidates()
|
|
||||||
{
|
|
||||||
// Branch to generate new input states.
|
|
||||||
const vCand *sp = mSurvivors;
|
|
||||||
for (unsigned i=0; i<mNumCands; i+=2) {
|
|
||||||
// extend and suffix
|
|
||||||
const uint32_t iState0 = (sp->iState) << 1; // input state for 0
|
|
||||||
const uint32_t iState1 = iState0 | 0x01; // input state for 1
|
|
||||||
const uint32_t oStateShifted = (sp->oState) << mIRate; // shifted output
|
|
||||||
const float cost = sp->cost;
|
|
||||||
sp++;
|
|
||||||
// 0 input extension
|
|
||||||
mCandidates[i].cost = cost;
|
|
||||||
mCandidates[i].oState = oStateShifted | mGeneratorTable[iState0 & mCMask];
|
|
||||||
mCandidates[i].iState = iState0;
|
|
||||||
// 1 input extension
|
|
||||||
mCandidates[i+1].cost = cost;
|
|
||||||
mCandidates[i+1].oState = oStateShifted | mGeneratorTable[iState1 & mCMask];
|
|
||||||
mCandidates[i+1].iState = iState1;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
void ViterbiR2O4::getSoftCostMetrics(const uint32_t inSample, const float *matchCost, const float *mismatchCost)
|
|
||||||
{
|
|
||||||
const float *cTab[2] = {matchCost,mismatchCost};
|
|
||||||
for (unsigned i=0; i<mNumCands; i++) {
|
|
||||||
vCand& thisCand = mCandidates[i];
|
|
||||||
// We examine input bits 2 at a time for a rate 1/2 coder.
|
|
||||||
const unsigned mismatched = inSample ^ (thisCand.oState);
|
|
||||||
thisCand.cost += cTab[mismatched&0x01][1] + cTab[(mismatched>>1)&0x01][0];
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
void ViterbiR2O4::pruneCandidates()
|
|
||||||
{
|
|
||||||
const vCand* c1 = mCandidates; // 0-prefix
|
|
||||||
const vCand* c2 = mCandidates + mIStates; // 1-prefix
|
|
||||||
for (unsigned i=0; i<mIStates; i++) {
|
|
||||||
if (c1[i].cost < c2[i].cost) mSurvivors[i] = c1[i];
|
|
||||||
else mSurvivors[i] = c2[i];
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
const ViterbiR2O4::vCand& ViterbiR2O4::minCost() const
|
|
||||||
{
|
|
||||||
int minIndex = 0;
|
|
||||||
float minCost = mSurvivors[0].cost;
|
|
||||||
for (unsigned i=1; i<mIStates; i++) {
|
|
||||||
const float thisCost = mSurvivors[i].cost;
|
|
||||||
if (thisCost>=minCost) continue;
|
|
||||||
minCost = thisCost;
|
|
||||||
minIndex=i;
|
|
||||||
}
|
|
||||||
return mSurvivors[minIndex];
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
const ViterbiR2O4::vCand& ViterbiR2O4::step(uint32_t inSample, const float *probs, const float *iprobs)
|
|
||||||
{
|
|
||||||
branchCandidates();
|
|
||||||
getSoftCostMetrics(inSample,probs,iprobs);
|
|
||||||
pruneCandidates();
|
|
||||||
return minCost();
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
uint64_t Parity::syndrome(const BitVector& receivedCodeword)
|
|
||||||
{
|
|
||||||
return receivedCodeword.syndrome(*this);
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
void Parity::writeParityWord(const BitVector& data, BitVector& parityTarget, bool invert)
|
|
||||||
{
|
|
||||||
uint64_t pWord = data.parity(*this);
|
|
||||||
if (invert) pWord = ~pWord;
|
|
||||||
parityTarget.fillField(0,pWord,size());
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
SoftVector::SoftVector(const BitVector& source)
|
SoftVector::SoftVector(const BitVector& source)
|
||||||
{
|
{
|
||||||
resize(source.size());
|
resize(source.size());
|
||||||
for (size_t i=0; i<size(); i++) {
|
for (size_t i=0; i<size(); i++) {
|
||||||
if (source.bit(i)) mStart[i]=1.0F;
|
if (source.bit(i)) mStart[i]=1.0F;
|
||||||
else mStart[i]=0.0F;
|
else mStart[i]=-1.0F;
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
@@ -438,102 +260,20 @@ BitVector SoftVector::sliced() const
|
|||||||
size_t sz = size();
|
size_t sz = size();
|
||||||
BitVector newSig(sz);
|
BitVector newSig(sz);
|
||||||
for (size_t i=0; i<sz; i++) {
|
for (size_t i=0; i<sz; i++) {
|
||||||
if (mStart[i]>0.5F) newSig[i]=1;
|
if (mStart[i]>0.0F) newSig[i]=1;
|
||||||
else newSig[i] = 0;
|
else newSig[i] = 0;
|
||||||
}
|
}
|
||||||
return newSig;
|
return newSig;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
void SoftVector::decode(ViterbiR2O4 &decoder, BitVector& target) const
|
|
||||||
{
|
|
||||||
const size_t sz = size();
|
|
||||||
const unsigned deferral = decoder.deferral();
|
|
||||||
const size_t ctsz = sz + deferral*decoder.iRate();
|
|
||||||
assert(sz <= decoder.iRate()*target.size());
|
|
||||||
|
|
||||||
// Build a "history" array where each element contains the full history.
|
|
||||||
uint32_t history[ctsz];
|
|
||||||
{
|
|
||||||
BitVector bits = sliced();
|
|
||||||
uint32_t accum = 0;
|
|
||||||
for (size_t i=0; i<sz; i++) {
|
|
||||||
accum = (accum<<1) | bits.bit(i);
|
|
||||||
history[i] = accum;
|
|
||||||
}
|
|
||||||
// Repeat last bit at the end.
|
|
||||||
for (size_t i=sz; i<ctsz; i++) {
|
|
||||||
accum = (accum<<1) | (accum & 0x01);
|
|
||||||
history[i] = accum;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
// Precompute metric tables.
|
|
||||||
float matchCostTable[ctsz];
|
|
||||||
float mismatchCostTable[ctsz];
|
|
||||||
{
|
|
||||||
const float *dp = mStart;
|
|
||||||
for (size_t i=0; i<sz; i++) {
|
|
||||||
// pVal is the probability that a bit is correct.
|
|
||||||
// ipVal is the probability that a bit is incorrect.
|
|
||||||
float pVal = dp[i];
|
|
||||||
if (pVal>0.5F) pVal = 1.0F-pVal;
|
|
||||||
float ipVal = 1.0F-pVal;
|
|
||||||
// This is a cheap approximation to an ideal cost function.
|
|
||||||
if (pVal<0.01F) pVal = 0.01;
|
|
||||||
if (ipVal<0.01F) ipVal = 0.01;
|
|
||||||
matchCostTable[i] = 0.25F/ipVal;
|
|
||||||
mismatchCostTable[i] = 0.25F/pVal;
|
|
||||||
}
|
|
||||||
|
|
||||||
// pad end of table with unknowns
|
|
||||||
for (size_t i=sz; i<ctsz; i++) {
|
|
||||||
matchCostTable[i] = 0.5F;
|
|
||||||
mismatchCostTable[i] = 0.5F;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
{
|
|
||||||
decoder.initializeStates();
|
|
||||||
// Each sample of history[] carries its history.
|
|
||||||
// So we only have to process every iRate-th sample.
|
|
||||||
const unsigned step = decoder.iRate();
|
|
||||||
// input pointer
|
|
||||||
const uint32_t *ip = history + step - 1;
|
|
||||||
// output pointers
|
|
||||||
char *op = target.begin();
|
|
||||||
const char *const opt = target.end();
|
|
||||||
// table pointers
|
|
||||||
const float* match = matchCostTable;
|
|
||||||
const float* mismatch = mismatchCostTable;
|
|
||||||
size_t oCount = 0;
|
|
||||||
while (op<opt) {
|
|
||||||
// Viterbi algorithm
|
|
||||||
assert(match-matchCostTable<sizeof(matchCostTable)/sizeof(matchCostTable[0])-1);
|
|
||||||
assert(mismatch-mismatchCostTable<sizeof(mismatchCostTable)/sizeof(mismatchCostTable[0])-1);
|
|
||||||
const ViterbiR2O4::vCand &minCost = decoder.step(*ip, match, mismatch);
|
|
||||||
ip += step;
|
|
||||||
match += step;
|
|
||||||
mismatch += step;
|
|
||||||
// output
|
|
||||||
if (oCount>=deferral) *op++ = (minCost.iState >> deferral)&0x01;
|
|
||||||
oCount++;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
// (pat) Added 6-22-2012
|
|
||||||
float SoftVector::getEnergy(float *plow) const
|
float SoftVector::getEnergy(float *plow) const
|
||||||
{
|
{
|
||||||
const SoftVector &vec = *this;
|
const SoftVector &vec = *this;
|
||||||
int len = vec.size();
|
int len = vec.size();
|
||||||
float avg = 0; float low = 1;
|
float avg = 0; float low = 1;
|
||||||
for (int i = 0; i < len; i++) {
|
for (int i = 0; i < len; i++) {
|
||||||
float bit = vec[i];
|
float energy = fabsf(vec[i]);
|
||||||
float energy = 2*((bit < 0.5) ? (0.5-bit) : (bit-0.5));
|
|
||||||
if (energy < low) low = energy;
|
if (energy < low) low = energy;
|
||||||
avg += energy/len;
|
avg += energy/len;
|
||||||
}
|
}
|
||||||
@@ -545,8 +285,12 @@ float SoftVector::getEnergy(float *plow) const
|
|||||||
ostream& operator<<(ostream& os, const SoftVector& sv)
|
ostream& operator<<(ostream& os, const SoftVector& sv)
|
||||||
{
|
{
|
||||||
for (size_t i=0; i<sv.size(); i++) {
|
for (size_t i=0; i<sv.size(); i++) {
|
||||||
if (sv[i]<0.25) os << "0";
|
if (sv[i]<-0.5) os << "0";
|
||||||
else if (sv[i]>0.75) os << "1";
|
else if (sv[i]<-0.25) os << "o";
|
||||||
|
else if (sv[i]<0.0) os << ".";
|
||||||
|
else if (sv[i]>0.5) os << "1";
|
||||||
|
else if (sv[i]>0.25) os << "|";
|
||||||
|
else if (sv[i]>0.0) os << "'";
|
||||||
else os << "-";
|
else os << "-";
|
||||||
}
|
}
|
||||||
return os;
|
return os;
|
||||||
|
|||||||
@@ -30,201 +30,6 @@
|
|||||||
#include <stdint.h>
|
#include <stdint.h>
|
||||||
|
|
||||||
|
|
||||||
class BitVector;
|
|
||||||
class SoftVector;
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
/** Shift-register (LFSR) generator. */
|
|
||||||
class Generator {
|
|
||||||
|
|
||||||
private:
|
|
||||||
|
|
||||||
uint64_t mCoeff; ///< polynomial coefficients. LSB is zero exponent.
|
|
||||||
uint64_t mState; ///< shift register state. LSB is most recent.
|
|
||||||
uint64_t mMask; ///< mask for reading state
|
|
||||||
unsigned mLen; ///< number of bits used in shift register
|
|
||||||
unsigned mLen_1; ///< mLen - 1
|
|
||||||
|
|
||||||
public:
|
|
||||||
|
|
||||||
Generator(uint64_t wCoeff, unsigned wLen)
|
|
||||||
:mCoeff(wCoeff),mState(0),
|
|
||||||
mMask((1ULL<<wLen)-1),
|
|
||||||
mLen(wLen),mLen_1(wLen-1)
|
|
||||||
{ assert(wLen<64); }
|
|
||||||
|
|
||||||
void clear() { mState=0; }
|
|
||||||
|
|
||||||
/**@name Accessors */
|
|
||||||
//@{
|
|
||||||
uint64_t state() const { return mState & mMask; }
|
|
||||||
unsigned size() const { return mLen; }
|
|
||||||
//@}
|
|
||||||
|
|
||||||
/**
|
|
||||||
Calculate one bit of a syndrome.
|
|
||||||
This is in the .h for inlining.
|
|
||||||
*/
|
|
||||||
void syndromeShift(unsigned inBit)
|
|
||||||
{
|
|
||||||
const unsigned fb = (mState>>(mLen_1)) & 0x01;
|
|
||||||
mState = (mState<<1) ^ (inBit & 0x01);
|
|
||||||
if (fb) mState ^= mCoeff;
|
|
||||||
}
|
|
||||||
|
|
||||||
/**
|
|
||||||
Update the generator state by one cycle.
|
|
||||||
This is in the .h for inlining.
|
|
||||||
*/
|
|
||||||
void encoderShift(unsigned inBit)
|
|
||||||
{
|
|
||||||
const unsigned fb = ((mState>>(mLen_1)) ^ inBit) & 0x01;
|
|
||||||
mState <<= 1;
|
|
||||||
if (fb) mState ^= mCoeff;
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
};
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
/** Parity (CRC-type) generator and checker based on a Generator. */
|
|
||||||
class Parity : public Generator {
|
|
||||||
|
|
||||||
protected:
|
|
||||||
|
|
||||||
unsigned mCodewordSize;
|
|
||||||
|
|
||||||
public:
|
|
||||||
|
|
||||||
Parity(uint64_t wCoefficients, unsigned wParitySize, unsigned wCodewordSize)
|
|
||||||
:Generator(wCoefficients, wParitySize),
|
|
||||||
mCodewordSize(wCodewordSize)
|
|
||||||
{ }
|
|
||||||
|
|
||||||
/** Compute the parity word and write it into the target segment. */
|
|
||||||
void writeParityWord(const BitVector& data, BitVector& parityWordTarget, bool invert=true);
|
|
||||||
|
|
||||||
/** Compute the syndrome of a received sequence. */
|
|
||||||
uint64_t syndrome(const BitVector& receivedCodeword);
|
|
||||||
};
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
/**
|
|
||||||
Class to represent convolutional coders/decoders of rate 1/2, memory length 4.
|
|
||||||
This is the "workhorse" coder for most GSM channels.
|
|
||||||
*/
|
|
||||||
class ViterbiR2O4 {
|
|
||||||
|
|
||||||
private:
|
|
||||||
/**name Lots of precomputed elements so the compiler can optimize like hell. */
|
|
||||||
//@{
|
|
||||||
/**@name Core values. */
|
|
||||||
//@{
|
|
||||||
static const unsigned mIRate = 2; ///< reciprocal of rate
|
|
||||||
static const unsigned mOrder = 4; ///< memory length of generators
|
|
||||||
//@}
|
|
||||||
/**@name Derived values. */
|
|
||||||
//@{
|
|
||||||
static const unsigned mIStates = 0x01 << mOrder; ///< number of states, number of survivors
|
|
||||||
static const uint32_t mSMask = mIStates-1; ///< survivor mask
|
|
||||||
static const uint32_t mCMask = (mSMask<<1) | 0x01; ///< candidate mask
|
|
||||||
static const uint32_t mOMask = (0x01<<mIRate)-1; ///< ouput mask, all iRate low bits set
|
|
||||||
static const unsigned mNumCands = mIStates*2; ///< number of candidates to generate during branching
|
|
||||||
static const unsigned mDeferral = 6*mOrder; ///< deferral to be used
|
|
||||||
//@}
|
|
||||||
//@}
|
|
||||||
|
|
||||||
/** Precomputed tables. */
|
|
||||||
//@{
|
|
||||||
uint32_t mCoeffs[mIRate]; ///< polynomial for each generator
|
|
||||||
uint32_t mStateTable[mIRate][2*mIStates]; ///< precomputed generator output tables
|
|
||||||
uint32_t mGeneratorTable[2*mIStates]; ///< precomputed coder output table
|
|
||||||
//@}
|
|
||||||
|
|
||||||
public:
|
|
||||||
|
|
||||||
/**
|
|
||||||
A candidate sequence in a Viterbi decoder.
|
|
||||||
The 32-bit state register can support a deferral of 6 with a 4th-order coder.
|
|
||||||
*/
|
|
||||||
typedef struct candStruct {
|
|
||||||
uint32_t iState; ///< encoder input associated with this candidate
|
|
||||||
uint32_t oState; ///< encoder output associated with this candidate
|
|
||||||
float cost; ///< cost (metric value), float to support soft inputs
|
|
||||||
} vCand;
|
|
||||||
|
|
||||||
/** Clear a structure. */
|
|
||||||
void clear(vCand& v)
|
|
||||||
{
|
|
||||||
v.iState=0;
|
|
||||||
v.oState=0;
|
|
||||||
v.cost=0;
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
private:
|
|
||||||
|
|
||||||
/**@name Survivors and candidates. */
|
|
||||||
//@{
|
|
||||||
vCand mSurvivors[mIStates]; ///< current survivor pool
|
|
||||||
vCand mCandidates[2*mIStates]; ///< current candidate pool
|
|
||||||
//@}
|
|
||||||
|
|
||||||
public:
|
|
||||||
|
|
||||||
unsigned iRate() const { return mIRate; }
|
|
||||||
uint32_t cMask() const { return mCMask; }
|
|
||||||
uint32_t stateTable(unsigned g, unsigned i) const { return mStateTable[g][i]; }
|
|
||||||
unsigned deferral() const { return mDeferral; }
|
|
||||||
|
|
||||||
|
|
||||||
ViterbiR2O4();
|
|
||||||
|
|
||||||
/** Set all cost metrics to zero. */
|
|
||||||
void initializeStates();
|
|
||||||
|
|
||||||
/**
|
|
||||||
Full cycle of the Viterbi algorithm: branch, metrics, prune, select.
|
|
||||||
@return reference to minimum-cost candidate.
|
|
||||||
*/
|
|
||||||
const vCand& step(uint32_t inSample, const float *probs, const float *iprobs);
|
|
||||||
|
|
||||||
private:
|
|
||||||
|
|
||||||
/** Branch survivors into new candidates. */
|
|
||||||
void branchCandidates();
|
|
||||||
|
|
||||||
/** Compute cost metrics for soft-inputs. */
|
|
||||||
void getSoftCostMetrics(uint32_t inSample, const float *probs, const float *iprobs);
|
|
||||||
|
|
||||||
/** Select survivors from the candidate set. */
|
|
||||||
void pruneCandidates();
|
|
||||||
|
|
||||||
/** Find the minimum cost survivor. */
|
|
||||||
const vCand& minCost() const;
|
|
||||||
|
|
||||||
/**
|
|
||||||
Precompute the state tables.
|
|
||||||
@param g Generator index 0..((1/rate)-1)
|
|
||||||
*/
|
|
||||||
void computeStateTables(unsigned g);
|
|
||||||
|
|
||||||
/**
|
|
||||||
Precompute the generator outputs.
|
|
||||||
mCoeffs must be defined first.
|
|
||||||
*/
|
|
||||||
void computeGeneratorTable();
|
|
||||||
|
|
||||||
};
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
class BitVector : public Vector<char> {
|
class BitVector : public Vector<char> {
|
||||||
|
|
||||||
|
|
||||||
@@ -282,16 +87,6 @@ class BitVector : public Vector<char> {
|
|||||||
|
|
||||||
void zero() { fill(0); }
|
void zero() { fill(0); }
|
||||||
|
|
||||||
/**@name FEC operations. */
|
|
||||||
//@{
|
|
||||||
/** Calculate the syndrome of the vector with the given Generator. */
|
|
||||||
uint64_t syndrome(Generator& gen) const;
|
|
||||||
/** Calculate the parity word for the vector with the given Generator. */
|
|
||||||
uint64_t parity(Generator& gen) const;
|
|
||||||
/** Encode the signal with the GSM rate 1/2 convolutional encoder. */
|
|
||||||
void encode(const ViterbiR2O4& encoder, BitVector& target);
|
|
||||||
//@}
|
|
||||||
|
|
||||||
|
|
||||||
/** Invert 0<->1. */
|
/** Invert 0<->1. */
|
||||||
void invert();
|
void invert();
|
||||||
@@ -427,23 +222,20 @@ class SoftVector: public Vector<float> {
|
|||||||
const SoftVector tail(size_t start) const { return segment(start,size()-start); }
|
const SoftVector tail(size_t start) const { return segment(start,size()-start); }
|
||||||
//@}
|
//@}
|
||||||
|
|
||||||
/** Decode soft symbols with the GSM rate-1/2 Viterbi decoder. */
|
// How good is the SoftVector in the sense of the bits being solid?
|
||||||
void decode(ViterbiR2O4 &decoder, BitVector& target) const;
|
// Result of 1 is perfect and 0 means all the bits were 0.0
|
||||||
|
|
||||||
// (pat) How good is the SoftVector in the sense of the bits being solid?
|
|
||||||
// Result of 1 is perfect and 0 means all the bits were 0.5
|
|
||||||
// If plow is non-NULL, also return the lowest energy bit.
|
// If plow is non-NULL, also return the lowest energy bit.
|
||||||
float getEnergy(float *low=0) const;
|
float getEnergy(float *low=0) const;
|
||||||
|
|
||||||
/** Fill with "unknown" values. */
|
/** Fill with "unknown" values. */
|
||||||
void unknown() { fill(0.5F); }
|
void unknown() { fill(0.0F); }
|
||||||
|
|
||||||
/** Return a hard bit value from a given index by slicing. */
|
/** Return a hard bit value from a given index by slicing. */
|
||||||
bool bit(size_t index) const
|
bool bit(size_t index) const
|
||||||
{
|
{
|
||||||
const float *dp = mStart+index;
|
const float *dp = mStart+index;
|
||||||
assert(dp<mEnd);
|
assert(dp<mEnd);
|
||||||
return (*dp)>0.5F;
|
return (*dp)>0.0F;
|
||||||
}
|
}
|
||||||
|
|
||||||
/** Slice the whole signal into bits. */
|
/** Slice the whole signal into bits. */
|
||||||
|
|||||||
@@ -35,27 +35,6 @@ using namespace std;
|
|||||||
|
|
||||||
int main(int argc, char *argv[])
|
int main(int argc, char *argv[])
|
||||||
{
|
{
|
||||||
BitVector v1("0000111100111100101011110000");
|
|
||||||
cout << v1 << endl;
|
|
||||||
v1.LSB8MSB();
|
|
||||||
cout << v1 << endl;
|
|
||||||
ViterbiR2O4 vCoder;
|
|
||||||
BitVector v2(v1.size()*2);
|
|
||||||
v1.encode(vCoder,v2);
|
|
||||||
cout << v2 << endl;
|
|
||||||
SoftVector sv2(v2);
|
|
||||||
cout << sv2 << endl;
|
|
||||||
for (unsigned i=0; i<sv2.size()/4; i++) sv2[random()%sv2.size()]=0.5;
|
|
||||||
cout << sv2 << endl;
|
|
||||||
BitVector v3(v1.size());
|
|
||||||
sv2.decode(vCoder,v3);
|
|
||||||
cout << v3 << endl;
|
|
||||||
|
|
||||||
cout << v3.segment(3,4) << endl;
|
|
||||||
|
|
||||||
BitVector v4(v3.segment(0,4),v3.segment(8,4));
|
|
||||||
cout << v4 << endl;
|
|
||||||
|
|
||||||
BitVector v5("000011110000");
|
BitVector v5("000011110000");
|
||||||
int r1 = v5.peekField(0,8);
|
int r1 = v5.peekField(0,8);
|
||||||
int r2 = v5.peekField(4,4);
|
int r2 = v5.peekField(4,4);
|
||||||
@@ -70,13 +49,6 @@ int main(int argc, char *argv[])
|
|||||||
v5.reverse8();
|
v5.reverse8();
|
||||||
cout << v5 << endl;
|
cout << v5 << endl;
|
||||||
|
|
||||||
BitVector mC = "000000000000111100000000000001110000011100001101000011000000000000000111000011110000100100001010000010100000101000001010000010100000010000000000000000000000000000000000000000000000001100001111000000000000000000000000000000000000000000000000000010010000101000001010000010100000101000001010000001000000000000000000000000110000111100000000000001110000101000001100000001000000000000";
|
|
||||||
SoftVector mCS(mC);
|
|
||||||
BitVector mU(mC.size()/2);
|
|
||||||
mCS.decode(vCoder,mU);
|
|
||||||
cout << "c=" << mCS << endl;
|
|
||||||
cout << "u=" << mU << endl;
|
|
||||||
|
|
||||||
|
|
||||||
unsigned char ts[9] = "abcdefgh";
|
unsigned char ts[9] = "abcdefgh";
|
||||||
BitVector tp(70);
|
BitVector tp(70);
|
||||||
|
|||||||
@@ -35,7 +35,7 @@
|
|||||||
#ifdef DEBUG_CONFIG
|
#ifdef DEBUG_CONFIG
|
||||||
#define debugLogEarly gLogEarly
|
#define debugLogEarly gLogEarly
|
||||||
#else
|
#else
|
||||||
#define debugLogEarly
|
#define debugLogEarly(x,y,z)
|
||||||
#endif
|
#endif
|
||||||
|
|
||||||
|
|
||||||
@@ -53,6 +53,23 @@ static const char* createConfigTable = {
|
|||||||
")"
|
")"
|
||||||
};
|
};
|
||||||
|
|
||||||
|
static std::string replaceAll(const std::string input, const std::string search, const std::string replace)
|
||||||
|
{
|
||||||
|
std::string output = input;
|
||||||
|
size_t index = 0;
|
||||||
|
|
||||||
|
while (true) {
|
||||||
|
index = output.find(search, index);
|
||||||
|
if (index == std::string::npos) {
|
||||||
|
break;
|
||||||
|
}
|
||||||
|
|
||||||
|
output.replace(index, replace.length(), replace);
|
||||||
|
index += replace.length();
|
||||||
|
}
|
||||||
|
|
||||||
|
return output;
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
float ConfigurationRecord::floatNumber() const
|
float ConfigurationRecord::floatNumber() const
|
||||||
@@ -96,7 +113,7 @@ ConfigurationTable::ConfigurationTable(const char* filename, const char *wCmdNam
|
|||||||
"Maximum number of alarms to remember inside the application."
|
"Maximum number of alarms to remember inside the application."
|
||||||
);
|
);
|
||||||
mSchema[tmp->getName()] = *tmp;
|
mSchema[tmp->getName()] = *tmp;
|
||||||
free(tmp);
|
delete tmp;
|
||||||
|
|
||||||
tmp = new ConfigurationKey("Log.File","",
|
tmp = new ConfigurationKey("Log.File","",
|
||||||
"",
|
"",
|
||||||
@@ -110,7 +127,7 @@ ConfigurationTable::ConfigurationTable(const char* filename, const char *wCmdNam
|
|||||||
"To disable again, execute \"unconfig Log.File\"."
|
"To disable again, execute \"unconfig Log.File\"."
|
||||||
);
|
);
|
||||||
mSchema[tmp->getName()] = *tmp;
|
mSchema[tmp->getName()] = *tmp;
|
||||||
free(tmp);
|
delete tmp;
|
||||||
|
|
||||||
tmp = new ConfigurationKey("Log.Level","NOTICE",
|
tmp = new ConfigurationKey("Log.Level","NOTICE",
|
||||||
"",
|
"",
|
||||||
@@ -128,7 +145,7 @@ ConfigurationTable::ConfigurationTable(const char* filename, const char *wCmdNam
|
|||||||
"Default logging level when no other level is defined for a file."
|
"Default logging level when no other level is defined for a file."
|
||||||
);
|
);
|
||||||
mSchema[tmp->getName()] = *tmp;
|
mSchema[tmp->getName()] = *tmp;
|
||||||
free(tmp);
|
delete tmp;
|
||||||
|
|
||||||
// Add application specific schema
|
// Add application specific schema
|
||||||
mSchema.insert(wSchema.begin(), wSchema.end());
|
mSchema.insert(wSchema.begin(), wSchema.end());
|
||||||
@@ -259,8 +276,8 @@ string ConfigurationTable::getTeX(const std::string& program, const std::string&
|
|||||||
ss << "% END AUTO-GENERATED CONTENT" << endl;
|
ss << "% END AUTO-GENERATED CONTENT" << endl;
|
||||||
ss << endl;
|
ss << endl;
|
||||||
|
|
||||||
string tmp = Utils::replaceAll(ss.str(), "^", "\\^");
|
string tmp = replaceAll(ss.str(), "^", "\\^");
|
||||||
return Utils::replaceAll(tmp, "_", "\\_");
|
return replaceAll(tmp, "_", "\\_");
|
||||||
}
|
}
|
||||||
|
|
||||||
bool ConfigurationTable::defines(const string& key)
|
bool ConfigurationTable::defines(const string& key)
|
||||||
|
|||||||
@@ -47,7 +47,7 @@ int main(int argc, char *argv[])
|
|||||||
|
|
||||||
gConfig.setUpdateHook(purgeConfig);
|
gConfig.setUpdateHook(purgeConfig);
|
||||||
|
|
||||||
char *keys[5] = {"key1", "key2", "key3", "key4", "key5"};
|
const char *keys[5] = {"key1", "key2", "key3", "key4", "key5"};
|
||||||
|
|
||||||
for (int i=0; i<5; i++) {
|
for (int i=0; i<5; i++) {
|
||||||
gConfig.set(keys[i],i);
|
gConfig.set(keys[i],i);
|
||||||
|
|||||||
210
CommonLibs/F16.h
210
CommonLibs/F16.h
@@ -1,210 +0,0 @@
|
|||||||
/*
|
|
||||||
* Copyright 2009 Free Software Foundation, Inc.
|
|
||||||
*
|
|
||||||
* This software is distributed under the terms of the GNU Affero Public License.
|
|
||||||
* See the COPYING file in the main directory for details.
|
|
||||||
*
|
|
||||||
* This use of this software may be subject to additional restrictions.
|
|
||||||
* See the LEGAL file in the main directory for details.
|
|
||||||
|
|
||||||
This program is free software: you can redistribute it and/or modify
|
|
||||||
it under the terms of the GNU Affero General Public License as published by
|
|
||||||
the Free Software Foundation, either version 3 of the License, or
|
|
||||||
(at your option) any later version.
|
|
||||||
|
|
||||||
This program is distributed in the hope that it will be useful,
|
|
||||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
||||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
||||||
GNU Affero General Public License for more details.
|
|
||||||
|
|
||||||
You should have received a copy of the GNU Affero General Public License
|
|
||||||
along with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
||||||
|
|
||||||
*/
|
|
||||||
|
|
||||||
|
|
||||||
#ifndef F16_H
|
|
||||||
#define F16_H
|
|
||||||
|
|
||||||
#include <stdint.h>
|
|
||||||
#include <ostream>
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
/** Round a float to the appropriate F16 value. */
|
|
||||||
inline int32_t _f16_round(float f)
|
|
||||||
{
|
|
||||||
if (f>0.0F) return (int32_t)(f+0.5F);
|
|
||||||
if (f<0.0F) return (int32_t)(f-0.5F);
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
/** A class for F15.16 fixed point arithmetic with saturation. */
|
|
||||||
class F16 {
|
|
||||||
|
|
||||||
|
|
||||||
private:
|
|
||||||
|
|
||||||
int32_t mV;
|
|
||||||
|
|
||||||
|
|
||||||
public:
|
|
||||||
|
|
||||||
F16() {}
|
|
||||||
|
|
||||||
F16(int i) { mV = i<<16; }
|
|
||||||
F16(float f) { mV = _f16_round(f*65536.0F); }
|
|
||||||
F16(double f) { mV = _f16_round((float)f*65536.0F); }
|
|
||||||
|
|
||||||
int32_t& raw() { return mV; }
|
|
||||||
const int32_t& raw() const { return mV; }
|
|
||||||
|
|
||||||
float f() const { return mV/65536.0F; }
|
|
||||||
|
|
||||||
//operator float() const { return mV/65536.0F; }
|
|
||||||
//operator int() const { return mV>>16; }
|
|
||||||
|
|
||||||
F16 operator=(float f)
|
|
||||||
{
|
|
||||||
mV = _f16_round(f*65536.0F);
|
|
||||||
return *this;
|
|
||||||
}
|
|
||||||
|
|
||||||
F16 operator=(int i)
|
|
||||||
{
|
|
||||||
mV = i<<16;
|
|
||||||
return *this;
|
|
||||||
}
|
|
||||||
|
|
||||||
F16 operator=(const F16& other)
|
|
||||||
{
|
|
||||||
mV = other.mV;
|
|
||||||
return mV;
|
|
||||||
}
|
|
||||||
|
|
||||||
F16 operator+(const F16& other) const
|
|
||||||
{
|
|
||||||
F16 retVal;
|
|
||||||
retVal.mV = mV + other.mV;
|
|
||||||
return retVal;
|
|
||||||
}
|
|
||||||
|
|
||||||
F16& operator+=(const F16& other)
|
|
||||||
{
|
|
||||||
mV += other.mV;
|
|
||||||
return *this;
|
|
||||||
}
|
|
||||||
|
|
||||||
F16 operator-(const F16& other) const
|
|
||||||
{
|
|
||||||
F16 retVal;
|
|
||||||
retVal.mV = mV - other.mV;
|
|
||||||
return retVal;
|
|
||||||
}
|
|
||||||
|
|
||||||
F16& operator-=(const F16& other)
|
|
||||||
{
|
|
||||||
mV -= other.mV;
|
|
||||||
return *this;
|
|
||||||
}
|
|
||||||
|
|
||||||
F16 operator*(const F16& other) const
|
|
||||||
{
|
|
||||||
F16 retVal;
|
|
||||||
int64_t p = (int64_t)mV * (int64_t)other.mV;
|
|
||||||
retVal.mV = p>>16;
|
|
||||||
return retVal;
|
|
||||||
}
|
|
||||||
|
|
||||||
F16& operator*=(const F16& other)
|
|
||||||
{
|
|
||||||
int64_t p = (int64_t)mV * (int64_t)other.mV;
|
|
||||||
mV = p>>16;
|
|
||||||
return *this;
|
|
||||||
}
|
|
||||||
|
|
||||||
F16 operator*(float f) const
|
|
||||||
{
|
|
||||||
F16 retVal;
|
|
||||||
retVal.mV = mV * f;
|
|
||||||
return retVal;
|
|
||||||
}
|
|
||||||
|
|
||||||
F16& operator*=(float f)
|
|
||||||
{
|
|
||||||
mV *= f;
|
|
||||||
return *this;
|
|
||||||
}
|
|
||||||
|
|
||||||
F16 operator/(const F16& other) const
|
|
||||||
{
|
|
||||||
F16 retVal;
|
|
||||||
int64_t pV = (int64_t)mV << 16;
|
|
||||||
retVal.mV = pV / other.mV;
|
|
||||||
return retVal;
|
|
||||||
}
|
|
||||||
|
|
||||||
F16& operator/=(const F16& other)
|
|
||||||
{
|
|
||||||
int64_t pV = (int64_t)mV << 16;
|
|
||||||
mV = pV / other.mV;
|
|
||||||
return *this;
|
|
||||||
}
|
|
||||||
|
|
||||||
F16 operator/(float f) const
|
|
||||||
{
|
|
||||||
F16 retVal;
|
|
||||||
retVal.mV = mV / f;
|
|
||||||
return retVal;
|
|
||||||
}
|
|
||||||
|
|
||||||
F16& operator/=(float f)
|
|
||||||
{
|
|
||||||
mV /= f;
|
|
||||||
return *this;
|
|
||||||
}
|
|
||||||
|
|
||||||
bool operator>(const F16& other) const
|
|
||||||
{
|
|
||||||
return mV>other.mV;
|
|
||||||
}
|
|
||||||
|
|
||||||
bool operator<(const F16& other) const
|
|
||||||
{
|
|
||||||
return mV<other.mV;
|
|
||||||
}
|
|
||||||
|
|
||||||
bool operator==(const F16& other) const
|
|
||||||
{
|
|
||||||
return mV==other.mV;
|
|
||||||
}
|
|
||||||
|
|
||||||
bool operator>(float f) const
|
|
||||||
{
|
|
||||||
return (mV/65536.0F) > f;
|
|
||||||
}
|
|
||||||
|
|
||||||
bool operator<(float f) const
|
|
||||||
{
|
|
||||||
return (mV/65536.0F) < f;
|
|
||||||
}
|
|
||||||
|
|
||||||
bool operator==(float f) const
|
|
||||||
{
|
|
||||||
return (mV/65536.0F) == f;
|
|
||||||
}
|
|
||||||
|
|
||||||
};
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
inline std::ostream& operator<<(std::ostream& os, const F16& v)
|
|
||||||
{
|
|
||||||
os << v.f();
|
|
||||||
return os;
|
|
||||||
}
|
|
||||||
|
|
||||||
#endif
|
|
||||||
|
|
||||||
@@ -1,55 +0,0 @@
|
|||||||
/*
|
|
||||||
* Copyright 2009 Free Software Foundation, Inc.
|
|
||||||
*
|
|
||||||
*
|
|
||||||
* This software is distributed under the terms of the GNU Affero Public License.
|
|
||||||
* See the COPYING file in the main directory for details.
|
|
||||||
*
|
|
||||||
* This use of this software may be subject to additional restrictions.
|
|
||||||
* See the LEGAL file in the main directory for details.
|
|
||||||
|
|
||||||
This program is free software: you can redistribute it and/or modify
|
|
||||||
it under the terms of the GNU Affero General Public License as published by
|
|
||||||
the Free Software Foundation, either version 3 of the License, or
|
|
||||||
(at your option) any later version.
|
|
||||||
|
|
||||||
This program is distributed in the hope that it will be useful,
|
|
||||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
||||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
||||||
GNU Affero General Public License for more details.
|
|
||||||
|
|
||||||
You should have received a copy of the GNU Affero General Public License
|
|
||||||
along with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
||||||
|
|
||||||
*/
|
|
||||||
|
|
||||||
#include "F16.h"
|
|
||||||
|
|
||||||
|
|
||||||
#include <iostream>
|
|
||||||
|
|
||||||
using namespace std;
|
|
||||||
|
|
||||||
int main(int argc, char **argv)
|
|
||||||
{
|
|
||||||
|
|
||||||
F16 a = 2.5;
|
|
||||||
F16 b = 1.5;
|
|
||||||
F16 c = 2.5 * 1.5;
|
|
||||||
F16 d = c + a;
|
|
||||||
F16 e = 10;
|
|
||||||
cout << a << ' ' << b << ' ' << c << ' ' << d << ' ' << e << endl;
|
|
||||||
|
|
||||||
a *= 3;
|
|
||||||
b *= 0.3;
|
|
||||||
c *= e;
|
|
||||||
cout << a << ' ' << b << ' ' << c << ' ' << d << endl;
|
|
||||||
|
|
||||||
a /= 3;
|
|
||||||
b /= 0.3;
|
|
||||||
c = d * 0.05;
|
|
||||||
cout << a << ' ' << b << ' ' << c << ' ' << d << endl;
|
|
||||||
|
|
||||||
F16 f = a/d;
|
|
||||||
cout << f << ' ' << f+0.5 << endl;
|
|
||||||
}
|
|
||||||
@@ -30,6 +30,7 @@
|
|||||||
#include <fstream>
|
#include <fstream>
|
||||||
#include <string>
|
#include <string>
|
||||||
#include <stdarg.h>
|
#include <stdarg.h>
|
||||||
|
#include <sys/time.h> // For gettimeofday
|
||||||
|
|
||||||
#include "Configuration.h"
|
#include "Configuration.h"
|
||||||
#include "Logger.h"
|
#include "Logger.h"
|
||||||
@@ -38,6 +39,14 @@
|
|||||||
|
|
||||||
using namespace std;
|
using namespace std;
|
||||||
|
|
||||||
|
// Switches to enable/disable logging targets
|
||||||
|
// MUST BE DEFINED BEFORE gConfig FOR gLogEarly() TO WORK CORRECTLY
|
||||||
|
bool gLogToConsole = true;
|
||||||
|
bool gLogToSyslog = false;
|
||||||
|
FILE *gLogToFile = NULL;
|
||||||
|
Mutex gLogToLock;
|
||||||
|
|
||||||
|
|
||||||
// Reference to a global config table, used all over the system.
|
// Reference to a global config table, used all over the system.
|
||||||
extern ConfigurationTable gConfig;
|
extern ConfigurationTable gConfig;
|
||||||
|
|
||||||
@@ -67,9 +76,6 @@ const char *levelNames[] = {
|
|||||||
"EMERG", "ALERT", "CRIT", "ERR", "WARNING", "NOTICE", "INFO", "DEBUG"
|
"EMERG", "ALERT", "CRIT", "ERR", "WARNING", "NOTICE", "INFO", "DEBUG"
|
||||||
};
|
};
|
||||||
int numLevels = 8;
|
int numLevels = 8;
|
||||||
bool gLogToConsole = 0;
|
|
||||||
FILE *gLogToFile = NULL;
|
|
||||||
Mutex gLogToLock;
|
|
||||||
|
|
||||||
|
|
||||||
int levelStringToInt(const string& name)
|
int levelStringToInt(const string& name)
|
||||||
@@ -106,6 +112,31 @@ int lookupLevel(const string& key)
|
|||||||
return level;
|
return level;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
static std::string format(const char *fmt, ...)
|
||||||
|
{
|
||||||
|
va_list ap;
|
||||||
|
char buf[300];
|
||||||
|
va_start(ap,fmt);
|
||||||
|
int n = vsnprintf(buf,300,fmt,ap);
|
||||||
|
va_end(ap);
|
||||||
|
if (n >= (300-4)) { strcpy(&buf[(300-4)],"..."); }
|
||||||
|
return std::string(buf);
|
||||||
|
}
|
||||||
|
|
||||||
|
const std::string timestr()
|
||||||
|
{
|
||||||
|
struct timeval tv;
|
||||||
|
struct tm tm;
|
||||||
|
gettimeofday(&tv,NULL);
|
||||||
|
localtime_r(&tv.tv_sec,&tm);
|
||||||
|
unsigned tenths = tv.tv_usec / 100000; // Rounding down is ok.
|
||||||
|
return format(" %02d:%02d:%02d.%1d",tm.tm_hour,tm.tm_min,tm.tm_sec,tenths);
|
||||||
|
}
|
||||||
|
|
||||||
|
std::ostream& operator<<(std::ostream& os, std::ostringstream& ss)
|
||||||
|
{
|
||||||
|
return os << ss.str();
|
||||||
|
}
|
||||||
|
|
||||||
int getLoggingLevel(const char* filename)
|
int getLoggingLevel(const char* filename)
|
||||||
{
|
{
|
||||||
@@ -192,18 +223,20 @@ Log::~Log()
|
|||||||
if (mDummyInit) return;
|
if (mDummyInit) return;
|
||||||
// Anything at or above LOG_CRIT is an "alarm".
|
// Anything at or above LOG_CRIT is an "alarm".
|
||||||
// Save alarms in the local list and echo them to stderr.
|
// Save alarms in the local list and echo them to stderr.
|
||||||
if (mPriority <= LOG_CRIT) {
|
if (mPriority <= LOG_ERR) {
|
||||||
if (sLoggerInited) addAlarm(mStream.str().c_str());
|
if (sLoggerInited) addAlarm(mStream.str().c_str());
|
||||||
cerr << mStream.str() << endl;
|
cerr << mStream.str() << endl;
|
||||||
}
|
}
|
||||||
// Current logging level was already checked by the macro.
|
// Current logging level was already checked by the macro. So just log.
|
||||||
// So just log.
|
// Log to syslog
|
||||||
syslog(mPriority, "%s", mStream.str().c_str());
|
if (gLogToSyslog) {
|
||||||
// pat added for easy debugging.
|
syslog(mPriority, "%s", mStream.str().c_str());
|
||||||
|
}
|
||||||
|
// Log to file and console
|
||||||
if (gLogToConsole||gLogToFile) {
|
if (gLogToConsole||gLogToFile) {
|
||||||
int mlen = mStream.str().size();
|
int mlen = mStream.str().size();
|
||||||
int neednl = (mlen==0 || mStream.str()[mlen-1] != '\n');
|
int neednl = (mlen==0 || mStream.str()[mlen-1] != '\n');
|
||||||
gLogToLock.lock();
|
ScopedLock lock(gLogToLock);
|
||||||
if (gLogToConsole) {
|
if (gLogToConsole) {
|
||||||
// The COUT() macro prevents messages from stomping each other but adds uninteresting thread numbers,
|
// The COUT() macro prevents messages from stomping each other but adds uninteresting thread numbers,
|
||||||
// so just use std::cout.
|
// so just use std::cout.
|
||||||
@@ -215,7 +248,6 @@ Log::~Log()
|
|||||||
if (neednl) {fputc('\n',gLogToFile);}
|
if (neednl) {fputc('\n',gLogToFile);}
|
||||||
fflush(gLogToFile);
|
fflush(gLogToFile);
|
||||||
}
|
}
|
||||||
gLogToLock.unlock();
|
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
@@ -243,10 +275,9 @@ void gLogInit(const char* name, const char* level, int facility)
|
|||||||
gConfig.set("Log.Level",level);
|
gConfig.set("Log.Level",level);
|
||||||
}
|
}
|
||||||
|
|
||||||
// Pat added, tired of the syslog facility.
|
|
||||||
// Both the transceiver and OpenBTS use this same facility, but only OpenBTS/OpenNodeB may use this log file:
|
// Both the transceiver and OpenBTS use this same facility, but only OpenBTS/OpenNodeB may use this log file:
|
||||||
string str = gConfig.getStr("Log.File");
|
string str = gConfig.getStr("Log.File");
|
||||||
if (gLogToFile==0 && str.length() && 0==strncmp(gCmdName,"Open",4)) {
|
if (gLogToFile==NULL && str.length() && 0==strncmp(gCmdName,"Open",4)) {
|
||||||
const char *fn = str.c_str();
|
const char *fn = str.c_str();
|
||||||
if (fn && *fn && strlen(fn)>3) { // strlen because a garbage char is getting in sometimes.
|
if (fn && *fn && strlen(fn)>3) { // strlen because a garbage char is getting in sometimes.
|
||||||
gLogToFile = fopen(fn,"w"); // New log file each time we start.
|
gLogToFile = fopen(fn,"w"); // New log file each time we start.
|
||||||
@@ -268,9 +299,32 @@ void gLogInit(const char* name, const char* level, int facility)
|
|||||||
void gLogEarly(int level, const char *fmt, ...)
|
void gLogEarly(int level, const char *fmt, ...)
|
||||||
{
|
{
|
||||||
va_list args;
|
va_list args;
|
||||||
|
|
||||||
va_start(args, fmt);
|
va_start(args, fmt);
|
||||||
vsyslog(level | LOG_USER, fmt, args);
|
|
||||||
|
if (gLogToSyslog) {
|
||||||
|
va_list args_copy;
|
||||||
|
va_copy(args_copy, args);
|
||||||
|
vsyslog(level | LOG_USER, fmt, args_copy);
|
||||||
|
va_end(args_copy);
|
||||||
|
}
|
||||||
|
|
||||||
|
if (gLogToConsole) {
|
||||||
|
va_list args_copy;
|
||||||
|
va_copy(args_copy, args);
|
||||||
|
vprintf(fmt, args_copy);
|
||||||
|
printf("\n");
|
||||||
|
va_end(args_copy);
|
||||||
|
}
|
||||||
|
|
||||||
|
if (gLogToFile) {
|
||||||
|
va_list args_copy;
|
||||||
|
va_copy(args_copy, args);
|
||||||
|
vfprintf(gLogToFile, fmt, args_copy);
|
||||||
|
fprintf(gLogToFile, "\n");
|
||||||
|
va_end(args_copy);
|
||||||
|
}
|
||||||
|
|
||||||
va_end(args);
|
va_end(args);
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|||||||
@@ -83,7 +83,6 @@
|
|||||||
|
|
||||||
|
|
||||||
#include "Threads.h" // must be after defines above, if these files are to be allowed to use LOG()
|
#include "Threads.h" // must be after defines above, if these files are to be allowed to use LOG()
|
||||||
#include "Utils.h"
|
|
||||||
|
|
||||||
/**
|
/**
|
||||||
A C++ stream-based thread-safe logger.
|
A C++ stream-based thread-safe logger.
|
||||||
@@ -116,12 +115,15 @@ class Log {
|
|||||||
|
|
||||||
std::ostringstream& get();
|
std::ostringstream& get();
|
||||||
};
|
};
|
||||||
extern bool gLogToConsole; // Pat added for easy debugging.
|
extern bool gLogToConsole; // Output log messages to stdout
|
||||||
|
extern bool gLogToSyslog; // Output log messages to syslog
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
std::list<std::string> gGetLoggerAlarms(); ///< Get a copy of the recent alarm list.
|
std::list<std::string> gGetLoggerAlarms(); ///< Get a copy of the recent alarm list.
|
||||||
|
|
||||||
|
const std::string timestr(); // A timestamp to print in messages.
|
||||||
|
std::ostream& operator<<(std::ostream& os, std::ostringstream& ss);
|
||||||
|
|
||||||
/**@ Global control and initialization of the logging system. */
|
/**@ Global control and initialization of the logging system. */
|
||||||
//@{
|
//@{
|
||||||
|
|||||||
@@ -36,49 +36,39 @@ libcommon_la_SOURCES = \
|
|||||||
Sockets.cpp \
|
Sockets.cpp \
|
||||||
Threads.cpp \
|
Threads.cpp \
|
||||||
Timeval.cpp \
|
Timeval.cpp \
|
||||||
Reporting.cpp \
|
|
||||||
Logger.cpp \
|
Logger.cpp \
|
||||||
Configuration.cpp \
|
Configuration.cpp \
|
||||||
sqlite3util.cpp \
|
sqlite3util.cpp
|
||||||
URLEncode.cpp \
|
|
||||||
Utils.cpp
|
|
||||||
|
|
||||||
noinst_PROGRAMS = \
|
noinst_PROGRAMS = \
|
||||||
BitVectorTest \
|
BitVectorTest \
|
||||||
|
PRBSTest \
|
||||||
InterthreadTest \
|
InterthreadTest \
|
||||||
SocketsTest \
|
SocketsTest \
|
||||||
TimevalTest \
|
TimevalTest \
|
||||||
RegexpTest \
|
|
||||||
VectorTest \
|
VectorTest \
|
||||||
ConfigurationTest \
|
ConfigurationTest \
|
||||||
LogTest \
|
LogTest
|
||||||
URLEncodeTest \
|
|
||||||
F16Test
|
|
||||||
|
|
||||||
# ReportingTest
|
# ReportingTest
|
||||||
|
|
||||||
noinst_HEADERS = \
|
noinst_HEADERS = \
|
||||||
BitVector.h \
|
BitVector.h \
|
||||||
|
PRBS.h \
|
||||||
Interthread.h \
|
Interthread.h \
|
||||||
LinkedLists.h \
|
LinkedLists.h \
|
||||||
Sockets.h \
|
Sockets.h \
|
||||||
Threads.h \
|
Threads.h \
|
||||||
Timeval.h \
|
Timeval.h \
|
||||||
Regexp.h \
|
|
||||||
Vector.h \
|
Vector.h \
|
||||||
Configuration.h \
|
Configuration.h \
|
||||||
Reporting.h \
|
|
||||||
F16.h \
|
|
||||||
URLEncode.h \
|
|
||||||
Utils.h \
|
|
||||||
Logger.h \
|
Logger.h \
|
||||||
sqlite3util.h
|
sqlite3util.h
|
||||||
|
|
||||||
URLEncodeTest_SOURCES = URLEncodeTest.cpp
|
|
||||||
URLEncodeTest_LDADD = libcommon.la
|
|
||||||
|
|
||||||
BitVectorTest_SOURCES = BitVectorTest.cpp
|
BitVectorTest_SOURCES = BitVectorTest.cpp
|
||||||
BitVectorTest_LDADD = libcommon.la $(SQLITE_LA)
|
BitVectorTest_LDADD = libcommon.la $(SQLITE3_LIBS)
|
||||||
|
|
||||||
|
PRBSTest_SOURCES = PRBSTest.cpp
|
||||||
|
|
||||||
InterthreadTest_SOURCES = InterthreadTest.cpp
|
InterthreadTest_SOURCES = InterthreadTest.cpp
|
||||||
InterthreadTest_LDADD = libcommon.la
|
InterthreadTest_LDADD = libcommon.la
|
||||||
@@ -92,21 +82,16 @@ TimevalTest_SOURCES = TimevalTest.cpp
|
|||||||
TimevalTest_LDADD = libcommon.la
|
TimevalTest_LDADD = libcommon.la
|
||||||
|
|
||||||
VectorTest_SOURCES = VectorTest.cpp
|
VectorTest_SOURCES = VectorTest.cpp
|
||||||
VectorTest_LDADD = libcommon.la $(SQLITE_LA)
|
VectorTest_LDADD = libcommon.la $(SQLITE3_LIBS)
|
||||||
|
|
||||||
RegexpTest_SOURCES = RegexpTest.cpp
|
|
||||||
RegexpTest_LDADD = libcommon.la
|
|
||||||
|
|
||||||
ConfigurationTest_SOURCES = ConfigurationTest.cpp
|
ConfigurationTest_SOURCES = ConfigurationTest.cpp
|
||||||
ConfigurationTest_LDADD = libcommon.la $(SQLITE_LA)
|
ConfigurationTest_LDADD = libcommon.la $(SQLITE3_LIBS)
|
||||||
|
|
||||||
# ReportingTest_SOURCES = ReportingTest.cpp
|
# ReportingTest_SOURCES = ReportingTest.cpp
|
||||||
# ReportingTest_LDADD = libcommon.la $(SQLITE_LA)
|
# ReportingTest_LDADD = libcommon.la $(SQLITE_LA)
|
||||||
|
|
||||||
LogTest_SOURCES = LogTest.cpp
|
LogTest_SOURCES = LogTest.cpp
|
||||||
LogTest_LDADD = libcommon.la $(SQLITE_LA)
|
LogTest_LDADD = libcommon.la $(SQLITE3_LIBS)
|
||||||
|
|
||||||
F16Test_SOURCES = F16Test.cpp
|
|
||||||
|
|
||||||
MOSTLYCLEANFILES += testSource testDestination
|
MOSTLYCLEANFILES += testSource testDestination
|
||||||
|
|
||||||
|
|||||||
@@ -1,111 +0,0 @@
|
|||||||
/*
|
|
||||||
* Copyright 2011 Range Networks, Inc.
|
|
||||||
* All Rights Reserved.
|
|
||||||
*
|
|
||||||
* This software is distributed under multiple licenses;
|
|
||||||
* see the COPYING file in the main directory for licensing
|
|
||||||
* information for this specific distribuion.
|
|
||||||
*
|
|
||||||
* This use of this software may be subject to additional restrictions.
|
|
||||||
* See the LEGAL file in the main directory for details.
|
|
||||||
|
|
||||||
This program is distributed in the hope that it will be useful,
|
|
||||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
||||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
|
||||||
*/
|
|
||||||
#ifndef _MEMORYLEAK_
|
|
||||||
#define _MEMORYLEAK_ 1
|
|
||||||
#include <map>
|
|
||||||
#include "ScalarTypes.h"
|
|
||||||
#include "Logger.h"
|
|
||||||
|
|
||||||
namespace Utils {
|
|
||||||
|
|
||||||
struct MemStats {
|
|
||||||
// Enumerates the classes that are checked.
|
|
||||||
// Redundancies are ok, for example, we check BitVector and also
|
|
||||||
// several descendants of BitVector.
|
|
||||||
enum MemoryNames {
|
|
||||||
mZeroIsUnused,
|
|
||||||
mVector,
|
|
||||||
mVectorData,
|
|
||||||
mBitVector,
|
|
||||||
mByteVector,
|
|
||||||
mByteVectorData,
|
|
||||||
mRLCRawBlock,
|
|
||||||
mRLCUplinkDataBlock,
|
|
||||||
mRLCMessage,
|
|
||||||
mRLCMsgPacketDownlinkDummyControlBlock, // Redundant with RLCMessage
|
|
||||||
mTBF,
|
|
||||||
mLlcEngine,
|
|
||||||
mSgsnDownlinkMsg,
|
|
||||||
mRachInfo,
|
|
||||||
mPdpPdu,
|
|
||||||
mFECDispatchInfo,
|
|
||||||
mL3Frame,
|
|
||||||
msignalVector,
|
|
||||||
mSoftVector,
|
|
||||||
mScramblingCode,
|
|
||||||
mURlcDownSdu,
|
|
||||||
mURlcPdu,
|
|
||||||
// Must be last:
|
|
||||||
mMax,
|
|
||||||
};
|
|
||||||
int mMemTotal[mMax]; // In elements, not bytes.
|
|
||||||
int mMemNow[mMax];
|
|
||||||
const char *mMemName[mMax];
|
|
||||||
MemStats();
|
|
||||||
void memChkNew(MemoryNames memIndex, const char *id);
|
|
||||||
void memChkDel(MemoryNames memIndex, const char *id);
|
|
||||||
void text(std::ostream &os);
|
|
||||||
// We would prefer to use an unordered_map, but that requires special compile switches.
|
|
||||||
// What a super great language.
|
|
||||||
typedef std::map<std::string,Int_z> MemMapType;
|
|
||||||
MemMapType mMemMap;
|
|
||||||
};
|
|
||||||
extern struct MemStats gMemStats;
|
|
||||||
extern int gMemLeakDebug;
|
|
||||||
|
|
||||||
// This is a memory leak detector.
|
|
||||||
// Use by putting RN_MEMCHKNEW and RN_MEMCHKDEL in class constructors/destructors,
|
|
||||||
// or use the DEFINE_MEMORY_LEAK_DETECTOR class and add the defined class
|
|
||||||
// as an ancestor to the class to be memory leak checked.
|
|
||||||
|
|
||||||
struct MemLabel {
|
|
||||||
std::string mccKey;
|
|
||||||
virtual ~MemLabel() {
|
|
||||||
Int_z &tmp = Utils::gMemStats.mMemMap[mccKey]; tmp = tmp - 1;
|
|
||||||
}
|
|
||||||
};
|
|
||||||
|
|
||||||
#if RN_DISABLE_MEMORY_LEAK_TEST
|
|
||||||
#define RN_MEMCHKNEW(type)
|
|
||||||
#define RN_MEMCHKDEL(type)
|
|
||||||
#define RN_MEMLOG(type,ptr)
|
|
||||||
#define DEFINE_MEMORY_LEAK_DETECTOR_CLASS(subClass,checkerClass) \
|
|
||||||
struct checkerClass {};
|
|
||||||
#else
|
|
||||||
|
|
||||||
#define RN_MEMCHKNEW(type) { Utils::gMemStats.memChkNew(Utils::MemStats::m##type,#type); }
|
|
||||||
#define RN_MEMCHKDEL(type) { Utils::gMemStats.memChkDel(Utils::MemStats::m##type,#type); }
|
|
||||||
|
|
||||||
#define RN_MEMLOG(type,ptr) { \
|
|
||||||
static std::string key = format("%s_%s:%d",#type,__FILE__,__LINE__); \
|
|
||||||
(ptr)->/* MemCheck##type:: */ mccKey = key; \
|
|
||||||
Utils::gMemStats.mMemMap[key]++; \
|
|
||||||
}
|
|
||||||
|
|
||||||
// TODO: The above assumes that checkclass is MemCheck ## subClass
|
|
||||||
#define DEFINE_MEMORY_LEAK_DETECTOR_CLASS(subClass,checkerClass) \
|
|
||||||
struct checkerClass : public virtual Utils::MemLabel { \
|
|
||||||
checkerClass() { RN_MEMCHKNEW(subClass); } \
|
|
||||||
virtual ~checkerClass() { \
|
|
||||||
RN_MEMCHKDEL(subClass); \
|
|
||||||
} \
|
|
||||||
};
|
|
||||||
|
|
||||||
#endif
|
|
||||||
|
|
||||||
} // namespace Utils
|
|
||||||
|
|
||||||
#endif
|
|
||||||
110
CommonLibs/PRBS.h
Normal file
110
CommonLibs/PRBS.h
Normal file
@@ -0,0 +1,110 @@
|
|||||||
|
/*
|
||||||
|
* Copyright (C) 2017 Alexander Chemeris <Alexander.Chemeris@fairwaves.co>
|
||||||
|
*
|
||||||
|
* This library is free software; you can redistribute it and/or
|
||||||
|
* modify it under the terms of the GNU Lesser General Public
|
||||||
|
* License as published by the Free Software Foundation; either
|
||||||
|
* version 2.1 of the License, or (at your option) any later version.
|
||||||
|
*
|
||||||
|
* This library is distributed in the hope that it will be useful,
|
||||||
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||||
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
||||||
|
* Lesser General Public License for more details.
|
||||||
|
*
|
||||||
|
* You should have received a copy of the GNU Lesser General Public
|
||||||
|
* License along with this library; if not, write to the Free Software
|
||||||
|
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
|
||||||
|
*/
|
||||||
|
|
||||||
|
#ifndef PRBS_H
|
||||||
|
#define PRBS_H
|
||||||
|
|
||||||
|
#include <stdint.h>
|
||||||
|
#include <assert.h>
|
||||||
|
|
||||||
|
/** Pseudo-random binary sequence (PRBS) generator (a Galois LFSR implementation). */
|
||||||
|
class PRBS {
|
||||||
|
public:
|
||||||
|
|
||||||
|
PRBS(unsigned wLen, uint64_t wCoeff, uint64_t wState = 0x01)
|
||||||
|
: mCoeff(wCoeff), mStartState(wState), mState(wState), mLen(wLen)
|
||||||
|
{ assert(wLen<=64); }
|
||||||
|
|
||||||
|
/**@name Accessors */
|
||||||
|
//@{
|
||||||
|
uint64_t coeff() const { return mCoeff; }
|
||||||
|
uint64_t state() const { return mState; }
|
||||||
|
void state(uint64_t state) { mState = state & mask(); }
|
||||||
|
unsigned size() const { return mLen; }
|
||||||
|
//@}
|
||||||
|
|
||||||
|
/**
|
||||||
|
Calculate one bit of a PRBS
|
||||||
|
*/
|
||||||
|
unsigned generateBit()
|
||||||
|
{
|
||||||
|
const unsigned result = mState & 0x01;
|
||||||
|
processBit(result);
|
||||||
|
return result;
|
||||||
|
}
|
||||||
|
|
||||||
|
/**
|
||||||
|
Update the generator state by one bit.
|
||||||
|
If you want to synchronize your PRBS to a known state, call this function
|
||||||
|
size() times passing your PRBS to it bit by bit.
|
||||||
|
*/
|
||||||
|
void processBit(unsigned inBit)
|
||||||
|
{
|
||||||
|
mState >>= 1;
|
||||||
|
if (inBit) mState ^= mCoeff;
|
||||||
|
}
|
||||||
|
|
||||||
|
/** Return true when PRBS is wrapping through initial state */
|
||||||
|
bool isFinished() const { return mStartState == mState; }
|
||||||
|
|
||||||
|
protected:
|
||||||
|
|
||||||
|
uint64_t mCoeff; ///< polynomial coefficients. LSB is zero exponent.
|
||||||
|
uint64_t mStartState; ///< initial shift register state.
|
||||||
|
uint64_t mState; ///< shift register state.
|
||||||
|
unsigned mLen; ///< number of bits used in shift register
|
||||||
|
|
||||||
|
/** Return mask for the state register */
|
||||||
|
uint64_t mask() const { return (mLen==64)?0xFFFFFFFFFFFFFFFFUL:((1<<mLen)-1); }
|
||||||
|
|
||||||
|
};
|
||||||
|
|
||||||
|
/**
|
||||||
|
A standard 9-bit based pseudorandom binary sequence (PRBS) generator.
|
||||||
|
Polynomial: x^9 + x^5 + 1
|
||||||
|
*/
|
||||||
|
class PRBS9 : public PRBS {
|
||||||
|
public:
|
||||||
|
PRBS9(uint64_t wState = 0x01)
|
||||||
|
: PRBS(9, 0x0110, wState)
|
||||||
|
{}
|
||||||
|
};
|
||||||
|
|
||||||
|
/**
|
||||||
|
A standard 15-bit based pseudorandom binary sequence (PRBS) generator.
|
||||||
|
Polynomial: x^15 + x^14 + 1
|
||||||
|
*/
|
||||||
|
class PRBS15 : public PRBS {
|
||||||
|
public:
|
||||||
|
PRBS15(uint64_t wState = 0x01)
|
||||||
|
: PRBS(15, 0x6000, wState)
|
||||||
|
{}
|
||||||
|
};
|
||||||
|
|
||||||
|
/**
|
||||||
|
A standard 64-bit based pseudorandom binary sequence (PRBS) generator.
|
||||||
|
Polynomial: x^64 + x^63 + x^61 + x^60 + 1
|
||||||
|
*/
|
||||||
|
class PRBS64 : public PRBS {
|
||||||
|
public:
|
||||||
|
PRBS64(uint64_t wState = 0x01)
|
||||||
|
: PRBS(64, 0xD800000000000000ULL, wState)
|
||||||
|
{}
|
||||||
|
};
|
||||||
|
|
||||||
|
#endif // PRBS_H
|
||||||
42
CommonLibs/PRBSTest.cpp
Normal file
42
CommonLibs/PRBSTest.cpp
Normal file
@@ -0,0 +1,42 @@
|
|||||||
|
/*
|
||||||
|
* Copyright (C) 2017 Alexander Chemeris <Alexander.Chemeris@fairwaves.co>
|
||||||
|
*
|
||||||
|
* This library is free software; you can redistribute it and/or
|
||||||
|
* modify it under the terms of the GNU Lesser General Public
|
||||||
|
* License as published by the Free Software Foundation; either
|
||||||
|
* version 2.1 of the License, or (at your option) any later version.
|
||||||
|
*
|
||||||
|
* This library is distributed in the hope that it will be useful,
|
||||||
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||||
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
||||||
|
* Lesser General Public License for more details.
|
||||||
|
*
|
||||||
|
* You should have received a copy of the GNU Lesser General Public
|
||||||
|
* License along with this library; if not, write to the Free Software
|
||||||
|
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
|
||||||
|
*/
|
||||||
|
|
||||||
|
#include "PRBS.h"
|
||||||
|
#include <iostream>
|
||||||
|
#include <cstdlib>
|
||||||
|
#include <assert.h>
|
||||||
|
|
||||||
|
void testPrbs(PRBS &prbs, uint64_t expectedPeriod)
|
||||||
|
{
|
||||||
|
uint64_t period = 0;
|
||||||
|
do {
|
||||||
|
std::cout << prbs.generateBit();
|
||||||
|
period++;
|
||||||
|
} while (!prbs.isFinished());
|
||||||
|
std::cout << std::endl;
|
||||||
|
std::cout << "Period: " << period << std::endl;
|
||||||
|
assert(period == expectedPeriod);
|
||||||
|
}
|
||||||
|
|
||||||
|
int main(int argc, char *argv[])
|
||||||
|
{
|
||||||
|
PRBS9 prbs9(0x01);
|
||||||
|
testPrbs(prbs9, (1<<9)-1);
|
||||||
|
PRBS15 prbs15(0x01);
|
||||||
|
testPrbs(prbs15, (1<<15)-1);
|
||||||
|
}
|
||||||
@@ -1,64 +0,0 @@
|
|||||||
/*
|
|
||||||
* Copyright 2008 Free Software Foundation, Inc.
|
|
||||||
*
|
|
||||||
* This software is distributed under the terms of the GNU Affero Public License.
|
|
||||||
* See the COPYING file in the main directory for details.
|
|
||||||
*
|
|
||||||
* This use of this software may be subject to additional restrictions.
|
|
||||||
* See the LEGAL file in the main directory for details.
|
|
||||||
|
|
||||||
This program is free software: you can redistribute it and/or modify
|
|
||||||
it under the terms of the GNU Affero General Public License as published by
|
|
||||||
the Free Software Foundation, either version 3 of the License, or
|
|
||||||
(at your option) any later version.
|
|
||||||
|
|
||||||
This program is distributed in the hope that it will be useful,
|
|
||||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
||||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
||||||
GNU Affero General Public License for more details.
|
|
||||||
|
|
||||||
You should have received a copy of the GNU Affero General Public License
|
|
||||||
along with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
||||||
|
|
||||||
*/
|
|
||||||
|
|
||||||
|
|
||||||
#ifndef REGEXPW_H
|
|
||||||
#define REGEXPW_H
|
|
||||||
|
|
||||||
#include <regex.h>
|
|
||||||
#include <iostream>
|
|
||||||
#include <stdlib.h>
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
class Regexp {
|
|
||||||
|
|
||||||
private:
|
|
||||||
|
|
||||||
regex_t mRegex;
|
|
||||||
|
|
||||||
|
|
||||||
public:
|
|
||||||
|
|
||||||
Regexp(const char* regexp, int flags=REG_EXTENDED)
|
|
||||||
{
|
|
||||||
int result = regcomp(&mRegex, regexp, flags);
|
|
||||||
if (result) {
|
|
||||||
char msg[256];
|
|
||||||
regerror(result,&mRegex,msg,255);
|
|
||||||
std::cerr << "Regexp compilation of " << regexp << " failed: " << msg << std::endl;
|
|
||||||
abort();
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
~Regexp()
|
|
||||||
{ regfree(&mRegex); }
|
|
||||||
|
|
||||||
bool match(const char *text, int flags=0) const
|
|
||||||
{ return regexec(&mRegex, text, 0, NULL, flags)==0; }
|
|
||||||
|
|
||||||
};
|
|
||||||
|
|
||||||
|
|
||||||
#endif
|
|
||||||
@@ -1,48 +0,0 @@
|
|||||||
/*
|
|
||||||
* Copyright 2008 Free Software Foundation, Inc.
|
|
||||||
*
|
|
||||||
*
|
|
||||||
* This software is distributed under the terms of the GNU Affero Public License.
|
|
||||||
* See the COPYING file in the main directory for details.
|
|
||||||
*
|
|
||||||
* This use of this software may be subject to additional restrictions.
|
|
||||||
* See the LEGAL file in the main directory for details.
|
|
||||||
|
|
||||||
This program is free software: you can redistribute it and/or modify
|
|
||||||
it under the terms of the GNU Affero General Public License as published by
|
|
||||||
the Free Software Foundation, either version 3 of the License, or
|
|
||||||
(at your option) any later version.
|
|
||||||
|
|
||||||
This program is distributed in the hope that it will be useful,
|
|
||||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
||||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
||||||
GNU Affero General Public License for more details.
|
|
||||||
|
|
||||||
You should have received a copy of the GNU Affero General Public License
|
|
||||||
along with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
||||||
|
|
||||||
*/
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
#include "Regexp.h"
|
|
||||||
#include <iostream>
|
|
||||||
|
|
||||||
using namespace std;
|
|
||||||
|
|
||||||
|
|
||||||
int main(int argc, char *argv[])
|
|
||||||
{
|
|
||||||
|
|
||||||
Regexp email("^[[:graph:]]+@[[:graph:]]+ ");
|
|
||||||
Regexp simple("^dburgess@");
|
|
||||||
|
|
||||||
const char text1[] = "dburgess@jcis.net test message";
|
|
||||||
const char text2[] = "no address text message";
|
|
||||||
|
|
||||||
cout << email.match(text1) << " " << text1 << endl;
|
|
||||||
cout << email.match(text2) << " " << text2 << endl;
|
|
||||||
|
|
||||||
cout << simple.match(text1) << " " << text1 << endl;
|
|
||||||
cout << simple.match(text2) << " " << text2 << endl;
|
|
||||||
}
|
|
||||||
@@ -1,145 +0,0 @@
|
|||||||
/**@file Module for performance-reporting mechanisms. */
|
|
||||||
/*
|
|
||||||
* Copyright 2012 Range Networks, Inc.
|
|
||||||
*
|
|
||||||
* This software is distributed under the terms of the GNU Affero Public License.
|
|
||||||
* See the COPYING file in the main directory for details.
|
|
||||||
*
|
|
||||||
* This use of this software may be subject to additional restrictions.
|
|
||||||
* See the LEGAL file in the main directory for details.
|
|
||||||
|
|
||||||
This program is free software: you can redistribute it and/or modify
|
|
||||||
it under the terms of the GNU Affero General Public License as published by
|
|
||||||
the Free Software Foundation, either version 3 of the License, or
|
|
||||||
(at your option) any later version.
|
|
||||||
|
|
||||||
This program is distributed in the hope that it will be useful,
|
|
||||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
||||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
||||||
GNU Affero General Public License for more details.
|
|
||||||
|
|
||||||
You should have received a copy of the GNU Affero General Public License
|
|
||||||
along with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
||||||
|
|
||||||
*/
|
|
||||||
|
|
||||||
#include "Reporting.h"
|
|
||||||
#include "Logger.h"
|
|
||||||
#include <stdio.h>
|
|
||||||
#include <string.h>
|
|
||||||
|
|
||||||
static const char* createReportingTable = {
|
|
||||||
"CREATE TABLE IF NOT EXISTS REPORTING ("
|
|
||||||
"NAME TEXT UNIQUE NOT NULL, "
|
|
||||||
"VALUE INTEGER DEFAULT 0, "
|
|
||||||
"CLEAREDTIME INTEGER NOT NULL, "
|
|
||||||
"UPDATETIME INTEGER DEFAULT 0 "
|
|
||||||
")"
|
|
||||||
};
|
|
||||||
|
|
||||||
|
|
||||||
ReportingTable::ReportingTable(const char* filename)
|
|
||||||
{
|
|
||||||
gLogEarly(LOG_INFO | mFacility, "opening reporting table from path %s", filename);
|
|
||||||
// Connect to the database.
|
|
||||||
int rc = sqlite3_open(filename,&mDB);
|
|
||||||
if (rc) {
|
|
||||||
gLogEarly(LOG_EMERG | mFacility, "cannot open reporting database at %s, error message: %s", filename, sqlite3_errmsg(mDB));
|
|
||||||
sqlite3_close(mDB);
|
|
||||||
mDB = NULL;
|
|
||||||
return;
|
|
||||||
}
|
|
||||||
// Create the table, if needed.
|
|
||||||
if (!sqlite3_command(mDB,createReportingTable)) {
|
|
||||||
gLogEarly(LOG_EMERG | mFacility, "cannot create reporting table in database at %s, error message: %s", filename, sqlite3_errmsg(mDB));
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
bool ReportingTable::create(const char* paramName)
|
|
||||||
{
|
|
||||||
char cmd[200];
|
|
||||||
sprintf(cmd,"INSERT OR IGNORE INTO REPORTING (NAME,CLEAREDTIME) VALUES (\"%s\",%ld)", paramName, time(NULL));
|
|
||||||
if (!sqlite3_command(mDB,cmd)) {
|
|
||||||
gLogEarly(LOG_CRIT|mFacility, "cannot create reporting parameter %s, error message: %s", paramName, sqlite3_errmsg(mDB));
|
|
||||||
return false;
|
|
||||||
}
|
|
||||||
return true;
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
bool ReportingTable::incr(const char* paramName)
|
|
||||||
{
|
|
||||||
char cmd[200];
|
|
||||||
sprintf(cmd,"UPDATE REPORTING SET VALUE=VALUE+1, UPDATETIME=%ld WHERE NAME=\"%s\"", time(NULL), paramName);
|
|
||||||
if (!sqlite3_command(mDB,cmd)) {
|
|
||||||
gLogEarly(LOG_CRIT|mFacility, "cannot increment reporting parameter %s, error message: %s", paramName, sqlite3_errmsg(mDB));
|
|
||||||
return false;
|
|
||||||
}
|
|
||||||
return true;
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
bool ReportingTable::max(const char* paramName, unsigned newVal)
|
|
||||||
{
|
|
||||||
char cmd[200];
|
|
||||||
sprintf(cmd,"UPDATE REPORTING SET VALUE=MAX(VALUE,%u), UPDATETIME=%ld WHERE NAME=\"%s\"", newVal, time(NULL), paramName);
|
|
||||||
if (!sqlite3_command(mDB,cmd)) {
|
|
||||||
gLogEarly(LOG_CRIT|mFacility, "cannot maximize reporting parameter %s, error message: %s", paramName, sqlite3_errmsg(mDB));
|
|
||||||
return false;
|
|
||||||
}
|
|
||||||
return true;
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
bool ReportingTable::clear(const char* paramName)
|
|
||||||
{
|
|
||||||
char cmd[200];
|
|
||||||
sprintf(cmd,"UPDATE REPORTING SET VALUE=0, UPDATETIME=0, CLEAREDTIME=%ld WHERE NAME=\"%s\"", time(NULL), paramName);
|
|
||||||
if (!sqlite3_command(mDB,cmd)) {
|
|
||||||
gLogEarly(LOG_CRIT|mFacility, "cannot clear reporting parameter %s, error message: %s", paramName, sqlite3_errmsg(mDB));
|
|
||||||
return false;
|
|
||||||
}
|
|
||||||
return true;
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
bool ReportingTable::create(const char* baseName, unsigned minIndex, unsigned maxIndex)
|
|
||||||
{
|
|
||||||
size_t sz = strlen(baseName);
|
|
||||||
for (unsigned i = minIndex; i<=maxIndex; i++) {
|
|
||||||
char name[sz+10];
|
|
||||||
sprintf(name,"%s.%u",baseName,i);
|
|
||||||
if (!create(name)) return false;
|
|
||||||
}
|
|
||||||
return true;
|
|
||||||
}
|
|
||||||
|
|
||||||
bool ReportingTable::incr(const char* baseName, unsigned index)
|
|
||||||
{
|
|
||||||
char name[strlen(baseName)+10];
|
|
||||||
sprintf(name,"%s.%u",baseName,index);
|
|
||||||
return incr(name);
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
bool ReportingTable::max(const char* baseName, unsigned index, unsigned newVal)
|
|
||||||
{
|
|
||||||
char name[strlen(baseName)+10];
|
|
||||||
sprintf(name,"%s.%u",baseName,index);
|
|
||||||
return max(name,newVal);
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
bool ReportingTable::clear(const char* baseName, unsigned index)
|
|
||||||
{
|
|
||||||
char name[strlen(baseName)+10];
|
|
||||||
sprintf(name,"%s.%u",baseName,index);
|
|
||||||
return clear(name);
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
@@ -1,86 +0,0 @@
|
|||||||
/**@file Module for performance-reporting mechanisms. */
|
|
||||||
/*
|
|
||||||
* Copyright 2012 Range Networks, Inc.
|
|
||||||
*
|
|
||||||
* This software is distributed under the terms of the GNU Affero Public License.
|
|
||||||
* See the COPYING file in the main directory for details.
|
|
||||||
*
|
|
||||||
* This use of this software may be subject to additional restrictions.
|
|
||||||
* See the LEGAL file in the main directory for details.
|
|
||||||
|
|
||||||
This program is free software: you can redistribute it and/or modify
|
|
||||||
it under the terms of the GNU Affero General Public License as published by
|
|
||||||
the Free Software Foundation, either version 3 of the License, or
|
|
||||||
(at your option) any later version.
|
|
||||||
|
|
||||||
This program is distributed in the hope that it will be useful,
|
|
||||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
||||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
||||||
GNU Affero General Public License for more details.
|
|
||||||
|
|
||||||
You should have received a copy of the GNU Affero General Public License
|
|
||||||
along with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
||||||
|
|
||||||
*/
|
|
||||||
|
|
||||||
#ifndef REPORTING_H
|
|
||||||
#define REPORTING_H
|
|
||||||
|
|
||||||
#include <sqlite3util.h>
|
|
||||||
#include <ostream>
|
|
||||||
|
|
||||||
|
|
||||||
/**
|
|
||||||
Collect performance statistics into a database.
|
|
||||||
Parameters are counters or max/min trackers, all integer.
|
|
||||||
*/
|
|
||||||
class ReportingTable {
|
|
||||||
|
|
||||||
private:
|
|
||||||
|
|
||||||
sqlite3* mDB; ///< database connection
|
|
||||||
int mFacility; ///< rsyslogd facility
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
public:
|
|
||||||
|
|
||||||
/**
|
|
||||||
Open the database connection;
|
|
||||||
create the table if it does not exist yet.
|
|
||||||
*/
|
|
||||||
ReportingTable(const char* filename);
|
|
||||||
|
|
||||||
/** Create a new parameter. */
|
|
||||||
bool create(const char* paramName);
|
|
||||||
|
|
||||||
/** Create an indexed parameter set. */
|
|
||||||
bool create(const char* baseBame, unsigned minIndex, unsigned maxIndex);
|
|
||||||
|
|
||||||
/** Increment a counter. */
|
|
||||||
bool incr(const char* paramName);
|
|
||||||
|
|
||||||
/** Increment an indexed counter. */
|
|
||||||
bool incr(const char* baseName, unsigned index);
|
|
||||||
|
|
||||||
/** Take a max of a parameter. */
|
|
||||||
bool max(const char* paramName, unsigned newVal);
|
|
||||||
|
|
||||||
/** Take a max of an indexed parameter. */
|
|
||||||
bool max(const char* paramName, unsigned index, unsigned newVal);
|
|
||||||
|
|
||||||
/** Clear a value. */
|
|
||||||
bool clear(const char* paramName);
|
|
||||||
|
|
||||||
/** Clear an indexed value. */
|
|
||||||
bool clear(const char* paramName, unsigned index);
|
|
||||||
|
|
||||||
/** Dump the database to a stream. */
|
|
||||||
void dump(std::ostream&) const;
|
|
||||||
|
|
||||||
};
|
|
||||||
|
|
||||||
#endif
|
|
||||||
|
|
||||||
|
|
||||||
// vim: ts=4 sw=4
|
|
||||||
@@ -1,136 +0,0 @@
|
|||||||
/*
|
|
||||||
* Copyright 2011 Range Networks, Inc.
|
|
||||||
* All Rights Reserved.
|
|
||||||
*
|
|
||||||
* This software is distributed under multiple licenses;
|
|
||||||
* see the COPYING file in the main directory for licensing
|
|
||||||
* information for this specific distribuion.
|
|
||||||
*
|
|
||||||
* This use of this software may be subject to additional restrictions.
|
|
||||||
* See the LEGAL file in the main directory for details.
|
|
||||||
|
|
||||||
This program is distributed in the hope that it will be useful,
|
|
||||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
||||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
|
||||||
*/
|
|
||||||
|
|
||||||
#ifndef SCALARTYPES_H
|
|
||||||
#define SCALARTYPES_H
|
|
||||||
#include <iostream> // For size_t
|
|
||||||
#include <stdint.h>
|
|
||||||
//#include "GSMCommon.h" // Was included for Z100Timer
|
|
||||||
|
|
||||||
// We dont bother to define *= /= etc.; you'll have to convert: a*=b; to: a=a*b;
|
|
||||||
#define _INITIALIZED_SCALAR_BASE_FUNCS(Classname,Basetype,Init) \
|
|
||||||
Classname() : value(Init) {} \
|
|
||||||
Classname(Basetype wvalue) { value = wvalue; } /* Can set from basetype. */ \
|
|
||||||
operator Basetype(void) const { return value; } /* Converts from basetype. */ \
|
|
||||||
Basetype operator=(Basetype wvalue) { return value = wvalue; } \
|
|
||||||
Basetype* operator&() { return &value; }
|
|
||||||
|
|
||||||
#define _INITIALIZED_SCALAR_ARITH_FUNCS(Basetype) \
|
|
||||||
Basetype operator++() { return ++value; } \
|
|
||||||
Basetype operator++(int) { return value++; } \
|
|
||||||
Basetype operator--() { return --value; } \
|
|
||||||
Basetype operator--(int) { return value--; } \
|
|
||||||
Basetype operator+=(Basetype wvalue) { return value = value + wvalue; } \
|
|
||||||
Basetype operator-=(Basetype wvalue) { return value = value - wvalue; }
|
|
||||||
|
|
||||||
#define _INITIALIZED_SCALAR_FUNCS(Classname,Basetype,Init) \
|
|
||||||
_INITIALIZED_SCALAR_BASE_FUNCS(Classname,Basetype,Init) \
|
|
||||||
_INITIALIZED_SCALAR_ARITH_FUNCS(Basetype)
|
|
||||||
|
|
||||||
|
|
||||||
#define _DECLARE_SCALAR_TYPE(Classname_i,Classname_z,Basetype) \
|
|
||||||
template <Basetype Init> \
|
|
||||||
struct Classname_i { \
|
|
||||||
Basetype value; \
|
|
||||||
_INITIALIZED_SCALAR_FUNCS(Classname_i,Basetype,Init) \
|
|
||||||
}; \
|
|
||||||
typedef Classname_i<0> Classname_z;
|
|
||||||
|
|
||||||
|
|
||||||
// Usage:
|
|
||||||
// Where 'classname' is one of the types listed below, then:
|
|
||||||
// classname_z specifies a zero initialized type;
|
|
||||||
// classname_i<value> initializes the type to the specified value.
|
|
||||||
// We also define Float_z.
|
|
||||||
_DECLARE_SCALAR_TYPE(Int_i, Int_z, int)
|
|
||||||
_DECLARE_SCALAR_TYPE(Char_i, Char_z, signed char)
|
|
||||||
_DECLARE_SCALAR_TYPE(Int16_i, Int16_z, int16_t)
|
|
||||||
_DECLARE_SCALAR_TYPE(Int32_i, Int32_z, int32_t)
|
|
||||||
_DECLARE_SCALAR_TYPE(UInt_i, UInt_z, unsigned)
|
|
||||||
_DECLARE_SCALAR_TYPE(UChar_i, UChar_z, unsigned char)
|
|
||||||
_DECLARE_SCALAR_TYPE(UInt16_i, UInt16_z, uint16_t)
|
|
||||||
_DECLARE_SCALAR_TYPE(UInt32_i, UInt32_z, uint32_t)
|
|
||||||
_DECLARE_SCALAR_TYPE(Size_t_i, Size_t_z, size_t)
|
|
||||||
|
|
||||||
// Bool is special because it cannot accept some arithmetic funcs
|
|
||||||
//_DECLARE_SCALAR_TYPE(Bool_i, Bool_z, bool)
|
|
||||||
template <bool Init>
|
|
||||||
struct Bool_i {
|
|
||||||
bool value;
|
|
||||||
_INITIALIZED_SCALAR_BASE_FUNCS(Bool_i,bool,Init)
|
|
||||||
};
|
|
||||||
typedef Bool_i<0> Bool_z;
|
|
||||||
|
|
||||||
// float is special, because C++ does not permit the template initalization:
|
|
||||||
struct Float_z {
|
|
||||||
float value;
|
|
||||||
_INITIALIZED_SCALAR_FUNCS(Float_z,float,0)
|
|
||||||
};
|
|
||||||
struct Double_z {
|
|
||||||
double value;
|
|
||||||
_INITIALIZED_SCALAR_FUNCS(Double_z,double,0)
|
|
||||||
};
|
|
||||||
|
|
||||||
|
|
||||||
class ItemWithValueAndWidth {
|
|
||||||
public:
|
|
||||||
virtual unsigned getValue() const = 0;
|
|
||||||
virtual unsigned getWidth() const = 0;
|
|
||||||
};
|
|
||||||
|
|
||||||
// A Range Networks Field with a specified width.
|
|
||||||
// See RLCMessages.h for examples.
|
|
||||||
template <int Width=32, unsigned Init=0>
|
|
||||||
class Field_i : public ItemWithValueAndWidth
|
|
||||||
{
|
|
||||||
public:
|
|
||||||
unsigned value;
|
|
||||||
_INITIALIZED_SCALAR_FUNCS(Field_i,unsigned,Init)
|
|
||||||
unsigned getWidth() const { return Width; }
|
|
||||||
unsigned getValue() const { return value; }
|
|
||||||
};
|
|
||||||
|
|
||||||
// Synonym for Field_i, but no way to do it.
|
|
||||||
template <int Width, unsigned Init=0>
|
|
||||||
class Field_z : public ItemWithValueAndWidth
|
|
||||||
{
|
|
||||||
public:
|
|
||||||
unsigned value;
|
|
||||||
_INITIALIZED_SCALAR_FUNCS(Field_z,unsigned,Init)
|
|
||||||
unsigned getWidth() const { return Width; }
|
|
||||||
unsigned getValue() const { return value; }
|
|
||||||
};
|
|
||||||
|
|
||||||
// This is an uninitialized field.
|
|
||||||
template <int Width=32, unsigned Init=0>
|
|
||||||
class Field : public ItemWithValueAndWidth
|
|
||||||
{
|
|
||||||
public:
|
|
||||||
unsigned value;
|
|
||||||
_INITIALIZED_SCALAR_FUNCS(Field,unsigned,Init)
|
|
||||||
unsigned getWidth() const { return Width; }
|
|
||||||
unsigned getValue() const { return value; }
|
|
||||||
};
|
|
||||||
|
|
||||||
|
|
||||||
// A Z100Timer with an initial value specified.
|
|
||||||
//template <int Init>
|
|
||||||
//class Z100Timer_i : public GSM::Z100Timer {
|
|
||||||
// public:
|
|
||||||
// Z100Timer_i() : GSM::Z100Timer(Init) {}
|
|
||||||
//};
|
|
||||||
|
|
||||||
#endif
|
|
||||||
@@ -187,24 +187,20 @@ int DatagramSocket::send(const struct sockaddr* dest, const char * message)
|
|||||||
return send(dest,message,length);
|
return send(dest,message,length);
|
||||||
}
|
}
|
||||||
|
|
||||||
|
int DatagramSocket::read(char* buffer, size_t length)
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
int DatagramSocket::read(char* buffer)
|
|
||||||
{
|
{
|
||||||
socklen_t temp_len = sizeof(mSource);
|
socklen_t addr_len = sizeof(mSource);
|
||||||
int length = recvfrom(mSocketFD, (void*)buffer, MAX_UDP_LENGTH, 0,
|
int rd_length = recvfrom(mSocketFD, (void *) buffer, length, 0,
|
||||||
(struct sockaddr*)&mSource,&temp_len);
|
(struct sockaddr*) &mSource, &addr_len);
|
||||||
if ((length==-1) && (errno!=EAGAIN)) {
|
|
||||||
|
if ((rd_length==-1) && (errno!=EAGAIN)) {
|
||||||
perror("DatagramSocket::read() failed");
|
perror("DatagramSocket::read() failed");
|
||||||
throw SocketError();
|
throw SocketError();
|
||||||
}
|
}
|
||||||
return length;
|
return rd_length;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
int DatagramSocket::read(char* buffer, size_t length, unsigned timeout)
|
||||||
int DatagramSocket::read(char* buffer, unsigned timeout)
|
|
||||||
{
|
{
|
||||||
fd_set fds;
|
fd_set fds;
|
||||||
FD_ZERO(&fds);
|
FD_ZERO(&fds);
|
||||||
@@ -218,7 +214,7 @@ int DatagramSocket::read(char* buffer, unsigned timeout)
|
|||||||
throw SocketError();
|
throw SocketError();
|
||||||
}
|
}
|
||||||
if (sel==0) return -1;
|
if (sel==0) return -1;
|
||||||
if (FD_ISSET(mSocketFD,&fds)) return read(buffer);
|
if (FD_ISSET(mSocketFD,&fds)) return read(buffer, length);
|
||||||
return -1;
|
return -1;
|
||||||
}
|
}
|
||||||
|
|
||||||
@@ -227,18 +223,18 @@ int DatagramSocket::read(char* buffer, unsigned timeout)
|
|||||||
|
|
||||||
|
|
||||||
|
|
||||||
UDPSocket::UDPSocket(unsigned short wSrcPort)
|
UDPSocket::UDPSocket(const char *wSrcIP, unsigned short wSrcPort)
|
||||||
:DatagramSocket()
|
:DatagramSocket()
|
||||||
{
|
{
|
||||||
open(wSrcPort);
|
open(wSrcPort, wSrcIP);
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
UDPSocket::UDPSocket(unsigned short wSrcPort,
|
UDPSocket::UDPSocket(const char *wSrcIP, unsigned short wSrcPort,
|
||||||
const char * wDestIP, unsigned short wDestPort )
|
const char *wDestIP, unsigned short wDestPort)
|
||||||
:DatagramSocket()
|
:DatagramSocket()
|
||||||
{
|
{
|
||||||
open(wSrcPort);
|
open(wSrcPort, wSrcIP);
|
||||||
destination(wDestPort, wDestIP);
|
destination(wDestPort, wDestIP);
|
||||||
}
|
}
|
||||||
|
|
||||||
@@ -250,7 +246,7 @@ void UDPSocket::destination( unsigned short wDestPort, const char * wDestIP )
|
|||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
void UDPSocket::open(unsigned short localPort)
|
void UDPSocket::open(unsigned short localPort, const char *wlocalIP)
|
||||||
{
|
{
|
||||||
// create
|
// create
|
||||||
mSocketFD = socket(AF_INET,SOCK_DGRAM,0);
|
mSocketFD = socket(AF_INET,SOCK_DGRAM,0);
|
||||||
@@ -269,7 +265,7 @@ void UDPSocket::open(unsigned short localPort)
|
|||||||
size_t length = sizeof(address);
|
size_t length = sizeof(address);
|
||||||
bzero(&address,length);
|
bzero(&address,length);
|
||||||
address.sin_family = AF_INET;
|
address.sin_family = AF_INET;
|
||||||
address.sin_addr.s_addr = INADDR_ANY;
|
address.sin_addr.s_addr = inet_addr(wlocalIP);
|
||||||
address.sin_port = htons(localPort);
|
address.sin_port = htons(localPort);
|
||||||
if (bind(mSocketFD,(struct sockaddr*)&address,length)<0) {
|
if (bind(mSocketFD,(struct sockaddr*)&address,length)<0) {
|
||||||
perror("bind() failed");
|
perror("bind() failed");
|
||||||
|
|||||||
@@ -108,7 +108,7 @@ public:
|
|||||||
@param buffer A char[MAX_UDP_LENGTH] procured by the caller.
|
@param buffer A char[MAX_UDP_LENGTH] procured by the caller.
|
||||||
@return The number of bytes received or -1 on non-blocking pass.
|
@return The number of bytes received or -1 on non-blocking pass.
|
||||||
*/
|
*/
|
||||||
int read(char* buffer);
|
int read(char* buffer, size_t length);
|
||||||
|
|
||||||
/**
|
/**
|
||||||
Receive a packet with a timeout.
|
Receive a packet with a timeout.
|
||||||
@@ -116,7 +116,7 @@ public:
|
|||||||
@param maximum wait time in milliseconds
|
@param maximum wait time in milliseconds
|
||||||
@return The number of bytes received or -1 on timeout.
|
@return The number of bytes received or -1 on timeout.
|
||||||
*/
|
*/
|
||||||
int read(char* buffer, unsigned timeout);
|
int read(char* buffer, size_t length, unsigned timeout);
|
||||||
|
|
||||||
|
|
||||||
/** Send a packet to a given destination, other than the default. */
|
/** Send a packet to a given destination, other than the default. */
|
||||||
@@ -144,11 +144,11 @@ class UDPSocket : public DatagramSocket {
|
|||||||
public:
|
public:
|
||||||
|
|
||||||
/** Open a USP socket with an OS-assigned port and no default destination. */
|
/** Open a USP socket with an OS-assigned port and no default destination. */
|
||||||
UDPSocket( unsigned short localPort=0);
|
UDPSocket(const char *localIP, unsigned short localPort);
|
||||||
|
|
||||||
/** Given a full specification, open the socket and set the dest address. */
|
/** Given a full specification, open the socket and set the dest address. */
|
||||||
UDPSocket( unsigned short localPort,
|
UDPSocket(const char *localIP, unsigned short localPort,
|
||||||
const char * remoteIP, unsigned short remotePort);
|
const char *remoteIP, unsigned short remotePort);
|
||||||
|
|
||||||
/** Set the destination port. */
|
/** Set the destination port. */
|
||||||
void destination( unsigned short wDestPort, const char * wDestIP );
|
void destination( unsigned short wDestPort, const char * wDestIP );
|
||||||
@@ -157,7 +157,7 @@ public:
|
|||||||
unsigned short port() const;
|
unsigned short port() const;
|
||||||
|
|
||||||
/** Open and bind the UDP socket to a local port. */
|
/** Open and bind the UDP socket to a local port. */
|
||||||
void open(unsigned short localPort=0);
|
void open(unsigned short localPort=0, const char *wlocalIP="127.0.0.1");
|
||||||
|
|
||||||
/** Give the return address of the most recently received packet. */
|
/** Give the return address of the most recently received packet. */
|
||||||
const struct sockaddr_in* source() const { return (const struct sockaddr_in*)mSource; }
|
const struct sockaddr_in* source() const { return (const struct sockaddr_in*)mSource; }
|
||||||
|
|||||||
@@ -37,12 +37,12 @@ static const int gNumToSend = 10;
|
|||||||
|
|
||||||
void *testReaderIP(void *)
|
void *testReaderIP(void *)
|
||||||
{
|
{
|
||||||
UDPSocket readSocket(5934, "localhost", 5061);
|
UDPSocket readSocket("127.0.0.1", 5934, "localhost", 5061);
|
||||||
readSocket.nonblocking();
|
readSocket.nonblocking();
|
||||||
int rc = 0;
|
int rc = 0;
|
||||||
while (rc<gNumToSend) {
|
while (rc<gNumToSend) {
|
||||||
char buf[MAX_UDP_LENGTH];
|
char buf[MAX_UDP_LENGTH];
|
||||||
int count = readSocket.read(buf);
|
int count = readSocket.read(buf, MAX_UDP_LENGTH);
|
||||||
if (count>0) {
|
if (count>0) {
|
||||||
COUT("read: " << buf);
|
COUT("read: " << buf);
|
||||||
rc++;
|
rc++;
|
||||||
@@ -62,7 +62,7 @@ void *testReaderUnix(void *)
|
|||||||
int rc = 0;
|
int rc = 0;
|
||||||
while (rc<gNumToSend) {
|
while (rc<gNumToSend) {
|
||||||
char buf[MAX_UDP_LENGTH];
|
char buf[MAX_UDP_LENGTH];
|
||||||
int count = readSocket.read(buf);
|
int count = readSocket.read(buf, MAX_UDP_LENGTH);
|
||||||
if (count>0) {
|
if (count>0) {
|
||||||
COUT("read: " << buf);
|
COUT("read: " << buf);
|
||||||
rc++;
|
rc++;
|
||||||
@@ -82,7 +82,7 @@ int main(int argc, char * argv[] )
|
|||||||
Thread readerThreadUnix;
|
Thread readerThreadUnix;
|
||||||
readerThreadUnix.start(testReaderUnix,NULL);
|
readerThreadUnix.start(testReaderUnix,NULL);
|
||||||
|
|
||||||
UDPSocket socket1(5061, "127.0.0.1",5934);
|
UDPSocket socket1("127.0.0.1", 5061, "127.0.0.1", 5934);
|
||||||
UDDSocket socket1U("testSource","testDestination");
|
UDDSocket socket1U("testSource","testDestination");
|
||||||
|
|
||||||
COUT("socket1: " << socket1.port());
|
COUT("socket1: " << socket1.port());
|
||||||
|
|||||||
@@ -172,8 +172,15 @@ class Thread {
|
|||||||
void start(void *(*task)(void*), void *arg);
|
void start(void *(*task)(void*), void *arg);
|
||||||
|
|
||||||
/** Join a thread that will stop on its own. */
|
/** Join a thread that will stop on its own. */
|
||||||
void join() { int s = pthread_join(mThread,NULL); assert(!s); mThread = 0; }
|
void join() {
|
||||||
|
if (mThread) {
|
||||||
|
int s = pthread_join(mThread, NULL);
|
||||||
|
assert(!s);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
/** Send cancelation to thread */
|
||||||
|
void cancel() { pthread_cancel(mThread); }
|
||||||
};
|
};
|
||||||
|
|
||||||
|
|
||||||
|
|||||||
@@ -1,28 +0,0 @@
|
|||||||
/* Copyright 2011, Range Networks, Inc. */
|
|
||||||
|
|
||||||
#include <URLEncode.h>
|
|
||||||
#include <string>
|
|
||||||
#include <string.h>
|
|
||||||
#include <ctype.h>
|
|
||||||
|
|
||||||
using namespace std;
|
|
||||||
|
|
||||||
//based on javascript encodeURIComponent()
|
|
||||||
string URLEncode(const string &c)
|
|
||||||
{
|
|
||||||
static const char *digits = "01234567890ABCDEF";
|
|
||||||
string retVal="";
|
|
||||||
for (size_t i=0; i<c.length(); i++)
|
|
||||||
{
|
|
||||||
const char ch = c[i];
|
|
||||||
if (isalnum(ch) || strchr("-_.!~'()",ch)) {
|
|
||||||
retVal += ch;
|
|
||||||
} else {
|
|
||||||
retVal += '%';
|
|
||||||
retVal += digits[(ch>>4) & 0x0f];
|
|
||||||
retVal += digits[ch & 0x0f];
|
|
||||||
}
|
|
||||||
}
|
|
||||||
return retVal;
|
|
||||||
}
|
|
||||||
|
|
||||||
@@ -1,30 +0,0 @@
|
|||||||
/*
|
|
||||||
* Copyright 2011 Free Software Foundation, Inc.
|
|
||||||
*
|
|
||||||
*
|
|
||||||
* This software is distributed under the terms of the GNU Affero Public License.
|
|
||||||
* See the COPYING file in the main directory for details.
|
|
||||||
*
|
|
||||||
* This use of this software may be subject to additional restrictions.
|
|
||||||
* See the LEGAL file in the main directory for details.
|
|
||||||
|
|
||||||
This program is free software: you can redistribute it and/or modify
|
|
||||||
it under the terms of the GNU Affero General Public License as published by
|
|
||||||
the Free Software Foundation, either version 3 of the License, or
|
|
||||||
(at your option) any later version.
|
|
||||||
|
|
||||||
This program is distributed in the hope that it will be useful,
|
|
||||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
||||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
||||||
GNU Affero General Public License for more details.
|
|
||||||
|
|
||||||
You should have received a copy of the GNU Affero General Public License
|
|
||||||
along with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
||||||
|
|
||||||
*/
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
# include <string>
|
|
||||||
|
|
||||||
std::string URLEncode(const std::string&);
|
|
||||||
@@ -1,17 +0,0 @@
|
|||||||
|
|
||||||
#include "URLEncode.h"
|
|
||||||
#include <string>
|
|
||||||
#include <iostream>
|
|
||||||
|
|
||||||
|
|
||||||
using namespace std;
|
|
||||||
|
|
||||||
|
|
||||||
int main(int argc, char *argv[])
|
|
||||||
{
|
|
||||||
|
|
||||||
string test = string("Testing: !@#$%^&*() " __DATE__ " " __TIME__);
|
|
||||||
cout << test << endl;
|
|
||||||
cout << URLEncode(test) << endl;
|
|
||||||
}
|
|
||||||
|
|
||||||
@@ -1,211 +0,0 @@
|
|||||||
/*
|
|
||||||
* Copyright 2011 Range Networks, Inc.
|
|
||||||
* All Rights Reserved.
|
|
||||||
*
|
|
||||||
* This software is distributed under multiple licenses;
|
|
||||||
* see the COPYING file in the main directory for licensing
|
|
||||||
* information for this specific distribuion.
|
|
||||||
*
|
|
||||||
* This use of this software may be subject to additional restrictions.
|
|
||||||
* See the LEGAL file in the main directory for details.
|
|
||||||
|
|
||||||
This program is distributed in the hope that it will be useful,
|
|
||||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
||||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
|
||||||
*/
|
|
||||||
|
|
||||||
#include <unistd.h> // For usleep
|
|
||||||
#include <sys/time.h> // For gettimeofday
|
|
||||||
#include <stdio.h> // For vsnprintf
|
|
||||||
#include <ostream> // For ostream
|
|
||||||
#include <sstream> // For ostringstream
|
|
||||||
#include <string.h> // For strcpy
|
|
||||||
//#include "GSMCommon.h"
|
|
||||||
#include "Utils.h"
|
|
||||||
#include "MemoryLeak.h"
|
|
||||||
|
|
||||||
namespace Utils {
|
|
||||||
|
|
||||||
MemStats gMemStats;
|
|
||||||
int gMemLeakDebug = 0;
|
|
||||||
|
|
||||||
MemStats::MemStats()
|
|
||||||
{
|
|
||||||
memset(mMemNow,0,sizeof(mMemNow));
|
|
||||||
memset(mMemTotal,0,sizeof(mMemTotal));
|
|
||||||
memset(mMemName,0,sizeof(mMemName));
|
|
||||||
}
|
|
||||||
|
|
||||||
void MemStats::text(std::ostream &os)
|
|
||||||
{
|
|
||||||
os << "Structs current total:\n";
|
|
||||||
for (int i = 0; i < mMax; i++) {
|
|
||||||
os << "\t" << (mMemName[i] ? mMemName[i] : "unknown") << " " << mMemNow[i] << " " << mMemTotal[i] << "\n";
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
void MemStats::memChkNew(MemoryNames memIndex, const char *id)
|
|
||||||
{
|
|
||||||
/*std::cout << "new " #type "\n";*/
|
|
||||||
mMemNow[memIndex]++;
|
|
||||||
mMemTotal[memIndex]++;
|
|
||||||
mMemName[memIndex] = id;
|
|
||||||
}
|
|
||||||
|
|
||||||
void MemStats::memChkDel(MemoryNames memIndex, const char *id)
|
|
||||||
{
|
|
||||||
/*std::cout << "del " #type "\n";*/
|
|
||||||
mMemNow[memIndex]--;
|
|
||||||
if (mMemNow[memIndex] < 0) {
|
|
||||||
LOG(ERR) << "Memory underflow on type "<<id;
|
|
||||||
if (gMemLeakDebug) assert(0);
|
|
||||||
mMemNow[memIndex] += 100; // Prevent another message for a while.
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
std::ostream& operator<<(std::ostream& os, std::ostringstream& ss)
|
|
||||||
{
|
|
||||||
return os << ss.str();
|
|
||||||
}
|
|
||||||
|
|
||||||
std::ostream &osprintf(std::ostream &os, const char *fmt, ...)
|
|
||||||
{
|
|
||||||
va_list ap;
|
|
||||||
char buf[300];
|
|
||||||
va_start(ap,fmt);
|
|
||||||
int n = vsnprintf(buf,300,fmt,ap);
|
|
||||||
va_end(ap);
|
|
||||||
if (n >= (300-4)) { strcpy(&buf[(300-4)],"..."); }
|
|
||||||
os << buf;
|
|
||||||
return os;
|
|
||||||
}
|
|
||||||
|
|
||||||
std::string format(const char *fmt, ...)
|
|
||||||
{
|
|
||||||
va_list ap;
|
|
||||||
char buf[300];
|
|
||||||
va_start(ap,fmt);
|
|
||||||
int n = vsnprintf(buf,300,fmt,ap);
|
|
||||||
va_end(ap);
|
|
||||||
if (n >= (300-4)) { strcpy(&buf[(300-4)],"..."); }
|
|
||||||
return std::string(buf);
|
|
||||||
}
|
|
||||||
|
|
||||||
// Return time in seconds with high resolution.
|
|
||||||
// Note: In the past I found this to be a surprisingly expensive system call in linux.
|
|
||||||
double timef()
|
|
||||||
{
|
|
||||||
struct timeval tv;
|
|
||||||
gettimeofday(&tv,NULL);
|
|
||||||
return tv.tv_usec / 1000000.0 + tv.tv_sec;
|
|
||||||
}
|
|
||||||
|
|
||||||
const std::string timestr()
|
|
||||||
{
|
|
||||||
struct timeval tv;
|
|
||||||
struct tm tm;
|
|
||||||
gettimeofday(&tv,NULL);
|
|
||||||
localtime_r(&tv.tv_sec,&tm);
|
|
||||||
unsigned tenths = tv.tv_usec / 100000; // Rounding down is ok.
|
|
||||||
return format(" %02d:%02d:%02d.%1d",tm.tm_hour,tm.tm_min,tm.tm_sec,tenths);
|
|
||||||
}
|
|
||||||
|
|
||||||
// High resolution sleep for the specified time.
|
|
||||||
// Return FALSE if time is already past.
|
|
||||||
void sleepf(double howlong)
|
|
||||||
{
|
|
||||||
if (howlong <= 0.00001) return; // Less than 10 usecs, forget it.
|
|
||||||
usleep((useconds_t) (1000000.0 * howlong));
|
|
||||||
}
|
|
||||||
|
|
||||||
//bool sleepuntil(double untilwhen)
|
|
||||||
//{
|
|
||||||
//double now = timef();
|
|
||||||
//double howlong = untilwhen - now; // Fractional time in seconds.
|
|
||||||
// We are not worrying about overflow because all times should be in the near future.
|
|
||||||
//if (howlong <= 0.00001) return false; // Less than 10 usecs, forget it.
|
|
||||||
//sleepf(sleeptime);
|
|
||||||
//}
|
|
||||||
|
|
||||||
std::string Text2Str::str() const
|
|
||||||
{
|
|
||||||
std::ostringstream ss;
|
|
||||||
text(ss);
|
|
||||||
return ss.str();
|
|
||||||
}
|
|
||||||
|
|
||||||
std::ostream& operator<<(std::ostream& os, const Text2Str *val)
|
|
||||||
{
|
|
||||||
std::ostringstream ss;
|
|
||||||
if (val) {
|
|
||||||
val->text(ss);
|
|
||||||
os << ss.str();
|
|
||||||
} else {
|
|
||||||
os << "(null)";
|
|
||||||
}
|
|
||||||
return os;
|
|
||||||
}
|
|
||||||
|
|
||||||
// Greatest Common Denominator.
|
|
||||||
// This is by Doug Brown.
|
|
||||||
int gcd(int x, int y)
|
|
||||||
{
|
|
||||||
if (x > y) {
|
|
||||||
return x % y == 0 ? y : gcd(y, x % y);
|
|
||||||
} else {
|
|
||||||
return y % x == 0 ? x : gcd(x, y % x);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
// Split a C string into an argc,argv array in place; the input string is modified.
|
|
||||||
// Returns argc, and places results in argv, up to maxargc elements.
|
|
||||||
// The final argv receives the rest of the input string from maxargc on,
|
|
||||||
// even if it contains additional splitchars.
|
|
||||||
// The correct idiom for use is to make a copy of your string, like this:
|
|
||||||
// char *copy = strcpy((char*)alloca(the_string.length()+1),the_string.c_str());
|
|
||||||
// char *argv[2];
|
|
||||||
// int argc = cstrSplit(copy,argv,2,NULL);
|
|
||||||
// If you want to detect the error of too many arguments, add 1 to argv, like this:
|
|
||||||
// char *argv[3];
|
|
||||||
// int argc = cstrSplit(copy,argv,3,NULL);
|
|
||||||
// if (argc == 3) { error("too many arguments"; }
|
|
||||||
int cstrSplit(char *in, char **pargv,int maxargc, const char *splitchars)
|
|
||||||
{
|
|
||||||
if (splitchars == NULL) { splitchars = " \t\r\n"; } // Default is any space.
|
|
||||||
int argc = 0;
|
|
||||||
while (argc < maxargc) {
|
|
||||||
while (*in && strchr(splitchars,*in)) {in++;} // scan past any splitchars
|
|
||||||
if (! *in) return argc; // return if finished.
|
|
||||||
pargv[argc++] = in; // save ptr to start of arg.
|
|
||||||
in = strpbrk(in,splitchars); // go to end of arg.
|
|
||||||
if (!in) return argc; // return if finished.
|
|
||||||
*in++ = 0; // zero terminate this arg.
|
|
||||||
}
|
|
||||||
return argc;
|
|
||||||
}
|
|
||||||
|
|
||||||
std::ostream& operator<<(std::ostream& os, const Statistic<int> &stat) { stat.text(os); return os; }
|
|
||||||
std::ostream& operator<<(std::ostream& os, const Statistic<unsigned> &stat) { stat.text(os); return os; }
|
|
||||||
std::ostream& operator<<(std::ostream& os, const Statistic<float> &stat) { stat.text(os); return os; }
|
|
||||||
std::ostream& operator<<(std::ostream& os, const Statistic<double> &stat) { stat.text(os); return os; }
|
|
||||||
|
|
||||||
std::string replaceAll(const std::string input, const std::string search, const std::string replace)
|
|
||||||
{
|
|
||||||
std::string output = input;
|
|
||||||
int index = 0;
|
|
||||||
|
|
||||||
while (true) {
|
|
||||||
index = output.find(search, index);
|
|
||||||
if (index == std::string::npos) {
|
|
||||||
break;
|
|
||||||
}
|
|
||||||
|
|
||||||
output.replace(index, replace.length(), replace);
|
|
||||||
index += replace.length();
|
|
||||||
}
|
|
||||||
|
|
||||||
return output;
|
|
||||||
}
|
|
||||||
|
|
||||||
};
|
|
||||||
@@ -1,148 +0,0 @@
|
|||||||
/*
|
|
||||||
* Copyright 2011 Range Networks, Inc.
|
|
||||||
* All Rights Reserved.
|
|
||||||
*
|
|
||||||
* This software is distributed under multiple licenses;
|
|
||||||
* see the COPYING file in the main directory for licensing
|
|
||||||
* information for this specific distribuion.
|
|
||||||
*
|
|
||||||
* This use of this software may be subject to additional restrictions.
|
|
||||||
* See the LEGAL file in the main directory for details.
|
|
||||||
|
|
||||||
This program is distributed in the hope that it will be useful,
|
|
||||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
||||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
|
||||||
*/
|
|
||||||
|
|
||||||
#ifndef GPRSUTILS_H
|
|
||||||
#define GPRSUTILS_H
|
|
||||||
#include <stdint.h>
|
|
||||||
#include <stdarg.h>
|
|
||||||
#include <string>
|
|
||||||
#include <string.h>
|
|
||||||
#include <math.h> // for sqrtf
|
|
||||||
#include "Logger.h"
|
|
||||||
|
|
||||||
|
|
||||||
namespace Utils {
|
|
||||||
|
|
||||||
extern double timef(); // high resolution time
|
|
||||||
extern const std::string timestr(); // A timestamp to print in messages.
|
|
||||||
extern void sleepf(double howlong); // high resolution sleep
|
|
||||||
extern int gcd(int x, int y);
|
|
||||||
|
|
||||||
// It is irritating to create a string just to interface to the brain-damaged
|
|
||||||
// C++ stream class, but this is only used for debug messages.
|
|
||||||
std::string format(const char *fmt, ...) __attribute__((format (printf,1,2)));
|
|
||||||
|
|
||||||
int cstrSplit(char *in, char **pargv,int maxargc, const char *splitchars=NULL);
|
|
||||||
|
|
||||||
// For classes with a text() function, provide a function to return a String,
|
|
||||||
// and also a standard << stream function that takes a pointer to the object.
|
|
||||||
// We dont provide the function that takes a reference to the object
|
|
||||||
// because it is too highly overloaded and generally doesnt work.
|
|
||||||
class Text2Str {
|
|
||||||
public:
|
|
||||||
virtual void text(std::ostream &os) const = 0;
|
|
||||||
std::string str() const;
|
|
||||||
};
|
|
||||||
std::ostream& operator<<(std::ostream& os, const Text2Str *val);
|
|
||||||
|
|
||||||
#if 0
|
|
||||||
// Generic Activity Timer. Lots of controls to make everybody happy.
|
|
||||||
class ATimer {
|
|
||||||
double mStart;
|
|
||||||
//bool mActive;
|
|
||||||
double mLimitTime;
|
|
||||||
public:
|
|
||||||
ATimer() : mStart(0), mLimitTime(0) { }
|
|
||||||
ATimer(double wLimitTime) : mStart(0), mLimitTime(wLimitTime) { }
|
|
||||||
void start() { mStart=timef(); }
|
|
||||||
void stop() { mStart=0; }
|
|
||||||
bool active() { return !!mStart; }
|
|
||||||
double elapsed() { return timef() - mStart; }
|
|
||||||
bool expired() { return elapsed() > mLimitTime; }
|
|
||||||
};
|
|
||||||
#endif
|
|
||||||
|
|
||||||
|
|
||||||
struct BitSet {
|
|
||||||
unsigned mBits;
|
|
||||||
void setBit(unsigned whichbit) { mBits |= 1<<whichbit; }
|
|
||||||
void clearBit(unsigned whichbit) { mBits &= ~(1<<whichbit); }
|
|
||||||
unsigned getBit(unsigned whichbit) const { return mBits & (1<<whichbit); }
|
|
||||||
bool isSet(unsigned whichbit) const { return mBits & (1<<whichbit); }
|
|
||||||
unsigned bits() const { return mBits; }
|
|
||||||
operator int(void) const { return mBits; }
|
|
||||||
BitSet() { mBits = 0; }
|
|
||||||
};
|
|
||||||
|
|
||||||
// Store current, min, max and compute running average and standard deviation.
|
|
||||||
template<class Type> struct Statistic {
|
|
||||||
Type mCurrent, mMin, mMax; // min,max optional initialization so you can print before adding any values.
|
|
||||||
unsigned mCnt;
|
|
||||||
double mSum;
|
|
||||||
//double mSum2; // sum of squares.
|
|
||||||
// (Type) cast needed in case Type is an enum, stupid language.
|
|
||||||
Statistic() : mCurrent((Type)0), mMin((Type)0), mMax((Type)0), mCnt(0), mSum(0) /*,mSum2(0)*/ {}
|
|
||||||
// Set the current value and add a statisical point.
|
|
||||||
void addPoint(Type val) {
|
|
||||||
mCurrent = val;
|
|
||||||
if (mCnt == 0 || val < mMin) {mMin = val;}
|
|
||||||
if (mCnt == 0 || val > mMax) {mMax = val;}
|
|
||||||
mCnt++;
|
|
||||||
mSum += val;
|
|
||||||
//mSum2 += val * val;
|
|
||||||
}
|
|
||||||
Type getCurrent() const { // Return current value.
|
|
||||||
return mCnt ? mCurrent : 0;
|
|
||||||
}
|
|
||||||
double getAvg() const { // Return average.
|
|
||||||
return mCnt==0 ? 0 : mSum/mCnt;
|
|
||||||
};
|
|
||||||
//float getSD() const { // Return standard deviation. Use low precision square root function.
|
|
||||||
// return mCnt==0 ? 0 : sqrtf(mCnt * mSum2 - mSum*mSum) / mCnt;
|
|
||||||
//}
|
|
||||||
|
|
||||||
void text(std::ostream &os) const { // Print everything in parens.
|
|
||||||
os << "("<<mCurrent;
|
|
||||||
if (mMin != mMax) { // Not point in printing all this stuff if min == max.
|
|
||||||
os <<LOGVAR2("min",mMin)<<LOGVAR2("max",mMax)<<LOGVAR2("avg",getAvg());
|
|
||||||
if (mCnt <= 999999) {
|
|
||||||
os <<LOGVAR2("N",mCnt);
|
|
||||||
} else { // Shorten this up:
|
|
||||||
char buf[10], *ep;
|
|
||||||
sprintf(buf,"%.3g",round(mCnt));
|
|
||||||
if ((ep = strchr(buf,'e')) && ep[1] == '+') { strcpy(ep+1,ep+2); }
|
|
||||||
os << LOGVAR2("N",buf);
|
|
||||||
}
|
|
||||||
// os<<LOGVAR2("sd",getSD()) standard deviation not interesting
|
|
||||||
}
|
|
||||||
os << ")";
|
|
||||||
// " min="<<mMin <<" max="<<mMax <<format(" avg=%4g sd=%3g)",getAvg(),getSD());
|
|
||||||
}
|
|
||||||
// Not sure if this works:
|
|
||||||
//std::string statStr() const {
|
|
||||||
// return (std::string)mCurrent + " min=" + (std::string) mMin +" max="+(string)mMax+ format(" avg=%4g sd=%3g",getAvg(),getSD());
|
|
||||||
//}
|
|
||||||
};
|
|
||||||
|
|
||||||
// This I/O mechanism is so dumb:
|
|
||||||
std::ostream& operator<<(std::ostream& os, const Statistic<int> &stat);
|
|
||||||
std::ostream& operator<<(std::ostream& os, const Statistic<unsigned> &stat);
|
|
||||||
std::ostream& operator<<(std::ostream& os, const Statistic<float> &stat);
|
|
||||||
std::ostream& operator<<(std::ostream& os, const Statistic<double> &stat);
|
|
||||||
|
|
||||||
|
|
||||||
// Yes, they botched and left this out:
|
|
||||||
std::ostream& operator<<(std::ostream& os, std::ostringstream& ss);
|
|
||||||
|
|
||||||
std::ostream &osprintf(std::ostream &os, const char *fmt, ...) __attribute__((format (printf,2,3)));
|
|
||||||
|
|
||||||
std::string replaceAll(const std::string input, const std::string search, const std::string replace);
|
|
||||||
|
|
||||||
}; // namespace
|
|
||||||
|
|
||||||
using namespace Utils;
|
|
||||||
|
|
||||||
#endif
|
|
||||||
@@ -92,6 +92,13 @@ template <class T> class Vector {
|
|||||||
mEnd = mStart + newSize;
|
mEnd = mStart + newSize;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
/** Reduce addressable size of the Vector, keeping content. */
|
||||||
|
void shrink(size_t newSize)
|
||||||
|
{
|
||||||
|
assert(newSize <= mEnd - mStart);
|
||||||
|
mEnd = mStart + newSize;
|
||||||
|
}
|
||||||
|
|
||||||
/** Release memory and clear pointers. */
|
/** Release memory and clear pointers. */
|
||||||
void clear() { resize(0); }
|
void clear() { resize(0); }
|
||||||
|
|
||||||
@@ -111,8 +118,8 @@ template <class T> class Vector {
|
|||||||
/** Build an empty Vector of a given size. */
|
/** Build an empty Vector of a given size. */
|
||||||
Vector(size_t wSize=0):mData(NULL) { resize(wSize); }
|
Vector(size_t wSize=0):mData(NULL) { resize(wSize); }
|
||||||
|
|
||||||
/** Build a Vector by shifting the data block. */
|
/** Build a Vector by moving another. */
|
||||||
Vector(Vector<T>& other)
|
Vector(Vector<T>&& other)
|
||||||
:mData(other.mData),mStart(other.mStart),mEnd(other.mEnd)
|
:mData(other.mData),mStart(other.mStart),mEnd(other.mEnd)
|
||||||
{ other.mData=NULL; }
|
{ other.mData=NULL; }
|
||||||
|
|
||||||
@@ -222,6 +229,21 @@ template <class T> class Vector {
|
|||||||
memcpy(other.mStart,base,span*sizeof(T));
|
memcpy(other.mStart,base,span*sizeof(T));
|
||||||
}
|
}
|
||||||
|
|
||||||
|
/**
|
||||||
|
Move (copy) a segment of this vector into a different position in the vector
|
||||||
|
@param from Start point from which to copy.
|
||||||
|
@param to Start point to which to copy.
|
||||||
|
@param span The number of elements to copy.
|
||||||
|
*/
|
||||||
|
void segmentMove(size_t from, size_t to, size_t span)
|
||||||
|
{
|
||||||
|
const T* baseFrom = mStart + from;
|
||||||
|
T* baseTo = mStart + to;
|
||||||
|
assert(baseFrom+span<=mEnd);
|
||||||
|
assert(baseTo+span<=mEnd);
|
||||||
|
memmove(baseTo,baseFrom,span*sizeof(T));
|
||||||
|
}
|
||||||
|
|
||||||
void fill(const T& val)
|
void fill(const T& val)
|
||||||
{
|
{
|
||||||
T* dp=mStart;
|
T* dp=mStart;
|
||||||
|
|||||||
@@ -4,7 +4,7 @@
|
|||||||
*/
|
*/
|
||||||
|
|
||||||
|
|
||||||
#include "sqlite3.h"
|
#include <sqlite3.h>
|
||||||
#include "sqlite3util.h"
|
#include "sqlite3util.h"
|
||||||
|
|
||||||
#include <string.h>
|
#include <string.h>
|
||||||
|
|||||||
@@ -41,11 +41,23 @@ const BitVector GSM::gTrainingSequence[] = {
|
|||||||
BitVector("11101111000100101110111100"),
|
BitVector("11101111000100101110111100"),
|
||||||
};
|
};
|
||||||
|
|
||||||
|
const BitVector GSM::gEdgeTrainingSequence[] = {
|
||||||
|
BitVector("111111001111111001111001001001111111111111001111111111001111111001111001001001"),
|
||||||
|
BitVector("111111001111001001111001001001111001001001001111111111001111001001111001001001"),
|
||||||
|
BitVector("111001111111111111001001001111001001001111001111111001111111111111001001001111"),
|
||||||
|
BitVector("111001111111111001001001001111001001111001111111111001111111111001001001001111"),
|
||||||
|
BitVector("111111111001001111001111001001001111111001111111111111111001001111001111001001"),
|
||||||
|
BitVector("111001111111001001001111001111001001111111111111111001111111001001001111001111"),
|
||||||
|
BitVector("001111001111111001001001001001111001001111111111001111001111111001001001001001"),
|
||||||
|
BitVector("001001001111001001001001111111111001111111001111001001001111001001001001111111"),
|
||||||
|
};
|
||||||
|
|
||||||
const BitVector GSM::gDummyBurst("0001111101101110110000010100100111000001001000100000001111100011100010111000101110001010111010010100011001100111001111010011111000100101111101010000");
|
const BitVector GSM::gDummyBurst("0001111101101110110000010100100111000001001000100000001111100011100010111000101110001010111010010100011001100111001111010011111000100101111101010000");
|
||||||
|
|
||||||
const BitVector GSM::gRACHSynchSequence("01001011011111111001100110101010001111000");
|
const BitVector GSM::gRACHSynchSequence("01001011011111111001100110101010001111000");
|
||||||
|
|
||||||
const BitVector GSM::gSCHSynchSequence("1011100101100010000001000000111100101101010001010111011000011011");
|
// |-head-||---------midamble----------------------||--------------data----------------||t|
|
||||||
|
const BitVector GSM::gRACHBurst("0011101001001011011111111001100110101010001111000110111101111110000111001001010110011000");
|
||||||
|
|
||||||
|
|
||||||
int32_t GSM::FNDelta(int32_t v1, int32_t v2)
|
int32_t GSM::FNDelta(int32_t v1, int32_t v2)
|
||||||
|
|||||||
@@ -46,15 +46,16 @@ namespace GSM {
|
|||||||
|
|
||||||
/** GSM Training sequences from GSM 05.02 5.2.3. */
|
/** GSM Training sequences from GSM 05.02 5.2.3. */
|
||||||
extern const BitVector gTrainingSequence[];
|
extern const BitVector gTrainingSequence[];
|
||||||
|
extern const BitVector gEdgeTrainingSequence[];
|
||||||
|
|
||||||
/** C0T0 filler burst, GSM 05.02, 5.2.6 */
|
/** C0T0 filler burst, GSM 05.02, 5.2.6 */
|
||||||
extern const BitVector gDummyBurst;
|
extern const BitVector gDummyBurst;
|
||||||
|
|
||||||
/** Random access burst synch. sequence */
|
/** Random access burst synch. sequence */
|
||||||
extern const BitVector gRACHSynchSequence;
|
extern const BitVector gRACHSynchSequence;
|
||||||
|
/** Random access burst synch. sequence, GSM 05.02 5.2.7 */
|
||||||
|
extern const BitVector gRACHBurst;
|
||||||
|
|
||||||
/** Synchronization burst sync sequence */
|
|
||||||
extern const BitVector gSCHSynchSequence;
|
|
||||||
|
|
||||||
/**@name Modulus operations for frame numbers. */
|
/**@name Modulus operations for frame numbers. */
|
||||||
//@{
|
//@{
|
||||||
|
|||||||
@@ -21,14 +21,13 @@
|
|||||||
include $(top_srcdir)/Makefile.common
|
include $(top_srcdir)/Makefile.common
|
||||||
|
|
||||||
ACLOCAL_AMFLAGS = -I config
|
ACLOCAL_AMFLAGS = -I config
|
||||||
AM_CPPFLAGS = $(STD_DEFINES_AND_INCLUDES) $(USB_INCLUDES) $(WITH_INCLUDES)
|
AM_CPPFLAGS = $(STD_DEFINES_AND_INCLUDES) $(USB_INCLUDES) $(WITH_INCLUDES) $(SQLITE3_CFLAGS)
|
||||||
AM_CXXFLAGS = -Wall -pthread -ldl
|
AM_CXXFLAGS = -Wall -pthread -ldl
|
||||||
#AM_CXXFLAGS = -Wall -O2 -NDEBUG -pthread -ldl
|
#AM_CXXFLAGS = -Wall -O2 -NDEBUG -pthread -ldl
|
||||||
#AM_CFLAGS = -Wall -O2 -NDEBUG -pthread -ldl
|
#AM_CFLAGS = -Wall -O2 -NDEBUG -pthread -ldl
|
||||||
|
|
||||||
# Order must be preserved
|
# Order must be preserved
|
||||||
SUBDIRS = \
|
SUBDIRS = \
|
||||||
sqlite3 \
|
|
||||||
CommonLibs \
|
CommonLibs \
|
||||||
GSM \
|
GSM \
|
||||||
Transceiver52M
|
Transceiver52M
|
||||||
@@ -40,6 +39,7 @@ EXTRA_DIST = \
|
|||||||
COPYING \
|
COPYING \
|
||||||
README
|
README
|
||||||
|
|
||||||
|
@RELMAKE@
|
||||||
|
|
||||||
dox: FORCE
|
dox: FORCE
|
||||||
doxygen doxconfig
|
doxygen doxconfig
|
||||||
|
|||||||
@@ -23,16 +23,13 @@ top_builddir = $(abs_top_builddir)
|
|||||||
|
|
||||||
COMMON_INCLUDEDIR = $(top_srcdir)/CommonLibs
|
COMMON_INCLUDEDIR = $(top_srcdir)/CommonLibs
|
||||||
GSM_INCLUDEDIR = $(top_srcdir)/GSM
|
GSM_INCLUDEDIR = $(top_srcdir)/GSM
|
||||||
SQLITE_INCLUDEDIR = $(top_srcdir)/sqlite3
|
|
||||||
|
|
||||||
STD_DEFINES_AND_INCLUDES = \
|
STD_DEFINES_AND_INCLUDES = \
|
||||||
$(SVNDEV) \
|
$(SVNDEV) \
|
||||||
-I$(COMMON_INCLUDEDIR) \
|
-I$(COMMON_INCLUDEDIR) \
|
||||||
-I$(GSM_INCLUDEDIR) \
|
-I$(GSM_INCLUDEDIR)
|
||||||
-I$(SQLITE_INCLUDEDIR)
|
|
||||||
|
|
||||||
COMMON_LA = $(top_builddir)/CommonLibs/libcommon.la
|
COMMON_LA = $(top_builddir)/CommonLibs/libcommon.la
|
||||||
GSM_LA = $(top_builddir)/GSM/libGSM.la
|
GSM_LA = $(top_builddir)/GSM/libGSM.la
|
||||||
SQLITE_LA = $(top_builddir)/sqlite3/libsqlite.la -ldl
|
|
||||||
|
|
||||||
MOSTLYCLEANFILES = *~
|
MOSTLYCLEANFILES = *~
|
||||||
|
|||||||
260
README
260
README
@@ -1,168 +1,116 @@
|
|||||||
Welcome to the OpenBTS source code.
|
This is the interface to the transcevier.
|
||||||
|
|
||||||
|
Each TRX Manager UDP socket interface represents a single ARFCN.
|
||||||
For free support, please subscribe to openbts-discuss@lists.sourceforge.net.
|
Each of these per-ARFCN interfaces is a pair of UDP sockets, one for control and one for data.
|
||||||
See http://sourceforge.net/mailarchive/forum.php?forum_name=openbts-discuss
|
Give a base port B (5700), the master clock interface is at port P=B.
|
||||||
and https://lists.sourceforge.net/lists/listinfo/openbts-discuss for details.
|
The TRX-side control interface for C(N) is on port P=B+2N+1 and the data interface is on an odd numbered port P=B+2N+2.
|
||||||
|
The corresponding core-side interface for every socket is at P+100.
|
||||||
For additional information, refer to http://openbts.org.
|
For any given build, the number of ARFCN interfaces can be fixed.
|
||||||
|
|
||||||
|
|
||||||
These are the directories:
|
|
||||||
|
|
||||||
AsteriskConfig Asterisk configuration files for use with OpenBTS.
|
|
||||||
CommonLib Common-use libraries, mostly C++ wrappers for basic facilities.
|
|
||||||
Control Control-layer functions for the protocols of GSM 04.08 and SIP.
|
|
||||||
GSM The GSM stack.
|
|
||||||
SIP Components of the SIP state machines ued by the control layer.
|
|
||||||
SMS The SMS stack.
|
|
||||||
SR The subscriber registry.
|
|
||||||
TRXManager The interface between the GSM stack and the radio.
|
|
||||||
Transceiver The software transceiver and specific installation tests.
|
|
||||||
apps OpenBTS application binaries.
|
|
||||||
doc Project documentation.
|
|
||||||
tests Test fixtures for subsets of OpenBTS components.
|
|
||||||
smqueue RFC-3428 store-and-forward server for SMS
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
By default, OpenBTS assumes the following UDP port assignments:
|
Indications on the Master Clock Interface
|
||||||
|
|
||||||
5060 -- Asterisk SIP interface
|
The master clock interface is output only (from the radio).
|
||||||
5061 -- local SIP softphone
|
Messages are "indications".
|
||||||
5062 -- OpenBTS SIP interface
|
|
||||||
5063 -- smqueue SIP interface
|
|
||||||
5064 -- subscriber registry SIP interface
|
|
||||||
5700-range -- OpenBTS-transceiver interface
|
|
||||||
|
|
||||||
These can be controlled in the CONFIG table in /etc/OpenBTS.db.
|
CLOCK gives the current value of the transceiver clock to be used by the core.
|
||||||
|
This message is sent whenever a trasmission packet arrives that is too late or too early. The clock value is NOT the current transceiver time. It is a time setting the the core should use to give better packet arrival times.
|
||||||
|
IND CLOCK <totalFrames>
|
||||||
|
|
||||||
Standrd paths:
|
|
||||||
/OpenBTS -- Binary installation.
|
|
||||||
/etc/OpenBTS -- Configuration databases.
|
|
||||||
/var/run/OpenBTS -- Real-time reporting databases.
|
|
||||||
|
|
||||||
The script apps/setUpFiles.sh will create these directories and install the
|
|
||||||
correct files in them.
|
Commands on the Per-ARFCN Control Interface
|
||||||
|
|
||||||
|
The per-ARFCN control interface uses a command-reponse protocol.
|
||||||
|
Commands are NULL-terminated ASCII strings, one per UDP socket.
|
||||||
|
Each command has a corresponding response.
|
||||||
|
Every command is of the form:
|
||||||
|
|
||||||
|
CMD <cmdtype> [params]
|
||||||
|
|
||||||
|
The <cmdtype> is the actual command.
|
||||||
|
Parameters are optional depending on the commands type.
|
||||||
|
Every response is of the form:
|
||||||
|
|
||||||
|
RSP <cmdtype> <status> [result]
|
||||||
|
|
||||||
|
The <status> is 0 for success and a non-zero error code for failure.
|
||||||
|
Successful responses may include results, depending on the command type.
|
||||||
|
|
||||||
|
|
||||||
|
Power Control
|
||||||
|
|
||||||
|
POWEROFF shuts off transmitter power and stops the demodulator.
|
||||||
|
CMD POWEROFF
|
||||||
|
RSP POWEROFF <status>
|
||||||
|
|
||||||
|
POWERON starts the transmitter and starts the demodulator. Initial power level is very low.
|
||||||
|
This command fails if the transmitter and receiver are not yet tuned.
|
||||||
|
This command fails if the transmit or receive frequency creates a conflict with another ARFCN that is already runnng.
|
||||||
|
If the transceiver is already on, it response with success to this command.
|
||||||
|
CMD POWERON
|
||||||
|
RSP POWERON <status>
|
||||||
|
|
||||||
|
SETPOWER sets output power in dB wrt full scale.
|
||||||
|
This command fails if the transmitter and receiver are not running.
|
||||||
|
CMD SETPOWER <dB>
|
||||||
|
RSP SETPOWER <status> <dB>
|
||||||
|
|
||||||
|
ADJPOWER adjusts power by the given dB step. Response returns resulting power level wrt full scale.
|
||||||
|
This command fails if the transmitter and receiver are not running.
|
||||||
|
CMD ADJPOWER <dBStep>
|
||||||
|
RSP ADJPOWER <status> <dBLevel>
|
||||||
|
|
||||||
|
|
||||||
|
Tuning Control
|
||||||
|
|
||||||
|
RXTUNE tunes the receiver to a given frequency in kHz.
|
||||||
|
This command fails if the receiver is already running.
|
||||||
|
(To re-tune you stop the radio, re-tune, and restart.)
|
||||||
|
This command fails if the transmit or receive frequency creates a conflict with another ARFCN that is already runnng.
|
||||||
|
CMD RXTUNE <kHz>
|
||||||
|
RSP RXTUNE <status> <kHz>
|
||||||
|
|
||||||
|
TXTUNE tunes the transmitter to a given frequency in kHz.
|
||||||
|
This command fails if the transmitter is already running.
|
||||||
|
(To re-tune you stop the radio, re-tune, and restart.)
|
||||||
|
This command fails if the transmit or receive frequency creates a conflict with another ARFCN that is already runnng.
|
||||||
|
CMD TXTUNE <kHz>
|
||||||
|
RSP TXTUNE <status> <kHz>
|
||||||
|
|
||||||
|
|
||||||
|
Timeslot Control
|
||||||
|
|
||||||
|
SETSLOT sets the format of the uplink timeslots in the ARFCN.
|
||||||
|
The <timeslot> indicates the timeslot of interest.
|
||||||
|
The <chantype> indicates the type of channel that occupies the timeslot.
|
||||||
|
A chantype of zero indicates the timeslot is off.
|
||||||
|
CMD SETSLOT <timeslot> <chantype>
|
||||||
|
RSP SETSLOT <status> <timeslot> <chantype>
|
||||||
|
|
||||||
|
|
||||||
|
Messages on the per-ARFCN Data Interface
|
||||||
|
|
||||||
|
Messages on the data interface carry one radio burst per UDP message.
|
||||||
|
|
||||||
|
|
||||||
|
Received Data Burst
|
||||||
|
|
||||||
|
1 byte timeslot index
|
||||||
|
4 bytes GSM frame number, big endian
|
||||||
|
1 byte RSSI in -dBm
|
||||||
|
2 bytes correlator timing offset in 1/256 symbol steps, 2's-comp, big endian
|
||||||
|
148 bytes soft symbol estimates, 0 -> definite "0", 255 -> definite "1"
|
||||||
|
|
||||||
|
|
||||||
|
Transmit Data Burst
|
||||||
|
|
||||||
|
1 byte timeslot index
|
||||||
|
4 bytes GSM frame number, big endian
|
||||||
|
1 byte transmit level wrt ARFCN max, -dB (attenuation)
|
||||||
|
148 bytes output symbol values, 0 & 1
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
Release history:
|
|
||||||
|
|
||||||
Release Name SVN Reposiory SVN Rev Comments
|
|
||||||
|
|
||||||
1.0 (none) SF.net ?? completed L1, L2
|
|
||||||
|
|
||||||
1.1 Arnaudville GNU Radio r10019 (trunk)
|
|
||||||
|
|
||||||
1.2 Breaux Bridge GNU Radio r10088 (trunk) GNU Build, very early assignment
|
|
||||||
|
|
||||||
1.3 Carencro KSP r1 (trunk) first post-injunction release
|
|
||||||
|
|
||||||
1.4 Donaldsonville KSP r23 (trunk) fixed Ubuntu build error
|
|
||||||
|
|
||||||
1.5 Eunice KSP r39 (trunk) fixed L2 bugs related to segmentation
|
|
||||||
removed incomplete SMS directory
|
|
||||||
moved "abort" calls into L3 subclasses
|
|
||||||
|
|
||||||
1.6 New Iberia KSP r130 (trunk) import of all 2.2 improvements to non-SMS release
|
|
||||||
|
|
||||||
|
|
||||||
2.0 St. Francisville KSP r54 (smswork) SMS support
|
|
||||||
file-based configuration
|
|
||||||
|
|
||||||
2.1 Grand Coteau KSP r70 (smswork) DTMF support
|
|
||||||
fixed more Linux-related build errors
|
|
||||||
-lpthread
|
|
||||||
TLMessage constructor
|
|
||||||
expanded stack to prevent overflows in Linux
|
|
||||||
moved gSIPInterface to main app
|
|
||||||
fixed iterator bug in Pager
|
|
||||||
|
|
||||||
2.2 Houma KSP r122 (smswork) added LEGAL notice
|
|
||||||
removed Assert classes
|
|
||||||
stop paging on page response
|
|
||||||
fixed Pager-spin bug
|
|
||||||
fixed Transceiver spin bugs
|
|
||||||
fixed 2^32 microsecond rollover bug
|
|
||||||
reduced stack footprints in Transceiver
|
|
||||||
fixed SMS timestamps
|
|
||||||
check LAI before using TMSI in LUR
|
|
||||||
reduced memory requirement by 75%
|
|
||||||
removed PagerTest
|
|
||||||
fixed stale-transaction bug in paging handler
|
|
||||||
fixed USRP clock rollover bug
|
|
||||||
faster call connection
|
|
||||||
new USRPDevice design
|
|
||||||
|
|
||||||
2.3 Jean Lafitte KSP r190? (trunk) check for out-of-date RACH bursts
|
|
||||||
better TRX-GSM clock sync
|
|
||||||
formal logging system
|
|
||||||
command line interface
|
|
||||||
emergency call setup
|
|
||||||
|
|
||||||
2.4 Kinder KSP r208? (trunk) fixed BCCH neighbor list bug
|
|
||||||
support for neighbor lists
|
|
||||||
fixed support for non-local Asterisk servers
|
|
||||||
cleaner configuration management
|
|
||||||
more realtime control of BCCH parameters
|
|
||||||
proper rejection of Hold messages
|
|
||||||
fixed L3 hanging bug in MTDCheckBYE
|
|
||||||
|
|
||||||
2.4.1 Kinder KSP r462 fixed lots of valgrind errors
|
|
||||||
|
|
||||||
2.4.2 Kinder KSP r482 zero-length calling party number bug
|
|
||||||
g++ 4.4 #includes
|
|
||||||
|
|
||||||
2.5 Lacassine KSP r551 imported Joshua Lackey patches
|
|
||||||
SIP fixes from Anne Kwong
|
|
||||||
SIP fixes from testing with SMS server
|
|
||||||
L3 TI handling fixes
|
|
||||||
SMS server support
|
|
||||||
GNU Radio 3.2 compatibility
|
|
||||||
configurable max range and LU-reject cause
|
|
||||||
"page" & "testcall" CLI features
|
|
||||||
|
|
||||||
2.5.1 Lacassine KSP r595 fixed some build bugs for some Linux distros
|
|
||||||
|
|
||||||
2.5.2 Lacassine KSP r630 fixed channel assignment bug for Nokia DCT4+ handsets
|
|
||||||
|
|
||||||
2.5.3 Lacassine KSP r756 merged fix for transceiver startup crash
|
|
||||||
due to use of uninitialized variables (r646)
|
|
||||||
merged fix for fusb bug from trunk (r582)
|
|
||||||
|
|
||||||
2.5.4 Lacassine KSP r812 merged fixes to build under latest Fedora and
|
|
||||||
to build with git GnuRadio (r814)
|
|
||||||
|
|
||||||
2.6 Mamou KSP r886 fixed infamous fusb bug (r582)
|
|
||||||
fixed idle-filling table size bug
|
|
||||||
smoother uplink power control
|
|
||||||
load-limiting downlink power control
|
|
||||||
new "config" features (optional, static)
|
|
||||||
IMEI interrogation
|
|
||||||
fixed MOD "missing FIFO" bug
|
|
||||||
configurable short code features
|
|
||||||
fixed transceiver startup crash (r646)
|
|
||||||
readline support is back
|
|
||||||
fixed timing advance bug (r844)
|
|
||||||
added CLI "chans" command
|
|
||||||
track time-of-use in TMSI table (r844)
|
|
||||||
added CLI "noise" command (r844)
|
|
||||||
added CLI "rxpower" command (r844)
|
|
||||||
added CLI "unconfig" command
|
|
||||||
|
|
||||||
2.7 Natchitoches Range rxxx (never released publicly)
|
|
||||||
converted TMSITable to sqlite3 (r902)
|
|
||||||
sqlite3-based configuration (r???)
|
|
||||||
converted Logger to syslogd (r903)
|
|
||||||
added support for rest octets (r1022)
|
|
||||||
external database for transaction reporting (r1184)
|
|
||||||
external database for channel status reporting (r1203)
|
|
||||||
in-call delivery and submission of text messages (r1231)
|
|
||||||
RFC-2833 DMTF (r1249)
|
|
||||||
|
|
||||||
2.8 Opelousas Range rxxx move databases to /etc and /var
|
|
||||||
RRLP aiding support
|
|
||||||
|
|
||||||
|
|
||||||
|
|||||||
108
Transceiver52M/Channelizer.cpp
Normal file
108
Transceiver52M/Channelizer.cpp
Normal file
@@ -0,0 +1,108 @@
|
|||||||
|
/*
|
||||||
|
* Polyphase channelizer
|
||||||
|
*
|
||||||
|
* Copyright (C) 2012-2014 Tom Tsou <tom@tsou.cc>
|
||||||
|
* Copyright (C) 2015 Ettus Research LLC
|
||||||
|
*
|
||||||
|
* This program is free software: you can redistribute it and/or modify
|
||||||
|
* it under the terms of the GNU Affero General Public License as published by
|
||||||
|
* the Free Software Foundation, either version 3 of the License, or
|
||||||
|
* (at your option) any later version.
|
||||||
|
*
|
||||||
|
* This program is distributed in the hope that it will be useful,
|
||||||
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||||
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||||
|
* GNU Affero General Public License for more details.
|
||||||
|
*
|
||||||
|
* You should have received a copy of the GNU Affero General Public License
|
||||||
|
* along with this program. If not, see <http://www.gnu.org/licenses/>.
|
||||||
|
* See the COPYING file in the main directory for details.
|
||||||
|
*/
|
||||||
|
|
||||||
|
#include <stdlib.h>
|
||||||
|
#include <math.h>
|
||||||
|
#include <assert.h>
|
||||||
|
#include <string.h>
|
||||||
|
#include <cstdio>
|
||||||
|
|
||||||
|
#include "Logger.h"
|
||||||
|
#include "Channelizer.h"
|
||||||
|
|
||||||
|
extern "C" {
|
||||||
|
#include "common/fft.h"
|
||||||
|
#include "common/convolve.h"
|
||||||
|
}
|
||||||
|
|
||||||
|
static void deinterleave(const float *in, size_t ilen,
|
||||||
|
float **out, size_t olen, size_t m)
|
||||||
|
{
|
||||||
|
size_t i, n;
|
||||||
|
|
||||||
|
for (i = 0; i < olen; i++) {
|
||||||
|
for (n = 0; n < m; n++) {
|
||||||
|
out[m - 1 - n][2 * i + 0] = in[2 * (i * m + n) + 0];
|
||||||
|
out[m - 1 - n][2 * i + 1] = in[2 * (i * m + n) + 1];
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
size_t Channelizer::inputLen() const
|
||||||
|
{
|
||||||
|
return blockLen * m;
|
||||||
|
}
|
||||||
|
|
||||||
|
size_t Channelizer::outputLen() const
|
||||||
|
{
|
||||||
|
return blockLen;
|
||||||
|
}
|
||||||
|
|
||||||
|
float *Channelizer::outputBuffer(size_t chan) const
|
||||||
|
{
|
||||||
|
if (chan >= m)
|
||||||
|
return NULL;
|
||||||
|
|
||||||
|
return hInputs[chan];
|
||||||
|
}
|
||||||
|
|
||||||
|
/*
|
||||||
|
* Implementation based on material found in:
|
||||||
|
*
|
||||||
|
* "harris, fred, Multirate Signal Processing, Upper Saddle River, NJ,
|
||||||
|
* Prentice Hall, 2006."
|
||||||
|
*/
|
||||||
|
bool Channelizer::rotate(const float *in, size_t len)
|
||||||
|
{
|
||||||
|
size_t hSize = 2 * hLen * sizeof(float);
|
||||||
|
|
||||||
|
if (!checkLen(blockLen, len))
|
||||||
|
return false;
|
||||||
|
|
||||||
|
deinterleave(in, len, hInputs, blockLen, m);
|
||||||
|
|
||||||
|
/*
|
||||||
|
* Convolve through filterbank while applying and saving sample history
|
||||||
|
*/
|
||||||
|
for (size_t i = 0; i < m; i++) {
|
||||||
|
memcpy(&hInputs[i][2 * -hLen], hist[i], hSize);
|
||||||
|
memcpy(hist[i], &hInputs[i][2 * (blockLen - hLen)], hSize);
|
||||||
|
|
||||||
|
convolve_real(hInputs[i], blockLen,
|
||||||
|
subFilters[i], hLen,
|
||||||
|
hOutputs[i], blockLen,
|
||||||
|
0, blockLen, 1, 0);
|
||||||
|
}
|
||||||
|
|
||||||
|
cxvec_fft(fftHandle);
|
||||||
|
|
||||||
|
return true;
|
||||||
|
}
|
||||||
|
|
||||||
|
/* Setup channelizer paramaters */
|
||||||
|
Channelizer::Channelizer(size_t m, size_t blockLen, size_t hLen)
|
||||||
|
: ChannelizerBase(m, blockLen, hLen)
|
||||||
|
{
|
||||||
|
}
|
||||||
|
|
||||||
|
Channelizer::~Channelizer()
|
||||||
|
{
|
||||||
|
}
|
||||||
34
Transceiver52M/Channelizer.h
Normal file
34
Transceiver52M/Channelizer.h
Normal file
@@ -0,0 +1,34 @@
|
|||||||
|
#ifndef _CHANNELIZER_RX_H_
|
||||||
|
#define _CHANNELIZER_RX_H_
|
||||||
|
|
||||||
|
#include "ChannelizerBase.h"
|
||||||
|
|
||||||
|
class Channelizer : public ChannelizerBase {
|
||||||
|
public:
|
||||||
|
/** Constructor for channelizing filter bank
|
||||||
|
@param m number of physical channels
|
||||||
|
@param blockLen number of samples per output of each iteration
|
||||||
|
@param hLen number of taps in each constituent filter path
|
||||||
|
*/
|
||||||
|
Channelizer(size_t m, size_t blockLen, size_t hLen = 16);
|
||||||
|
~Channelizer();
|
||||||
|
|
||||||
|
/* Return required input and output buffer lengths */
|
||||||
|
size_t inputLen() const;
|
||||||
|
size_t outputLen() const;
|
||||||
|
|
||||||
|
/** Rotate "input commutator" and drive samples through filterbank
|
||||||
|
@param in complex input vector
|
||||||
|
@param iLen number of samples in buffer (must match block length)
|
||||||
|
@return false on error and true otherwise
|
||||||
|
*/
|
||||||
|
bool rotate(const float *in, size_t iLen);
|
||||||
|
|
||||||
|
/** Get buffer for an output path
|
||||||
|
@param chan channel number of filterbank
|
||||||
|
@return NULL on error and pointer to buffer otherwise
|
||||||
|
*/
|
||||||
|
float *outputBuffer(size_t chan) const;
|
||||||
|
};
|
||||||
|
|
||||||
|
#endif /* _CHANNELIZER_RX_H_ */
|
||||||
251
Transceiver52M/ChannelizerBase.cpp
Normal file
251
Transceiver52M/ChannelizerBase.cpp
Normal file
@@ -0,0 +1,251 @@
|
|||||||
|
/*
|
||||||
|
* Polyphase channelizer
|
||||||
|
*
|
||||||
|
* Copyright (C) 2012-2014 Tom Tsou <tom@tsou.cc>
|
||||||
|
* Copyright (C) 2015 Ettus Research LLC
|
||||||
|
*
|
||||||
|
* This program is free software: you can redistribute it and/or modify
|
||||||
|
* it under the terms of the GNU Affero General Public License as published by
|
||||||
|
* the Free Software Foundation, either version 3 of the License, or
|
||||||
|
* (at your option) any later version.
|
||||||
|
*
|
||||||
|
* This program is distributed in the hope that it will be useful,
|
||||||
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||||
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||||
|
* GNU Affero General Public License for more details.
|
||||||
|
*
|
||||||
|
* You should have received a copy of the GNU Affero General Public License
|
||||||
|
* along with this program. If not, see <http://www.gnu.org/licenses/>.
|
||||||
|
* See the COPYING file in the main directory for details.
|
||||||
|
*/
|
||||||
|
|
||||||
|
#include <malloc.h>
|
||||||
|
#include <math.h>
|
||||||
|
#include <assert.h>
|
||||||
|
#include <string.h>
|
||||||
|
#include <cstdio>
|
||||||
|
|
||||||
|
#include "Logger.h"
|
||||||
|
#include "ChannelizerBase.h"
|
||||||
|
|
||||||
|
extern "C" {
|
||||||
|
#include "common/fft.h"
|
||||||
|
}
|
||||||
|
|
||||||
|
static float sinc(float x)
|
||||||
|
{
|
||||||
|
if (x == 0.0f)
|
||||||
|
return 0.999999999999f;
|
||||||
|
|
||||||
|
return sin(M_PI * x) / (M_PI * x);
|
||||||
|
}
|
||||||
|
|
||||||
|
/*
|
||||||
|
* There are more efficient reversal algorithms, but we only reverse at
|
||||||
|
* initialization so we don't care.
|
||||||
|
*/
|
||||||
|
static void reverse(float *buf, size_t len)
|
||||||
|
{
|
||||||
|
float tmp[2 * len];
|
||||||
|
memcpy(tmp, buf, 2 * len * sizeof(float));
|
||||||
|
|
||||||
|
for (size_t i = 0; i < len; i++) {
|
||||||
|
buf[2 * i + 0] = tmp[2 * (len - 1 - i) + 0];
|
||||||
|
buf[2 * i + 1] = tmp[2 * (len - 1 - i) + 1];
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
/*
|
||||||
|
* Create polyphase filterbank
|
||||||
|
*
|
||||||
|
* Implementation based material found in,
|
||||||
|
*
|
||||||
|
* "harris, fred, Multirate Signal Processing, Upper Saddle River, NJ,
|
||||||
|
* Prentice Hall, 2006."
|
||||||
|
*/
|
||||||
|
bool ChannelizerBase::initFilters()
|
||||||
|
{
|
||||||
|
size_t protoLen = m * hLen;
|
||||||
|
float *proto;
|
||||||
|
float sum = 0.0f, scale = 0.0f;
|
||||||
|
float midpt = (float) (protoLen - 1.0) / 2.0;
|
||||||
|
|
||||||
|
/*
|
||||||
|
* Allocate 'M' partition filters and the temporary prototype
|
||||||
|
* filter. Coefficients are real only and must be 16-byte memory
|
||||||
|
* aligned for SSE usage.
|
||||||
|
*/
|
||||||
|
proto = new float[protoLen];
|
||||||
|
if (!proto)
|
||||||
|
return false;
|
||||||
|
|
||||||
|
subFilters = (float **) malloc(sizeof(float *) * m);
|
||||||
|
if (!subFilters) {
|
||||||
|
delete[] proto;
|
||||||
|
return false;
|
||||||
|
}
|
||||||
|
|
||||||
|
for (size_t i = 0; i < m; i++) {
|
||||||
|
subFilters[i] = (float *)
|
||||||
|
memalign(16, hLen * 2 * sizeof(float));
|
||||||
|
}
|
||||||
|
|
||||||
|
/*
|
||||||
|
* Generate the prototype filter with a Blackman-harris window.
|
||||||
|
* Scale coefficients with DC filter gain set to unity divided
|
||||||
|
* by the number of channels.
|
||||||
|
*/
|
||||||
|
float a0 = 0.35875;
|
||||||
|
float a1 = 0.48829;
|
||||||
|
float a2 = 0.14128;
|
||||||
|
float a3 = 0.01168;
|
||||||
|
|
||||||
|
for (size_t i = 0; i < protoLen; i++) {
|
||||||
|
proto[i] = sinc(((float) i - midpt) / (float) m);
|
||||||
|
proto[i] *= a0 -
|
||||||
|
a1 * cos(2 * M_PI * i / (protoLen - 1)) +
|
||||||
|
a2 * cos(4 * M_PI * i / (protoLen - 1)) -
|
||||||
|
a3 * cos(6 * M_PI * i / (protoLen - 1));
|
||||||
|
sum += proto[i];
|
||||||
|
}
|
||||||
|
scale = (float) m / sum;
|
||||||
|
|
||||||
|
/*
|
||||||
|
* Populate partition filters and reverse the coefficients per
|
||||||
|
* convolution requirements.
|
||||||
|
*/
|
||||||
|
for (size_t i = 0; i < hLen; i++) {
|
||||||
|
for (size_t n = 0; n < m; n++) {
|
||||||
|
subFilters[n][2 * i + 0] = proto[i * m + n] * scale;
|
||||||
|
subFilters[n][2 * i + 1] = 0.0f;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
for (size_t i = 0; i < m; i++)
|
||||||
|
reverse(subFilters[i], hLen);
|
||||||
|
|
||||||
|
delete[] proto;
|
||||||
|
|
||||||
|
return true;
|
||||||
|
}
|
||||||
|
|
||||||
|
bool ChannelizerBase::initFFT()
|
||||||
|
{
|
||||||
|
size_t size;
|
||||||
|
|
||||||
|
if (fftInput || fftOutput || fftHandle)
|
||||||
|
return false;
|
||||||
|
|
||||||
|
size = blockLen * m * 2 * sizeof(float);
|
||||||
|
fftInput = (float *) fft_malloc(size);
|
||||||
|
memset(fftInput, 0, size);
|
||||||
|
|
||||||
|
size = (blockLen + hLen) * m * 2 * sizeof(float);
|
||||||
|
fftOutput = (float *) fft_malloc(size);
|
||||||
|
memset(fftOutput, 0, size);
|
||||||
|
|
||||||
|
if (!fftInput | !fftOutput) {
|
||||||
|
LOG(ALERT) << "Memory allocation error";
|
||||||
|
return false;
|
||||||
|
}
|
||||||
|
|
||||||
|
fftHandle = init_fft(0, m, blockLen, blockLen + hLen,
|
||||||
|
fftInput, fftOutput, hLen);
|
||||||
|
return true;
|
||||||
|
}
|
||||||
|
|
||||||
|
bool ChannelizerBase::mapBuffers()
|
||||||
|
{
|
||||||
|
if (!fftHandle) {
|
||||||
|
LOG(ALERT) << "FFT buffers not initialized";
|
||||||
|
return false;
|
||||||
|
}
|
||||||
|
|
||||||
|
hInputs = (float **) malloc(sizeof(float *) * m);
|
||||||
|
hOutputs = (float **) malloc(sizeof(float *) * m);
|
||||||
|
if (!hInputs | !hOutputs)
|
||||||
|
return false;
|
||||||
|
|
||||||
|
for (size_t i = 0; i < m; i++) {
|
||||||
|
hInputs[i] = &fftOutput[2 * (i * (blockLen + hLen) + hLen)];
|
||||||
|
hOutputs[i] = &fftInput[2 * (i * blockLen)];
|
||||||
|
}
|
||||||
|
|
||||||
|
return true;
|
||||||
|
}
|
||||||
|
|
||||||
|
/*
|
||||||
|
* Setup filterbank internals
|
||||||
|
*/
|
||||||
|
bool ChannelizerBase::init()
|
||||||
|
{
|
||||||
|
/*
|
||||||
|
* Filterbank coefficients, fft plan, history, and output sample
|
||||||
|
* rate conversion blocks
|
||||||
|
*/
|
||||||
|
if (!initFilters()) {
|
||||||
|
LOG(ALERT) << "Failed to initialize channelizing filter";
|
||||||
|
return false;
|
||||||
|
}
|
||||||
|
|
||||||
|
hist = (float **) malloc(sizeof(float *) * m);
|
||||||
|
for (size_t i = 0; i < m; i++) {
|
||||||
|
hist[i] = new float[2 * hLen];
|
||||||
|
memset(hist[i], 0, 2 * hLen * sizeof(float));
|
||||||
|
}
|
||||||
|
|
||||||
|
if (!initFFT()) {
|
||||||
|
LOG(ALERT) << "Failed to initialize FFT";
|
||||||
|
return false;
|
||||||
|
}
|
||||||
|
|
||||||
|
mapBuffers();
|
||||||
|
|
||||||
|
return true;
|
||||||
|
}
|
||||||
|
|
||||||
|
/* Check vector length validity */
|
||||||
|
bool ChannelizerBase::checkLen(size_t innerLen, size_t outerLen)
|
||||||
|
{
|
||||||
|
if (outerLen != innerLen * m) {
|
||||||
|
LOG(ALERT) << "Invalid outer length " << innerLen
|
||||||
|
<< " is not multiple of " << blockLen;
|
||||||
|
return false;
|
||||||
|
}
|
||||||
|
|
||||||
|
if (innerLen != blockLen) {
|
||||||
|
LOG(ALERT) << "Invalid inner length " << outerLen
|
||||||
|
<< " does not equal " << blockLen;
|
||||||
|
return false;
|
||||||
|
}
|
||||||
|
|
||||||
|
return true;
|
||||||
|
}
|
||||||
|
|
||||||
|
/*
|
||||||
|
* Setup channelizer paramaters
|
||||||
|
*/
|
||||||
|
ChannelizerBase::ChannelizerBase(size_t m, size_t blockLen, size_t hLen)
|
||||||
|
: fftInput(NULL), fftOutput(NULL), fftHandle(NULL)
|
||||||
|
{
|
||||||
|
this->m = m;
|
||||||
|
this->hLen = hLen;
|
||||||
|
this->blockLen = blockLen;
|
||||||
|
}
|
||||||
|
|
||||||
|
ChannelizerBase::~ChannelizerBase()
|
||||||
|
{
|
||||||
|
free_fft(fftHandle);
|
||||||
|
|
||||||
|
for (size_t i = 0; i < m; i++) {
|
||||||
|
free(subFilters[i]);
|
||||||
|
delete hist[i];
|
||||||
|
}
|
||||||
|
|
||||||
|
fft_free(fftInput);
|
||||||
|
fft_free(fftOutput);
|
||||||
|
|
||||||
|
free(hInputs);
|
||||||
|
free(hOutputs);
|
||||||
|
free(hist);
|
||||||
|
}
|
||||||
39
Transceiver52M/ChannelizerBase.h
Normal file
39
Transceiver52M/ChannelizerBase.h
Normal file
@@ -0,0 +1,39 @@
|
|||||||
|
#ifndef _CHANNELIZER_BASE_H_
|
||||||
|
#define _CHANNELIZER_BASE_H_
|
||||||
|
|
||||||
|
class ChannelizerBase {
|
||||||
|
protected:
|
||||||
|
ChannelizerBase(size_t m, size_t blockLen, size_t hLen);
|
||||||
|
~ChannelizerBase();
|
||||||
|
|
||||||
|
/* Channelizer parameters */
|
||||||
|
size_t m;
|
||||||
|
size_t hLen;
|
||||||
|
size_t blockLen;
|
||||||
|
|
||||||
|
/* Channelizer filterbank sub-filters */
|
||||||
|
float **subFilters;
|
||||||
|
|
||||||
|
/* Input/Output buffers */
|
||||||
|
float **hInputs, **hOutputs, **hist;
|
||||||
|
float *fftInput, *fftOutput;
|
||||||
|
|
||||||
|
/* Pointer to opaque FFT instance */
|
||||||
|
struct fft_hdl *fftHandle;
|
||||||
|
|
||||||
|
/* Initializer internals */
|
||||||
|
bool initFilters();
|
||||||
|
bool initFFT();
|
||||||
|
void releaseFilters();
|
||||||
|
|
||||||
|
/* Map overlapped FFT and filter I/O buffers */
|
||||||
|
bool mapBuffers();
|
||||||
|
|
||||||
|
/* Buffer length validity checking */
|
||||||
|
bool checkLen(size_t innerLen, size_t outerLen);
|
||||||
|
public:
|
||||||
|
/* Initilize channelizer/synthesis filter internals */
|
||||||
|
bool init();
|
||||||
|
};
|
||||||
|
|
||||||
|
#endif /* _CHANNELIZER_BASE_H_ */
|
||||||
@@ -21,7 +21,7 @@
|
|||||||
|
|
||||||
include $(top_srcdir)/Makefile.common
|
include $(top_srcdir)/Makefile.common
|
||||||
|
|
||||||
AM_CPPFLAGS = -Wall $(STD_DEFINES_AND_INCLUDES) -I./common
|
AM_CPPFLAGS = -Wall $(STD_DEFINES_AND_INCLUDES) -I${srcdir}/common
|
||||||
AM_CXXFLAGS = -ldl -lpthread
|
AM_CXXFLAGS = -ldl -lpthread
|
||||||
|
|
||||||
SUBDIRS = arm x86
|
SUBDIRS = arm x86
|
||||||
@@ -54,16 +54,20 @@ COMMON_SOURCES = \
|
|||||||
radioInterface.cpp \
|
radioInterface.cpp \
|
||||||
radioVector.cpp \
|
radioVector.cpp \
|
||||||
radioClock.cpp \
|
radioClock.cpp \
|
||||||
|
radioBuffer.cpp \
|
||||||
sigProcLib.cpp \
|
sigProcLib.cpp \
|
||||||
signalVector.cpp \
|
signalVector.cpp \
|
||||||
Transceiver.cpp \
|
Transceiver.cpp \
|
||||||
sch.c
|
ChannelizerBase.cpp \
|
||||||
|
Channelizer.cpp \
|
||||||
|
Synthesis.cpp \
|
||||||
|
common/fft.c
|
||||||
|
|
||||||
libtransceiver_la_SOURCES = \
|
libtransceiver_la_SOURCES = \
|
||||||
$(COMMON_SOURCES) \
|
$(COMMON_SOURCES) \
|
||||||
Resampler.cpp \
|
Resampler.cpp \
|
||||||
radioInterfaceResamp.cpp \
|
radioInterfaceResamp.cpp \
|
||||||
radioInterfaceDiversity.cpp
|
radioInterfaceMulti.cpp
|
||||||
|
|
||||||
bin_PROGRAMS = osmo-trx
|
bin_PROGRAMS = osmo-trx
|
||||||
|
|
||||||
@@ -73,29 +77,32 @@ noinst_HEADERS = \
|
|||||||
radioVector.h \
|
radioVector.h \
|
||||||
radioClock.h \
|
radioClock.h \
|
||||||
radioDevice.h \
|
radioDevice.h \
|
||||||
|
radioBuffer.h \
|
||||||
sigProcLib.h \
|
sigProcLib.h \
|
||||||
signalVector.h \
|
signalVector.h \
|
||||||
Transceiver.h \
|
Transceiver.h \
|
||||||
USRPDevice.h \
|
USRPDevice.h \
|
||||||
Resampler.h \
|
Resampler.h \
|
||||||
|
ChannelizerBase.h \
|
||||||
|
Channelizer.h \
|
||||||
|
Synthesis.h \
|
||||||
common/convolve.h \
|
common/convolve.h \
|
||||||
common/convert.h \
|
common/convert.h \
|
||||||
common/scale.h \
|
common/scale.h \
|
||||||
common/mult.h
|
common/mult.h \
|
||||||
|
common/fft.h
|
||||||
|
|
||||||
osmo_trx_SOURCES = osmo-trx.cpp
|
osmo_trx_SOURCES = osmo-trx.cpp
|
||||||
osmo_trx_LDADD = \
|
osmo_trx_LDADD = \
|
||||||
libtransceiver.la \
|
libtransceiver.la \
|
||||||
$(ARCH_LA) \
|
$(ARCH_LA) \
|
||||||
$(GSM_LA) \
|
$(GSM_LA) \
|
||||||
$(COMMON_LA) \
|
$(COMMON_LA) $(SQLITE3_LIBS)
|
||||||
$(SQLITE_LA) \
|
|
||||||
$(LIBOSMOCORE_LIBS)
|
|
||||||
|
|
||||||
if USRP1
|
if USRP1
|
||||||
libtransceiver_la_SOURCES += USRPDevice.cpp
|
libtransceiver_la_SOURCES += USRPDevice.cpp
|
||||||
osmo_trx_LDADD += $(USRP_LIBS)
|
osmo_trx_LDADD += $(USRP_LIBS)
|
||||||
else
|
else
|
||||||
libtransceiver_la_SOURCES += UHDDevice.cpp
|
libtransceiver_la_SOURCES += UHDDevice.cpp
|
||||||
osmo_trx_LDADD += $(UHD_LIBS)
|
osmo_trx_LDADD += $(UHD_LIBS) $(FFTWF_LIBS)
|
||||||
endif
|
endif
|
||||||
|
|||||||
@@ -22,6 +22,7 @@
|
|||||||
#include <string.h>
|
#include <string.h>
|
||||||
#include <malloc.h>
|
#include <malloc.h>
|
||||||
#include <iostream>
|
#include <iostream>
|
||||||
|
#include <algorithm>
|
||||||
|
|
||||||
#include "Resampler.h"
|
#include "Resampler.h"
|
||||||
|
|
||||||
@@ -35,6 +36,8 @@ extern "C" {
|
|||||||
|
|
||||||
#define MAX_OUTPUT_LEN 4096
|
#define MAX_OUTPUT_LEN 4096
|
||||||
|
|
||||||
|
using namespace std;
|
||||||
|
|
||||||
static float sinc(float x)
|
static float sinc(float x)
|
||||||
{
|
{
|
||||||
if (x == 0.0)
|
if (x == 0.0)
|
||||||
@@ -43,32 +46,19 @@ static float sinc(float x)
|
|||||||
return sin(M_PI * x) / (M_PI * x);
|
return sin(M_PI * x) / (M_PI * x);
|
||||||
}
|
}
|
||||||
|
|
||||||
bool Resampler::initFilters(float bw)
|
void Resampler::initFilters(float bw)
|
||||||
{
|
{
|
||||||
size_t proto_len = p * filt_len;
|
float cutoff;
|
||||||
float *proto, val, cutoff;
|
|
||||||
float sum = 0.0f, scale = 0.0f;
|
float sum = 0.0f, scale = 0.0f;
|
||||||
float midpt = (float) (proto_len - 1.0) / 2.0;
|
|
||||||
|
|
||||||
/*
|
/*
|
||||||
* Allocate partition filters and the temporary prototype filter
|
* Allocate partition filters and the temporary prototype filter
|
||||||
* according to numerator of the rational rate. Coefficients are
|
* according to numerator of the rational rate. Coefficients are
|
||||||
* real only and must be 16-byte memory aligned for SSE usage.
|
* real only and must be 16-byte memory aligned for SSE usage.
|
||||||
*/
|
*/
|
||||||
proto = new float[proto_len];
|
auto proto = vector<float>(p * filt_len);
|
||||||
if (!proto)
|
for (auto &part : partitions)
|
||||||
return false;
|
part = (complex<float> *) memalign(16, filt_len * sizeof(complex<float>));
|
||||||
|
|
||||||
partitions = (float **) malloc(sizeof(float *) * p);
|
|
||||||
if (!partitions) {
|
|
||||||
free(proto);
|
|
||||||
return false;
|
|
||||||
}
|
|
||||||
|
|
||||||
for (size_t i = 0; i < p; i++) {
|
|
||||||
partitions[i] = (float *)
|
|
||||||
memalign(16, filt_len * 2 * sizeof(float));
|
|
||||||
}
|
|
||||||
|
|
||||||
/*
|
/*
|
||||||
* Generate the prototype filter with a Blackman-harris window.
|
* Generate the prototype filter with a Blackman-harris window.
|
||||||
@@ -85,47 +75,26 @@ bool Resampler::initFilters(float bw)
|
|||||||
else
|
else
|
||||||
cutoff = (float) q;
|
cutoff = (float) q;
|
||||||
|
|
||||||
for (size_t i = 0; i < proto_len; i++) {
|
float midpt = (proto.size() - 1) / 2.0;
|
||||||
|
for (size_t i = 0; i < proto.size(); i++) {
|
||||||
proto[i] = sinc(((float) i - midpt) / cutoff * bw);
|
proto[i] = sinc(((float) i - midpt) / cutoff * bw);
|
||||||
proto[i] *= a0 -
|
proto[i] *= a0 -
|
||||||
a1 * cos(2 * M_PI * i / (proto_len - 1)) +
|
a1 * cos(2 * M_PI * i / (proto.size() - 1)) +
|
||||||
a2 * cos(4 * M_PI * i / (proto_len - 1)) -
|
a2 * cos(4 * M_PI * i / (proto.size() - 1)) -
|
||||||
a3 * cos(6 * M_PI * i / (proto_len - 1));
|
a3 * cos(6 * M_PI * i / (proto.size() - 1));
|
||||||
sum += proto[i];
|
sum += proto[i];
|
||||||
}
|
}
|
||||||
scale = p / sum;
|
scale = p / sum;
|
||||||
|
|
||||||
/* Populate filter partitions from the prototype filter */
|
/* Populate filter partitions from the prototype filter */
|
||||||
for (size_t i = 0; i < filt_len; i++) {
|
for (size_t i = 0; i < filt_len; i++) {
|
||||||
for (size_t n = 0; n < p; n++) {
|
for (size_t n = 0; n < p; n++)
|
||||||
partitions[n][2 * i + 0] = proto[i * p + n] * scale;
|
partitions[n][i] = complex<float>(proto[i * p + n] * scale);
|
||||||
partitions[n][2 * i + 1] = 0.0f;
|
|
||||||
}
|
|
||||||
}
|
}
|
||||||
|
|
||||||
/* For convolution, we store the filter taps in reverse */
|
/* Store filter taps in reverse */
|
||||||
for (size_t n = 0; n < p; n++) {
|
for (auto &part : partitions)
|
||||||
for (size_t i = 0; i < filt_len / 2; i++) {
|
reverse(&part[0], &part[filt_len]);
|
||||||
val = partitions[n][2 * i];
|
|
||||||
partitions[n][2 * i] = partitions[n][2 * (filt_len - 1 - i)];
|
|
||||||
partitions[n][2 * (filt_len - 1 - i)] = val;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
delete proto;
|
|
||||||
|
|
||||||
return true;
|
|
||||||
}
|
|
||||||
|
|
||||||
void Resampler::releaseFilters()
|
|
||||||
{
|
|
||||||
if (partitions) {
|
|
||||||
for (size_t i = 0; i < p; i++)
|
|
||||||
free(partitions[i]);
|
|
||||||
}
|
|
||||||
|
|
||||||
free(partitions);
|
|
||||||
partitions = NULL;
|
|
||||||
}
|
}
|
||||||
|
|
||||||
static bool check_vec_len(int in_len, int out_len, int p, int q)
|
static bool check_vec_len(int in_len, int out_len, int p, int q)
|
||||||
@@ -159,24 +128,12 @@ static bool check_vec_len(int in_len, int out_len, int p, int q)
|
|||||||
return true;
|
return true;
|
||||||
}
|
}
|
||||||
|
|
||||||
void Resampler::computePath()
|
int Resampler::rotate(const float *in, size_t in_len, float *out, size_t out_len)
|
||||||
{
|
|
||||||
for (int i = 0; i < MAX_OUTPUT_LEN; i++) {
|
|
||||||
in_index[i] = (q * i) / p;
|
|
||||||
out_path[i] = (q * i) % p;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
int Resampler::rotate(float *in, size_t in_len, float *out, size_t out_len)
|
|
||||||
{
|
{
|
||||||
int n, path;
|
int n, path;
|
||||||
int hist_len = filt_len - 1;
|
|
||||||
|
|
||||||
if (!check_vec_len(in_len, out_len, p, q))
|
if (!check_vec_len(in_len, out_len, p, q))
|
||||||
return -1;
|
return -1;
|
||||||
|
|
||||||
/* Insert history */
|
|
||||||
memcpy(&in[-2 * hist_len], history, hist_len * 2 * sizeof(float));
|
|
||||||
|
|
||||||
/* Generate output from precomputed input/output paths */
|
/* Generate output from precomputed input/output paths */
|
||||||
for (size_t i = 0; i < out_len; i++) {
|
for (size_t i = 0; i < out_len; i++) {
|
||||||
@@ -184,34 +141,28 @@ int Resampler::rotate(float *in, size_t in_len, float *out, size_t out_len)
|
|||||||
path = out_path[i];
|
path = out_path[i];
|
||||||
|
|
||||||
convolve_real(in, in_len,
|
convolve_real(in, in_len,
|
||||||
partitions[path], filt_len,
|
reinterpret_cast<float *>(partitions[path]),
|
||||||
&out[2 * i], out_len - i,
|
filt_len, &out[2 * i], out_len - i,
|
||||||
n, 1, 1, 0);
|
n, 1, 1, 0);
|
||||||
}
|
}
|
||||||
|
|
||||||
/* Save history */
|
|
||||||
memcpy(history, &in[2 * (in_len - hist_len)],
|
|
||||||
hist_len * 2 * sizeof(float));
|
|
||||||
|
|
||||||
return out_len;
|
return out_len;
|
||||||
}
|
}
|
||||||
|
|
||||||
bool Resampler::init(float bw)
|
bool Resampler::init(float bw)
|
||||||
{
|
{
|
||||||
size_t hist_len = filt_len - 1;
|
if (p == 0 || q == 0 || filt_len == 0) return false;
|
||||||
|
|
||||||
/* Filterbank filter internals */
|
/* Filterbank filter internals */
|
||||||
if (initFilters(bw) < 0)
|
initFilters(bw);
|
||||||
return false;
|
|
||||||
|
|
||||||
/* History buffer */
|
|
||||||
history = new float[2 * hist_len];
|
|
||||||
memset(history, 0, 2 * hist_len * sizeof(float));
|
|
||||||
|
|
||||||
/* Precompute filterbank paths */
|
/* Precompute filterbank paths */
|
||||||
in_index = new size_t[MAX_OUTPUT_LEN];
|
int i = 0;
|
||||||
out_path = new size_t[MAX_OUTPUT_LEN];
|
for (auto &index : in_index)
|
||||||
computePath();
|
index = (q * i++) / p;
|
||||||
|
i = 0;
|
||||||
|
for (auto &path : out_path)
|
||||||
|
path = (q * i++) % p;
|
||||||
|
|
||||||
return true;
|
return true;
|
||||||
}
|
}
|
||||||
@@ -222,7 +173,7 @@ size_t Resampler::len()
|
|||||||
}
|
}
|
||||||
|
|
||||||
Resampler::Resampler(size_t p, size_t q, size_t filt_len)
|
Resampler::Resampler(size_t p, size_t q, size_t filt_len)
|
||||||
: in_index(NULL), out_path(NULL), partitions(NULL), history(NULL)
|
: in_index(MAX_OUTPUT_LEN), out_path(MAX_OUTPUT_LEN), partitions(p)
|
||||||
{
|
{
|
||||||
this->p = p;
|
this->p = p;
|
||||||
this->q = q;
|
this->q = q;
|
||||||
@@ -231,9 +182,6 @@ Resampler::Resampler(size_t p, size_t q, size_t filt_len)
|
|||||||
|
|
||||||
Resampler::~Resampler()
|
Resampler::~Resampler()
|
||||||
{
|
{
|
||||||
releaseFilters();
|
for (auto &part : partitions)
|
||||||
|
free(part);
|
||||||
delete history;
|
|
||||||
delete in_index;
|
|
||||||
delete out_path;
|
|
||||||
}
|
}
|
||||||
|
|||||||
@@ -20,6 +20,9 @@
|
|||||||
#ifndef _RESAMPLER_H_
|
#ifndef _RESAMPLER_H_
|
||||||
#define _RESAMPLER_H_
|
#define _RESAMPLER_H_
|
||||||
|
|
||||||
|
#include <vector>
|
||||||
|
#include <complex>
|
||||||
|
|
||||||
class Resampler {
|
class Resampler {
|
||||||
public:
|
public:
|
||||||
/* Constructor for rational sample rate conversion
|
/* Constructor for rational sample rate conversion
|
||||||
@@ -52,7 +55,7 @@ public:
|
|||||||
* Input and output vector lengths must of be equal multiples of the
|
* Input and output vector lengths must of be equal multiples of the
|
||||||
* rational conversion rate denominator and numerator respectively.
|
* rational conversion rate denominator and numerator respectively.
|
||||||
*/
|
*/
|
||||||
int rotate(float *in, size_t in_len, float *out, size_t out_len);
|
int rotate(const float *in, size_t in_len, float *out, size_t out_len);
|
||||||
|
|
||||||
/* Get filter length
|
/* Get filter length
|
||||||
* @return number of taps in each filter partition
|
* @return number of taps in each filter partition
|
||||||
@@ -63,15 +66,11 @@ private:
|
|||||||
size_t p;
|
size_t p;
|
||||||
size_t q;
|
size_t q;
|
||||||
size_t filt_len;
|
size_t filt_len;
|
||||||
size_t *in_index;
|
std::vector<size_t> in_index;
|
||||||
size_t *out_path;
|
std::vector<size_t> out_path;
|
||||||
|
std::vector<std::complex<float> *> partitions;
|
||||||
|
|
||||||
float **partitions;
|
void initFilters(float bw);
|
||||||
float *history;
|
|
||||||
|
|
||||||
bool initFilters(float bw);
|
|
||||||
void releaseFilters();
|
|
||||||
void computePath();
|
|
||||||
};
|
};
|
||||||
|
|
||||||
#endif /* _RESAMPLER_H_ */
|
#endif /* _RESAMPLER_H_ */
|
||||||
|
|||||||
121
Transceiver52M/Synthesis.cpp
Normal file
121
Transceiver52M/Synthesis.cpp
Normal file
@@ -0,0 +1,121 @@
|
|||||||
|
/*
|
||||||
|
* Polyphase synthesis filter
|
||||||
|
*
|
||||||
|
* Copyright (C) 2012-2014 Tom Tsou <tom@tsou.cc>
|
||||||
|
* Copyright (C) 2015 Ettus Research LLC
|
||||||
|
*
|
||||||
|
* This program is free software: you can redistribute it and/or modify
|
||||||
|
* it under the terms of the GNU Affero General Public License as published by
|
||||||
|
* the Free Software Foundation, either version 3 of the License, or
|
||||||
|
* (at your option) any later version.
|
||||||
|
*
|
||||||
|
* This program is distributed in the hope that it will be useful,
|
||||||
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||||
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||||
|
* GNU Affero General Public License for more details.
|
||||||
|
*
|
||||||
|
* You should have received a copy of the GNU Affero General Public License
|
||||||
|
* along with this program. If not, see <http://www.gnu.org/licenses/>.
|
||||||
|
* See the COPYING file in the main directory for details.
|
||||||
|
*/
|
||||||
|
|
||||||
|
#include <stdlib.h>
|
||||||
|
#include <math.h>
|
||||||
|
#include <assert.h>
|
||||||
|
#include <string.h>
|
||||||
|
#include <cstdio>
|
||||||
|
|
||||||
|
#include "Logger.h"
|
||||||
|
#include "Synthesis.h"
|
||||||
|
|
||||||
|
extern "C" {
|
||||||
|
#include "common/fft.h"
|
||||||
|
#include "common/convolve.h"
|
||||||
|
}
|
||||||
|
|
||||||
|
static void interleave(float **in, size_t ilen,
|
||||||
|
float *out, size_t m)
|
||||||
|
{
|
||||||
|
size_t i, n;
|
||||||
|
|
||||||
|
for (i = 0; i < ilen; i++) {
|
||||||
|
for (n = 0; n < m; n++) {
|
||||||
|
out[2 * (i * m + n) + 0] = in[n][2 * i + 0];
|
||||||
|
out[2 * (i * m + n) + 1] = in[n][2 * i + 1];
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
size_t Synthesis::inputLen() const
|
||||||
|
{
|
||||||
|
return blockLen;
|
||||||
|
}
|
||||||
|
|
||||||
|
size_t Synthesis::outputLen() const
|
||||||
|
{
|
||||||
|
return blockLen * m;
|
||||||
|
}
|
||||||
|
|
||||||
|
float *Synthesis::inputBuffer(size_t chan) const
|
||||||
|
{
|
||||||
|
if (chan >= m)
|
||||||
|
return NULL;
|
||||||
|
|
||||||
|
return hOutputs[chan];
|
||||||
|
}
|
||||||
|
|
||||||
|
bool Synthesis::resetBuffer(size_t chan)
|
||||||
|
{
|
||||||
|
if (chan >= m)
|
||||||
|
return false;
|
||||||
|
|
||||||
|
memset(hOutputs[chan], 0, blockLen * 2 * sizeof(float));
|
||||||
|
|
||||||
|
return true;
|
||||||
|
}
|
||||||
|
|
||||||
|
/*
|
||||||
|
* Implementation based on material found in:
|
||||||
|
*
|
||||||
|
* "harris, fred, Multirate Signal Processing, Upper Saddle River, NJ,
|
||||||
|
* Prentice Hall, 2006."
|
||||||
|
*/
|
||||||
|
bool Synthesis::rotate(float *out, size_t len)
|
||||||
|
{
|
||||||
|
size_t hSize = 2 * hLen * sizeof(float);
|
||||||
|
|
||||||
|
if (!checkLen(blockLen, len)) {
|
||||||
|
std::cout << "Length fail" << std::endl;
|
||||||
|
exit(1);
|
||||||
|
return false;
|
||||||
|
}
|
||||||
|
|
||||||
|
cxvec_fft(fftHandle);
|
||||||
|
|
||||||
|
/*
|
||||||
|
* Convolve through filterbank while applying and saving sample history
|
||||||
|
*/
|
||||||
|
for (size_t i = 0; i < m; i++) {
|
||||||
|
memcpy(&hInputs[i][2 * -hLen], hist[i], hSize);
|
||||||
|
memcpy(hist[i], &hInputs[i][2 * (blockLen - hLen)], hSize);
|
||||||
|
|
||||||
|
convolve_real(hInputs[i], blockLen,
|
||||||
|
subFilters[i], hLen,
|
||||||
|
hOutputs[i], blockLen,
|
||||||
|
0, blockLen, 1, 0);
|
||||||
|
}
|
||||||
|
|
||||||
|
/* Interleave into output vector */
|
||||||
|
interleave(hOutputs, blockLen, out, m);
|
||||||
|
|
||||||
|
return true;
|
||||||
|
}
|
||||||
|
|
||||||
|
Synthesis::Synthesis(size_t m, size_t blockLen, size_t hLen)
|
||||||
|
: ChannelizerBase(m, blockLen, hLen)
|
||||||
|
{
|
||||||
|
}
|
||||||
|
|
||||||
|
Synthesis::~Synthesis()
|
||||||
|
{
|
||||||
|
}
|
||||||
35
Transceiver52M/Synthesis.h
Normal file
35
Transceiver52M/Synthesis.h
Normal file
@@ -0,0 +1,35 @@
|
|||||||
|
#ifndef _SYNTHESIS_H_
|
||||||
|
#define _SYNTHESIS_H_
|
||||||
|
|
||||||
|
#include "ChannelizerBase.h"
|
||||||
|
|
||||||
|
class Synthesis : public ChannelizerBase {
|
||||||
|
public:
|
||||||
|
/** Constructor for synthesis filterbank
|
||||||
|
@param m number of physical channels
|
||||||
|
@param blockLen number of samples per output of each iteration
|
||||||
|
@param hLen number of taps in each constituent filter path
|
||||||
|
*/
|
||||||
|
Synthesis(size_t m, size_t blockLen, size_t hLen = 16);
|
||||||
|
~Synthesis();
|
||||||
|
|
||||||
|
/* Return required input and output buffer lengths */
|
||||||
|
size_t inputLen() const;
|
||||||
|
size_t outputLen() const;
|
||||||
|
|
||||||
|
/** Rotate "output commutator" and drive samples through filterbank
|
||||||
|
@param out complex output vector
|
||||||
|
@param oLen number of samples in buffer (must match block length * m)
|
||||||
|
@return false on error and true otherwise
|
||||||
|
*/
|
||||||
|
bool rotate(float *out, size_t oLen);
|
||||||
|
|
||||||
|
/** Get buffer for an input path
|
||||||
|
@param chan channel number of filterbank
|
||||||
|
@return NULL on error and pointer to buffer otherwise
|
||||||
|
*/
|
||||||
|
float *inputBuffer(size_t chan) const;
|
||||||
|
bool resetBuffer(size_t chan);
|
||||||
|
};
|
||||||
|
|
||||||
|
#endif /* _SYNTHESIS_H_ */
|
||||||
File diff suppressed because it is too large
Load Diff
@@ -54,7 +54,7 @@ struct TransceiverState {
|
|||||||
~TransceiverState();
|
~TransceiverState();
|
||||||
|
|
||||||
/* Initialize a multiframe slot in the filler table */
|
/* Initialize a multiframe slot in the filler table */
|
||||||
void init(size_t slot, signalVector *burst, bool fill);
|
bool init(int filler, size_t sps, float scale, size_t rtsc, unsigned rach_delay);
|
||||||
|
|
||||||
int chanType[8];
|
int chanType[8];
|
||||||
|
|
||||||
@@ -80,134 +80,36 @@ struct TransceiverState {
|
|||||||
|
|
||||||
/* Received noise energy levels */
|
/* Received noise energy levels */
|
||||||
float mNoiseLev;
|
float mNoiseLev;
|
||||||
avgVector mNoises;
|
noiseVector mNoises;
|
||||||
avgVector mFreqOffsets;
|
|
||||||
|
|
||||||
/* Store pointers to previous frame */
|
/* Shadowed downlink attenuation */
|
||||||
radioVector *prevFrame[8];
|
int mPower;
|
||||||
|
|
||||||
/* Transceiver mode */
|
|
||||||
int mode;
|
|
||||||
};
|
};
|
||||||
|
|
||||||
/** The Transceiver class, responsible for physical layer of basestation */
|
/** The Transceiver class, responsible for physical layer of basestation */
|
||||||
class Transceiver {
|
class Transceiver {
|
||||||
private:
|
|
||||||
int mBasePort;
|
|
||||||
std::string mAddr;
|
|
||||||
GSM::Time mTransmitLatency; ///< latency between basestation clock and transmit deadline clock
|
|
||||||
GSM::Time mLatencyUpdateTime; ///< last time latency was updated
|
|
||||||
|
|
||||||
std::vector<UDPSocket *> mDataSockets; ///< socket for writing to/reading from GSM core
|
|
||||||
std::vector<UDPSocket *> mCtrlSockets; ///< socket for writing/reading control commands from GSM core
|
|
||||||
UDPSocket *mClockSocket; ///< socket for writing clock updates to GSM core
|
|
||||||
|
|
||||||
std::vector<VectorQueue> mTxPriorityQueues; ///< priority queue of transmit bursts received from GSM core
|
|
||||||
std::vector<VectorFIFO *> mReceiveFIFO; ///< radioInterface FIFO of receive bursts
|
|
||||||
|
|
||||||
std::vector<Thread *> mRxServiceLoopThreads; ///< thread to pull bursts into receive FIFO
|
|
||||||
Thread *mLowerLoopThread; ///< thread to pull bursts into receive FIFO
|
|
||||||
std::vector<Thread *> mControlServiceLoopThreads; ///< thread to process control messages from GSM core
|
|
||||||
std::vector<Thread *> mTxPriorityQueueServiceLoopThreads; ///< thread to process transmit bursts from GSM core
|
|
||||||
|
|
||||||
GSM::Time mTransmitDeadlineClock; ///< deadline for pushing bursts into transmit FIFO
|
|
||||||
GSM::Time mLastClockUpdateTime; ///< last time clock update was sent up to core
|
|
||||||
|
|
||||||
RadioInterface *mRadioInterface; ///< associated radioInterface object
|
|
||||||
double txFullScale; ///< full scale input to radio
|
|
||||||
double rxFullScale; ///< full scale output to radio
|
|
||||||
|
|
||||||
/** Codes for burst types of received bursts*/
|
|
||||||
typedef enum {
|
|
||||||
OFF, ///< timeslot is off
|
|
||||||
TSC, ///< timeslot should contain a normal burst
|
|
||||||
RACH, ///< timeslot should contain an access burst
|
|
||||||
SCH, ///< timeslot should contain a SCH burst
|
|
||||||
IDLE ///< timeslot is an idle (or dummy) burst
|
|
||||||
} CorrType;
|
|
||||||
|
|
||||||
/** modulate and add a burst to the transmit queue */
|
|
||||||
void addRadioVector(size_t chan, BitVector &bits,
|
|
||||||
int RSSI, GSM::Time &wTime);
|
|
||||||
|
|
||||||
/** Update filler table */
|
|
||||||
void updateFillerTable(size_t chan, radioVector *burst);
|
|
||||||
|
|
||||||
/** Push modulated burst into transmit FIFO corresponding to a particular timestamp */
|
|
||||||
void pushRadioVector(GSM::Time &nowTime);
|
|
||||||
|
|
||||||
/** Pull and demodulate a burst from the receive FIFO */
|
|
||||||
SoftVector *pullRadioVector(GSM::Time &wTime, int &RSSI,
|
|
||||||
int &timingOffset, size_t chan = 0);
|
|
||||||
|
|
||||||
/** Set modulus for specific timeslot */
|
|
||||||
void setModulus(size_t timeslot, size_t chan);
|
|
||||||
|
|
||||||
/** return the expected burst type for the specified timestamp */
|
|
||||||
CorrType expectedCorrType(GSM::Time currTime, size_t chan);
|
|
||||||
|
|
||||||
/** send messages over the clock socket */
|
|
||||||
void writeClockInterface(void);
|
|
||||||
|
|
||||||
/** Detect RACH bursts */
|
|
||||||
bool detectRACH(TransceiverState *state,
|
|
||||||
signalVector &burst,
|
|
||||||
complex &, float &toa);
|
|
||||||
|
|
||||||
bool detectSCH(TransceiverState *state,
|
|
||||||
signalVector &burst,
|
|
||||||
complex &, float &toa);
|
|
||||||
|
|
||||||
bool decodeSCH(SoftVector *burst, GSM::Time *time);
|
|
||||||
bool correctFCCH(TransceiverState *state, signalVector *burst);
|
|
||||||
|
|
||||||
/** Detect normal bursts */
|
|
||||||
bool detectTSC(TransceiverState *state,
|
|
||||||
signalVector &burst,
|
|
||||||
complex &, float &toa, GSM::Time &time);
|
|
||||||
|
|
||||||
/** Demodulat burst and output soft bits */
|
|
||||||
SoftVector *demodulate(TransceiverState *state,
|
|
||||||
signalVector &burst, complex amp,
|
|
||||||
float toa, size_t tn, bool equalize);
|
|
||||||
|
|
||||||
|
|
||||||
int mSPSTx; ///< number of samples per Tx symbol
|
|
||||||
int mSPSRx; ///< number of samples per Rx symbol
|
|
||||||
size_t mChans;
|
|
||||||
|
|
||||||
bool mOn; ///< flag to indicate that transceiver is powered on
|
|
||||||
double mTxFreq; ///< the transmit frequency
|
|
||||||
double mRxFreq; ///< the receive frequency
|
|
||||||
int mPower; ///< the transmit power in dB
|
|
||||||
unsigned mTSC; ///< the midamble sequence code
|
|
||||||
unsigned mMaxExpectedDelay; ///< maximum TOA offset in GSM symbols
|
|
||||||
unsigned long long mRxSlotMask[8]; ///< MS - enabled multiframe slot mask
|
|
||||||
int mBSIC; ///< MS - detected BSIC
|
|
||||||
|
|
||||||
std::vector<TransceiverState> mStates;
|
|
||||||
|
|
||||||
public:
|
public:
|
||||||
|
/** Transceiver constructor
|
||||||
/** Transceiver constructor
|
|
||||||
@param wBasePort base port number of UDP sockets
|
@param wBasePort base port number of UDP sockets
|
||||||
@param TRXAddress IP address of the TRX manager, as a string
|
@param TRXAddress IP address of the TRX, as a string
|
||||||
|
@param GSMcoreAddress IP address of the GSM core, as a string
|
||||||
@param wSPS number of samples per GSM symbol
|
@param wSPS number of samples per GSM symbol
|
||||||
@param wTransmitLatency initial setting of transmit latency
|
@param wTransmitLatency initial setting of transmit latency
|
||||||
@param radioInterface associated radioInterface object
|
@param radioInterface associated radioInterface object
|
||||||
*/
|
*/
|
||||||
Transceiver(int wBasePort,
|
Transceiver(int wBasePort,
|
||||||
const char *TRXAddress,
|
const char *TRXAddress,
|
||||||
size_t wSPS, size_t chans,
|
const char *GSMcoreAddress,
|
||||||
GSM::Time wTransmitLatency,
|
size_t tx_sps, size_t rx_sps, size_t chans,
|
||||||
RadioInterface *wRadioInterface);
|
GSM::Time wTransmitLatency,
|
||||||
|
RadioInterface *wRadioInterface,
|
||||||
|
double wRssiOffset);
|
||||||
|
|
||||||
/** Destructor */
|
/** Destructor */
|
||||||
~Transceiver();
|
~Transceiver();
|
||||||
|
|
||||||
/** start the Transceiver */
|
/** Start the control loop */
|
||||||
void start();
|
bool init(int filler, size_t rtsc, unsigned rach_delay, bool edge);
|
||||||
bool init(bool filler);
|
|
||||||
|
|
||||||
/** attach the radioInterface receive FIFO */
|
/** attach the radioInterface receive FIFO */
|
||||||
bool receiveFIFO(VectorFIFO *wFIFO, size_t chan)
|
bool receiveFIFO(VectorFIFO *wFIFO, size_t chan)
|
||||||
@@ -242,13 +144,91 @@ public:
|
|||||||
LOOPBACK ///< similar go VII, used in loopback testing
|
LOOPBACK ///< similar go VII, used in loopback testing
|
||||||
} ChannelCombination;
|
} ChannelCombination;
|
||||||
|
|
||||||
enum {
|
enum FillerType {
|
||||||
TRX_MODE_OFF,
|
FILLER_DUMMY,
|
||||||
TRX_MODE_BTS,
|
FILLER_ZERO,
|
||||||
TRX_MODE_MS_ACQUIRE,
|
FILLER_NORM_RAND,
|
||||||
TRX_MODE_MS_TRACK,
|
FILLER_EDGE_RAND,
|
||||||
|
FILLER_ACCESS_RAND,
|
||||||
};
|
};
|
||||||
|
|
||||||
|
private:
|
||||||
|
int mBasePort;
|
||||||
|
std::string mLocalAddr;
|
||||||
|
std::string mRemoteAddr;
|
||||||
|
|
||||||
|
std::vector<UDPSocket *> mDataSockets; ///< socket for writing to/reading from GSM core
|
||||||
|
std::vector<UDPSocket *> mCtrlSockets; ///< socket for writing/reading control commands from GSM core
|
||||||
|
UDPSocket mClockSocket; ///< socket for writing clock updates to GSM core
|
||||||
|
|
||||||
|
std::vector<VectorQueue> mTxPriorityQueues; ///< priority queue of transmit bursts received from GSM core
|
||||||
|
std::vector<VectorFIFO *> mReceiveFIFO; ///< radioInterface FIFO of receive bursts
|
||||||
|
|
||||||
|
std::vector<Thread *> mRxServiceLoopThreads; ///< thread to pull bursts into receive FIFO
|
||||||
|
Thread *mRxLowerLoopThread; ///< thread to pull bursts into receive FIFO
|
||||||
|
Thread *mTxLowerLoopThread; ///< thread to push bursts into transmit FIFO
|
||||||
|
std::vector<Thread *> mControlServiceLoopThreads; ///< thread to process control messages from GSM core
|
||||||
|
std::vector<Thread *> mTxPriorityQueueServiceLoopThreads; ///< thread to process transmit bursts from GSM core
|
||||||
|
|
||||||
|
GSM::Time mTransmitLatency; ///< latency between basestation clock and transmit deadline clock
|
||||||
|
GSM::Time mLatencyUpdateTime; ///< last time latency was updated
|
||||||
|
GSM::Time mTransmitDeadlineClock; ///< deadline for pushing bursts into transmit FIFO
|
||||||
|
GSM::Time mLastClockUpdateTime; ///< last time clock update was sent up to core
|
||||||
|
|
||||||
|
RadioInterface *mRadioInterface; ///< associated radioInterface object
|
||||||
|
double txFullScale; ///< full scale input to radio
|
||||||
|
double rxFullScale; ///< full scale output to radio
|
||||||
|
|
||||||
|
double rssiOffset; ///< RSSI to dBm conversion offset
|
||||||
|
|
||||||
|
/** modulate and add a burst to the transmit queue */
|
||||||
|
void addRadioVector(size_t chan, BitVector &bits,
|
||||||
|
int RSSI, GSM::Time &wTime);
|
||||||
|
|
||||||
|
/** Update filler table */
|
||||||
|
void updateFillerTable(size_t chan, radioVector *burst);
|
||||||
|
|
||||||
|
/** Push modulated burst into transmit FIFO corresponding to a particular timestamp */
|
||||||
|
void pushRadioVector(GSM::Time &nowTime);
|
||||||
|
|
||||||
|
/** Pull and demodulate a burst from the receive FIFO */
|
||||||
|
SoftVector *pullRadioVector(GSM::Time &wTime, double &RSSI, bool &isRssiValid,
|
||||||
|
double &timingOffset, double &noise,
|
||||||
|
size_t chan = 0);
|
||||||
|
|
||||||
|
/** Set modulus for specific timeslot */
|
||||||
|
void setModulus(size_t timeslot, size_t chan);
|
||||||
|
|
||||||
|
/** return the expected burst type for the specified timestamp */
|
||||||
|
CorrType expectedCorrType(GSM::Time currTime, size_t chan);
|
||||||
|
|
||||||
|
/** send messages over the clock socket */
|
||||||
|
void writeClockInterface(void);
|
||||||
|
|
||||||
|
int mSPSTx; ///< number of samples per Tx symbol
|
||||||
|
int mSPSRx; ///< number of samples per Rx symbol
|
||||||
|
size_t mChans;
|
||||||
|
|
||||||
|
bool mEdge;
|
||||||
|
bool mOn; ///< flag to indicate that transceiver is powered on
|
||||||
|
bool mForceClockInterface; ///< flag to indicate whether IND CLOCK shall be sent unconditionally after transceiver is started
|
||||||
|
bool mHandover[8][8]; ///< expect handover to the timeslot/subslot
|
||||||
|
double mTxFreq; ///< the transmit frequency
|
||||||
|
double mRxFreq; ///< the receive frequency
|
||||||
|
unsigned mTSC; ///< the midamble sequence code
|
||||||
|
unsigned mMaxExpectedDelayAB; ///< maximum expected time-of-arrival offset in GSM symbols for Access Bursts (RACH)
|
||||||
|
unsigned mMaxExpectedDelayNB; ///< maximum expected time-of-arrival offset in GSM symbols for Normal Bursts
|
||||||
|
unsigned mWriteBurstToDiskMask; ///< debug: bitmask to indicate which timeslots to dump to disk
|
||||||
|
|
||||||
|
std::vector<TransceiverState> mStates;
|
||||||
|
|
||||||
|
/** Start and stop I/O threads through the control socket API */
|
||||||
|
bool start();
|
||||||
|
void stop();
|
||||||
|
|
||||||
|
/** Protect destructor accessable stop call */
|
||||||
|
Mutex mLock;
|
||||||
|
|
||||||
protected:
|
protected:
|
||||||
/** drive lower receive I/O and burst generation */
|
/** drive lower receive I/O and burst generation */
|
||||||
void driveReceiveRadio();
|
void driveReceiveRadio();
|
||||||
@@ -272,7 +252,9 @@ protected:
|
|||||||
|
|
||||||
friend void *TxUpperLoopAdapter(TransceiverChannel *);
|
friend void *TxUpperLoopAdapter(TransceiverChannel *);
|
||||||
|
|
||||||
friend void *LowerLoopAdapter(Transceiver *);
|
friend void *RxLowerLoopAdapter(Transceiver *);
|
||||||
|
|
||||||
|
friend void *TxLowerLoopAdapter(Transceiver *);
|
||||||
|
|
||||||
friend void *ControlServiceLoopAdapter(TransceiverChannel *);
|
friend void *ControlServiceLoopAdapter(TransceiverChannel *);
|
||||||
|
|
||||||
@@ -282,16 +264,18 @@ protected:
|
|||||||
/** set priority on current thread */
|
/** set priority on current thread */
|
||||||
void setPriority(float prio = 0.5) { mRadioInterface->setPriority(prio); }
|
void setPriority(float prio = 0.5) { mRadioInterface->setPriority(prio); }
|
||||||
|
|
||||||
|
void logRxBurst(size_t chan, SoftVector *burst, GSM::Time time, double dbm,
|
||||||
|
double rssi, double noise, double toa);
|
||||||
};
|
};
|
||||||
|
|
||||||
void *RxUpperLoopAdapter(TransceiverChannel *);
|
void *RxUpperLoopAdapter(TransceiverChannel *);
|
||||||
|
|
||||||
/** Main drive threads */
|
/** Main drive threads */
|
||||||
void *LowerLoopAdapter(Transceiver *);
|
void *RxLowerLoopAdapter(Transceiver *);
|
||||||
|
void *TxLowerLoopAdapter(Transceiver *);
|
||||||
|
|
||||||
/** control message handler thread loop */
|
/** control message handler thread loop */
|
||||||
void *ControlServiceLoopAdapter(TransceiverChannel *);
|
void *ControlServiceLoopAdapter(TransceiverChannel *);
|
||||||
|
|
||||||
/** transmit queueing thread loop */
|
/** transmit queueing thread loop */
|
||||||
void *TxUpperLoopAdapter(TransceiverChannel *);
|
void *TxUpperLoopAdapter(TransceiverChannel *);
|
||||||
|
|
||||||
|
|||||||
File diff suppressed because it is too large
Load Diff
@@ -59,7 +59,7 @@ const dboardConfigType dboardConfig = TXA_RXB;
|
|||||||
|
|
||||||
const double USRPDevice::masterClockRate = 52.0e6;
|
const double USRPDevice::masterClockRate = 52.0e6;
|
||||||
|
|
||||||
USRPDevice::USRPDevice(size_t sps, size_t, bool)
|
USRPDevice::USRPDevice(size_t sps)
|
||||||
{
|
{
|
||||||
LOG(INFO) << "creating USRP device...";
|
LOG(INFO) << "creating USRP device...";
|
||||||
|
|
||||||
@@ -89,7 +89,7 @@ USRPDevice::USRPDevice(size_t sps, size_t, bool)
|
|||||||
#endif
|
#endif
|
||||||
}
|
}
|
||||||
|
|
||||||
int USRPDevice::open(const std::string &, bool)
|
int USRPDevice::open(const std::string &, int, bool)
|
||||||
{
|
{
|
||||||
writeLock.unlock();
|
writeLock.unlock();
|
||||||
|
|
||||||
@@ -600,7 +600,8 @@ bool USRPDevice::setTxFreq(double wFreq) { return true;};
|
|||||||
bool USRPDevice::setRxFreq(double wFreq) { return true;};
|
bool USRPDevice::setRxFreq(double wFreq) { return true;};
|
||||||
#endif
|
#endif
|
||||||
|
|
||||||
RadioDevice *RadioDevice::make(size_t sps, size_t chans, bool diversity)
|
RadioDevice *RadioDevice::make(size_t tx_sps, size_t rx_sps,
|
||||||
|
size_t chans, double)
|
||||||
{
|
{
|
||||||
return new USRPDevice(sps, chans, diversity);
|
return new USRPDevice(tx_sps);
|
||||||
}
|
}
|
||||||
|
|||||||
@@ -96,10 +96,10 @@ private:
|
|||||||
public:
|
public:
|
||||||
|
|
||||||
/** Object constructor */
|
/** Object constructor */
|
||||||
USRPDevice(size_t sps, size_t chans = 1, bool diversity = false);
|
USRPDevice(size_t sps);
|
||||||
|
|
||||||
/** Instantiate the USRP */
|
/** Instantiate the USRP */
|
||||||
int open(const std::string &, bool);
|
int open(const std::string &, int, bool);
|
||||||
|
|
||||||
/** Start the USRP */
|
/** Start the USRP */
|
||||||
bool start();
|
bool start();
|
||||||
|
|||||||
@@ -25,25 +25,12 @@
|
|||||||
#include "config.h"
|
#include "config.h"
|
||||||
#endif
|
#endif
|
||||||
|
|
||||||
void neon_convert_ps_si16_4n(short *, float *, float *, int);
|
void neon_convert_ps_si16_4n(short *, const float *, const float *, int);
|
||||||
void neon_convert_si16_ps_4n(float *, short *, int);
|
void neon_convert_si16_ps_4n(float *, const short *, int);
|
||||||
|
|
||||||
#ifndef HAVE_NEON
|
|
||||||
static void convert_si16_ps(float *out, short *in, int len)
|
|
||||||
{
|
|
||||||
for (int i = 0; i < len; i++)
|
|
||||||
out[i] = in[i];
|
|
||||||
}
|
|
||||||
|
|
||||||
static void convert_ps_si16(short *out, float *in, float scale, int len)
|
|
||||||
{
|
|
||||||
for (int i = 0; i < len; i++)
|
|
||||||
out[i] = in[i] * scale;
|
|
||||||
}
|
|
||||||
#else
|
|
||||||
/* 4*N 16-bit signed integer conversion with remainder */
|
/* 4*N 16-bit signed integer conversion with remainder */
|
||||||
static void neon_convert_si16_ps(float *restrict out,
|
static void neon_convert_si16_ps(float *out,
|
||||||
short *restrict in,
|
const short *in,
|
||||||
int len)
|
int len)
|
||||||
{
|
{
|
||||||
int start = len / 4 * 4;
|
int start = len / 4 * 4;
|
||||||
@@ -55,9 +42,9 @@ static void neon_convert_si16_ps(float *restrict out,
|
|||||||
}
|
}
|
||||||
|
|
||||||
/* 4*N 16-bit signed integer conversion with remainder */
|
/* 4*N 16-bit signed integer conversion with remainder */
|
||||||
static void neon_convert_ps_si16(short *restrict out,
|
static void neon_convert_ps_si16(short *out,
|
||||||
float *restrict in,
|
const float *in,
|
||||||
float *restrict scale,
|
const float *scale,
|
||||||
int len)
|
int len)
|
||||||
{
|
{
|
||||||
int start = len / 4 * 4;
|
int start = len / 4 * 4;
|
||||||
@@ -69,7 +56,7 @@ static void neon_convert_ps_si16(short *restrict out,
|
|||||||
}
|
}
|
||||||
#endif
|
#endif
|
||||||
|
|
||||||
void convert_float_short(short *out, float *in, float scale, int len)
|
void convert_float_short(short *out, const float *in, float scale, int len)
|
||||||
{
|
{
|
||||||
#ifdef HAVE_NEON
|
#ifdef HAVE_NEON
|
||||||
float q[4] = { scale, scale, scale, scale };
|
float q[4] = { scale, scale, scale, scale };
|
||||||
@@ -79,11 +66,11 @@ void convert_float_short(short *out, float *in, float scale, int len)
|
|||||||
else
|
else
|
||||||
neon_convert_ps_si16_4n(out, in, q, len >> 2);
|
neon_convert_ps_si16_4n(out, in, q, len >> 2);
|
||||||
#else
|
#else
|
||||||
convert_ps_si16(out, in, scale, len);
|
base_convert_float_short(out, in, scale, len);
|
||||||
#endif
|
#endif
|
||||||
}
|
}
|
||||||
|
|
||||||
void convert_short_float(float *out, short *in, int len)
|
void convert_short_float(float *out, const short *in, int len)
|
||||||
{
|
{
|
||||||
#ifdef HAVE_NEON
|
#ifdef HAVE_NEON
|
||||||
if (len % 4)
|
if (len % 4)
|
||||||
@@ -91,6 +78,6 @@ void convert_short_float(float *out, short *in, int len)
|
|||||||
else
|
else
|
||||||
neon_convert_si16_ps_4n(out, in, len >> 2);
|
neon_convert_si16_ps_4n(out, in, len >> 2);
|
||||||
#else
|
#else
|
||||||
convert_si16_ps(out, in, len);
|
base_convert_short_float(out, in, len);
|
||||||
#endif
|
#endif
|
||||||
}
|
}
|
||||||
|
|||||||
@@ -58,6 +58,13 @@ static void neon_conv_cmplx_4n(float *x, float *h, float *y, int h_len, int len)
|
|||||||
}
|
}
|
||||||
#endif
|
#endif
|
||||||
|
|
||||||
|
/* API: Initalize convolve module */
|
||||||
|
void convolve_init(void)
|
||||||
|
{
|
||||||
|
/* Stub */
|
||||||
|
return;
|
||||||
|
}
|
||||||
|
|
||||||
/* API: Aligned complex-real */
|
/* API: Aligned complex-real */
|
||||||
int convolve_real(float *x, int x_len,
|
int convolve_real(float *x, int x_len,
|
||||||
float *h, int h_len,
|
float *h, int h_len,
|
||||||
|
|||||||
@@ -1,7 +1,15 @@
|
|||||||
#ifndef _CONVERT_H_
|
#ifndef _CONVERT_H_
|
||||||
#define _CONVERT_H_
|
#define _CONVERT_H_
|
||||||
|
|
||||||
void convert_float_short(short *out, float *in, float scale, int len);
|
void convert_float_short(short *out, const float *in, float scale, int len);
|
||||||
void convert_short_float(float *out, short *in, int len);
|
|
||||||
|
void convert_short_float(float *out, const short *in, int len);
|
||||||
|
|
||||||
|
void base_convert_float_short(short *out, const float *in,
|
||||||
|
float scale, int len);
|
||||||
|
|
||||||
|
void base_convert_short_float(float *out, const short *in, int len);
|
||||||
|
|
||||||
|
void convert_init(void);
|
||||||
|
|
||||||
#endif /* _CONVERT_H_ */
|
#endif /* _CONVERT_H_ */
|
||||||
|
|||||||
34
Transceiver52M/common/convert_base.c
Normal file
34
Transceiver52M/common/convert_base.c
Normal file
@@ -0,0 +1,34 @@
|
|||||||
|
/*
|
||||||
|
* Conversion
|
||||||
|
* Copyright (C) 2012, 2013 Thomas Tsou <tom@tsou.cc>
|
||||||
|
*
|
||||||
|
* This library is free software; you can redistribute it and/or
|
||||||
|
* modify it under the terms of the GNU Lesser General Public
|
||||||
|
* License as published by the Free Software Foundation; either
|
||||||
|
* version 2.1 of the License, or (at your option) any later version.
|
||||||
|
*
|
||||||
|
* This library is distributed in the hope that it will be useful,
|
||||||
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||||
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
||||||
|
* Lesser General Public License for more details.
|
||||||
|
*
|
||||||
|
* You should have received a copy of the GNU Lesser General Public
|
||||||
|
* License along with this library; if not, write to the Free Software
|
||||||
|
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
|
||||||
|
*/
|
||||||
|
|
||||||
|
#include "convert.h"
|
||||||
|
|
||||||
|
void base_convert_float_short(short *out, const float *in,
|
||||||
|
float scale, int len)
|
||||||
|
{
|
||||||
|
for (int i = 0; i < len; i++)
|
||||||
|
out[i] = in[i] * scale;
|
||||||
|
}
|
||||||
|
|
||||||
|
void base_convert_short_float(float *out, const short *in, int len)
|
||||||
|
{
|
||||||
|
for (int i = 0; i < len; i++)
|
||||||
|
out[i] = in[i];
|
||||||
|
}
|
||||||
|
|
||||||
@@ -3,28 +3,30 @@
|
|||||||
|
|
||||||
void *convolve_h_alloc(int num);
|
void *convolve_h_alloc(int num);
|
||||||
|
|
||||||
int convolve_real(float *x, int x_len,
|
int convolve_real(const float *x, int x_len,
|
||||||
float *h, int h_len,
|
const float *h, int h_len,
|
||||||
float *y, int y_len,
|
float *y, int y_len,
|
||||||
int start, int len,
|
int start, int len,
|
||||||
int step, int offset);
|
int step, int offset);
|
||||||
|
|
||||||
int convolve_complex(float *x, int x_len,
|
int convolve_complex(const float *x, int x_len,
|
||||||
float *h, int h_len,
|
const float *h, int h_len,
|
||||||
float *y, int y_len,
|
float *y, int y_len,
|
||||||
int start, int len,
|
int start, int len,
|
||||||
int step, int offset);
|
int step, int offset);
|
||||||
|
|
||||||
int base_convolve_real(float *x, int x_len,
|
int base_convolve_real(const float *x, int x_len,
|
||||||
float *h, int h_len,
|
const float *h, int h_len,
|
||||||
float *y, int y_len,
|
float *y, int y_len,
|
||||||
int start, int len,
|
int start, int len,
|
||||||
int step, int offset);
|
int step, int offset);
|
||||||
|
|
||||||
int base_convolve_complex(float *x, int x_len,
|
int base_convolve_complex(const float *x, int x_len,
|
||||||
float *h, int h_len,
|
const float *h, int h_len,
|
||||||
float *y, int y_len,
|
float *y, int y_len,
|
||||||
int start, int len,
|
int start, int len,
|
||||||
int step, int offset);
|
int step, int offset);
|
||||||
|
|
||||||
|
void convolve_init(void);
|
||||||
|
|
||||||
#endif /* _CONVOLVE_H_ */
|
#endif /* _CONVOLVE_H_ */
|
||||||
|
|||||||
@@ -26,21 +26,21 @@
|
|||||||
#endif
|
#endif
|
||||||
|
|
||||||
/* Base multiply and accumulate complex-real */
|
/* Base multiply and accumulate complex-real */
|
||||||
static void mac_real(float *x, float *h, float *y)
|
static void mac_real(const float *x, const float *h, float *y)
|
||||||
{
|
{
|
||||||
y[0] += x[0] * h[0];
|
y[0] += x[0] * h[0];
|
||||||
y[1] += x[1] * h[0];
|
y[1] += x[1] * h[0];
|
||||||
}
|
}
|
||||||
|
|
||||||
/* Base multiply and accumulate complex-complex */
|
/* Base multiply and accumulate complex-complex */
|
||||||
static void mac_cmplx(float *x, float *h, float *y)
|
static void mac_cmplx(const float *x, const float *h, float *y)
|
||||||
{
|
{
|
||||||
y[0] += x[0] * h[0] - x[1] * h[1];
|
y[0] += x[0] * h[0] - x[1] * h[1];
|
||||||
y[1] += x[0] * h[1] + x[1] * h[0];
|
y[1] += x[0] * h[1] + x[1] * h[0];
|
||||||
}
|
}
|
||||||
|
|
||||||
/* Base vector complex-complex multiply and accumulate */
|
/* Base vector complex-complex multiply and accumulate */
|
||||||
static void mac_real_vec_n(float *x, float *h, float *y,
|
static void mac_real_vec_n(const float *x, const float *h, float *y,
|
||||||
int len, int step, int offset)
|
int len, int step, int offset)
|
||||||
{
|
{
|
||||||
for (int i = offset; i < len; i += step)
|
for (int i = offset; i < len; i += step)
|
||||||
@@ -48,7 +48,7 @@ static void mac_real_vec_n(float *x, float *h, float *y,
|
|||||||
}
|
}
|
||||||
|
|
||||||
/* Base vector complex-complex multiply and accumulate */
|
/* Base vector complex-complex multiply and accumulate */
|
||||||
static void mac_cmplx_vec_n(float *x, float *h, float *y,
|
static void mac_cmplx_vec_n(const float *x, const float *h, float *y,
|
||||||
int len, int step, int offset)
|
int len, int step, int offset)
|
||||||
{
|
{
|
||||||
for (int i = offset; i < len; i += step)
|
for (int i = offset; i < len; i += step)
|
||||||
@@ -56,8 +56,8 @@ static void mac_cmplx_vec_n(float *x, float *h, float *y,
|
|||||||
}
|
}
|
||||||
|
|
||||||
/* Base complex-real convolution */
|
/* Base complex-real convolution */
|
||||||
int _base_convolve_real(float *x, int x_len,
|
int _base_convolve_real(const float *x, int x_len,
|
||||||
float *h, int h_len,
|
const float *h, int h_len,
|
||||||
float *y, int y_len,
|
float *y, int y_len,
|
||||||
int start, int len,
|
int start, int len,
|
||||||
int step, int offset)
|
int step, int offset)
|
||||||
@@ -73,8 +73,8 @@ int _base_convolve_real(float *x, int x_len,
|
|||||||
}
|
}
|
||||||
|
|
||||||
/* Base complex-complex convolution */
|
/* Base complex-complex convolution */
|
||||||
int _base_convolve_complex(float *x, int x_len,
|
int _base_convolve_complex(const float *x, int x_len,
|
||||||
float *h, int h_len,
|
const float *h, int h_len,
|
||||||
float *y, int y_len,
|
float *y, int y_len,
|
||||||
int start, int len,
|
int start, int len,
|
||||||
int step, int offset)
|
int step, int offset)
|
||||||
@@ -110,8 +110,8 @@ int bounds_check(int x_len, int h_len, int y_len,
|
|||||||
}
|
}
|
||||||
|
|
||||||
/* API: Non-aligned (no SSE) complex-real */
|
/* API: Non-aligned (no SSE) complex-real */
|
||||||
int base_convolve_real(float *x, int x_len,
|
int base_convolve_real(const float *x, int x_len,
|
||||||
float *h, int h_len,
|
const float *h, int h_len,
|
||||||
float *y, int y_len,
|
float *y, int y_len,
|
||||||
int start, int len,
|
int start, int len,
|
||||||
int step, int offset)
|
int step, int offset)
|
||||||
@@ -128,8 +128,8 @@ int base_convolve_real(float *x, int x_len,
|
|||||||
}
|
}
|
||||||
|
|
||||||
/* API: Non-aligned (no SSE) complex-complex */
|
/* API: Non-aligned (no SSE) complex-complex */
|
||||||
int base_convolve_complex(float *x, int x_len,
|
int base_convolve_complex(const float *x, int x_len,
|
||||||
float *h, int h_len,
|
const float *h, int h_len,
|
||||||
float *y, int y_len,
|
float *y, int y_len,
|
||||||
int start, int len,
|
int start, int len,
|
||||||
int step, int offset)
|
int step, int offset)
|
||||||
|
|||||||
112
Transceiver52M/common/fft.c
Normal file
112
Transceiver52M/common/fft.c
Normal file
@@ -0,0 +1,112 @@
|
|||||||
|
/*
|
||||||
|
* Fast Fourier transform
|
||||||
|
*
|
||||||
|
* Copyright (C) 2012 Tom Tsou <tom@tsou.cc>
|
||||||
|
*
|
||||||
|
* This program is free software: you can redistribute it and/or modify
|
||||||
|
* it under the terms of the GNU Affero General Public License as published by
|
||||||
|
* the Free Software Foundation, either version 3 of the License, or
|
||||||
|
* (at your option) any later version.
|
||||||
|
*
|
||||||
|
* This program is distributed in the hope that it will be useful,
|
||||||
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||||
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||||
|
* GNU Affero General Public License for more details.
|
||||||
|
*
|
||||||
|
* You should have received a copy of the GNU Affero General Public License
|
||||||
|
* along with this program; if not, see <http://www.gnu.org/licenses/>.
|
||||||
|
* See the COPYING file in the main directory for details.
|
||||||
|
*/
|
||||||
|
|
||||||
|
#include <stdlib.h>
|
||||||
|
#include <string.h>
|
||||||
|
#include <assert.h>
|
||||||
|
#include <fftw3.h>
|
||||||
|
|
||||||
|
#include "fft.h"
|
||||||
|
|
||||||
|
struct fft_hdl {
|
||||||
|
float *fft_in;
|
||||||
|
float *fft_out;
|
||||||
|
int len;
|
||||||
|
fftwf_plan fft_plan;
|
||||||
|
};
|
||||||
|
|
||||||
|
/*! \brief Initialize FFT backend
|
||||||
|
* \param[in] reverse FFT direction
|
||||||
|
* \param[in] m FFT length
|
||||||
|
* \param[in] istride input stride count
|
||||||
|
* \param[in] ostride output stride count
|
||||||
|
* \param[in] in input buffer (FFTW aligned)
|
||||||
|
* \param[in] out output buffer (FFTW aligned)
|
||||||
|
* \param[in] ooffset initial offset into output buffer
|
||||||
|
*
|
||||||
|
* If the reverse is non-NULL, then an inverse FFT will be used. This is a
|
||||||
|
* wrapper for advanced non-contiguous FFTW usage. See FFTW documentation for
|
||||||
|
* further details.
|
||||||
|
*
|
||||||
|
* http://www.fftw.org/doc/Advanced-Complex-DFTs.html
|
||||||
|
*
|
||||||
|
* It is currently unknown how the offset of the output buffer affects FFTW
|
||||||
|
* memory alignment.
|
||||||
|
*/
|
||||||
|
struct fft_hdl *init_fft(int reverse, int m, int istride, int ostride,
|
||||||
|
float *in, float *out, int ooffset)
|
||||||
|
{
|
||||||
|
int rank = 1;
|
||||||
|
int n[] = { m };
|
||||||
|
int howmany = istride;
|
||||||
|
int idist = 1;
|
||||||
|
int odist = 1;
|
||||||
|
int *inembed = n;
|
||||||
|
int *onembed = n;
|
||||||
|
fftwf_complex *obuffer, *ibuffer;
|
||||||
|
|
||||||
|
struct fft_hdl *hdl = (struct fft_hdl *) malloc(sizeof(struct fft_hdl));
|
||||||
|
if (!hdl)
|
||||||
|
return NULL;
|
||||||
|
|
||||||
|
int direction = FFTW_FORWARD;
|
||||||
|
if (reverse)
|
||||||
|
direction = FFTW_BACKWARD;
|
||||||
|
|
||||||
|
ibuffer = (fftwf_complex *) in;
|
||||||
|
obuffer = (fftwf_complex *) out + ooffset;
|
||||||
|
|
||||||
|
hdl->fft_in = in;
|
||||||
|
hdl->fft_out = out;
|
||||||
|
hdl->fft_plan = fftwf_plan_many_dft(rank, n, howmany,
|
||||||
|
ibuffer, inembed, istride, idist,
|
||||||
|
obuffer, onembed, ostride, odist,
|
||||||
|
direction, FFTW_MEASURE);
|
||||||
|
return hdl;
|
||||||
|
}
|
||||||
|
|
||||||
|
void *fft_malloc(size_t size)
|
||||||
|
{
|
||||||
|
return fftwf_malloc(size);
|
||||||
|
}
|
||||||
|
|
||||||
|
void fft_free(void *ptr)
|
||||||
|
{
|
||||||
|
free(ptr);
|
||||||
|
}
|
||||||
|
|
||||||
|
/*! \brief Free FFT backend resources
|
||||||
|
*/
|
||||||
|
void free_fft(struct fft_hdl *hdl)
|
||||||
|
{
|
||||||
|
fftwf_destroy_plan(hdl->fft_plan);
|
||||||
|
free(hdl);
|
||||||
|
}
|
||||||
|
|
||||||
|
/*! \brief Run multiple DFT operations with the initialized plan
|
||||||
|
* \param[in] hdl handle to an intitialized fft struct
|
||||||
|
*
|
||||||
|
* Input and output buffers are configured with init_fft().
|
||||||
|
*/
|
||||||
|
int cxvec_fft(struct fft_hdl *hdl)
|
||||||
|
{
|
||||||
|
fftwf_execute(hdl->fft_plan);
|
||||||
|
return 0;
|
||||||
|
}
|
||||||
13
Transceiver52M/common/fft.h
Normal file
13
Transceiver52M/common/fft.h
Normal file
@@ -0,0 +1,13 @@
|
|||||||
|
#ifndef _FFT_H_
|
||||||
|
#define _FFT_H_
|
||||||
|
|
||||||
|
struct fft_hdl;
|
||||||
|
|
||||||
|
struct fft_hdl *init_fft(int reverse, int m, int istride, int ostride,
|
||||||
|
float *in, float *out, int ooffset);
|
||||||
|
void *fft_malloc(size_t size);
|
||||||
|
void fft_free(void *ptr);
|
||||||
|
void free_fft(struct fft_hdl *hdl);
|
||||||
|
int cxvec_fft(struct fft_hdl *hdl);
|
||||||
|
|
||||||
|
#endif /* _FFT_H_ */
|
||||||
@@ -27,89 +27,65 @@
|
|||||||
#include <signal.h>
|
#include <signal.h>
|
||||||
#include <stdlib.h>
|
#include <stdlib.h>
|
||||||
#include <unistd.h>
|
#include <unistd.h>
|
||||||
|
#include <sched.h>
|
||||||
|
|
||||||
#include <GSMCommon.h>
|
#include <GSMCommon.h>
|
||||||
#include <Logger.h>
|
#include <Logger.h>
|
||||||
#include <Configuration.h>
|
#include <Configuration.h>
|
||||||
|
|
||||||
|
extern "C" {
|
||||||
|
#include "convolve.h"
|
||||||
|
#include "convert.h"
|
||||||
|
}
|
||||||
|
|
||||||
/* Samples-per-symbol for downlink path
|
/* Samples-per-symbol for downlink path
|
||||||
* 4 - Uses precision modulator (more computation, less distortion)
|
* 4 - Uses precision modulator (more computation, less distortion)
|
||||||
* 1 - Uses minimized modulator (less computation, more distortion)
|
* 1 - Uses minimized modulator (less computation, more distortion)
|
||||||
*
|
*
|
||||||
* Other values are invalid. Receive path (uplink) is always
|
* Other values are invalid. Receive path (uplink) is always
|
||||||
* downsampled to 1 sps. Default to 4 sps for all cases except for
|
* downsampled to 1 sps. Default to 4 sps for all cases.
|
||||||
* ARM and non-SIMD enabled architectures.
|
|
||||||
*/
|
*/
|
||||||
#if defined(HAVE_NEON) || !defined(HAVE_SSE3)
|
#define DEFAULT_TX_SPS 4
|
||||||
#define DEFAULT_SPS 1
|
|
||||||
#else
|
|
||||||
#define DEFAULT_SPS 4
|
|
||||||
#endif
|
|
||||||
|
|
||||||
/* Default configuration parameters
|
/*
|
||||||
* Note that these values are only used if the particular key does not
|
* Samples-per-symbol for uplink (receiver) path
|
||||||
* exist in the configuration database. IP port and address values will
|
* Do not modify this value. EDGE configures 4 sps automatically on
|
||||||
* typically be overwritten by the OpenBTS.db values. Other values will
|
* B200/B210 devices only. Use of 4 sps on the receive path for other
|
||||||
* not be in the database by default.
|
* configurations is not supported.
|
||||||
*/
|
*/
|
||||||
|
#define DEFAULT_RX_SPS 1
|
||||||
|
|
||||||
|
/* Default configuration parameters */
|
||||||
#define DEFAULT_TRX_PORT 5700
|
#define DEFAULT_TRX_PORT 5700
|
||||||
#define DEFAULT_TRX_IP "127.0.0.1"
|
#define DEFAULT_TRX_IP "127.0.0.1"
|
||||||
#define DEFAULT_EXTREF false
|
|
||||||
#define DEFAULT_DIVERSITY false
|
|
||||||
#define DEFAULT_CHANS 1
|
#define DEFAULT_CHANS 1
|
||||||
|
|
||||||
struct trx_config {
|
struct trx_config {
|
||||||
std::string log_level;
|
std::string log_level;
|
||||||
std::string addr;
|
std::string local_addr;
|
||||||
|
std::string remote_addr;
|
||||||
std::string dev_args;
|
std::string dev_args;
|
||||||
unsigned port;
|
unsigned port;
|
||||||
unsigned sps;
|
unsigned tx_sps;
|
||||||
|
unsigned rx_sps;
|
||||||
unsigned chans;
|
unsigned chans;
|
||||||
|
unsigned rtsc;
|
||||||
|
unsigned rach_delay;
|
||||||
bool extref;
|
bool extref;
|
||||||
bool filler;
|
bool gpsref;
|
||||||
bool diversity;
|
Transceiver::FillerType filler;
|
||||||
bool ms;
|
bool mcbts;
|
||||||
double offset;
|
double offset;
|
||||||
|
double rssi_offset;
|
||||||
|
bool swap_channels;
|
||||||
|
bool edge;
|
||||||
|
int sched_rr;
|
||||||
};
|
};
|
||||||
|
|
||||||
ConfigurationTable gConfig;
|
ConfigurationTable gConfig;
|
||||||
|
|
||||||
volatile bool gshutdown = false;
|
volatile bool gshutdown = false;
|
||||||
|
|
||||||
/* Run sanity check on configuration table
|
|
||||||
* The global table constructor cannot provide notification in the
|
|
||||||
* event of failure. Make sure that we can access the database,
|
|
||||||
* write to it, and that it contains the bare minimum required keys.
|
|
||||||
*/
|
|
||||||
bool testConfig()
|
|
||||||
{
|
|
||||||
int val = 9999;
|
|
||||||
std::string test = "asldfkjsaldkf";
|
|
||||||
const char *key = "Log.Level";
|
|
||||||
|
|
||||||
/* Attempt to query */
|
|
||||||
try {
|
|
||||||
gConfig.getStr(key);
|
|
||||||
} catch (...) {
|
|
||||||
std::cerr << std::endl;
|
|
||||||
std::cerr << "Config: Failed query required key " << key
|
|
||||||
<< std::endl;
|
|
||||||
return false;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* Attempt to set a test value in the global config */
|
|
||||||
if (!gConfig.set(test, val)) {
|
|
||||||
std::cerr << std::endl;
|
|
||||||
std::cerr << "Config: Failed to set test key" << std::endl;
|
|
||||||
return false;
|
|
||||||
} else {
|
|
||||||
gConfig.remove(test);
|
|
||||||
}
|
|
||||||
|
|
||||||
return true;
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
/* Setup configuration values
|
/* Setup configuration values
|
||||||
* Don't query the existence of the Log.Level because it's a
|
* Don't query the existence of the Log.Level because it's a
|
||||||
* mandatory value. That is, if it doesn't exist, the configuration
|
* mandatory value. That is, if it doesn't exist, the configuration
|
||||||
@@ -119,70 +95,58 @@ bool testConfig()
|
|||||||
*/
|
*/
|
||||||
bool trx_setup_config(struct trx_config *config)
|
bool trx_setup_config(struct trx_config *config)
|
||||||
{
|
{
|
||||||
std::string refstr, fillstr, divstr, msstr;
|
std::string refstr, fillstr, divstr, mcstr, edgestr;
|
||||||
|
|
||||||
if (!testConfig())
|
if (config->mcbts && config->chans > 5) {
|
||||||
|
std::cout << "Unsupported number of channels" << std::endl;
|
||||||
return false;
|
return false;
|
||||||
|
|
||||||
if (config->log_level == "")
|
|
||||||
config->log_level = gConfig.getStr("Log.Level");
|
|
||||||
|
|
||||||
if (!config->port) {
|
|
||||||
if (gConfig.defines("TRX.Port"))
|
|
||||||
config->port = gConfig.getNum("TRX.Port");
|
|
||||||
else
|
|
||||||
config->port = DEFAULT_TRX_PORT;
|
|
||||||
}
|
}
|
||||||
|
|
||||||
if (config->addr == "") {
|
edgestr = config->edge ? "Enabled" : "Disabled";
|
||||||
if (gConfig.defines("TRX.IP"))
|
mcstr = config->mcbts ? "Enabled" : "Disabled";
|
||||||
config->addr = gConfig.getStr("TRX.IP");
|
|
||||||
else
|
if (config->extref)
|
||||||
config->addr = DEFAULT_TRX_IP;
|
refstr = "External";
|
||||||
|
else if (config->gpsref)
|
||||||
|
refstr = "GPS";
|
||||||
|
else
|
||||||
|
refstr = "Internal";
|
||||||
|
|
||||||
|
switch (config->filler) {
|
||||||
|
case Transceiver::FILLER_DUMMY:
|
||||||
|
fillstr = "Dummy bursts";
|
||||||
|
break;
|
||||||
|
case Transceiver::FILLER_ZERO:
|
||||||
|
fillstr = "Disabled";
|
||||||
|
break;
|
||||||
|
case Transceiver::FILLER_NORM_RAND:
|
||||||
|
fillstr = "Normal busrts with random payload";
|
||||||
|
break;
|
||||||
|
case Transceiver::FILLER_EDGE_RAND:
|
||||||
|
fillstr = "EDGE busrts with random payload";
|
||||||
|
break;
|
||||||
|
case Transceiver::FILLER_ACCESS_RAND:
|
||||||
|
fillstr = "Access busrts with random payload";
|
||||||
|
break;
|
||||||
}
|
}
|
||||||
|
|
||||||
if (!config->extref) {
|
|
||||||
if (gConfig.defines("TRX.Reference"))
|
|
||||||
config->extref = gConfig.getNum("TRX.Reference");
|
|
||||||
else
|
|
||||||
config->extref = DEFAULT_EXTREF;
|
|
||||||
}
|
|
||||||
|
|
||||||
if (!config->diversity) {
|
|
||||||
if (gConfig.defines("TRX.Diversity"))
|
|
||||||
config->diversity = gConfig.getNum("TRX.Diversity");
|
|
||||||
else
|
|
||||||
config->diversity = DEFAULT_DIVERSITY;
|
|
||||||
}
|
|
||||||
|
|
||||||
if (!config->sps)
|
|
||||||
config->sps = DEFAULT_SPS;
|
|
||||||
|
|
||||||
if (!config->chans)
|
|
||||||
config->chans = DEFAULT_CHANS;
|
|
||||||
|
|
||||||
/* Diversity only supported on 2 channels */
|
|
||||||
if (config->diversity)
|
|
||||||
config->chans = 2;
|
|
||||||
|
|
||||||
refstr = config->extref ? "Enabled" : "Disabled";
|
|
||||||
fillstr = config->filler ? "Enabled" : "Disabled";
|
|
||||||
divstr = config->diversity ? "Enabled" : "Disabled";
|
|
||||||
msstr = config->ms ? "Enabled" : "Disabled";
|
|
||||||
|
|
||||||
std::ostringstream ost("");
|
std::ostringstream ost("");
|
||||||
ost << "Config Settings" << std::endl;
|
ost << "Config Settings" << std::endl;
|
||||||
ost << " Log Level............... " << config->log_level << std::endl;
|
ost << " Log Level............... " << config->log_level << std::endl;
|
||||||
ost << " Device args............. " << config->dev_args << std::endl;
|
ost << " Device args............. " << config->dev_args << std::endl;
|
||||||
ost << " TRX Base Port........... " << config->port << std::endl;
|
ost << " TRX Base Port........... " << config->port << std::endl;
|
||||||
ost << " TRX Address............. " << config->addr << std::endl;
|
ost << " TRX Address............. " << config->local_addr << std::endl;
|
||||||
|
ost << " GSM Core Address........." << config->remote_addr << std::endl;
|
||||||
ost << " Channels................ " << config->chans << std::endl;
|
ost << " Channels................ " << config->chans << std::endl;
|
||||||
ost << " Samples-per-Symbol...... " << config->sps << std::endl;
|
ost << " Tx Samples-per-Symbol... " << config->tx_sps << std::endl;
|
||||||
ost << " External Reference...... " << refstr << std::endl;
|
ost << " Rx Samples-per-Symbol... " << config->rx_sps << std::endl;
|
||||||
|
ost << " EDGE support............ " << edgestr << std::endl;
|
||||||
|
ost << " Reference............... " << refstr << std::endl;
|
||||||
ost << " C0 Filler Table......... " << fillstr << std::endl;
|
ost << " C0 Filler Table......... " << fillstr << std::endl;
|
||||||
ost << " Diversity............... " << divstr << std::endl;
|
ost << " Multi-Carrier........... " << mcstr << std::endl;
|
||||||
ost << " MS Mode................. " << msstr << std::endl;
|
|
||||||
ost << " Tuning offset........... " << config->offset << std::endl;
|
ost << " Tuning offset........... " << config->offset << std::endl;
|
||||||
|
ost << " RSSI to dBm offset...... " << config->rssi_offset << std::endl;
|
||||||
|
ost << " Swap channels........... " << config->swap_channels << std::endl;
|
||||||
std::cout << ost << std::endl;
|
std::cout << ost << std::endl;
|
||||||
|
|
||||||
return true;
|
return true;
|
||||||
@@ -199,31 +163,20 @@ RadioInterface *makeRadioInterface(struct trx_config *config,
|
|||||||
RadioDevice *usrp, int type)
|
RadioDevice *usrp, int type)
|
||||||
{
|
{
|
||||||
RadioInterface *radio = NULL;
|
RadioInterface *radio = NULL;
|
||||||
size_t div = 1;
|
|
||||||
int offset = 3;
|
|
||||||
|
|
||||||
if (config->ms) {
|
|
||||||
if (type != RadioDevice::NORMAL) {
|
|
||||||
LOG(ALERT) << "Unsupported configuration";
|
|
||||||
return NULL;
|
|
||||||
}
|
|
||||||
|
|
||||||
offset *= -1;
|
|
||||||
}
|
|
||||||
|
|
||||||
switch (type) {
|
switch (type) {
|
||||||
case RadioDevice::NORMAL:
|
case RadioDevice::NORMAL:
|
||||||
radio = new RadioInterface(usrp, config->sps,
|
radio = new RadioInterface(usrp, config->tx_sps,
|
||||||
config->chans, div, offset);
|
config->rx_sps, config->chans);
|
||||||
break;
|
break;
|
||||||
case RadioDevice::RESAMP_64M:
|
case RadioDevice::RESAMP_64M:
|
||||||
case RadioDevice::RESAMP_100M:
|
case RadioDevice::RESAMP_100M:
|
||||||
radio = new RadioInterfaceResamp(usrp,
|
radio = new RadioInterfaceResamp(usrp, config->tx_sps,
|
||||||
config->sps, config->chans);
|
config->rx_sps);
|
||||||
break;
|
break;
|
||||||
case RadioDevice::DIVERSITY:
|
case RadioDevice::MULTI_ARFCN:
|
||||||
radio = new RadioInterfaceDiversity(usrp,
|
radio = new RadioInterfaceMulti(usrp, config->tx_sps,
|
||||||
config->sps, config->chans);
|
config->rx_sps, config->chans);
|
||||||
break;
|
break;
|
||||||
default:
|
default:
|
||||||
LOG(ALERT) << "Unsupported radio interface configuration";
|
LOG(ALERT) << "Unsupported radio interface configuration";
|
||||||
@@ -249,9 +202,12 @@ Transceiver *makeTransceiver(struct trx_config *config, RadioInterface *radio)
|
|||||||
Transceiver *trx;
|
Transceiver *trx;
|
||||||
VectorFIFO *fifo;
|
VectorFIFO *fifo;
|
||||||
|
|
||||||
trx = new Transceiver(config->port, config->addr.c_str(), config->sps,
|
trx = new Transceiver(config->port, config->local_addr.c_str(),
|
||||||
config->chans, GSM::Time(3,0), radio);
|
config->remote_addr.c_str(), config->tx_sps,
|
||||||
if (!trx->init(config->filler)) {
|
config->rx_sps, config->chans, GSM::Time(3,0),
|
||||||
|
radio, config->rssi_offset);
|
||||||
|
if (!trx->init(config->filler, config->rtsc,
|
||||||
|
config->rach_delay, config->edge)) {
|
||||||
LOG(ALERT) << "Failed to initialize transceiver";
|
LOG(ALERT) << "Failed to initialize transceiver";
|
||||||
delete trx;
|
delete trx;
|
||||||
return NULL;
|
return NULL;
|
||||||
@@ -295,14 +251,22 @@ static void print_help()
|
|||||||
" -a UHD device args\n"
|
" -a UHD device args\n"
|
||||||
" -l Logging level (%s)\n"
|
" -l Logging level (%s)\n"
|
||||||
" -i IP address of GSM core\n"
|
" -i IP address of GSM core\n"
|
||||||
|
" -j IP address of osmo-trx\n"
|
||||||
" -p Base port number\n"
|
" -p Base port number\n"
|
||||||
" -d Enable dual channel diversity receiver\n"
|
" -e Enable EDGE receiver\n"
|
||||||
|
" -m Enable multi-ARFCN transceiver (default=disabled)\n"
|
||||||
" -x Enable external 10 MHz reference\n"
|
" -x Enable external 10 MHz reference\n"
|
||||||
" -s Samples-per-symbol (1 or 4)\n"
|
" -g Enable GPSDO reference\n"
|
||||||
|
" -s Tx samples-per-symbol (1 or 4)\n"
|
||||||
|
" -b Rx samples-per-symbol (1 or 4)\n"
|
||||||
" -c Number of ARFCN channels (default=1)\n"
|
" -c Number of ARFCN channels (default=1)\n"
|
||||||
" -f Enable C0 filler table\n"
|
" -f Enable C0 filler table\n"
|
||||||
" -m Enable MS mode\n"
|
" -o Set baseband frequency offset (default=auto)\n"
|
||||||
" -o Set baseband frequency offset (default=auto)\n",
|
" -r Random Normal Burst test mode with TSC\n"
|
||||||
|
" -A Random Access Burst test mode with delay\n"
|
||||||
|
" -R RSSI to dBm offset in dB (default=0)\n"
|
||||||
|
" -S Swap channels (UmTRX only)\n"
|
||||||
|
" -t SCHED_RR real-time priority (1..32)\n",
|
||||||
"EMERG, ALERT, CRT, ERR, WARNING, NOTICE, INFO, DEBUG");
|
"EMERG, ALERT, CRT, ERR, WARNING, NOTICE, INFO, DEBUG");
|
||||||
}
|
}
|
||||||
|
|
||||||
@@ -310,16 +274,26 @@ static void handle_options(int argc, char **argv, struct trx_config *config)
|
|||||||
{
|
{
|
||||||
int option;
|
int option;
|
||||||
|
|
||||||
config->port = 0;
|
config->log_level = "NOTICE";
|
||||||
config->sps = 0;
|
config->local_addr = DEFAULT_TRX_IP;
|
||||||
config->chans = 0;
|
config->remote_addr = DEFAULT_TRX_IP;
|
||||||
|
config->port = DEFAULT_TRX_PORT;
|
||||||
|
config->tx_sps = DEFAULT_TX_SPS;
|
||||||
|
config->rx_sps = DEFAULT_RX_SPS;
|
||||||
|
config->chans = DEFAULT_CHANS;
|
||||||
|
config->rtsc = 0;
|
||||||
|
config->rach_delay = 0;
|
||||||
config->extref = false;
|
config->extref = false;
|
||||||
config->filler = false;
|
config->gpsref = false;
|
||||||
config->diversity = false;
|
config->filler = Transceiver::FILLER_ZERO;
|
||||||
config->ms = false;
|
config->mcbts = false;
|
||||||
config->offset = 0.0;
|
config->offset = 0.0;
|
||||||
|
config->rssi_offset = 0.0;
|
||||||
|
config->swap_channels = false;
|
||||||
|
config->edge = false;
|
||||||
|
config->sched_rr = -1;
|
||||||
|
|
||||||
while ((option = getopt(argc, argv, "ha:l:i:p:c:dxfo:ms:")) != -1) {
|
while ((option = getopt(argc, argv, "ha:l:i:j:p:c:dmxgfo:s:b:r:A:R:Set:")) != -1) {
|
||||||
switch (option) {
|
switch (option) {
|
||||||
case 'h':
|
case 'h':
|
||||||
print_help();
|
print_help();
|
||||||
@@ -332,7 +306,10 @@ static void handle_options(int argc, char **argv, struct trx_config *config)
|
|||||||
config->log_level = optarg;
|
config->log_level = optarg;
|
||||||
break;
|
break;
|
||||||
case 'i':
|
case 'i':
|
||||||
config->addr = optarg;
|
config->remote_addr = optarg;
|
||||||
|
break;
|
||||||
|
case 'j':
|
||||||
|
config->local_addr = optarg;
|
||||||
break;
|
break;
|
||||||
case 'p':
|
case 'p':
|
||||||
config->port = atoi(optarg);
|
config->port = atoi(optarg);
|
||||||
@@ -340,46 +317,148 @@ static void handle_options(int argc, char **argv, struct trx_config *config)
|
|||||||
case 'c':
|
case 'c':
|
||||||
config->chans = atoi(optarg);
|
config->chans = atoi(optarg);
|
||||||
break;
|
break;
|
||||||
case 'd':
|
case 'm':
|
||||||
config->diversity = true;
|
config->mcbts = true;
|
||||||
break;
|
break;
|
||||||
case 'x':
|
case 'x':
|
||||||
config->extref = true;
|
config->extref = true;
|
||||||
break;
|
break;
|
||||||
|
case 'g':
|
||||||
|
config->gpsref = true;
|
||||||
|
break;
|
||||||
case 'f':
|
case 'f':
|
||||||
config->filler = true;
|
config->filler = Transceiver::FILLER_DUMMY;
|
||||||
break;
|
break;
|
||||||
case 'o':
|
case 'o':
|
||||||
config->offset = atof(optarg);
|
config->offset = atof(optarg);
|
||||||
break;
|
break;
|
||||||
case 'm':
|
|
||||||
config->ms = true;
|
|
||||||
break;
|
|
||||||
case 's':
|
case 's':
|
||||||
config->sps = atoi(optarg);
|
config->tx_sps = atoi(optarg);
|
||||||
if ((config->sps != 1) && (config->sps != 4)) {
|
break;
|
||||||
printf("Unsupported samples-per-symbol\n\n");
|
case 'b':
|
||||||
print_help();
|
config->rx_sps = atoi(optarg);
|
||||||
exit(0);
|
break;
|
||||||
}
|
case 'r':
|
||||||
|
config->rtsc = atoi(optarg);
|
||||||
|
config->filler = Transceiver::FILLER_NORM_RAND;
|
||||||
|
break;
|
||||||
|
case 'A':
|
||||||
|
config->rach_delay = atoi(optarg);
|
||||||
|
config->filler = Transceiver::FILLER_ACCESS_RAND;
|
||||||
|
break;
|
||||||
|
case 'R':
|
||||||
|
config->rssi_offset = atof(optarg);
|
||||||
|
break;
|
||||||
|
case 'S':
|
||||||
|
config->swap_channels = true;
|
||||||
|
break;
|
||||||
|
case 'e':
|
||||||
|
config->edge = true;
|
||||||
|
break;
|
||||||
|
case 't':
|
||||||
|
config->sched_rr = atoi(optarg);
|
||||||
break;
|
break;
|
||||||
default:
|
default:
|
||||||
print_help();
|
print_help();
|
||||||
exit(0);
|
exit(0);
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
/* Force 4 SPS for EDGE or multi-ARFCN configurations */
|
||||||
|
if ((config->edge) || (config->mcbts)) {
|
||||||
|
config->tx_sps = 4;
|
||||||
|
config->rx_sps = 4;
|
||||||
|
}
|
||||||
|
|
||||||
|
if (config->gpsref && config->extref) {
|
||||||
|
printf("External and GPSDO references unavailable at the same time\n\n");
|
||||||
|
goto bad_config;
|
||||||
|
}
|
||||||
|
|
||||||
|
if (config->edge && (config->filler == Transceiver::FILLER_NORM_RAND))
|
||||||
|
config->filler = Transceiver::FILLER_EDGE_RAND;
|
||||||
|
|
||||||
|
if ((config->tx_sps != 1) && (config->tx_sps != 4) &&
|
||||||
|
(config->rx_sps != 1) && (config->rx_sps != 4)) {
|
||||||
|
printf("Unsupported samples-per-symbol %i\n\n", config->tx_sps);
|
||||||
|
goto bad_config;
|
||||||
|
}
|
||||||
|
|
||||||
|
if (config->rtsc > 7) {
|
||||||
|
printf("Invalid training sequence %i\n\n", config->rtsc);
|
||||||
|
goto bad_config;
|
||||||
|
}
|
||||||
|
|
||||||
|
if (config->rach_delay > 68) {
|
||||||
|
printf("RACH delay is too big %i\n\n", config->rach_delay);
|
||||||
|
goto bad_config;
|
||||||
|
}
|
||||||
|
|
||||||
|
return;
|
||||||
|
|
||||||
|
bad_config:
|
||||||
|
print_help();
|
||||||
|
exit(0);
|
||||||
|
}
|
||||||
|
|
||||||
|
static int set_sched_rr(int prio)
|
||||||
|
{
|
||||||
|
struct sched_param param;
|
||||||
|
int rc;
|
||||||
|
memset(¶m, 0, sizeof(param));
|
||||||
|
param.sched_priority = prio;
|
||||||
|
printf("Setting SCHED_RR priority(%d)\n", param.sched_priority);
|
||||||
|
rc = sched_setscheduler(getpid(), SCHED_RR, ¶m);
|
||||||
|
if (rc != 0) {
|
||||||
|
std::cerr << "Config: Setting SCHED_RR failed" << std::endl;
|
||||||
|
return -1;
|
||||||
|
}
|
||||||
|
return 0;
|
||||||
}
|
}
|
||||||
|
|
||||||
int main(int argc, char *argv[])
|
int main(int argc, char *argv[])
|
||||||
{
|
{
|
||||||
int type, chans;
|
int type, chans, ref;
|
||||||
RadioDevice *usrp;
|
RadioDevice *usrp;
|
||||||
RadioInterface *radio = NULL;
|
RadioInterface *radio = NULL;
|
||||||
Transceiver *trx = NULL;
|
Transceiver *trx = NULL;
|
||||||
|
RadioDevice::InterfaceType iface = RadioDevice::NORMAL;
|
||||||
struct trx_config config;
|
struct trx_config config;
|
||||||
|
|
||||||
|
#ifdef HAVE_SSE3
|
||||||
|
printf("Info: SSE3 support compiled in");
|
||||||
|
#ifdef HAVE___BUILTIN_CPU_SUPPORTS
|
||||||
|
if (__builtin_cpu_supports("sse3"))
|
||||||
|
printf(" and supported by CPU\n");
|
||||||
|
else
|
||||||
|
printf(", but not supported by CPU\n");
|
||||||
|
#else
|
||||||
|
printf(", but runtime SIMD detection disabled\n");
|
||||||
|
#endif
|
||||||
|
#endif
|
||||||
|
|
||||||
|
#ifdef HAVE_SSE4_1
|
||||||
|
printf("Info: SSE4.1 support compiled in");
|
||||||
|
#ifdef HAVE___BUILTIN_CPU_SUPPORTS
|
||||||
|
if (__builtin_cpu_supports("sse4.1"))
|
||||||
|
printf(" and supported by CPU\n");
|
||||||
|
else
|
||||||
|
printf(", but not supported by CPU\n");
|
||||||
|
#else
|
||||||
|
printf(", but runtime SIMD detection disabled\n");
|
||||||
|
#endif
|
||||||
|
#endif
|
||||||
|
|
||||||
|
convolve_init();
|
||||||
|
convert_init();
|
||||||
|
|
||||||
handle_options(argc, argv, &config);
|
handle_options(argc, argv, &config);
|
||||||
|
|
||||||
|
if (config.sched_rr != -1) {
|
||||||
|
if (set_sched_rr(config.sched_rr) < 0)
|
||||||
|
return EXIT_FAILURE;
|
||||||
|
}
|
||||||
|
|
||||||
setup_signal_handlers();
|
setup_signal_handlers();
|
||||||
|
|
||||||
/* Check database sanity */
|
/* Check database sanity */
|
||||||
@@ -393,9 +472,19 @@ int main(int argc, char *argv[])
|
|||||||
srandom(time(NULL));
|
srandom(time(NULL));
|
||||||
|
|
||||||
/* Create the low level device object */
|
/* Create the low level device object */
|
||||||
usrp = RadioDevice::make(config.sps, config.chans,
|
if (config.mcbts)
|
||||||
config.diversity, config.offset);
|
iface = RadioDevice::MULTI_ARFCN;
|
||||||
type = usrp->open(config.dev_args, config.extref);
|
|
||||||
|
if (config.extref)
|
||||||
|
ref = RadioDevice::REF_EXTERNAL;
|
||||||
|
else if (config.gpsref)
|
||||||
|
ref = RadioDevice::REF_GPS;
|
||||||
|
else
|
||||||
|
ref = RadioDevice::REF_INTERNAL;
|
||||||
|
|
||||||
|
usrp = RadioDevice::make(config.tx_sps, config.rx_sps, iface,
|
||||||
|
config.chans, config.offset);
|
||||||
|
type = usrp->open(config.dev_args, ref, config.swap_channels);
|
||||||
if (type < 0) {
|
if (type < 0) {
|
||||||
LOG(ALERT) << "Failed to create radio device" << std::endl;
|
LOG(ALERT) << "Failed to create radio device" << std::endl;
|
||||||
goto shutdown;
|
goto shutdown;
|
||||||
@@ -411,8 +500,6 @@ int main(int argc, char *argv[])
|
|||||||
if (!trx)
|
if (!trx)
|
||||||
goto shutdown;
|
goto shutdown;
|
||||||
|
|
||||||
trx->start();
|
|
||||||
|
|
||||||
chans = trx->numChans();
|
chans = trx->numChans();
|
||||||
std::cout << "-- Transceiver active with "
|
std::cout << "-- Transceiver active with "
|
||||||
<< chans << " channel(s)" << std::endl;
|
<< chans << " channel(s)" << std::endl;
|
||||||
|
|||||||
228
Transceiver52M/radioBuffer.cpp
Normal file
228
Transceiver52M/radioBuffer.cpp
Normal file
@@ -0,0 +1,228 @@
|
|||||||
|
/*
|
||||||
|
* Segmented Ring Buffer
|
||||||
|
*
|
||||||
|
* Copyright (C) 2015 Ettus Research LLC
|
||||||
|
*
|
||||||
|
* Author: Tom Tsou <tom@tsou.cc>
|
||||||
|
*
|
||||||
|
* This program is free software: you can redistribute it and/or modify
|
||||||
|
* it under the terms of the GNU Affero General Public License as published by
|
||||||
|
* the Free Software Foundation, either version 3 of the License, or
|
||||||
|
* (at your option) any later version.
|
||||||
|
*
|
||||||
|
* This program is distributed in the hope that it will be useful,
|
||||||
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||||
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||||
|
* GNU Affero General Public License for more details.
|
||||||
|
*
|
||||||
|
* You should have received a copy of the GNU Affero General Public License
|
||||||
|
* along with this program. If not, see <http://www.gnu.org/licenses/>.
|
||||||
|
* See the COPYING file in the main directory for details.
|
||||||
|
*/
|
||||||
|
|
||||||
|
#include <string.h>
|
||||||
|
#include <iostream>
|
||||||
|
#include "radioBuffer.h"
|
||||||
|
|
||||||
|
RadioBuffer::RadioBuffer(size_t numSegments, size_t segmentLen,
|
||||||
|
size_t hLen, bool outDirection)
|
||||||
|
: writeIndex(0), readIndex(0), availSamples(0)
|
||||||
|
{
|
||||||
|
if (!outDirection)
|
||||||
|
hLen = 0;
|
||||||
|
|
||||||
|
buffer = new float[2 * (hLen + numSegments * segmentLen)];
|
||||||
|
bufferLen = numSegments * segmentLen;
|
||||||
|
|
||||||
|
segments.resize(numSegments);
|
||||||
|
|
||||||
|
for (size_t i = 0; i < numSegments; i++)
|
||||||
|
segments[i] = &buffer[2 * (hLen + i * segmentLen)];
|
||||||
|
|
||||||
|
this->outDirection = outDirection;
|
||||||
|
this->numSegments = numSegments;
|
||||||
|
this->segmentLen = segmentLen;
|
||||||
|
this->hLen = hLen;
|
||||||
|
}
|
||||||
|
|
||||||
|
RadioBuffer::~RadioBuffer()
|
||||||
|
{
|
||||||
|
delete[] buffer;
|
||||||
|
}
|
||||||
|
|
||||||
|
void RadioBuffer::reset()
|
||||||
|
{
|
||||||
|
writeIndex = 0;
|
||||||
|
readIndex = 0;
|
||||||
|
availSamples = 0;
|
||||||
|
}
|
||||||
|
|
||||||
|
/*
|
||||||
|
* Output direction
|
||||||
|
*
|
||||||
|
* Return a pointer to the oldest segment or NULL if a complete segment is not
|
||||||
|
* available.
|
||||||
|
*/
|
||||||
|
const float *RadioBuffer::getReadSegment()
|
||||||
|
{
|
||||||
|
if (!outDirection) {
|
||||||
|
std::cout << "Invalid direction" << std::endl;
|
||||||
|
return NULL;
|
||||||
|
}
|
||||||
|
if (availSamples < segmentLen) {
|
||||||
|
std::cout << "Not enough samples " << std::endl;
|
||||||
|
std::cout << availSamples << " available per segment "
|
||||||
|
<< segmentLen << std::endl;
|
||||||
|
return NULL;
|
||||||
|
}
|
||||||
|
|
||||||
|
size_t num = readIndex / segmentLen;
|
||||||
|
|
||||||
|
if (num >= numSegments) {
|
||||||
|
std::cout << "Invalid segment" << std::endl;
|
||||||
|
return NULL;
|
||||||
|
} else if (!num) {
|
||||||
|
memcpy(buffer,
|
||||||
|
&buffer[2 * bufferLen],
|
||||||
|
hLen * 2 * sizeof(float));
|
||||||
|
}
|
||||||
|
|
||||||
|
availSamples -= segmentLen;
|
||||||
|
readIndex = (readIndex + segmentLen) % bufferLen;
|
||||||
|
|
||||||
|
return segments[num];
|
||||||
|
}
|
||||||
|
|
||||||
|
/*
|
||||||
|
* Output direction
|
||||||
|
*
|
||||||
|
* Write a non-segment length of samples to the buffer.
|
||||||
|
*/
|
||||||
|
bool RadioBuffer::write(const float *wr, size_t len)
|
||||||
|
{
|
||||||
|
if (!outDirection) {
|
||||||
|
std::cout << "Invalid direction" << std::endl;
|
||||||
|
return false;
|
||||||
|
}
|
||||||
|
if (availSamples + len > bufferLen) {
|
||||||
|
std::cout << "Insufficient space" << std::endl;
|
||||||
|
std::cout << bufferLen - availSamples << " available per write "
|
||||||
|
<< len << std::endl;
|
||||||
|
return false;
|
||||||
|
}
|
||||||
|
|
||||||
|
if (writeIndex + len <= bufferLen) {
|
||||||
|
memcpy(&buffer[2 * (writeIndex + hLen)],
|
||||||
|
wr, len * 2 * sizeof(float));
|
||||||
|
} else {
|
||||||
|
size_t len0 = bufferLen - writeIndex;
|
||||||
|
size_t len1 = len - len0;
|
||||||
|
memcpy(&buffer[2 * (writeIndex + hLen)], wr, len0 * 2 * sizeof(float));
|
||||||
|
memcpy(&buffer[2 * hLen], &wr[2 * len0], len1 * 2 * sizeof(float));
|
||||||
|
}
|
||||||
|
|
||||||
|
availSamples += len;
|
||||||
|
writeIndex = (writeIndex + len) % bufferLen;
|
||||||
|
|
||||||
|
return true;
|
||||||
|
}
|
||||||
|
|
||||||
|
bool RadioBuffer::zero(size_t len)
|
||||||
|
{
|
||||||
|
if (!outDirection) {
|
||||||
|
std::cout << "Invalid direction" << std::endl;
|
||||||
|
return false;
|
||||||
|
}
|
||||||
|
if (availSamples + len > bufferLen) {
|
||||||
|
std::cout << "Insufficient space" << std::endl;
|
||||||
|
std::cout << bufferLen - availSamples << " available per zero "
|
||||||
|
<< len << std::endl;
|
||||||
|
return false;
|
||||||
|
}
|
||||||
|
|
||||||
|
if (writeIndex + len <= bufferLen) {
|
||||||
|
memset(&buffer[2 * (writeIndex + hLen)],
|
||||||
|
0, len * 2 * sizeof(float));
|
||||||
|
} else {
|
||||||
|
size_t len0 = bufferLen - writeIndex;
|
||||||
|
size_t len1 = len - len0;
|
||||||
|
memset(&buffer[2 * (writeIndex + hLen)], 0, len0 * 2 * sizeof(float));
|
||||||
|
memset(&buffer[2 * hLen], 0, len1 * 2 * sizeof(float));
|
||||||
|
}
|
||||||
|
|
||||||
|
availSamples += len;
|
||||||
|
writeIndex = (writeIndex + len) % bufferLen;
|
||||||
|
|
||||||
|
return true;
|
||||||
|
}
|
||||||
|
|
||||||
|
/*
|
||||||
|
* Input direction
|
||||||
|
*/
|
||||||
|
float *RadioBuffer::getWriteSegment()
|
||||||
|
{
|
||||||
|
if (outDirection) {
|
||||||
|
std::cout << "Invalid direction" << std::endl;
|
||||||
|
return NULL;
|
||||||
|
}
|
||||||
|
if (bufferLen - availSamples < segmentLen) {
|
||||||
|
std::cout << "Insufficient samples" << std::endl;
|
||||||
|
std::cout << bufferLen - availSamples
|
||||||
|
<< " available for segment " << segmentLen
|
||||||
|
<< std::endl;
|
||||||
|
return NULL;
|
||||||
|
}
|
||||||
|
if (writeIndex % segmentLen) {
|
||||||
|
std::cout << "Internal segment error" << std::endl;
|
||||||
|
return NULL;
|
||||||
|
}
|
||||||
|
|
||||||
|
size_t num = writeIndex / segmentLen;
|
||||||
|
|
||||||
|
if (num >= numSegments)
|
||||||
|
return NULL;
|
||||||
|
|
||||||
|
availSamples += segmentLen;
|
||||||
|
writeIndex = (writeIndex + segmentLen) % bufferLen;
|
||||||
|
|
||||||
|
return segments[num];
|
||||||
|
}
|
||||||
|
|
||||||
|
bool RadioBuffer::zeroWriteSegment()
|
||||||
|
{
|
||||||
|
float *segment = getWriteSegment();
|
||||||
|
if (!segment)
|
||||||
|
return false;
|
||||||
|
|
||||||
|
memset(segment, 0, segmentLen * 2 * sizeof(float));
|
||||||
|
|
||||||
|
return true;
|
||||||
|
}
|
||||||
|
|
||||||
|
bool RadioBuffer::read(float *rd, size_t len)
|
||||||
|
{
|
||||||
|
if (outDirection) {
|
||||||
|
std::cout << "Invalid direction" << std::endl;
|
||||||
|
return false;
|
||||||
|
}
|
||||||
|
if (availSamples < len) {
|
||||||
|
std::cout << "Insufficient samples" << std::endl;
|
||||||
|
std::cout << availSamples << " available for "
|
||||||
|
<< len << std::endl;
|
||||||
|
return false;
|
||||||
|
}
|
||||||
|
|
||||||
|
if (readIndex + len <= bufferLen) {
|
||||||
|
memcpy(rd, &buffer[2 * readIndex], len * 2 * sizeof(float));
|
||||||
|
} else {
|
||||||
|
size_t len0 = bufferLen - readIndex;
|
||||||
|
size_t len1 = len - len0;
|
||||||
|
memcpy(rd, &buffer[2 * readIndex], len0 * 2 * sizeof(float));
|
||||||
|
memcpy(&rd[2 * len0], buffer, len1 * 2 * sizeof(float));
|
||||||
|
}
|
||||||
|
|
||||||
|
availSamples -= len;
|
||||||
|
readIndex = (readIndex + len) % bufferLen;
|
||||||
|
|
||||||
|
return true;
|
||||||
|
}
|
||||||
45
Transceiver52M/radioBuffer.h
Normal file
45
Transceiver52M/radioBuffer.h
Normal file
@@ -0,0 +1,45 @@
|
|||||||
|
#include <stdlib.h>
|
||||||
|
#include <stddef.h>
|
||||||
|
#include <vector>
|
||||||
|
|
||||||
|
class RadioBuffer {
|
||||||
|
public:
|
||||||
|
RadioBuffer(size_t numSegments, size_t segmentLen,
|
||||||
|
size_t hLen, bool outDirection);
|
||||||
|
|
||||||
|
~RadioBuffer();
|
||||||
|
|
||||||
|
const size_t getSegmentLen() { return segmentLen; }
|
||||||
|
const size_t getNumSegments() { return numSegments; }
|
||||||
|
const size_t getAvailSamples() { return availSamples; }
|
||||||
|
const size_t getAvailSegments() { return availSamples / segmentLen; }
|
||||||
|
|
||||||
|
const size_t getFreeSamples()
|
||||||
|
{
|
||||||
|
return bufferLen - availSamples;
|
||||||
|
}
|
||||||
|
|
||||||
|
const size_t getFreeSegments()
|
||||||
|
{
|
||||||
|
return getFreeSamples() / segmentLen;
|
||||||
|
}
|
||||||
|
|
||||||
|
void reset();
|
||||||
|
|
||||||
|
/* Output direction */
|
||||||
|
const float *getReadSegment();
|
||||||
|
bool write(const float *wr, size_t len);
|
||||||
|
bool zero(size_t len);
|
||||||
|
|
||||||
|
/* Input direction */
|
||||||
|
float *getWriteSegment();
|
||||||
|
bool zeroWriteSegment();
|
||||||
|
bool read(float *rd, size_t len);
|
||||||
|
|
||||||
|
private:
|
||||||
|
size_t writeIndex, readIndex, availSamples;
|
||||||
|
size_t bufferLen, numSegments, segmentLen, hLen;
|
||||||
|
float *buffer;
|
||||||
|
std::vector<float *> segments;
|
||||||
|
bool outDirection;
|
||||||
|
};
|
||||||
@@ -23,66 +23,27 @@
|
|||||||
|
|
||||||
void RadioClock::set(const GSM::Time& wTime)
|
void RadioClock::set(const GSM::Time& wTime)
|
||||||
{
|
{
|
||||||
mLock.lock();
|
ScopedLock lock(mLock);
|
||||||
mClock = wTime;
|
mClock = wTime;
|
||||||
updateSignal.signal();
|
updateSignal.signal();
|
||||||
mLock.unlock();
|
|
||||||
}
|
|
||||||
|
|
||||||
GSM::Time RadioClock::adjust(GSM::Time &wBase, GSM::Time &wOffset)
|
|
||||||
{
|
|
||||||
int tn_diff, fn_diff = 0;
|
|
||||||
|
|
||||||
/* Modulo TN adustment */
|
|
||||||
tn_diff = wBase.TN() + wOffset.TN();
|
|
||||||
if (tn_diff < 0) {
|
|
||||||
tn_diff += 8;
|
|
||||||
fn_diff--;
|
|
||||||
} else if (tn_diff >= 8) {
|
|
||||||
tn_diff -= 8;
|
|
||||||
fn_diff++;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* Modulo FN adjustment */
|
|
||||||
fn_diff += wBase.FN() + wOffset.FN();
|
|
||||||
if (fn_diff < 0)
|
|
||||||
fn_diff += GSM::gHyperframe;
|
|
||||||
else if ((unsigned) fn_diff >= GSM::gHyperframe)
|
|
||||||
fn_diff = fn_diff - GSM::gHyperframe;
|
|
||||||
|
|
||||||
return GSM::Time(fn_diff, tn_diff);
|
|
||||||
}
|
|
||||||
|
|
||||||
void RadioClock::adjust(GSM::Time& wOffset)
|
|
||||||
{
|
|
||||||
mLock.lock();
|
|
||||||
|
|
||||||
mClock = adjust(mClock, wOffset);
|
|
||||||
updateSignal.signal();
|
|
||||||
|
|
||||||
mLock.unlock();
|
|
||||||
}
|
}
|
||||||
|
|
||||||
void RadioClock::incTN()
|
void RadioClock::incTN()
|
||||||
{
|
{
|
||||||
mLock.lock();
|
ScopedLock lock(mLock);
|
||||||
mClock.incTN();
|
mClock.incTN();
|
||||||
updateSignal.signal();
|
updateSignal.signal();
|
||||||
mLock.unlock();
|
|
||||||
}
|
}
|
||||||
|
|
||||||
GSM::Time RadioClock::get()
|
GSM::Time RadioClock::get()
|
||||||
{
|
{
|
||||||
mLock.lock();
|
ScopedLock lock(mLock);
|
||||||
GSM::Time retVal = mClock;
|
GSM::Time retVal = mClock;
|
||||||
mLock.unlock();
|
|
||||||
|
|
||||||
return retVal;
|
return retVal;
|
||||||
}
|
}
|
||||||
|
|
||||||
void RadioClock::wait()
|
void RadioClock::wait()
|
||||||
{
|
{
|
||||||
mLock.lock();
|
ScopedLock lock(mLock);
|
||||||
updateSignal.wait(mLock,1);
|
updateSignal.wait(mLock,1);
|
||||||
mLock.unlock();
|
|
||||||
}
|
}
|
||||||
|
|||||||
@@ -26,10 +26,7 @@
|
|||||||
|
|
||||||
class RadioClock {
|
class RadioClock {
|
||||||
public:
|
public:
|
||||||
static GSM::Time adjust(GSM::Time &base, GSM::Time &offset);
|
|
||||||
|
|
||||||
void set(const GSM::Time& wTime);
|
void set(const GSM::Time& wTime);
|
||||||
void adjust(GSM::Time &wOffset);
|
|
||||||
void incTN();
|
void incTN();
|
||||||
GSM::Time get();
|
GSM::Time get();
|
||||||
void wait();
|
void wait();
|
||||||
|
|||||||
@@ -22,7 +22,8 @@
|
|||||||
#include "config.h"
|
#include "config.h"
|
||||||
#endif
|
#endif
|
||||||
|
|
||||||
#define GSMRATE 1625e3/6
|
#define GSMRATE (1625e3/6)
|
||||||
|
#define MCBTS_SPACING 800000.0
|
||||||
|
|
||||||
/** a 64-bit virtual timestamp for radio data */
|
/** a 64-bit virtual timestamp for radio data */
|
||||||
typedef unsigned long long TIMESTAMP;
|
typedef unsigned long long TIMESTAMP;
|
||||||
@@ -35,13 +36,24 @@ class RadioDevice {
|
|||||||
enum TxWindowType { TX_WINDOW_USRP1, TX_WINDOW_FIXED };
|
enum TxWindowType { TX_WINDOW_USRP1, TX_WINDOW_FIXED };
|
||||||
|
|
||||||
/* Radio interface types */
|
/* Radio interface types */
|
||||||
enum RadioInterfaceType { NORMAL, RESAMP_64M, RESAMP_100M, DIVERSITY };
|
enum InterfaceType {
|
||||||
|
NORMAL,
|
||||||
|
RESAMP_64M,
|
||||||
|
RESAMP_100M,
|
||||||
|
MULTI_ARFCN,
|
||||||
|
};
|
||||||
|
|
||||||
static RadioDevice *make(size_t sps, size_t chans = 1,
|
enum ReferenceType {
|
||||||
bool diversity = false, double offset = 0.0);
|
REF_INTERNAL,
|
||||||
|
REF_EXTERNAL,
|
||||||
|
REF_GPS,
|
||||||
|
};
|
||||||
|
|
||||||
|
static RadioDevice *make(size_t tx_sps, size_t rx_sps, InterfaceType type,
|
||||||
|
size_t chans = 1, double offset = 0.0);
|
||||||
|
|
||||||
/** Initialize the USRP */
|
/** Initialize the USRP */
|
||||||
virtual int open(const std::string &args = "", bool extref = false)=0;
|
virtual int open(const std::string &args, int ref, bool swap_channels)=0;
|
||||||
|
|
||||||
virtual ~RadioDevice() { }
|
virtual ~RadioDevice() { }
|
||||||
|
|
||||||
@@ -91,9 +103,6 @@ class RadioDevice {
|
|||||||
/** Set the receiver frequency */
|
/** Set the receiver frequency */
|
||||||
virtual bool setRxFreq(double wFreq, size_t chan = 0) = 0;
|
virtual bool setRxFreq(double wFreq, size_t chan = 0) = 0;
|
||||||
|
|
||||||
/** Adjust the receiver offset */
|
|
||||||
virtual bool setRxOffset(double wOffset, size_t chan = 0) = 0;
|
|
||||||
|
|
||||||
/** Returns the starting write Timestamp*/
|
/** Returns the starting write Timestamp*/
|
||||||
virtual TIMESTAMP initialWriteTimestamp(void)=0;
|
virtual TIMESTAMP initialWriteTimestamp(void)=0;
|
||||||
|
|
||||||
|
|||||||
@@ -1,26 +1,23 @@
|
|||||||
/*
|
/*
|
||||||
* Copyright 2008, 2009 Free Software Foundation, Inc.
|
* Radio device interface
|
||||||
*
|
*
|
||||||
* This software is distributed under the terms of the GNU Affero Public License.
|
* Copyright (C) 2008-2014 Free Software Foundation, Inc.
|
||||||
* See the COPYING file in the main directory for details.
|
* Copyright (C) 2015 Ettus Research LLC
|
||||||
*
|
*
|
||||||
* This use of this software may be subject to additional restrictions.
|
* This program is free software: you can redistribute it and/or modify
|
||||||
* See the LEGAL file in the main directory for details.
|
* it under the terms of the GNU Affero General Public License as published by
|
||||||
|
* the Free Software Foundation, either version 3 of the License, or
|
||||||
This program is free software: you can redistribute it and/or modify
|
* (at your option) any later version.
|
||||||
it under the terms of the GNU Affero General Public License as published by
|
*
|
||||||
the Free Software Foundation, either version 3 of the License, or
|
* This program is distributed in the hope that it will be useful,
|
||||||
(at your option) any later version.
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||||
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||||
This program is distributed in the hope that it will be useful,
|
* GNU Affero General Public License for more details.
|
||||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
*
|
||||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
* You should have received a copy of the GNU Affero General Public License
|
||||||
GNU Affero General Public License for more details.
|
* along with this program. If not, see <http://www.gnu.org/licenses/>.
|
||||||
|
* See the COPYING file in the main directory for details.
|
||||||
You should have received a copy of the GNU Affero General Public License
|
*/
|
||||||
along with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
||||||
|
|
||||||
*/
|
|
||||||
|
|
||||||
#include "radioInterface.h"
|
#include "radioInterface.h"
|
||||||
#include "Resampler.h"
|
#include "Resampler.h"
|
||||||
@@ -33,13 +30,11 @@ extern "C" {
|
|||||||
#define CHUNK 625
|
#define CHUNK 625
|
||||||
#define NUMCHUNKS 4
|
#define NUMCHUNKS 4
|
||||||
|
|
||||||
RadioInterface::RadioInterface(RadioDevice *wRadio,
|
RadioInterface::RadioInterface(RadioDevice *wRadio, size_t tx_sps,
|
||||||
size_t sps, size_t chans, size_t diversity,
|
size_t rx_sps, size_t chans,
|
||||||
int wReceiveOffset, GSM::Time wStartTime)
|
int wReceiveOffset, GSM::Time wStartTime)
|
||||||
: mRadio(wRadio), mSPSTx(sps), mSPSRx(1), mChans(chans), mMIMO(diversity),
|
: mRadio(wRadio), mSPSTx(tx_sps), mSPSRx(rx_sps), mChans(chans),
|
||||||
sendCursor(0), recvCursor(0), underrun(false), overrun(false),
|
underrun(false), overrun(false), receiveOffset(wReceiveOffset), mOn(false)
|
||||||
receiveOffset(wReceiveOffset), shiftOffset(0), shiftUpdate(false),
|
|
||||||
mOn(false)
|
|
||||||
{
|
{
|
||||||
mClock.set(wStartTime);
|
mClock.set(wStartTime);
|
||||||
}
|
}
|
||||||
@@ -51,7 +46,7 @@ RadioInterface::~RadioInterface(void)
|
|||||||
|
|
||||||
bool RadioInterface::init(int type)
|
bool RadioInterface::init(int type)
|
||||||
{
|
{
|
||||||
if ((type != RadioDevice::NORMAL) || (mMIMO > 1) || !mChans) {
|
if ((type != RadioDevice::NORMAL) || !mChans) {
|
||||||
LOG(ALERT) << "Invalid configuration";
|
LOG(ALERT) << "Invalid configuration";
|
||||||
return false;
|
return false;
|
||||||
}
|
}
|
||||||
@@ -66,33 +61,20 @@ bool RadioInterface::init(int type)
|
|||||||
powerScaling.resize(mChans);
|
powerScaling.resize(mChans);
|
||||||
|
|
||||||
for (size_t i = 0; i < mChans; i++) {
|
for (size_t i = 0; i < mChans; i++) {
|
||||||
sendBuffer[i] = new signalVector(CHUNK * mSPSTx);
|
sendBuffer[i] = new RadioBuffer(NUMCHUNKS, CHUNK * mSPSTx, 0, true);
|
||||||
recvBuffer[i] = new signalVector(NUMCHUNKS * CHUNK * mSPSRx);
|
recvBuffer[i] = new RadioBuffer(NUMCHUNKS, CHUNK * mSPSRx, 0, false);
|
||||||
|
|
||||||
convertSendBuffer[i] = new short[sendBuffer[i]->size() * 2];
|
convertSendBuffer[i] = new short[CHUNK * mSPSTx * 2];
|
||||||
convertRecvBuffer[i] = new short[recvBuffer[i]->size() * 2];
|
convertRecvBuffer[i] = new short[CHUNK * mSPSRx * 2];
|
||||||
|
|
||||||
|
powerScaling[i] = 1.0;
|
||||||
}
|
}
|
||||||
|
|
||||||
sendCursor = 0;
|
|
||||||
recvCursor = 0;
|
|
||||||
|
|
||||||
return true;
|
return true;
|
||||||
}
|
}
|
||||||
|
|
||||||
void RadioInterface::close()
|
void RadioInterface::close()
|
||||||
{
|
{
|
||||||
for (size_t i = 0; i < sendBuffer.size(); i++)
|
|
||||||
delete sendBuffer[i];
|
|
||||||
|
|
||||||
for (size_t i = 0; i < recvBuffer.size(); i++)
|
|
||||||
delete recvBuffer[i];
|
|
||||||
|
|
||||||
for (size_t i = 0; i < convertSendBuffer.size(); i++)
|
|
||||||
delete convertSendBuffer[i];
|
|
||||||
|
|
||||||
for (size_t i = 0; i < convertRecvBuffer.size(); i++)
|
|
||||||
delete convertRecvBuffer[i];
|
|
||||||
|
|
||||||
sendBuffer.resize(0);
|
sendBuffer.resize(0);
|
||||||
recvBuffer.resize(0);
|
recvBuffer.resize(0);
|
||||||
convertSendBuffer.resize(0);
|
convertSendBuffer.resize(0);
|
||||||
@@ -107,60 +89,50 @@ double RadioInterface::fullScaleOutputValue(void) {
|
|||||||
return mRadio->fullScaleOutputValue();
|
return mRadio->fullScaleOutputValue();
|
||||||
}
|
}
|
||||||
|
|
||||||
|
int RadioInterface::setPowerAttenuation(int atten, size_t chan)
|
||||||
void RadioInterface::setPowerAttenuation(double atten, size_t chan)
|
|
||||||
{
|
{
|
||||||
double rfGain, digAtten;
|
double rfGain, digAtten;
|
||||||
|
|
||||||
if (chan >= mChans) {
|
if (chan >= mChans) {
|
||||||
LOG(ALERT) << "Invalid channel requested";
|
LOG(ALERT) << "Invalid channel requested";
|
||||||
return;
|
return -1;
|
||||||
}
|
}
|
||||||
|
|
||||||
rfGain = mRadio->setTxGain(mRadio->maxTxGain() - atten, chan);
|
if (atten < 0.0)
|
||||||
digAtten = atten - mRadio->maxTxGain() + rfGain;
|
atten = 0.0;
|
||||||
|
|
||||||
|
rfGain = mRadio->setTxGain(mRadio->maxTxGain() - (double) atten, chan);
|
||||||
|
digAtten = (double) atten - mRadio->maxTxGain() + rfGain;
|
||||||
|
|
||||||
if (digAtten < 1.0)
|
if (digAtten < 1.0)
|
||||||
powerScaling[chan] = 1.0;
|
powerScaling[chan] = 1.0;
|
||||||
else
|
else
|
||||||
powerScaling[chan] = 1.0 / sqrt(pow(10, digAtten / 10.0));
|
powerScaling[chan] = 1.0 / sqrt(pow(10, digAtten / 10.0));
|
||||||
|
|
||||||
|
return atten;
|
||||||
}
|
}
|
||||||
|
|
||||||
int RadioInterface::radioifyVector(signalVector &wVector,
|
int RadioInterface::radioifyVector(signalVector &wVector,
|
||||||
float *retVector,
|
size_t chan, bool zero)
|
||||||
bool zero)
|
|
||||||
{
|
{
|
||||||
if (zero) {
|
if (zero)
|
||||||
memset(retVector, 0, wVector.size() * 2 * sizeof(float));
|
sendBuffer[chan]->zero(wVector.size());
|
||||||
return wVector.size();
|
else
|
||||||
}
|
sendBuffer[chan]->write((float *) wVector.begin(), wVector.size());
|
||||||
|
|
||||||
memcpy(retVector, wVector.begin(), wVector.size() * 2 * sizeof(float));
|
|
||||||
|
|
||||||
return wVector.size();
|
return wVector.size();
|
||||||
}
|
}
|
||||||
|
|
||||||
int RadioInterface::unRadioifyVector(float *floatVector,
|
int RadioInterface::unRadioifyVector(signalVector *newVector, size_t chan)
|
||||||
signalVector& newVector)
|
|
||||||
{
|
{
|
||||||
signalVector::iterator itr = newVector.begin();
|
if (newVector->size() > recvBuffer[chan]->getAvailSamples()) {
|
||||||
|
|
||||||
if (newVector.size() > recvCursor) {
|
|
||||||
LOG(ALERT) << "Insufficient number of samples in receive buffer";
|
LOG(ALERT) << "Insufficient number of samples in receive buffer";
|
||||||
return -1;
|
return -1;
|
||||||
}
|
}
|
||||||
|
|
||||||
for (size_t i = 0; i < newVector.size(); i++) {
|
recvBuffer[chan]->read((float *) newVector->begin(), newVector->size());
|
||||||
*itr++ = Complex<float>(floatVector[2 * i + 0],
|
|
||||||
floatVector[2 * i + 1]);
|
|
||||||
}
|
|
||||||
|
|
||||||
return newVector.size();
|
return newVector->size();
|
||||||
}
|
|
||||||
|
|
||||||
void RadioInterface::adjustClock(GSM::Time &offset)
|
|
||||||
{
|
|
||||||
mClock.adjust(offset);
|
|
||||||
}
|
}
|
||||||
|
|
||||||
bool RadioInterface::tuneTx(double freq, size_t chan)
|
bool RadioInterface::tuneTx(double freq, size_t chan)
|
||||||
@@ -173,19 +145,25 @@ bool RadioInterface::tuneRx(double freq, size_t chan)
|
|||||||
return mRadio->setRxFreq(freq, chan);
|
return mRadio->setRxFreq(freq, chan);
|
||||||
}
|
}
|
||||||
|
|
||||||
bool RadioInterface::tuneRxOffset(double offset, size_t chan)
|
bool RadioInterface::start()
|
||||||
{
|
{
|
||||||
return mRadio->setRxOffset(offset, chan);
|
if (mOn)
|
||||||
}
|
return true;
|
||||||
|
|
||||||
void RadioInterface::start()
|
LOG(INFO) << "Starting radio device";
|
||||||
{
|
|
||||||
LOG(INFO) << "Starting radio";
|
|
||||||
#ifdef USRP1
|
#ifdef USRP1
|
||||||
mAlignRadioServiceLoopThread.start((void * (*)(void*))AlignRadioServiceLoopAdapter,
|
mAlignRadioServiceLoopThread.start((void * (*)(void*))AlignRadioServiceLoopAdapter,
|
||||||
(void*)this);
|
(void*)this);
|
||||||
#endif
|
#endif
|
||||||
mRadio->start();
|
|
||||||
|
if (!mRadio->start())
|
||||||
|
return false;
|
||||||
|
|
||||||
|
for (size_t i = 0; i < mChans; i++) {
|
||||||
|
sendBuffer[i]->reset();
|
||||||
|
recvBuffer[i]->reset();
|
||||||
|
}
|
||||||
|
|
||||||
writeTimestamp = mRadio->initialWriteTimestamp();
|
writeTimestamp = mRadio->initialWriteTimestamp();
|
||||||
readTimestamp = mRadio->initialReadTimestamp();
|
readTimestamp = mRadio->initialReadTimestamp();
|
||||||
|
|
||||||
@@ -194,6 +172,23 @@ void RadioInterface::start()
|
|||||||
|
|
||||||
mOn = true;
|
mOn = true;
|
||||||
LOG(INFO) << "Radio started";
|
LOG(INFO) << "Radio started";
|
||||||
|
return true;
|
||||||
|
}
|
||||||
|
|
||||||
|
/*
|
||||||
|
* Stop the radio device
|
||||||
|
*
|
||||||
|
* This is a pass-through call to the device interface. Because the underlying
|
||||||
|
* stop command issuance generally doesn't return confirmation on device status,
|
||||||
|
* this call will only return false if the device is already stopped.
|
||||||
|
*/
|
||||||
|
bool RadioInterface::stop()
|
||||||
|
{
|
||||||
|
if (!mOn || !mRadio->stop())
|
||||||
|
return false;
|
||||||
|
|
||||||
|
mOn = false;
|
||||||
|
return true;
|
||||||
}
|
}
|
||||||
|
|
||||||
#ifdef USRP1
|
#ifdef USRP1
|
||||||
@@ -218,14 +213,10 @@ void RadioInterface::driveTransmitRadio(std::vector<signalVector *> &bursts,
|
|||||||
if (!mOn)
|
if (!mOn)
|
||||||
return;
|
return;
|
||||||
|
|
||||||
for (size_t i = 0; i < mChans; i++) {
|
for (size_t i = 0; i < mChans; i++)
|
||||||
radioifyVector(*bursts[i],
|
radioifyVector(*bursts[i], i, zeros[i]);
|
||||||
(float *) (sendBuffer[i]->begin() + sendCursor), zeros[i]);
|
|
||||||
}
|
|
||||||
|
|
||||||
sendCursor += bursts[0]->size();
|
while (pushBuffer());
|
||||||
|
|
||||||
pushBuffer();
|
|
||||||
}
|
}
|
||||||
|
|
||||||
bool RadioInterface::driveReceiveRadio()
|
bool RadioInterface::driveReceiveRadio()
|
||||||
@@ -238,16 +229,16 @@ bool RadioInterface::driveReceiveRadio()
|
|||||||
pullBuffer();
|
pullBuffer();
|
||||||
|
|
||||||
GSM::Time rcvClock = mClock.get();
|
GSM::Time rcvClock = mClock.get();
|
||||||
if (receiveOffset < 0)
|
rcvClock.decTN(receiveOffset);
|
||||||
rcvClock.incTN(-receiveOffset);
|
|
||||||
else
|
|
||||||
rcvClock.decTN(receiveOffset);
|
|
||||||
|
|
||||||
unsigned tN = rcvClock.TN();
|
unsigned tN = rcvClock.TN();
|
||||||
int recvSz = recvCursor;
|
int recvSz = recvBuffer[0]->getAvailSamples();
|
||||||
int readSz = 0;
|
|
||||||
const int symbolsPerSlot = gSlotLen + 8;
|
const int symbolsPerSlot = gSlotLen + 8;
|
||||||
int burstSize = (symbolsPerSlot + (tN % 4 == 0)) * mSPSRx;
|
int burstSize;
|
||||||
|
|
||||||
|
if (mSPSRx == 4)
|
||||||
|
burstSize = 625;
|
||||||
|
else
|
||||||
|
burstSize = symbolsPerSlot + (tN % 4 == 0);
|
||||||
|
|
||||||
/*
|
/*
|
||||||
* Pre-allocate head room for the largest correlation size
|
* Pre-allocate head room for the largest correlation size
|
||||||
@@ -261,13 +252,8 @@ bool RadioInterface::driveReceiveRadio()
|
|||||||
*/
|
*/
|
||||||
while (recvSz > burstSize) {
|
while (recvSz > burstSize) {
|
||||||
for (size_t i = 0; i < mChans; i++) {
|
for (size_t i = 0; i < mChans; i++) {
|
||||||
burst = new radioVector(rcvClock, burstSize, head, mMIMO);
|
burst = new radioVector(rcvClock, burstSize, head);
|
||||||
|
unRadioifyVector(burst->getVector(), i);
|
||||||
for (size_t n = 0; n < mMIMO; n++) {
|
|
||||||
unRadioifyVector((float *)
|
|
||||||
(recvBuffer[mMIMO * i + n]->begin() + readSz),
|
|
||||||
*burst->getVector(n));
|
|
||||||
}
|
|
||||||
|
|
||||||
if (mReceiveFIFO[i].size() < 32)
|
if (mReceiveFIFO[i].size() < 32)
|
||||||
mReceiveFIFO[i].write(burst);
|
mReceiveFIFO[i].write(burst);
|
||||||
@@ -277,22 +263,12 @@ bool RadioInterface::driveReceiveRadio()
|
|||||||
|
|
||||||
mClock.incTN();
|
mClock.incTN();
|
||||||
rcvClock.incTN();
|
rcvClock.incTN();
|
||||||
readSz += burstSize;
|
|
||||||
recvSz -= burstSize;
|
recvSz -= burstSize;
|
||||||
|
|
||||||
tN = rcvClock.TN();
|
tN = rcvClock.TN();
|
||||||
|
|
||||||
burstSize = (symbolsPerSlot + (tN % 4 == 0)) * mSPSRx;
|
if (mSPSRx != 4)
|
||||||
}
|
burstSize = (symbolsPerSlot + (tN % 4 == 0)) * mSPSRx;
|
||||||
|
|
||||||
if (readSz > 0) {
|
|
||||||
for (size_t i = 0; i < recvBuffer.size(); i++) {
|
|
||||||
memmove(recvBuffer[i]->begin(),
|
|
||||||
recvBuffer[i]->begin() + readSz,
|
|
||||||
(recvCursor - readSz) * 2 * sizeof(float));
|
|
||||||
}
|
|
||||||
|
|
||||||
recvCursor -= readSz;
|
|
||||||
}
|
}
|
||||||
|
|
||||||
return true;
|
return true;
|
||||||
@@ -306,12 +282,6 @@ bool RadioInterface::isUnderrun()
|
|||||||
return retVal;
|
return retVal;
|
||||||
}
|
}
|
||||||
|
|
||||||
void RadioInterface::applyOffset(int offset)
|
|
||||||
{
|
|
||||||
shiftOffset += offset;
|
|
||||||
shiftUpdate = true;
|
|
||||||
}
|
|
||||||
|
|
||||||
VectorFIFO* RadioInterface::receiveFIFO(size_t chan)
|
VectorFIFO* RadioInterface::receiveFIFO(size_t chan)
|
||||||
{
|
{
|
||||||
if (chan >= mReceiveFIFO.size())
|
if (chan >= mReceiveFIFO.size())
|
||||||
@@ -322,79 +292,66 @@ VectorFIFO* RadioInterface::receiveFIFO(size_t chan)
|
|||||||
|
|
||||||
double RadioInterface::setRxGain(double dB, size_t chan)
|
double RadioInterface::setRxGain(double dB, size_t chan)
|
||||||
{
|
{
|
||||||
if (mRadio)
|
return mRadio->setRxGain(dB, chan);
|
||||||
return mRadio->setRxGain(dB, chan);
|
|
||||||
else
|
|
||||||
return -1;
|
|
||||||
}
|
}
|
||||||
|
|
||||||
double RadioInterface::getRxGain(size_t chan)
|
double RadioInterface::getRxGain(size_t chan)
|
||||||
{
|
{
|
||||||
if (mRadio)
|
return mRadio->getRxGain(chan);
|
||||||
return mRadio->getRxGain(chan);
|
|
||||||
else
|
|
||||||
return -1;
|
|
||||||
}
|
}
|
||||||
|
|
||||||
/* Receive a timestamped chunk from the device */
|
/* Receive a timestamped chunk from the device */
|
||||||
void RadioInterface::pullBuffer()
|
void RadioInterface::pullBuffer()
|
||||||
{
|
{
|
||||||
bool local_underrun;
|
bool local_underrun;
|
||||||
int num_recv;
|
size_t numRecv, segmentLen = recvBuffer[0]->getSegmentLen();
|
||||||
float *output;
|
|
||||||
|
|
||||||
if (recvCursor > recvBuffer[0]->size() - CHUNK)
|
if (recvBuffer[0]->getFreeSegments() <= 0)
|
||||||
return;
|
return;
|
||||||
|
|
||||||
/* Outer buffer access size is fixed */
|
/* Outer buffer access size is fixed */
|
||||||
num_recv = mRadio->readSamples(convertRecvBuffer,
|
numRecv = mRadio->readSamples(convertRecvBuffer,
|
||||||
CHUNK,
|
segmentLen,
|
||||||
&overrun,
|
&overrun,
|
||||||
readTimestamp + shiftOffset,
|
readTimestamp,
|
||||||
&local_underrun);
|
&local_underrun);
|
||||||
if (num_recv != CHUNK) {
|
|
||||||
LOG(ALERT) << "Receive error " << num_recv;
|
if (numRecv != segmentLen) {
|
||||||
|
LOG(ALERT) << "Receive error " << numRecv;
|
||||||
return;
|
return;
|
||||||
}
|
}
|
||||||
|
|
||||||
for (size_t i = 0; i < mChans; i++) {
|
for (size_t i = 0; i < mChans; i++) {
|
||||||
output = (float *) (recvBuffer[i]->begin() + recvCursor);
|
convert_short_float(recvBuffer[i]->getWriteSegment(),
|
||||||
convert_short_float(output, convertRecvBuffer[i], 2 * num_recv);
|
convertRecvBuffer[i],
|
||||||
|
segmentLen * 2);
|
||||||
}
|
}
|
||||||
|
|
||||||
underrun |= local_underrun;
|
underrun |= local_underrun;
|
||||||
|
readTimestamp += numRecv;
|
||||||
readTimestamp += num_recv;
|
|
||||||
recvCursor += num_recv;
|
|
||||||
}
|
}
|
||||||
|
|
||||||
/* Send timestamped chunk to the device with arbitrary size */
|
/* Send timestamped chunk to the device with arbitrary size */
|
||||||
void RadioInterface::pushBuffer()
|
bool RadioInterface::pushBuffer()
|
||||||
{
|
{
|
||||||
int num_sent;
|
size_t numSent, segmentLen = sendBuffer[0]->getSegmentLen();
|
||||||
|
|
||||||
if (sendCursor < CHUNK)
|
if (sendBuffer[0]->getAvailSegments() < 1)
|
||||||
return;
|
return false;
|
||||||
|
|
||||||
if (sendCursor > sendBuffer[0]->size())
|
|
||||||
LOG(ALERT) << "Send buffer overflow";
|
|
||||||
|
|
||||||
for (size_t i = 0; i < mChans; i++) {
|
for (size_t i = 0; i < mChans; i++) {
|
||||||
convert_float_short(convertSendBuffer[i],
|
convert_float_short(convertSendBuffer[i],
|
||||||
(float *) sendBuffer[i]->begin(),
|
(float *) sendBuffer[i]->getReadSegment(),
|
||||||
powerScaling[i], 2 * sendCursor);
|
powerScaling[i],
|
||||||
|
segmentLen * 2);
|
||||||
}
|
}
|
||||||
|
|
||||||
if (shiftUpdate) {
|
/* Send the all samples in the send buffer */
|
||||||
mRadio->updateAlignment(0);
|
numSent = mRadio->writeSamples(convertSendBuffer,
|
||||||
shiftUpdate = false;
|
segmentLen,
|
||||||
}
|
&underrun,
|
||||||
|
writeTimestamp);
|
||||||
|
writeTimestamp += numSent;
|
||||||
|
|
||||||
/* Send the all samples in the send buffer */
|
return true;
|
||||||
num_sent = mRadio->writeSamples(convertSendBuffer,
|
|
||||||
sendCursor,
|
|
||||||
&underrun,
|
|
||||||
writeTimestamp + mSPSTx * shiftOffset);
|
|
||||||
writeTimestamp += num_sent;
|
|
||||||
sendCursor = 0;
|
|
||||||
}
|
}
|
||||||
|
|||||||
@@ -20,7 +20,10 @@
|
|||||||
#include "radioDevice.h"
|
#include "radioDevice.h"
|
||||||
#include "radioVector.h"
|
#include "radioVector.h"
|
||||||
#include "radioClock.h"
|
#include "radioClock.h"
|
||||||
|
#include "radioBuffer.h"
|
||||||
#include "Resampler.h"
|
#include "Resampler.h"
|
||||||
|
#include "Channelizer.h"
|
||||||
|
#include "Synthesis.h"
|
||||||
|
|
||||||
static const unsigned gSlotLen = 148; ///< number of symbols per slot, not counting guard periods
|
static const unsigned gSlotLen = 148; ///< number of symbols per slot, not counting guard periods
|
||||||
|
|
||||||
@@ -38,12 +41,9 @@ protected:
|
|||||||
size_t mSPSTx;
|
size_t mSPSTx;
|
||||||
size_t mSPSRx;
|
size_t mSPSRx;
|
||||||
size_t mChans;
|
size_t mChans;
|
||||||
size_t mMIMO;
|
|
||||||
|
|
||||||
std::vector<signalVector *> sendBuffer;
|
std::vector<RadioBuffer *> sendBuffer;
|
||||||
std::vector<signalVector *> recvBuffer;
|
std::vector<RadioBuffer *> recvBuffer;
|
||||||
unsigned sendCursor;
|
|
||||||
unsigned recvCursor;
|
|
||||||
|
|
||||||
std::vector<short *> convertRecvBuffer;
|
std::vector<short *> convertRecvBuffer;
|
||||||
std::vector<short *> convertSendBuffer;
|
std::vector<short *> convertSendBuffer;
|
||||||
@@ -56,22 +56,19 @@ protected:
|
|||||||
RadioClock mClock; ///< the basestation clock!
|
RadioClock mClock; ///< the basestation clock!
|
||||||
|
|
||||||
int receiveOffset; ///< offset b/w transmit and receive GSM timestamps, in timeslots
|
int receiveOffset; ///< offset b/w transmit and receive GSM timestamps, in timeslots
|
||||||
int shiftOffset;
|
|
||||||
bool shiftUpdate;
|
|
||||||
bool mOn; ///< indicates radio is on
|
bool mOn; ///< indicates radio is on
|
||||||
|
|
||||||
private:
|
private:
|
||||||
|
|
||||||
/** format samples to USRP */
|
/** format samples to USRP */
|
||||||
int radioifyVector(signalVector &wVector,
|
int radioifyVector(signalVector &wVector, size_t chan, bool zero);
|
||||||
float *floatVector,
|
|
||||||
bool zero);
|
|
||||||
|
|
||||||
/** format samples from USRP */
|
/** format samples from USRP */
|
||||||
int unRadioifyVector(float *floatVector, signalVector &wVector);
|
int unRadioifyVector(signalVector *wVector, size_t chan);
|
||||||
|
|
||||||
/** push GSM bursts into the transmit buffer */
|
/** push GSM bursts into the transmit buffer */
|
||||||
virtual void pushBuffer(void);
|
virtual bool pushBuffer(void);
|
||||||
|
|
||||||
/** pull GSM bursts from the receive buffer */
|
/** pull GSM bursts from the receive buffer */
|
||||||
virtual void pullBuffer(void);
|
virtual void pullBuffer(void);
|
||||||
@@ -79,23 +76,23 @@ private:
|
|||||||
public:
|
public:
|
||||||
|
|
||||||
/** start the interface */
|
/** start the interface */
|
||||||
void start();
|
bool start();
|
||||||
|
bool stop();
|
||||||
|
|
||||||
/** intialization */
|
/** intialization */
|
||||||
virtual bool init(int type);
|
virtual bool init(int type);
|
||||||
virtual void close();
|
virtual void close();
|
||||||
|
|
||||||
/** constructor */
|
/** constructor */
|
||||||
RadioInterface(RadioDevice* wRadio = NULL,
|
RadioInterface(RadioDevice* wRadio, size_t tx_sps, size_t rx_sps,
|
||||||
size_t sps = 4, size_t chans = 1, size_t diversity = 1,
|
size_t chans = 1, int receiveOffset = 3,
|
||||||
int receiveOffset = 3, GSM::Time wStartTime = GSM::Time(0));
|
GSM::Time wStartTime = GSM::Time(0));
|
||||||
|
|
||||||
/** destructor */
|
/** destructor */
|
||||||
virtual ~RadioInterface();
|
virtual ~RadioInterface();
|
||||||
|
|
||||||
/** check for underrun, resets underrun value */
|
/** check for underrun, resets underrun value */
|
||||||
bool isUnderrun();
|
bool isUnderrun();
|
||||||
void applyOffset(int offset);
|
|
||||||
|
|
||||||
/** return the receive FIFO */
|
/** return the receive FIFO */
|
||||||
VectorFIFO* receiveFIFO(size_t chan = 0);
|
VectorFIFO* receiveFIFO(size_t chan = 0);
|
||||||
@@ -103,18 +100,12 @@ public:
|
|||||||
/** return the basestation clock */
|
/** return the basestation clock */
|
||||||
RadioClock* getClock(void) { return &mClock;};
|
RadioClock* getClock(void) { return &mClock;};
|
||||||
|
|
||||||
/** apply an offset to the main clock */
|
|
||||||
void adjustClock(GSM::Time &offset);
|
|
||||||
|
|
||||||
/** set transmit frequency */
|
/** set transmit frequency */
|
||||||
bool tuneTx(double freq, size_t chan = 0);
|
virtual bool tuneTx(double freq, size_t chan = 0);
|
||||||
|
|
||||||
/** set receive frequency */
|
/** set receive frequency */
|
||||||
virtual bool tuneRx(double freq, size_t chan = 0);
|
virtual bool tuneRx(double freq, size_t chan = 0);
|
||||||
|
|
||||||
/** set frequency correction */
|
|
||||||
virtual bool tuneRxOffset(double offset, size_t chan = 0);
|
|
||||||
|
|
||||||
/** set receive gain */
|
/** set receive gain */
|
||||||
double setRxGain(double dB, size_t chan = 0);
|
double setRxGain(double dB, size_t chan = 0);
|
||||||
|
|
||||||
@@ -128,7 +119,7 @@ public:
|
|||||||
/** drive reception of GSM bursts */
|
/** drive reception of GSM bursts */
|
||||||
bool driveReceiveRadio();
|
bool driveReceiveRadio();
|
||||||
|
|
||||||
void setPowerAttenuation(double atten, size_t chan = 0);
|
int setPowerAttenuation(int atten, size_t chan = 0);
|
||||||
|
|
||||||
/** returns the full-scale transmit amplitude **/
|
/** returns the full-scale transmit amplitude **/
|
||||||
double fullScaleInputValue();
|
double fullScaleInputValue();
|
||||||
@@ -158,45 +149,45 @@ void *AlignRadioServiceLoopAdapter(RadioInterface*);
|
|||||||
#endif
|
#endif
|
||||||
|
|
||||||
class RadioInterfaceResamp : public RadioInterface {
|
class RadioInterfaceResamp : public RadioInterface {
|
||||||
|
|
||||||
private:
|
private:
|
||||||
signalVector *innerSendBuffer;
|
|
||||||
signalVector *outerSendBuffer;
|
signalVector *outerSendBuffer;
|
||||||
signalVector *innerRecvBuffer;
|
|
||||||
signalVector *outerRecvBuffer;
|
signalVector *outerRecvBuffer;
|
||||||
|
|
||||||
void pushBuffer();
|
bool pushBuffer();
|
||||||
void pullBuffer();
|
void pullBuffer();
|
||||||
|
|
||||||
public:
|
public:
|
||||||
|
RadioInterfaceResamp(RadioDevice* wRadio, size_t tx_sps, size_t rx_sps);
|
||||||
RadioInterfaceResamp(RadioDevice* wRadio, size_t wSPS = 4, size_t chans = 1);
|
|
||||||
|
|
||||||
~RadioInterfaceResamp();
|
~RadioInterfaceResamp();
|
||||||
|
|
||||||
bool init(int type);
|
bool init(int type);
|
||||||
void close();
|
void close();
|
||||||
};
|
};
|
||||||
|
|
||||||
class RadioInterfaceDiversity : public RadioInterface {
|
class RadioInterfaceMulti : public RadioInterface {
|
||||||
public:
|
private:
|
||||||
RadioInterfaceDiversity(RadioDevice* wRadio,
|
bool pushBuffer();
|
||||||
size_t sps = 4, size_t chans = 2);
|
void pullBuffer();
|
||||||
|
|
||||||
~RadioInterfaceDiversity();
|
signalVector *outerSendBuffer;
|
||||||
|
signalVector *outerRecvBuffer;
|
||||||
|
std::vector<signalVector *> history;
|
||||||
|
std::vector<bool> active;
|
||||||
|
|
||||||
|
Resampler *dnsampler;
|
||||||
|
Resampler *upsampler;
|
||||||
|
Channelizer *channelizer;
|
||||||
|
Synthesis *synthesis;
|
||||||
|
|
||||||
|
public:
|
||||||
|
RadioInterfaceMulti(RadioDevice* radio, size_t tx_sps,
|
||||||
|
size_t rx_sps, size_t chans = 1);
|
||||||
|
~RadioInterfaceMulti();
|
||||||
|
|
||||||
bool init(int type);
|
bool init(int type);
|
||||||
void close();
|
void close();
|
||||||
|
|
||||||
|
bool tuneTx(double freq, size_t chan);
|
||||||
bool tuneRx(double freq, size_t chan);
|
bool tuneRx(double freq, size_t chan);
|
||||||
|
double setRxGain(double dB, size_t chan);
|
||||||
private:
|
|
||||||
std::vector<Resampler *> dnsamplers;
|
|
||||||
std::vector<float> phases;
|
|
||||||
signalVector *outerRecvBuffer;
|
|
||||||
|
|
||||||
bool mDiversity;
|
|
||||||
double mFreqSpacing;
|
|
||||||
|
|
||||||
bool setupDiversityChannels();
|
|
||||||
void pullBuffer();
|
|
||||||
};
|
};
|
||||||
|
|||||||
@@ -1,248 +0,0 @@
|
|||||||
/*
|
|
||||||
* SSE Convolution
|
|
||||||
* Copyright (C) 2013 Thomas Tsou <tom@tsou.cc>
|
|
||||||
*
|
|
||||||
* This library is free software; you can redistribute it and/or
|
|
||||||
* modify it under the terms of the GNU Lesser General Public
|
|
||||||
* License as published by the Free Software Foundation; either
|
|
||||||
* version 2.1 of the License, or (at your option) any later version.
|
|
||||||
*
|
|
||||||
* This library is distributed in the hope that it will be useful,
|
|
||||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
||||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
||||||
* Lesser General Public License for more details.
|
|
||||||
*
|
|
||||||
* You should have received a copy of the GNU Lesser General Public
|
|
||||||
* License along with this library; if not, write to the Free Software
|
|
||||||
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
|
|
||||||
*/
|
|
||||||
|
|
||||||
#include <radioInterface.h>
|
|
||||||
#include <Logger.h>
|
|
||||||
|
|
||||||
#include "Resampler.h"
|
|
||||||
|
|
||||||
extern "C" {
|
|
||||||
#include "convert.h"
|
|
||||||
}
|
|
||||||
|
|
||||||
/* Resampling parameters for 64 MHz clocking */
|
|
||||||
#define RESAMP_64M_INRATE 20
|
|
||||||
#define RESAMP_64M_OUTRATE 80
|
|
||||||
|
|
||||||
/* Downlink block size */
|
|
||||||
#define CHUNK 625
|
|
||||||
|
|
||||||
/* Universal resampling parameters */
|
|
||||||
#define NUMCHUNKS 48
|
|
||||||
|
|
||||||
/*
|
|
||||||
* Resampling filter bandwidth scaling factor
|
|
||||||
* This narrows the filter cutoff relative to the output bandwidth
|
|
||||||
* of the polyphase resampler. At 4 samples-per-symbol using the
|
|
||||||
* 2 pulse Laurent GMSK approximation gives us below 0.5 degrees
|
|
||||||
* RMS phase error at the resampler output.
|
|
||||||
*/
|
|
||||||
#define RESAMP_TX4_FILTER 0.45
|
|
||||||
|
|
||||||
static size_t resamp_inrate = 0;
|
|
||||||
static size_t resamp_inchunk = 0;
|
|
||||||
static size_t resamp_outrate = 0;
|
|
||||||
static size_t resamp_outchunk = 0;
|
|
||||||
|
|
||||||
RadioInterfaceDiversity::RadioInterfaceDiversity(RadioDevice *wRadio,
|
|
||||||
size_t sps, size_t chans)
|
|
||||||
: RadioInterface(wRadio, sps, chans, 2), outerRecvBuffer(NULL),
|
|
||||||
mDiversity(false), mFreqSpacing(0.0)
|
|
||||||
{
|
|
||||||
}
|
|
||||||
|
|
||||||
RadioInterfaceDiversity::~RadioInterfaceDiversity()
|
|
||||||
{
|
|
||||||
close();
|
|
||||||
}
|
|
||||||
|
|
||||||
void RadioInterfaceDiversity::close()
|
|
||||||
{
|
|
||||||
delete outerRecvBuffer;
|
|
||||||
|
|
||||||
outerRecvBuffer = NULL;
|
|
||||||
|
|
||||||
for (size_t i = 0; i < dnsamplers.size(); i++) {
|
|
||||||
delete dnsamplers[i];
|
|
||||||
dnsamplers[i] = NULL;
|
|
||||||
}
|
|
||||||
|
|
||||||
if (recvBuffer.size())
|
|
||||||
recvBuffer[0] = NULL;
|
|
||||||
|
|
||||||
RadioInterface::close();
|
|
||||||
}
|
|
||||||
|
|
||||||
bool RadioInterfaceDiversity::setupDiversityChannels()
|
|
||||||
{
|
|
||||||
size_t inner_rx_len;
|
|
||||||
|
|
||||||
/* Inner and outer rates */
|
|
||||||
resamp_inrate = RESAMP_64M_INRATE;
|
|
||||||
resamp_outrate = RESAMP_64M_OUTRATE;
|
|
||||||
resamp_inchunk = resamp_inrate * 4;
|
|
||||||
resamp_outchunk = resamp_outrate * 4;
|
|
||||||
|
|
||||||
/* Buffer lengths */
|
|
||||||
inner_rx_len = NUMCHUNKS * resamp_inchunk;
|
|
||||||
|
|
||||||
/* Inside buffer must hold at least 2 bursts */
|
|
||||||
if (inner_rx_len < 157 * mSPSRx * 2) {
|
|
||||||
LOG(ALERT) << "Invalid inner buffer size " << inner_rx_len;
|
|
||||||
return false;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* One Receive buffer and downsampler per diversity channel */
|
|
||||||
for (size_t i = 0; i < mMIMO * mChans; i++) {
|
|
||||||
dnsamplers[i] = new Resampler(resamp_inrate, resamp_outrate);
|
|
||||||
if (!dnsamplers[i]->init()) {
|
|
||||||
LOG(ALERT) << "Rx resampler failed to initialize";
|
|
||||||
return false;
|
|
||||||
}
|
|
||||||
|
|
||||||
recvBuffer[i] = new signalVector(inner_rx_len);
|
|
||||||
}
|
|
||||||
|
|
||||||
return true;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* Initialize I/O specific objects */
|
|
||||||
bool RadioInterfaceDiversity::init(int type)
|
|
||||||
{
|
|
||||||
int tx_len, outer_rx_len;
|
|
||||||
|
|
||||||
if ((mMIMO != 2) || (mChans != 2)) {
|
|
||||||
LOG(ALERT) << "Unsupported channel configuration " << mChans;
|
|
||||||
return false;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* Resize for channel combination */
|
|
||||||
sendBuffer.resize(mChans);
|
|
||||||
recvBuffer.resize(mChans * mMIMO);
|
|
||||||
convertSendBuffer.resize(mChans);
|
|
||||||
convertRecvBuffer.resize(mChans);
|
|
||||||
mReceiveFIFO.resize(mChans);
|
|
||||||
dnsamplers.resize(mChans * mMIMO);
|
|
||||||
phases.resize(mChans);
|
|
||||||
|
|
||||||
if (!setupDiversityChannels())
|
|
||||||
return false;
|
|
||||||
|
|
||||||
tx_len = CHUNK * mSPSTx;
|
|
||||||
outer_rx_len = resamp_outchunk;
|
|
||||||
|
|
||||||
for (size_t i = 0; i < mChans; i++) {
|
|
||||||
/* Full rate float and integer outer receive buffers */
|
|
||||||
convertRecvBuffer[i] = new short[outer_rx_len * 2];
|
|
||||||
|
|
||||||
/* Send buffers (not-resampled) */
|
|
||||||
sendBuffer[i] = new signalVector(tx_len);
|
|
||||||
convertSendBuffer[i] = new short[tx_len * 2];
|
|
||||||
}
|
|
||||||
|
|
||||||
outerRecvBuffer = new signalVector(outer_rx_len, dnsamplers[0]->len());
|
|
||||||
|
|
||||||
return true;
|
|
||||||
}
|
|
||||||
|
|
||||||
bool RadioInterfaceDiversity::tuneRx(double freq, size_t chan)
|
|
||||||
{
|
|
||||||
double f0, f1;
|
|
||||||
|
|
||||||
if (chan > 1)
|
|
||||||
return false;
|
|
||||||
|
|
||||||
if (!mRadio->setRxFreq(freq, chan))
|
|
||||||
return false;
|
|
||||||
|
|
||||||
f0 = mRadio->getRxFreq(0);
|
|
||||||
f1 = mRadio->getRxFreq(1);
|
|
||||||
|
|
||||||
mFreqSpacing = f1 - f0;
|
|
||||||
|
|
||||||
if (abs(mFreqSpacing) <= 600e3)
|
|
||||||
mDiversity = true;
|
|
||||||
else
|
|
||||||
mDiversity = false;
|
|
||||||
|
|
||||||
return true;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* Receive a timestamped chunk from the device */
|
|
||||||
void RadioInterfaceDiversity::pullBuffer()
|
|
||||||
{
|
|
||||||
bool local_underrun;
|
|
||||||
int rc, num, path0, path1;
|
|
||||||
signalVector *shift, *base;
|
|
||||||
float *in, *out, rate = -mFreqSpacing * 2.0 * M_PI / 1.08333333e6;
|
|
||||||
|
|
||||||
if (recvCursor > recvBuffer[0]->size() - resamp_inchunk)
|
|
||||||
return;
|
|
||||||
|
|
||||||
/* Outer buffer access size is fixed */
|
|
||||||
num = mRadio->readSamples(convertRecvBuffer,
|
|
||||||
resamp_outchunk,
|
|
||||||
&overrun,
|
|
||||||
readTimestamp + shiftOffset,
|
|
||||||
&local_underrun);
|
|
||||||
if ((size_t) num != resamp_outchunk) {
|
|
||||||
LOG(ALERT) << "Receive error " << num;
|
|
||||||
return;
|
|
||||||
}
|
|
||||||
|
|
||||||
for (size_t i = 0; i < mChans; i++) {
|
|
||||||
convert_short_float((float *) outerRecvBuffer->begin(),
|
|
||||||
convertRecvBuffer[i], 2 * resamp_outchunk);
|
|
||||||
|
|
||||||
if (!i) {
|
|
||||||
path0 = 0;
|
|
||||||
path1 = 2;
|
|
||||||
} else {
|
|
||||||
path0 = 3;
|
|
||||||
path1 = 1;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* Diversity path 1 */
|
|
||||||
base = outerRecvBuffer;
|
|
||||||
in = (float *) base->begin();
|
|
||||||
out = (float *) (recvBuffer[path0]->begin() + recvCursor);
|
|
||||||
|
|
||||||
rc = dnsamplers[2 * i + 0]->rotate(in, resamp_outchunk,
|
|
||||||
out, resamp_inchunk);
|
|
||||||
if (rc < 0) {
|
|
||||||
LOG(ALERT) << "Sample rate downsampling error";
|
|
||||||
}
|
|
||||||
|
|
||||||
/* Enable path 2 if Nyquist bandwidth is sufficient */
|
|
||||||
if (!mDiversity)
|
|
||||||
continue;
|
|
||||||
|
|
||||||
/* Diversity path 2 */
|
|
||||||
shift = new signalVector(base->size(), base->getStart());
|
|
||||||
in = (float *) shift->begin();
|
|
||||||
out = (float *) (recvBuffer[path1]->begin() + recvCursor);
|
|
||||||
|
|
||||||
rate = i ? -rate : rate;
|
|
||||||
if (!frequencyShift(shift, base, rate, phases[i], &phases[i])) {
|
|
||||||
LOG(ALERT) << "Frequency shift failed";
|
|
||||||
}
|
|
||||||
|
|
||||||
rc = dnsamplers[2 * i + 1]->rotate(in, resamp_outchunk,
|
|
||||||
out, resamp_inchunk);
|
|
||||||
if (rc < 0) {
|
|
||||||
LOG(ALERT) << "Sample rate downsampling error";
|
|
||||||
}
|
|
||||||
|
|
||||||
delete shift;
|
|
||||||
}
|
|
||||||
|
|
||||||
underrun |= local_underrun;
|
|
||||||
readTimestamp += (TIMESTAMP) resamp_outchunk;
|
|
||||||
recvCursor += resamp_inchunk;
|
|
||||||
}
|
|
||||||
391
Transceiver52M/radioInterfaceMulti.cpp
Normal file
391
Transceiver52M/radioInterfaceMulti.cpp
Normal file
@@ -0,0 +1,391 @@
|
|||||||
|
/*
|
||||||
|
* Multi-carrier radio interface
|
||||||
|
*
|
||||||
|
* Copyright (C) 2016 Ettus Research LLC
|
||||||
|
*
|
||||||
|
* Author: Tom Tsou <tom.tsou@ettus.com>
|
||||||
|
*
|
||||||
|
* This program is free software: you can redistribute it and/or modify
|
||||||
|
* it under the terms of the GNU Affero General Public License as published by
|
||||||
|
* the Free Software Foundation, either version 3 of the License, or
|
||||||
|
* (at your option) any later version.
|
||||||
|
*
|
||||||
|
* This program is distributed in the hope that it will be useful,
|
||||||
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||||
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||||
|
* GNU Affero General Public License for more details.
|
||||||
|
*
|
||||||
|
* You should have received a copy of the GNU Affero General Public License
|
||||||
|
* along with this program. If not, see <http://www.gnu.org/licenses/>.
|
||||||
|
* See the COPYING file in the main directory for details.
|
||||||
|
*/
|
||||||
|
|
||||||
|
#include <radioInterface.h>
|
||||||
|
#include <Logger.h>
|
||||||
|
|
||||||
|
#include "Resampler.h"
|
||||||
|
|
||||||
|
extern "C" {
|
||||||
|
#include "convert.h"
|
||||||
|
}
|
||||||
|
|
||||||
|
/* Resampling parameters for 64 MHz clocking */
|
||||||
|
#define RESAMP_INRATE 65
|
||||||
|
#define RESAMP_OUTRATE (96 / 2)
|
||||||
|
|
||||||
|
/* Universal resampling parameters */
|
||||||
|
#define NUMCHUNKS 24
|
||||||
|
|
||||||
|
#define MCHANS 4
|
||||||
|
|
||||||
|
RadioInterfaceMulti::RadioInterfaceMulti(RadioDevice *radio, size_t tx_sps,
|
||||||
|
size_t rx_sps, size_t chans)
|
||||||
|
: RadioInterface(radio, tx_sps, rx_sps, chans),
|
||||||
|
outerSendBuffer(NULL), outerRecvBuffer(NULL),
|
||||||
|
dnsampler(NULL), upsampler(NULL), channelizer(NULL), synthesis(NULL)
|
||||||
|
{
|
||||||
|
}
|
||||||
|
|
||||||
|
RadioInterfaceMulti::~RadioInterfaceMulti()
|
||||||
|
{
|
||||||
|
close();
|
||||||
|
}
|
||||||
|
|
||||||
|
void RadioInterfaceMulti::close()
|
||||||
|
{
|
||||||
|
delete outerSendBuffer;
|
||||||
|
delete outerRecvBuffer;
|
||||||
|
delete dnsampler;
|
||||||
|
delete upsampler;
|
||||||
|
delete channelizer;
|
||||||
|
delete synthesis;
|
||||||
|
|
||||||
|
outerSendBuffer = NULL;
|
||||||
|
outerRecvBuffer = NULL;
|
||||||
|
dnsampler = NULL;
|
||||||
|
upsampler = NULL;
|
||||||
|
channelizer = NULL;
|
||||||
|
synthesis = NULL;
|
||||||
|
|
||||||
|
mReceiveFIFO.resize(0);
|
||||||
|
powerScaling.resize(0);
|
||||||
|
history.resize(0);
|
||||||
|
active.resize(0);
|
||||||
|
|
||||||
|
RadioInterface::close();
|
||||||
|
}
|
||||||
|
|
||||||
|
static int getLogicalChan(size_t pchan, size_t chans)
|
||||||
|
{
|
||||||
|
switch (chans) {
|
||||||
|
case 1:
|
||||||
|
if (pchan == 0)
|
||||||
|
return 0;
|
||||||
|
else
|
||||||
|
return -1;
|
||||||
|
break;
|
||||||
|
case 2:
|
||||||
|
if (pchan == 0)
|
||||||
|
return 0;
|
||||||
|
if (pchan == 3)
|
||||||
|
return 1;
|
||||||
|
else
|
||||||
|
return -1;
|
||||||
|
break;
|
||||||
|
case 3:
|
||||||
|
if (pchan == 1)
|
||||||
|
return 0;
|
||||||
|
if (pchan == 0)
|
||||||
|
return 1;
|
||||||
|
if (pchan == 3)
|
||||||
|
return 2;
|
||||||
|
else
|
||||||
|
return -1;
|
||||||
|
break;
|
||||||
|
default:
|
||||||
|
break;
|
||||||
|
};
|
||||||
|
|
||||||
|
return -1;
|
||||||
|
}
|
||||||
|
|
||||||
|
static int getFreqShift(size_t chans)
|
||||||
|
{
|
||||||
|
switch (chans) {
|
||||||
|
case 1:
|
||||||
|
return 0;
|
||||||
|
case 2:
|
||||||
|
return 0;
|
||||||
|
case 3:
|
||||||
|
return 1;
|
||||||
|
default:
|
||||||
|
break;
|
||||||
|
};
|
||||||
|
|
||||||
|
return -1;
|
||||||
|
}
|
||||||
|
|
||||||
|
/* Initialize I/O specific objects */
|
||||||
|
bool RadioInterfaceMulti::init(int type)
|
||||||
|
{
|
||||||
|
float cutoff = 1.0f;
|
||||||
|
size_t inchunk = 0, outchunk = 0;
|
||||||
|
|
||||||
|
if (mChans > MCHANS - 1) {
|
||||||
|
LOG(ALERT) << "Invalid channel configuration " << mChans;
|
||||||
|
return false;
|
||||||
|
}
|
||||||
|
|
||||||
|
close();
|
||||||
|
|
||||||
|
sendBuffer.resize(mChans);
|
||||||
|
recvBuffer.resize(mChans);
|
||||||
|
convertSendBuffer.resize(1);
|
||||||
|
convertRecvBuffer.resize(1);
|
||||||
|
|
||||||
|
mReceiveFIFO.resize(mChans);
|
||||||
|
powerScaling.resize(mChans);
|
||||||
|
history.resize(mChans);
|
||||||
|
active.resize(MCHANS, false);
|
||||||
|
|
||||||
|
inchunk = RESAMP_INRATE * 4;
|
||||||
|
outchunk = RESAMP_OUTRATE * 4;
|
||||||
|
|
||||||
|
if (inchunk * NUMCHUNKS < 625 * 2) {
|
||||||
|
LOG(ALERT) << "Invalid inner chunk size " << inchunk;
|
||||||
|
return false;
|
||||||
|
}
|
||||||
|
|
||||||
|
dnsampler = new Resampler(RESAMP_INRATE, RESAMP_OUTRATE);
|
||||||
|
if (!dnsampler->init(1.0)) {
|
||||||
|
LOG(ALERT) << "Rx resampler failed to initialize";
|
||||||
|
return false;
|
||||||
|
}
|
||||||
|
|
||||||
|
upsampler = new Resampler(RESAMP_OUTRATE, RESAMP_INRATE);
|
||||||
|
if (!upsampler->init(cutoff)) {
|
||||||
|
LOG(ALERT) << "Tx resampler failed to initialize";
|
||||||
|
return false;
|
||||||
|
}
|
||||||
|
|
||||||
|
channelizer = new Channelizer(MCHANS, outchunk);
|
||||||
|
if (!channelizer->init()) {
|
||||||
|
LOG(ALERT) << "Rx channelizer failed to initialize";
|
||||||
|
return false;
|
||||||
|
}
|
||||||
|
|
||||||
|
synthesis = new Synthesis(MCHANS, outchunk);
|
||||||
|
if (!synthesis->init()) {
|
||||||
|
LOG(ALERT) << "Tx synthesis filter failed to initialize";
|
||||||
|
return false;
|
||||||
|
}
|
||||||
|
|
||||||
|
/*
|
||||||
|
* Allocate high and low rate buffers. The high rate receive
|
||||||
|
* buffer and low rate transmit vectors feed into the resampler
|
||||||
|
* and requires headroom equivalent to the filter length. Low
|
||||||
|
* rate buffers are allocated in the main radio interface code.
|
||||||
|
*/
|
||||||
|
for (size_t i = 0; i < mChans; i++) {
|
||||||
|
sendBuffer[i] = new RadioBuffer(NUMCHUNKS, inchunk,
|
||||||
|
upsampler->len(), true);
|
||||||
|
recvBuffer[i] = new RadioBuffer(NUMCHUNKS, inchunk,
|
||||||
|
0, false);
|
||||||
|
history[i] = new signalVector(dnsampler->len());
|
||||||
|
|
||||||
|
synthesis->resetBuffer(i);
|
||||||
|
}
|
||||||
|
|
||||||
|
outerSendBuffer = new signalVector(synthesis->outputLen());
|
||||||
|
outerRecvBuffer = new signalVector(channelizer->inputLen());
|
||||||
|
|
||||||
|
convertSendBuffer[0] = new short[2 * synthesis->outputLen()];
|
||||||
|
convertRecvBuffer[0] = new short[2 * channelizer->inputLen()];
|
||||||
|
|
||||||
|
/* Configure channels */
|
||||||
|
switch (mChans) {
|
||||||
|
case 1:
|
||||||
|
active[0] = true;
|
||||||
|
break;
|
||||||
|
case 2:
|
||||||
|
active[0] = true;
|
||||||
|
active[3] = true;
|
||||||
|
break;
|
||||||
|
case 3:
|
||||||
|
active[0] = true;
|
||||||
|
active[1] = true;
|
||||||
|
active[3] = true;
|
||||||
|
break;
|
||||||
|
default:
|
||||||
|
LOG(ALERT) << "Unsupported channel combination";
|
||||||
|
return false;
|
||||||
|
}
|
||||||
|
|
||||||
|
return true;
|
||||||
|
}
|
||||||
|
|
||||||
|
/* Receive a timestamped chunk from the device */
|
||||||
|
void RadioInterfaceMulti::pullBuffer()
|
||||||
|
{
|
||||||
|
bool local_underrun;
|
||||||
|
size_t num;
|
||||||
|
float *buf;
|
||||||
|
|
||||||
|
if (recvBuffer[0]->getFreeSegments() <= 0)
|
||||||
|
return;
|
||||||
|
|
||||||
|
/* Outer buffer access size is fixed */
|
||||||
|
num = mRadio->readSamples(convertRecvBuffer,
|
||||||
|
outerRecvBuffer->size(),
|
||||||
|
&overrun,
|
||||||
|
readTimestamp,
|
||||||
|
&local_underrun);
|
||||||
|
if (num != channelizer->inputLen()) {
|
||||||
|
LOG(ALERT) << "Receive error " << num << ", " << channelizer->inputLen();
|
||||||
|
return;
|
||||||
|
}
|
||||||
|
|
||||||
|
convert_short_float((float *) outerRecvBuffer->begin(),
|
||||||
|
convertRecvBuffer[0], 2 * outerRecvBuffer->size());
|
||||||
|
|
||||||
|
underrun |= local_underrun;
|
||||||
|
readTimestamp += num;
|
||||||
|
|
||||||
|
channelizer->rotate((float *) outerRecvBuffer->begin(),
|
||||||
|
outerRecvBuffer->size());
|
||||||
|
|
||||||
|
for (size_t pchan = 0; pchan < MCHANS; pchan++) {
|
||||||
|
if (!active[pchan])
|
||||||
|
continue;
|
||||||
|
|
||||||
|
int lchan = getLogicalChan(pchan, mChans);
|
||||||
|
if (lchan < 0) {
|
||||||
|
LOG(ALERT) << "Invalid logical channel " << pchan;
|
||||||
|
continue;
|
||||||
|
}
|
||||||
|
|
||||||
|
/*
|
||||||
|
* Update history by writing into the head portion of the
|
||||||
|
* channelizer output buffer. For this to work, filter length of
|
||||||
|
* the polyphase channelizer partition filter should be equal to
|
||||||
|
* or larger than the resampling filter.
|
||||||
|
*/
|
||||||
|
buf = channelizer->outputBuffer(pchan);
|
||||||
|
size_t cLen = channelizer->outputLen();
|
||||||
|
size_t hLen = dnsampler->len();
|
||||||
|
size_t hSize = 2 * hLen * sizeof(float);
|
||||||
|
|
||||||
|
memcpy(&buf[2 * -hLen], history[lchan]->begin(), hSize);
|
||||||
|
memcpy(history[lchan]->begin(), &buf[2 * (cLen - hLen)], hSize);
|
||||||
|
|
||||||
|
float *wr_segment = recvBuffer[lchan]->getWriteSegment();
|
||||||
|
|
||||||
|
/* Write to the end of the inner receive buffer */
|
||||||
|
if (!dnsampler->rotate(channelizer->outputBuffer(pchan),
|
||||||
|
channelizer->outputLen(),
|
||||||
|
wr_segment,
|
||||||
|
recvBuffer[lchan]->getSegmentLen())) {
|
||||||
|
LOG(ALERT) << "Sample rate upsampling error";
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
/* Send a timestamped chunk to the device */
|
||||||
|
bool RadioInterfaceMulti::pushBuffer()
|
||||||
|
{
|
||||||
|
if (sendBuffer[0]->getAvailSegments() <= 0)
|
||||||
|
return false;
|
||||||
|
|
||||||
|
for (size_t pchan = 0; pchan < MCHANS; pchan++) {
|
||||||
|
if (!active[pchan]) {
|
||||||
|
synthesis->resetBuffer(pchan);
|
||||||
|
continue;
|
||||||
|
}
|
||||||
|
|
||||||
|
int lchan = getLogicalChan(pchan, mChans);
|
||||||
|
if (lchan < 0) {
|
||||||
|
LOG(ALERT) << "Invalid logical channel " << pchan;
|
||||||
|
continue;
|
||||||
|
}
|
||||||
|
|
||||||
|
if (!upsampler->rotate(sendBuffer[lchan]->getReadSegment(),
|
||||||
|
sendBuffer[lchan]->getSegmentLen(),
|
||||||
|
synthesis->inputBuffer(pchan),
|
||||||
|
synthesis->inputLen())) {
|
||||||
|
LOG(ALERT) << "Sample rate downsampling error";
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
synthesis->rotate((float *) outerSendBuffer->begin(),
|
||||||
|
outerSendBuffer->size());
|
||||||
|
|
||||||
|
convert_float_short(convertSendBuffer[0],
|
||||||
|
(float *) outerSendBuffer->begin(),
|
||||||
|
1.0 / (float) mChans, 2 * outerSendBuffer->size());
|
||||||
|
|
||||||
|
size_t num = mRadio->writeSamples(convertSendBuffer,
|
||||||
|
outerSendBuffer->size(),
|
||||||
|
&underrun,
|
||||||
|
writeTimestamp);
|
||||||
|
if (num != outerSendBuffer->size()) {
|
||||||
|
LOG(ALERT) << "Transmit error " << num;
|
||||||
|
}
|
||||||
|
|
||||||
|
writeTimestamp += num;
|
||||||
|
|
||||||
|
return true;
|
||||||
|
}
|
||||||
|
|
||||||
|
/* Frequency comparison limit */
|
||||||
|
#define FREQ_DELTA_LIMIT 10.0
|
||||||
|
|
||||||
|
static bool fltcmp(double a, double b)
|
||||||
|
{
|
||||||
|
return fabs(a - b) < FREQ_DELTA_LIMIT ? true : false;
|
||||||
|
}
|
||||||
|
|
||||||
|
bool RadioInterfaceMulti::tuneTx(double freq, size_t chan)
|
||||||
|
{
|
||||||
|
if (chan >= mChans)
|
||||||
|
return false;
|
||||||
|
|
||||||
|
double shift = (double) getFreqShift(mChans);
|
||||||
|
|
||||||
|
if (!chan)
|
||||||
|
return mRadio->setTxFreq(freq + shift * MCBTS_SPACING);
|
||||||
|
|
||||||
|
double center = mRadio->getTxFreq();
|
||||||
|
if (!fltcmp(freq, center + (double) (chan - shift) * MCBTS_SPACING)) {
|
||||||
|
LOG(NOTICE) << "Channel " << chan << " RF frequency offset is "
|
||||||
|
<< freq / 1e6 << " MHz";
|
||||||
|
}
|
||||||
|
|
||||||
|
return true;
|
||||||
|
}
|
||||||
|
|
||||||
|
bool RadioInterfaceMulti::tuneRx(double freq, size_t chan)
|
||||||
|
{
|
||||||
|
if (chan >= mChans)
|
||||||
|
return false;
|
||||||
|
|
||||||
|
double shift = (double) getFreqShift(mChans);
|
||||||
|
|
||||||
|
if (!chan)
|
||||||
|
return mRadio->setRxFreq(freq + shift * MCBTS_SPACING);
|
||||||
|
|
||||||
|
double center = mRadio->getRxFreq();
|
||||||
|
if (!fltcmp(freq, center + (double) (chan - shift) * MCBTS_SPACING)) {
|
||||||
|
LOG(NOTICE) << "Channel " << chan << " RF frequency offset is "
|
||||||
|
<< freq / 1e6 << " MHz";
|
||||||
|
}
|
||||||
|
|
||||||
|
return true;
|
||||||
|
}
|
||||||
|
|
||||||
|
double RadioInterfaceMulti::setRxGain(double db, size_t chan)
|
||||||
|
{
|
||||||
|
if (!chan)
|
||||||
|
return mRadio->setRxGain(db);
|
||||||
|
else
|
||||||
|
return mRadio->getRxGain();
|
||||||
|
}
|
||||||
@@ -1,8 +1,10 @@
|
|||||||
/*
|
/*
|
||||||
* Radio device interface with sample rate conversion
|
* Radio device interface with sample rate conversion
|
||||||
* Written by Thomas Tsou <tom@tsou.cc>
|
|
||||||
*
|
*
|
||||||
* Copyright 2011, 2012, 2013 Free Software Foundation, Inc.
|
* Copyright (C) 2011-2014 Free Software Foundation, Inc.
|
||||||
|
* Copyright (C) 2015 Ettus Research LLC
|
||||||
|
*
|
||||||
|
* Author: Tom Tsou <tom@tsou.cc>
|
||||||
*
|
*
|
||||||
* This program is free software: you can redistribute it and/or modify
|
* This program is free software: you can redistribute it and/or modify
|
||||||
* it under the terms of the GNU Affero General Public License as published by
|
* it under the terms of the GNU Affero General Public License as published by
|
||||||
@@ -56,10 +58,9 @@ static size_t resamp_outrate = 0;
|
|||||||
static size_t resamp_outchunk = 0;
|
static size_t resamp_outchunk = 0;
|
||||||
|
|
||||||
RadioInterfaceResamp::RadioInterfaceResamp(RadioDevice *wRadio,
|
RadioInterfaceResamp::RadioInterfaceResamp(RadioDevice *wRadio,
|
||||||
size_t sps, size_t chans)
|
size_t tx_sps, size_t rx_sps)
|
||||||
: RadioInterface(wRadio, sps, chans),
|
: RadioInterface(wRadio, tx_sps, rx_sps, 1),
|
||||||
innerSendBuffer(NULL), outerSendBuffer(NULL),
|
outerSendBuffer(NULL), outerRecvBuffer(NULL)
|
||||||
innerRecvBuffer(NULL), outerRecvBuffer(NULL)
|
|
||||||
{
|
{
|
||||||
}
|
}
|
||||||
|
|
||||||
@@ -70,17 +71,13 @@ RadioInterfaceResamp::~RadioInterfaceResamp()
|
|||||||
|
|
||||||
void RadioInterfaceResamp::close()
|
void RadioInterfaceResamp::close()
|
||||||
{
|
{
|
||||||
delete innerSendBuffer;
|
|
||||||
delete outerSendBuffer;
|
delete outerSendBuffer;
|
||||||
delete innerRecvBuffer;
|
|
||||||
delete outerRecvBuffer;
|
delete outerRecvBuffer;
|
||||||
|
|
||||||
delete upsampler;
|
delete upsampler;
|
||||||
delete dnsampler;
|
delete dnsampler;
|
||||||
|
|
||||||
innerSendBuffer = NULL;
|
|
||||||
outerSendBuffer = NULL;
|
outerSendBuffer = NULL;
|
||||||
innerRecvBuffer = NULL;
|
|
||||||
outerRecvBuffer = NULL;
|
outerRecvBuffer = NULL;
|
||||||
|
|
||||||
upsampler = NULL;
|
upsampler = NULL;
|
||||||
@@ -99,11 +96,6 @@ bool RadioInterfaceResamp::init(int type)
|
|||||||
{
|
{
|
||||||
float cutoff = 1.0f;
|
float cutoff = 1.0f;
|
||||||
|
|
||||||
if (mChans != 1) {
|
|
||||||
LOG(ALERT) << "Unsupported channel configuration " << mChans;
|
|
||||||
return false;
|
|
||||||
}
|
|
||||||
|
|
||||||
close();
|
close();
|
||||||
|
|
||||||
sendBuffer.resize(1);
|
sendBuffer.resize(1);
|
||||||
@@ -128,13 +120,8 @@ bool RadioInterfaceResamp::init(int type)
|
|||||||
return false;
|
return false;
|
||||||
}
|
}
|
||||||
|
|
||||||
resamp_inchunk = resamp_inrate * 4;
|
resamp_inchunk = resamp_inrate * 4 * mSPSRx;
|
||||||
resamp_outchunk = resamp_outrate * 4;
|
resamp_outchunk = resamp_outrate * 4 * mSPSRx;
|
||||||
|
|
||||||
if (resamp_inchunk * NUMCHUNKS < 157 * mSPSTx * 2) {
|
|
||||||
LOG(ALERT) << "Invalid inner chunk size " << resamp_inchunk;
|
|
||||||
return false;
|
|
||||||
}
|
|
||||||
|
|
||||||
if (mSPSTx == 4)
|
if (mSPSTx == 4)
|
||||||
cutoff = RESAMP_TX4_FILTER;
|
cutoff = RESAMP_TX4_FILTER;
|
||||||
@@ -157,21 +144,18 @@ bool RadioInterfaceResamp::init(int type)
|
|||||||
* and requires headroom equivalent to the filter length. Low
|
* and requires headroom equivalent to the filter length. Low
|
||||||
* rate buffers are allocated in the main radio interface code.
|
* rate buffers are allocated in the main radio interface code.
|
||||||
*/
|
*/
|
||||||
innerSendBuffer =
|
sendBuffer[0] = new RadioBuffer(NUMCHUNKS, resamp_inchunk,
|
||||||
new signalVector(NUMCHUNKS * resamp_inchunk, upsampler->len());
|
upsampler->len(), true);
|
||||||
|
recvBuffer[0] = new RadioBuffer(NUMCHUNKS * 20, resamp_inchunk, 0, false);
|
||||||
|
|
||||||
outerSendBuffer =
|
outerSendBuffer =
|
||||||
new signalVector(NUMCHUNKS * resamp_outchunk);
|
new signalVector(NUMCHUNKS * resamp_outchunk);
|
||||||
outerRecvBuffer =
|
outerRecvBuffer =
|
||||||
new signalVector(resamp_outchunk, dnsampler->len());
|
new signalVector(resamp_outchunk, dnsampler->len());
|
||||||
innerRecvBuffer =
|
|
||||||
new signalVector(NUMCHUNKS * resamp_inchunk / mSPSTx);
|
|
||||||
|
|
||||||
convertSendBuffer[0] = new short[outerSendBuffer->size() * 2];
|
convertSendBuffer[0] = new short[outerSendBuffer->size() * 2];
|
||||||
convertRecvBuffer[0] = new short[outerRecvBuffer->size() * 2];
|
convertRecvBuffer[0] = new short[outerRecvBuffer->size() * 2];
|
||||||
|
|
||||||
sendBuffer[0] = innerSendBuffer;
|
|
||||||
recvBuffer[0] = innerRecvBuffer;
|
|
||||||
|
|
||||||
return true;
|
return true;
|
||||||
}
|
}
|
||||||
|
|
||||||
@@ -181,14 +165,14 @@ void RadioInterfaceResamp::pullBuffer()
|
|||||||
bool local_underrun;
|
bool local_underrun;
|
||||||
int rc, num_recv;
|
int rc, num_recv;
|
||||||
|
|
||||||
if (recvCursor > innerRecvBuffer->size() - resamp_inchunk)
|
if (recvBuffer[0]->getFreeSegments() <= 0)
|
||||||
return;
|
return;
|
||||||
|
|
||||||
/* Outer buffer access size is fixed */
|
/* Outer buffer access size is fixed */
|
||||||
num_recv = mRadio->readSamples(convertRecvBuffer,
|
num_recv = mRadio->readSamples(convertRecvBuffer,
|
||||||
resamp_outchunk,
|
resamp_outchunk,
|
||||||
&overrun,
|
&overrun,
|
||||||
readTimestamp + shiftOffset,
|
readTimestamp,
|
||||||
&local_underrun);
|
&local_underrun);
|
||||||
if (num_recv != (int) resamp_outchunk) {
|
if (num_recv != (int) resamp_outchunk) {
|
||||||
LOG(ALERT) << "Receive error " << num_recv;
|
LOG(ALERT) << "Receive error " << num_recv;
|
||||||
@@ -204,57 +188,47 @@ void RadioInterfaceResamp::pullBuffer()
|
|||||||
/* Write to the end of the inner receive buffer */
|
/* Write to the end of the inner receive buffer */
|
||||||
rc = dnsampler->rotate((float *) outerRecvBuffer->begin(),
|
rc = dnsampler->rotate((float *) outerRecvBuffer->begin(),
|
||||||
resamp_outchunk,
|
resamp_outchunk,
|
||||||
(float *) (innerRecvBuffer->begin() + recvCursor),
|
recvBuffer[0]->getWriteSegment(),
|
||||||
resamp_inchunk);
|
resamp_inchunk);
|
||||||
if (rc < 0) {
|
if (rc < 0) {
|
||||||
LOG(ALERT) << "Sample rate upsampling error";
|
LOG(ALERT) << "Sample rate upsampling error";
|
||||||
}
|
}
|
||||||
|
|
||||||
recvCursor += resamp_inchunk;
|
/* Set history for the next chunk */
|
||||||
|
outerRecvBuffer->updateHistory();
|
||||||
}
|
}
|
||||||
|
|
||||||
/* Send a timestamped chunk to the device */
|
/* Send a timestamped chunk to the device */
|
||||||
void RadioInterfaceResamp::pushBuffer()
|
bool RadioInterfaceResamp::pushBuffer()
|
||||||
{
|
{
|
||||||
int rc, chunks, num_sent;
|
int rc;
|
||||||
int inner_len, outer_len;
|
size_t numSent;
|
||||||
|
|
||||||
if (sendCursor < resamp_inchunk)
|
if (sendBuffer[0]->getAvailSegments() <= 0)
|
||||||
return;
|
return false;
|
||||||
|
|
||||||
if (sendCursor > innerSendBuffer->size())
|
|
||||||
LOG(ALERT) << "Send buffer overflow";
|
|
||||||
|
|
||||||
chunks = sendCursor / resamp_inchunk;
|
|
||||||
|
|
||||||
inner_len = chunks * resamp_inchunk;
|
|
||||||
outer_len = chunks * resamp_outchunk;
|
|
||||||
|
|
||||||
/* Always send from the beginning of the buffer */
|
/* Always send from the beginning of the buffer */
|
||||||
rc = upsampler->rotate((float *) innerSendBuffer->begin(), inner_len,
|
rc = upsampler->rotate(sendBuffer[0]->getReadSegment(),
|
||||||
(float *) outerSendBuffer->begin(), outer_len);
|
resamp_inchunk,
|
||||||
|
(float *) outerSendBuffer->begin(),
|
||||||
|
resamp_outchunk);
|
||||||
if (rc < 0) {
|
if (rc < 0) {
|
||||||
LOG(ALERT) << "Sample rate downsampling error";
|
LOG(ALERT) << "Sample rate downsampling error";
|
||||||
}
|
}
|
||||||
|
|
||||||
convert_float_short(convertSendBuffer[0],
|
convert_float_short(convertSendBuffer[0],
|
||||||
(float *) outerSendBuffer->begin(),
|
(float *) outerSendBuffer->begin(),
|
||||||
powerScaling[0], 2 * outer_len);
|
powerScaling[0], 2 * resamp_outchunk);
|
||||||
|
|
||||||
num_sent = mRadio->writeSamples(convertSendBuffer,
|
numSent = mRadio->writeSamples(convertSendBuffer,
|
||||||
outer_len,
|
resamp_outchunk,
|
||||||
&underrun,
|
&underrun,
|
||||||
writeTimestamp);
|
writeTimestamp);
|
||||||
if (num_sent != outer_len) {
|
if (numSent != resamp_outchunk) {
|
||||||
LOG(ALERT) << "Transmit error " << num_sent;
|
LOG(ALERT) << "Transmit error " << numSent;
|
||||||
}
|
}
|
||||||
|
|
||||||
/* Shift remaining samples to beginning of buffer */
|
writeTimestamp += resamp_outchunk;
|
||||||
memmove(innerSendBuffer->begin(),
|
|
||||||
innerSendBuffer->begin() + inner_len,
|
|
||||||
(sendCursor - inner_len) * 2 * sizeof(float));
|
|
||||||
|
|
||||||
writeTimestamp += outer_len;
|
return true;
|
||||||
sendCursor -= inner_len;
|
|
||||||
assert(sendCursor >= 0);
|
|
||||||
}
|
}
|
||||||
|
|||||||
@@ -74,31 +74,25 @@ bool radioVector::setVector(signalVector *vector, size_t chan)
|
|||||||
return true;
|
return true;
|
||||||
}
|
}
|
||||||
|
|
||||||
avgVector::avgVector(size_t max)
|
noiseVector::noiseVector(size_t size)
|
||||||
: std::vector<float>(0), itr(0)
|
: std::vector<float>(size), itr(0)
|
||||||
{
|
{
|
||||||
this->max = max;
|
|
||||||
}
|
}
|
||||||
|
|
||||||
float avgVector::avg() const
|
float noiseVector::avg() const
|
||||||
{
|
{
|
||||||
float val = 0.0;
|
float val = 0.0;
|
||||||
|
|
||||||
if (!size())
|
|
||||||
return 0.0f;
|
|
||||||
|
|
||||||
for (size_t i = 0; i < size(); i++)
|
for (size_t i = 0; i < size(); i++)
|
||||||
val += (*this)[i];
|
val += (*this)[i];
|
||||||
|
|
||||||
return val / (float) size();
|
return val / (float) size();
|
||||||
}
|
}
|
||||||
|
|
||||||
bool avgVector::insert(float val)
|
bool noiseVector::insert(float val)
|
||||||
{
|
{
|
||||||
if (size() < max) {
|
if (!size())
|
||||||
push_back(val);
|
return false;
|
||||||
return true;
|
|
||||||
}
|
|
||||||
|
|
||||||
if (itr >= this->size())
|
if (itr >= this->size())
|
||||||
itr = 0;
|
itr = 0;
|
||||||
@@ -108,16 +102,6 @@ bool avgVector::insert(float val)
|
|||||||
return true;
|
return true;
|
||||||
}
|
}
|
||||||
|
|
||||||
bool avgVector::full() const
|
|
||||||
{
|
|
||||||
return size() >= max;
|
|
||||||
}
|
|
||||||
|
|
||||||
void avgVector::reset()
|
|
||||||
{
|
|
||||||
resize(0);
|
|
||||||
}
|
|
||||||
|
|
||||||
GSM::Time VectorQueue::nextTime() const
|
GSM::Time VectorQueue::nextTime() const
|
||||||
{
|
{
|
||||||
GSM::Time retVal;
|
GSM::Time retVal;
|
||||||
|
|||||||
@@ -46,17 +46,14 @@ private:
|
|||||||
GSM::Time mTime;
|
GSM::Time mTime;
|
||||||
};
|
};
|
||||||
|
|
||||||
class avgVector : std::vector<float> {
|
class noiseVector : std::vector<float> {
|
||||||
public:
|
public:
|
||||||
avgVector(size_t size = 0);
|
noiseVector(size_t size = 0);
|
||||||
bool insert(float val);
|
bool insert(float val);
|
||||||
bool full() const;
|
|
||||||
float avg() const;
|
float avg() const;
|
||||||
void reset();
|
|
||||||
|
|
||||||
private:
|
private:
|
||||||
size_t itr;
|
size_t itr;
|
||||||
size_t max;
|
|
||||||
};
|
};
|
||||||
|
|
||||||
class VectorFIFO : public InterthreadQueue<radioVector> { };
|
class VectorFIFO : public InterthreadQueue<radioVector> { };
|
||||||
|
|||||||
@@ -1,219 +0,0 @@
|
|||||||
#include <complex.h>
|
|
||||||
#include <stdio.h>
|
|
||||||
#include <math.h>
|
|
||||||
#include <string.h>
|
|
||||||
|
|
||||||
#include <osmocom/core/bits.h>
|
|
||||||
#include <osmocom/core/conv.h>
|
|
||||||
#include <osmocom/core/utils.h>
|
|
||||||
#include <osmocom/core/crcgen.h>
|
|
||||||
|
|
||||||
#include "sch.h"
|
|
||||||
|
|
||||||
/* GSM 04.08, 9.1.30 Synchronization channel information */
|
|
||||||
struct sch_packed_info {
|
|
||||||
ubit_t t1_hi[2];
|
|
||||||
ubit_t bsic[6];
|
|
||||||
ubit_t t1_md[8];
|
|
||||||
ubit_t t3p_hi[2];
|
|
||||||
ubit_t t2[5];
|
|
||||||
ubit_t t1_lo[1];
|
|
||||||
ubit_t t3p_lo[1];
|
|
||||||
} __attribute__((packed));
|
|
||||||
|
|
||||||
struct sch_burst {
|
|
||||||
sbit_t tail0[3];
|
|
||||||
sbit_t data0[39];
|
|
||||||
sbit_t etsc[64];
|
|
||||||
sbit_t data1[39];
|
|
||||||
sbit_t tail1[3];
|
|
||||||
sbit_t guard[8];
|
|
||||||
} __attribute__((packed));
|
|
||||||
|
|
||||||
static const uint8_t sch_next_output[][2] = {
|
|
||||||
{ 0, 3 }, { 1, 2 }, { 0, 3 }, { 1, 2 },
|
|
||||||
{ 3, 0 }, { 2, 1 }, { 3, 0 }, { 2, 1 },
|
|
||||||
{ 3, 0 }, { 2, 1 }, { 3, 0 }, { 2, 1 },
|
|
||||||
{ 0, 3 }, { 1, 2 }, { 0, 3 }, { 1, 2 },
|
|
||||||
};
|
|
||||||
|
|
||||||
static const uint8_t sch_next_state[][2] = {
|
|
||||||
{ 0, 1 }, { 2, 3 }, { 4, 5 }, { 6, 7 },
|
|
||||||
{ 8, 9 }, { 10, 11 }, { 12, 13 }, { 14, 15 },
|
|
||||||
{ 0, 1 }, { 2, 3 }, { 4, 5 }, { 6, 7 },
|
|
||||||
{ 8, 9 }, { 10, 11 }, { 12, 13 }, { 14, 15 },
|
|
||||||
};
|
|
||||||
|
|
||||||
static const struct osmo_conv_code gsm_conv_sch = {
|
|
||||||
.N = 2,
|
|
||||||
.K = 5,
|
|
||||||
.len = GSM_SCH_UNCODED_LEN,
|
|
||||||
.next_output = sch_next_output,
|
|
||||||
.next_state = sch_next_state,
|
|
||||||
};
|
|
||||||
|
|
||||||
const struct osmo_crc16gen_code gsm0503_sch_crc10 = {
|
|
||||||
.bits = 10,
|
|
||||||
.poly = 0x175,
|
|
||||||
.init = 0x000,
|
|
||||||
.remainder = 0x3ff,
|
|
||||||
};
|
|
||||||
|
|
||||||
#define GSM_MAX_BURST_LEN 157
|
|
||||||
#define GSM_SYM_RATE (1625e3 / 6)
|
|
||||||
|
|
||||||
/* Pre-generated FCCH measurement tone */
|
|
||||||
static complex float fcch_ref[GSM_MAX_BURST_LEN];
|
|
||||||
|
|
||||||
int float_to_sbit(const float *in, sbit_t *out, float scale, int len)
|
|
||||||
{
|
|
||||||
int i;
|
|
||||||
|
|
||||||
for (i = 0; i < len; i++) {
|
|
||||||
out[i] = (in[i] - 0.5f) * scale;
|
|
||||||
}
|
|
||||||
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* Check if FN contains a SCH burst */
|
|
||||||
int gsm_sch_check_fn(int fn)
|
|
||||||
{
|
|
||||||
int fn51 = fn % 51;
|
|
||||||
|
|
||||||
switch (fn51) {
|
|
||||||
case 1:
|
|
||||||
case 11:
|
|
||||||
case 21:
|
|
||||||
case 31:
|
|
||||||
case 41:
|
|
||||||
return 1;
|
|
||||||
}
|
|
||||||
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* SCH (T1, T2, T3p) to full FN value */
|
|
||||||
int gsm_sch_to_fn(struct sch_info *sch)
|
|
||||||
{
|
|
||||||
int t1 = sch->t1;
|
|
||||||
int t2 = sch->t2;
|
|
||||||
int t3p = sch->t3p;
|
|
||||||
|
|
||||||
if ((t1 < 0) || (t2 < 0) || (t3p < 0))
|
|
||||||
return -1;
|
|
||||||
int tt;
|
|
||||||
int t3 = t3p * 10 + 1;
|
|
||||||
|
|
||||||
if (t3 < t2)
|
|
||||||
tt = (t3 + 26) - t2;
|
|
||||||
else
|
|
||||||
tt = (t3 - t2) % 26;
|
|
||||||
|
|
||||||
return t1 * 51 * 26 + tt * 51 + t3;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* Parse encoded SCH message */
|
|
||||||
int gsm_sch_parse(const uint8_t *info, struct sch_info *desc)
|
|
||||||
{
|
|
||||||
struct sch_packed_info *p = (struct sch_packed_info *) info;
|
|
||||||
|
|
||||||
desc->bsic = (p->bsic[0] << 0) | (p->bsic[1] << 1) |
|
|
||||||
(p->bsic[2] << 2) | (p->bsic[3] << 3) |
|
|
||||||
(p->bsic[4] << 4);
|
|
||||||
|
|
||||||
desc->t1 = (p->t1_lo[0] << 0) | (p->t1_md[0] << 1) |
|
|
||||||
(p->t1_md[1] << 2) | (p->t1_md[2] << 3) |
|
|
||||||
(p->t1_md[3] << 4) | (p->t1_md[4] << 5) |
|
|
||||||
(p->t1_md[5] << 6) | (p->t1_md[6] << 7) |
|
|
||||||
(p->t1_md[7] << 8) | (p->t1_hi[0] << 9) |
|
|
||||||
(p->t1_hi[1] << 10);
|
|
||||||
|
|
||||||
desc->t2 = (p->t2[0] << 0) | (p->t2[1] << 1) |
|
|
||||||
(p->t2[2] << 2) | (p->t2[3] << 3) |
|
|
||||||
(p->t2[4] << 4);
|
|
||||||
|
|
||||||
desc->t3p = (p->t3p_lo[0] << 0) | (p->t3p_hi[0] << 1) |
|
|
||||||
(p->t3p_hi[1] << 2);
|
|
||||||
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* From osmo-bts */
|
|
||||||
int gsm_sch_decode(uint8_t *info, sbit_t *data)
|
|
||||||
{
|
|
||||||
int rc;
|
|
||||||
ubit_t uncoded[GSM_SCH_UNCODED_LEN];
|
|
||||||
|
|
||||||
osmo_conv_decode(&gsm_conv_sch, data, uncoded);
|
|
||||||
|
|
||||||
rc = osmo_crc16gen_check_bits(&gsm0503_sch_crc10,
|
|
||||||
uncoded, GSM_SCH_INFO_LEN,
|
|
||||||
uncoded + GSM_SCH_INFO_LEN);
|
|
||||||
if (rc)
|
|
||||||
return -1;
|
|
||||||
|
|
||||||
memcpy(info, uncoded, GSM_SCH_INFO_LEN * sizeof(ubit_t));
|
|
||||||
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
|
|
||||||
#define FCCH_TAIL_BITS_LEN 3
|
|
||||||
#define FCCH_DATA_LEN 142
|
|
||||||
|
|
||||||
/* Compute FCCH frequency offset */
|
|
||||||
double gsm_fcch_offset(float *burst, int len)
|
|
||||||
{
|
|
||||||
int i, start, end;
|
|
||||||
float a, b, c, d, ang, avg = 0.0f;
|
|
||||||
double freq;
|
|
||||||
|
|
||||||
if (len > GSM_MAX_BURST_LEN)
|
|
||||||
len = GSM_MAX_BURST_LEN;
|
|
||||||
|
|
||||||
for (i = 0; i < len; i++) {
|
|
||||||
a = burst[2 * i + 0];
|
|
||||||
b = burst[2 * i + 1];
|
|
||||||
c = crealf(fcch_ref[i]);
|
|
||||||
d = cimagf(fcch_ref[i]);
|
|
||||||
|
|
||||||
burst[2 * i + 0] = a * c - b * d;
|
|
||||||
burst[2 * i + 1] = a * d + b * c;
|
|
||||||
}
|
|
||||||
|
|
||||||
start = FCCH_TAIL_BITS_LEN;
|
|
||||||
end = start + FCCH_DATA_LEN;
|
|
||||||
|
|
||||||
for (i = start; i < end; i++) {
|
|
||||||
a = cargf(burst[2 * (i - 1) + 0] +
|
|
||||||
burst[2 * (i - 1) + 1] * I);
|
|
||||||
b = cargf(burst[2 * i + 0] +
|
|
||||||
burst[2 * i + 1] * I);
|
|
||||||
|
|
||||||
ang = b - a;
|
|
||||||
|
|
||||||
if (ang > M_PI)
|
|
||||||
ang -= 2 * M_PI;
|
|
||||||
else if (ang < -M_PI)
|
|
||||||
ang += 2 * M_PI;
|
|
||||||
|
|
||||||
avg += ang;
|
|
||||||
}
|
|
||||||
|
|
||||||
avg /= (float) (end - start);
|
|
||||||
freq = avg / (2 * M_PI) * GSM_SYM_RATE;
|
|
||||||
|
|
||||||
return freq;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* Generate FCCH measurement tone */
|
|
||||||
static __attribute__((constructor)) void init()
|
|
||||||
{
|
|
||||||
int i;
|
|
||||||
double freq = 0.25;
|
|
||||||
|
|
||||||
for (i = 0; i < GSM_MAX_BURST_LEN; i++) {
|
|
||||||
fcch_ref[i] = sin(2 * M_PI * freq * (double) i) +
|
|
||||||
cos(2 * M_PI * freq * (double) i) * I;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
@@ -1,26 +0,0 @@
|
|||||||
#ifndef _SCH_H_
|
|
||||||
#define _SCH_H_
|
|
||||||
|
|
||||||
#include <osmocom/core/bits.h>
|
|
||||||
|
|
||||||
struct sch_info {
|
|
||||||
int bsic;
|
|
||||||
int t1;
|
|
||||||
int t2;
|
|
||||||
int t3p;
|
|
||||||
};
|
|
||||||
|
|
||||||
#define GSM_SCH_INFO_LEN 25
|
|
||||||
#define GSM_SCH_UNCODED_LEN 35
|
|
||||||
#define GSM_SCH_CODED_LEN 78
|
|
||||||
|
|
||||||
int gsm_sch_decode(uint8_t *sb_info, sbit_t *burst);
|
|
||||||
int gsm_sch_parse(const uint8_t *sb_info, struct sch_info *desc);
|
|
||||||
int gsm_sch_to_fn(struct sch_info *sch);
|
|
||||||
int gsm_sch_check_fn(int fn);
|
|
||||||
|
|
||||||
double gsm_fcch_offset(float *burst, int len);
|
|
||||||
|
|
||||||
int float_to_sbit(const float *in, sbit_t *out, float scale, int len);
|
|
||||||
|
|
||||||
#endif /* _SCH_H_ */
|
|
||||||
File diff suppressed because it is too large
Load Diff
@@ -20,120 +20,69 @@
|
|||||||
#include "BitVector.h"
|
#include "BitVector.h"
|
||||||
#include "signalVector.h"
|
#include "signalVector.h"
|
||||||
|
|
||||||
/** Convolution type indicator */
|
/* Burst lengths */
|
||||||
enum ConvType {
|
#define NORMAL_BURST_NBITS 148
|
||||||
START_ONLY,
|
#define EDGE_BURST_NBITS 444
|
||||||
NO_DELAY,
|
#define EDGE_BURST_NSYMS (EDGE_BURST_NBITS / 3)
|
||||||
CUSTOM,
|
|
||||||
UNDEFINED,
|
/** Codes for burst types of received bursts*/
|
||||||
|
enum CorrType{
|
||||||
|
OFF, ///< timeslot is off
|
||||||
|
TSC, ///< timeslot should contain a normal burst
|
||||||
|
RACH, ///< timeslot should contain an access burst
|
||||||
|
EDGE, ///< timeslot should contain an EDGE burst
|
||||||
|
IDLE ///< timeslot is an idle (or dummy) burst
|
||||||
};
|
};
|
||||||
|
|
||||||
/** Convert a linear number to a dB value */
|
enum SignalError {
|
||||||
float dB(float x);
|
SIGERR_NONE,
|
||||||
|
SIGERR_BOUNDS,
|
||||||
|
SIGERR_CLIP,
|
||||||
|
SIGERR_UNSUPPORTED,
|
||||||
|
SIGERR_INTERNAL,
|
||||||
|
};
|
||||||
|
|
||||||
/** Convert a dB value into a linear value */
|
/*
|
||||||
float dBinv(float x);
|
* Burst detection threshold
|
||||||
|
*
|
||||||
/** Compute the energy of a vector */
|
* Decision threshold value for burst gating on peak-to-average value of
|
||||||
float vectorNorm2(const signalVector &x);
|
* correlated synchronization sequences. Lower values pass more bursts up
|
||||||
|
* to upper layers but will increase the false detection rate.
|
||||||
/** Compute the average power of a vector */
|
*/
|
||||||
float vectorPower(const signalVector &x);
|
#define BURST_THRESH 4.0
|
||||||
|
|
||||||
/** Setup the signal processing library */
|
/** Setup the signal processing library */
|
||||||
bool sigProcLibSetup(int sps);
|
bool sigProcLibSetup();
|
||||||
|
|
||||||
/** Destroy the signal processing library */
|
/** Destroy the signal processing library */
|
||||||
void sigProcLibDestroy(void);
|
void sigProcLibDestroy(void);
|
||||||
|
|
||||||
/**
|
/** Operate soft slicer on a soft-bit vector */
|
||||||
Convolve two vectors.
|
bool vectorSlicer(SoftVector *x);
|
||||||
@param a,b The vectors to be convolved.
|
|
||||||
@param c, A preallocated vector to hold the convolution result.
|
|
||||||
@param spanType The type/span of the convolution.
|
|
||||||
@return The convolution result or NULL on error.
|
|
||||||
*/
|
|
||||||
signalVector *convolve(const signalVector *a, const signalVector *b,
|
|
||||||
signalVector *c, ConvType spanType,
|
|
||||||
size_t start = 0, size_t len = 0,
|
|
||||||
size_t step = 1, int offset = 0);
|
|
||||||
|
|
||||||
/**
|
|
||||||
Frequency shift a vector.
|
|
||||||
@param y The frequency shifted vector.
|
|
||||||
@param x The vector to-be-shifted.
|
|
||||||
@param freq The digital frequency shift
|
|
||||||
@param startPhase The starting phase of the oscillator
|
|
||||||
@param finalPhase The final phase of the oscillator
|
|
||||||
@return The frequency shifted vector.
|
|
||||||
*/
|
|
||||||
signalVector* frequencyShift(signalVector *y,
|
|
||||||
signalVector *x,
|
|
||||||
float freq = 0.0,
|
|
||||||
float startPhase = 0.0,
|
|
||||||
float *finalPhase=NULL);
|
|
||||||
|
|
||||||
/**
|
|
||||||
Correlate two vectors.
|
|
||||||
@param a,b The vectors to be correlated.
|
|
||||||
@param c, A preallocated vector to hold the correlation result.
|
|
||||||
@param spanType The type/span of the correlation.
|
|
||||||
@return The correlation result.
|
|
||||||
*/
|
|
||||||
signalVector* correlate(signalVector *a,
|
|
||||||
signalVector *b,
|
|
||||||
signalVector *c,
|
|
||||||
ConvType spanType,
|
|
||||||
bool bReversedConjugated = false,
|
|
||||||
unsigned startIx = 0,
|
|
||||||
unsigned len = 0);
|
|
||||||
|
|
||||||
/** Operate soft slicer on real-valued portion of vector */
|
|
||||||
bool vectorSlicer(signalVector *x);
|
|
||||||
|
|
||||||
/** GMSK modulate a GSM burst of bits */
|
/** GMSK modulate a GSM burst of bits */
|
||||||
signalVector *modulateBurst(const BitVector &wBurst,
|
signalVector *modulateBurst(const BitVector &wBurst,
|
||||||
int guardPeriodLength,
|
int guardPeriodLength,
|
||||||
int sps, bool emptyPulse = false);
|
int sps, bool emptyPulse = false);
|
||||||
|
|
||||||
/** Sinc function */
|
/** 8-PSK modulate a burst of bits */
|
||||||
float sinc(float x);
|
signalVector *modulateEdgeBurst(const BitVector &bits,
|
||||||
|
int sps, bool emptyPulse = false);
|
||||||
|
|
||||||
/** Delay a vector */
|
/** Generate a EDGE burst with random payload - 4 SPS (625 samples) only */
|
||||||
signalVector *delayVector(signalVector *in, signalVector *out, float delay);
|
signalVector *generateEdgeBurst(int tsc);
|
||||||
|
|
||||||
/** Add two vectors in-place */
|
/** Generate an empty burst - 4 or 1 SPS */
|
||||||
bool addVector(signalVector &x,
|
signalVector *generateEmptyBurst(int sps, int tn);
|
||||||
signalVector &y);
|
|
||||||
|
|
||||||
/** Multiply two vectors in-place*/
|
/** Generate a normal GSM burst with random payload - 4 or 1 SPS */
|
||||||
bool multVector(signalVector &x,
|
signalVector *genRandNormalBurst(int tsc, int sps, int tn);
|
||||||
signalVector &y);
|
|
||||||
|
|
||||||
/** Generate a vector of gaussian noise */
|
/** Generate an access GSM burst with random payload - 4 or 1 SPS */
|
||||||
signalVector *gaussianNoise(int length,
|
signalVector *genRandAccessBurst(int delay, int sps, int tn);
|
||||||
float variance = 1.0,
|
|
||||||
complex mean = complex(0.0));
|
|
||||||
|
|
||||||
/**
|
/** Generate a dummy GSM burst - 4 or 1 SPS */
|
||||||
Given a non-integer index, interpolate a sample.
|
signalVector *generateDummyBurst(int sps, int tn);
|
||||||
@param inSig The signal from which to interpolate.
|
|
||||||
@param ix The index.
|
|
||||||
@return The interpolated signal value.
|
|
||||||
*/
|
|
||||||
complex interpolatePoint(const signalVector &inSig,
|
|
||||||
float ix);
|
|
||||||
|
|
||||||
/**
|
|
||||||
Given a correlator output, locate the correlation peak.
|
|
||||||
@param rxBurst The correlator result.
|
|
||||||
@param peakIndex Pointer to value to receive interpolated peak index.
|
|
||||||
@param avgPower Power to value to receive mean power.
|
|
||||||
@return Peak value.
|
|
||||||
*/
|
|
||||||
complex peakDetect(const signalVector &rxBurst,
|
|
||||||
float *peakIndex,
|
|
||||||
float *avgPwr);
|
|
||||||
|
|
||||||
/**
|
/**
|
||||||
Apply a scalar to a vector.
|
Apply a scalar to a vector.
|
||||||
@@ -141,137 +90,40 @@ complex peakDetect(const signalVector &rxBurst,
|
|||||||
@param scale The scalar.
|
@param scale The scalar.
|
||||||
*/
|
*/
|
||||||
void scaleVector(signalVector &x,
|
void scaleVector(signalVector &x,
|
||||||
complex scale);
|
complex scale);
|
||||||
|
|
||||||
/**
|
/**
|
||||||
Generate a modulated GSM midamble, stored within the library.
|
Rough energy estimator.
|
||||||
@param gsmPulse The GSM pulse used for modulation.
|
@param rxBurst A GSM burst.
|
||||||
@param sps The number of samples per GSM symbol.
|
|
||||||
@param TSC The training sequence [0..7]
|
|
||||||
@return Success.
|
|
||||||
*/
|
|
||||||
bool generateMidamble(int sps, int tsc);
|
|
||||||
/**
|
|
||||||
Generate a modulated RACH sequence, stored within the library.
|
|
||||||
@param gsmPulse The GSM pulse used for modulation.
|
|
||||||
@param sps The number of samples per GSM symbol.
|
|
||||||
@return Success.
|
|
||||||
*/
|
|
||||||
bool generateRACHSequence(int sps);
|
|
||||||
bool generateSCHSequence(int sps);
|
|
||||||
|
|
||||||
/**
|
|
||||||
Energy detector, checks to see if received burst energy is above a threshold.
|
|
||||||
@param rxBurst The received GSM burst of interest.
|
|
||||||
@param windowLength The number of burst samples used to compute burst energy
|
@param windowLength The number of burst samples used to compute burst energy
|
||||||
@param detectThreshold The detection threshold, a linear value.
|
@return The average power of the received burst.
|
||||||
@param avgPwr The average power of the received burst.
|
|
||||||
@return True if burst energy is above threshold.
|
|
||||||
*/
|
*/
|
||||||
bool energyDetect(signalVector &rxBurst,
|
float energyDetect(const signalVector &rxBurst,
|
||||||
unsigned windowLength,
|
unsigned windowLength);
|
||||||
float detectThreshold,
|
|
||||||
float *avgPwr = NULL);
|
|
||||||
|
|
||||||
/**
|
/**
|
||||||
RACH correlator/detector.
|
8-PSK/GMSK/RACH burst detector
|
||||||
@param rxBurst The received GSM burst of interest.
|
@param burst The received GSM burst of interest
|
||||||
@param detectThreshold The threshold that the received burst's post-correlator SNR is compared against to determine validity.
|
@param tsc Midamble type (0..7) also known as TSC
|
||||||
@param sps The number of samples per GSM symbol.
|
@param threshold The threshold that the received burst's post-correlator SNR is compared against to determine validity.
|
||||||
@param amplitude The estimated amplitude of received RACH burst.
|
|
||||||
@param TOA The estimate time-of-arrival of received RACH burst.
|
|
||||||
@return positive if threshold value is reached, negative on error, zero otherwise
|
|
||||||
*/
|
|
||||||
int detectRACHBurst(signalVector &rxBurst,
|
|
||||||
float detectThreshold,
|
|
||||||
int sps,
|
|
||||||
complex *amplitude,
|
|
||||||
float* TOA);
|
|
||||||
|
|
||||||
enum {
|
|
||||||
SCH_DETECT_FULL,
|
|
||||||
SCH_DETECT_NARROW,
|
|
||||||
};
|
|
||||||
|
|
||||||
int detectSCHBurst(signalVector &rxBurst,
|
|
||||||
float detectThreshold,
|
|
||||||
int sps,
|
|
||||||
complex *amplitude,
|
|
||||||
float* TOA, int state);
|
|
||||||
|
|
||||||
/**
|
|
||||||
Normal burst correlator, detector, channel estimator.
|
|
||||||
@param rxBurst The received GSM burst of interest.
|
|
||||||
|
|
||||||
@param detectThreshold The threshold that the received burst's post-correlator SNR is compared against to determine validity.
|
|
||||||
@param sps The number of samples per GSM symbol.
|
@param sps The number of samples per GSM symbol.
|
||||||
@param amplitude The estimated amplitude of received TSC burst.
|
@param amplitude The estimated amplitude of received TSC burst.
|
||||||
@param TOA The estimate time-of-arrival of received TSC burst.
|
@param toa The estimate time-of-arrival of received TSC burst (in symbols).
|
||||||
@param maxTOA The maximum expected time-of-arrival
|
@param max_toa The maximum expected time-of-arrival (in symbols).
|
||||||
@param requestChannel Set to true if channel estimation is desired.
|
@return positive value (CorrType) if threshold value is reached,
|
||||||
@param channelResponse The estimated channel.
|
negative value (-SignalError) on error,
|
||||||
@param channelResponseOffset The time offset b/w the first sample of the channel response and the reported TOA.
|
zero (SIGERR_NONE) if no burst is detected
|
||||||
@return positive if threshold value is reached, negative on error, zero otherwise
|
|
||||||
*/
|
*/
|
||||||
int analyzeTrafficBurst(signalVector &rxBurst,
|
int detectAnyBurst(const signalVector &burst,
|
||||||
unsigned TSC,
|
unsigned tsc,
|
||||||
float detectThreshold,
|
float threshold,
|
||||||
int sps,
|
int sps,
|
||||||
complex *amplitude,
|
CorrType type,
|
||||||
float *TOA,
|
complex &,
|
||||||
unsigned maxTOA,
|
float &toa,
|
||||||
bool requestChannel = false,
|
unsigned max_toa);
|
||||||
signalVector** channelResponse = NULL,
|
|
||||||
float *channelResponseOffset = NULL);
|
|
||||||
|
|
||||||
/**
|
/** Demodulate burst basde on type and output soft bits */
|
||||||
Decimate a vector.
|
SoftVector *demodAnyBurst(const signalVector &burst, int sps,
|
||||||
@param wVector The vector of interest.
|
complex amp, float toa, CorrType type);
|
||||||
@param factor Decimation factor.
|
|
||||||
@return The decimated signal vector.
|
|
||||||
*/
|
|
||||||
signalVector *decimateVector(signalVector &wVector, size_t factor);
|
|
||||||
|
|
||||||
/**
|
|
||||||
Demodulates a received burst using a soft-slicer.
|
|
||||||
@param rxBurst The burst to be demodulated.
|
|
||||||
@param gsmPulse The GSM pulse.
|
|
||||||
@param sps The number of samples per GSM symbol.
|
|
||||||
@param channel The amplitude estimate of the received burst.
|
|
||||||
@param TOA The time-of-arrival of the received burst.
|
|
||||||
@return The demodulated bit sequence.
|
|
||||||
*/
|
|
||||||
SoftVector *demodulateBurst(signalVector &rxBurst, int sps,
|
|
||||||
complex channel, float TOA);
|
|
||||||
|
|
||||||
/**
|
|
||||||
Design the necessary filters for a decision-feedback equalizer.
|
|
||||||
@param channelResponse The multipath channel that we're mitigating.
|
|
||||||
@param SNRestimate The signal-to-noise estimate of the channel, a linear value
|
|
||||||
@param Nf The number of taps in the feedforward filter.
|
|
||||||
@param feedForwardFilter The designed feed forward filter.
|
|
||||||
@param feedbackFilter The designed feedback filter.
|
|
||||||
@return True if DFE can be designed.
|
|
||||||
*/
|
|
||||||
bool designDFE(signalVector &channelResponse,
|
|
||||||
float SNRestimate,
|
|
||||||
int Nf,
|
|
||||||
signalVector **feedForwardFilter,
|
|
||||||
signalVector **feedbackFilter);
|
|
||||||
|
|
||||||
/**
|
|
||||||
Equalize/demodulate a received burst via a decision-feedback equalizer.
|
|
||||||
@param rxBurst The received burst to be demodulated.
|
|
||||||
@param TOA The time-of-arrival of the received burst.
|
|
||||||
@param sps The number of samples per GSM symbol.
|
|
||||||
@param w The feed forward filter of the DFE.
|
|
||||||
@param b The feedback filter of the DFE.
|
|
||||||
@return The demodulated bit sequence.
|
|
||||||
*/
|
|
||||||
SoftVector *equalizeBurst(signalVector &rxBurst,
|
|
||||||
float TOA,
|
|
||||||
int sps,
|
|
||||||
signalVector &w,
|
|
||||||
signalVector &b);
|
|
||||||
|
|
||||||
#endif /* SIGPROCLIB_H */
|
#endif /* SIGPROCLIB_H */
|
||||||
|
|||||||
@@ -45,11 +45,25 @@ void signalVector::operator=(const signalVector& vector)
|
|||||||
mStart = mData + vector.getStart();
|
mStart = mData + vector.getStart();
|
||||||
}
|
}
|
||||||
|
|
||||||
|
signalVector signalVector::segment(size_t start, size_t span)
|
||||||
|
{
|
||||||
|
return signalVector(mData, start, span);
|
||||||
|
}
|
||||||
|
|
||||||
size_t signalVector::getStart() const
|
size_t signalVector::getStart() const
|
||||||
{
|
{
|
||||||
return mStart - mData;
|
return mStart - mData;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
size_t signalVector::updateHistory()
|
||||||
|
{
|
||||||
|
size_t num = getStart();
|
||||||
|
|
||||||
|
memmove(mData, mStart + this->size() - num, num * sizeof(complex));
|
||||||
|
|
||||||
|
return num;
|
||||||
|
}
|
||||||
|
|
||||||
Symmetry signalVector::getSymmetry() const
|
Symmetry signalVector::getSymmetry() const
|
||||||
{
|
{
|
||||||
return symmetry;
|
return symmetry;
|
||||||
|
|||||||
@@ -30,8 +30,12 @@ public:
|
|||||||
/** Override base assignment operator to include start offsets */
|
/** Override base assignment operator to include start offsets */
|
||||||
void operator=(const signalVector& vector);
|
void operator=(const signalVector& vector);
|
||||||
|
|
||||||
|
/** Return an alias to a segment of this signalVector. */
|
||||||
|
signalVector segment(size_t start, size_t span);
|
||||||
|
|
||||||
/** Return head room */
|
/** Return head room */
|
||||||
size_t getStart() const;
|
size_t getStart() const;
|
||||||
|
size_t updateHistory();
|
||||||
|
|
||||||
Symmetry getSymmetry() const;
|
Symmetry getSymmetry() const;
|
||||||
void setSymmetry(Symmetry symmetry);
|
void setSymmetry(Symmetry symmetry);
|
||||||
|
|||||||
@@ -1,10 +1,32 @@
|
|||||||
if !ARCH_ARM
|
if !ARCH_ARM
|
||||||
AM_CFLAGS = -Wall -std=gnu99 -march=native -I../common
|
AM_CFLAGS = -Wall -std=gnu99 -I${srcdir}/../common
|
||||||
|
|
||||||
noinst_LTLIBRARIES = libarch.la
|
noinst_LTLIBRARIES = libarch.la
|
||||||
|
noinst_LTLIBRARIES += libarch_sse_3.la
|
||||||
|
noinst_LTLIBRARIES += libarch_sse_4_1.la
|
||||||
|
|
||||||
|
libarch_la_LIBADD =
|
||||||
|
|
||||||
|
# SSE 3 specific code
|
||||||
|
if HAVE_SSE3
|
||||||
|
libarch_sse_3_la_SOURCES = \
|
||||||
|
convert_sse_3.c \
|
||||||
|
convolve_sse_3.c
|
||||||
|
libarch_sse_3_la_CFLAGS = $(AM_CFLAGS) -msse3
|
||||||
|
libarch_la_LIBADD += libarch_sse_3.la
|
||||||
|
endif
|
||||||
|
|
||||||
|
# SSE 4.1 specific code
|
||||||
|
if HAVE_SSE4_1
|
||||||
|
libarch_sse_4_1_la_SOURCES = \
|
||||||
|
convert_sse_4_1.c
|
||||||
|
libarch_sse_4_1_la_CFLAGS = $(AM_CFLAGS) -msse4.1
|
||||||
|
libarch_la_LIBADD += libarch_sse_4_1.la
|
||||||
|
endif
|
||||||
|
|
||||||
libarch_la_SOURCES = \
|
libarch_la_SOURCES = \
|
||||||
../common/convolve_base.c \
|
../common/convolve_base.c \
|
||||||
|
../common/convert_base.c \
|
||||||
convert.c \
|
convert.c \
|
||||||
convolve.c
|
convolve.c
|
||||||
endif
|
endif
|
||||||
|
|||||||
@@ -20,181 +20,64 @@
|
|||||||
#include <malloc.h>
|
#include <malloc.h>
|
||||||
#include <string.h>
|
#include <string.h>
|
||||||
#include "convert.h"
|
#include "convert.h"
|
||||||
|
#include "convert_sse_3.h"
|
||||||
|
#include "convert_sse_4_1.h"
|
||||||
|
|
||||||
#ifdef HAVE_CONFIG_H
|
#ifdef HAVE_CONFIG_H
|
||||||
#include "config.h"
|
#include "config.h"
|
||||||
#endif
|
#endif
|
||||||
|
|
||||||
#ifdef HAVE_SSE3
|
/* Architecture dependant function pointers */
|
||||||
#include <xmmintrin.h>
|
struct convert_cpu_context {
|
||||||
#include <emmintrin.h>
|
void (*convert_si16_ps_16n) (float *, const short *, int);
|
||||||
|
void (*convert_si16_ps) (float *, const short *, int);
|
||||||
|
void (*convert_scale_ps_si16_16n)(short *, const float *, float, int);
|
||||||
|
void (*convert_scale_ps_si16_8n)(short *, const float *, float, int);
|
||||||
|
void (*convert_scale_ps_si16)(short *, const float *, float, int);
|
||||||
|
};
|
||||||
|
|
||||||
|
static struct convert_cpu_context c;
|
||||||
|
|
||||||
|
void convert_init(void)
|
||||||
|
{
|
||||||
|
c.convert_scale_ps_si16_16n = base_convert_float_short;
|
||||||
|
c.convert_scale_ps_si16_8n = base_convert_float_short;
|
||||||
|
c.convert_scale_ps_si16 = base_convert_float_short;
|
||||||
|
c.convert_si16_ps_16n = base_convert_short_float;
|
||||||
|
c.convert_si16_ps = base_convert_short_float;
|
||||||
|
|
||||||
|
#ifdef HAVE___BUILTIN_CPU_SUPPORTS
|
||||||
#ifdef HAVE_SSE4_1
|
#ifdef HAVE_SSE4_1
|
||||||
#include <smmintrin.h>
|
if (__builtin_cpu_supports("sse4.1")) {
|
||||||
|
c.convert_si16_ps_16n = &_sse_convert_si16_ps_16n;
|
||||||
/* 16*N 16-bit signed integer converted to single precision floats */
|
c.convert_si16_ps = &_sse_convert_si16_ps;
|
||||||
static void _sse_convert_si16_ps_16n(float *restrict out,
|
|
||||||
short *restrict in,
|
|
||||||
int len)
|
|
||||||
{
|
|
||||||
__m128i m0, m1, m2, m3, m4, m5;
|
|
||||||
__m128 m6, m7, m8, m9;
|
|
||||||
|
|
||||||
for (int i = 0; i < len / 16; i++) {
|
|
||||||
/* Load (unaligned) packed floats */
|
|
||||||
m0 = _mm_loadu_si128((__m128i *) &in[16 * i + 0]);
|
|
||||||
m1 = _mm_loadu_si128((__m128i *) &in[16 * i + 8]);
|
|
||||||
|
|
||||||
/* Unpack */
|
|
||||||
m2 = _mm_cvtepi16_epi32(m0);
|
|
||||||
m4 = _mm_cvtepi16_epi32(m1);
|
|
||||||
m0 = _mm_shuffle_epi32(m0, _MM_SHUFFLE(1, 0, 3, 2));
|
|
||||||
m1 = _mm_shuffle_epi32(m1, _MM_SHUFFLE(1, 0, 3, 2));
|
|
||||||
m3 = _mm_cvtepi16_epi32(m0);
|
|
||||||
m5 = _mm_cvtepi16_epi32(m1);
|
|
||||||
|
|
||||||
/* Convert */
|
|
||||||
m6 = _mm_cvtepi32_ps(m2);
|
|
||||||
m7 = _mm_cvtepi32_ps(m3);
|
|
||||||
m8 = _mm_cvtepi32_ps(m4);
|
|
||||||
m9 = _mm_cvtepi32_ps(m5);
|
|
||||||
|
|
||||||
/* Store */
|
|
||||||
_mm_storeu_ps(&out[16 * i + 0], m6);
|
|
||||||
_mm_storeu_ps(&out[16 * i + 4], m7);
|
|
||||||
_mm_storeu_ps(&out[16 * i + 8], m8);
|
|
||||||
_mm_storeu_ps(&out[16 * i + 12], m9);
|
|
||||||
}
|
}
|
||||||
}
|
|
||||||
|
|
||||||
/* 16*N 16-bit signed integer conversion with remainder */
|
|
||||||
static void _sse_convert_si16_ps(float *restrict out,
|
|
||||||
short *restrict in,
|
|
||||||
int len)
|
|
||||||
{
|
|
||||||
int start = len / 16 * 16;
|
|
||||||
|
|
||||||
_sse_convert_si16_ps_16n(out, in, len);
|
|
||||||
|
|
||||||
for (int i = 0; i < len % 16; i++)
|
|
||||||
out[start + i] = in[start + i];
|
|
||||||
}
|
|
||||||
#endif /* HAVE_SSE4_1 */
|
|
||||||
|
|
||||||
/* 8*N single precision floats scaled and converted to 16-bit signed integer */
|
|
||||||
static void _sse_convert_scale_ps_si16_8n(short *restrict out,
|
|
||||||
float *restrict in,
|
|
||||||
float scale, int len)
|
|
||||||
{
|
|
||||||
__m128 m0, m1, m2;
|
|
||||||
__m128i m4, m5;
|
|
||||||
|
|
||||||
for (int i = 0; i < len / 8; i++) {
|
|
||||||
/* Load (unaligned) packed floats */
|
|
||||||
m0 = _mm_loadu_ps(&in[8 * i + 0]);
|
|
||||||
m1 = _mm_loadu_ps(&in[8 * i + 4]);
|
|
||||||
m2 = _mm_load1_ps(&scale);
|
|
||||||
|
|
||||||
/* Scale */
|
|
||||||
m0 = _mm_mul_ps(m0, m2);
|
|
||||||
m1 = _mm_mul_ps(m1, m2);
|
|
||||||
|
|
||||||
/* Convert */
|
|
||||||
m4 = _mm_cvtps_epi32(m0);
|
|
||||||
m5 = _mm_cvtps_epi32(m1);
|
|
||||||
|
|
||||||
/* Pack and store */
|
|
||||||
m5 = _mm_packs_epi32(m4, m5);
|
|
||||||
_mm_storeu_si128((__m128i *) &out[8 * i], m5);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
/* 8*N single precision floats scaled and converted with remainder */
|
|
||||||
static void _sse_convert_scale_ps_si16(short *restrict out,
|
|
||||||
float *restrict in,
|
|
||||||
float scale, int len)
|
|
||||||
{
|
|
||||||
int start = len / 8 * 8;
|
|
||||||
|
|
||||||
_sse_convert_scale_ps_si16_8n(out, in, scale, len);
|
|
||||||
|
|
||||||
for (int i = 0; i < len % 8; i++)
|
|
||||||
out[start + i] = in[start + i] * scale;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* 16*N single precision floats scaled and converted to 16-bit signed integer */
|
|
||||||
static void _sse_convert_scale_ps_si16_16n(short *restrict out,
|
|
||||||
float *restrict in,
|
|
||||||
float scale, int len)
|
|
||||||
{
|
|
||||||
__m128 m0, m1, m2, m3, m4;
|
|
||||||
__m128i m5, m6, m7, m8;
|
|
||||||
|
|
||||||
for (int i = 0; i < len / 16; i++) {
|
|
||||||
/* Load (unaligned) packed floats */
|
|
||||||
m0 = _mm_loadu_ps(&in[16 * i + 0]);
|
|
||||||
m1 = _mm_loadu_ps(&in[16 * i + 4]);
|
|
||||||
m2 = _mm_loadu_ps(&in[16 * i + 8]);
|
|
||||||
m3 = _mm_loadu_ps(&in[16 * i + 12]);
|
|
||||||
m4 = _mm_load1_ps(&scale);
|
|
||||||
|
|
||||||
/* Scale */
|
|
||||||
m0 = _mm_mul_ps(m0, m4);
|
|
||||||
m1 = _mm_mul_ps(m1, m4);
|
|
||||||
m2 = _mm_mul_ps(m2, m4);
|
|
||||||
m3 = _mm_mul_ps(m3, m4);
|
|
||||||
|
|
||||||
/* Convert */
|
|
||||||
m5 = _mm_cvtps_epi32(m0);
|
|
||||||
m6 = _mm_cvtps_epi32(m1);
|
|
||||||
m7 = _mm_cvtps_epi32(m2);
|
|
||||||
m8 = _mm_cvtps_epi32(m3);
|
|
||||||
|
|
||||||
/* Pack and store */
|
|
||||||
m5 = _mm_packs_epi32(m5, m6);
|
|
||||||
m7 = _mm_packs_epi32(m7, m8);
|
|
||||||
_mm_storeu_si128((__m128i *) &out[16 * i + 0], m5);
|
|
||||||
_mm_storeu_si128((__m128i *) &out[16 * i + 8], m7);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
#else /* HAVE_SSE3 */
|
|
||||||
static void convert_scale_ps_si16(short *out, float *in, float scale, int len)
|
|
||||||
{
|
|
||||||
for (int i = 0; i < len; i++)
|
|
||||||
out[i] = in[i] * scale;
|
|
||||||
}
|
|
||||||
#endif
|
#endif
|
||||||
|
|
||||||
#ifndef HAVE_SSE4_1
|
|
||||||
static void convert_si16_ps(float *out, short *in, int len)
|
|
||||||
{
|
|
||||||
for (int i = 0; i < len; i++)
|
|
||||||
out[i] = in[i];
|
|
||||||
}
|
|
||||||
#endif
|
|
||||||
|
|
||||||
void convert_float_short(short *out, float *in, float scale, int len)
|
|
||||||
{
|
|
||||||
#ifdef HAVE_SSE3
|
#ifdef HAVE_SSE3
|
||||||
|
if (__builtin_cpu_supports("sse3")) {
|
||||||
|
c.convert_scale_ps_si16_16n = _sse_convert_scale_ps_si16_16n;
|
||||||
|
c.convert_scale_ps_si16_8n = _sse_convert_scale_ps_si16_8n;
|
||||||
|
c.convert_scale_ps_si16 = _sse_convert_scale_ps_si16;
|
||||||
|
}
|
||||||
|
#endif
|
||||||
|
#endif
|
||||||
|
}
|
||||||
|
|
||||||
|
void convert_float_short(short *out, const float *in, float scale, int len)
|
||||||
|
{
|
||||||
if (!(len % 16))
|
if (!(len % 16))
|
||||||
_sse_convert_scale_ps_si16_16n(out, in, scale, len);
|
c.convert_scale_ps_si16_16n(out, in, scale, len);
|
||||||
else if (!(len % 8))
|
else if (!(len % 8))
|
||||||
_sse_convert_scale_ps_si16_8n(out, in, scale, len);
|
c.convert_scale_ps_si16_8n(out, in, scale, len);
|
||||||
else
|
else
|
||||||
_sse_convert_scale_ps_si16(out, in, scale, len);
|
c.convert_scale_ps_si16(out, in, scale, len);
|
||||||
#else
|
|
||||||
convert_scale_ps_si16(out, in, scale, len);
|
|
||||||
#endif
|
|
||||||
}
|
}
|
||||||
|
|
||||||
void convert_short_float(float *out, short *in, int len)
|
void convert_short_float(float *out, const short *in, int len)
|
||||||
{
|
{
|
||||||
#ifdef HAVE_SSE4_1
|
|
||||||
if (!(len % 16))
|
if (!(len % 16))
|
||||||
_sse_convert_si16_ps_16n(out, in, len);
|
c.convert_si16_ps_16n(out, in, len);
|
||||||
else
|
else
|
||||||
_sse_convert_si16_ps(out, in, len);
|
c.convert_si16_ps(out, in, len);
|
||||||
#else
|
|
||||||
convert_si16_ps(out, in, len);
|
|
||||||
#endif
|
|
||||||
}
|
}
|
||||||
|
|||||||
107
Transceiver52M/x86/convert_sse_3.c
Normal file
107
Transceiver52M/x86/convert_sse_3.c
Normal file
@@ -0,0 +1,107 @@
|
|||||||
|
/*
|
||||||
|
* SSE type conversions
|
||||||
|
* Copyright (C) 2013 Thomas Tsou <tom@tsou.cc>
|
||||||
|
*
|
||||||
|
* This library is free software; you can redistribute it and/or
|
||||||
|
* modify it under the terms of the GNU Lesser General Public
|
||||||
|
* License as published by the Free Software Foundation; either
|
||||||
|
* version 2.1 of the License, or (at your option) any later version.
|
||||||
|
*
|
||||||
|
* This library is distributed in the hope that it will be useful,
|
||||||
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||||
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
||||||
|
* Lesser General Public License for more details.
|
||||||
|
*
|
||||||
|
* You should have received a copy of the GNU Lesser General Public
|
||||||
|
* License along with this library; if not, write to the Free Software
|
||||||
|
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
|
||||||
|
*/
|
||||||
|
|
||||||
|
#include <malloc.h>
|
||||||
|
#include <string.h>
|
||||||
|
#include "convert_sse_3.h"
|
||||||
|
|
||||||
|
#ifdef HAVE_CONFIG_H
|
||||||
|
#include "config.h"
|
||||||
|
#endif
|
||||||
|
|
||||||
|
#ifdef HAVE_SSE3
|
||||||
|
#include <xmmintrin.h>
|
||||||
|
#include <emmintrin.h>
|
||||||
|
|
||||||
|
/* 8*N single precision floats scaled and converted to 16-bit signed integer */
|
||||||
|
void _sse_convert_scale_ps_si16_8n(short *restrict out,
|
||||||
|
const float *restrict in,
|
||||||
|
float scale, int len)
|
||||||
|
{
|
||||||
|
__m128 m0, m1, m2;
|
||||||
|
__m128i m4, m5;
|
||||||
|
|
||||||
|
for (int i = 0; i < len / 8; i++) {
|
||||||
|
/* Load (unaligned) packed floats */
|
||||||
|
m0 = _mm_loadu_ps(&in[8 * i + 0]);
|
||||||
|
m1 = _mm_loadu_ps(&in[8 * i + 4]);
|
||||||
|
m2 = _mm_load1_ps(&scale);
|
||||||
|
|
||||||
|
/* Scale */
|
||||||
|
m0 = _mm_mul_ps(m0, m2);
|
||||||
|
m1 = _mm_mul_ps(m1, m2);
|
||||||
|
|
||||||
|
/* Convert */
|
||||||
|
m4 = _mm_cvtps_epi32(m0);
|
||||||
|
m5 = _mm_cvtps_epi32(m1);
|
||||||
|
|
||||||
|
/* Pack and store */
|
||||||
|
m5 = _mm_packs_epi32(m4, m5);
|
||||||
|
_mm_storeu_si128((__m128i *) & out[8 * i], m5);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
/* 8*N single precision floats scaled and converted with remainder */
|
||||||
|
void _sse_convert_scale_ps_si16(short *restrict out,
|
||||||
|
const float *restrict in, float scale, int len)
|
||||||
|
{
|
||||||
|
int start = len / 8 * 8;
|
||||||
|
|
||||||
|
_sse_convert_scale_ps_si16_8n(out, in, scale, len);
|
||||||
|
|
||||||
|
for (int i = 0; i < len % 8; i++)
|
||||||
|
out[start + i] = in[start + i] * scale;
|
||||||
|
}
|
||||||
|
|
||||||
|
/* 16*N single precision floats scaled and converted to 16-bit signed integer */
|
||||||
|
void _sse_convert_scale_ps_si16_16n(short *restrict out,
|
||||||
|
const float *restrict in,
|
||||||
|
float scale, int len)
|
||||||
|
{
|
||||||
|
__m128 m0, m1, m2, m3, m4;
|
||||||
|
__m128i m5, m6, m7, m8;
|
||||||
|
|
||||||
|
for (int i = 0; i < len / 16; i++) {
|
||||||
|
/* Load (unaligned) packed floats */
|
||||||
|
m0 = _mm_loadu_ps(&in[16 * i + 0]);
|
||||||
|
m1 = _mm_loadu_ps(&in[16 * i + 4]);
|
||||||
|
m2 = _mm_loadu_ps(&in[16 * i + 8]);
|
||||||
|
m3 = _mm_loadu_ps(&in[16 * i + 12]);
|
||||||
|
m4 = _mm_load1_ps(&scale);
|
||||||
|
|
||||||
|
/* Scale */
|
||||||
|
m0 = _mm_mul_ps(m0, m4);
|
||||||
|
m1 = _mm_mul_ps(m1, m4);
|
||||||
|
m2 = _mm_mul_ps(m2, m4);
|
||||||
|
m3 = _mm_mul_ps(m3, m4);
|
||||||
|
|
||||||
|
/* Convert */
|
||||||
|
m5 = _mm_cvtps_epi32(m0);
|
||||||
|
m6 = _mm_cvtps_epi32(m1);
|
||||||
|
m7 = _mm_cvtps_epi32(m2);
|
||||||
|
m8 = _mm_cvtps_epi32(m3);
|
||||||
|
|
||||||
|
/* Pack and store */
|
||||||
|
m5 = _mm_packs_epi32(m5, m6);
|
||||||
|
m7 = _mm_packs_epi32(m7, m8);
|
||||||
|
_mm_storeu_si128((__m128i *) & out[16 * i + 0], m5);
|
||||||
|
_mm_storeu_si128((__m128i *) & out[16 * i + 8], m7);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
#endif
|
||||||
34
Transceiver52M/x86/convert_sse_3.h
Normal file
34
Transceiver52M/x86/convert_sse_3.h
Normal file
@@ -0,0 +1,34 @@
|
|||||||
|
/*
|
||||||
|
* SSE type conversions
|
||||||
|
* Copyright (C) 2013 Thomas Tsou <tom@tsou.cc>
|
||||||
|
*
|
||||||
|
* This library is free software; you can redistribute it and/or
|
||||||
|
* modify it under the terms of the GNU Lesser General Public
|
||||||
|
* License as published by the Free Software Foundation; either
|
||||||
|
* version 2.1 of the License, or (at your option) any later version.
|
||||||
|
*
|
||||||
|
* This library is distributed in the hope that it will be useful,
|
||||||
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||||
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
||||||
|
* Lesser General Public License for more details.
|
||||||
|
*
|
||||||
|
* You should have received a copy of the GNU Lesser General Public
|
||||||
|
* License along with this library; if not, write to the Free Software
|
||||||
|
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
|
||||||
|
*/
|
||||||
|
|
||||||
|
#pragma once
|
||||||
|
|
||||||
|
/* 8*N single precision floats scaled and converted to 16-bit signed integer */
|
||||||
|
void _sse_convert_scale_ps_si16_8n(short *restrict out,
|
||||||
|
const float *restrict in,
|
||||||
|
float scale, int len);
|
||||||
|
|
||||||
|
/* 8*N single precision floats scaled and converted with remainder */
|
||||||
|
void _sse_convert_scale_ps_si16(short *restrict out,
|
||||||
|
const float *restrict in, float scale, int len);
|
||||||
|
|
||||||
|
/* 16*N single precision floats scaled and converted to 16-bit signed integer */
|
||||||
|
void _sse_convert_scale_ps_si16_16n(short *restrict out,
|
||||||
|
const float *restrict in,
|
||||||
|
float scale, int len);
|
||||||
77
Transceiver52M/x86/convert_sse_4_1.c
Normal file
77
Transceiver52M/x86/convert_sse_4_1.c
Normal file
@@ -0,0 +1,77 @@
|
|||||||
|
/*
|
||||||
|
* SSE type conversions
|
||||||
|
* Copyright (C) 2013 Thomas Tsou <tom@tsou.cc>
|
||||||
|
*
|
||||||
|
* This library is free software; you can redistribute it and/or
|
||||||
|
* modify it under the terms of the GNU Lesser General Public
|
||||||
|
* License as published by the Free Software Foundation; either
|
||||||
|
* version 2.1 of the License, or (at your option) any later version.
|
||||||
|
*
|
||||||
|
* This library is distributed in the hope that it will be useful,
|
||||||
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||||
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
||||||
|
* Lesser General Public License for more details.
|
||||||
|
*
|
||||||
|
* You should have received a copy of the GNU Lesser General Public
|
||||||
|
* License along with this library; if not, write to the Free Software
|
||||||
|
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
|
||||||
|
*/
|
||||||
|
|
||||||
|
#include <malloc.h>
|
||||||
|
#include <string.h>
|
||||||
|
#include "convert_sse_4_1.h"
|
||||||
|
|
||||||
|
#ifdef HAVE_CONFIG_H
|
||||||
|
#include "config.h"
|
||||||
|
#endif
|
||||||
|
|
||||||
|
#ifdef HAVE_SSE4_1
|
||||||
|
#include <smmintrin.h>
|
||||||
|
|
||||||
|
/* 16*N 16-bit signed integer converted to single precision floats */
|
||||||
|
void _sse_convert_si16_ps_16n(float *restrict out,
|
||||||
|
const short *restrict in, int len)
|
||||||
|
{
|
||||||
|
__m128i m0, m1, m2, m3, m4, m5;
|
||||||
|
__m128 m6, m7, m8, m9;
|
||||||
|
|
||||||
|
for (int i = 0; i < len / 16; i++) {
|
||||||
|
/* Load (unaligned) packed floats */
|
||||||
|
m0 = _mm_loadu_si128((__m128i *) & in[16 * i + 0]);
|
||||||
|
m1 = _mm_loadu_si128((__m128i *) & in[16 * i + 8]);
|
||||||
|
|
||||||
|
/* Unpack */
|
||||||
|
m2 = _mm_cvtepi16_epi32(m0);
|
||||||
|
m4 = _mm_cvtepi16_epi32(m1);
|
||||||
|
m0 = _mm_shuffle_epi32(m0, _MM_SHUFFLE(1, 0, 3, 2));
|
||||||
|
m1 = _mm_shuffle_epi32(m1, _MM_SHUFFLE(1, 0, 3, 2));
|
||||||
|
m3 = _mm_cvtepi16_epi32(m0);
|
||||||
|
m5 = _mm_cvtepi16_epi32(m1);
|
||||||
|
|
||||||
|
/* Convert */
|
||||||
|
m6 = _mm_cvtepi32_ps(m2);
|
||||||
|
m7 = _mm_cvtepi32_ps(m3);
|
||||||
|
m8 = _mm_cvtepi32_ps(m4);
|
||||||
|
m9 = _mm_cvtepi32_ps(m5);
|
||||||
|
|
||||||
|
/* Store */
|
||||||
|
_mm_storeu_ps(&out[16 * i + 0], m6);
|
||||||
|
_mm_storeu_ps(&out[16 * i + 4], m7);
|
||||||
|
_mm_storeu_ps(&out[16 * i + 8], m8);
|
||||||
|
_mm_storeu_ps(&out[16 * i + 12], m9);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
/* 16*N 16-bit signed integer conversion with remainder */
|
||||||
|
void _sse_convert_si16_ps(float *restrict out,
|
||||||
|
const short *restrict in, int len)
|
||||||
|
{
|
||||||
|
int start = len / 16 * 16;
|
||||||
|
|
||||||
|
_sse_convert_si16_ps_16n(out, in, len);
|
||||||
|
|
||||||
|
for (int i = 0; i < len % 16; i++)
|
||||||
|
out[start + i] = in[start + i];
|
||||||
|
}
|
||||||
|
|
||||||
|
#endif
|
||||||
28
Transceiver52M/x86/convert_sse_4_1.h
Normal file
28
Transceiver52M/x86/convert_sse_4_1.h
Normal file
@@ -0,0 +1,28 @@
|
|||||||
|
/*
|
||||||
|
* SSE type conversions
|
||||||
|
* Copyright (C) 2013 Thomas Tsou <tom@tsou.cc>
|
||||||
|
*
|
||||||
|
* This library is free software; you can redistribute it and/or
|
||||||
|
* modify it under the terms of the GNU Lesser General Public
|
||||||
|
* License as published by the Free Software Foundation; either
|
||||||
|
* version 2.1 of the License, or (at your option) any later version.
|
||||||
|
*
|
||||||
|
* This library is distributed in the hope that it will be useful,
|
||||||
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||||
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
||||||
|
* Lesser General Public License for more details.
|
||||||
|
*
|
||||||
|
* You should have received a copy of the GNU Lesser General Public
|
||||||
|
* License along with this library; if not, write to the Free Software
|
||||||
|
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
|
||||||
|
*/
|
||||||
|
|
||||||
|
#pragma once
|
||||||
|
|
||||||
|
/* 16*N 16-bit signed integer converted to single precision floats */
|
||||||
|
void _sse_convert_si16_ps_16n(float *restrict out,
|
||||||
|
const short *restrict in, int len);
|
||||||
|
|
||||||
|
/* 16*N 16-bit signed integer conversion with remainder */
|
||||||
|
void _sse_convert_si16_ps(float *restrict out,
|
||||||
|
const short *restrict in, int len);
|
||||||
@@ -21,20 +21,46 @@
|
|||||||
#include <string.h>
|
#include <string.h>
|
||||||
#include <stdio.h>
|
#include <stdio.h>
|
||||||
#include "convolve.h"
|
#include "convolve.h"
|
||||||
|
#include "convolve_sse_3.h"
|
||||||
|
|
||||||
#ifdef HAVE_CONFIG_H
|
#ifdef HAVE_CONFIG_H
|
||||||
#include "config.h"
|
#include "config.h"
|
||||||
#endif
|
#endif
|
||||||
|
|
||||||
|
/* Architecture dependant function pointers */
|
||||||
|
struct convolve_cpu_context {
|
||||||
|
void (*conv_cmplx_4n) (const float *, int, const float *, int, float *,
|
||||||
|
int, int, int, int, int);
|
||||||
|
void (*conv_cmplx_8n) (const float *, int, const float *, int, float *,
|
||||||
|
int, int, int, int, int);
|
||||||
|
void (*conv_cmplx) (const float *, int, const float *, int, float *,
|
||||||
|
int, int, int, int, int);
|
||||||
|
void (*conv_real4) (const float *, int, const float *, int, float *,
|
||||||
|
int, int, int, int, int);
|
||||||
|
void (*conv_real8) (const float *, int, const float *, int, float *,
|
||||||
|
int, int, int, int, int);
|
||||||
|
void (*conv_real12) (const float *, int, const float *, int, float *,
|
||||||
|
int, int, int, int, int);
|
||||||
|
void (*conv_real16) (const float *, int, const float *, int, float *,
|
||||||
|
int, int, int, int, int);
|
||||||
|
void (*conv_real20) (const float *, int, const float *, int, float *,
|
||||||
|
int, int, int, int, int);
|
||||||
|
void (*conv_real4n) (const float *, int, const float *, int, float *,
|
||||||
|
int, int, int, int, int);
|
||||||
|
void (*conv_real) (const float *, int, const float *, int, float *, int,
|
||||||
|
int, int, int, int);
|
||||||
|
};
|
||||||
|
static struct convolve_cpu_context c;
|
||||||
|
|
||||||
/* Forward declarations from base implementation */
|
/* Forward declarations from base implementation */
|
||||||
int _base_convolve_real(float *x, int x_len,
|
int _base_convolve_real(const float *x, int x_len,
|
||||||
float *h, int h_len,
|
const float *h, int h_len,
|
||||||
float *y, int y_len,
|
float *y, int y_len,
|
||||||
int start, int len,
|
int start, int len,
|
||||||
int step, int offset);
|
int step, int offset);
|
||||||
|
|
||||||
int _base_convolve_complex(float *x, int x_len,
|
int _base_convolve_complex(const float *x, int x_len,
|
||||||
float *h, int h_len,
|
const float *h, int h_len,
|
||||||
float *y, int y_len,
|
float *y, int y_len,
|
||||||
int start, int len,
|
int start, int len,
|
||||||
int step, int offset);
|
int step, int offset);
|
||||||
@@ -42,560 +68,105 @@ int _base_convolve_complex(float *x, int x_len,
|
|||||||
int bounds_check(int x_len, int h_len, int y_len,
|
int bounds_check(int x_len, int h_len, int y_len,
|
||||||
int start, int len, int step);
|
int start, int len, int step);
|
||||||
|
|
||||||
#ifdef HAVE_SSE3
|
/* API: Initalize convolve module */
|
||||||
#include <xmmintrin.h>
|
void convolve_init(void)
|
||||||
#include <pmmintrin.h>
|
|
||||||
|
|
||||||
/* 4-tap SSE complex-real convolution */
|
|
||||||
static void sse_conv_real4(float *restrict x,
|
|
||||||
float *restrict h,
|
|
||||||
float *restrict y,
|
|
||||||
int len)
|
|
||||||
{
|
{
|
||||||
__m128 m0, m1, m2, m3, m4, m5, m6, m7;
|
c.conv_cmplx_4n = (void *)_base_convolve_complex;
|
||||||
|
c.conv_cmplx_8n = (void *)_base_convolve_complex;
|
||||||
|
c.conv_cmplx = (void *)_base_convolve_complex;
|
||||||
|
c.conv_real4 = (void *)_base_convolve_real;
|
||||||
|
c.conv_real8 = (void *)_base_convolve_real;
|
||||||
|
c.conv_real12 = (void *)_base_convolve_real;
|
||||||
|
c.conv_real16 = (void *)_base_convolve_real;
|
||||||
|
c.conv_real20 = (void *)_base_convolve_real;
|
||||||
|
c.conv_real4n = (void *)_base_convolve_real;
|
||||||
|
c.conv_real = (void *)_base_convolve_real;
|
||||||
|
|
||||||
/* Load (aligned) filter taps */
|
#if defined(HAVE_SSE3) && defined(HAVE___BUILTIN_CPU_SUPPORTS)
|
||||||
m0 = _mm_load_ps(&h[0]);
|
if (__builtin_cpu_supports("sse3")) {
|
||||||
m1 = _mm_load_ps(&h[4]);
|
c.conv_cmplx_4n = sse_conv_cmplx_4n;
|
||||||
m7 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(0, 2, 0, 2));
|
c.conv_cmplx_8n = sse_conv_cmplx_8n;
|
||||||
|
c.conv_real4 = sse_conv_real4;
|
||||||
for (int i = 0; i < len; i++) {
|
c.conv_real8 = sse_conv_real8;
|
||||||
/* Load (unaligned) input data */
|
c.conv_real12 = sse_conv_real12;
|
||||||
m0 = _mm_loadu_ps(&x[2 * i + 0]);
|
c.conv_real16 = sse_conv_real16;
|
||||||
m1 = _mm_loadu_ps(&x[2 * i + 4]);
|
c.conv_real20 = sse_conv_real20;
|
||||||
m2 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(0, 2, 0, 2));
|
c.conv_real4n = sse_conv_real4n;
|
||||||
m3 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(1, 3, 1, 3));
|
|
||||||
|
|
||||||
/* Quad multiply */
|
|
||||||
m4 = _mm_mul_ps(m2, m7);
|
|
||||||
m5 = _mm_mul_ps(m3, m7);
|
|
||||||
|
|
||||||
/* Sum and store */
|
|
||||||
m6 = _mm_hadd_ps(m4, m5);
|
|
||||||
m0 = _mm_hadd_ps(m6, m6);
|
|
||||||
|
|
||||||
_mm_store_ss(&y[2 * i + 0], m0);
|
|
||||||
m0 = _mm_shuffle_ps(m0, m0, _MM_SHUFFLE(0, 3, 2, 1));
|
|
||||||
_mm_store_ss(&y[2 * i + 1], m0);
|
|
||||||
}
|
}
|
||||||
}
|
|
||||||
|
|
||||||
/* 8-tap SSE complex-real convolution */
|
|
||||||
static void sse_conv_real8(float *restrict x,
|
|
||||||
float *restrict h,
|
|
||||||
float *restrict y,
|
|
||||||
int len)
|
|
||||||
{
|
|
||||||
__m128 m0, m1, m2, m3, m4, m5, m6, m7, m8, m9;
|
|
||||||
|
|
||||||
/* Load (aligned) filter taps */
|
|
||||||
m0 = _mm_load_ps(&h[0]);
|
|
||||||
m1 = _mm_load_ps(&h[4]);
|
|
||||||
m2 = _mm_load_ps(&h[8]);
|
|
||||||
m3 = _mm_load_ps(&h[12]);
|
|
||||||
|
|
||||||
m4 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(0, 2, 0, 2));
|
|
||||||
m5 = _mm_shuffle_ps(m2, m3, _MM_SHUFFLE(0, 2, 0, 2));
|
|
||||||
|
|
||||||
for (int i = 0; i < len; i++) {
|
|
||||||
/* Load (unaligned) input data */
|
|
||||||
m0 = _mm_loadu_ps(&x[2 * i + 0]);
|
|
||||||
m1 = _mm_loadu_ps(&x[2 * i + 4]);
|
|
||||||
m2 = _mm_loadu_ps(&x[2 * i + 8]);
|
|
||||||
m3 = _mm_loadu_ps(&x[2 * i + 12]);
|
|
||||||
|
|
||||||
m6 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(0, 2, 0, 2));
|
|
||||||
m7 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(1, 3, 1, 3));
|
|
||||||
m8 = _mm_shuffle_ps(m2, m3, _MM_SHUFFLE(0, 2, 0, 2));
|
|
||||||
m9 = _mm_shuffle_ps(m2, m3, _MM_SHUFFLE(1, 3, 1, 3));
|
|
||||||
|
|
||||||
/* Quad multiply */
|
|
||||||
m6 = _mm_mul_ps(m6, m4);
|
|
||||||
m7 = _mm_mul_ps(m7, m4);
|
|
||||||
m8 = _mm_mul_ps(m8, m5);
|
|
||||||
m9 = _mm_mul_ps(m9, m5);
|
|
||||||
|
|
||||||
/* Sum and store */
|
|
||||||
m6 = _mm_add_ps(m6, m8);
|
|
||||||
m7 = _mm_add_ps(m7, m9);
|
|
||||||
m6 = _mm_hadd_ps(m6, m7);
|
|
||||||
m6 = _mm_hadd_ps(m6, m6);
|
|
||||||
|
|
||||||
_mm_store_ss(&y[2 * i + 0], m6);
|
|
||||||
m6 = _mm_shuffle_ps(m6, m6, _MM_SHUFFLE(0, 3, 2, 1));
|
|
||||||
_mm_store_ss(&y[2 * i + 1], m6);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
/* 12-tap SSE complex-real convolution */
|
|
||||||
static void sse_conv_real12(float *restrict x,
|
|
||||||
float *restrict h,
|
|
||||||
float *restrict y,
|
|
||||||
int len)
|
|
||||||
{
|
|
||||||
__m128 m0, m1, m2, m3, m4, m5, m6, m7;
|
|
||||||
__m128 m8, m9, m10, m11, m12, m13, m14;
|
|
||||||
|
|
||||||
/* Load (aligned) filter taps */
|
|
||||||
m0 = _mm_load_ps(&h[0]);
|
|
||||||
m1 = _mm_load_ps(&h[4]);
|
|
||||||
m2 = _mm_load_ps(&h[8]);
|
|
||||||
m3 = _mm_load_ps(&h[12]);
|
|
||||||
m4 = _mm_load_ps(&h[16]);
|
|
||||||
m5 = _mm_load_ps(&h[20]);
|
|
||||||
|
|
||||||
m12 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(0, 2, 0, 2));
|
|
||||||
m13 = _mm_shuffle_ps(m2, m3, _MM_SHUFFLE(0, 2, 0, 2));
|
|
||||||
m14 = _mm_shuffle_ps(m4, m5, _MM_SHUFFLE(0, 2, 0, 2));
|
|
||||||
|
|
||||||
for (int i = 0; i < len; i++) {
|
|
||||||
/* Load (unaligned) input data */
|
|
||||||
m0 = _mm_loadu_ps(&x[2 * i + 0]);
|
|
||||||
m1 = _mm_loadu_ps(&x[2 * i + 4]);
|
|
||||||
m2 = _mm_loadu_ps(&x[2 * i + 8]);
|
|
||||||
m3 = _mm_loadu_ps(&x[2 * i + 12]);
|
|
||||||
|
|
||||||
m4 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(0, 2, 0, 2));
|
|
||||||
m5 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(1, 3, 1, 3));
|
|
||||||
m6 = _mm_shuffle_ps(m2, m3, _MM_SHUFFLE(0, 2, 0, 2));
|
|
||||||
m7 = _mm_shuffle_ps(m2, m3, _MM_SHUFFLE(1, 3, 1, 3));
|
|
||||||
|
|
||||||
m0 = _mm_loadu_ps(&x[2 * i + 16]);
|
|
||||||
m1 = _mm_loadu_ps(&x[2 * i + 20]);
|
|
||||||
|
|
||||||
m8 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(0, 2, 0, 2));
|
|
||||||
m9 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(1, 3, 1, 3));
|
|
||||||
|
|
||||||
/* Quad multiply */
|
|
||||||
m0 = _mm_mul_ps(m4, m12);
|
|
||||||
m1 = _mm_mul_ps(m5, m12);
|
|
||||||
m2 = _mm_mul_ps(m6, m13);
|
|
||||||
m3 = _mm_mul_ps(m7, m13);
|
|
||||||
m4 = _mm_mul_ps(m8, m14);
|
|
||||||
m5 = _mm_mul_ps(m9, m14);
|
|
||||||
|
|
||||||
/* Sum and store */
|
|
||||||
m8 = _mm_add_ps(m0, m2);
|
|
||||||
m9 = _mm_add_ps(m1, m3);
|
|
||||||
m10 = _mm_add_ps(m8, m4);
|
|
||||||
m11 = _mm_add_ps(m9, m5);
|
|
||||||
|
|
||||||
m2 = _mm_hadd_ps(m10, m11);
|
|
||||||
m3 = _mm_hadd_ps(m2, m2);
|
|
||||||
|
|
||||||
_mm_store_ss(&y[2 * i + 0], m3);
|
|
||||||
m3 = _mm_shuffle_ps(m3, m3, _MM_SHUFFLE(0, 3, 2, 1));
|
|
||||||
_mm_store_ss(&y[2 * i + 1], m3);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
/* 16-tap SSE complex-real convolution */
|
|
||||||
static void sse_conv_real16(float *restrict x,
|
|
||||||
float *restrict h,
|
|
||||||
float *restrict y,
|
|
||||||
int len)
|
|
||||||
{
|
|
||||||
__m128 m0, m1, m2, m3, m4, m5, m6, m7;
|
|
||||||
__m128 m8, m9, m10, m11, m12, m13, m14, m15;
|
|
||||||
|
|
||||||
/* Load (aligned) filter taps */
|
|
||||||
m0 = _mm_load_ps(&h[0]);
|
|
||||||
m1 = _mm_load_ps(&h[4]);
|
|
||||||
m2 = _mm_load_ps(&h[8]);
|
|
||||||
m3 = _mm_load_ps(&h[12]);
|
|
||||||
|
|
||||||
m4 = _mm_load_ps(&h[16]);
|
|
||||||
m5 = _mm_load_ps(&h[20]);
|
|
||||||
m6 = _mm_load_ps(&h[24]);
|
|
||||||
m7 = _mm_load_ps(&h[28]);
|
|
||||||
|
|
||||||
m12 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(0, 2, 0, 2));
|
|
||||||
m13 = _mm_shuffle_ps(m2, m3, _MM_SHUFFLE(0, 2, 0, 2));
|
|
||||||
m14 = _mm_shuffle_ps(m4, m5, _MM_SHUFFLE(0, 2, 0, 2));
|
|
||||||
m15 = _mm_shuffle_ps(m6, m7, _MM_SHUFFLE(0, 2, 0, 2));
|
|
||||||
|
|
||||||
for (int i = 0; i < len; i++) {
|
|
||||||
/* Load (unaligned) input data */
|
|
||||||
m0 = _mm_loadu_ps(&x[2 * i + 0]);
|
|
||||||
m1 = _mm_loadu_ps(&x[2 * i + 4]);
|
|
||||||
m2 = _mm_loadu_ps(&x[2 * i + 8]);
|
|
||||||
m3 = _mm_loadu_ps(&x[2 * i + 12]);
|
|
||||||
|
|
||||||
m4 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(0, 2, 0, 2));
|
|
||||||
m5 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(1, 3, 1, 3));
|
|
||||||
m6 = _mm_shuffle_ps(m2, m3, _MM_SHUFFLE(0, 2, 0, 2));
|
|
||||||
m7 = _mm_shuffle_ps(m2, m3, _MM_SHUFFLE(1, 3, 1, 3));
|
|
||||||
|
|
||||||
m0 = _mm_loadu_ps(&x[2 * i + 16]);
|
|
||||||
m1 = _mm_loadu_ps(&x[2 * i + 20]);
|
|
||||||
m2 = _mm_loadu_ps(&x[2 * i + 24]);
|
|
||||||
m3 = _mm_loadu_ps(&x[2 * i + 28]);
|
|
||||||
|
|
||||||
m8 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(0, 2, 0, 2));
|
|
||||||
m9 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(1, 3, 1, 3));
|
|
||||||
m10 = _mm_shuffle_ps(m2, m3, _MM_SHUFFLE(0, 2, 0, 2));
|
|
||||||
m11 = _mm_shuffle_ps(m2, m3, _MM_SHUFFLE(1, 3, 1, 3));
|
|
||||||
|
|
||||||
/* Quad multiply */
|
|
||||||
m0 = _mm_mul_ps(m4, m12);
|
|
||||||
m1 = _mm_mul_ps(m5, m12);
|
|
||||||
m2 = _mm_mul_ps(m6, m13);
|
|
||||||
m3 = _mm_mul_ps(m7, m13);
|
|
||||||
|
|
||||||
m4 = _mm_mul_ps(m8, m14);
|
|
||||||
m5 = _mm_mul_ps(m9, m14);
|
|
||||||
m6 = _mm_mul_ps(m10, m15);
|
|
||||||
m7 = _mm_mul_ps(m11, m15);
|
|
||||||
|
|
||||||
/* Sum and store */
|
|
||||||
m8 = _mm_add_ps(m0, m2);
|
|
||||||
m9 = _mm_add_ps(m1, m3);
|
|
||||||
m10 = _mm_add_ps(m4, m6);
|
|
||||||
m11 = _mm_add_ps(m5, m7);
|
|
||||||
|
|
||||||
m0 = _mm_add_ps(m8, m10);
|
|
||||||
m1 = _mm_add_ps(m9, m11);
|
|
||||||
m2 = _mm_hadd_ps(m0, m1);
|
|
||||||
m3 = _mm_hadd_ps(m2, m2);
|
|
||||||
|
|
||||||
_mm_store_ss(&y[2 * i + 0], m3);
|
|
||||||
m3 = _mm_shuffle_ps(m3, m3, _MM_SHUFFLE(0, 3, 2, 1));
|
|
||||||
_mm_store_ss(&y[2 * i + 1], m3);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
/* 20-tap SSE complex-real convolution */
|
|
||||||
static void sse_conv_real20(float *restrict x,
|
|
||||||
float *restrict h,
|
|
||||||
float *restrict y,
|
|
||||||
int len)
|
|
||||||
{
|
|
||||||
__m128 m0, m1, m2, m3, m4, m5, m6, m7;
|
|
||||||
__m128 m8, m9, m11, m12, m13, m14, m15;
|
|
||||||
|
|
||||||
/* Load (aligned) filter taps */
|
|
||||||
m0 = _mm_load_ps(&h[0]);
|
|
||||||
m1 = _mm_load_ps(&h[4]);
|
|
||||||
m2 = _mm_load_ps(&h[8]);
|
|
||||||
m3 = _mm_load_ps(&h[12]);
|
|
||||||
m4 = _mm_load_ps(&h[16]);
|
|
||||||
m5 = _mm_load_ps(&h[20]);
|
|
||||||
m6 = _mm_load_ps(&h[24]);
|
|
||||||
m7 = _mm_load_ps(&h[28]);
|
|
||||||
m8 = _mm_load_ps(&h[32]);
|
|
||||||
m9 = _mm_load_ps(&h[36]);
|
|
||||||
|
|
||||||
m11 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(0, 2, 0, 2));
|
|
||||||
m12 = _mm_shuffle_ps(m2, m3, _MM_SHUFFLE(0, 2, 0, 2));
|
|
||||||
m13 = _mm_shuffle_ps(m4, m5, _MM_SHUFFLE(0, 2, 0, 2));
|
|
||||||
m14 = _mm_shuffle_ps(m6, m7, _MM_SHUFFLE(0, 2, 0, 2));
|
|
||||||
m15 = _mm_shuffle_ps(m8, m9, _MM_SHUFFLE(0, 2, 0, 2));
|
|
||||||
|
|
||||||
for (int i = 0; i < len; i++) {
|
|
||||||
/* Multiply-accumulate first 12 taps */
|
|
||||||
m0 = _mm_loadu_ps(&x[2 * i + 0]);
|
|
||||||
m1 = _mm_loadu_ps(&x[2 * i + 4]);
|
|
||||||
m2 = _mm_loadu_ps(&x[2 * i + 8]);
|
|
||||||
m3 = _mm_loadu_ps(&x[2 * i + 12]);
|
|
||||||
m4 = _mm_loadu_ps(&x[2 * i + 16]);
|
|
||||||
m5 = _mm_loadu_ps(&x[2 * i + 20]);
|
|
||||||
|
|
||||||
m6 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(0, 2, 0, 2));
|
|
||||||
m7 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(1, 3, 1, 3));
|
|
||||||
m8 = _mm_shuffle_ps(m2, m3, _MM_SHUFFLE(0, 2, 0, 2));
|
|
||||||
m9 = _mm_shuffle_ps(m2, m3, _MM_SHUFFLE(1, 3, 1, 3));
|
|
||||||
m0 = _mm_shuffle_ps(m4, m5, _MM_SHUFFLE(0, 2, 0, 2));
|
|
||||||
m1 = _mm_shuffle_ps(m4, m5, _MM_SHUFFLE(1, 3, 1, 3));
|
|
||||||
|
|
||||||
m2 = _mm_mul_ps(m6, m11);
|
|
||||||
m3 = _mm_mul_ps(m7, m11);
|
|
||||||
m4 = _mm_mul_ps(m8, m12);
|
|
||||||
m5 = _mm_mul_ps(m9, m12);
|
|
||||||
m6 = _mm_mul_ps(m0, m13);
|
|
||||||
m7 = _mm_mul_ps(m1, m13);
|
|
||||||
|
|
||||||
m0 = _mm_add_ps(m2, m4);
|
|
||||||
m1 = _mm_add_ps(m3, m5);
|
|
||||||
m8 = _mm_add_ps(m0, m6);
|
|
||||||
m9 = _mm_add_ps(m1, m7);
|
|
||||||
|
|
||||||
/* Multiply-accumulate last 8 taps */
|
|
||||||
m0 = _mm_loadu_ps(&x[2 * i + 24]);
|
|
||||||
m1 = _mm_loadu_ps(&x[2 * i + 28]);
|
|
||||||
m2 = _mm_loadu_ps(&x[2 * i + 32]);
|
|
||||||
m3 = _mm_loadu_ps(&x[2 * i + 36]);
|
|
||||||
|
|
||||||
m4 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(0, 2, 0, 2));
|
|
||||||
m5 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(1, 3, 1, 3));
|
|
||||||
m6 = _mm_shuffle_ps(m2, m3, _MM_SHUFFLE(0, 2, 0, 2));
|
|
||||||
m7 = _mm_shuffle_ps(m2, m3, _MM_SHUFFLE(1, 3, 1, 3));
|
|
||||||
|
|
||||||
m0 = _mm_mul_ps(m4, m14);
|
|
||||||
m1 = _mm_mul_ps(m5, m14);
|
|
||||||
m2 = _mm_mul_ps(m6, m15);
|
|
||||||
m3 = _mm_mul_ps(m7, m15);
|
|
||||||
|
|
||||||
m4 = _mm_add_ps(m0, m2);
|
|
||||||
m5 = _mm_add_ps(m1, m3);
|
|
||||||
|
|
||||||
/* Final sum and store */
|
|
||||||
m0 = _mm_add_ps(m8, m4);
|
|
||||||
m1 = _mm_add_ps(m9, m5);
|
|
||||||
m2 = _mm_hadd_ps(m0, m1);
|
|
||||||
m3 = _mm_hadd_ps(m2, m2);
|
|
||||||
|
|
||||||
_mm_store_ss(&y[2 * i + 0], m3);
|
|
||||||
m3 = _mm_shuffle_ps(m3, m3, _MM_SHUFFLE(0, 3, 2, 1));
|
|
||||||
_mm_store_ss(&y[2 * i + 1], m3);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
/* 4*N-tap SSE complex-real convolution */
|
|
||||||
static void sse_conv_real4n(float *x, float *h, float *y, int h_len, int len)
|
|
||||||
{
|
|
||||||
__m128 m0, m1, m2, m4, m5, m6, m7;
|
|
||||||
|
|
||||||
for (int i = 0; i < len; i++) {
|
|
||||||
/* Zero */
|
|
||||||
m6 = _mm_setzero_ps();
|
|
||||||
m7 = _mm_setzero_ps();
|
|
||||||
|
|
||||||
for (int n = 0; n < h_len / 4; n++) {
|
|
||||||
/* Load (aligned) filter taps */
|
|
||||||
m0 = _mm_load_ps(&h[8 * n + 0]);
|
|
||||||
m1 = _mm_load_ps(&h[8 * n + 4]);
|
|
||||||
m2 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(0, 2, 0, 2));
|
|
||||||
|
|
||||||
/* Load (unaligned) input data */
|
|
||||||
m0 = _mm_loadu_ps(&x[2 * i + 8 * n + 0]);
|
|
||||||
m1 = _mm_loadu_ps(&x[2 * i + 8 * n + 4]);
|
|
||||||
m4 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(0, 2, 0, 2));
|
|
||||||
m5 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(1, 3, 1, 3));
|
|
||||||
|
|
||||||
/* Quad multiply */
|
|
||||||
m0 = _mm_mul_ps(m2, m4);
|
|
||||||
m1 = _mm_mul_ps(m2, m5);
|
|
||||||
|
|
||||||
/* Accumulate */
|
|
||||||
m6 = _mm_add_ps(m6, m0);
|
|
||||||
m7 = _mm_add_ps(m7, m1);
|
|
||||||
}
|
|
||||||
|
|
||||||
m0 = _mm_hadd_ps(m6, m7);
|
|
||||||
m0 = _mm_hadd_ps(m0, m0);
|
|
||||||
|
|
||||||
_mm_store_ss(&y[2 * i + 0], m0);
|
|
||||||
m0 = _mm_shuffle_ps(m0, m0, _MM_SHUFFLE(0, 3, 2, 1));
|
|
||||||
_mm_store_ss(&y[2 * i + 1], m0);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
/* 4*N-tap SSE complex-complex convolution */
|
|
||||||
static void sse_conv_cmplx_4n(float *x, float *h, float *y, int h_len, int len)
|
|
||||||
{
|
|
||||||
__m128 m0, m1, m2, m3, m4, m5, m6, m7;
|
|
||||||
|
|
||||||
for (int i = 0; i < len; i++) {
|
|
||||||
/* Zero */
|
|
||||||
m6 = _mm_setzero_ps();
|
|
||||||
m7 = _mm_setzero_ps();
|
|
||||||
|
|
||||||
for (int n = 0; n < h_len / 4; n++) {
|
|
||||||
/* Load (aligned) filter taps */
|
|
||||||
m0 = _mm_load_ps(&h[8 * n + 0]);
|
|
||||||
m1 = _mm_load_ps(&h[8 * n + 4]);
|
|
||||||
m2 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(0, 2, 0, 2));
|
|
||||||
m3 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(1, 3, 1, 3));
|
|
||||||
|
|
||||||
/* Load (unaligned) input data */
|
|
||||||
m0 = _mm_loadu_ps(&x[2 * i + 8 * n + 0]);
|
|
||||||
m1 = _mm_loadu_ps(&x[2 * i + 8 * n + 4]);
|
|
||||||
m4 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(0, 2, 0, 2));
|
|
||||||
m5 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(1, 3, 1, 3));
|
|
||||||
|
|
||||||
/* Quad multiply */
|
|
||||||
m0 = _mm_mul_ps(m2, m4);
|
|
||||||
m1 = _mm_mul_ps(m3, m5);
|
|
||||||
|
|
||||||
m2 = _mm_mul_ps(m2, m5);
|
|
||||||
m3 = _mm_mul_ps(m3, m4);
|
|
||||||
|
|
||||||
/* Sum */
|
|
||||||
m0 = _mm_sub_ps(m0, m1);
|
|
||||||
m2 = _mm_add_ps(m2, m3);
|
|
||||||
|
|
||||||
/* Accumulate */
|
|
||||||
m6 = _mm_add_ps(m6, m0);
|
|
||||||
m7 = _mm_add_ps(m7, m2);
|
|
||||||
}
|
|
||||||
|
|
||||||
m0 = _mm_hadd_ps(m6, m7);
|
|
||||||
m0 = _mm_hadd_ps(m0, m0);
|
|
||||||
|
|
||||||
_mm_store_ss(&y[2 * i + 0], m0);
|
|
||||||
m0 = _mm_shuffle_ps(m0, m0, _MM_SHUFFLE(0, 3, 2, 1));
|
|
||||||
_mm_store_ss(&y[2 * i + 1], m0);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
/* 8*N-tap SSE complex-complex convolution */
|
|
||||||
static void sse_conv_cmplx_8n(float *x, float *h, float *y, int h_len, int len)
|
|
||||||
{
|
|
||||||
__m128 m0, m1, m2, m3, m4, m5, m6, m7;
|
|
||||||
__m128 m8, m9, m10, m11, m12, m13, m14, m15;
|
|
||||||
|
|
||||||
for (int i = 0; i < len; i++) {
|
|
||||||
/* Zero */
|
|
||||||
m12 = _mm_setzero_ps();
|
|
||||||
m13 = _mm_setzero_ps();
|
|
||||||
m14 = _mm_setzero_ps();
|
|
||||||
m15 = _mm_setzero_ps();
|
|
||||||
|
|
||||||
for (int n = 0; n < h_len / 8; n++) {
|
|
||||||
/* Load (aligned) filter taps */
|
|
||||||
m0 = _mm_load_ps(&h[16 * n + 0]);
|
|
||||||
m1 = _mm_load_ps(&h[16 * n + 4]);
|
|
||||||
m2 = _mm_load_ps(&h[16 * n + 8]);
|
|
||||||
m3 = _mm_load_ps(&h[16 * n + 12]);
|
|
||||||
|
|
||||||
m4 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(0, 2, 0, 2));
|
|
||||||
m5 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(1, 3, 1, 3));
|
|
||||||
m6 = _mm_shuffle_ps(m2, m3, _MM_SHUFFLE(0, 2, 0, 2));
|
|
||||||
m7 = _mm_shuffle_ps(m2, m3, _MM_SHUFFLE(1, 3, 1, 3));
|
|
||||||
|
|
||||||
/* Load (unaligned) input data */
|
|
||||||
m0 = _mm_loadu_ps(&x[2 * i + 16 * n + 0]);
|
|
||||||
m1 = _mm_loadu_ps(&x[2 * i + 16 * n + 4]);
|
|
||||||
m2 = _mm_loadu_ps(&x[2 * i + 16 * n + 8]);
|
|
||||||
m3 = _mm_loadu_ps(&x[2 * i + 16 * n + 12]);
|
|
||||||
|
|
||||||
m8 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(0, 2, 0, 2));
|
|
||||||
m9 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(1, 3, 1, 3));
|
|
||||||
m10 = _mm_shuffle_ps(m2, m3, _MM_SHUFFLE(0, 2, 0, 2));
|
|
||||||
m11 = _mm_shuffle_ps(m2, m3, _MM_SHUFFLE(1, 3, 1, 3));
|
|
||||||
|
|
||||||
/* Quad multiply */
|
|
||||||
m0 = _mm_mul_ps(m4, m8);
|
|
||||||
m1 = _mm_mul_ps(m5, m9);
|
|
||||||
m2 = _mm_mul_ps(m6, m10);
|
|
||||||
m3 = _mm_mul_ps(m7, m11);
|
|
||||||
|
|
||||||
m4 = _mm_mul_ps(m4, m9);
|
|
||||||
m5 = _mm_mul_ps(m5, m8);
|
|
||||||
m6 = _mm_mul_ps(m6, m11);
|
|
||||||
m7 = _mm_mul_ps(m7, m10);
|
|
||||||
|
|
||||||
/* Sum */
|
|
||||||
m0 = _mm_sub_ps(m0, m1);
|
|
||||||
m2 = _mm_sub_ps(m2, m3);
|
|
||||||
m4 = _mm_add_ps(m4, m5);
|
|
||||||
m6 = _mm_add_ps(m6, m7);
|
|
||||||
|
|
||||||
/* Accumulate */
|
|
||||||
m12 = _mm_add_ps(m12, m0);
|
|
||||||
m13 = _mm_add_ps(m13, m2);
|
|
||||||
m14 = _mm_add_ps(m14, m4);
|
|
||||||
m15 = _mm_add_ps(m15, m6);
|
|
||||||
}
|
|
||||||
|
|
||||||
m0 = _mm_add_ps(m12, m13);
|
|
||||||
m1 = _mm_add_ps(m14, m15);
|
|
||||||
m2 = _mm_hadd_ps(m0, m1);
|
|
||||||
m2 = _mm_hadd_ps(m2, m2);
|
|
||||||
|
|
||||||
_mm_store_ss(&y[2 * i + 0], m2);
|
|
||||||
m2 = _mm_shuffle_ps(m2, m2, _MM_SHUFFLE(0, 3, 2, 1));
|
|
||||||
_mm_store_ss(&y[2 * i + 1], m2);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
#endif
|
#endif
|
||||||
|
}
|
||||||
|
|
||||||
/* API: Aligned complex-real */
|
/* API: Aligned complex-real */
|
||||||
int convolve_real(float *x, int x_len,
|
int convolve_real(const float *x, int x_len,
|
||||||
float *h, int h_len,
|
const float *h, int h_len,
|
||||||
float *y, int y_len,
|
float *y, int y_len, int start, int len, int step, int offset)
|
||||||
int start, int len,
|
|
||||||
int step, int offset)
|
|
||||||
{
|
{
|
||||||
void (*conv_func)(float *, float *, float *, int) = NULL;
|
|
||||||
void (*conv_func_n)(float *, float *, float *, int, int) = NULL;
|
|
||||||
|
|
||||||
if (bounds_check(x_len, h_len, y_len, start, len, step) < 0)
|
if (bounds_check(x_len, h_len, y_len, start, len, step) < 0)
|
||||||
return -1;
|
return -1;
|
||||||
|
|
||||||
memset(y, 0, len * 2 * sizeof(float));
|
memset(y, 0, len * 2 * sizeof(float));
|
||||||
|
|
||||||
#ifdef HAVE_SSE3
|
|
||||||
if (step <= 4) {
|
if (step <= 4) {
|
||||||
switch (h_len) {
|
switch (h_len) {
|
||||||
case 4:
|
case 4:
|
||||||
conv_func = sse_conv_real4;
|
c.conv_real4(x, x_len, h, h_len, y, y_len, start, len,
|
||||||
|
step, offset);
|
||||||
break;
|
break;
|
||||||
case 8:
|
case 8:
|
||||||
conv_func = sse_conv_real8;
|
c.conv_real8(x, x_len, h, h_len, y, y_len, start, len,
|
||||||
|
step, offset);
|
||||||
break;
|
break;
|
||||||
case 12:
|
case 12:
|
||||||
conv_func = sse_conv_real12;
|
c.conv_real12(x, x_len, h, h_len, y, y_len, start, len,
|
||||||
|
step, offset);
|
||||||
break;
|
break;
|
||||||
case 16:
|
case 16:
|
||||||
conv_func = sse_conv_real16;
|
c.conv_real16(x, x_len, h, h_len, y, y_len, start, len,
|
||||||
|
step, offset);
|
||||||
break;
|
break;
|
||||||
case 20:
|
case 20:
|
||||||
conv_func = sse_conv_real20;
|
c.conv_real20(x, x_len, h, h_len, y, y_len, start, len,
|
||||||
|
step, offset);
|
||||||
break;
|
break;
|
||||||
default:
|
default:
|
||||||
if (!(h_len % 4))
|
if (!(h_len % 4))
|
||||||
conv_func_n = sse_conv_real4n;
|
c.conv_real4n(x, x_len, h, h_len, y, y_len,
|
||||||
|
start, len, step, offset);
|
||||||
|
else
|
||||||
|
c.conv_real(x, x_len, h, h_len, y, y_len, start,
|
||||||
|
len, step, offset);
|
||||||
}
|
}
|
||||||
}
|
} else
|
||||||
#endif
|
c.conv_real(x, x_len, h, h_len, y, y_len, start, len, step,
|
||||||
if (conv_func) {
|
offset);
|
||||||
conv_func(&x[2 * (-(h_len - 1) + start)],
|
|
||||||
h, y, len);
|
|
||||||
} else if (conv_func_n) {
|
|
||||||
conv_func_n(&x[2 * (-(h_len - 1) + start)],
|
|
||||||
h, y, h_len, len);
|
|
||||||
} else {
|
|
||||||
_base_convolve_real(x, x_len,
|
|
||||||
h, h_len,
|
|
||||||
y, y_len,
|
|
||||||
start, len, step, offset);
|
|
||||||
}
|
|
||||||
|
|
||||||
return len;
|
return len;
|
||||||
}
|
}
|
||||||
|
|
||||||
/* API: Aligned complex-complex */
|
/* API: Aligned complex-complex */
|
||||||
int convolve_complex(float *x, int x_len,
|
int convolve_complex(const float *x, int x_len,
|
||||||
float *h, int h_len,
|
const float *h, int h_len,
|
||||||
float *y, int y_len,
|
float *y, int y_len,
|
||||||
int start, int len,
|
int start, int len, int step, int offset)
|
||||||
int step, int offset)
|
|
||||||
{
|
{
|
||||||
void (*conv_func)(float *, float *, float *, int, int) = NULL;
|
|
||||||
|
|
||||||
if (bounds_check(x_len, h_len, y_len, start, len, step) < 0)
|
if (bounds_check(x_len, h_len, y_len, start, len, step) < 0)
|
||||||
return -1;
|
return -1;
|
||||||
|
|
||||||
memset(y, 0, len * 2 * sizeof(float));
|
memset(y, 0, len * 2 * sizeof(float));
|
||||||
|
|
||||||
#ifdef HAVE_SSE3
|
|
||||||
if (step <= 4) {
|
if (step <= 4) {
|
||||||
if (!(h_len % 8))
|
if (!(h_len % 8))
|
||||||
conv_func = sse_conv_cmplx_8n;
|
c.conv_cmplx_8n(x, x_len, h, h_len, y, y_len, start,
|
||||||
|
len, step, offset);
|
||||||
else if (!(h_len % 4))
|
else if (!(h_len % 4))
|
||||||
conv_func = sse_conv_cmplx_4n;
|
c.conv_cmplx_4n(x, x_len, h, h_len, y, y_len, start,
|
||||||
}
|
len, step, offset);
|
||||||
#endif
|
else
|
||||||
if (conv_func) {
|
c.conv_cmplx(x, x_len, h, h_len, y, y_len, start, len,
|
||||||
conv_func(&x[2 * (-(h_len - 1) + start)],
|
step, offset);
|
||||||
h, y, h_len, len);
|
} else
|
||||||
} else {
|
c.conv_cmplx(x, x_len, h, h_len, y, y_len, start, len, step,
|
||||||
_base_convolve_complex(x, x_len,
|
offset);
|
||||||
h, h_len,
|
|
||||||
y, y_len,
|
|
||||||
start, len, step, offset);
|
|
||||||
}
|
|
||||||
|
|
||||||
return len;
|
return len;
|
||||||
}
|
}
|
||||||
|
|||||||
542
Transceiver52M/x86/convolve_sse_3.c
Normal file
542
Transceiver52M/x86/convolve_sse_3.c
Normal file
@@ -0,0 +1,542 @@
|
|||||||
|
/*
|
||||||
|
* SSE Convolution
|
||||||
|
* Copyright (C) 2012, 2013 Thomas Tsou <tom@tsou.cc>
|
||||||
|
*
|
||||||
|
* This library is free software; you can redistribute it and/or
|
||||||
|
* modify it under the terms of the GNU Lesser General Public
|
||||||
|
* License as published by the Free Software Foundation; either
|
||||||
|
* version 2.1 of the License, or (at your option) any later version.
|
||||||
|
*
|
||||||
|
* This library is distributed in the hope that it will be useful,
|
||||||
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||||
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
||||||
|
* Lesser General Public License for more details.
|
||||||
|
*
|
||||||
|
* You should have received a copy of the GNU Lesser General Public
|
||||||
|
* License along with this library; if not, write to the Free Software
|
||||||
|
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
|
||||||
|
*/
|
||||||
|
|
||||||
|
#include <malloc.h>
|
||||||
|
#include <string.h>
|
||||||
|
#include <stdio.h>
|
||||||
|
#include "convolve_sse_3.h"
|
||||||
|
|
||||||
|
#ifdef HAVE_CONFIG_H
|
||||||
|
#include "config.h"
|
||||||
|
#endif
|
||||||
|
|
||||||
|
#ifdef HAVE_SSE3
|
||||||
|
#include <xmmintrin.h>
|
||||||
|
#include <pmmintrin.h>
|
||||||
|
|
||||||
|
/* 4-tap SSE complex-real convolution */
|
||||||
|
void sse_conv_real4(const float *x, int x_len,
|
||||||
|
const float *h, int h_len,
|
||||||
|
float *y, int y_len,
|
||||||
|
int start, int len, int step, int offset)
|
||||||
|
{
|
||||||
|
/* NOTE: The parameter list of this function has to match the parameter
|
||||||
|
* list of _base_convolve_real() in convolve_base.c. This specific
|
||||||
|
* implementation, ignores some of the parameters of
|
||||||
|
* _base_convolve_complex(), which are: x_len, y_len, offset, step */
|
||||||
|
|
||||||
|
__m128 m0, m1, m2, m3, m4, m5, m6, m7;
|
||||||
|
|
||||||
|
const float *_x = &x[2 * (-(h_len - 1) + start)];
|
||||||
|
|
||||||
|
/* Load (aligned) filter taps */
|
||||||
|
m0 = _mm_load_ps(&h[0]);
|
||||||
|
m1 = _mm_load_ps(&h[4]);
|
||||||
|
m7 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(0, 2, 0, 2));
|
||||||
|
|
||||||
|
for (int i = 0; i < len; i++) {
|
||||||
|
/* Load (unaligned) input data */
|
||||||
|
m0 = _mm_loadu_ps(&_x[2 * i + 0]);
|
||||||
|
m1 = _mm_loadu_ps(&_x[2 * i + 4]);
|
||||||
|
m2 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(0, 2, 0, 2));
|
||||||
|
m3 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(1, 3, 1, 3));
|
||||||
|
|
||||||
|
/* Quad multiply */
|
||||||
|
m4 = _mm_mul_ps(m2, m7);
|
||||||
|
m5 = _mm_mul_ps(m3, m7);
|
||||||
|
|
||||||
|
/* Sum and store */
|
||||||
|
m6 = _mm_hadd_ps(m4, m5);
|
||||||
|
m0 = _mm_hadd_ps(m6, m6);
|
||||||
|
|
||||||
|
_mm_store_ss(&y[2 * i + 0], m0);
|
||||||
|
m0 = _mm_shuffle_ps(m0, m0, _MM_SHUFFLE(0, 3, 2, 1));
|
||||||
|
_mm_store_ss(&y[2 * i + 1], m0);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
/* 8-tap SSE complex-real convolution */
|
||||||
|
void sse_conv_real8(const float *x, int x_len,
|
||||||
|
const float *h, int h_len,
|
||||||
|
float *y, int y_len,
|
||||||
|
int start, int len, int step, int offset)
|
||||||
|
{
|
||||||
|
/* See NOTE in sse_conv_real4() */
|
||||||
|
|
||||||
|
__m128 m0, m1, m2, m3, m4, m5, m6, m7, m8, m9;
|
||||||
|
|
||||||
|
const float *_x = &x[2 * (-(h_len - 1) + start)];
|
||||||
|
|
||||||
|
/* Load (aligned) filter taps */
|
||||||
|
m0 = _mm_load_ps(&h[0]);
|
||||||
|
m1 = _mm_load_ps(&h[4]);
|
||||||
|
m2 = _mm_load_ps(&h[8]);
|
||||||
|
m3 = _mm_load_ps(&h[12]);
|
||||||
|
|
||||||
|
m4 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(0, 2, 0, 2));
|
||||||
|
m5 = _mm_shuffle_ps(m2, m3, _MM_SHUFFLE(0, 2, 0, 2));
|
||||||
|
|
||||||
|
for (int i = 0; i < len; i++) {
|
||||||
|
/* Load (unaligned) input data */
|
||||||
|
m0 = _mm_loadu_ps(&_x[2 * i + 0]);
|
||||||
|
m1 = _mm_loadu_ps(&_x[2 * i + 4]);
|
||||||
|
m2 = _mm_loadu_ps(&_x[2 * i + 8]);
|
||||||
|
m3 = _mm_loadu_ps(&_x[2 * i + 12]);
|
||||||
|
|
||||||
|
m6 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(0, 2, 0, 2));
|
||||||
|
m7 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(1, 3, 1, 3));
|
||||||
|
m8 = _mm_shuffle_ps(m2, m3, _MM_SHUFFLE(0, 2, 0, 2));
|
||||||
|
m9 = _mm_shuffle_ps(m2, m3, _MM_SHUFFLE(1, 3, 1, 3));
|
||||||
|
|
||||||
|
/* Quad multiply */
|
||||||
|
m6 = _mm_mul_ps(m6, m4);
|
||||||
|
m7 = _mm_mul_ps(m7, m4);
|
||||||
|
m8 = _mm_mul_ps(m8, m5);
|
||||||
|
m9 = _mm_mul_ps(m9, m5);
|
||||||
|
|
||||||
|
/* Sum and store */
|
||||||
|
m6 = _mm_add_ps(m6, m8);
|
||||||
|
m7 = _mm_add_ps(m7, m9);
|
||||||
|
m6 = _mm_hadd_ps(m6, m7);
|
||||||
|
m6 = _mm_hadd_ps(m6, m6);
|
||||||
|
|
||||||
|
_mm_store_ss(&y[2 * i + 0], m6);
|
||||||
|
m6 = _mm_shuffle_ps(m6, m6, _MM_SHUFFLE(0, 3, 2, 1));
|
||||||
|
_mm_store_ss(&y[2 * i + 1], m6);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
/* 12-tap SSE complex-real convolution */
|
||||||
|
void sse_conv_real12(const float *x, int x_len,
|
||||||
|
const float *h, int h_len,
|
||||||
|
float *y, int y_len,
|
||||||
|
int start, int len, int step, int offset)
|
||||||
|
{
|
||||||
|
/* See NOTE in sse_conv_real4() */
|
||||||
|
|
||||||
|
__m128 m0, m1, m2, m3, m4, m5, m6, m7;
|
||||||
|
__m128 m8, m9, m10, m11, m12, m13, m14;
|
||||||
|
|
||||||
|
const float *_x = &x[2 * (-(h_len - 1) + start)];
|
||||||
|
|
||||||
|
/* Load (aligned) filter taps */
|
||||||
|
m0 = _mm_load_ps(&h[0]);
|
||||||
|
m1 = _mm_load_ps(&h[4]);
|
||||||
|
m2 = _mm_load_ps(&h[8]);
|
||||||
|
m3 = _mm_load_ps(&h[12]);
|
||||||
|
m4 = _mm_load_ps(&h[16]);
|
||||||
|
m5 = _mm_load_ps(&h[20]);
|
||||||
|
|
||||||
|
m12 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(0, 2, 0, 2));
|
||||||
|
m13 = _mm_shuffle_ps(m2, m3, _MM_SHUFFLE(0, 2, 0, 2));
|
||||||
|
m14 = _mm_shuffle_ps(m4, m5, _MM_SHUFFLE(0, 2, 0, 2));
|
||||||
|
|
||||||
|
for (int i = 0; i < len; i++) {
|
||||||
|
/* Load (unaligned) input data */
|
||||||
|
m0 = _mm_loadu_ps(&_x[2 * i + 0]);
|
||||||
|
m1 = _mm_loadu_ps(&_x[2 * i + 4]);
|
||||||
|
m2 = _mm_loadu_ps(&_x[2 * i + 8]);
|
||||||
|
m3 = _mm_loadu_ps(&_x[2 * i + 12]);
|
||||||
|
|
||||||
|
m4 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(0, 2, 0, 2));
|
||||||
|
m5 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(1, 3, 1, 3));
|
||||||
|
m6 = _mm_shuffle_ps(m2, m3, _MM_SHUFFLE(0, 2, 0, 2));
|
||||||
|
m7 = _mm_shuffle_ps(m2, m3, _MM_SHUFFLE(1, 3, 1, 3));
|
||||||
|
|
||||||
|
m0 = _mm_loadu_ps(&_x[2 * i + 16]);
|
||||||
|
m1 = _mm_loadu_ps(&_x[2 * i + 20]);
|
||||||
|
|
||||||
|
m8 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(0, 2, 0, 2));
|
||||||
|
m9 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(1, 3, 1, 3));
|
||||||
|
|
||||||
|
/* Quad multiply */
|
||||||
|
m0 = _mm_mul_ps(m4, m12);
|
||||||
|
m1 = _mm_mul_ps(m5, m12);
|
||||||
|
m2 = _mm_mul_ps(m6, m13);
|
||||||
|
m3 = _mm_mul_ps(m7, m13);
|
||||||
|
m4 = _mm_mul_ps(m8, m14);
|
||||||
|
m5 = _mm_mul_ps(m9, m14);
|
||||||
|
|
||||||
|
/* Sum and store */
|
||||||
|
m8 = _mm_add_ps(m0, m2);
|
||||||
|
m9 = _mm_add_ps(m1, m3);
|
||||||
|
m10 = _mm_add_ps(m8, m4);
|
||||||
|
m11 = _mm_add_ps(m9, m5);
|
||||||
|
|
||||||
|
m2 = _mm_hadd_ps(m10, m11);
|
||||||
|
m3 = _mm_hadd_ps(m2, m2);
|
||||||
|
|
||||||
|
_mm_store_ss(&y[2 * i + 0], m3);
|
||||||
|
m3 = _mm_shuffle_ps(m3, m3, _MM_SHUFFLE(0, 3, 2, 1));
|
||||||
|
_mm_store_ss(&y[2 * i + 1], m3);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
/* 16-tap SSE complex-real convolution */
|
||||||
|
void sse_conv_real16(const float *x, int x_len,
|
||||||
|
const float *h, int h_len,
|
||||||
|
float *y, int y_len,
|
||||||
|
int start, int len, int step, int offset)
|
||||||
|
{
|
||||||
|
/* See NOTE in sse_conv_real4() */
|
||||||
|
|
||||||
|
__m128 m0, m1, m2, m3, m4, m5, m6, m7;
|
||||||
|
__m128 m8, m9, m10, m11, m12, m13, m14, m15;
|
||||||
|
|
||||||
|
const float *_x = &x[2 * (-(h_len - 1) + start)];
|
||||||
|
|
||||||
|
/* Load (aligned) filter taps */
|
||||||
|
m0 = _mm_load_ps(&h[0]);
|
||||||
|
m1 = _mm_load_ps(&h[4]);
|
||||||
|
m2 = _mm_load_ps(&h[8]);
|
||||||
|
m3 = _mm_load_ps(&h[12]);
|
||||||
|
|
||||||
|
m4 = _mm_load_ps(&h[16]);
|
||||||
|
m5 = _mm_load_ps(&h[20]);
|
||||||
|
m6 = _mm_load_ps(&h[24]);
|
||||||
|
m7 = _mm_load_ps(&h[28]);
|
||||||
|
|
||||||
|
m12 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(0, 2, 0, 2));
|
||||||
|
m13 = _mm_shuffle_ps(m2, m3, _MM_SHUFFLE(0, 2, 0, 2));
|
||||||
|
m14 = _mm_shuffle_ps(m4, m5, _MM_SHUFFLE(0, 2, 0, 2));
|
||||||
|
m15 = _mm_shuffle_ps(m6, m7, _MM_SHUFFLE(0, 2, 0, 2));
|
||||||
|
|
||||||
|
for (int i = 0; i < len; i++) {
|
||||||
|
/* Load (unaligned) input data */
|
||||||
|
m0 = _mm_loadu_ps(&_x[2 * i + 0]);
|
||||||
|
m1 = _mm_loadu_ps(&_x[2 * i + 4]);
|
||||||
|
m2 = _mm_loadu_ps(&_x[2 * i + 8]);
|
||||||
|
m3 = _mm_loadu_ps(&_x[2 * i + 12]);
|
||||||
|
|
||||||
|
m4 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(0, 2, 0, 2));
|
||||||
|
m5 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(1, 3, 1, 3));
|
||||||
|
m6 = _mm_shuffle_ps(m2, m3, _MM_SHUFFLE(0, 2, 0, 2));
|
||||||
|
m7 = _mm_shuffle_ps(m2, m3, _MM_SHUFFLE(1, 3, 1, 3));
|
||||||
|
|
||||||
|
m0 = _mm_loadu_ps(&_x[2 * i + 16]);
|
||||||
|
m1 = _mm_loadu_ps(&_x[2 * i + 20]);
|
||||||
|
m2 = _mm_loadu_ps(&_x[2 * i + 24]);
|
||||||
|
m3 = _mm_loadu_ps(&_x[2 * i + 28]);
|
||||||
|
|
||||||
|
m8 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(0, 2, 0, 2));
|
||||||
|
m9 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(1, 3, 1, 3));
|
||||||
|
m10 = _mm_shuffle_ps(m2, m3, _MM_SHUFFLE(0, 2, 0, 2));
|
||||||
|
m11 = _mm_shuffle_ps(m2, m3, _MM_SHUFFLE(1, 3, 1, 3));
|
||||||
|
|
||||||
|
/* Quad multiply */
|
||||||
|
m0 = _mm_mul_ps(m4, m12);
|
||||||
|
m1 = _mm_mul_ps(m5, m12);
|
||||||
|
m2 = _mm_mul_ps(m6, m13);
|
||||||
|
m3 = _mm_mul_ps(m7, m13);
|
||||||
|
|
||||||
|
m4 = _mm_mul_ps(m8, m14);
|
||||||
|
m5 = _mm_mul_ps(m9, m14);
|
||||||
|
m6 = _mm_mul_ps(m10, m15);
|
||||||
|
m7 = _mm_mul_ps(m11, m15);
|
||||||
|
|
||||||
|
/* Sum and store */
|
||||||
|
m8 = _mm_add_ps(m0, m2);
|
||||||
|
m9 = _mm_add_ps(m1, m3);
|
||||||
|
m10 = _mm_add_ps(m4, m6);
|
||||||
|
m11 = _mm_add_ps(m5, m7);
|
||||||
|
|
||||||
|
m0 = _mm_add_ps(m8, m10);
|
||||||
|
m1 = _mm_add_ps(m9, m11);
|
||||||
|
m2 = _mm_hadd_ps(m0, m1);
|
||||||
|
m3 = _mm_hadd_ps(m2, m2);
|
||||||
|
|
||||||
|
_mm_store_ss(&y[2 * i + 0], m3);
|
||||||
|
m3 = _mm_shuffle_ps(m3, m3, _MM_SHUFFLE(0, 3, 2, 1));
|
||||||
|
_mm_store_ss(&y[2 * i + 1], m3);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
/* 20-tap SSE complex-real convolution */
|
||||||
|
void sse_conv_real20(const float *x, int x_len,
|
||||||
|
const float *h, int h_len,
|
||||||
|
float *y, int y_len,
|
||||||
|
int start, int len, int step, int offset)
|
||||||
|
{
|
||||||
|
/* See NOTE in sse_conv_real4() */
|
||||||
|
|
||||||
|
__m128 m0, m1, m2, m3, m4, m5, m6, m7;
|
||||||
|
__m128 m8, m9, m11, m12, m13, m14, m15;
|
||||||
|
|
||||||
|
const float *_x = &x[2 * (-(h_len - 1) + start)];
|
||||||
|
|
||||||
|
/* Load (aligned) filter taps */
|
||||||
|
m0 = _mm_load_ps(&h[0]);
|
||||||
|
m1 = _mm_load_ps(&h[4]);
|
||||||
|
m2 = _mm_load_ps(&h[8]);
|
||||||
|
m3 = _mm_load_ps(&h[12]);
|
||||||
|
m4 = _mm_load_ps(&h[16]);
|
||||||
|
m5 = _mm_load_ps(&h[20]);
|
||||||
|
m6 = _mm_load_ps(&h[24]);
|
||||||
|
m7 = _mm_load_ps(&h[28]);
|
||||||
|
m8 = _mm_load_ps(&h[32]);
|
||||||
|
m9 = _mm_load_ps(&h[36]);
|
||||||
|
|
||||||
|
m11 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(0, 2, 0, 2));
|
||||||
|
m12 = _mm_shuffle_ps(m2, m3, _MM_SHUFFLE(0, 2, 0, 2));
|
||||||
|
m13 = _mm_shuffle_ps(m4, m5, _MM_SHUFFLE(0, 2, 0, 2));
|
||||||
|
m14 = _mm_shuffle_ps(m6, m7, _MM_SHUFFLE(0, 2, 0, 2));
|
||||||
|
m15 = _mm_shuffle_ps(m8, m9, _MM_SHUFFLE(0, 2, 0, 2));
|
||||||
|
|
||||||
|
for (int i = 0; i < len; i++) {
|
||||||
|
/* Multiply-accumulate first 12 taps */
|
||||||
|
m0 = _mm_loadu_ps(&_x[2 * i + 0]);
|
||||||
|
m1 = _mm_loadu_ps(&_x[2 * i + 4]);
|
||||||
|
m2 = _mm_loadu_ps(&_x[2 * i + 8]);
|
||||||
|
m3 = _mm_loadu_ps(&_x[2 * i + 12]);
|
||||||
|
m4 = _mm_loadu_ps(&_x[2 * i + 16]);
|
||||||
|
m5 = _mm_loadu_ps(&_x[2 * i + 20]);
|
||||||
|
|
||||||
|
m6 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(0, 2, 0, 2));
|
||||||
|
m7 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(1, 3, 1, 3));
|
||||||
|
m8 = _mm_shuffle_ps(m2, m3, _MM_SHUFFLE(0, 2, 0, 2));
|
||||||
|
m9 = _mm_shuffle_ps(m2, m3, _MM_SHUFFLE(1, 3, 1, 3));
|
||||||
|
m0 = _mm_shuffle_ps(m4, m5, _MM_SHUFFLE(0, 2, 0, 2));
|
||||||
|
m1 = _mm_shuffle_ps(m4, m5, _MM_SHUFFLE(1, 3, 1, 3));
|
||||||
|
|
||||||
|
m2 = _mm_mul_ps(m6, m11);
|
||||||
|
m3 = _mm_mul_ps(m7, m11);
|
||||||
|
m4 = _mm_mul_ps(m8, m12);
|
||||||
|
m5 = _mm_mul_ps(m9, m12);
|
||||||
|
m6 = _mm_mul_ps(m0, m13);
|
||||||
|
m7 = _mm_mul_ps(m1, m13);
|
||||||
|
|
||||||
|
m0 = _mm_add_ps(m2, m4);
|
||||||
|
m1 = _mm_add_ps(m3, m5);
|
||||||
|
m8 = _mm_add_ps(m0, m6);
|
||||||
|
m9 = _mm_add_ps(m1, m7);
|
||||||
|
|
||||||
|
/* Multiply-accumulate last 8 taps */
|
||||||
|
m0 = _mm_loadu_ps(&_x[2 * i + 24]);
|
||||||
|
m1 = _mm_loadu_ps(&_x[2 * i + 28]);
|
||||||
|
m2 = _mm_loadu_ps(&_x[2 * i + 32]);
|
||||||
|
m3 = _mm_loadu_ps(&_x[2 * i + 36]);
|
||||||
|
|
||||||
|
m4 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(0, 2, 0, 2));
|
||||||
|
m5 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(1, 3, 1, 3));
|
||||||
|
m6 = _mm_shuffle_ps(m2, m3, _MM_SHUFFLE(0, 2, 0, 2));
|
||||||
|
m7 = _mm_shuffle_ps(m2, m3, _MM_SHUFFLE(1, 3, 1, 3));
|
||||||
|
|
||||||
|
m0 = _mm_mul_ps(m4, m14);
|
||||||
|
m1 = _mm_mul_ps(m5, m14);
|
||||||
|
m2 = _mm_mul_ps(m6, m15);
|
||||||
|
m3 = _mm_mul_ps(m7, m15);
|
||||||
|
|
||||||
|
m4 = _mm_add_ps(m0, m2);
|
||||||
|
m5 = _mm_add_ps(m1, m3);
|
||||||
|
|
||||||
|
/* Final sum and store */
|
||||||
|
m0 = _mm_add_ps(m8, m4);
|
||||||
|
m1 = _mm_add_ps(m9, m5);
|
||||||
|
m2 = _mm_hadd_ps(m0, m1);
|
||||||
|
m3 = _mm_hadd_ps(m2, m2);
|
||||||
|
|
||||||
|
_mm_store_ss(&y[2 * i + 0], m3);
|
||||||
|
m3 = _mm_shuffle_ps(m3, m3, _MM_SHUFFLE(0, 3, 2, 1));
|
||||||
|
_mm_store_ss(&y[2 * i + 1], m3);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
/* 4*N-tap SSE complex-real convolution */
|
||||||
|
void sse_conv_real4n(const float *x, int x_len,
|
||||||
|
const float *h, int h_len,
|
||||||
|
float *y, int y_len,
|
||||||
|
int start, int len, int step, int offset)
|
||||||
|
{
|
||||||
|
/* See NOTE in sse_conv_real4() */
|
||||||
|
|
||||||
|
__m128 m0, m1, m2, m4, m5, m6, m7;
|
||||||
|
|
||||||
|
const float *_x = &x[2 * (-(h_len - 1) + start)];
|
||||||
|
|
||||||
|
for (int i = 0; i < len; i++) {
|
||||||
|
/* Zero */
|
||||||
|
m6 = _mm_setzero_ps();
|
||||||
|
m7 = _mm_setzero_ps();
|
||||||
|
|
||||||
|
for (int n = 0; n < h_len / 4; n++) {
|
||||||
|
/* Load (aligned) filter taps */
|
||||||
|
m0 = _mm_load_ps(&h[8 * n + 0]);
|
||||||
|
m1 = _mm_load_ps(&h[8 * n + 4]);
|
||||||
|
m2 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(0, 2, 0, 2));
|
||||||
|
|
||||||
|
/* Load (unaligned) input data */
|
||||||
|
m0 = _mm_loadu_ps(&_x[2 * i + 8 * n + 0]);
|
||||||
|
m1 = _mm_loadu_ps(&_x[2 * i + 8 * n + 4]);
|
||||||
|
m4 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(0, 2, 0, 2));
|
||||||
|
m5 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(1, 3, 1, 3));
|
||||||
|
|
||||||
|
/* Quad multiply */
|
||||||
|
m0 = _mm_mul_ps(m2, m4);
|
||||||
|
m1 = _mm_mul_ps(m2, m5);
|
||||||
|
|
||||||
|
/* Accumulate */
|
||||||
|
m6 = _mm_add_ps(m6, m0);
|
||||||
|
m7 = _mm_add_ps(m7, m1);
|
||||||
|
}
|
||||||
|
|
||||||
|
m0 = _mm_hadd_ps(m6, m7);
|
||||||
|
m0 = _mm_hadd_ps(m0, m0);
|
||||||
|
|
||||||
|
_mm_store_ss(&y[2 * i + 0], m0);
|
||||||
|
m0 = _mm_shuffle_ps(m0, m0, _MM_SHUFFLE(0, 3, 2, 1));
|
||||||
|
_mm_store_ss(&y[2 * i + 1], m0);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
/* 4*N-tap SSE complex-complex convolution */
|
||||||
|
void sse_conv_cmplx_4n(const float *x, int x_len,
|
||||||
|
const float *h, int h_len,
|
||||||
|
float *y, int y_len,
|
||||||
|
int start, int len, int step, int offset)
|
||||||
|
{
|
||||||
|
/* NOTE: The parameter list of this function has to match the parameter
|
||||||
|
* list of _base_convolve_complex() in convolve_base.c. This specific
|
||||||
|
* implementation, ignores some of the parameters of
|
||||||
|
* _base_convolve_complex(), which are: x_len, y_len, offset, step. */
|
||||||
|
|
||||||
|
__m128 m0, m1, m2, m3, m4, m5, m6, m7;
|
||||||
|
|
||||||
|
const float *_x = &x[2 * (-(h_len - 1) + start)];
|
||||||
|
|
||||||
|
for (int i = 0; i < len; i++) {
|
||||||
|
/* Zero */
|
||||||
|
m6 = _mm_setzero_ps();
|
||||||
|
m7 = _mm_setzero_ps();
|
||||||
|
|
||||||
|
for (int n = 0; n < h_len / 4; n++) {
|
||||||
|
/* Load (aligned) filter taps */
|
||||||
|
m0 = _mm_load_ps(&h[8 * n + 0]);
|
||||||
|
m1 = _mm_load_ps(&h[8 * n + 4]);
|
||||||
|
m2 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(0, 2, 0, 2));
|
||||||
|
m3 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(1, 3, 1, 3));
|
||||||
|
|
||||||
|
/* Load (unaligned) input data */
|
||||||
|
m0 = _mm_loadu_ps(&_x[2 * i + 8 * n + 0]);
|
||||||
|
m1 = _mm_loadu_ps(&_x[2 * i + 8 * n + 4]);
|
||||||
|
m4 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(0, 2, 0, 2));
|
||||||
|
m5 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(1, 3, 1, 3));
|
||||||
|
|
||||||
|
/* Quad multiply */
|
||||||
|
m0 = _mm_mul_ps(m2, m4);
|
||||||
|
m1 = _mm_mul_ps(m3, m5);
|
||||||
|
|
||||||
|
m2 = _mm_mul_ps(m2, m5);
|
||||||
|
m3 = _mm_mul_ps(m3, m4);
|
||||||
|
|
||||||
|
/* Sum */
|
||||||
|
m0 = _mm_sub_ps(m0, m1);
|
||||||
|
m2 = _mm_add_ps(m2, m3);
|
||||||
|
|
||||||
|
/* Accumulate */
|
||||||
|
m6 = _mm_add_ps(m6, m0);
|
||||||
|
m7 = _mm_add_ps(m7, m2);
|
||||||
|
}
|
||||||
|
|
||||||
|
m0 = _mm_hadd_ps(m6, m7);
|
||||||
|
m0 = _mm_hadd_ps(m0, m0);
|
||||||
|
|
||||||
|
_mm_store_ss(&y[2 * i + 0], m0);
|
||||||
|
m0 = _mm_shuffle_ps(m0, m0, _MM_SHUFFLE(0, 3, 2, 1));
|
||||||
|
_mm_store_ss(&y[2 * i + 1], m0);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
/* 8*N-tap SSE complex-complex convolution */
|
||||||
|
void sse_conv_cmplx_8n(const float *x, int x_len,
|
||||||
|
const float *h, int h_len,
|
||||||
|
float *y, int y_len,
|
||||||
|
int start, int len, int step, int offset)
|
||||||
|
{
|
||||||
|
/* See NOTE in sse_conv_cmplx_4n() */
|
||||||
|
|
||||||
|
__m128 m0, m1, m2, m3, m4, m5, m6, m7;
|
||||||
|
__m128 m8, m9, m10, m11, m12, m13, m14, m15;
|
||||||
|
|
||||||
|
const float *_x = &x[2 * (-(h_len - 1) + start)];
|
||||||
|
|
||||||
|
for (int i = 0; i < len; i++) {
|
||||||
|
/* Zero */
|
||||||
|
m12 = _mm_setzero_ps();
|
||||||
|
m13 = _mm_setzero_ps();
|
||||||
|
m14 = _mm_setzero_ps();
|
||||||
|
m15 = _mm_setzero_ps();
|
||||||
|
|
||||||
|
for (int n = 0; n < h_len / 8; n++) {
|
||||||
|
/* Load (aligned) filter taps */
|
||||||
|
m0 = _mm_load_ps(&h[16 * n + 0]);
|
||||||
|
m1 = _mm_load_ps(&h[16 * n + 4]);
|
||||||
|
m2 = _mm_load_ps(&h[16 * n + 8]);
|
||||||
|
m3 = _mm_load_ps(&h[16 * n + 12]);
|
||||||
|
|
||||||
|
m4 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(0, 2, 0, 2));
|
||||||
|
m5 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(1, 3, 1, 3));
|
||||||
|
m6 = _mm_shuffle_ps(m2, m3, _MM_SHUFFLE(0, 2, 0, 2));
|
||||||
|
m7 = _mm_shuffle_ps(m2, m3, _MM_SHUFFLE(1, 3, 1, 3));
|
||||||
|
|
||||||
|
/* Load (unaligned) input data */
|
||||||
|
m0 = _mm_loadu_ps(&_x[2 * i + 16 * n + 0]);
|
||||||
|
m1 = _mm_loadu_ps(&_x[2 * i + 16 * n + 4]);
|
||||||
|
m2 = _mm_loadu_ps(&_x[2 * i + 16 * n + 8]);
|
||||||
|
m3 = _mm_loadu_ps(&_x[2 * i + 16 * n + 12]);
|
||||||
|
|
||||||
|
m8 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(0, 2, 0, 2));
|
||||||
|
m9 = _mm_shuffle_ps(m0, m1, _MM_SHUFFLE(1, 3, 1, 3));
|
||||||
|
m10 = _mm_shuffle_ps(m2, m3, _MM_SHUFFLE(0, 2, 0, 2));
|
||||||
|
m11 = _mm_shuffle_ps(m2, m3, _MM_SHUFFLE(1, 3, 1, 3));
|
||||||
|
|
||||||
|
/* Quad multiply */
|
||||||
|
m0 = _mm_mul_ps(m4, m8);
|
||||||
|
m1 = _mm_mul_ps(m5, m9);
|
||||||
|
m2 = _mm_mul_ps(m6, m10);
|
||||||
|
m3 = _mm_mul_ps(m7, m11);
|
||||||
|
|
||||||
|
m4 = _mm_mul_ps(m4, m9);
|
||||||
|
m5 = _mm_mul_ps(m5, m8);
|
||||||
|
m6 = _mm_mul_ps(m6, m11);
|
||||||
|
m7 = _mm_mul_ps(m7, m10);
|
||||||
|
|
||||||
|
/* Sum */
|
||||||
|
m0 = _mm_sub_ps(m0, m1);
|
||||||
|
m2 = _mm_sub_ps(m2, m3);
|
||||||
|
m4 = _mm_add_ps(m4, m5);
|
||||||
|
m6 = _mm_add_ps(m6, m7);
|
||||||
|
|
||||||
|
/* Accumulate */
|
||||||
|
m12 = _mm_add_ps(m12, m0);
|
||||||
|
m13 = _mm_add_ps(m13, m2);
|
||||||
|
m14 = _mm_add_ps(m14, m4);
|
||||||
|
m15 = _mm_add_ps(m15, m6);
|
||||||
|
}
|
||||||
|
|
||||||
|
m0 = _mm_add_ps(m12, m13);
|
||||||
|
m1 = _mm_add_ps(m14, m15);
|
||||||
|
m2 = _mm_hadd_ps(m0, m1);
|
||||||
|
m2 = _mm_hadd_ps(m2, m2);
|
||||||
|
|
||||||
|
_mm_store_ss(&y[2 * i + 0], m2);
|
||||||
|
m2 = _mm_shuffle_ps(m2, m2, _MM_SHUFFLE(0, 3, 2, 1));
|
||||||
|
_mm_store_ss(&y[2 * i + 1], m2);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
#endif
|
||||||
68
Transceiver52M/x86/convolve_sse_3.h
Normal file
68
Transceiver52M/x86/convolve_sse_3.h
Normal file
@@ -0,0 +1,68 @@
|
|||||||
|
/*
|
||||||
|
* SSE Convolution
|
||||||
|
* Copyright (C) 2012, 2013 Thomas Tsou <tom@tsou.cc>
|
||||||
|
*
|
||||||
|
* This library is free software; you can redistribute it and/or
|
||||||
|
* modify it under the terms of the GNU Lesser General Public
|
||||||
|
* License as published by the Free Software Foundation; either
|
||||||
|
* version 2.1 of the License, or (at your option) any later version.
|
||||||
|
*
|
||||||
|
* This library is distributed in the hope that it will be useful,
|
||||||
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||||
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
||||||
|
* Lesser General Public License for more details.
|
||||||
|
*
|
||||||
|
* You should have received a copy of the GNU Lesser General Public
|
||||||
|
* License along with this library; if not, write to the Free Software
|
||||||
|
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
|
||||||
|
*/
|
||||||
|
|
||||||
|
#pragma once
|
||||||
|
|
||||||
|
/* 4-tap SSE complex-real convolution */
|
||||||
|
void sse_conv_real4(const float *x, int x_len,
|
||||||
|
const float *h, int h_len,
|
||||||
|
float *y, int y_len,
|
||||||
|
int start, int len, int step, int offset);
|
||||||
|
|
||||||
|
/* 8-tap SSE complex-real convolution */
|
||||||
|
void sse_conv_real8(const float *x, int x_len,
|
||||||
|
const float *h, int h_len,
|
||||||
|
float *y, int y_len,
|
||||||
|
int start, int len, int step, int offset);
|
||||||
|
|
||||||
|
/* 12-tap SSE complex-real convolution */
|
||||||
|
void sse_conv_real12(const float *x, int x_len,
|
||||||
|
const float *h, int h_len,
|
||||||
|
float *y, int y_len,
|
||||||
|
int start, int len, int step, int offset);
|
||||||
|
|
||||||
|
/* 16-tap SSE complex-real convolution */
|
||||||
|
void sse_conv_real16(const float *x, int x_len,
|
||||||
|
const float *h, int h_len,
|
||||||
|
float *y, int y_len,
|
||||||
|
int start, int len, int step, int offset);
|
||||||
|
|
||||||
|
/* 20-tap SSE complex-real convolution */
|
||||||
|
void sse_conv_real20(const float *x, int x_len,
|
||||||
|
const float *h, int h_len,
|
||||||
|
float *y, int y_len,
|
||||||
|
int start, int len, int step, int offset);
|
||||||
|
|
||||||
|
/* 4*N-tap SSE complex-real convolution */
|
||||||
|
void sse_conv_real4n(const float *x, int x_len,
|
||||||
|
const float *h, int h_len,
|
||||||
|
float *y, int y_len,
|
||||||
|
int start, int len, int step, int offset);
|
||||||
|
|
||||||
|
/* 4*N-tap SSE complex-complex convolution */
|
||||||
|
void sse_conv_cmplx_4n(const float *x, int x_len,
|
||||||
|
const float *h, int h_len,
|
||||||
|
float *y, int y_len,
|
||||||
|
int start, int len, int step, int offset);
|
||||||
|
|
||||||
|
/* 8*N-tap SSE complex-complex convolution */
|
||||||
|
void sse_conv_cmplx_8n(const float *x, int x_len,
|
||||||
|
const float *h, int h_len,
|
||||||
|
float *y, int y_len,
|
||||||
|
int start, int len, int step, int offset);
|
||||||
982
config/ax_cxx_compile_stdcxx.m4
Normal file
982
config/ax_cxx_compile_stdcxx.m4
Normal file
@@ -0,0 +1,982 @@
|
|||||||
|
# ===========================================================================
|
||||||
|
# https://www.gnu.org/software/autoconf-archive/ax_cxx_compile_stdcxx.html
|
||||||
|
# ===========================================================================
|
||||||
|
#
|
||||||
|
# SYNOPSIS
|
||||||
|
#
|
||||||
|
# AX_CXX_COMPILE_STDCXX(VERSION, [ext|noext], [mandatory|optional])
|
||||||
|
#
|
||||||
|
# DESCRIPTION
|
||||||
|
#
|
||||||
|
# Check for baseline language coverage in the compiler for the specified
|
||||||
|
# version of the C++ standard. If necessary, add switches to CXX and
|
||||||
|
# CXXCPP to enable support. VERSION may be '11' (for the C++11 standard)
|
||||||
|
# or '14' (for the C++14 standard).
|
||||||
|
#
|
||||||
|
# The second argument, if specified, indicates whether you insist on an
|
||||||
|
# extended mode (e.g. -std=gnu++11) or a strict conformance mode (e.g.
|
||||||
|
# -std=c++11). If neither is specified, you get whatever works, with
|
||||||
|
# preference for an extended mode.
|
||||||
|
#
|
||||||
|
# The third argument, if specified 'mandatory' or if left unspecified,
|
||||||
|
# indicates that baseline support for the specified C++ standard is
|
||||||
|
# required and that the macro should error out if no mode with that
|
||||||
|
# support is found. If specified 'optional', then configuration proceeds
|
||||||
|
# regardless, after defining HAVE_CXX${VERSION} if and only if a
|
||||||
|
# supporting mode is found.
|
||||||
|
#
|
||||||
|
# LICENSE
|
||||||
|
#
|
||||||
|
# Copyright (c) 2008 Benjamin Kosnik <bkoz@redhat.com>
|
||||||
|
# Copyright (c) 2012 Zack Weinberg <zackw@panix.com>
|
||||||
|
# Copyright (c) 2013 Roy Stogner <roystgnr@ices.utexas.edu>
|
||||||
|
# Copyright (c) 2014, 2015 Google Inc.; contributed by Alexey Sokolov <sokolov@google.com>
|
||||||
|
# Copyright (c) 2015 Paul Norman <penorman@mac.com>
|
||||||
|
# Copyright (c) 2015 Moritz Klammler <moritz@klammler.eu>
|
||||||
|
# Copyright (c) 2016 Krzesimir Nowak <qdlacz@gmail.com>
|
||||||
|
#
|
||||||
|
# Copying and distribution of this file, with or without modification, are
|
||||||
|
# permitted in any medium without royalty provided the copyright notice
|
||||||
|
# and this notice are preserved. This file is offered as-is, without any
|
||||||
|
# warranty.
|
||||||
|
|
||||||
|
#serial 7
|
||||||
|
|
||||||
|
dnl This macro is based on the code from the AX_CXX_COMPILE_STDCXX_11 macro
|
||||||
|
dnl (serial version number 13).
|
||||||
|
|
||||||
|
AX_REQUIRE_DEFINED([AC_MSG_WARN])
|
||||||
|
AC_DEFUN([AX_CXX_COMPILE_STDCXX], [dnl
|
||||||
|
m4_if([$1], [11], [ax_cxx_compile_alternatives="11 0x"],
|
||||||
|
[$1], [14], [ax_cxx_compile_alternatives="14 1y"],
|
||||||
|
[$1], [17], [ax_cxx_compile_alternatives="17 1z"],
|
||||||
|
[m4_fatal([invalid first argument `$1' to AX_CXX_COMPILE_STDCXX])])dnl
|
||||||
|
m4_if([$2], [], [],
|
||||||
|
[$2], [ext], [],
|
||||||
|
[$2], [noext], [],
|
||||||
|
[m4_fatal([invalid second argument `$2' to AX_CXX_COMPILE_STDCXX])])dnl
|
||||||
|
m4_if([$3], [], [ax_cxx_compile_cxx$1_required=true],
|
||||||
|
[$3], [mandatory], [ax_cxx_compile_cxx$1_required=true],
|
||||||
|
[$3], [optional], [ax_cxx_compile_cxx$1_required=false],
|
||||||
|
[m4_fatal([invalid third argument `$3' to AX_CXX_COMPILE_STDCXX])])
|
||||||
|
AC_LANG_PUSH([C++])dnl
|
||||||
|
ac_success=no
|
||||||
|
AC_CACHE_CHECK(whether $CXX supports C++$1 features by default,
|
||||||
|
ax_cv_cxx_compile_cxx$1,
|
||||||
|
[AC_COMPILE_IFELSE([AC_LANG_SOURCE([_AX_CXX_COMPILE_STDCXX_testbody_$1])],
|
||||||
|
[ax_cv_cxx_compile_cxx$1=yes],
|
||||||
|
[ax_cv_cxx_compile_cxx$1=no])])
|
||||||
|
if test x$ax_cv_cxx_compile_cxx$1 = xyes; then
|
||||||
|
ac_success=yes
|
||||||
|
fi
|
||||||
|
|
||||||
|
m4_if([$2], [noext], [], [dnl
|
||||||
|
if test x$ac_success = xno; then
|
||||||
|
for alternative in ${ax_cxx_compile_alternatives}; do
|
||||||
|
switch="-std=gnu++${alternative}"
|
||||||
|
cachevar=AS_TR_SH([ax_cv_cxx_compile_cxx$1_$switch])
|
||||||
|
AC_CACHE_CHECK(whether $CXX supports C++$1 features with $switch,
|
||||||
|
$cachevar,
|
||||||
|
[ac_save_CXX="$CXX"
|
||||||
|
CXX="$CXX $switch"
|
||||||
|
AC_COMPILE_IFELSE([AC_LANG_SOURCE([_AX_CXX_COMPILE_STDCXX_testbody_$1])],
|
||||||
|
[eval $cachevar=yes],
|
||||||
|
[eval $cachevar=no])
|
||||||
|
CXX="$ac_save_CXX"])
|
||||||
|
if eval test x\$$cachevar = xyes; then
|
||||||
|
CXX="$CXX $switch"
|
||||||
|
if test -n "$CXXCPP" ; then
|
||||||
|
CXXCPP="$CXXCPP $switch"
|
||||||
|
fi
|
||||||
|
ac_success=yes
|
||||||
|
break
|
||||||
|
fi
|
||||||
|
done
|
||||||
|
fi])
|
||||||
|
|
||||||
|
m4_if([$2], [ext], [], [dnl
|
||||||
|
if test x$ac_success = xno; then
|
||||||
|
dnl HP's aCC needs +std=c++11 according to:
|
||||||
|
dnl http://h21007.www2.hp.com/portal/download/files/unprot/aCxx/PDF_Release_Notes/769149-001.pdf
|
||||||
|
dnl Cray's crayCC needs "-h std=c++11"
|
||||||
|
for alternative in ${ax_cxx_compile_alternatives}; do
|
||||||
|
for switch in -std=c++${alternative} +std=c++${alternative} "-h std=c++${alternative}"; do
|
||||||
|
cachevar=AS_TR_SH([ax_cv_cxx_compile_cxx$1_$switch])
|
||||||
|
AC_CACHE_CHECK(whether $CXX supports C++$1 features with $switch,
|
||||||
|
$cachevar,
|
||||||
|
[ac_save_CXX="$CXX"
|
||||||
|
CXX="$CXX $switch"
|
||||||
|
AC_COMPILE_IFELSE([AC_LANG_SOURCE([_AX_CXX_COMPILE_STDCXX_testbody_$1])],
|
||||||
|
[eval $cachevar=yes],
|
||||||
|
[eval $cachevar=no])
|
||||||
|
CXX="$ac_save_CXX"])
|
||||||
|
if eval test x\$$cachevar = xyes; then
|
||||||
|
CXX="$CXX $switch"
|
||||||
|
if test -n "$CXXCPP" ; then
|
||||||
|
CXXCPP="$CXXCPP $switch"
|
||||||
|
fi
|
||||||
|
ac_success=yes
|
||||||
|
break
|
||||||
|
fi
|
||||||
|
done
|
||||||
|
if test x$ac_success = xyes; then
|
||||||
|
break
|
||||||
|
fi
|
||||||
|
done
|
||||||
|
fi])
|
||||||
|
AC_LANG_POP([C++])
|
||||||
|
if test x$ax_cxx_compile_cxx$1_required = xtrue; then
|
||||||
|
if test x$ac_success = xno; then
|
||||||
|
AC_MSG_ERROR([*** A compiler with support for C++$1 language features is required.])
|
||||||
|
fi
|
||||||
|
fi
|
||||||
|
if test x$ac_success = xno; then
|
||||||
|
HAVE_CXX$1=0
|
||||||
|
AC_MSG_NOTICE([No compiler with C++$1 support was found])
|
||||||
|
else
|
||||||
|
HAVE_CXX$1=1
|
||||||
|
AC_DEFINE(HAVE_CXX$1,1,
|
||||||
|
[define if the compiler supports basic C++$1 syntax])
|
||||||
|
fi
|
||||||
|
AC_SUBST(HAVE_CXX$1)
|
||||||
|
m4_if([$1], [17], [AC_MSG_WARN([C++17 is not yet standardized, so the checks may change in incompatible ways anytime])])
|
||||||
|
])
|
||||||
|
|
||||||
|
|
||||||
|
dnl Test body for checking C++11 support
|
||||||
|
|
||||||
|
m4_define([_AX_CXX_COMPILE_STDCXX_testbody_11],
|
||||||
|
_AX_CXX_COMPILE_STDCXX_testbody_new_in_11
|
||||||
|
)
|
||||||
|
|
||||||
|
|
||||||
|
dnl Test body for checking C++14 support
|
||||||
|
|
||||||
|
m4_define([_AX_CXX_COMPILE_STDCXX_testbody_14],
|
||||||
|
_AX_CXX_COMPILE_STDCXX_testbody_new_in_11
|
||||||
|
_AX_CXX_COMPILE_STDCXX_testbody_new_in_14
|
||||||
|
)
|
||||||
|
|
||||||
|
m4_define([_AX_CXX_COMPILE_STDCXX_testbody_17],
|
||||||
|
_AX_CXX_COMPILE_STDCXX_testbody_new_in_11
|
||||||
|
_AX_CXX_COMPILE_STDCXX_testbody_new_in_14
|
||||||
|
_AX_CXX_COMPILE_STDCXX_testbody_new_in_17
|
||||||
|
)
|
||||||
|
|
||||||
|
dnl Tests for new features in C++11
|
||||||
|
|
||||||
|
m4_define([_AX_CXX_COMPILE_STDCXX_testbody_new_in_11], [[
|
||||||
|
|
||||||
|
// If the compiler admits that it is not ready for C++11, why torture it?
|
||||||
|
// Hopefully, this will speed up the test.
|
||||||
|
|
||||||
|
#ifndef __cplusplus
|
||||||
|
|
||||||
|
#error "This is not a C++ compiler"
|
||||||
|
|
||||||
|
#elif __cplusplus < 201103L
|
||||||
|
|
||||||
|
#error "This is not a C++11 compiler"
|
||||||
|
|
||||||
|
#else
|
||||||
|
|
||||||
|
namespace cxx11
|
||||||
|
{
|
||||||
|
|
||||||
|
namespace test_static_assert
|
||||||
|
{
|
||||||
|
|
||||||
|
template <typename T>
|
||||||
|
struct check
|
||||||
|
{
|
||||||
|
static_assert(sizeof(int) <= sizeof(T), "not big enough");
|
||||||
|
};
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
|
namespace test_final_override
|
||||||
|
{
|
||||||
|
|
||||||
|
struct Base
|
||||||
|
{
|
||||||
|
virtual void f() {}
|
||||||
|
};
|
||||||
|
|
||||||
|
struct Derived : public Base
|
||||||
|
{
|
||||||
|
virtual void f() override {}
|
||||||
|
};
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
|
namespace test_double_right_angle_brackets
|
||||||
|
{
|
||||||
|
|
||||||
|
template < typename T >
|
||||||
|
struct check {};
|
||||||
|
|
||||||
|
typedef check<void> single_type;
|
||||||
|
typedef check<check<void>> double_type;
|
||||||
|
typedef check<check<check<void>>> triple_type;
|
||||||
|
typedef check<check<check<check<void>>>> quadruple_type;
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
|
namespace test_decltype
|
||||||
|
{
|
||||||
|
|
||||||
|
int
|
||||||
|
f()
|
||||||
|
{
|
||||||
|
int a = 1;
|
||||||
|
decltype(a) b = 2;
|
||||||
|
return a + b;
|
||||||
|
}
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
|
namespace test_type_deduction
|
||||||
|
{
|
||||||
|
|
||||||
|
template < typename T1, typename T2 >
|
||||||
|
struct is_same
|
||||||
|
{
|
||||||
|
static const bool value = false;
|
||||||
|
};
|
||||||
|
|
||||||
|
template < typename T >
|
||||||
|
struct is_same<T, T>
|
||||||
|
{
|
||||||
|
static const bool value = true;
|
||||||
|
};
|
||||||
|
|
||||||
|
template < typename T1, typename T2 >
|
||||||
|
auto
|
||||||
|
add(T1 a1, T2 a2) -> decltype(a1 + a2)
|
||||||
|
{
|
||||||
|
return a1 + a2;
|
||||||
|
}
|
||||||
|
|
||||||
|
int
|
||||||
|
test(const int c, volatile int v)
|
||||||
|
{
|
||||||
|
static_assert(is_same<int, decltype(0)>::value == true, "");
|
||||||
|
static_assert(is_same<int, decltype(c)>::value == false, "");
|
||||||
|
static_assert(is_same<int, decltype(v)>::value == false, "");
|
||||||
|
auto ac = c;
|
||||||
|
auto av = v;
|
||||||
|
auto sumi = ac + av + 'x';
|
||||||
|
auto sumf = ac + av + 1.0;
|
||||||
|
static_assert(is_same<int, decltype(ac)>::value == true, "");
|
||||||
|
static_assert(is_same<int, decltype(av)>::value == true, "");
|
||||||
|
static_assert(is_same<int, decltype(sumi)>::value == true, "");
|
||||||
|
static_assert(is_same<int, decltype(sumf)>::value == false, "");
|
||||||
|
static_assert(is_same<int, decltype(add(c, v))>::value == true, "");
|
||||||
|
return (sumf > 0.0) ? sumi : add(c, v);
|
||||||
|
}
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
|
namespace test_noexcept
|
||||||
|
{
|
||||||
|
|
||||||
|
int f() { return 0; }
|
||||||
|
int g() noexcept { return 0; }
|
||||||
|
|
||||||
|
static_assert(noexcept(f()) == false, "");
|
||||||
|
static_assert(noexcept(g()) == true, "");
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
|
namespace test_constexpr
|
||||||
|
{
|
||||||
|
|
||||||
|
template < typename CharT >
|
||||||
|
unsigned long constexpr
|
||||||
|
strlen_c_r(const CharT *const s, const unsigned long acc) noexcept
|
||||||
|
{
|
||||||
|
return *s ? strlen_c_r(s + 1, acc + 1) : acc;
|
||||||
|
}
|
||||||
|
|
||||||
|
template < typename CharT >
|
||||||
|
unsigned long constexpr
|
||||||
|
strlen_c(const CharT *const s) noexcept
|
||||||
|
{
|
||||||
|
return strlen_c_r(s, 0UL);
|
||||||
|
}
|
||||||
|
|
||||||
|
static_assert(strlen_c("") == 0UL, "");
|
||||||
|
static_assert(strlen_c("1") == 1UL, "");
|
||||||
|
static_assert(strlen_c("example") == 7UL, "");
|
||||||
|
static_assert(strlen_c("another\0example") == 7UL, "");
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
|
namespace test_rvalue_references
|
||||||
|
{
|
||||||
|
|
||||||
|
template < int N >
|
||||||
|
struct answer
|
||||||
|
{
|
||||||
|
static constexpr int value = N;
|
||||||
|
};
|
||||||
|
|
||||||
|
answer<1> f(int&) { return answer<1>(); }
|
||||||
|
answer<2> f(const int&) { return answer<2>(); }
|
||||||
|
answer<3> f(int&&) { return answer<3>(); }
|
||||||
|
|
||||||
|
void
|
||||||
|
test()
|
||||||
|
{
|
||||||
|
int i = 0;
|
||||||
|
const int c = 0;
|
||||||
|
static_assert(decltype(f(i))::value == 1, "");
|
||||||
|
static_assert(decltype(f(c))::value == 2, "");
|
||||||
|
static_assert(decltype(f(0))::value == 3, "");
|
||||||
|
}
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
|
namespace test_uniform_initialization
|
||||||
|
{
|
||||||
|
|
||||||
|
struct test
|
||||||
|
{
|
||||||
|
static const int zero {};
|
||||||
|
static const int one {1};
|
||||||
|
};
|
||||||
|
|
||||||
|
static_assert(test::zero == 0, "");
|
||||||
|
static_assert(test::one == 1, "");
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
|
namespace test_lambdas
|
||||||
|
{
|
||||||
|
|
||||||
|
void
|
||||||
|
test1()
|
||||||
|
{
|
||||||
|
auto lambda1 = [](){};
|
||||||
|
auto lambda2 = lambda1;
|
||||||
|
lambda1();
|
||||||
|
lambda2();
|
||||||
|
}
|
||||||
|
|
||||||
|
int
|
||||||
|
test2()
|
||||||
|
{
|
||||||
|
auto a = [](int i, int j){ return i + j; }(1, 2);
|
||||||
|
auto b = []() -> int { return '0'; }();
|
||||||
|
auto c = [=](){ return a + b; }();
|
||||||
|
auto d = [&](){ return c; }();
|
||||||
|
auto e = [a, &b](int x) mutable {
|
||||||
|
const auto identity = [](int y){ return y; };
|
||||||
|
for (auto i = 0; i < a; ++i)
|
||||||
|
a += b--;
|
||||||
|
return x + identity(a + b);
|
||||||
|
}(0);
|
||||||
|
return a + b + c + d + e;
|
||||||
|
}
|
||||||
|
|
||||||
|
int
|
||||||
|
test3()
|
||||||
|
{
|
||||||
|
const auto nullary = [](){ return 0; };
|
||||||
|
const auto unary = [](int x){ return x; };
|
||||||
|
using nullary_t = decltype(nullary);
|
||||||
|
using unary_t = decltype(unary);
|
||||||
|
const auto higher1st = [](nullary_t f){ return f(); };
|
||||||
|
const auto higher2nd = [unary](nullary_t f1){
|
||||||
|
return [unary, f1](unary_t f2){ return f2(unary(f1())); };
|
||||||
|
};
|
||||||
|
return higher1st(nullary) + higher2nd(nullary)(unary);
|
||||||
|
}
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
|
namespace test_variadic_templates
|
||||||
|
{
|
||||||
|
|
||||||
|
template <int...>
|
||||||
|
struct sum;
|
||||||
|
|
||||||
|
template <int N0, int... N1toN>
|
||||||
|
struct sum<N0, N1toN...>
|
||||||
|
{
|
||||||
|
static constexpr auto value = N0 + sum<N1toN...>::value;
|
||||||
|
};
|
||||||
|
|
||||||
|
template <>
|
||||||
|
struct sum<>
|
||||||
|
{
|
||||||
|
static constexpr auto value = 0;
|
||||||
|
};
|
||||||
|
|
||||||
|
static_assert(sum<>::value == 0, "");
|
||||||
|
static_assert(sum<1>::value == 1, "");
|
||||||
|
static_assert(sum<23>::value == 23, "");
|
||||||
|
static_assert(sum<1, 2>::value == 3, "");
|
||||||
|
static_assert(sum<5, 5, 11>::value == 21, "");
|
||||||
|
static_assert(sum<2, 3, 5, 7, 11, 13>::value == 41, "");
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
|
// http://stackoverflow.com/questions/13728184/template-aliases-and-sfinae
|
||||||
|
// Clang 3.1 fails with headers of libstd++ 4.8.3 when using std::function
|
||||||
|
// because of this.
|
||||||
|
namespace test_template_alias_sfinae
|
||||||
|
{
|
||||||
|
|
||||||
|
struct foo {};
|
||||||
|
|
||||||
|
template<typename T>
|
||||||
|
using member = typename T::member_type;
|
||||||
|
|
||||||
|
template<typename T>
|
||||||
|
void func(...) {}
|
||||||
|
|
||||||
|
template<typename T>
|
||||||
|
void func(member<T>*) {}
|
||||||
|
|
||||||
|
void test();
|
||||||
|
|
||||||
|
void test() { func<foo>(0); }
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
|
} // namespace cxx11
|
||||||
|
|
||||||
|
#endif // __cplusplus >= 201103L
|
||||||
|
|
||||||
|
]])
|
||||||
|
|
||||||
|
|
||||||
|
dnl Tests for new features in C++14
|
||||||
|
|
||||||
|
m4_define([_AX_CXX_COMPILE_STDCXX_testbody_new_in_14], [[
|
||||||
|
|
||||||
|
// If the compiler admits that it is not ready for C++14, why torture it?
|
||||||
|
// Hopefully, this will speed up the test.
|
||||||
|
|
||||||
|
#ifndef __cplusplus
|
||||||
|
|
||||||
|
#error "This is not a C++ compiler"
|
||||||
|
|
||||||
|
#elif __cplusplus < 201402L
|
||||||
|
|
||||||
|
#error "This is not a C++14 compiler"
|
||||||
|
|
||||||
|
#else
|
||||||
|
|
||||||
|
namespace cxx14
|
||||||
|
{
|
||||||
|
|
||||||
|
namespace test_polymorphic_lambdas
|
||||||
|
{
|
||||||
|
|
||||||
|
int
|
||||||
|
test()
|
||||||
|
{
|
||||||
|
const auto lambda = [](auto&&... args){
|
||||||
|
const auto istiny = [](auto x){
|
||||||
|
return (sizeof(x) == 1UL) ? 1 : 0;
|
||||||
|
};
|
||||||
|
const int aretiny[] = { istiny(args)... };
|
||||||
|
return aretiny[0];
|
||||||
|
};
|
||||||
|
return lambda(1, 1L, 1.0f, '1');
|
||||||
|
}
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
|
namespace test_binary_literals
|
||||||
|
{
|
||||||
|
|
||||||
|
constexpr auto ivii = 0b0000000000101010;
|
||||||
|
static_assert(ivii == 42, "wrong value");
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
|
namespace test_generalized_constexpr
|
||||||
|
{
|
||||||
|
|
||||||
|
template < typename CharT >
|
||||||
|
constexpr unsigned long
|
||||||
|
strlen_c(const CharT *const s) noexcept
|
||||||
|
{
|
||||||
|
auto length = 0UL;
|
||||||
|
for (auto p = s; *p; ++p)
|
||||||
|
++length;
|
||||||
|
return length;
|
||||||
|
}
|
||||||
|
|
||||||
|
static_assert(strlen_c("") == 0UL, "");
|
||||||
|
static_assert(strlen_c("x") == 1UL, "");
|
||||||
|
static_assert(strlen_c("test") == 4UL, "");
|
||||||
|
static_assert(strlen_c("another\0test") == 7UL, "");
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
|
namespace test_lambda_init_capture
|
||||||
|
{
|
||||||
|
|
||||||
|
int
|
||||||
|
test()
|
||||||
|
{
|
||||||
|
auto x = 0;
|
||||||
|
const auto lambda1 = [a = x](int b){ return a + b; };
|
||||||
|
const auto lambda2 = [a = lambda1(x)](){ return a; };
|
||||||
|
return lambda2();
|
||||||
|
}
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
|
namespace test_digit_separators
|
||||||
|
{
|
||||||
|
|
||||||
|
constexpr auto ten_million = 100'000'000;
|
||||||
|
static_assert(ten_million == 100000000, "");
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
|
namespace test_return_type_deduction
|
||||||
|
{
|
||||||
|
|
||||||
|
auto f(int& x) { return x; }
|
||||||
|
decltype(auto) g(int& x) { return x; }
|
||||||
|
|
||||||
|
template < typename T1, typename T2 >
|
||||||
|
struct is_same
|
||||||
|
{
|
||||||
|
static constexpr auto value = false;
|
||||||
|
};
|
||||||
|
|
||||||
|
template < typename T >
|
||||||
|
struct is_same<T, T>
|
||||||
|
{
|
||||||
|
static constexpr auto value = true;
|
||||||
|
};
|
||||||
|
|
||||||
|
int
|
||||||
|
test()
|
||||||
|
{
|
||||||
|
auto x = 0;
|
||||||
|
static_assert(is_same<int, decltype(f(x))>::value, "");
|
||||||
|
static_assert(is_same<int&, decltype(g(x))>::value, "");
|
||||||
|
return x;
|
||||||
|
}
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
|
} // namespace cxx14
|
||||||
|
|
||||||
|
#endif // __cplusplus >= 201402L
|
||||||
|
|
||||||
|
]])
|
||||||
|
|
||||||
|
|
||||||
|
dnl Tests for new features in C++17
|
||||||
|
|
||||||
|
m4_define([_AX_CXX_COMPILE_STDCXX_testbody_new_in_17], [[
|
||||||
|
|
||||||
|
// If the compiler admits that it is not ready for C++17, why torture it?
|
||||||
|
// Hopefully, this will speed up the test.
|
||||||
|
|
||||||
|
#ifndef __cplusplus
|
||||||
|
|
||||||
|
#error "This is not a C++ compiler"
|
||||||
|
|
||||||
|
#elif __cplusplus <= 201402L
|
||||||
|
|
||||||
|
#error "This is not a C++17 compiler"
|
||||||
|
|
||||||
|
#else
|
||||||
|
|
||||||
|
#if defined(__clang__)
|
||||||
|
#define REALLY_CLANG
|
||||||
|
#else
|
||||||
|
#if defined(__GNUC__)
|
||||||
|
#define REALLY_GCC
|
||||||
|
#endif
|
||||||
|
#endif
|
||||||
|
|
||||||
|
#include <initializer_list>
|
||||||
|
#include <utility>
|
||||||
|
#include <type_traits>
|
||||||
|
|
||||||
|
namespace cxx17
|
||||||
|
{
|
||||||
|
|
||||||
|
#if !defined(REALLY_CLANG)
|
||||||
|
namespace test_constexpr_lambdas
|
||||||
|
{
|
||||||
|
|
||||||
|
// TODO: test it with clang++ from git
|
||||||
|
|
||||||
|
constexpr int foo = [](){return 42;}();
|
||||||
|
|
||||||
|
}
|
||||||
|
#endif // !defined(REALLY_CLANG)
|
||||||
|
|
||||||
|
namespace test::nested_namespace::definitions
|
||||||
|
{
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
|
namespace test_fold_expression
|
||||||
|
{
|
||||||
|
|
||||||
|
template<typename... Args>
|
||||||
|
int multiply(Args... args)
|
||||||
|
{
|
||||||
|
return (args * ... * 1);
|
||||||
|
}
|
||||||
|
|
||||||
|
template<typename... Args>
|
||||||
|
bool all(Args... args)
|
||||||
|
{
|
||||||
|
return (args && ...);
|
||||||
|
}
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
|
namespace test_extended_static_assert
|
||||||
|
{
|
||||||
|
|
||||||
|
static_assert (true);
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
|
namespace test_auto_brace_init_list
|
||||||
|
{
|
||||||
|
|
||||||
|
auto foo = {5};
|
||||||
|
auto bar {5};
|
||||||
|
|
||||||
|
static_assert(std::is_same<std::initializer_list<int>, decltype(foo)>::value);
|
||||||
|
static_assert(std::is_same<int, decltype(bar)>::value);
|
||||||
|
}
|
||||||
|
|
||||||
|
namespace test_typename_in_template_template_parameter
|
||||||
|
{
|
||||||
|
|
||||||
|
template<template<typename> typename X> struct D;
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
|
namespace test_fallthrough_nodiscard_maybe_unused_attributes
|
||||||
|
{
|
||||||
|
|
||||||
|
int f1()
|
||||||
|
{
|
||||||
|
return 42;
|
||||||
|
}
|
||||||
|
|
||||||
|
[[nodiscard]] int f2()
|
||||||
|
{
|
||||||
|
[[maybe_unused]] auto unused = f1();
|
||||||
|
|
||||||
|
switch (f1())
|
||||||
|
{
|
||||||
|
case 17:
|
||||||
|
f1();
|
||||||
|
[[fallthrough]];
|
||||||
|
case 42:
|
||||||
|
f1();
|
||||||
|
}
|
||||||
|
return f1();
|
||||||
|
}
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
|
namespace test_extended_aggregate_initialization
|
||||||
|
{
|
||||||
|
|
||||||
|
struct base1
|
||||||
|
{
|
||||||
|
int b1, b2 = 42;
|
||||||
|
};
|
||||||
|
|
||||||
|
struct base2
|
||||||
|
{
|
||||||
|
base2() {
|
||||||
|
b3 = 42;
|
||||||
|
}
|
||||||
|
int b3;
|
||||||
|
};
|
||||||
|
|
||||||
|
struct derived : base1, base2
|
||||||
|
{
|
||||||
|
int d;
|
||||||
|
};
|
||||||
|
|
||||||
|
derived d1 {{1, 2}, {}, 4}; // full initialization
|
||||||
|
derived d2 {{}, {}, 4}; // value-initialized bases
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
|
namespace test_general_range_based_for_loop
|
||||||
|
{
|
||||||
|
|
||||||
|
struct iter
|
||||||
|
{
|
||||||
|
int i;
|
||||||
|
|
||||||
|
int& operator* ()
|
||||||
|
{
|
||||||
|
return i;
|
||||||
|
}
|
||||||
|
|
||||||
|
const int& operator* () const
|
||||||
|
{
|
||||||
|
return i;
|
||||||
|
}
|
||||||
|
|
||||||
|
iter& operator++()
|
||||||
|
{
|
||||||
|
++i;
|
||||||
|
return *this;
|
||||||
|
}
|
||||||
|
};
|
||||||
|
|
||||||
|
struct sentinel
|
||||||
|
{
|
||||||
|
int i;
|
||||||
|
};
|
||||||
|
|
||||||
|
bool operator== (const iter& i, const sentinel& s)
|
||||||
|
{
|
||||||
|
return i.i == s.i;
|
||||||
|
}
|
||||||
|
|
||||||
|
bool operator!= (const iter& i, const sentinel& s)
|
||||||
|
{
|
||||||
|
return !(i == s);
|
||||||
|
}
|
||||||
|
|
||||||
|
struct range
|
||||||
|
{
|
||||||
|
iter begin() const
|
||||||
|
{
|
||||||
|
return {0};
|
||||||
|
}
|
||||||
|
|
||||||
|
sentinel end() const
|
||||||
|
{
|
||||||
|
return {5};
|
||||||
|
}
|
||||||
|
};
|
||||||
|
|
||||||
|
void f()
|
||||||
|
{
|
||||||
|
range r {};
|
||||||
|
|
||||||
|
for (auto i : r)
|
||||||
|
{
|
||||||
|
[[maybe_unused]] auto v = i;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
|
namespace test_lambda_capture_asterisk_this_by_value
|
||||||
|
{
|
||||||
|
|
||||||
|
struct t
|
||||||
|
{
|
||||||
|
int i;
|
||||||
|
int foo()
|
||||||
|
{
|
||||||
|
return [*this]()
|
||||||
|
{
|
||||||
|
return i;
|
||||||
|
}();
|
||||||
|
}
|
||||||
|
};
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
|
namespace test_enum_class_construction
|
||||||
|
{
|
||||||
|
|
||||||
|
enum class byte : unsigned char
|
||||||
|
{};
|
||||||
|
|
||||||
|
byte foo {42};
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
|
namespace test_constexpr_if
|
||||||
|
{
|
||||||
|
|
||||||
|
template <bool cond>
|
||||||
|
int f ()
|
||||||
|
{
|
||||||
|
if constexpr(cond)
|
||||||
|
{
|
||||||
|
return 13;
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
return 42;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
|
namespace test_selection_statement_with_initializer
|
||||||
|
{
|
||||||
|
|
||||||
|
int f()
|
||||||
|
{
|
||||||
|
return 13;
|
||||||
|
}
|
||||||
|
|
||||||
|
int f2()
|
||||||
|
{
|
||||||
|
if (auto i = f(); i > 0)
|
||||||
|
{
|
||||||
|
return 3;
|
||||||
|
}
|
||||||
|
|
||||||
|
switch (auto i = f(); i + 4)
|
||||||
|
{
|
||||||
|
case 17:
|
||||||
|
return 2;
|
||||||
|
|
||||||
|
default:
|
||||||
|
return 1;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
|
#if !defined(REALLY_CLANG)
|
||||||
|
namespace test_template_argument_deduction_for_class_templates
|
||||||
|
{
|
||||||
|
|
||||||
|
// TODO: test it with clang++ from git
|
||||||
|
|
||||||
|
template <typename T1, typename T2>
|
||||||
|
struct pair
|
||||||
|
{
|
||||||
|
pair (T1 p1, T2 p2)
|
||||||
|
: m1 {p1},
|
||||||
|
m2 {p2}
|
||||||
|
{}
|
||||||
|
|
||||||
|
T1 m1;
|
||||||
|
T2 m2;
|
||||||
|
};
|
||||||
|
|
||||||
|
void f()
|
||||||
|
{
|
||||||
|
[[maybe_unused]] auto p = pair{13, 42u};
|
||||||
|
}
|
||||||
|
|
||||||
|
}
|
||||||
|
#endif // !defined(REALLY_CLANG)
|
||||||
|
|
||||||
|
namespace test_non_type_auto_template_parameters
|
||||||
|
{
|
||||||
|
|
||||||
|
template <auto n>
|
||||||
|
struct B
|
||||||
|
{};
|
||||||
|
|
||||||
|
B<5> b1;
|
||||||
|
B<'a'> b2;
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
|
#if !defined(REALLY_CLANG)
|
||||||
|
namespace test_structured_bindings
|
||||||
|
{
|
||||||
|
|
||||||
|
// TODO: test it with clang++ from git
|
||||||
|
|
||||||
|
int arr[2] = { 1, 2 };
|
||||||
|
std::pair<int, int> pr = { 1, 2 };
|
||||||
|
|
||||||
|
auto f1() -> int(&)[2]
|
||||||
|
{
|
||||||
|
return arr;
|
||||||
|
}
|
||||||
|
|
||||||
|
auto f2() -> std::pair<int, int>&
|
||||||
|
{
|
||||||
|
return pr;
|
||||||
|
}
|
||||||
|
|
||||||
|
struct S
|
||||||
|
{
|
||||||
|
int x1 : 2;
|
||||||
|
volatile double y1;
|
||||||
|
};
|
||||||
|
|
||||||
|
S f3()
|
||||||
|
{
|
||||||
|
return {};
|
||||||
|
}
|
||||||
|
|
||||||
|
auto [ x1, y1 ] = f1();
|
||||||
|
auto& [ xr1, yr1 ] = f1();
|
||||||
|
auto [ x2, y2 ] = f2();
|
||||||
|
auto& [ xr2, yr2 ] = f2();
|
||||||
|
const auto [ x3, y3 ] = f3();
|
||||||
|
|
||||||
|
}
|
||||||
|
#endif // !defined(REALLY_CLANG)
|
||||||
|
|
||||||
|
#if !defined(REALLY_CLANG)
|
||||||
|
namespace test_exception_spec_type_system
|
||||||
|
{
|
||||||
|
|
||||||
|
// TODO: test it with clang++ from git
|
||||||
|
|
||||||
|
struct Good {};
|
||||||
|
struct Bad {};
|
||||||
|
|
||||||
|
void g1() noexcept;
|
||||||
|
void g2();
|
||||||
|
|
||||||
|
template<typename T>
|
||||||
|
Bad
|
||||||
|
f(T*, T*);
|
||||||
|
|
||||||
|
template<typename T1, typename T2>
|
||||||
|
Good
|
||||||
|
f(T1*, T2*);
|
||||||
|
|
||||||
|
static_assert (std::is_same_v<Good, decltype(f(g1, g2))>);
|
||||||
|
|
||||||
|
}
|
||||||
|
#endif // !defined(REALLY_CLANG)
|
||||||
|
|
||||||
|
namespace test_inline_variables
|
||||||
|
{
|
||||||
|
|
||||||
|
template<class T> void f(T)
|
||||||
|
{}
|
||||||
|
|
||||||
|
template<class T> inline T g(T)
|
||||||
|
{
|
||||||
|
return T{};
|
||||||
|
}
|
||||||
|
|
||||||
|
template<> inline void f<>(int)
|
||||||
|
{}
|
||||||
|
|
||||||
|
template<> int g<>(int)
|
||||||
|
{
|
||||||
|
return 5;
|
||||||
|
}
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
|
} // namespace cxx17
|
||||||
|
|
||||||
|
#endif // __cplusplus <= 201402L
|
||||||
|
|
||||||
|
]])
|
||||||
39
config/ax_cxx_compile_stdcxx_11.m4
Normal file
39
config/ax_cxx_compile_stdcxx_11.m4
Normal file
@@ -0,0 +1,39 @@
|
|||||||
|
# =============================================================================
|
||||||
|
# https://www.gnu.org/software/autoconf-archive/ax_cxx_compile_stdcxx_11.html
|
||||||
|
# =============================================================================
|
||||||
|
#
|
||||||
|
# SYNOPSIS
|
||||||
|
#
|
||||||
|
# AX_CXX_COMPILE_STDCXX_11([ext|noext], [mandatory|optional])
|
||||||
|
#
|
||||||
|
# DESCRIPTION
|
||||||
|
#
|
||||||
|
# Check for baseline language coverage in the compiler for the C++11
|
||||||
|
# standard; if necessary, add switches to CXX and CXXCPP to enable
|
||||||
|
# support.
|
||||||
|
#
|
||||||
|
# This macro is a convenience alias for calling the AX_CXX_COMPILE_STDCXX
|
||||||
|
# macro with the version set to C++11. The two optional arguments are
|
||||||
|
# forwarded literally as the second and third argument respectively.
|
||||||
|
# Please see the documentation for the AX_CXX_COMPILE_STDCXX macro for
|
||||||
|
# more information. If you want to use this macro, you also need to
|
||||||
|
# download the ax_cxx_compile_stdcxx.m4 file.
|
||||||
|
#
|
||||||
|
# LICENSE
|
||||||
|
#
|
||||||
|
# Copyright (c) 2008 Benjamin Kosnik <bkoz@redhat.com>
|
||||||
|
# Copyright (c) 2012 Zack Weinberg <zackw@panix.com>
|
||||||
|
# Copyright (c) 2013 Roy Stogner <roystgnr@ices.utexas.edu>
|
||||||
|
# Copyright (c) 2014, 2015 Google Inc.; contributed by Alexey Sokolov <sokolov@google.com>
|
||||||
|
# Copyright (c) 2015 Paul Norman <penorman@mac.com>
|
||||||
|
# Copyright (c) 2015 Moritz Klammler <moritz@klammler.eu>
|
||||||
|
#
|
||||||
|
# Copying and distribution of this file, with or without modification, are
|
||||||
|
# permitted in any medium without royalty provided the copyright notice
|
||||||
|
# and this notice are preserved. This file is offered as-is, without any
|
||||||
|
# warranty.
|
||||||
|
|
||||||
|
#serial 18
|
||||||
|
|
||||||
|
AX_REQUIRE_DEFINED([AX_CXX_COMPILE_STDCXX])
|
||||||
|
AC_DEFUN([AX_CXX_COMPILE_STDCXX_11], [AX_CXX_COMPILE_STDCXX([11], [$1], [$2])])
|
||||||
221
config/ax_ext.m4
221
config/ax_ext.m4
@@ -1,221 +0,0 @@
|
|||||||
# ===========================================================================
|
|
||||||
# http://www.gnu.org/software/autoconf-archive/ax_ext.html
|
|
||||||
# ===========================================================================
|
|
||||||
#
|
|
||||||
# SYNOPSIS
|
|
||||||
#
|
|
||||||
# AX_EXT
|
|
||||||
#
|
|
||||||
# DESCRIPTION
|
|
||||||
#
|
|
||||||
# Find supported SIMD extensions by requesting cpuid. When an SIMD
|
|
||||||
# extension is found, the -m"simdextensionname" is added to SIMD_FLAGS if
|
|
||||||
# compiler supports it. For example, if "sse2" is available, then "-msse2"
|
|
||||||
# is added to SIMD_FLAGS.
|
|
||||||
#
|
|
||||||
# This macro calls:
|
|
||||||
#
|
|
||||||
# AC_SUBST(SIMD_FLAGS)
|
|
||||||
#
|
|
||||||
# And defines:
|
|
||||||
#
|
|
||||||
# HAVE_MMX / HAVE_SSE / HAVE_SSE2 / HAVE_SSE3 / HAVE_SSSE3 / HAVE_SSE4.1 / HAVE_SSE4.2 / HAVE_AVX
|
|
||||||
#
|
|
||||||
# LICENSE
|
|
||||||
#
|
|
||||||
# Copyright (c) 2007 Christophe Tournayre <turn3r@users.sourceforge.net>
|
|
||||||
# Copyright (c) 2013 Michael Petch <mpetch@capp-sysware.com>
|
|
||||||
#
|
|
||||||
# Copying and distribution of this file, with or without modification, are
|
|
||||||
# permitted in any medium without royalty provided the copyright notice
|
|
||||||
# and this notice are preserved. This file is offered as-is, without any
|
|
||||||
# warranty.
|
|
||||||
|
|
||||||
#serial 12
|
|
||||||
|
|
||||||
AC_DEFUN([AX_EXT],
|
|
||||||
[
|
|
||||||
AC_REQUIRE([AC_CANONICAL_HOST])
|
|
||||||
|
|
||||||
case $host_cpu in
|
|
||||||
i[[3456]]86*|x86_64*|amd64*)
|
|
||||||
|
|
||||||
AC_REQUIRE([AX_GCC_X86_CPUID])
|
|
||||||
AC_REQUIRE([AX_GCC_X86_AVX_XGETBV])
|
|
||||||
|
|
||||||
AX_GCC_X86_CPUID(0x00000001)
|
|
||||||
ecx=`echo $ax_cv_gcc_x86_cpuid_0x00000001 | cut -d ":" -f 3`
|
|
||||||
edx=`echo $ax_cv_gcc_x86_cpuid_0x00000001 | cut -d ":" -f 4`
|
|
||||||
|
|
||||||
AC_CACHE_CHECK([whether mmx is supported], [ax_cv_have_mmx_ext],
|
|
||||||
[
|
|
||||||
ax_cv_have_mmx_ext=no
|
|
||||||
if test "$((0x$edx>>23&0x01))" = 1; then
|
|
||||||
ax_cv_have_mmx_ext=yes
|
|
||||||
fi
|
|
||||||
])
|
|
||||||
|
|
||||||
AC_CACHE_CHECK([whether sse is supported], [ax_cv_have_sse_ext],
|
|
||||||
[
|
|
||||||
ax_cv_have_sse_ext=no
|
|
||||||
if test "$((0x$edx>>25&0x01))" = 1; then
|
|
||||||
ax_cv_have_sse_ext=yes
|
|
||||||
fi
|
|
||||||
])
|
|
||||||
|
|
||||||
AC_CACHE_CHECK([whether sse2 is supported], [ax_cv_have_sse2_ext],
|
|
||||||
[
|
|
||||||
ax_cv_have_sse2_ext=no
|
|
||||||
if test "$((0x$edx>>26&0x01))" = 1; then
|
|
||||||
ax_cv_have_sse2_ext=yes
|
|
||||||
fi
|
|
||||||
])
|
|
||||||
|
|
||||||
AC_CACHE_CHECK([whether sse3 is supported], [ax_cv_have_sse3_ext],
|
|
||||||
[
|
|
||||||
ax_cv_have_sse3_ext=no
|
|
||||||
if test "$((0x$ecx&0x01))" = 1; then
|
|
||||||
ax_cv_have_sse3_ext=yes
|
|
||||||
fi
|
|
||||||
])
|
|
||||||
|
|
||||||
AC_CACHE_CHECK([whether ssse3 is supported], [ax_cv_have_ssse3_ext],
|
|
||||||
[
|
|
||||||
ax_cv_have_ssse3_ext=no
|
|
||||||
if test "$((0x$ecx>>9&0x01))" = 1; then
|
|
||||||
ax_cv_have_ssse3_ext=yes
|
|
||||||
fi
|
|
||||||
])
|
|
||||||
|
|
||||||
AC_CACHE_CHECK([whether sse4.1 is supported], [ax_cv_have_sse41_ext],
|
|
||||||
[
|
|
||||||
ax_cv_have_sse41_ext=no
|
|
||||||
if test "$((0x$ecx>>19&0x01))" = 1; then
|
|
||||||
ax_cv_have_sse41_ext=yes
|
|
||||||
fi
|
|
||||||
])
|
|
||||||
|
|
||||||
AC_CACHE_CHECK([whether sse4.2 is supported], [ax_cv_have_sse42_ext],
|
|
||||||
[
|
|
||||||
ax_cv_have_sse42_ext=no
|
|
||||||
if test "$((0x$ecx>>20&0x01))" = 1; then
|
|
||||||
ax_cv_have_sse42_ext=yes
|
|
||||||
fi
|
|
||||||
])
|
|
||||||
|
|
||||||
AC_CACHE_CHECK([whether avx is supported by processor], [ax_cv_have_avx_cpu_ext],
|
|
||||||
[
|
|
||||||
ax_cv_have_avx_cpu_ext=no
|
|
||||||
if test "$((0x$ecx>>28&0x01))" = 1; then
|
|
||||||
ax_cv_have_avx_cpu_ext=yes
|
|
||||||
fi
|
|
||||||
])
|
|
||||||
|
|
||||||
if test x"$ax_cv_have_avx_cpu_ext" = x"yes"; then
|
|
||||||
AX_GCC_X86_AVX_XGETBV(0x00000000)
|
|
||||||
|
|
||||||
xgetbv_eax="0"
|
|
||||||
if test x"$ax_cv_gcc_x86_avx_xgetbv_0x00000000" != x"unknown"; then
|
|
||||||
xgetbv_eax=`echo $ax_cv_gcc_x86_avx_xgetbv_0x00000000 | cut -d ":" -f 1`
|
|
||||||
fi
|
|
||||||
|
|
||||||
AC_CACHE_CHECK([whether avx is supported by operating system], [ax_cv_have_avx_ext],
|
|
||||||
[
|
|
||||||
ax_cv_have_avx_ext=no
|
|
||||||
|
|
||||||
if test "$((0x$ecx>>27&0x01))" = 1; then
|
|
||||||
if test "$((0x$xgetbv_eax&0x6))" = 6; then
|
|
||||||
ax_cv_have_avx_ext=yes
|
|
||||||
fi
|
|
||||||
fi
|
|
||||||
])
|
|
||||||
if test x"$ax_cv_have_avx_ext" = x"no"; then
|
|
||||||
AC_MSG_WARN([Your processor supports AVX, but your operating system doesn't])
|
|
||||||
fi
|
|
||||||
fi
|
|
||||||
|
|
||||||
if test "$ax_cv_have_mmx_ext" = yes; then
|
|
||||||
AX_CHECK_COMPILE_FLAG(-mmmx, ax_cv_support_mmx_ext=yes, [])
|
|
||||||
if test x"$ax_cv_support_mmx_ext" = x"yes"; then
|
|
||||||
SIMD_FLAGS="$SIMD_FLAGS -mmmx"
|
|
||||||
AC_DEFINE(HAVE_MMX,,[Support mmx instructions])
|
|
||||||
else
|
|
||||||
AC_MSG_WARN([Your processor supports mmx instructions but not your compiler, can you try another compiler?])
|
|
||||||
fi
|
|
||||||
fi
|
|
||||||
|
|
||||||
if test "$ax_cv_have_sse_ext" = yes; then
|
|
||||||
AX_CHECK_COMPILE_FLAG(-msse, ax_cv_support_sse_ext=yes, [])
|
|
||||||
if test x"$ax_cv_support_sse_ext" = x"yes"; then
|
|
||||||
SIMD_FLAGS="$SIMD_FLAGS -msse"
|
|
||||||
AC_DEFINE(HAVE_SSE,,[Support SSE (Streaming SIMD Extensions) instructions])
|
|
||||||
else
|
|
||||||
AC_MSG_WARN([Your processor supports sse instructions but not your compiler, can you try another compiler?])
|
|
||||||
fi
|
|
||||||
fi
|
|
||||||
|
|
||||||
if test "$ax_cv_have_sse2_ext" = yes; then
|
|
||||||
AX_CHECK_COMPILE_FLAG(-msse2, ax_cv_support_sse2_ext=yes, [])
|
|
||||||
if test x"$ax_cv_support_sse2_ext" = x"yes"; then
|
|
||||||
SIMD_FLAGS="$SIMD_FLAGS -msse2"
|
|
||||||
AC_DEFINE(HAVE_SSE2,,[Support SSE2 (Streaming SIMD Extensions 2) instructions])
|
|
||||||
else
|
|
||||||
AC_MSG_WARN([Your processor supports sse2 instructions but not your compiler, can you try another compiler?])
|
|
||||||
fi
|
|
||||||
fi
|
|
||||||
|
|
||||||
if test "$ax_cv_have_sse3_ext" = yes; then
|
|
||||||
AX_CHECK_COMPILE_FLAG(-msse3, ax_cv_support_sse3_ext=yes, [])
|
|
||||||
if test x"$ax_cv_support_sse3_ext" = x"yes"; then
|
|
||||||
SIMD_FLAGS="$SIMD_FLAGS -msse3"
|
|
||||||
AC_DEFINE(HAVE_SSE3,,[Support SSE3 (Streaming SIMD Extensions 3) instructions])
|
|
||||||
else
|
|
||||||
AC_MSG_WARN([Your processor supports sse3 instructions but not your compiler, can you try another compiler?])
|
|
||||||
fi
|
|
||||||
fi
|
|
||||||
|
|
||||||
if test "$ax_cv_have_ssse3_ext" = yes; then
|
|
||||||
AX_CHECK_COMPILE_FLAG(-mssse3, ax_cv_support_ssse3_ext=yes, [])
|
|
||||||
if test x"$ax_cv_support_ssse3_ext" = x"yes"; then
|
|
||||||
SIMD_FLAGS="$SIMD_FLAGS -mssse3"
|
|
||||||
AC_DEFINE(HAVE_SSSE3,,[Support SSSE3 (Supplemental Streaming SIMD Extensions 3) instructions])
|
|
||||||
else
|
|
||||||
AC_MSG_WARN([Your processor supports ssse3 instructions but not your compiler, can you try another compiler?])
|
|
||||||
fi
|
|
||||||
fi
|
|
||||||
|
|
||||||
if test "$ax_cv_have_sse41_ext" = yes; then
|
|
||||||
AX_CHECK_COMPILE_FLAG(-msse4.1, ax_cv_support_sse41_ext=yes, [])
|
|
||||||
if test x"$ax_cv_support_sse41_ext" = x"yes"; then
|
|
||||||
SIMD_FLAGS="$SIMD_FLAGS -msse4.1"
|
|
||||||
AC_DEFINE(HAVE_SSE4_1,,[Support SSSE4.1 (Streaming SIMD Extensions 4.1) instructions])
|
|
||||||
else
|
|
||||||
AC_MSG_WARN([Your processor supports sse4.1 instructions but not your compiler, can you try another compiler?])
|
|
||||||
fi
|
|
||||||
fi
|
|
||||||
|
|
||||||
if test "$ax_cv_have_sse42_ext" = yes; then
|
|
||||||
AX_CHECK_COMPILE_FLAG(-msse4.2, ax_cv_support_sse42_ext=yes, [])
|
|
||||||
if test x"$ax_cv_support_sse42_ext" = x"yes"; then
|
|
||||||
SIMD_FLAGS="$SIMD_FLAGS -msse4.2"
|
|
||||||
AC_DEFINE(HAVE_SSE4_2,,[Support SSSE4.2 (Streaming SIMD Extensions 4.2) instructions])
|
|
||||||
else
|
|
||||||
AC_MSG_WARN([Your processor supports sse4.2 instructions but not your compiler, can you try another compiler?])
|
|
||||||
fi
|
|
||||||
fi
|
|
||||||
|
|
||||||
if test "$ax_cv_have_avx_ext" = yes; then
|
|
||||||
AX_CHECK_COMPILE_FLAG(-mavx, ax_cv_support_avx_ext=yes, [])
|
|
||||||
if test x"$ax_cv_support_avx_ext" = x"yes"; then
|
|
||||||
SIMD_FLAGS="$SIMD_FLAGS -mavx"
|
|
||||||
AC_DEFINE(HAVE_AVX,,[Support AVX (Advanced Vector Extensions) instructions])
|
|
||||||
else
|
|
||||||
AC_MSG_WARN([Your processor supports avx instructions but not your compiler, can you try another compiler?])
|
|
||||||
fi
|
|
||||||
fi
|
|
||||||
|
|
||||||
;;
|
|
||||||
esac
|
|
||||||
|
|
||||||
AC_SUBST(SIMD_FLAGS)
|
|
||||||
])
|
|
||||||
@@ -1,79 +0,0 @@
|
|||||||
# ===========================================================================
|
|
||||||
# http://www.gnu.org/software/autoconf-archive/ax_gcc_x86_avx_xgetbv.html
|
|
||||||
# ===========================================================================
|
|
||||||
#
|
|
||||||
# SYNOPSIS
|
|
||||||
#
|
|
||||||
# AX_GCC_X86_AVX_XGETBV
|
|
||||||
#
|
|
||||||
# DESCRIPTION
|
|
||||||
#
|
|
||||||
# On later x86 processors with AVX SIMD support, with gcc or a compiler
|
|
||||||
# that has a compatible syntax for inline assembly instructions, run a
|
|
||||||
# small program that executes the xgetbv instruction with input OP. This
|
|
||||||
# can be used to detect if the OS supports AVX instruction usage.
|
|
||||||
#
|
|
||||||
# On output, the values of the eax and edx registers are stored as
|
|
||||||
# hexadecimal strings as "eax:edx" in the cache variable
|
|
||||||
# ax_cv_gcc_x86_avx_xgetbv.
|
|
||||||
#
|
|
||||||
# If the xgetbv instruction fails (because you are running a
|
|
||||||
# cross-compiler, or because you are not using gcc, or because you are on
|
|
||||||
# a processor that doesn't have this instruction),
|
|
||||||
# ax_cv_gcc_x86_avx_xgetbv_OP is set to the string "unknown".
|
|
||||||
#
|
|
||||||
# This macro mainly exists to be used in AX_EXT.
|
|
||||||
#
|
|
||||||
# LICENSE
|
|
||||||
#
|
|
||||||
# Copyright (c) 2013 Michael Petch <mpetch@capp-sysware.com>
|
|
||||||
#
|
|
||||||
# This program is free software: you can redistribute it and/or modify it
|
|
||||||
# under the terms of the GNU General Public License as published by the
|
|
||||||
# Free Software Foundation, either version 3 of the License, or (at your
|
|
||||||
# option) any later version.
|
|
||||||
#
|
|
||||||
# This program is distributed in the hope that it will be useful, but
|
|
||||||
# WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
||||||
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General
|
|
||||||
# Public License for more details.
|
|
||||||
#
|
|
||||||
# You should have received a copy of the GNU General Public License along
|
|
||||||
# with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
||||||
#
|
|
||||||
# As a special exception, the respective Autoconf Macro's copyright owner
|
|
||||||
# gives unlimited permission to copy, distribute and modify the configure
|
|
||||||
# scripts that are the output of Autoconf when processing the Macro. You
|
|
||||||
# need not follow the terms of the GNU General Public License when using
|
|
||||||
# or distributing such scripts, even though portions of the text of the
|
|
||||||
# Macro appear in them. The GNU General Public License (GPL) does govern
|
|
||||||
# all other use of the material that constitutes the Autoconf Macro.
|
|
||||||
#
|
|
||||||
# This special exception to the GPL applies to versions of the Autoconf
|
|
||||||
# Macro released by the Autoconf Archive. When you make and distribute a
|
|
||||||
# modified version of the Autoconf Macro, you may extend this special
|
|
||||||
# exception to the GPL to apply to your modified version as well.
|
|
||||||
|
|
||||||
#serial 1
|
|
||||||
|
|
||||||
AC_DEFUN([AX_GCC_X86_AVX_XGETBV],
|
|
||||||
[AC_REQUIRE([AC_PROG_CC])
|
|
||||||
AC_LANG_PUSH([C])
|
|
||||||
AC_CACHE_CHECK(for x86-AVX xgetbv $1 output, ax_cv_gcc_x86_avx_xgetbv_$1,
|
|
||||||
[AC_RUN_IFELSE([AC_LANG_PROGRAM([#include <stdio.h>], [
|
|
||||||
int op = $1, eax, edx;
|
|
||||||
FILE *f;
|
|
||||||
/* Opcodes for xgetbv */
|
|
||||||
__asm__(".byte 0x0f, 0x01, 0xd0"
|
|
||||||
: "=a" (eax), "=d" (edx)
|
|
||||||
: "c" (op));
|
|
||||||
f = fopen("conftest_xgetbv", "w"); if (!f) return 1;
|
|
||||||
fprintf(f, "%x:%x\n", eax, edx);
|
|
||||||
fclose(f);
|
|
||||||
return 0;
|
|
||||||
])],
|
|
||||||
[ax_cv_gcc_x86_avx_xgetbv_$1=`cat conftest_xgetbv`; rm -f conftest_xgetbv],
|
|
||||||
[ax_cv_gcc_x86_avx_xgetbv_$1=unknown; rm -f conftest_xgetbv],
|
|
||||||
[ax_cv_gcc_x86_avx_xgetbv_$1=unknown])])
|
|
||||||
AC_LANG_POP([C])
|
|
||||||
])
|
|
||||||
@@ -1,79 +0,0 @@
|
|||||||
# ===========================================================================
|
|
||||||
# http://www.gnu.org/software/autoconf-archive/ax_gcc_x86_cpuid.html
|
|
||||||
# ===========================================================================
|
|
||||||
#
|
|
||||||
# SYNOPSIS
|
|
||||||
#
|
|
||||||
# AX_GCC_X86_CPUID(OP)
|
|
||||||
#
|
|
||||||
# DESCRIPTION
|
|
||||||
#
|
|
||||||
# On Pentium and later x86 processors, with gcc or a compiler that has a
|
|
||||||
# compatible syntax for inline assembly instructions, run a small program
|
|
||||||
# that executes the cpuid instruction with input OP. This can be used to
|
|
||||||
# detect the CPU type.
|
|
||||||
#
|
|
||||||
# On output, the values of the eax, ebx, ecx, and edx registers are stored
|
|
||||||
# as hexadecimal strings as "eax:ebx:ecx:edx" in the cache variable
|
|
||||||
# ax_cv_gcc_x86_cpuid_OP.
|
|
||||||
#
|
|
||||||
# If the cpuid instruction fails (because you are running a
|
|
||||||
# cross-compiler, or because you are not using gcc, or because you are on
|
|
||||||
# a processor that doesn't have this instruction), ax_cv_gcc_x86_cpuid_OP
|
|
||||||
# is set to the string "unknown".
|
|
||||||
#
|
|
||||||
# This macro mainly exists to be used in AX_GCC_ARCHFLAG.
|
|
||||||
#
|
|
||||||
# LICENSE
|
|
||||||
#
|
|
||||||
# Copyright (c) 2008 Steven G. Johnson <stevenj@alum.mit.edu>
|
|
||||||
# Copyright (c) 2008 Matteo Frigo
|
|
||||||
#
|
|
||||||
# This program is free software: you can redistribute it and/or modify it
|
|
||||||
# under the terms of the GNU General Public License as published by the
|
|
||||||
# Free Software Foundation, either version 3 of the License, or (at your
|
|
||||||
# option) any later version.
|
|
||||||
#
|
|
||||||
# This program is distributed in the hope that it will be useful, but
|
|
||||||
# WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
||||||
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General
|
|
||||||
# Public License for more details.
|
|
||||||
#
|
|
||||||
# You should have received a copy of the GNU General Public License along
|
|
||||||
# with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
||||||
#
|
|
||||||
# As a special exception, the respective Autoconf Macro's copyright owner
|
|
||||||
# gives unlimited permission to copy, distribute and modify the configure
|
|
||||||
# scripts that are the output of Autoconf when processing the Macro. You
|
|
||||||
# need not follow the terms of the GNU General Public License when using
|
|
||||||
# or distributing such scripts, even though portions of the text of the
|
|
||||||
# Macro appear in them. The GNU General Public License (GPL) does govern
|
|
||||||
# all other use of the material that constitutes the Autoconf Macro.
|
|
||||||
#
|
|
||||||
# This special exception to the GPL applies to versions of the Autoconf
|
|
||||||
# Macro released by the Autoconf Archive. When you make and distribute a
|
|
||||||
# modified version of the Autoconf Macro, you may extend this special
|
|
||||||
# exception to the GPL to apply to your modified version as well.
|
|
||||||
|
|
||||||
#serial 7
|
|
||||||
|
|
||||||
AC_DEFUN([AX_GCC_X86_CPUID],
|
|
||||||
[AC_REQUIRE([AC_PROG_CC])
|
|
||||||
AC_LANG_PUSH([C])
|
|
||||||
AC_CACHE_CHECK(for x86 cpuid $1 output, ax_cv_gcc_x86_cpuid_$1,
|
|
||||||
[AC_RUN_IFELSE([AC_LANG_PROGRAM([#include <stdio.h>], [
|
|
||||||
int op = $1, eax, ebx, ecx, edx;
|
|
||||||
FILE *f;
|
|
||||||
__asm__("cpuid"
|
|
||||||
: "=a" (eax), "=b" (ebx), "=c" (ecx), "=d" (edx)
|
|
||||||
: "a" (op));
|
|
||||||
f = fopen("conftest_cpuid", "w"); if (!f) return 1;
|
|
||||||
fprintf(f, "%x:%x:%x:%x\n", eax, ebx, ecx, edx);
|
|
||||||
fclose(f);
|
|
||||||
return 0;
|
|
||||||
])],
|
|
||||||
[ax_cv_gcc_x86_cpuid_$1=`cat conftest_cpuid`; rm -f conftest_cpuid],
|
|
||||||
[ax_cv_gcc_x86_cpuid_$1=unknown; rm -f conftest_cpuid],
|
|
||||||
[ax_cv_gcc_x86_cpuid_$1=unknown])])
|
|
||||||
AC_LANG_POP([C])
|
|
||||||
])
|
|
||||||
71
config/ax_sse.m4
Normal file
71
config/ax_sse.m4
Normal file
@@ -0,0 +1,71 @@
|
|||||||
|
# ===========================================================================
|
||||||
|
# http://www.gnu.org/software/autoconf-archive/ax_ext.html
|
||||||
|
# ===========================================================================
|
||||||
|
#
|
||||||
|
# SYNOPSIS
|
||||||
|
#
|
||||||
|
# AX_SSE
|
||||||
|
#
|
||||||
|
# DESCRIPTION
|
||||||
|
#
|
||||||
|
# Find SIMD extensions supported by compiler. The -m"simdextensionname" is
|
||||||
|
# added to SIMD_FLAGS if compiler supports it. For example, if "sse2" is
|
||||||
|
# available, then "-msse2" is added to SIMD_FLAGS.
|
||||||
|
#
|
||||||
|
# This macro calls:
|
||||||
|
#
|
||||||
|
# AC_SUBST(SIMD_FLAGS)
|
||||||
|
#
|
||||||
|
# And defines:
|
||||||
|
#
|
||||||
|
# HAVE_SSE3 / HAVE_SSE4.1
|
||||||
|
#
|
||||||
|
# LICENSE
|
||||||
|
#
|
||||||
|
# Copyright (c) 2007 Christophe Tournayre <turn3r@users.sourceforge.net>
|
||||||
|
# Copyright (c) 2013 Michael Petch <mpetch@capp-sysware.com>
|
||||||
|
#
|
||||||
|
# Copying and distribution of this file, with or without modification, are
|
||||||
|
# permitted in any medium without royalty provided the copyright notice
|
||||||
|
# and this notice are preserved. This file is offered as-is, without any
|
||||||
|
# warranty.
|
||||||
|
#
|
||||||
|
# NOTE: The functionality that requests the cpuid has been stripped because
|
||||||
|
# this project detects the CPU capabilities during runtime. However, we
|
||||||
|
# still need to check if the compiler supports the requested SIMD flag
|
||||||
|
|
||||||
|
#serial 12
|
||||||
|
|
||||||
|
AC_DEFUN([AX_SSE],
|
||||||
|
[
|
||||||
|
AC_REQUIRE([AC_CANONICAL_HOST])
|
||||||
|
|
||||||
|
AM_CONDITIONAL(HAVE_SSE3, false)
|
||||||
|
AM_CONDITIONAL(HAVE_SSE4_1, false)
|
||||||
|
|
||||||
|
case $host_cpu in
|
||||||
|
i[[3456]]86*|x86_64*|amd64*)
|
||||||
|
AX_CHECK_COMPILE_FLAG(-msse3, ax_cv_support_sse3_ext=yes, [])
|
||||||
|
if test x"$ax_cv_support_sse3_ext" = x"yes"; then
|
||||||
|
SIMD_FLAGS="$SIMD_FLAGS -msse3"
|
||||||
|
AC_DEFINE(HAVE_SSE3,,
|
||||||
|
[Support SSE3 (Streaming SIMD Extensions 3) instructions])
|
||||||
|
AM_CONDITIONAL(HAVE_SSE3, true)
|
||||||
|
else
|
||||||
|
AC_MSG_WARN([Your compiler does not support SSE3 instructions])
|
||||||
|
fi
|
||||||
|
|
||||||
|
AX_CHECK_COMPILE_FLAG(-msse4.1, ax_cv_support_sse41_ext=yes, [])
|
||||||
|
if test x"$ax_cv_support_sse41_ext" = x"yes"; then
|
||||||
|
SIMD_FLAGS="$SIMD_FLAGS -msse4.1"
|
||||||
|
AC_DEFINE(HAVE_SSE4_1,,
|
||||||
|
[Support SSE4.1 (Streaming SIMD Extensions 4.1) instructions])
|
||||||
|
AM_CONDITIONAL(HAVE_SSE4_1, true)
|
||||||
|
else
|
||||||
|
AC_MSG_WARN([Your compiler does not support SSE4.1])
|
||||||
|
fi
|
||||||
|
;;
|
||||||
|
esac
|
||||||
|
|
||||||
|
AC_SUBST(SIMD_FLAGS)
|
||||||
|
])
|
||||||
71
configure.ac
71
configure.ac
@@ -18,7 +18,9 @@ dnl You should have received a copy of the GNU General Public License
|
|||||||
dnl along with this program. If not, see <http://www.gnu.org/licenses/>.
|
dnl along with this program. If not, see <http://www.gnu.org/licenses/>.
|
||||||
dnl
|
dnl
|
||||||
|
|
||||||
AC_INIT(openbts,P2.8TRUNK)
|
AC_INIT([osmo-trx],
|
||||||
|
m4_esyscmd([./git-version-gen .tarball-veresion]),
|
||||||
|
[openbsc@lists.osmocom.org])
|
||||||
AC_PREREQ(2.57)
|
AC_PREREQ(2.57)
|
||||||
AC_CONFIG_SRCDIR([Transceiver52M/Makefile.am])
|
AC_CONFIG_SRCDIR([Transceiver52M/Makefile.am])
|
||||||
AC_CONFIG_AUX_DIR([.])
|
AC_CONFIG_AUX_DIR([.])
|
||||||
@@ -29,13 +31,18 @@ AC_CANONICAL_BUILD
|
|||||||
AC_CANONICAL_HOST
|
AC_CANONICAL_HOST
|
||||||
AC_CANONICAL_TARGET
|
AC_CANONICAL_TARGET
|
||||||
|
|
||||||
AM_INIT_AUTOMAKE
|
AM_INIT_AUTOMAKE([subdir-objects])
|
||||||
|
|
||||||
dnl Linux kernel KBuild style compile messages
|
dnl Linux kernel KBuild style compile messages
|
||||||
m4_ifdef([AM_SILENT_RULES], [AM_SILENT_RULES([yes])])
|
m4_ifdef([AM_SILENT_RULES], [AM_SILENT_RULES([yes])])
|
||||||
|
|
||||||
|
dnl include release helper
|
||||||
|
RELMAKE='-include osmo-release.mk'
|
||||||
|
AC_SUBST([RELMAKE])
|
||||||
|
|
||||||
AM_PROG_AS
|
AM_PROG_AS
|
||||||
AC_PROG_CXX
|
AC_PROG_CXX
|
||||||
|
AX_CXX_COMPILE_STDCXX_11
|
||||||
AC_PROG_LN_S
|
AC_PROG_LN_S
|
||||||
AC_PROG_MAKE_SET
|
AC_PROG_MAKE_SET
|
||||||
AC_PROG_INSTALL
|
AC_PROG_INSTALL
|
||||||
@@ -58,9 +65,6 @@ AC_TYPE_SIZE_T
|
|||||||
AC_HEADER_TIME
|
AC_HEADER_TIME
|
||||||
AC_C_BIGENDIAN
|
AC_C_BIGENDIAN
|
||||||
|
|
||||||
dnl checks for libraries
|
|
||||||
PKG_CHECK_MODULES(LIBOSMOCORE, libosmocore >= 0.3.9)
|
|
||||||
|
|
||||||
AC_ARG_WITH(usrp1, [
|
AC_ARG_WITH(usrp1, [
|
||||||
AS_HELP_STRING([--with-usrp1],
|
AS_HELP_STRING([--with-usrp1],
|
||||||
[enable USRP1 gnuradio based transceiver])
|
[enable USRP1 gnuradio based transceiver])
|
||||||
@@ -81,6 +85,11 @@ AC_ARG_WITH(neon-vfpv4, [
|
|||||||
[enable ARM NEON FMA support])
|
[enable ARM NEON FMA support])
|
||||||
])
|
])
|
||||||
|
|
||||||
|
AC_ARG_WITH(sse, [
|
||||||
|
AS_HELP_STRING([--with-sse],
|
||||||
|
[enable x86 SSE support (default)])
|
||||||
|
])
|
||||||
|
|
||||||
AS_IF([test "x$with_neon" = "xyes"], [
|
AS_IF([test "x$with_neon" = "xyes"], [
|
||||||
AC_DEFINE(HAVE_NEON, 1, Support ARM NEON)
|
AC_DEFINE(HAVE_NEON, 1, Support ARM NEON)
|
||||||
])
|
])
|
||||||
@@ -95,8 +104,15 @@ AS_IF([test "x$with_usrp1" = "xyes"], [
|
|||||||
])
|
])
|
||||||
|
|
||||||
AS_IF([test "x$with_usrp1" != "xyes"],[
|
AS_IF([test "x$with_usrp1" != "xyes"],[
|
||||||
PKG_CHECK_MODULES(UHD, uhd >= 003.004.000)
|
PKG_CHECK_MODULES(UHD, uhd >= 003.011,
|
||||||
AC_DEFINE(USE_UHD, 1, Define to 1 if using UHD)
|
[AC_DEFINE(USE_UHD_3_11, 1, UHD version 3.11.0 or higher)],
|
||||||
|
[PKG_CHECK_MODULES(UHD, uhd >= 003.009,
|
||||||
|
[AC_DEFINE(USE_UHD_3_9, 1, UHD version 3.9.0 or higher)],
|
||||||
|
[PKG_CHECK_MODULES(UHD, uhd >= 003.005)]
|
||||||
|
)]
|
||||||
|
)
|
||||||
|
AC_DEFINE(USE_UHD, 1, All UHD versions)
|
||||||
|
PKG_CHECK_MODULES(FFTWF, fftw3f)
|
||||||
])
|
])
|
||||||
|
|
||||||
AS_IF([test "x$with_singledb" = "xyes"], [
|
AS_IF([test "x$with_singledb" = "xyes"], [
|
||||||
@@ -104,13 +120,51 @@ AS_IF([test "x$with_singledb" = "xyes"], [
|
|||||||
])
|
])
|
||||||
|
|
||||||
# Find and define supported SIMD extensions
|
# Find and define supported SIMD extensions
|
||||||
AX_EXT
|
AS_IF([test "x$with_sse" != "xno"], [
|
||||||
|
AX_SSE
|
||||||
|
], [
|
||||||
|
AM_CONDITIONAL(HAVE_SSE3, false)
|
||||||
|
AM_CONDITIONAL(HAVE_SSE4_1, false)
|
||||||
|
])
|
||||||
|
|
||||||
|
dnl Check if the compiler supports specified GCC's built-in function
|
||||||
|
AC_DEFUN([CHECK_BUILTIN_SUPPORT], [
|
||||||
|
AC_CACHE_CHECK(
|
||||||
|
[whether ${CC} has $1 built-in],
|
||||||
|
[osmo_cv_cc_has_builtin], [
|
||||||
|
AC_LINK_IFELSE([
|
||||||
|
AC_LANG_PROGRAM([], [
|
||||||
|
__builtin_cpu_supports("sse");
|
||||||
|
])
|
||||||
|
],
|
||||||
|
[AS_VAR_SET([osmo_cv_cc_has_builtin], [yes])],
|
||||||
|
[AS_VAR_SET([osmo_cv_cc_has_builtin], [no])])
|
||||||
|
]
|
||||||
|
)
|
||||||
|
|
||||||
|
AS_IF([test yes = AS_VAR_GET([osmo_cv_cc_has_builtin])], [
|
||||||
|
AC_DEFINE_UNQUOTED(AS_TR_CPP(HAVE_$1), 1,
|
||||||
|
[Define to 1 if compiler has the '$1' built-in function])
|
||||||
|
], [
|
||||||
|
AC_MSG_WARN($2)
|
||||||
|
])
|
||||||
|
])
|
||||||
|
|
||||||
|
dnl Check if the compiler supports runtime SIMD detection
|
||||||
|
CHECK_BUILTIN_SUPPORT([__builtin_cpu_supports],
|
||||||
|
[Runtime SIMD detection will be disabled])
|
||||||
|
|
||||||
AM_CONDITIONAL(USRP1, [test "x$with_usrp1" = "xyes"])
|
AM_CONDITIONAL(USRP1, [test "x$with_usrp1" = "xyes"])
|
||||||
AM_CONDITIONAL(ARCH_ARM, [test "x$with_neon" = "xyes" || test "x$with_neon_vfpv4" = "xyes"])
|
AM_CONDITIONAL(ARCH_ARM, [test "x$with_neon" = "xyes" || test "x$with_neon_vfpv4" = "xyes"])
|
||||||
AM_CONDITIONAL(ARCH_ARM_A15, [test "x$with_neon_vfpv4" = "xyes"])
|
AM_CONDITIONAL(ARCH_ARM_A15, [test "x$with_neon_vfpv4" = "xyes"])
|
||||||
|
|
||||||
|
AC_CHECK_LIB(sqlite3, sqlite3_open, , AC_MSG_ERROR(sqlite3 is not available))
|
||||||
|
|
||||||
PKG_CHECK_MODULES(LIBUSB, libusb-1.0)
|
PKG_CHECK_MODULES(LIBUSB, libusb-1.0)
|
||||||
|
PKG_CHECK_MODULES(SQLITE3, sqlite3)
|
||||||
|
|
||||||
|
AC_CHECK_HEADER([boost/config.hpp],[],
|
||||||
|
[AC_MSG_ERROR([boost/config.hpp not found, install e.g. libboost-dev])])
|
||||||
|
|
||||||
dnl Output files
|
dnl Output files
|
||||||
AC_CONFIG_FILES([\
|
AC_CONFIG_FILES([\
|
||||||
@@ -120,7 +174,6 @@ AC_CONFIG_FILES([\
|
|||||||
Transceiver52M/Makefile \
|
Transceiver52M/Makefile \
|
||||||
Transceiver52M/arm/Makefile \
|
Transceiver52M/arm/Makefile \
|
||||||
Transceiver52M/x86/Makefile \
|
Transceiver52M/x86/Makefile \
|
||||||
sqlite3/Makefile \
|
|
||||||
])
|
])
|
||||||
|
|
||||||
AC_OUTPUT
|
AC_OUTPUT
|
||||||
|
|||||||
7
contrib/jenkins.sh
Executable file
7
contrib/jenkins.sh
Executable file
@@ -0,0 +1,7 @@
|
|||||||
|
#!/bin/sh
|
||||||
|
set -ex
|
||||||
|
autoreconf --install --force
|
||||||
|
./configure
|
||||||
|
$MAKE $PARALLEL_MAKE
|
||||||
|
$MAKE check \
|
||||||
|
|| cat-testlogs.sh
|
||||||
178
debian/changelog
vendored
Normal file
178
debian/changelog
vendored
Normal file
@@ -0,0 +1,178 @@
|
|||||||
|
osmo-trx (0.2.0) unstable; urgency=medium
|
||||||
|
|
||||||
|
[ Alexander Chemeris ]
|
||||||
|
* EDGE: Add support for UmTRX.
|
||||||
|
* Common: Get rid of a compilation warning.
|
||||||
|
* Common: Make sure gLogEarly() log to the same facilities as the normal log.
|
||||||
|
* transceiver: Properly handle MAXDLY.
|
||||||
|
* transceiver: Add an option to generate random Access Bursts.
|
||||||
|
* osmo-trx: Output Rx SPS as a part of configuration output.
|
||||||
|
* transceiver: Do not pass transceiver state struct to function where it's not used.
|
||||||
|
* makefile: Fix build from an external path.
|
||||||
|
* radioDevice: GSMRATE macro must have parentheses around its definition.
|
||||||
|
* uhd: Fix comment.
|
||||||
|
* radioInterface: Initialize power scale with a meaningful default.
|
||||||
|
* transceiver: Log channel number in DEBUG output of demoded bursts.
|
||||||
|
* transceiver: Add an option to emulate a RACH delay in random filler mode.
|
||||||
|
* UHD: Initial LimeSDR support.
|
||||||
|
* CommonLibs: Remove unused files.
|
||||||
|
* sigProcLib: Typo sybols -> symbols
|
||||||
|
* radioBuffer: Remove extra ; at the end of inline function definitions.
|
||||||
|
* sigProcLib: Fix documentation, sync argument names in .cpp and .h files.
|
||||||
|
* sigProcLib: make energyDetect() simpler by returning actual energy.
|
||||||
|
* sigProcLib: Rename demodulateBurst() to demodGmskBurst() for clarity.
|
||||||
|
* sigProcLib: Slice SoftVector instead of signalVector for GMSK demod.
|
||||||
|
* Call vectorSlicer() right before packing bits for transmission to osmo-bts.
|
||||||
|
* CommonLibs: Print soft bits with less confidence to console when printing a soft vector.
|
||||||
|
* BitVector: Remove convolutional codec - we don't use it in osmo-trx.
|
||||||
|
* BitVector: Convert SoftVector from 0..1 to -1..+1 soft bits.
|
||||||
|
* signalVector: Implement segment().
|
||||||
|
* vector: Introduce segmentMove() method to move data inside of a vector.
|
||||||
|
* vector: Introduce shrink() function to shrink vector size without loosing data.
|
||||||
|
* Move CorrType type from Transceiver to sigProcLib.
|
||||||
|
* sigProcLib: rename signalError type to SignalError.
|
||||||
|
* Move Transceiver::detectBurst() to sigProcLib to make it reusable.
|
||||||
|
* Move BURST_THRESH from Transceiver.cpp to sigProcLib.h to make it reusable.
|
||||||
|
* sigProcLib: Add operator<< to print CorrType to a string.
|
||||||
|
* sigProcLib.h: Fix whitespaces. No non-whitespace changes.
|
||||||
|
* Move Transceiver::demodulate() to sigProcLib to make it reusable.
|
||||||
|
* sigProcLib: constify signalVector arguments for detectBurst() functions.
|
||||||
|
* sigProcLib: Constify demodulation functions burst argument.
|
||||||
|
* sigProcLib: Fix number of tail bits in random Normal Bursts and zero Stealing Bits.
|
||||||
|
* Configuration: Variables allocated with 'new' must be freed with 'delete'.
|
||||||
|
* BitVector: Remove Generator class.
|
||||||
|
* PRBS: a Pseudo-random binary sequence (PRBS) generator class.
|
||||||
|
|
||||||
|
[ Tom Tsou ]
|
||||||
|
* EDGE: Fix USRP B210 device support
|
||||||
|
* uhd: Correct timing alignment in 8-PSK and GMSK downlink bursts
|
||||||
|
* EDGE: Fix demodulation slicer input
|
||||||
|
* common: Restrict UDP binding to localhost only
|
||||||
|
* common: Add mandatory length field to UDP receive calls
|
||||||
|
* uhd: Update default E3XX settings
|
||||||
|
* uhd: Set default Tx sampling to 4 sps
|
||||||
|
* uhd: Make device offset check a private method
|
||||||
|
* uhd: Set minimum UHD version requirement for E3XX
|
||||||
|
* sigproc: Expand RACH, TSC, and EDGE correlation windows
|
||||||
|
* transceiver: Do not report error on SETTSC when radio is on
|
||||||
|
* transceiver: Add Rx samples-per-symbol option
|
||||||
|
* radioInterface: Convert diversity argument to general type
|
||||||
|
* iface: Add inner ring-buffer implementation
|
||||||
|
* mcbts: Add multi-ARFCN channelizing filters
|
||||||
|
* mcbts: Add multi-ARFCN radio support
|
||||||
|
* sigproc: Adjust burst detection threshold criteria
|
||||||
|
* egprs: Enable 8-PSK length vectors on the Tx interface
|
||||||
|
* egprs: Enable 8-PSK burst detection when EDGE is enabled
|
||||||
|
* transceiver: Remove HANDOVER warnings
|
||||||
|
* mcbts: Allow out of order channel setup
|
||||||
|
* radioInterface: Fix multi-channel buffer index bug
|
||||||
|
* uhd: Add command line option for GPS reference
|
||||||
|
* transceiver: Fix mixed GSMK / 8-PSK transmission
|
||||||
|
* transceiver: Fix 4 SPS receive TOA value
|
||||||
|
* sigproc: Fix missing 8-PSK tail symbols
|
||||||
|
* uhd: Update USRP2/N200/N210 for 4 SPS Rx
|
||||||
|
* sigproc: Match differential GMSK start/end bits to tail bits
|
||||||
|
* uhd: Add missing B200 sample timing for 4 SPS receive
|
||||||
|
* transceiver: Fix command build warning
|
||||||
|
* uhd: Set minimum supported version to 3.9.0
|
||||||
|
* uhd: Add X300 sample timing for 4 SPS
|
||||||
|
* Revert "uhd: Set minimum supported version to 3.9.0"
|
||||||
|
* uhd: Add support for UHD-3.11 logging control
|
||||||
|
* uhd: Increase MC-BTS FPGA clock rate to 51.2 MHz
|
||||||
|
* Resampler: Fix initialization return checking
|
||||||
|
* sigProcLib: Remove unreachable code and no-effect checks
|
||||||
|
* sigProcLib: Check return status on downsampling
|
||||||
|
* sigProcLib: Fix negative value check on unsigned value
|
||||||
|
* Resampler: Fix non-array delete for filter taps
|
||||||
|
* Transceiver: Remove unsigned negative compares
|
||||||
|
* Configuration: Fix const and signedness compile warnings
|
||||||
|
* config: Remove OpenBTS style sqlite configuration
|
||||||
|
* radioInterface: Remove UmTRX 'diversity' option
|
||||||
|
* build: Require and check for gcc C++11 support
|
||||||
|
* uhd: Use map container for for device parameter access
|
||||||
|
* sigProcLib: Remove unused functions from public interface
|
||||||
|
* uhd: Add non-UmTRX channel swap support
|
||||||
|
* uhd: Fix Tx-RX timing offset setting
|
||||||
|
* uhd: Fix USRP2/N200/N210 device detection
|
||||||
|
* transceiver: Fix POWEROFF crash on USRP2/N200/X300 devices
|
||||||
|
* sigProcLib: Fix complex/real vector flag in Laurent modulator
|
||||||
|
* sigProcLib: Remove heap based signal vector allocations
|
||||||
|
* common: Declare explicit Vector move constructor
|
||||||
|
* sigProcLib: Remove trigonometric tables
|
||||||
|
* sigProcLib: Use explicit NaN check in sinc table generation
|
||||||
|
* sigProcLib: Replace dynamically allocated resampling buffers
|
||||||
|
* sigProcLib: Specify standard namespace for isnan()
|
||||||
|
* uhd: Always specify samples-per-symbol for device lookup
|
||||||
|
* LimeSDR: set approximate tx offset value to make GSM work
|
||||||
|
|
||||||
|
[ Neels Hofmeyr ]
|
||||||
|
* add basic .gitignore
|
||||||
|
* configure.ac: check for boost/config.hpp header
|
||||||
|
* The INSTALL file is being overwritten by autoreconf, but it is committed as empty file. As a result, the INSTALL file always shows as modified. Instead, remove INSTALL from git and ignore it.
|
||||||
|
* add contrib/jenkins.sh, for gerrit build bot
|
||||||
|
|
||||||
|
[ pierre.baudry ]
|
||||||
|
* transceiver: Fix mismatched allocations and deallocations
|
||||||
|
|
||||||
|
[ Holger Hans Peter Freyther ]
|
||||||
|
* debian: Require fftw3 header files for osmo-trx
|
||||||
|
|
||||||
|
[ Max ]
|
||||||
|
* Add gerrit settings
|
||||||
|
* Integrate Debian packaging changes
|
||||||
|
* Remove embedded sqlite3
|
||||||
|
* Fix building against sqlite3
|
||||||
|
* Add autoconf-archive to dependencies
|
||||||
|
* debian: remove obsolete dependency
|
||||||
|
* deb: remove unused dependency
|
||||||
|
* Remove redundant explicit dependency
|
||||||
|
* Use release helper from libosmocore
|
||||||
|
|
||||||
|
[ Ruben Undheim ]
|
||||||
|
* Do not embed sqlite3 when building
|
||||||
|
|
||||||
|
[ Philipp Maier ]
|
||||||
|
* buildenv: Turn off native architecture builds
|
||||||
|
* cosmetic: Make parameter lists uniform
|
||||||
|
* Add test program to verify convolution implementation
|
||||||
|
* ssedetect: Add runtime CPU detection
|
||||||
|
* cosmetic: remove code duplication
|
||||||
|
* buildenv: Make build CPU invariant
|
||||||
|
* buildenv: Split up SSE3 and SSE4.1 code
|
||||||
|
* cosmetic: Add info about SSE support
|
||||||
|
|
||||||
|
[ Vadim Yanitskiy ]
|
||||||
|
* buildenv: correct the ax_sse macro description
|
||||||
|
* buildenv: actually strip unused cpuid functionality
|
||||||
|
* buildenv: fix build on systems without SIMD support
|
||||||
|
* buildenv: cosmetic changes
|
||||||
|
* buildenv: check for __builtin_cpu_supports call support
|
||||||
|
* ssedetect: call __builtin_cpu_supports() only if supported
|
||||||
|
|
||||||
|
[ Pau Espin Pedrol ]
|
||||||
|
* cosmetic: transciever: Remove trailing whitespaces
|
||||||
|
* transceiver: Avoid sending clock indications when trx is not powered on
|
||||||
|
* Add -j option to bind to specific address
|
||||||
|
|
||||||
|
[ ignasj ]
|
||||||
|
* LimeSDR: Change device detection to work with USB and PCIe versions
|
||||||
|
* LimeSDR: change tx window type to TX_WINDOW_FIXED
|
||||||
|
* LimeSDR: Fix sample value range
|
||||||
|
|
||||||
|
[ Harald Welte ]
|
||||||
|
* Add '-t' command line option to enable SCHED_RR
|
||||||
|
* Import git-version-gen and update AC_INIT()
|
||||||
|
|
||||||
|
-- Harald Welte <laforge@gnumonks.org> Sat, 28 Oct 2017 17:52:32 +0200
|
||||||
|
|
||||||
|
osmo-trx (0.1.9) trusty; urgency=medium
|
||||||
|
|
||||||
|
* Ask Ivan, really
|
||||||
|
|
||||||
|
-- Kirill Zakharenko <earwin@gmail.com> Thu, 16 Jul 2015 12:13:46 +0000
|
||||||
|
|
||||||
|
osmo-trx (0.1.8) precise; urgency=low
|
||||||
|
|
||||||
|
* Initial release (Closes: #nnnn) <nnnn is the bug number of your ITP
|
||||||
|
|
||||||
|
-- Ivan Klyuchnikov <Ivan.Kluchnikov@fairwaves.ru> Sun, 9 Mar 2014 14:10:10 +0400
|
||||||
1
debian/compat
vendored
Normal file
1
debian/compat
vendored
Normal file
@@ -0,0 +1 @@
|
|||||||
|
9
|
||||||
45
debian/control
vendored
Normal file
45
debian/control
vendored
Normal file
@@ -0,0 +1,45 @@
|
|||||||
|
Source: osmo-trx
|
||||||
|
Section: net
|
||||||
|
Priority: optional
|
||||||
|
Maintainer: Ivan Klyuchnikov <ivan.kluchnikov@fairwaves.ru>
|
||||||
|
Build-Depends: debhelper (>= 9),
|
||||||
|
autotools-dev,
|
||||||
|
autoconf-archive,
|
||||||
|
libsqlite3-dev,
|
||||||
|
pkg-config,
|
||||||
|
dh-autoreconf,
|
||||||
|
libuhd-dev,
|
||||||
|
libusb-1.0-0-dev,
|
||||||
|
libboost-all-dev,
|
||||||
|
libfftw3-dev
|
||||||
|
Standards-Version: 3.9.6
|
||||||
|
Vcs-Browser: http://cgit.osmocom.org/osmo-trx
|
||||||
|
Vcs-Git: git://git.osmocom.org/osmo-trx
|
||||||
|
Homepage: https://projects.osmocom.org/projects/osmotrx
|
||||||
|
|
||||||
|
Package: osmo-trx
|
||||||
|
Architecture: any
|
||||||
|
Depends: ${shlibs:Depends}, ${misc:Depends}
|
||||||
|
Description: SDR transceiver that implements Layer 1 of a GSM BTS
|
||||||
|
OsmoTRX is a software-defined radio transceiver that implements the Layer 1
|
||||||
|
physical layer of a BTS comprising the following 3GPP specifications:
|
||||||
|
.
|
||||||
|
TS 05.01 "Physical layer on the radio path"
|
||||||
|
TS 05.02 "Multiplexing and Multiple Access on the Radio Path"
|
||||||
|
TS 05.04 "Modulation"
|
||||||
|
TS 05.10 "Radio subsystem synchronization"
|
||||||
|
.
|
||||||
|
In this context, BTS is "Base transceiver station". It's the stations that
|
||||||
|
connect mobile phones to the mobile network.
|
||||||
|
.
|
||||||
|
3GPP is the "3rd Generation Partnership Project" which is the collaboration
|
||||||
|
between different telecommunication associations for developing new
|
||||||
|
generations of mobile phone networks. (post-2G/GSM)
|
||||||
|
|
||||||
|
Package: osmo-trx-dbg
|
||||||
|
Architecture: any
|
||||||
|
Section: debug
|
||||||
|
Priority: extra
|
||||||
|
Depends: osmo-trx (= ${binary:Version}), ${misc:Depends}
|
||||||
|
Description: Debug symbols for the osmo-trx
|
||||||
|
Make debugging possible
|
||||||
161
debian/copyright
vendored
Normal file
161
debian/copyright
vendored
Normal file
@@ -0,0 +1,161 @@
|
|||||||
|
Format: http://www.debian.org/doc/packaging-manuals/copyright-format/1.0/
|
||||||
|
Upstream-Name: OsmoTRX
|
||||||
|
Source: http://cgit.osmocom.org/osmo-trx/
|
||||||
|
Files-Excluded: Transceiver52M/std_inband.rbf
|
||||||
|
|
||||||
|
Files: *
|
||||||
|
Copyright: 2008-2013 Free Software Foundation
|
||||||
|
2010 Kestrel Signal Processing, Inc.
|
||||||
|
2010-2012 Range Networks, Inc.
|
||||||
|
License: AGPL-3+
|
||||||
|
|
||||||
|
Files: Transceiver52M/arm/*
|
||||||
|
Transceiver52M/x86/*
|
||||||
|
Transceiver52M/common/*
|
||||||
|
Transceiver52M/Resampler.cpp
|
||||||
|
Transceiver52M/Resampler.h
|
||||||
|
Transceiver52M/osmo-trx.cpp
|
||||||
|
Transceiver52M/radioInterfaceDiversity.cpp
|
||||||
|
Copyright: 2012-2013 Thomas Tsou <tom@tsou.cc>
|
||||||
|
License: LGPL-2.1+
|
||||||
|
|
||||||
|
Files: config/ax_check_compile_flag.m4
|
||||||
|
Copyright: 2008 Guido U. Draheim <guidod@gmx.de>
|
||||||
|
2011 Maarten Bosmans <mkbosmans@gmail.com>
|
||||||
|
License: GPL-3+
|
||||||
|
|
||||||
|
Files: config/ax_gcc_x86_cpuid.m4
|
||||||
|
Copyright: 2008 Steven G. Johnson <stevenj@alum.mit.edu>
|
||||||
|
2008 Matteo Frigo
|
||||||
|
License: GPL-3+
|
||||||
|
|
||||||
|
Files: config/ax_ext.m4
|
||||||
|
Copyright: 2007 Christophe Tournayre <turn3r@users.sourceforge.net>
|
||||||
|
2013 Michael Petch <mpetch@capp-sysware.com>
|
||||||
|
License: license_for_ax_ext_m4
|
||||||
|
|
||||||
|
Files: config/ax_gcc_x86_avx_xgetbv.m4
|
||||||
|
Copyright: 2013 Michael Petch <mpetch@capp-sysware.com>
|
||||||
|
License: GPL-3+
|
||||||
|
|
||||||
|
Files: CommonLibs/Makefile.am
|
||||||
|
GSM/Makefile.am
|
||||||
|
Transceiver52M/Makefile.am
|
||||||
|
Transceiver52M/Transceiver.h
|
||||||
|
Transceiver52M/Transceiver.cpp
|
||||||
|
Copyright: 2008-2010 Free Software Foundation
|
||||||
|
2010-2012 Range Networks, Inc.
|
||||||
|
License: GPL-3+
|
||||||
|
|
||||||
|
Files: autogen.sh
|
||||||
|
Copyright: 2005-2009 United States Government as represented by
|
||||||
|
the U.S. Army Research Laboratory.
|
||||||
|
License: BSD-3-clause
|
||||||
|
|
||||||
|
Files: CommonLibs/sqlite3util.cpp
|
||||||
|
Copyright: 2010 Kestrel Signal Processing Inc.
|
||||||
|
License: none
|
||||||
|
No license described for file.
|
||||||
|
Comment: In the previous version of the file in the git repository
|
||||||
|
at upstream it is written:
|
||||||
|
Written by David A. Burgess, Kestrel Signal Processing, Inc., 2010
|
||||||
|
The author disclaims copyright to this source code.
|
||||||
|
In the git log, this is written:
|
||||||
|
I do not claim any copyright over this change, as it's very basic.
|
||||||
|
Looking forward to see it merged into mainline.
|
||||||
|
See revision e766abbf82f02473038a83fd2f78befd08544cab at
|
||||||
|
https://github.com/osmocom/osmo-trx
|
||||||
|
|
||||||
|
Files: debian/*
|
||||||
|
Copyright: 2015 Ruben Undheim <ruben.undheim@gmail.com>
|
||||||
|
License: GPL-3+
|
||||||
|
|
||||||
|
|
||||||
|
License: AGPL-3+
|
||||||
|
This program is free software: you can redistribute it and/or modify
|
||||||
|
it under the terms of the GNU Affero General Public License as published by
|
||||||
|
the Free Software Foundation, either version 3 of the License, or
|
||||||
|
(at your option) any later version.
|
||||||
|
.
|
||||||
|
This program is distributed in the hope that it will be useful,
|
||||||
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||||
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||||
|
GNU Affero General Public License for more details.
|
||||||
|
.
|
||||||
|
You should have received a copy of the GNU Affero General Public License
|
||||||
|
along with this program. If not, see <http://www.gnu.org/licenses/>.
|
||||||
|
|
||||||
|
|
||||||
|
License: GPL-3+
|
||||||
|
This package is free software; you can redistribute it and/or modify
|
||||||
|
it under the terms of the GNU General Public License as published by
|
||||||
|
the Free Software Foundation; either version 3 of the License, or
|
||||||
|
(at your option) any later version.
|
||||||
|
.
|
||||||
|
This package is distributed in the hope that it will be useful,
|
||||||
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||||
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||||
|
GNU General Public License for more details.
|
||||||
|
.
|
||||||
|
You should have received a copy of the GNU General Public License
|
||||||
|
along with this program. If not, see <http://www.gnu.org/licenses/>
|
||||||
|
.
|
||||||
|
On Debian systems, the complete text of the GNU General
|
||||||
|
Public License version 3 can be found in "/usr/share/common-licenses/GPL-3".
|
||||||
|
|
||||||
|
|
||||||
|
License: LGPL-2.1+
|
||||||
|
This library is free software; you can redistribute it and/or
|
||||||
|
modify it under the terms of the GNU Lesser General Public
|
||||||
|
License as published by the Free Software Foundation; either
|
||||||
|
version 2.1 of the License, or (at your option) any later version.
|
||||||
|
.
|
||||||
|
This library is distributed in the hope that it will be useful,
|
||||||
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||||
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
||||||
|
Lesser General Public License for more details.
|
||||||
|
.
|
||||||
|
You should have received a copy of the GNU Lesser General Public
|
||||||
|
License along with this program. If not, see
|
||||||
|
<http://www.gnu.org/licenses/>
|
||||||
|
.
|
||||||
|
On Debian systems, the complete text of the GNU Lesser General
|
||||||
|
Public License version 2.1 can be found in
|
||||||
|
"/usr/share/common-licenses/LGPL-2.1".
|
||||||
|
|
||||||
|
|
||||||
|
License: license_for_ax_ext_m4
|
||||||
|
Copying and distribution of this file, with or without modification, are
|
||||||
|
permitted in any medium without royalty provided the copyright notice
|
||||||
|
and this notice are preserved. This file is offered as-is, without any
|
||||||
|
warranty.
|
||||||
|
|
||||||
|
|
||||||
|
License: BSD-3-clause
|
||||||
|
Redistribution and use in source and binary forms, with or without
|
||||||
|
modification, are permitted provided that the following conditions
|
||||||
|
are met:
|
||||||
|
.
|
||||||
|
1. Redistributions of source code must retain the above copyright
|
||||||
|
notice, this list of conditions and the following disclaimer.
|
||||||
|
.
|
||||||
|
2. Redistributions in binary form must reproduce the above
|
||||||
|
copyright notice, this list of conditions and the following
|
||||||
|
disclaimer in the documentation and/or other materials provided
|
||||||
|
with the distribution.
|
||||||
|
.
|
||||||
|
3. The name of the author may not be used to endorse or promote
|
||||||
|
products derived from this software without specific prior written
|
||||||
|
permission.
|
||||||
|
.
|
||||||
|
THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS
|
||||||
|
OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
|
||||||
|
WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
||||||
|
ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
|
||||||
|
DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
|
||||||
|
DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
|
||||||
|
GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
|
||||||
|
INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
|
||||||
|
WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
|
||||||
|
NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
|
||||||
|
SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
||||||
1
debian/osmo-trx.install
vendored
Normal file
1
debian/osmo-trx.install
vendored
Normal file
@@ -0,0 +1 @@
|
|||||||
|
/usr/bin/osmo-trx
|
||||||
Some files were not shown because too many files have changed in this diff Show More
Reference in New Issue
Block a user