mirror
/
Hamlib
kopia lustrzana https://github.com/Hamlib/Hamlib
1
0
Forkuj 0
Kod Zgłoszenia Projekty Wydania Wiki Aktywność

- add PCR-2500 

- sub receiver support for PCR-2500
- implement get_dcd, set/get_dcs_sql, set_ext_evel(DIVersity)


git-svn-id: https://hamlib.svn.sourceforge.net/svnroot/hamlib/trunk@2948 7ae35d74-ebe9-4afe-98af-79ac388436b8
Hamlib-1.2.12
Stéphane Fillod, F8CFE 2010-07-31 23:22:48 +00:00
rodzic f921ffec03
commit cff15a0ade
4 zmienionych plików z 583 dodań i 137 usunięć
Pokaż statystyki Ściągnij plik aktualizacji Ściągnij plik porównania Expand all files Collapse all files

2
pcr/Makefile.am
Wyświetl plik

@ -1,4 +1,4 @@
PCRSRCLIST = pcr1000.c pcr100.c pcr1500.c PCRSRCLIST = pcr1000.c pcr100.c pcr1500.c pcr2500.c
lib_LTLIBRARIES = hamlib-pcr.la lib_LTLIBRARIES = hamlib-pcr.la
hamlib_pcr_la_SOURCES = $(PCRSRCLIST) pcr.c hamlib_pcr_la_SOURCES = $(PCRSRCLIST) pcr.c

482
pcr/pcr.c
Wyświetl plik

@ -57,6 +57,9 @@
#define MD_CW '3' #define MD_CW '3'
#define MD_FM '5' #define MD_FM '5'
#define MD_WFM '6' #define MD_WFM '6'
#define MD_DSTAR '7' /* PCR-2500 Only */
#define MD_P25 '8' /* PCR-2500 Only */
/* define 2.8kHz, 6kHz, 15kHz, 50kHz, and 230kHz */ /* define 2.8kHz, 6kHz, 15kHz, 50kHz, and 230kHz */
#define FLT_2_8kHz '0' #define FLT_2_8kHz '0'
@ -83,6 +86,23 @@ const tone_t pcr_ctcss_list[] = {
0, 0,
}; };
/*
* DTCS SQL code list
* Don't even touch a single bit! indexes will be used in the protocol!
* 104 codes
*/
const tone_t pcr_dcs_list[] = {
23, 25, 26, 31, 32, 36, 43, 47, 51, 53,
54, 65, 71, 72, 73, 74, 114, 115, 116, 122, 125, 131,
132, 134, 143, 145, 152, 155, 156, 162, 165, 172, 174, 205,
212, 223, 225, 226, 243, 244, 245, 246, 251, 252, 255, 261,
263, 265, 266, 271, 274, 306, 311, 315, 325, 331, 332, 343,
346, 351, 356, 364, 365, 371, 411, 412, 413, 423, 431, 432,
445, 446, 452, 454, 455, 462, 464, 465, 466, 503, 506, 516,
523, 526, 532, 546, 565, 606, 612, 624, 627, 631, 632, 654,
662, 664, 703, 712, 723, 731, 732, 734, 743, 754,
0,
};
struct pcr_country struct pcr_country
{ {
@ -110,24 +130,27 @@ struct pcr_country pcr_countries[] = {
}; };
static int pcr_set_volume(RIG *rig, float level); static int pcr_set_volume(RIG *rig, vfo_t vfo, float level);
static int pcr_set_squelch(RIG *rig, float level); static int pcr_set_squelch(RIG *rig, vfo_t vfo, float level);
static int pcr_set_if_shift(RIG *rig, int level); static int pcr_set_if_shift(RIG *rig, vfo_t vfo, int level);
static int pcr_set_agc(RIG *rig, int status); // J45xx static int pcr_set_agc(RIG *rig, vfo_t vfo, int status); // J45xx
static int pcr_set_afc(RIG *rig, int status); // LD820xx static int pcr_set_afc(RIG *rig, vfo_t vfo, int status); // LD820xx
static int pcr_set_nb(RIG *rig, int status); // J46xx static int pcr_set_nb(RIG *rig, vfo_t vfo, int status); // J46xx
static int pcr_set_attenuator(RIG *rig, int status); // J47xx static int pcr_set_attenuator(RIG *rig, vfo_t vfo, int status); // J47xx
static int pcr_set_anl(RIG *rig, int status); // J4Dxx static int pcr_set_anl(RIG *rig, vfo_t vfo, int status); // J4Dxx
static int pcr_set_diversity(RIG * rig, vfo_t vfo, int status); // J00xx on PCR-2500
static int pcr_set_bfo_shift(RIG *rig, int level); // J4Axx static int pcr_set_bfo_shift(RIG *rig, vfo_t vfo, int level); // J4Axx
static int pcr_set_vsc(RIG *rig, int level); // J50xx static int pcr_set_vsc(RIG *rig, vfo_t vfo, int level); // J50xx
static int pcr_set_dsp(RIG *rig, int level); // J80xx static int pcr_set_dsp(RIG *rig, vfo_t vfo, int level); // J80xx
static int pcr_set_dsp_state(RIG *rig, int level); // J8100=off J8101=on static int pcr_set_dsp_state(RIG *rig, vfo_t vfo, int level); // J8100=off J8101=on
static int pcr_set_dsp_noise_reducer(RIG *rig, int level); // J82xx static int pcr_set_dsp_noise_reducer(RIG *rig, vfo_t vfo, int level); // J82xx
static int pcr_set_dsp_auto_notch(RIG *rig, int level); // J83xx static int pcr_set_dsp_auto_notch(RIG *rig, vfo_t vfo, int level); // J83xx
static int pcr_check_ok(RIG * rig); static int pcr_check_ok(RIG * rig);
static int is_sub_rcvr(RIG * rig, vfo_t vfo);
#define PCR_COUNTRIES (sizeof(pcr_countries) / sizeof(struct pcr_country)) #define PCR_COUNTRIES (sizeof(pcr_countries) / sizeof(struct pcr_country))
@ -219,16 +242,45 @@ pcr_parse_answer(RIG *rig, char *buf, int len)
if (strncmp("H100", buf, 4) == 0) if (strncmp("H100", buf, 4) == 0)
return -RIG_ERJCTED; return -RIG_ERJCTED;
if (buf[0] == 'I' && buf[1] == '1') { if (buf[0] == 'I') {
switch (buf[1]) { switch (buf[1]) {
/* Main receiver */
case '0':
sscanf(buf, "I0%02X", &priv->main_rcvr.squelch_status);
return RIG_OK;
case '1': case '1':
sscanf(buf, "I1%02X", &priv->raw_level); sscanf(buf, "I1%02X", &priv->main_rcvr.raw_level);
return RIG_OK;
case '2':
rig_debug(RIG_DEBUG_VERBOSE, "%s: Signal centering %c%c\n",
__func__, buf[2], buf[3]);
return RIG_OK; return RIG_OK;
case '3': case '3':
rig_debug(RIG_DEBUG_WARN, "%s: DTMF %c\n", rig_debug(RIG_DEBUG_WARN, "%s: DTMF %c\n",
__func__, buf[3]); __func__, buf[3]);
return RIG_OK; return RIG_OK;
/* Sub receiver (on PCR-2500..) - TBC */
case '4':
sscanf(buf, "I4%02X", &priv->sub_rcvr.squelch_status);
return RIG_OK;
case '5':
sscanf(buf, "I5%02X", &priv->sub_rcvr.raw_level);
return RIG_OK;
case '6':
rig_debug(RIG_DEBUG_VERBOSE, "%s: Signal centering %c%c (Sub)\n",
__func__, buf[2], buf[3]);
return RIG_OK;
case '7':
rig_debug(RIG_DEBUG_WARN, "%s: DTMF %c (Sub)\n",
__func__, buf[3]);
return RIG_OK;
} }
} else if (buf[0] == 'G') { } else if (buf[0] == 'G') {
switch (buf[1]) { switch (buf[1]) {
@ -397,15 +449,19 @@ pcr_init(RIG * rig)
*/ */
priv->country = -1; priv->country = -1;
priv->sync = 0; priv->sync = 0;
priv->last_att = 0;
priv->last_agc = 0;
priv->last_ctcss_sql = 0;
priv->last_freq = MHz(145);
priv->last_mode = MD_FM;
priv->last_filter = FLT_15kHz;
priv->power = RIG_POWER_OFF; priv->power = RIG_POWER_OFF;
priv->volume = 0.25;
priv->squelch = 0.00; priv->main_rcvr.last_att = 0;
priv->main_rcvr.last_agc = 0;
priv->main_rcvr.last_ctcss_sql = 0;
priv->main_rcvr.last_freq = MHz(145);
priv->main_rcvr.last_mode = MD_FM;
priv->main_rcvr.last_filter = FLT_15kHz;
priv->main_rcvr.volume = 0.25;
priv->main_rcvr.squelch = 0.00;
priv->sub_rcvr = priv->main_rcvr;
priv->current_vfo = RIG_VFO_MAIN;
rig->state.priv = (rig_ptr_t) priv; rig->state.priv = (rig_ptr_t) priv;
rig->state.transceive = RIG_TRN_OFF; rig->state.transceive = RIG_TRN_OFF;
@ -488,11 +544,11 @@ pcr_open(RIG * rig)
return err; return err;
/* set squelch and volume */ /* set squelch and volume */
err = pcr_set_squelch(rig, priv->squelch); err = pcr_set_squelch(rig, RIG_VFO_MAIN, priv->main_rcvr.squelch);
if (err != RIG_OK) if (err != RIG_OK)
return err; return err;
err = pcr_set_volume(rig, priv->volume); err = pcr_set_volume(rig, RIG_VFO_MAIN, priv->main_rcvr.volume);
if (err != RIG_OK) if (err != RIG_OK)
return err; return err;
@ -500,7 +556,25 @@ pcr_open(RIG * rig)
pcr_get_info(rig); pcr_get_info(rig);
/* tune to last freq */ /* tune to last freq */
pcr_set_freq(rig, 0, priv->last_freq); err = pcr_set_freq(rig, RIG_VFO_MAIN, priv->main_rcvr.last_freq);
if (err != RIG_OK)
return err;
if ((rig->state.vfo_list & RIG_VFO_SUB) == RIG_VFO_SUB) {
err = pcr_set_squelch(rig, RIG_VFO_SUB, priv->sub_rcvr.squelch);
if (err != RIG_OK)
return err;
err = pcr_set_volume(rig, RIG_VFO_SUB, priv->sub_rcvr.volume);
if (err != RIG_OK)
return err;
err = pcr_set_freq(rig, RIG_VFO_SUB, priv->sub_rcvr.last_freq);
if (err != RIG_OK)
return err;
pcr_set_vfo(rig, RIG_VFO_MAIN);
}
/* switch to different speed if requested */ /* switch to different speed if requested */
if (wanted_serial_rate != startup_serial_rate && wanted_serial_rate >= 300) if (wanted_serial_rate != startup_serial_rate && wanted_serial_rate >= 300)
@ -524,6 +598,43 @@ pcr_close(RIG * rig)
return pcr_send(rig, "H100"); return pcr_send(rig, "H100");
} }
/*
* pcr_set_vfo
*
* Only useful on PCR-2500 which is a double receiver.
* Simply remember what the current VFO is for RIG_VFO_CURR.
*/
int
pcr_set_vfo(RIG * rig, vfo_t vfo)
{
struct pcr_priv_data *priv = (struct pcr_priv_data *) rig->state.priv;
rig_debug(RIG_DEBUG_VERBOSE, "%s: vfo = %s\n",
__func__, rig_strvfo(vfo));
switch (vfo) {
case RIG_VFO_MAIN:
case RIG_VFO_SUB:
break;
default:
return -RIG_EINVAL;
}
priv->current_vfo = vfo;
return RIG_OK;
}
int
pcr_get_vfo(RIG * rig, vfo_t *vfo)
{
struct pcr_priv_data *priv = (struct pcr_priv_data *) rig->state.priv;
*vfo = priv->current_vfo;
return RIG_OK;
}
/* /*
* pcr_set_freq * pcr_set_freq
* Assumes rig!=NULL * Assumes rig!=NULL
@ -551,17 +662,20 @@ int
pcr_set_freq(RIG * rig, vfo_t vfo, freq_t freq) pcr_set_freq(RIG * rig, vfo_t vfo, freq_t freq)
{ {
struct pcr_priv_data *priv; struct pcr_priv_data *priv;
struct pcr_rcvr *rcvr;
unsigned char buf[20]; unsigned char buf[20];
int freq_len, err; int freq_len, err;
rig_debug(RIG_DEBUG_VERBOSE, "%s: vfo = %d, freq = %.0f\n", rig_debug(RIG_DEBUG_VERBOSE, "%s: vfo = %s, freq = %.0f\n",
__func__, vfo, freq); __func__, rig_strvfo(vfo), freq);
priv = (struct pcr_priv_data *) rig->state.priv; priv = (struct pcr_priv_data *) rig->state.priv;
rcvr = is_sub_rcvr(rig, vfo) ? &priv->sub_rcvr : &priv->main_rcvr;
freq_len = sprintf((char *) buf, "K0%010" PRIll "0%c0%c00", freq_len = sprintf((char *) buf, "K%c%010" PRIll "0%c0%c00",
is_sub_rcvr(rig, vfo) ? '1':'0',
(int64_t) freq, (int64_t) freq,
priv->last_mode, priv->last_filter); rcvr->last_mode, rcvr->last_filter);
buf[freq_len] = '\0'; buf[freq_len] = '\0';
@ -569,7 +683,7 @@ pcr_set_freq(RIG * rig, vfo_t vfo, freq_t freq)
if (err != RIG_OK) if (err != RIG_OK)
return err; return err;
priv->last_freq = freq; rcvr->last_freq = freq;
return RIG_OK; return RIG_OK;
} }
@ -583,8 +697,9 @@ int
pcr_get_freq(RIG * rig, vfo_t vfo, freq_t * freq) pcr_get_freq(RIG * rig, vfo_t vfo, freq_t * freq)
{ {
struct pcr_priv_data *priv = (struct pcr_priv_data *) rig->state.priv; struct pcr_priv_data *priv = (struct pcr_priv_data *) rig->state.priv;
struct pcr_rcvr *rcvr = is_sub_rcvr(rig, vfo) ? &priv->sub_rcvr : &priv->main_rcvr;
*freq = priv->last_freq; *freq = rcvr->last_freq;
return RIG_OK; return RIG_OK;
} }
@ -598,6 +713,7 @@ int
pcr_set_mode(RIG * rig, vfo_t vfo, rmode_t mode, pbwidth_t width) pcr_set_mode(RIG * rig, vfo_t vfo, rmode_t mode, pbwidth_t width)
{ {
struct pcr_priv_data *priv = (struct pcr_priv_data *) rig->state.priv; struct pcr_priv_data *priv = (struct pcr_priv_data *) rig->state.priv;
struct pcr_rcvr *rcvr = is_sub_rcvr(rig, vfo) ? &priv->sub_rcvr : &priv->main_rcvr;
unsigned char buf[20]; unsigned char buf[20];
int buf_len, err; int buf_len, err;
@ -673,8 +789,9 @@ pcr_set_mode(RIG * rig, vfo_t vfo, rmode_t mode, pbwidth_t width)
rig_debug(RIG_DEBUG_VERBOSE, "%s: filter set to %d (%c)\n", rig_debug(RIG_DEBUG_VERBOSE, "%s: filter set to %d (%c)\n",
__func__, width, pcrfilter); __func__, width, pcrfilter);
buf_len = sprintf((char *) buf, "K0%010" PRIll "0%c0%c00", buf_len = sprintf((char *) buf, "K%c%010" PRIll "0%c0%c00",
(int64_t) priv->last_freq, pcrmode, pcrfilter); is_sub_rcvr(rig, vfo) ? '1':'0',
(int64_t) rcvr->last_freq, pcrmode, pcrfilter);
err = pcr_transaction(rig, (char *) buf); err = pcr_transaction(rig, (char *) buf);
if (err != RIG_OK) if (err != RIG_OK)
@ -683,8 +800,8 @@ pcr_set_mode(RIG * rig, vfo_t vfo, rmode_t mode, pbwidth_t width)
rig_debug(RIG_DEBUG_VERBOSE, "%s: saving values\n", rig_debug(RIG_DEBUG_VERBOSE, "%s: saving values\n",
__func__); __func__);
priv->last_mode = pcrmode; rcvr->last_mode = pcrmode;
priv->last_filter = pcrfilter; rcvr->last_filter = pcrfilter;
return RIG_OK; return RIG_OK;
} }
@ -697,13 +814,15 @@ int
pcr_get_mode(RIG * rig, vfo_t vfo, rmode_t * mode, pbwidth_t * width) pcr_get_mode(RIG * rig, vfo_t vfo, rmode_t * mode, pbwidth_t * width)
{ {
struct pcr_priv_data *priv; struct pcr_priv_data *priv;
struct pcr_rcvr *rcvr;
priv = (struct pcr_priv_data *) rig->state.priv; priv = (struct pcr_priv_data *) rig->state.priv;
rcvr = is_sub_rcvr(rig, vfo) ? &priv->sub_rcvr : &priv->main_rcvr;
rig_debug(RIG_DEBUG_VERBOSE, "%s, last_mode = %c, last_filter = %c\n", __func__, rig_debug(RIG_DEBUG_VERBOSE, "%s, last_mode = %c, last_filter = %c\n", __func__,
priv->last_mode, priv->last_filter); rcvr->last_mode, rcvr->last_filter);
switch (priv->last_mode) { switch (rcvr->last_mode) {
case MD_CW: case MD_CW:
*mode = RIG_MODE_CW; *mode = RIG_MODE_CW;
break; break;
@ -725,11 +844,11 @@ pcr_get_mode(RIG * rig, vfo_t vfo, rmode_t * mode, pbwidth_t * width)
default: default:
rig_debug(RIG_DEBUG_ERR, rig_debug(RIG_DEBUG_ERR,
"pcr_get_mode: unsupported mode %d\n", "pcr_get_mode: unsupported mode %d\n",
priv->last_mode); rcvr->last_mode);
return -RIG_EINVAL; return -RIG_EINVAL;
} }
switch (priv->last_filter) { switch (rcvr->last_filter) {
case FLT_2_8kHz: case FLT_2_8kHz:
*width = kHz(2.8); *width = kHz(2.8);
break; break;
@ -747,7 +866,7 @@ pcr_get_mode(RIG * rig, vfo_t vfo, rmode_t * mode, pbwidth_t * width)
break; break;
default: default:
rig_debug(RIG_DEBUG_ERR, "pcr_get_mode: unsupported " rig_debug(RIG_DEBUG_ERR, "pcr_get_mode: unsupported "
"width %d\n", priv->last_filter); "width %d\n", rcvr->last_filter);
return -RIG_EINVAL; return -RIG_EINVAL;
} }
@ -848,20 +967,17 @@ pcr_set_level(RIG * rig, vfo_t vfo, setting_t level, value_t val)
* *
* Experiment shows it seems to have an effect, but unsure by how many db * Experiment shows it seems to have an effect, but unsure by how many db
*/ */
return pcr_set_attenuator(rig, val.i); return pcr_set_attenuator(rig, vfo, val.i);
case RIG_LEVEL_IF: case RIG_LEVEL_IF:
return pcr_set_if_shift(rig, val.i); return pcr_set_if_shift(rig, vfo, val.i);
case RIG_LEVEL_CWPITCH: /* BFO */ case RIG_LEVEL_CWPITCH: /* BFO */
return pcr_set_bfo_shift(rig, val.i); return pcr_set_bfo_shift(rig, vfo, val.i);
case RIG_LEVEL_AGC: case RIG_LEVEL_AGC:
/* this is implemented as a level even though it is a binary function /* Only AGC on/off supported by PCR's */
* as far as PCR is concerned. There is no AGC on/off for a "set func", return pcr_set_agc(rig, vfo, val.i==RIG_AGC_OFF ? 0 : 1);
* so done here is a set level
*/
return pcr_set_agc(rig, val.i);
/* floats */ /* floats */
@ -869,14 +985,14 @@ pcr_set_level(RIG * rig, vfo_t vfo, setting_t level, value_t val)
/* "val" can be 0.0 to 1.0 float which is 0 to 255 levels /* "val" can be 0.0 to 1.0 float which is 0 to 255 levels
* 0.3 seems to be ok in terms of loudness * 0.3 seems to be ok in terms of loudness
*/ */
return pcr_set_volume(rig, val.f); return pcr_set_volume(rig, vfo, val.f);
case RIG_LEVEL_SQL: case RIG_LEVEL_SQL:
/* "val" can be 0.0 to 1.0 float /* "val" can be 0.0 to 1.0 float
* .... rig supports 0 to FF - look at function for * .... rig supports 0 to FF - look at function for
* squelch "bands" * squelch "bands"
*/ */
return pcr_set_squelch(rig, val.f); return pcr_set_squelch(rig, vfo, val.f);
case RIG_LEVEL_NR: case RIG_LEVEL_NR:
/* This selectss the DSP unit - this isn't a level per se, /* This selectss the DSP unit - this isn't a level per se,
@ -885,7 +1001,7 @@ pcr_set_level(RIG * rig, vfo_t vfo, setting_t level, value_t val)
* *
* Later on we can set if the DSP features are on or off in set_func * Later on we can set if the DSP features are on or off in set_func
*/ */
return pcr_set_dsp(rig, (int) val.f); return pcr_set_dsp(rig, vfo, (int) val.f);
} }
return err; return err;
@ -903,51 +1019,52 @@ pcr_get_level(RIG * rig, vfo_t vfo, setting_t level, value_t * val)
{ {
int err; int err;
struct pcr_priv_data *priv = (struct pcr_priv_data *) rig->state.priv; struct pcr_priv_data *priv = (struct pcr_priv_data *) rig->state.priv;
struct pcr_rcvr *rcvr = is_sub_rcvr(rig, vfo) ? &priv->sub_rcvr : &priv->main_rcvr;
// rig_debug(RIG_DEBUG_TRACE, "%s: level = %d\n", __func__, level); // rig_debug(RIG_DEBUG_TRACE, "%s: level = %d\n", __func__, level);
switch (level) { switch (level) {
case RIG_LEVEL_SQL: case RIG_LEVEL_SQL:
val->f = priv->squelch; val->f = rcvr->squelch;
return RIG_OK; return RIG_OK;
case RIG_LEVEL_AF: case RIG_LEVEL_AF:
val->f = priv->volume; val->f = rcvr->volume;
return RIG_OK; return RIG_OK;
case RIG_LEVEL_STRENGTH: case RIG_LEVEL_STRENGTH:
if (priv->auto_update == 0) { if (priv->auto_update == 0) {
err = pcr_transaction(rig, "I1?"); err = pcr_transaction(rig, is_sub_rcvr(rig, vfo) ? "I5?" : "I1?");
if (err != RIG_OK) if (err != RIG_OK)
return err; return err;
} }
val->i = rig_raw2val(priv->raw_level, &rig->caps->str_cal); val->i = rig_raw2val(rcvr->raw_level, &rig->state.str_cal);
/* rig_debug(RIG_DEBUG_TRACE, "%s, raw = %d, converted = %d\n", /* rig_debug(RIG_DEBUG_TRACE, "%s, raw = %d, converted = %d\n",
__func__, priv->raw_level, val->i); __func__, rcvr->raw_level, val->i);
*/ */
return RIG_OK; return RIG_OK;
case RIG_LEVEL_RAWSTR: case RIG_LEVEL_RAWSTR:
if (priv->auto_update == 0) { if (priv->auto_update == 0) {
err = pcr_transaction(rig, "I1?"); err = pcr_transaction(rig, is_sub_rcvr(rig, vfo) ? "I5?" : "I1?");
if (err != RIG_OK) if (err != RIG_OK)
return err; return err;
} }
val->i = priv->raw_level; val->i = rcvr->raw_level;
return RIG_OK; return RIG_OK;
case RIG_LEVEL_IF: case RIG_LEVEL_IF:
val->i = priv->last_shift; val->i = rcvr->last_shift;
return RIG_OK; return RIG_OK;
case RIG_LEVEL_ATT: case RIG_LEVEL_ATT:
val->i = priv->last_att; val->i = rcvr->last_att;
return RIG_OK; return RIG_OK;
case RIG_LEVEL_AGC: case RIG_LEVEL_AGC:
val->i = priv->last_agc; val->i = rcvr->last_agc;
return RIG_OK; return RIG_OK;
} }
@ -966,6 +1083,7 @@ int
pcr_set_func(RIG * rig, vfo_t vfo, setting_t func, int status) pcr_set_func(RIG * rig, vfo_t vfo, setting_t func, int status)
{ {
struct pcr_priv_data *priv = (struct pcr_priv_data *) rig->state.priv; struct pcr_priv_data *priv = (struct pcr_priv_data *) rig->state.priv;
struct pcr_rcvr *rcvr = is_sub_rcvr(rig, vfo) ? &priv->sub_rcvr : &priv->main_rcvr;
rig_debug(RIG_DEBUG_VERBOSE, "%s: status = %ld, func = %d\n", __func__, rig_debug(RIG_DEBUG_VERBOSE, "%s: status = %ld, func = %d\n", __func__,
status, func); status, func);
@ -977,48 +1095,48 @@ pcr_set_func(RIG * rig, vfo_t vfo, setting_t func, int status)
* using the set level function RIG_LEVEL_NR * using the set level function RIG_LEVEL_NR
*/ */
if (status == 1) if (status == 1)
return pcr_set_dsp_state(rig, 1); return pcr_set_dsp_state(rig, vfo, 1);
else else
return pcr_set_dsp_state(rig, 0); return pcr_set_dsp_state(rig, vfo, 0);
break; break;
case RIG_FUNC_ANF: /* DSP auto notch filter */ case RIG_FUNC_ANF: /* DSP auto notch filter */
if (status == 1) if (status == 1)
return pcr_set_dsp_auto_notch(rig, 1); return pcr_set_dsp_auto_notch(rig, vfo, 1);
else else
return pcr_set_dsp_auto_notch(rig, 0); return pcr_set_dsp_auto_notch(rig, vfo, 0);
break; break;
case RIG_FUNC_NB: /* noise blanker */ case RIG_FUNC_NB: /* noise blanker */
if (status == 0) if (status == 0)
return pcr_set_nb(rig, 0); return pcr_set_nb(rig, vfo, 0);
else else
return pcr_set_nb(rig, 1); return pcr_set_nb(rig, vfo, 1);
break; break;
case RIG_FUNC_AFC: /* Tracking Filter */ case RIG_FUNC_AFC: /* Tracking Filter */
if (status == 0) if (status == 0)
return pcr_set_afc(rig, 0); return pcr_set_afc(rig, vfo, 0);
else else
return pcr_set_afc(rig, 1); return pcr_set_afc(rig, vfo, 1);
break; break;
case RIG_FUNC_TSQL: case RIG_FUNC_TSQL:
if (priv->last_mode != MD_FM) if (rcvr->last_mode != MD_FM)
return -RIG_ERJCTED; return -RIG_ERJCTED;
if (status == 0) if (status == 0)
return pcr_set_ctcss_sql(rig, vfo, 0); return pcr_set_ctcss_sql(rig, vfo, 0);
else else
return pcr_set_ctcss_sql(rig, vfo, priv->last_ctcss_sql); return pcr_set_ctcss_sql(rig, vfo, rcvr->last_ctcss_sql);
case RIG_FUNC_VSC: /* Voice Scan Control */ case RIG_FUNC_VSC: /* Voice Scan Control */
if (status == 0) if (status == 0)
return pcr_set_vsc(rig, 0); return pcr_set_vsc(rig, vfo, 0);
else else
return pcr_set_vsc(rig, 1); return pcr_set_vsc(rig, vfo, 1);
break; break;
@ -1046,16 +1164,20 @@ pcr_get_func(RIG * rig, vfo_t vfo, setting_t func, int *status)
int int
pcr_set_ext_level(RIG *rig, vfo_t vfo, token_t token, value_t val) pcr_set_ext_level(RIG *rig, vfo_t vfo, token_t token, value_t val)
{ {
rig_debug(RIG_DEBUG_VERBOSE, "%s: tok = %s\n", __func__, token); rig_debug(RIG_DEBUG_VERBOSE, "%s: tok = %d\n", __func__, token);
switch (token) { switch (token) {
case TOK_EL_ANL: /* automatic noise limiter */ case TOK_EL_ANL: /* automatic noise limiter */
return pcr_set_anl(rig, (0 == val.i) ? 0 : 1); return pcr_set_anl(rig, vfo, (0 == val.i) ? 0 : 1);
case TOK_EL_DIVERSITY: /* antenna diversity */
return pcr_set_diversity(rig, vfo, (0 == val.i) ? 0 : 2);
default: default:
rig_debug(RIG_DEBUG_VERBOSE, "%s: default\n", __func__); rig_debug(RIG_DEBUG_VERBOSE, "%s: unknown token: %d\n", __func__, token);
return -RIG_EINVAL; return -RIG_EINVAL;
} }
@ -1066,13 +1188,13 @@ pcr_set_ext_level(RIG *rig, vfo_t vfo, token_t token, value_t val)
/* --------------------------------------------------------------------------------------- */ /* --------------------------------------------------------------------------------------- */
/* The next functions are all "helper types". These are called by the base functions above */ /* The next functions are all "helper types". These are called by the base functions above */
/* --------------------------------------------------------------------------------------- */ /* --------------------------------------------------------------------------------------- */
/* /*
* Asks if the rig is ok = G0? response is G000 if ok or G001 if not * Asks if the rig is ok = G0? response is G000 if ok or G001 if not
* *
* Is only useful in fast transfer mode (when the CR/LF is stripped off all commands) ... * Is only useful in fast transfer mode (when the CR/LF is stripped off all commands) ...
* but also works on standard mode. * but also works on standard mode.
*/ */
static int static int
pcr_check_ok(RIG * rig) pcr_check_ok(RIG * rig)
{ {
@ -1081,7 +1203,16 @@ pcr_check_ok(RIG * rig)
} }
static int static int
pcr_set_level_cmd(RIG * rig, char *base, int level) is_sub_rcvr(RIG * rig, vfo_t vfo)
{
struct pcr_priv_data *priv = (struct pcr_priv_data *) rig->state.priv;
return vfo == RIG_VFO_SUB ||
(vfo == RIG_VFO_CURR && priv->current_vfo == RIG_VFO_SUB);
}
static int
pcr_set_level_cmd(RIG * rig, const char *base, int level)
{ {
char buf[12]; char buf[12];
@ -1098,7 +1229,8 @@ pcr_set_level_cmd(RIG * rig, char *base, int level)
return -RIG_EINVAL; return -RIG_EINVAL;
} }
sprintf(buf, "%s%02X", base, level); snprintf(buf, 12, "%s%02X", base, level);
buf[11] = '\0';
return pcr_transaction(rig, buf); return pcr_transaction(rig, buf);
} }
@ -1108,16 +1240,17 @@ pcr_set_level_cmd(RIG * rig, char *base, int level)
*/ */
static int static int
pcr_set_volume(RIG * rig, float level) pcr_set_volume(RIG * rig, vfo_t vfo, float level)
{ {
int err; int err;
struct pcr_priv_data *priv = (struct pcr_priv_data *) rig->state.priv; struct pcr_priv_data *priv = (struct pcr_priv_data *) rig->state.priv;
struct pcr_rcvr *rcvr = is_sub_rcvr(rig, vfo) ? &priv->sub_rcvr : &priv->main_rcvr;
rig_debug(RIG_DEBUG_TRACE, "%s: level = %f\n", __func__, level); rig_debug(RIG_DEBUG_TRACE, "%s: level = %f\n", __func__, level);
err = pcr_set_level_cmd(rig, "J40", level * 0xff); err = pcr_set_level_cmd(rig, is_sub_rcvr(rig, vfo) ? "J60":"J40", level * 0xff);
if (err == RIG_OK) if (err == RIG_OK)
priv->volume = level; rcvr->volume = level;
return err; return err;
} }
@ -1141,16 +1274,17 @@ pcr_set_volume(RIG * rig, float level)
*/ */
static int static int
pcr_set_squelch(RIG * rig, float level) pcr_set_squelch(RIG * rig, vfo_t vfo, float level)
{ {
int err; int err;
struct pcr_priv_data *priv = (struct pcr_priv_data *) rig->state.priv; struct pcr_priv_data *priv = (struct pcr_priv_data *) rig->state.priv;
struct pcr_rcvr *rcvr = is_sub_rcvr(rig, vfo) ? &priv->sub_rcvr : &priv->main_rcvr;
rig_debug(RIG_DEBUG_TRACE, "%s: level = %f\n", __func__, level); rig_debug(RIG_DEBUG_TRACE, "%s: level = %f\n", __func__, level);
err = pcr_set_level_cmd(rig, "J41", level * 0xff); err = pcr_set_level_cmd(rig, is_sub_rcvr(rig, vfo) ? "J61":"J41", level * 0xff);
if (err == RIG_OK) if (err == RIG_OK)
priv->squelch = level; rcvr->squelch = level;
return err; return err;
} }
@ -1171,16 +1305,17 @@ pcr_set_squelch(RIG * rig, float level)
* *
*/ */
int int
pcr_set_if_shift(RIG * rig, int level) pcr_set_if_shift(RIG * rig, vfo_t vfo, int level)
{ {
int err; int err;
struct pcr_priv_data *priv = (struct pcr_priv_data *) rig->state.priv; struct pcr_priv_data *priv = (struct pcr_priv_data *) rig->state.priv;
struct pcr_rcvr *rcvr = is_sub_rcvr(rig, vfo) ? &priv->sub_rcvr : &priv->main_rcvr;
rig_debug(RIG_DEBUG_TRACE, "%s: level is %d\n", __func__, level); rig_debug(RIG_DEBUG_TRACE, "%s: level is %d\n", __func__, level);
err = pcr_set_level_cmd(rig, "J43", (level / 10) + 0x80); err = pcr_set_level_cmd(rig, is_sub_rcvr(rig, vfo) ? "J63":"J43", (level / 10) + 0x80);
if (err == RIG_OK) if (err == RIG_OK)
priv->last_shift = level; rcvr->last_shift = level;
return err; return err;
} }
@ -1196,22 +1331,23 @@ pcr_set_if_shift(RIG * rig, int level)
* *
*/ */
int int
pcr_set_agc(RIG * rig, int status) pcr_set_agc(RIG * rig, vfo_t vfo, int status)
{ {
int err; int err;
struct pcr_priv_data *priv = (struct pcr_priv_data *) rig->state.priv; struct pcr_priv_data *priv = (struct pcr_priv_data *) rig->state.priv;
struct pcr_rcvr *rcvr = is_sub_rcvr(rig, vfo) ? &priv->sub_rcvr : &priv->main_rcvr;
rig_debug(RIG_DEBUG_VERBOSE, "%s: status = %d\n", __func__, status); rig_debug(RIG_DEBUG_VERBOSE, "%s: status = %d\n", __func__, status);
err = pcr_set_level_cmd(rig, "J45", status ? 1 : 0); err = pcr_set_level_cmd(rig, is_sub_rcvr(rig, vfo) ? "J65":"J45", status ? 1 : 0);
if (err == RIG_OK) if (err == RIG_OK)
priv->last_agc = status ? 1 : 0; rcvr->last_agc = status ? 1 : 0;
return err; return err;
} }
/* /*
* pcr_set_afc(RIG *rig, int level); * pcr_set_afc(RIG *rig, vfo_t vfo, int level);
* Assumes rig!=NULL, rig->state.priv!=NULL * Assumes rig!=NULL, rig->state.priv!=NULL
* *
* Sets the Tracking Filter on or off based on the status argument. * Sets the Tracking Filter on or off based on the status argument.
@ -1221,14 +1357,14 @@ pcr_set_agc(RIG * rig, int status)
* *
*/ */
int int
pcr_set_afc(RIG * rig, int status) pcr_set_afc(RIG * rig, vfo_t vfo, int status)
{ {
rig_debug(RIG_DEBUG_VERBOSE, "%s: status = %d\n", __func__, status); rig_debug(RIG_DEBUG_VERBOSE, "%s: status = %d\n", __func__, status);
return pcr_set_level_cmd(rig, "LD820", status ? 0 : 1); return pcr_set_level_cmd(rig, "LD820", status ? 0 : 1);
} }
/* /*
* pcr_set_nb(RIG *rig, int level); * pcr_set_nb(RIG *rig, vfo_t vfo, int level);
* Assumes rig!=NULL, rig->state.priv!=NULL * Assumes rig!=NULL, rig->state.priv!=NULL
* *
* Sets the noise blanker on or off based on the level specified in the level integer. * Sets the noise blanker on or off based on the level specified in the level integer.
@ -1238,22 +1374,39 @@ pcr_set_afc(RIG * rig, int status)
* *
*/ */
int int
pcr_set_nb(RIG * rig, int status) pcr_set_nb(RIG * rig, vfo_t vfo, int status)
{ {
rig_debug(RIG_DEBUG_VERBOSE, "%s: status = %d\n", __func__, status); rig_debug(RIG_DEBUG_VERBOSE, "%s: status = %d\n", __func__, status);
return pcr_set_level_cmd(rig, "J46", status ? 1 : 0); return pcr_set_level_cmd(rig, is_sub_rcvr(rig, vfo) ? "J66":"J46", status ? 1 : 0);
} }
/* Automatic Noise Limiter - J4Dxx - 00 off, 01 on */ /* Automatic Noise Limiter - J4Dxx - 00 off, 01 on */
int int
pcr_set_anl(RIG * rig, int status) pcr_set_anl(RIG * rig, vfo_t vfo, int status)
{ {
rig_debug(RIG_DEBUG_VERBOSE, "%s: status = %d\n", __func__, status); rig_debug(RIG_DEBUG_VERBOSE, "%s: status = %d\n", __func__, status);
return pcr_set_level_cmd(rig, "J4D", status ? 1 : 0); return pcr_set_level_cmd(rig, "J4D", status ? 1 : 0);
} }
/* Antenna Diversity/Tuners - J00xx -
* 02=Dual Diversity ON, 1 display using 2 tuners
* 01=Single Diversity OFF, 1 display using 1 tuner
* 00=OFF Diversity OFF, 2 displays using 2 tuners
*/
int
pcr_set_diversity(RIG * rig, vfo_t vfo, int status)
{
rig_debug(RIG_DEBUG_VERBOSE, "%s: status = %d\n", __func__, status);
if (status < 0 || status > 2)
return -RIG_EINVAL;
return pcr_set_level_cmd(rig, "J00", status);
}
/* /*
* pcr_set_attenuator(RIG *rig, int level); * pcr_set_attenuator(RIG *rig, vfo_t vfo, int level);
* Assumes rig!=NULL, rig->state.priv!=NULL * Assumes rig!=NULL, rig->state.priv!=NULL
* *
* Sets the attenuator on or off based on the level specified in the level integer. * Sets the attenuator on or off based on the level specified in the level integer.
@ -1265,16 +1418,17 @@ pcr_set_anl(RIG * rig, int status)
*/ */
int int
pcr_set_attenuator(RIG * rig, int status) pcr_set_attenuator(RIG * rig, vfo_t vfo, int status)
{ {
int err; int err;
struct pcr_priv_data *priv = (struct pcr_priv_data *) rig->state.priv; struct pcr_priv_data *priv = (struct pcr_priv_data *) rig->state.priv;
struct pcr_rcvr *rcvr = is_sub_rcvr(rig, vfo) ? &priv->sub_rcvr : &priv->main_rcvr;
rig_debug(RIG_DEBUG_VERBOSE, "%s: status = %d\n", __func__, status); rig_debug(RIG_DEBUG_VERBOSE, "%s: status = %d\n", __func__, status);
err = pcr_set_level_cmd(rig, "J47", status ? 1 : 0); err = pcr_set_level_cmd(rig, is_sub_rcvr(rig, vfo) ? "J67":"J47", status ? 1 : 0);
if (err == RIG_OK) if (err == RIG_OK)
priv->last_att = status; rcvr->last_att = status;
return err; return err;
} }
@ -1294,28 +1448,30 @@ pcr_set_attenuator(RIG * rig, int status)
* XXX command undocumented? * XXX command undocumented?
*/ */
int int
pcr_set_bfo_shift(RIG * rig, int level) pcr_set_bfo_shift(RIG * rig, vfo_t vfo, int level)
{ {
rig_debug(RIG_DEBUG_TRACE, "%s: level is %d\n", __func__, level); rig_debug(RIG_DEBUG_TRACE, "%s: level is %d\n", __func__, level);
return pcr_set_level_cmd(rig, "J4A", 0x80 + level/10); return pcr_set_level_cmd(rig, is_sub_rcvr(rig, vfo) ? "J6A":"J4A", 0x80 + level/10);
} }
/* /*
* pcr_set_dsp(RIG *rig, int level); * pcr_set_dsp(RIG *rig, vfo_t vfo, int level);
* Assumes rig!=NULL, rig->state.priv!=NULL * Assumes rig!=NULL, rig->state.priv!=NULL
* *
* Sets the DSP to UT106 (01) or off (non 01) * Sets the DSP to UT106 (01) or off (non 01)
* *
*/ */
int int
pcr_set_dsp(RIG * rig, int level) pcr_set_dsp(RIG * rig, vfo_t vfo, int level)
{ {
rig_debug(RIG_DEBUG_TRACE, "%s: level is %d\n", __func__, level); rig_debug(RIG_DEBUG_TRACE, "%s: level is %d\n", __func__, level);
if (is_sub_rcvr(rig, vfo))
return -RIG_ENAVAIL;
return pcr_set_level_cmd(rig, "J80", level); return pcr_set_level_cmd(rig, "J80", level);
} }
/* /*
* pcr_set_dsp_state(RIG *rig, int level); * pcr_set_dsp_state(RIG *rig, vfo_t vfo, int level);
* Assumes rig!=NULL, rig->state.priv!=NULL * Assumes rig!=NULL, rig->state.priv!=NULL
* *
* Sets the DSP on or off (> 0 = on, 0 = off) * Sets the DSP on or off (> 0 = on, 0 = off)
@ -1323,14 +1479,16 @@ pcr_set_dsp(RIG * rig, int level)
*/ */
int int
pcr_set_dsp_state(RIG * rig, int level) pcr_set_dsp_state(RIG * rig, vfo_t vfo, int level)
{ {
rig_debug(RIG_DEBUG_TRACE, "%s: level is %d\n", __func__, level); rig_debug(RIG_DEBUG_TRACE, "%s: level is %d\n", __func__, level);
if (is_sub_rcvr(rig, vfo))
return -RIG_ENAVAIL;
return pcr_set_level_cmd(rig, "J81", level); return pcr_set_level_cmd(rig, "J81", level);
} }
/* /*
* pcr_set_dsp_noise_reducer(RIG *rig, int level); * pcr_set_dsp_noise_reducer(RIG *rig, vfo_t vfo, int level);
* Assumes rig!=NULL, rig->state.priv!=NULL * Assumes rig!=NULL, rig->state.priv!=NULL
* *
* Sets the DSP noise reducer on or off (0x01 = on, 0x00 = off) * Sets the DSP noise reducer on or off (0x01 = on, 0x00 = off)
@ -1338,39 +1496,44 @@ pcr_set_dsp_state(RIG * rig, int level)
*/ */
int int
pcr_set_dsp_noise_reducer(RIG * rig, int level) pcr_set_dsp_noise_reducer(RIG * rig, vfo_t vfo, int level)
{ {
rig_debug(RIG_DEBUG_TRACE, "%s: level is %d\n", __func__, level); rig_debug(RIG_DEBUG_TRACE, "%s: level is %d\n", __func__, level);
if (is_sub_rcvr(rig, vfo))
return -RIG_ENAVAIL;
return pcr_set_level_cmd(rig, "J82", level); return pcr_set_level_cmd(rig, "J82", level);
} }
/* /*
* pcr_set_dsp_auto_notch(RIG *rig, int level); * pcr_set_dsp_auto_notch(RIG *rig, vfo_t vfo, int level);
* Assumes rig!=NULL, rig->state.priv!=NULL * Assumes rig!=NULL, rig->state.priv!=NULL
* *
* Sets the auto notch on or off (1 = on, 0 = off) * Sets the auto notch on or off (1 = on, 0 = off)
*/ */
int int
pcr_set_dsp_auto_notch(RIG * rig, int status) // J83xx pcr_set_dsp_auto_notch(RIG * rig, vfo_t vfo, int status) // J83xx
{ {
rig_debug(RIG_DEBUG_TRACE, "%s: level is %d\n", __func__, status); rig_debug(RIG_DEBUG_TRACE, "%s: level is %d\n", __func__, status);
if (is_sub_rcvr(rig, vfo))
return -RIG_ENAVAIL;
return pcr_set_level_cmd(rig, "J83", status ? 1 : 0); return pcr_set_level_cmd(rig, "J83", status ? 1 : 0);
} }
int int
pcr_set_vsc(RIG * rig, int status) // J50xx pcr_set_vsc(RIG * rig, vfo_t vfo, int status) // J50xx
{ {
/* Not sure what VSC for so skipping the function here ... */ /* Not sure what VSC for so skipping the function here ... */
return pcr_set_level_cmd(rig, "J50", status ? 1 : 0); return pcr_set_level_cmd(rig, is_sub_rcvr(rig, vfo) ? "J70":"J50", status ? 1 : 0);
} }
int pcr_get_ctcss_sql(RIG *rig, vfo_t vfo, tone_t *tone) int pcr_get_ctcss_sql(RIG *rig, vfo_t vfo, tone_t *tone)
{ {
struct pcr_priv_data *priv = (struct pcr_priv_data *) rig->state.priv; struct pcr_priv_data *priv = (struct pcr_priv_data *) rig->state.priv;
struct pcr_rcvr *rcvr = is_sub_rcvr(rig, vfo) ? &priv->sub_rcvr : &priv->main_rcvr;
*tone = priv->last_ctcss_sql; *tone = rcvr->last_ctcss_sql;
return RIG_OK; return RIG_OK;
} }
@ -1378,11 +1541,12 @@ int pcr_set_ctcss_sql(RIG *rig, vfo_t vfo, tone_t tone)
{ {
int i, err; int i, err;
struct pcr_priv_data *priv = (struct pcr_priv_data *) rig->state.priv; struct pcr_priv_data *priv = (struct pcr_priv_data *) rig->state.priv;
struct pcr_rcvr *rcvr = is_sub_rcvr(rig, vfo) ? &priv->sub_rcvr : &priv->main_rcvr;
rig_debug(RIG_DEBUG_VERBOSE, "%s: tone = %d\n", __func__, tone); rig_debug(RIG_DEBUG_VERBOSE, "%s: tone = %d\n", __func__, tone);
if (tone == 0) if (tone == 0)
return pcr_transaction(rig, "J5100"); return pcr_transaction(rig, is_sub_rcvr(rig, vfo) ? "J7100":"J5100");
for (i = 0; rig->caps->ctcss_list[i] != 0; i++) { for (i = 0; rig->caps->ctcss_list[i] != 0; i++) {
if (rig->caps->ctcss_list[i] == tone) if (rig->caps->ctcss_list[i] == tone)
@ -1395,9 +1559,47 @@ int pcr_set_ctcss_sql(RIG *rig, vfo_t vfo, tone_t tone)
if (rig->caps->ctcss_list[i] != tone) if (rig->caps->ctcss_list[i] != tone)
return -RIG_EINVAL; return -RIG_EINVAL;
err = pcr_set_level_cmd(rig, "J51", i + 1); err = pcr_set_level_cmd(rig, is_sub_rcvr(rig, vfo) ? "J71":"J51", i + 1);
if (err == RIG_OK) if (err == RIG_OK)
priv->last_ctcss_sql = tone; rcvr->last_ctcss_sql = tone;
return RIG_OK;
}
int pcr_get_dcs_sql(RIG *rig, vfo_t vfo, tone_t *tone)
{
struct pcr_priv_data *priv = (struct pcr_priv_data *) rig->state.priv;
struct pcr_rcvr *rcvr = is_sub_rcvr(rig, vfo) ? &priv->sub_rcvr : &priv->main_rcvr;
*tone = rcvr->last_dcs_sql;
return RIG_OK;
}
int pcr_set_dcs_sql(RIG *rig, vfo_t vfo, tone_t tone)
{
int i, err;
struct pcr_priv_data *priv = (struct pcr_priv_data *) rig->state.priv;
struct pcr_rcvr *rcvr = is_sub_rcvr(rig, vfo) ? &priv->sub_rcvr : &priv->main_rcvr;
rig_debug(RIG_DEBUG_VERBOSE, "%s: tone = %d\n", __func__, tone);
if (tone == 0)
return pcr_transaction(rig, is_sub_rcvr(rig, vfo) ? "J720000":"J520000");
for (i = 0; rig->caps->dcs_list[i] != 0; i++) {
if (rig->caps->dcs_list[i] == tone)
break;
}
rig_debug(RIG_DEBUG_TRACE, "%s: index = %d, tone = %d\n",
__func__, i, rig->caps->dcs_list[i]);
if (rig->caps->dcs_list[i] != tone)
return -RIG_EINVAL;
err = pcr_set_level_cmd(rig, is_sub_rcvr(rig, vfo) ? "J7200":"J5200", i + 1);
if (err == RIG_OK)
rcvr->last_dcs_sql = tone;
return RIG_OK; return RIG_OK;
} }
@ -1435,6 +1637,11 @@ int pcr_decode_event(RIG *rig)
int pcr_set_powerstat(RIG * rig, powerstat_t status) int pcr_set_powerstat(RIG * rig, powerstat_t status)
{ {
struct pcr_priv_data *priv = (struct pcr_priv_data *) rig->state.priv;
if (status == priv->power)
return RIG_OK;
if (status == RIG_POWER_ON) if (status == RIG_POWER_ON)
return pcr_open(rig); return pcr_open(rig);
else if (status == RIG_POWER_OFF) else if (status == RIG_POWER_OFF)
@ -1446,15 +1653,43 @@ int pcr_set_powerstat(RIG * rig, powerstat_t status)
int pcr_get_powerstat(RIG * rig, powerstat_t *status) int pcr_get_powerstat(RIG * rig, powerstat_t *status)
{ {
struct pcr_priv_data *priv = (struct pcr_priv_data *) rig->state.priv; struct pcr_priv_data *priv = (struct pcr_priv_data *) rig->state.priv;
int err;
/* return RIG_ERJCTED if power is off */
err = pcr_transaction(rig, "H1?");
if (err != RIG_OK && err != -RIG_ERJCTED)
return err;
priv->power = err == RIG_OK ? RIG_POWER_ON : RIG_POWER_OFF;
/* XXX There's a command to check the status, it's worthwhile
* to use it?
*/
*status = priv->power; *status = priv->power;
return RIG_OK; return RIG_OK;
} }
int pcr_get_dcd(RIG * rig, vfo_t vfo, dcd_t *dcd)
{
struct pcr_priv_data *priv = (struct pcr_priv_data *) rig->state.priv;
struct pcr_rcvr *rcvr = is_sub_rcvr(rig, vfo) ? &priv->sub_rcvr : &priv->main_rcvr;
int err;
if (priv->auto_update == 0) {
err = pcr_transaction(rig, is_sub_rcvr(rig, vfo) ? "I4?" : "I0?");
if (err != RIG_OK)
return err;
}
/* 04 = Closed, 07 = Open
*
* Bit 0: busy
* Bit 1: AF open (CTCSS open)
* Bit 2: VSC open
* Bit 3: RX error (not ready to receive)
*/
*dcd = rcvr->squelch_status & 0x02 ? RIG_DCD_ON : RIG_DCD_OFF;
return RIG_OK;
}
/* ********************************************************************************************* /* *********************************************************************************************
* int pcr_set_comm_mode(RIG *rig, int mode_type); // Set radio to fast/diagnostic mode G3xx * int pcr_set_comm_mode(RIG *rig, int mode_type); // Set radio to fast/diagnostic mode G3xx
@ -1468,6 +1703,7 @@ DECLARE_INITRIG_BACKEND(pcr)
rig_register(&pcr100_caps); rig_register(&pcr100_caps);
rig_register(&pcr1000_caps); rig_register(&pcr1000_caps);
rig_register(&pcr1500_caps); rig_register(&pcr1500_caps);
rig_register(&pcr2500_caps);
return RIG_OK; return RIG_OK;
} }

42
pcr/pcr.h
Wyświetl plik

@ -1,8 +1,7 @@
/* /*
* Hamlib PCR backend - main header * Hamlib PCR backend - main header
* Copyright (c) 2001-2009 by Stephane Fillod * Copyright (c) 2001-2010 by Stephane Fillod
* *
* $Id: pcr.h,v 1.15 2009-02-06 17:31:33 fillods Exp $
* *
* This library is free software; you can redistribute it and/or modify * This library is free software; you can redistribute it and/or modify
* it under the terms of the GNU Library General Public License as * it under the terms of the GNU Library General Public License as
@ -28,26 +27,36 @@
/* ext_level's tokens */ /* ext_level's tokens */
#define TOK_EL_ANL TOKEN_BACKEND(1) #define TOK_EL_ANL TOKEN_BACKEND(1)
#define TOK_EL_DIVERSITY TOKEN_BACKEND(2)
#define BACKEND_VER "0.7" #define BACKEND_VER "0.8"
#define PCR_MAX_CMD_LEN 32 #define PCR_MAX_CMD_LEN 32
struct pcr_priv_data struct pcr_priv_data
{ {
freq_t last_freq; struct pcr_rcvr {
rmode_t last_mode;
int last_filter; freq_t last_freq;
int last_shift; rmode_t last_mode;
int last_att;
int last_agc;
tone_t last_ctcss_sql;
float volume; int last_filter;
float squelch; int last_shift;
int last_att;
int last_agc;
tone_t last_ctcss_sql;
tone_t last_dcs_sql;
float volume;
float squelch;
int raw_level;
int squelch_status;
} main_rcvr, sub_rcvr;
vfo_t current_vfo;
int auto_update; int auto_update;
int raw_level;
char info[100]; char info[100];
char cmd_buf[PCR_MAX_CMD_LEN]; char cmd_buf[PCR_MAX_CMD_LEN];
@ -73,11 +82,14 @@ struct pcr_priv_caps
#define pcr_caps(rig) ((struct pcr_priv_caps *)(rig)->caps->priv) #define pcr_caps(rig) ((struct pcr_priv_caps *)(rig)->caps->priv)
extern const tone_t pcr_ctcss_list[]; extern const tone_t pcr_ctcss_list[];
extern const tone_t pcr_dcs_list[];
int pcr_init(RIG *rig); int pcr_init(RIG *rig);
int pcr_cleanup(RIG *rig); int pcr_cleanup(RIG *rig);
int pcr_open(RIG *rig); int pcr_open(RIG *rig);
int pcr_close(RIG *rig); int pcr_close(RIG *rig);
int pcr_set_vfo(RIG * rig, vfo_t vfo);
int pcr_get_vfo(RIG * rig, vfo_t *vfo);
int pcr_set_freq(RIG *rig, vfo_t vfo, freq_t freq); int pcr_set_freq(RIG *rig, vfo_t vfo, freq_t freq);
int pcr_get_freq(RIG *rig, vfo_t vfo, freq_t *freq); int pcr_get_freq(RIG *rig, vfo_t vfo, freq_t *freq);
int pcr_set_mode(RIG *rig, vfo_t vfo, rmode_t mode, pbwidth_t width); int pcr_set_mode(RIG *rig, vfo_t vfo, rmode_t mode, pbwidth_t width);
@ -96,10 +108,13 @@ int pcr_set_ext_level(RIG *rig, vfo_t vfo, token_t token, value_t val);
int pcr_get_ctcss_sql(RIG *rig, vfo_t vfo, tone_t *tone); int pcr_get_ctcss_sql(RIG *rig, vfo_t vfo, tone_t *tone);
int pcr_set_ctcss_sql(RIG *rig, vfo_t vfo, tone_t tone); int pcr_set_ctcss_sql(RIG *rig, vfo_t vfo, tone_t tone);
int pcr_get_dcs_sql(RIG *rig, vfo_t vfo, tone_t *tone);
int pcr_set_dcs_sql(RIG *rig, vfo_t vfo, tone_t tone);
int pcr_set_trn(RIG * rig, int trn); int pcr_set_trn(RIG * rig, int trn);
int pcr_decode_event(RIG *rig); int pcr_decode_event(RIG *rig);
int pcr_set_powerstat(RIG * rig, powerstat_t status); int pcr_set_powerstat(RIG * rig, powerstat_t status);
int pcr_get_powerstat(RIG * rig, powerstat_t *status); int pcr_get_powerstat(RIG * rig, powerstat_t *status);
int pcr_get_dcd(RIG * rig, vfo_t vfo, dcd_t *dcd);
/* ------------------------------------------------------------------ */ /* ------------------------------------------------------------------ */
@ -109,5 +124,6 @@ int pcr_get_powerstat(RIG * rig, powerstat_t *status);
extern const struct rig_caps pcr1000_caps; extern const struct rig_caps pcr1000_caps;
extern const struct rig_caps pcr100_caps; extern const struct rig_caps pcr100_caps;
extern const struct rig_caps pcr1500_caps; extern const struct rig_caps pcr1500_caps;
extern const struct rig_caps pcr2500_caps;
#endif /* _PCR_H */ #endif /* _PCR_H */

194
pcr/pcr2500.c 100644
Wyświetl plik

@ -0,0 +1,194 @@
/*
* Hamlib PCR backend - PCR-2500 description
* Copyright (c) 2001-2010 by Stephane Fillod
*
*
* This library is free software; you can redistribute it and/or modify
* it under the terms of the GNU Library General Public License as
* published by the Free Software Foundation; either version 2 of
* the License, or (at your option) any later version.
*
* This program 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 Library General Public License for more details.
*
* You should have received a copy of the GNU Library General Public
* License along with this library; if not, write to the Free Software
* Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
*
*/
#ifdef HAVE_CONFIG_H
#include "config.h"
#endif
#include <stdlib.h>
#include <hamlib/rig.h>
#include "pcr.h"
#include "idx_builtin.h"
#define PCR2500_MODES_WIDE ( RIG_MODE_AM | RIG_MODE_FM | RIG_MODE_WFM )
#define PCR2500_MODES_NAR ( RIG_MODE_CW | RIG_MODE_SSB )
#define PCR2500_MODES ( PCR2500_MODES_NAR | PCR2500_MODES_WIDE )
#define PCR2500_FUNC ( RIG_FUNC_NB | RIG_FUNC_TSQL | RIG_FUNC_NB | \
RIG_FUNC_ANF | RIG_FUNC_NR | RIG_FUNC_AFC )
#define PCR2500_LEVEL ( \
RIG_LEVEL_ATT | RIG_LEVEL_AF | RIG_LEVEL_SQL | RIG_LEVEL_IF | \
RIG_LEVEL_AGC | RIG_LEVEL_STRENGTH | RIG_LEVEL_RAWSTR | \
RIG_LEVEL_NR )
static const struct confparams pcr2500_ext_levels[] = {
{ TOK_EL_DIVERSITY, "DIV", "Diversity", "Antenna/tuner diversity",
NULL, RIG_CONF_CHECKBUTTON
},
{ RIG_CONF_END, NULL, }
};
static const struct pcr_priv_caps pcr2500_priv = {
.reply_size = 6,
.reply_offset = 0,
.always_sync = 0,
};
/*
* IC PCR2500 rigs capabilities.
*/
const struct rig_caps pcr2500_caps = {
.rig_model = RIG_MODEL_PCR2500,
.model_name = "IC-PCR2500",
.mfg_name = "Icom",
.version = BACKEND_VER,
.copyright = "LGPL",
.status = RIG_STATUS_BETA,
.rig_type = RIG_TYPE_PCRECEIVER,
.ptt_type = RIG_PTT_NONE,
.dcd_type = RIG_DCD_RIG,
.port_type = RIG_PORT_SERIAL,
.serial_rate_min = 9600, /* lower speeds gave troubles */
.serial_rate_max = 38400,
.serial_data_bits = 8,
.serial_stop_bits = 1,
.serial_parity = RIG_PARITY_NONE,
.serial_handshake = RIG_HANDSHAKE_HARDWARE,
.write_delay = 12,
.post_write_delay = 2,
.timeout = 400,
.retry = 3,
.has_get_func = PCR2500_FUNC,
.has_set_func = PCR2500_FUNC,
.has_get_level = PCR2500_LEVEL,
.has_set_level = RIG_LEVEL_SET(PCR2500_LEVEL),
.has_get_parm = RIG_PARM_NONE,
.has_set_parm = RIG_PARM_NONE,
.level_gran = {
[LVL_RAWSTR] = { .min = { .i = 0 }, .max = { .i = 255 } },
/* XXX check this */
[LVL_IF] = { .min = { .i = -1270 }, .max = { .i = 1270 }, .step = { .i = 10 } },
},
.parm_gran = {},
.ctcss_list = pcr_ctcss_list,
.dcs_list = pcr_dcs_list,
.preamp = { RIG_DBLST_END },
.attenuator = { 20, RIG_DBLST_END },
.max_rit = Hz(0),
.max_xit = Hz(0),
.max_ifshift = kHz(1.2),
.targetable_vfo = RIG_TARGETABLE_ALL,
.transceive = RIG_TRN_RIG,
.bank_qty = 0,
.chan_desc_sz = 0,
.chan_list = { RIG_CHAN_END },
.rx_range_list1 = {
{ kHz(100), GHz(1.3), PCR2500_MODES_NAR, -1, -1, RIG_VFO_MAIN, RIG_ANT_1 },
{ kHz(10), GHz(3.3)-kHz(1), PCR2500_MODES_WIDE, -1, -1, RIG_VFO_MAIN, RIG_ANT_1 },
{ MHz(50), GHz(1.3), PCR2500_MODES_WIDE, -1, -1, RIG_VFO_SUB, RIG_ANT_2 },
RIG_FRNG_END
},
.tx_range_list1 = { RIG_FRNG_END },
.rx_range_list2 = {
{ kHz(495), MHz(824) - 10, PCR2500_MODES_NAR, -1, -1, RIG_VFO_MAIN, RIG_ANT_1 },
{ MHz(849) + 10, MHz(869) - 10, PCR2500_MODES_NAR, -1, -1, RIG_VFO_MAIN, RIG_ANT_1 },
{ MHz(894) + 10, GHz(1.3), PCR2500_MODES_NAR, -1, -1, RIG_VFO_MAIN, RIG_ANT_1 },
{ kHz(10), MHz(824) - 10, PCR2500_MODES_WIDE, -1, -1, RIG_VFO_MAIN, RIG_ANT_1 },
{ MHz(849) + 10, MHz(869) - 10, PCR2500_MODES_WIDE, -1, -1, RIG_VFO_MAIN, RIG_ANT_1 },
{ MHz(894) + 10, GHz(3.3)-kHz(1), PCR2500_MODES_WIDE, -1, -1, RIG_VFO_MAIN, RIG_ANT_1 },
{ MHz(50), GHz(1.3), PCR2500_MODES_WIDE, -1, -1, RIG_VFO_SUB, RIG_ANT_2 },
RIG_FRNG_END
},
.tx_range_list2 = { RIG_FRNG_END }, /* no TX ranges, this is a receiver */
.tuning_steps = {
{ PCR2500_MODES, Hz(1) },
RIG_TS_END,
},
/* mode/filter list, remember: order matters! */
.filters = {
{ RIG_MODE_FM | RIG_MODE_AM, kHz(15) },
{ RIG_MODE_CW | RIG_MODE_USB | RIG_MODE_LSB | RIG_MODE_AM, kHz(2.8)},
{ RIG_MODE_CW | RIG_MODE_USB | RIG_MODE_LSB | RIG_MODE_AM | RIG_MODE_FM, kHz(6) },
{ RIG_MODE_WFM, kHz(230) },
{ RIG_MODE_WFM | RIG_MODE_FM | RIG_MODE_AM, kHz(50) },
RIG_FLT_END,
},
.extlevels = pcr2500_ext_levels,
.priv = (void *) &pcr2500_priv,
/* XXX fake */
.str_cal = { 3, { { 0, -60 }, { 127, 0 }, { 255, 60 } } },
.rig_init = pcr_init,
.rig_cleanup = pcr_cleanup,
.rig_open = pcr_open,
.rig_close = pcr_close,
.set_vfo = pcr_set_vfo,
.get_vfo = pcr_get_vfo,
.set_freq = pcr_set_freq,
.get_freq = pcr_get_freq,
.set_mode = pcr_set_mode,
.get_mode = pcr_get_mode,
.get_info = pcr_get_info,
.set_level = pcr_set_level,
.get_level = pcr_get_level,
.set_ext_level = pcr_set_ext_level,
.set_func = pcr_set_func,
.get_func = pcr_get_func,
.set_ctcss_sql = pcr_set_ctcss_sql,
.get_ctcss_sql = pcr_get_ctcss_sql,
.set_dcs_sql = pcr_set_dcs_sql,
.get_dcs_sql = pcr_get_dcs_sql,
.set_trn = pcr_set_trn,
.decode_event = pcr_decode_event,
.get_dcd = pcr_get_dcd,
.set_powerstat = pcr_set_powerstat,
.get_powerstat = pcr_get_powerstat,
};