1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
|
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include <pthread.h>
#include "rtl-sdr.h"
/* POCSAG parameters */
#define POCSAG_ID "POCSAG"
#define POCSAG_SYM_RATE 1200
#define POCSAG_FM_DEV 4500
#define POCSAG_SPS 8
#define POCSAG_STD_SYNC 0x7cd215d8
#define POCSAG_STD_IDLE 0x7a89c197
#define POCSAG_WORDSIZE 32
#define POCSAG_SOFTTHRESHOLD 2
#define POCSAG_MAXWORD 16
#define POCSAG_ASYNC_BUF_NUMBER 12
#define POCSAG_DATA_LEN (16*16384) /* 256K */
#define POCSAG_AUTO_GAIN -100 /* Use automatic gain. */
#define POCSAG_MAX_GAIN 999999 /* Use max available gain. */
/* BCH parameters */
#define POCSAG_BCH_POLY 0x769
#define POCSAG_BCH_N 31
#define POCSAG_BCH_K 21
/* POCASG states */
#define POCSAG_SEARCH_PREAMBLE_START 0
#define POCSAG_SEARCH_PREAMBLE_END 1
#define POCSAG_SYNC 2
#define POCSAG_SEARCH_SYNC 3
#define POCSAG_SYNCHED 4
#define IGNORE(V) ((void) V)
struct {
pthread_t reader_thread;
pthread_mutex_t data_mutex; /* Mutex to synchronize buffer access. */
pthread_cond_t data_cond; /* Conditional variable associated. */
unsigned char *data; /* Raw IQ samples buffer */
uint16_t *magnitude; /* Magnitude vector */
uint32_t data_len; /* Buffer length. */
int data_ready; /* Data ready to be processed. */
uint16_t *maglut; /* I/Q -> Magnitude lookup table. */
int exit;
/* rtlsdr */
int dev_index;
int gain;
int enable_agc;
rtlsdr_dev_t *dev;
int freq;
} Gascop;
int hammingWeight(uint32_t n) {
unsigned int c;
for (c = 0; n; c++)
n &= n - 1;
return c;
}
uint8_t evenParity(uint32_t n) {
return hammingWeight(n) & 1;
}
uint32_t bchSyndrome(uint32_t data, int poly, int n, int k) {
uint32_t mask = 1 << (n - 1);
uint32_t coeff = poly << (k - 1);
n = k;
int s = data >> 1;
while (n > 0) {
if (s & mask)
s ^= coeff;
n -= 1;
mask >>= 1;
coeff >>= 1;
}
if (evenParity(data))
s |= 1 << (n - k);
return s;
}
uint32_t bchFix(uint32_t data, int poly, int n, int k) {
int i, j;
for (i=0; i<32; i++) {
int t = data ^ (1 << i);
if (!bchSyndrome(t, poly, n, k))
return t;
}
for (i=0; i<32; i++) {
for (j=i+1; j<32; j++) {
int t = data ^ ((1 << i) | (1 << j));
if (!bchSyndrome(t, poly, n, k))
return t;
}
}
return data;
}
void rtlsdrCallback(unsigned char *buf, uint32_t len, void *ctx) {
IGNORE(ctx);
pthread_mutex_lock(&Gascop.data_mutex);
if (len > Gascop.data_len) len = Gascop.data_len;
memcpy(Gascop.data, buf, len);
Gascop.data_ready = 1;
pthread_cond_signal(&Gascop.data_cond);
pthread_mutex_unlock(&Gascop.data_mutex);
}
void *readerThreadEntryPoint(void *arg) {
IGNORE(arg);
rtlsdr_read_async(Gascop.dev, rtlsdrCallback, NULL,
POCSAG_ASYNC_BUF_NUMBER, Gascop.data_len);
return NULL;
}
int main(int argc, char **argv) {
IGNORE(argc);
IGNORE(argv);
printf("Gascop...\n");
exit(0);
}
|