kopia lustrzana https://github.com/Hamlib/Hamlib
139 wiersze
3.8 KiB
Plaintext
139 wiersze
3.8 KiB
Plaintext
/*
|
|
* Hamlib bindings - Rotator interface
|
|
* Copyright (c) 2001,2002 by Stephane Fillod
|
|
*
|
|
* $Id: rotator.swg,v 1.3 2002-10-07 21:44:51 fillods Exp $
|
|
*
|
|
* 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.
|
|
*
|
|
*/
|
|
|
|
%inline %{
|
|
|
|
typedef struct Rot {
|
|
ROT *rot;
|
|
struct rot_caps *caps; /* shortcut to ROT->caps */
|
|
struct rot_state *state; /* shortcut to ROT->state */
|
|
int error_status;
|
|
int do_exception;
|
|
} Rot;
|
|
|
|
%}
|
|
|
|
/*
|
|
* decalre wrapper method with 0,1,2 arguments besides ROT*
|
|
*/
|
|
#define ROTMETHOD0(f) void f () \
|
|
{ self->error_status = rot_##f(self->rot); }
|
|
#define ROTMETHOD1(f, t1) void f (t1 _##t1) \
|
|
{ self->error_status = rot_##f(self->rot, _##t1); }
|
|
#define ROTMETHOD2(f, t1, t2) void f (t1 _##t1##_1, t2 _##t2##_2) \
|
|
{ self->error_status = rot_##f(self->rot, _##t1##_1, _##t2##_2); }
|
|
|
|
%extend Rot {
|
|
Rot(rot_model_t rot_model) {
|
|
Rot *r;
|
|
|
|
r = (Rot*)malloc(sizeof(Rot));
|
|
if (!r)
|
|
return NULL;
|
|
r->rot = rot_init(rot_model);
|
|
if (!r->rot) {
|
|
free(r);
|
|
return NULL;
|
|
}
|
|
/* install shortcuts */
|
|
r->caps = r->rot->caps;
|
|
r->state = &r->rot->state;
|
|
r->do_exception = 0; /* default is disabled */
|
|
r->error_status = RIG_OK;
|
|
return r;
|
|
}
|
|
~Rot () {
|
|
rot_cleanup(self->rot);
|
|
free(self);
|
|
}
|
|
|
|
/*
|
|
* return code checking
|
|
*/
|
|
%exception {
|
|
arg1->error_status = RIG_OK;
|
|
$action
|
|
if (arg1->error_status != RIG_OK && arg1->do_exception)
|
|
SWIG_exception(SWIG_UnknownError, rigerror(arg1->error_status));
|
|
}
|
|
|
|
ROTMETHOD0(open)
|
|
ROTMETHOD0(close)
|
|
|
|
ROTMETHOD2(set_position, azimuth_t, elevation_t)
|
|
extern void get_position(azimuth_t *OUTPUT, elevation_t *OUTPUT);
|
|
ROTMETHOD0(stop)
|
|
ROTMETHOD0(park)
|
|
ROTMETHOD1(reset, rot_reset_t)
|
|
ROTMETHOD2(move, int, int)
|
|
|
|
ROTMETHOD1(token_lookup, const_char_string) /* conf */
|
|
|
|
void set_conf(const char *name, const char *val) {
|
|
token_t tok = rot_token_lookup(self->rot, name);
|
|
if (tok == RIG_CONF_END)
|
|
self->error_status = -RIG_EINVAL;
|
|
else
|
|
self->error_status = rot_set_conf(self->rot, tok, val);
|
|
}
|
|
|
|
ROTMETHOD2(set_conf, token_t, const_char_string)
|
|
|
|
const char *get_conf(token_t tok) {
|
|
static char s[128] = "";
|
|
self->error_status = rot_get_conf(self->rot, tok, s);
|
|
return s;
|
|
}
|
|
|
|
const char *get_conf(const char *name) {
|
|
token_t tok = rot_token_lookup(self->rot, name);
|
|
static char s[128] = "";
|
|
if (tok == RIG_CONF_END)
|
|
self->error_status = -RIG_EINVAL;
|
|
else
|
|
self->error_status = rot_get_conf(self->rot, tok, s);
|
|
return s;
|
|
}
|
|
|
|
const char * get_info(void) {
|
|
const char *s;
|
|
s = rot_get_info(self->rot);
|
|
self->error_status = s ? RIG_OK : -RIG_EINVAL;
|
|
return s;
|
|
}
|
|
|
|
/* TODO: get_conf_list, .. */
|
|
};
|
|
|
|
%{
|
|
|
|
/*
|
|
* this one returns 2 values, here is a perl example:
|
|
* ($az, $elevation) = $rig->get_position();
|
|
*/
|
|
void Rot_get_position(Rot *self, azimuth_t *azimuth, elevation_t *elevation)
|
|
{
|
|
self->error_status = rot_get_position(self->rot, azimuth, elevation);
|
|
}
|
|
|
|
%}
|