/*******************************************************************************
    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@eurecom.fr

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

 *******************************************************************************/
#include<stdio.h>
#include<string.h>
#include<gpib/ib.h>
#include "signalanalyzer.h"

void gpib_send(unsigned int gpib_card, unsigned int gpib_device, char *command_string )
{
  unsigned short addlist[2] = {gpib_device, NOADDR};
  SendIFC(gpib_card);

  //Enable all on GPIB bus
  EnableRemote(gpib_card, addlist);


  if(ibsta & ERR) {
    printf("gpib_send: Instrument enable failed! \n");
  }

  //Send Control Commandss
  Send(gpib_card, gpib_device, command_string, strlen(command_string), NLend);

  if(ibsta & ERR) {

    printf("gpib_send: Send failed! \n");

  }

  printf("%s \n",command_string);

}


void analyzer(unsigned int gpib_card,unsigned int gpib_device,unsigned int freqband,LTE_DL_FRAME_PARMS *frame_parms,DCI_ALLOC_t *dci_alloc)
{
  char string[256];

  //Start the remote control
  gpib_send(gpib_card,gpib_device,"*RST;*CLS");   //reset and configure the signal analyzer
  gpib_send(gpib_card,gpib_device,"CONF:PRES");


  gpib_send(gpib_card,gpib_device,"CALC1:FEED 'CONS:CONS'");
  gpib_send(gpib_card,gpib_device,"INIT");


  //select the duplexing mode
  if (frame_parms->frame_type == 0)
    gpib_send(gpib_card,gpib_device,"CONF:DUPL FDD");
  else
    gpib_send(gpib_card,gpib_device,"CONF:DUPL TDD");

  //set the direction into DL
  gpib_send(gpib_card,gpib_device,"CONF:LDIR DL");

  //carrier frequency
  gpib_send(gpib_card,gpib_device,"FREQ:CENT 1.2GHZ");

  //input source
  gpib_send(gpib_card,gpib_device,"INP RF");

  //RF attenuation
  gpib_send(gpib_card,gpib_device,"INP:ATT 0");

  ////Using a Trigger
  gpib_send(gpib_card,gpib_device,"TRIG:MODE IMM"); //Selects free run trigger source

  // number of frames to be selected
  gpib_send(gpib_card,gpib_device,"FRAM:COUN:STAT ON");
  gpib_send(gpib_card,gpib_device,"FRAM:COUN 4");

  //select all the subframes
  gpib_send(gpib_card,gpib_device,"SUBF:SEL ALL");

  //Identifies the configuration according to the data in the PDCCH DCIs
  gpib_send(gpib_card,gpib_device,"DL:FORM:PSCD PDCCH");

  //sets the number of resource blocks to 25
  sprintf(string,"CONF:DL:NORB %d",frame_parms->N_RB_DL);
  gpib_send(gpib_card,gpib_device,string);


  //set the prefix of the subframes
  if (frame_parms->Ncp == 0)
    gpib_send(gpib_card,gpib_device,"CONF:DL:CYCP NORM");
  else
    gpib_send(gpib_card,gpib_device,"CONF:DL:CYCP EXT");

  //select the UL/DL subframe configuration for downlink signals
  sprintf(string,"CONF:DL:TDD:UDC %d",frame_parms->tdd_config);
  gpib_send(gpib_card,gpib_device,string);  //sets the UL/DL configuration into 3

  //Selects the configuration of a TDD special subframe
  sprintf(string,"CONF:DL:TDD:UDC %d",frame_parms->tdd_config_S);
  gpib_send(gpib_card,gpib_device,string); //sets the special subframe configuration into 0


}
