if4_tools.c 12 KB
Newer Older
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
/*******************************************************************************
    OpenAirInterface
    Copyright(c) 1999 - 2014 Eurecom

    OpenAirInterface 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.


    OpenAirInterface 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 OpenAirInterface.The full GNU General Public License is
   included in this distribution in the file called "COPYING". If not,
   see <http://www.gnu.org/licenses/>.

  Contact Information
  OpenAirInterface Admin: openair_admin@eurecom.fr
  OpenAirInterface Tech : openair_tech@eurecom.fr
  OpenAirInterface Dev  : openair4g-devel@lists.eurecom.fr

  Address      : Eurecom, Campus SophiaTech, 450 Route des Chappes, CS 50193 - 06904 Biot Sophia Antipolis cedex, FRANCE

 *******************************************************************************/

/*! \file PHY/LTE_TRANSPORT/if4_tools.c
* \brief 
32
* \author Fredrik Skretteberg, Tobias Schuster, Mauricio Gunther, S. Sandeep Kumar, Raymond Knopp
33 34 35
* \date 2016
* \version 0.1
* \company Eurecom
36
* \email: knopp@eurecom.fr 
37 38 39 40
* \note
* \warning
*/

41
#include "PHY/defs.h"
42
#include "PHY/TOOLS/alaw_lut.h"
43

44 45 46
#include "targets/ARCH/ETHERNET/USERSPACE/LIB/if_defs.h"


47
// --- Careful to handle buffer memory --- RAW/UDP modes --- PRACH variables and data
48
void send_IF4(PHY_VARS_eNB *eNB, int frame, int subframe, uint16_t packet_type, int k) {
49 50
  LTE_DL_FRAME_PARMS *fp = &eNB->frame_parms;
  int32_t **txdataF = eNB->common_vars.txdataF[0];
51
  int32_t **rxdataF = eNB->common_vars.rxdataF[0];
52
  int16_t **rxsigF = eNB->prach_vars.rxsigF;  
53
      
54
  uint16_t symbol_id=0, element_id=0;
55
  uint16_t db_fulllength, db_halflength; 
56
  int slotoffsetF=0, blockoffsetF=0; 
57

58
  void *tx_buffer=NULL;
59
  int16_t *data_block=NULL;
60

61
  if (packet_type == IF4_PDLFFT) {
62 63
    db_fulllength = 12*fp->N_RB_DL;
    db_halflength = (db_fulllength)>>1;
64
    slotoffsetF = (subframe)*(fp->ofdm_symbol_size)*((fp->Ncp==1) ? 12 : 14) + 1;
65
    blockoffsetF = slotoffsetF + fp->ofdm_symbol_size - db_halflength; 
66

Sandeep Kumar's avatar
Sandeep Kumar committed
67 68 69
    tx_buffer = malloc(MAC_HEADER_SIZE_BYTES + sizeof_IF4_header_t + db_fulllength*sizeof(int16_t));
    IF4_header_t *dl_header = (IF4_header_t *)(tx_buffer + MAC_HEADER_SIZE_BYTES);
    data_block = (int16_t*)(tx_buffer + MAC_HEADER_SIZE_BYTES + sizeof_IF4_header_t);
70

71
    gen_IF4_dl_header(dl_header, frame, subframe);
72 73
		    
    for (symbol_id=0; symbol_id<fp->symbols_per_tti; symbol_id++) {
74 75
      // Do compression of the two parts and generate data blocks			
      for (element_id=0; element_id<db_halflength; element_id++) {
76 77
        data_block[element_id]  = lin2alaw[ (txdataF[0][blockoffsetF+element_id] & 0xffff) + 32768 ];          
        data_block[element_id] |= lin2alaw[ (txdataF[0][blockoffsetF+element_id]>>16) + 32768 ]<<8;  
78
        
79 80
        data_block[element_id+db_halflength]  = lin2alaw[ (txdataF[0][slotoffsetF+element_id] & 0xffff) + 32768 ];     
        data_block[element_id+db_halflength] |= lin2alaw[ (txdataF[0][slotoffsetF+element_id]>>16) + 32768 ]<<8;  
81 82
      }
				 		
83
      // Update information in generated packet
Sandeep Kumar's avatar
Sandeep Kumar committed
84 85
      dl_header->frame_status &= ~(0x000f<<26);
      dl_header->frame_status |= (symbol_id&0x000f)<<26; 
86
			
87
      // Write the packet to the fronthaul
88
      if ((eNB->ifdevice.trx_write_func(&eNB->ifdevice,
89
                                        symbol_id,
90
                                        &tx_buffer,
91 92 93 94
                                        db_fulllength,
      			                            1,
                                        IF4_PDLFFT)) < 0) {
        perror("ETHERNET write for IF4_PDLFFT\n");
95
      }
96 97 98
      
      slotoffsetF  += fp->ofdm_symbol_size;
      blockoffsetF += fp->ofdm_symbol_size;    
99
    }
100
  } else if (packet_type == IF4_PULFFT) {
101 102
    db_fulllength = 12*fp->N_RB_UL;
    db_halflength = (db_fulllength)>>1;
103
    slotoffsetF = (subframe)*(fp->ofdm_symbol_size)*((fp->Ncp==1) ? 12 : 14) + 1;
104
    blockoffsetF = slotoffsetF + fp->ofdm_symbol_size - db_halflength; 
105

Sandeep Kumar's avatar
Sandeep Kumar committed
106 107 108
    tx_buffer = malloc(MAC_HEADER_SIZE_BYTES + sizeof_IF4_header_t + db_fulllength*sizeof(int16_t));
    IF4_header_t *ul_header = (IF4_header_t *)(tx_buffer + MAC_HEADER_SIZE_BYTES);
    data_block = (int16_t*)(tx_buffer + MAC_HEADER_SIZE_BYTES + sizeof_IF4_header_t);
109

110
    gen_IF4_ul_header(ul_header, frame, subframe);
111

112
    for (symbol_id=0; symbol_id<fp->symbols_per_tti; symbol_id++) {			
113
      // Do compression of the two parts and generate data blocks - rxdataF		
114
      for (element_id=0; element_id<db_halflength; element_id++) {
115 116
        data_block[element_id]  = lin2alaw[ (rxdataF[0][blockoffsetF+element_id] & 0xffff) + 32768 ];          
        data_block[element_id] |= lin2alaw[ (rxdataF[0][blockoffsetF+element_id]>>16) + 32768 ]<<8;  
117
        
118 119
        data_block[element_id+db_halflength]  = lin2alaw[ (rxdataF[0][slotoffsetF+element_id] & 0xffff) + 32768 ];     
        data_block[element_id+db_halflength] |= lin2alaw[ (rxdataF[0][slotoffsetF+element_id]>>16) + 32768 ]<<8;  
120 121
      }
       			
122
      // Update information in generated packet
Sandeep Kumar's avatar
Sandeep Kumar committed
123 124
      ul_header->frame_status &= ~(0x000f<<26);
      ul_header->frame_status |= (symbol_id&0x000f)<<26; 
125 126
			
      // Write the packet(s) to the fronthaul 
127
      if ((eNB->ifdevice.trx_write_func(&eNB->ifdevice,
128
                                        symbol_id,
129
                                        &tx_buffer,
130 131 132 133 134
                                        db_fulllength,
      			                            1,
                                        IF4_PULFFT)) < 0) {
        perror("ETHERNET write for IF4_PULFFT\n");
      }
135

136 137
      slotoffsetF  += fp->ofdm_symbol_size;
      blockoffsetF += fp->ofdm_symbol_size;    
138
    }		
139
  } else if (packet_type == IF4_PRACH) {
140
    // FIX: hard coded prach samples length
141
    db_fulllength = 839*2;
142

Sandeep Kumar's avatar
Sandeep Kumar committed
143 144 145
    tx_buffer = malloc(MAC_HEADER_SIZE_BYTES + sizeof_IF4_header_t + db_fulllength*sizeof(int16_t));
    IF4_header_t *prach_header = (IF4_header_t *)(tx_buffer + MAC_HEADER_SIZE_BYTES);
    data_block = (int16_t*)(tx_buffer + MAC_HEADER_SIZE_BYTES + sizeof_IF4_header_t);
146

147
    gen_IF4_prach_header(prach_header, frame, subframe);
148
		    
149 150 151 152 153 154 155 156
    // Generate uncompressed data blocks
    memcpy(data_block, (rxsigF[0]+k), db_fulllength*sizeof(int16_t));
    			
    //for (element_id=0; element_id<db_fulllength; element_id++) {
    //  data_block[element_id]  = rxsigF[0][prachoffsetF];          
    //  data_block[element_id] |= rxsigF[0][prachoffsetF+1]<<16;
    //  prachoffsetF += 2;  
    //}
157 158 159
              
    // Write the packet to the fronthaul
    if ((eNB->ifdevice.trx_write_func(&eNB->ifdevice,
160
                                      symbol_id,
161
                                      &tx_buffer,
162 163 164 165 166
                                      db_fulllength,
                                      1,
                                      IF4_PRACH)) < 0) {
      perror("ETHERNET write for IF4_PRACH\n");
    }      
167 168 169 170
  } else {    
    AssertFatal(1==0, "send_IF4 - Unknown packet_type %x", packet_type);     
  }
  
171
  free(tx_buffer);
172
  return;  		    
173
}
174

175

176
void recv_IF4(PHY_VARS_eNB *eNB, int *frame, int *subframe, uint16_t *packet_type, uint32_t *symbol_number) {
177 178 179
  LTE_DL_FRAME_PARMS *fp = &eNB->frame_parms;
  int32_t **txdataF = eNB->common_vars.txdataF[0];
  int32_t **rxdataF = eNB->common_vars.rxdataF[0];
180
  int16_t **rxsigF = eNB->prach_vars.rxsigF;  
181 182

  uint16_t element_id;
183
  uint16_t db_fulllength, db_halflength; 
Sandeep Kumar's avatar
Sandeep Kumar committed
184
  int slotoffsetF=0, blockoffsetF=0; 
185
  
Sandeep Kumar's avatar
Sandeep Kumar committed
186
  if (eNB->node_function == NGFI_RRU_IF4) {
187
    db_fulllength = (12*fp->N_RB_DL); 
188
  } else {
189
    db_fulllength = (12*fp->N_RB_UL);     
190 191 192
  }  
  db_halflength = db_fulllength>>1;

193
  void *rx_buffer=NULL;
194
  IF4_header_t *packet_header=NULL;
195
  int16_t *data_block=NULL;
196
     
197
  // Read packet(s) from the fronthaul    
198
  if (eNB->ifdevice.trx_read_func(&eNB->ifdevice,
199
                                  (int64_t*) packet_type,
200 201
                                  &rx_buffer,
                                  db_fulllength,
202
                                  0) < 0) {
203 204
    perror("ETHERNET read");
  }
205
  
206 207
  packet_header = (IF4_header_t*) (rx_buffer+MAC_HEADER_SIZE_BYTES);
  data_block = (int16_t*) (rx_buffer+MAC_HEADER_SIZE_BYTES+sizeof_IF4_header_t);
208 209 210

  *frame = ((packet_header->frame_status)>>6)&0xffff;
  *subframe = ((packet_header->frame_status)>>22)&0x000f; 
211
  
Sandeep Kumar's avatar
Sandeep Kumar committed
212
  if (*packet_type == IF4_PDLFFT) {          
Sandeep Kumar's avatar
Sandeep Kumar committed
213 214 215
    // Find and return symbol_number		 		
    *symbol_number = ((packet_header->frame_status)>>26)&0x000f;         

216
    // Calculate from received packet
Sandeep Kumar's avatar
Sandeep Kumar committed
217
    slotoffsetF = (*symbol_number)*(fp->ofdm_symbol_size) + (*subframe)*(fp->ofdm_symbol_size)*((fp->Ncp==1) ? 12 : 14) + 1;
218
    blockoffsetF = slotoffsetF + fp->ofdm_symbol_size - db_halflength; 
219
    
220
    // Do decompression of the two parts and generate txdataF			
221 222 223 224 225 226 227
    for (element_id=0; element_id<db_halflength; element_id++) {
      txdataF[0][blockoffsetF+element_id]  = alaw2lin[ (data_block[element_id] & 0xff) ];
      txdataF[0][blockoffsetF+element_id] |= alaw2lin[ (data_block[element_id]>>8) ]<<16;

      txdataF[0][slotoffsetF+element_id]  = alaw2lin[ (data_block[element_id+db_halflength] & 0xff) ];
      txdataF[0][slotoffsetF+element_id] |= alaw2lin[ (data_block[element_id+db_halflength]>>8) ]<<16;
    }
Sandeep Kumar's avatar
Sandeep Kumar committed
228 229
		        
  } else if (*packet_type == IF4_PULFFT) {         
230
    // Find and return symbol_number		 		
231
    *symbol_number = ((packet_header->frame_status)>>26)&0x000f;         
Sandeep Kumar's avatar
Sandeep Kumar committed
232

233
    // Calculate from received packet
Sandeep Kumar's avatar
Sandeep Kumar committed
234
    slotoffsetF = (*symbol_number)*(fp->ofdm_symbol_size) + (*subframe)*(fp->ofdm_symbol_size)*((fp->Ncp==1) ? 12 : 14) + 1;
235 236
    blockoffsetF = slotoffsetF + fp->ofdm_symbol_size - db_halflength; 
    
237
    // Do decompression of the two parts and generate rxdataF
238 239 240 241 242 243 244 245
    for (element_id=0; element_id<db_halflength; element_id++) {
      rxdataF[0][blockoffsetF+element_id]  = alaw2lin[ (data_block[element_id] & 0xff) ];
      rxdataF[0][blockoffsetF+element_id] |= alaw2lin[ (data_block[element_id]>>8) ]<<16;

      rxdataF[0][slotoffsetF+element_id]  = alaw2lin[ (data_block[element_id+db_halflength] & 0xff) ];
      rxdataF[0][slotoffsetF+element_id] |= alaw2lin[ (data_block[element_id+db_halflength]>>8) ]<<16;
    }
		
Sandeep Kumar's avatar
Sandeep Kumar committed
246
  } else if (*packet_type == IF4_PRACH) {    
Sandeep Kumar's avatar
Sandeep Kumar committed
247 248
    // FIX: hard coded prach samples length
    db_fulllength = 839*2;
249
		
Sandeep Kumar's avatar
Sandeep Kumar committed
250 251
    // Generate uncompressed data blocks
    memcpy((rxsigF[0]+slotoffsetF), data_block, db_fulllength*sizeof(int16_t));
252 253 254 255
       
  } else {
    AssertFatal(1==0, "recv_IF4 - Unknown packet_type %x", *packet_type);            
  }
256 257
  
  free(rx_buffer);
258
  return;   
259 260
}

261

Sandeep Kumar's avatar
Sandeep Kumar committed
262
void gen_IF4_dl_header(IF4_header_t *dl_packet, int frame, int subframe) {      
263
  // Set Type and Sub-Type
264
  dl_packet->type = IF4_PACKET_TYPE; 
265
  dl_packet->sub_type = IF4_PDLFFT;
266

Sandeep Kumar's avatar
Sandeep Kumar committed
267
  // Reset frame status 
268
  dl_packet->rsvd = 0;
269 270
  
  // Set frame status
Sandeep Kumar's avatar
Sandeep Kumar committed
271 272 273
  dl_packet->frame_status = 0;
  dl_packet->frame_status |= (frame&0xffff)<<6;
  dl_packet->frame_status |= (subframe&0x000f)<<22;
274

275 276
}

277

Sandeep Kumar's avatar
Sandeep Kumar committed
278
void gen_IF4_ul_header(IF4_header_t *ul_packet, int frame, int subframe) {  
279
  // Set Type and Sub-Type
280
  ul_packet->type = IF4_PACKET_TYPE; 
281
  ul_packet->sub_type = IF4_PULFFT;
282 283

  // Leave reserved as it is 
284
  ul_packet->rsvd = 0;
285 286
  
  // Set frame status
Sandeep Kumar's avatar
Sandeep Kumar committed
287 288 289
  ul_packet->frame_status = 0;
  ul_packet->frame_status |= (frame&0xffff)<<6;
  ul_packet->frame_status |= (subframe&0x000f)<<22;
290
    
291 292
}

293

Sandeep Kumar's avatar
Sandeep Kumar committed
294
void gen_IF4_prach_header(IF4_header_t *prach_packet, int frame, int subframe) {
295
  // Set Type and Sub-Type
296
  prach_packet->type = IF4_PACKET_TYPE; 
297
  prach_packet->sub_type = IF4_PRACH;
298 299

  // Leave reserved as it is 
300
  prach_packet->rsvd = 0;
301 302
  
  // Set LTE Prach configuration
Sandeep Kumar's avatar
Sandeep Kumar committed
303 304 305
  prach_packet->frame_status = 0;
  prach_packet->frame_status |= (frame&0xffff)<<6;
  prach_packet->frame_status |= (subframe&0x000f)<<22;
306
        
307
}