Merged anastas/wip changes r3156:3218 into trunk.
[debian/gnuradio] / gr-trellis / doc / test_tcm.py
1 #!/usr/bin/env python
2
3 from gnuradio import gr
4 from gnuradio import audio
5 from gnuradio import trellis
6 from gnuradio import eng_notation
7 import math
8 import sys
9 import random
10 import fsm_utils
11
12 def run_test (f,Kb,bitspersymbol,K,dimensionality,constellation,N0,seed):
13     fg = gr.flow_graph ()
14
15
16     # TX
17     #packet = [0]*Kb
18     #for i in range(Kb-1*16): # last 16 bits = 0 to drive the final state to 0
19         #packet[i] = random.randint(0, 1) # random 0s and 1s
20     #src = gr.vector_source_s(packet,False)
21     src = gr.lfsr_32k_source_s()
22     src_head = gr.head (gr.sizeof_short,Kb/16) # packet size in shorts
23     #b2s = gr.unpacked_to_packed_ss(1,gr.GR_MSB_FIRST) # pack bits in shorts
24     s2fsmi = gr.packed_to_unpacked_ss(bitspersymbol,gr.GR_MSB_FIRST) # unpack shorts to symbols compatible with the FSM input cardinality
25     enc = trellis.encoder_ss(f,0) # initial state = 0
26     mod = gr.chunks_to_symbols_sf(constellation,dimensionality)
27
28     
29     # CHANNEL
30     add = gr.add_ff()
31     noise = gr.noise_source_f(gr.GR_GAUSSIAN,math.sqrt(N0/2),seed)
32
33
34     # RX
35     metrics = trellis.metrics_f(f.O(),dimensionality,constellation,trellis.TRELLIS_EUCLIDEAN) # data preprocessing to generate metrics for Viterbi
36     va = trellis.viterbi_s(f,K,0,-1) # Put -1 if the Initial/Final states are not set.
37     fsmi2s = gr.unpacked_to_packed_ss(bitspersymbol,gr.GR_MSB_FIRST) # pack FSM input symbols to shorts
38     #s2b = gr.packed_to_unpacked_ss(1,gr.GR_MSB_FIRST) # unpack shorts to bits
39     #dst = gr.vector_sink_s(); 
40     dst = gr.check_lfsr_32k_s(); 
41     
42
43     fg.connect (src,src_head,s2fsmi,enc,mod)
44     #fg.connect (src,b2s,s2fsmi,enc,mod)
45     fg.connect (mod,(add,0))
46     fg.connect (noise,(add,1))
47     fg.connect (add,metrics)
48     fg.connect (metrics,va,fsmi2s,dst)
49     #fg.connect (metrics,va,fsmi2s,s2b,dst)
50     
51
52     fg.run()
53     
54     # A bit of cheating: run the program once and print the 
55     # final encoder state..
56     # Then put it as the last argument in the viterbi block
57     #print "final state = " , enc.ST()
58
59     ntotal = dst.ntotal ()
60     nright = dst.nright ()
61     runlength = dst.runlength ()
62     #ntotal = len(packet)
63     #if len(dst.data()) != ntotal:
64         #print "Error: not enough data\n"
65     #nright = 0;
66     #for i in range(ntotal):
67         #if packet[i]==dst.data()[i]:
68             #nright=nright+1
69         #else:
70             #print "Error in ", i
71     return (ntotal,ntotal-nright)
72
73
74
75
76 def main(args):
77     nargs = len (args)
78     if nargs == 3:
79         fname=args[0]
80         esn0_db=float(args[1]) # Es/No in dB
81         rep=int(args[2]) # number of times the experiment is run to collect enough errors
82     else:
83         sys.stderr.write ('usage: test_tcm.py fsm_fname Es/No_db  repetitions\n')
84         sys.exit (1)
85
86     # system parameters
87     f=trellis.fsm(fname) # get the FSM specification from a file (will hopefully be automated in the future...)
88     Kb=1024*16  # packet size in bits (make it multiple of 16 so it can be packed in a short)
89     bitspersymbol = int(round(math.log(f.I())/math.log(2))) # bits per FSM input symbol
90     K=Kb/bitspersymbol # packet size in trellis steps
91     modulation = fsm_utils.psk4 # see fsm_utlis.py for available predefined modulations
92     dimensionality = modulation[0]
93     constellation = modulation[1] 
94     if len(constellation)/dimensionality != f.O():
95         sys.stderr.write ('Incompatible FSM output cardinality and modulation size.\n')
96         sys.exit (1)
97     # calculate average symbol energy
98     Es = 0
99     for i in range(len(constellation)):
100         Es = Es + constellation[i]**2
101     Es = Es / (len(constellation)/dimensionality)
102     N0=Es/pow(10.0,esn0_db/10.0); # noise variance
103     
104
105
106     tot_s=0
107     terr_s=0
108     for i in range(rep):
109         (s,e)=run_test(f,Kb,bitspersymbol,K,dimensionality,constellation,N0,-long(666+i)) # run experiment with different seed to get different noise realizations
110         tot_s=tot_s+s
111         terr_s=terr_s+e
112         if (i%100==0):
113             print i,s,e,tot_s,terr_s, '%e' % ((1.0*terr_s)/tot_s)
114     # estimate of the (short or bit) error rate
115     print tot_s,terr_s, '%e' % ((1.0*terr_s)/tot_s)
116
117
118 if __name__ == '__main__':
119     main (sys.argv[1:])
120