sdr
/
osmo-sdr
Archived
8
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity
This repository has been archived on 2022-02-18. You can view files and clone it, but cannot push or open issues or pull requests.
osmo-sdr/firmware/osmosdr-project/main.c

471 lines
12 KiB
C
Raw Blame History

/* ----------------------------------------------------------------------------
* ATMEL Microcontroller Software Support
* ----------------------------------------------------------------------------
* Copyright (c) 2008, Atmel Corporation
*
* All rights reserved.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions are met:
*
* - Redistributions of source code must retain the above copyright notice,
* this list of conditions and the disclaimer below.
*
* Atmel's name may not be used to endorse or promote products derived from
* this software without specific prior written permission.
*
* DISCLAIMER: THIS SOFTWARE IS PROVIDED BY ATMEL "AS IS" AND ANY EXPRESS OR
* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
* MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NON-INFRINGEMENT ARE
* DISCLAIMED. IN NO EVENT SHALL ATMEL 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.
* ----------------------------------------------------------------------------
*/
#include <errno.h>
#include <string.h>
#include <stdlib.h>
#include <board.h>
#include <board_memories.h>
#include <pio/pio.h>
#include <irq/irq.h>
#include <twi/twid.h>
#include <twi/twi.h>
#include <dbgu/dbgu.h>
#include <ssc/ssc.h>
#include <utility/assert.h>
#include <utility/math.h>
#include <utility/trace.h>
#include <utility/led.h>
#include <usb/device/dfu/dfu.h>
#include <dmad/dmad.h>
#include <dma/dma.h>
#include <tuner_e4k.h>
#include <si570.h>
#include <osdr_fpga.h>
#include <req_ctx.h>
#include <uart_cmd.h>
#include <fast_source.h>
#define SSC_MCK 49152000
// TWI clock
#define TWI_CLOCK 400000
// PMC define
#define AT91C_CKGR_PLLR AT91C_CKGR_PLLAR
#define AT91C_PMC_LOCK AT91C_PMC_LOCKA
#define AT91C_CKGR_MUL_SHIFT 16
#define AT91C_CKGR_OUT_SHIFT 14
#define AT91C_CKGR_PLLCOUNT_SHIFT 8
#define AT91C_CKGR_DIV_SHIFT 0
#define E4K_I2C_ADDR 0x64
#define SI570_I2C_ADDR 0x55
//------------------------------------------------------------------------------
// Local variables
//------------------------------------------------------------------------------
/// Use for power management
#define STATE_IDLE 0
/// The USB device is in suspend state
#define STATE_SUSPEND 4
/// The USB device is in resume state
#define STATE_RESUME 5
unsigned char USBState = STATE_IDLE;
/// List of pins to configure.
static const Pin pins[] = {PINS_TWI0, PIN_PCK0, PINS_LEDS, PINS_SPI0,
PINS_MISC, PINS_SSC, PINS_FPGA_JTAG};
static Twid twid;
struct e4k_state e4k;
struct si570_ctx si570;
static void set_si570_freq(uint32_t freq)
{
si570_set_freq(&si570, freq/1000, 0);
e4k.vco.fosc = freq;
}
static void power_peripherals(int on)
{
if (on) {
osdr_fpga_power(1);
sam3u_e4k_power(&e4k, 1);
sam3u_e4k_stby(&e4k, 0);
} else {
osdr_fpga_power(0);
sam3u_e4k_stby(&e4k, 1);
sam3u_e4k_power(&e4k, 0);
}
}
/*----------------------------------------------------------------------------
* VBus monitoring (optional)
*----------------------------------------------------------------------------*/
/** VBus pin instance. */
static const Pin pinVbus = PIN_USB_VBUS;
/**
* Handles interrupts coming from PIO controllers.
*/
static void ISR_Vbus(const Pin *pPin)
{
/* Check current level on VBus */
if (PIO_Get(&pinVbus))
{
TRACE_INFO("VBUS conn\n\r");
USBD_Connect();
}
else
{
TRACE_INFO("VBUS discon\n\r");
USBD_Disconnect();
}
}
/**
* Configures the VBus pin to trigger an interrupt when the level on that pin
* changes.
*/
static void VBus_Configure( void )
{
/* Configure PIO */
PIO_Configure(&pinVbus, 1);
PIO_ConfigureIt(&pinVbus, ISR_Vbus);
PIO_EnableIt(&pinVbus);
/* Check current level on VBus */
if (PIO_Get(&pinVbus))
{
/* if VBUS present, force the connect */
USBD_Connect();
}
else
{
TRACE_INFO("discon\n\r");
USBD_Disconnect();
}
}
/*----------------------------------------------------------------------------
* Callbacks re-implementation
*----------------------------------------------------------------------------*/
//------------------------------------------------------------------------------
/// Invoked when the USB device leaves the Suspended state. By default,
/// configures the LEDs.
//------------------------------------------------------------------------------
void USBDCallbacks_Resumed(void)
{
USBState = STATE_RESUME;
}
//------------------------------------------------------------------------------
/// Invoked when the USB device gets suspended. By default, turns off all LEDs.
//------------------------------------------------------------------------------
void USBDCallbacks_Suspended(void)
{
USBState = STATE_SUSPEND;
}
static struct cmd_state cmd_state;
static int cmd_tuner_init(struct cmd_state *cs, enum cmd_op op,
const char *cmd, int argc, char **argv)
{
e4k_init(&e4k);
return 0;
}
static int cmd_tuner_gain(struct cmd_state *cs, enum cmd_op op,
const char *cmd, int argc, char **argv)
{
int i;
for (i = 0; i < argc; i++)
e4k_if_gain_set(&e4k, i+1, atoi(argv[i]));
return 0;
}
static int cmd_rf_freq(struct cmd_state *cs, enum cmd_op op,
const char *cmd, int argc, char **argv)
{
uint32_t freq;
switch (op) {
case CMD_OP_SET:
if (argc < 1)
return -EINVAL;
freq = strtoul(argv[0], NULL, 10);
e4k_tune_freq(&e4k, freq);
break;
case CMD_OP_GET:
freq = e4k.vco.flo;
uart_cmd_out(cs, "%s:%u\n\r", cmd, freq);
break;
default:
return -EINVAL;
}
return 0;
}
static int cmd_si570_freq(struct cmd_state *cs, enum cmd_op op,
const char *cmd, int argc, char **argv)
{
uint32_t freq;
switch (op) {
case CMD_OP_SET:
if (argc < 1)
return -EINVAL;
freq = strtoul(argv[0], NULL, 10);
set_si570_freq(freq);
break;
default:
return -EINVAL;
}
return 0;
}
static int cmd_si570_dump(struct cmd_state *cs, enum cmd_op op,
const char *cmd, int argc, char **argv)
{
si570_regdump(&si570);
return 0;
}
static int cmd_flt_bw(struct cmd_state *cs, enum cmd_op op,
const char *cmd, int argc, char **argv)
{
enum e4k_if_filter filt;
int bw, rc;
if (!strcmp(cmd, "tuner.flt_bw_mix"))
filt = E4K_IF_FILTER_MIX;
else if (!strcmp(cmd, "tuner.flt_bw_chan"))
filt = E4K_IF_FILTER_CHAN;
else if (!strcmp(cmd, "tuner.flt_bw_rc"))
filt = E4K_IF_FILTER_RC;
else
return -EINVAL;
switch (op) {
case CMD_OP_GET:
bw = e4k_if_filter_bw_get(&e4k, filt);
uart_cmd_out(cs, "%s:%d\n\r", cmd, bw);
break;
case CMD_OP_SET:
if (argc < 1)
return -EINVAL;
rc = e4k_if_filter_bw_set(&e4k, filt, atoi(argv[0]));
if (rc < 0)
return -EINVAL;
break;
default:
return -EINVAL;
}
return 0;
}
static int cmd_tuner_dco(struct cmd_state *cs, enum cmd_op op,
const char *cmd, int argc, char **argv)
{
return e4k_dc_offset_calibrate(&e4k);
}
static int cmd_tuner_dco_table(struct cmd_state *cs, enum cmd_op op,
const char *cmd, int argc, char **argv)
{
return e4k_dc_offset_gen_table(&e4k);
}
static int cmd_tuner_commonmode(struct cmd_state *cs, enum cmd_op op,
const char *cmd, int argc, char **argv)
{
int32_t cm;
switch (op) {
case CMD_OP_SET:
if (argc < 1)
return -EINVAL;
cm = strtoul(argv[0], NULL, 10);
e4k_commonmode_set(&e4k, cm);
break;
default:
return -EINVAL;
}
return 0;
}
static int cmd_tuner_iqofs(struct cmd_state *cs, enum cmd_op op,
const char *cmd, int argc, char ** argv)
{
int iofs;
int qofs;
int irange;
int qrange;
if(op != CMD_OP_SET)
return -EINVAL;
if(argc < 4)
return -EINVAL;
iofs = strtol(argv[0], NULL, 10);
qofs = strtol(argv[1], NULL, 10);
irange = strtol(argv[2], NULL, 10);
qrange = strtol(argv[3], NULL, 10);
return e4k_manual_dc_offset(&e4k, iofs, irange, qofs, qrange);
}
static int cmd_tuner_dump(struct cmd_state *cs, enum cmd_op op,
const char *cmd, int argc, char ** argv)
{
return e4k_dump(&e4k);
}
static int cmd_dfu(struct cmd_state *cs, enum cmd_op op,
const char *cmd, int argc, char ** argv)
{
*((volatile unsigned long *)USB_DFU_MAGIC_ADDR) = USB_DFU_MAGIC;
NVIC_SystemReset();
}
static struct cmd cmds[] = {
{ "tuner.init", CMD_OP_EXEC, cmd_tuner_init,
"Initialize the tuner" },
{ "tuner.dump", CMD_OP_EXEC, cmd_tuner_dump,
"Dump E4k registers" },
{ "tuner.freq", CMD_OP_SET|CMD_OP_GET, cmd_rf_freq,
"Tune to the specified frequency" },
{ "tuner.gain", CMD_OP_SET, cmd_tuner_gain,
"Tune to the specified gain" },
{ "tuner.flt_bw_mix", CMD_OP_SET|CMD_OP_GET, cmd_flt_bw,
"Filter bandwidth (Mixer)" },
{ "tuner.flt_bw_chan", CMD_OP_SET|CMD_OP_GET, cmd_flt_bw,
"Filter bandwidth (Channel)" },
{ "tuner.flt_bw_rc", CMD_OP_SET|CMD_OP_GET, cmd_flt_bw,
"Filter bandwidth (RC)" },
{ "tuner.dc_calib", CMD_OP_EXEC, cmd_tuner_dco,
"Perform DC offset calibration" },
{ "tuner.dc_table", CMD_OP_EXEC, cmd_tuner_dco_table,
"Generate DC offset table" },
{ "tuner.commonmode", CMD_OP_SET, cmd_tuner_commonmode,
"Switch common mode voltage" },
{ "tuner.iqofs", CMD_OP_SET, cmd_tuner_iqofs,
"Manually set I/Q offset and correction range" },
{ "si570.freq", CMD_OP_SET|CMD_OP_GET, cmd_si570_freq,
"Change the SI570 clock frequency" },
{ "si570.dump", CMD_OP_EXEC, cmd_si570_dump,
"Dump SI570 registers" },
{ "dfu", CMD_OP_EXEC, cmd_dfu,
"Enter DFU mode" },
};
//------------------------------------------------------------------------------
/// Main function
//------------------------------------------------------------------------------
int main(void)
{
unsigned char key;
unsigned char isValid;
// Configure all pins
PIO_Configure(pins, PIO_LISTSIZE(pins));
LED_Configure(0);
LED_Set(0);
LED_Configure(1);
LED_Set(1);
// Initialize the DBGU
TRACE_CONFIGURE(DBGU_STANDARD, 115200, BOARD_MCK);
// Switch to Main clock
AT91C_BASE_PMC->PMC_MCKR = (AT91C_BASE_PMC->PMC_MCKR & ~AT91C_PMC_CSS) | AT91C_PMC_CSS_MAIN_CLK;
while ((AT91C_BASE_PMC->PMC_SR & AT91C_PMC_MCKRDY) == 0);
// Configure PLL to 98.285MHz
*AT91C_CKGR_PLLR = ((1 << 29) | (171 << AT91C_CKGR_MUL_SHIFT) \
| (0x0 << AT91C_CKGR_OUT_SHIFT) |(0x3f << AT91C_CKGR_PLLCOUNT_SHIFT) \
| (21 << AT91C_CKGR_DIV_SHIFT));
while ((AT91C_BASE_PMC->PMC_SR & AT91C_PMC_LOCK) == 0);
// Configure master clock in two operations
AT91C_BASE_PMC->PMC_MCKR = (( AT91C_PMC_PRES_CLK_2 | AT91C_PMC_CSS_PLLA_CLK) & ~AT91C_PMC_CSS) | AT91C_PMC_CSS_MAIN_CLK;
while ((AT91C_BASE_PMC->PMC_SR & AT91C_PMC_MCKRDY) == 0);
AT91C_BASE_PMC->PMC_MCKR = ( AT91C_PMC_PRES_CLK_2 | AT91C_PMC_CSS_PLLA_CLK);
while ((AT91C_BASE_PMC->PMC_SR & AT91C_PMC_MCKRDY) == 0);
// DBGU reconfiguration
DBGU_Configure(DBGU_STANDARD, 115200, SSC_MCK);
// Configure and enable the TWI (required for accessing the DAC)
*AT91C_PMC_PCER = (1<< AT91C_ID_TWI0);
TWI_ConfigureMaster(AT91C_BASE_TWI0, TWI_CLOCK, SSC_MCK);
TWID_Initialize(&twid, AT91C_BASE_TWI0);
printf("-- OsmoSDR firmware (" BOARD_NAME ") " GIT_REVISION " --\n\r");
printf("-- Compiled: %s %s --\n\r", __DATE__, __TIME__);
req_ctx_init();
PIO_InitializeInterrupts(0);
cmd_state.out = vprintf;
uart_cmd_reset(&cmd_state);
uart_cmds_register(cmds, sizeof(cmds)/sizeof(cmds[0]));
fastsource_init();
VBus_Configure();
power_peripherals(1);
si570_init(&si570, &twid, SI570_I2C_ADDR);
set_si570_freq(30000000);
sam3u_e4k_init(&e4k, &twid, E4K_I2C_ADDR);
e4k.vco.fosc = 30000000;
osdr_fpga_init(SSC_MCK);
//osdr_fpga_reg_write(OSDR_FPGA_REG_ADC_TIMING, (1 << 8) | 255);
//osdr_fpga_reg_write(OSDR_FPGA_REG_PWM1, (1 << 400) | 800);
osdr_fpga_set_iq_swap(0);
ssc_init();
e4k_init(&e4k);
e4k_init(&e4k);
// Enter menu loop
while (1) {
if (DBGU_IsRxReady()) {
key = DBGU_GetChar();
// Process user input
if (uart_cmd_char(&cmd_state, key) == 1) {
//ssc_stats();
}
}
ssc_dma_start();
fastsource_start();
}
}
View Git Blame Copy Permalink