kopia lustrzana https://github.com/Hamlib/Hamlib
519 wiersze
13 KiB
C
519 wiersze
13 KiB
C
/*
|
|
* Hamlib Interface - parallel communication low-level support
|
|
* Copyright (c) 2000-2010 by Stephane Fillod
|
|
*
|
|
*
|
|
* This library is free software; you can redistribute it and/or
|
|
* modify it under the terms of the GNU Lesser General Public
|
|
* License as published by the Free Software Foundation; either
|
|
* version 2.1 of the License, or (at your option) any later version.
|
|
*
|
|
* This library 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
|
|
* Lesser General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU Lesser General Public
|
|
* License along with this library; if not, write to the Free Software
|
|
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
|
|
*
|
|
*/
|
|
|
|
/**
|
|
* \addtogroup rig_internal
|
|
* @{
|
|
*/
|
|
|
|
/**
|
|
* \brief Parallel Port IO
|
|
* \file parallel.c
|
|
*/
|
|
#ifdef HAVE_CONFIG_H
|
|
#include "config.h"
|
|
#endif
|
|
|
|
#include <stdlib.h>
|
|
#include <stdio.h> /* Standard input/output definitions */
|
|
#include <string.h> /* String function definitions */
|
|
#include <unistd.h> /* UNIX standard function definitions */
|
|
#include <fcntl.h> /* File control definitions */
|
|
#include <errno.h> /* Error number definitions */
|
|
#include <sys/time.h>
|
|
#include <sys/types.h>
|
|
#include <unistd.h>
|
|
#ifdef HAVE_SYS_IOCTL_H
|
|
#include <sys/ioctl.h>
|
|
#endif
|
|
|
|
#ifdef HAVE_SYS_PARAM_H
|
|
#include <sys/param.h>
|
|
#endif
|
|
|
|
#ifdef HAVE_WINDOWS_H
|
|
#include <windows.h>
|
|
#include "par_nt.h"
|
|
#endif
|
|
#ifdef HAVE_WINIOCTL_H
|
|
#include <winioctl.h>
|
|
#endif
|
|
#ifdef HAVE_WINBASE_H
|
|
#include <winbase.h>
|
|
#endif
|
|
|
|
#include "hamlib/rig.h"
|
|
#include "parallel.h"
|
|
|
|
#ifdef HAVE_LINUX_PPDEV_H
|
|
#include <linux/ppdev.h>
|
|
#include <linux/parport.h>
|
|
#endif
|
|
|
|
#ifdef HAVE_DEV_PPBUS_PPI_H
|
|
#include <dev/ppbus/ppi.h>
|
|
#include <dev/ppbus/ppbconf.h>
|
|
#endif
|
|
|
|
/*
|
|
* These control port bits are active low.
|
|
* We toggle them so that this weirdness doesn't get propagated
|
|
* through our interface.
|
|
*/
|
|
#define CP_ACTIVE_LOW_BITS 0x0B
|
|
|
|
/*
|
|
* These status port bits are active low.
|
|
* We toggle them so that this weirdness doesn't get propagated
|
|
* through our interface.
|
|
*/
|
|
#define SP_ACTIVE_LOW_BITS 0x80
|
|
|
|
/*
|
|
Pinout table of parallel port from http://en.wikipedia.org/wiki/Parallel_port#Pinouts
|
|
|
|
Pin No (DB25) Signal name Direction Register-bit Inverted
|
|
1 *Strobe In/Out Control-0 Yes
|
|
2 Data0 Out Data-0 No
|
|
3 Data1 Out Data-1 No
|
|
4 Data2 Out Data-2 No
|
|
5 Data3 Out Data-3 No
|
|
6 Data4 Out Data-4 No
|
|
7 Data5 Out Data-5 No
|
|
8 Data6 Out Data-6 No
|
|
9 Data7 Out Data-7 No
|
|
10 *Ack In Status-6 No
|
|
11 Busy In Status-7 Yes
|
|
12 Paper-Out In Status-5 No
|
|
13 Select In Status-4 No
|
|
14 Linefeed In/Out Control-1 Yes
|
|
15 *Error In Status-3 No
|
|
16 *Reset In/Out Control-2 No
|
|
17 *Select-Printer In/Out Control-3 Yes
|
|
|
|
* means low true, e.g., *Strobe.
|
|
*/
|
|
|
|
/**
|
|
* \brief Open Parallel Port
|
|
* \param port
|
|
* \return file descriptor
|
|
*
|
|
* TODO: to be called before exiting: atexit(parport_cleanup)
|
|
* void parport_cleanup() { ioctl(fd, PPRELEASE); }
|
|
*/
|
|
|
|
int par_open(hamlib_port_t *port)
|
|
{
|
|
int fd;
|
|
int mode;
|
|
|
|
if (!port->pathname)
|
|
return -RIG_EINVAL;
|
|
|
|
#ifdef HAVE_LINUX_PPDEV_H
|
|
/* TODO: open with O_NONBLOCK ? */
|
|
fd = open(port->pathname, O_RDWR);
|
|
if (fd < 0) {
|
|
rig_debug(RIG_DEBUG_ERR, "Opening device \"%s\": %s\n", port->pathname, strerror(errno));
|
|
return -RIG_EIO;
|
|
}
|
|
mode = IEEE1284_MODE_COMPAT;
|
|
if (ioctl (fd, PPSETMODE, &mode) != 0) {
|
|
rig_debug(RIG_DEBUG_ERR, "PPSETMODE \"%s\": %s\n", port->pathname, strerror(errno));
|
|
close(fd);
|
|
return -RIG_EIO;
|
|
}
|
|
|
|
#elif defined(HAVE_DEV_PPBUS_PPI_H)
|
|
|
|
fd = open(port->pathname, O_RDWR);
|
|
if (fd < 0) {
|
|
rig_debug(RIG_DEBUG_ERR, "Opening device \"%s\": %s\n", port->pathname, strerror(errno));
|
|
return -RIG_EIO;
|
|
}
|
|
|
|
#elif defined(WIN32)
|
|
fd = (int)CreateFile(port->pathname, GENERIC_READ | GENERIC_WRITE,
|
|
0, NULL, OPEN_EXISTING, 0, NULL);
|
|
if (fd == (int)INVALID_HANDLE_VALUE) {
|
|
rig_debug(RIG_DEBUG_ERR, "Opening device \"%s\"\n", port->pathname);
|
|
CloseHandle((HANDLE)fd);
|
|
return -RIG_EIO;
|
|
}
|
|
#else
|
|
return -RIG_ENIMPL;
|
|
#endif
|
|
port->fd = fd;
|
|
return fd;
|
|
}
|
|
|
|
/**
|
|
* \brief Close Parallel Port
|
|
* \param port
|
|
*/
|
|
int par_close(hamlib_port_t *port)
|
|
{
|
|
#ifdef HAVE_LINUX_PPDEV_H
|
|
#elif defined(HAVE_DEV_PPBUS_PPI_H)
|
|
#elif defined(WIN32)
|
|
CloseHandle((HANDLE)(port->fd));
|
|
return RIG_OK;
|
|
#endif
|
|
return close(port->fd);
|
|
}
|
|
|
|
/**
|
|
* \brief Send data on Parallel port
|
|
* \param port
|
|
* \param data
|
|
*/
|
|
int HAMLIB_API par_write_data(hamlib_port_t *port, unsigned char data)
|
|
{
|
|
#ifdef HAVE_LINUX_PPDEV_H
|
|
int status;
|
|
status = ioctl(port->fd, PPWDATA, &data);
|
|
return status == 0 ? RIG_OK : -RIG_EIO;
|
|
#elif defined(HAVE_DEV_PPBUS_PPI_H)
|
|
int status;
|
|
status = ioctl(port->fd, PPISDATA, &data);
|
|
return status == 0 ? RIG_OK : -RIG_EIO;
|
|
#elif defined(WIN32)
|
|
unsigned int dummy;
|
|
|
|
if (!(DeviceIoControl((HANDLE)(port->fd), NT_IOCTL_DATA, &data, sizeof(data),
|
|
NULL, 0, (LPDWORD)&dummy, NULL))) {
|
|
rig_debug(RIG_DEBUG_ERR, "%s: DeviceIoControl failed!\n", __FUNCTION__);
|
|
return -RIG_EIO;
|
|
}
|
|
return RIG_OK;
|
|
#else
|
|
return -RIG_ENIMPL;
|
|
#endif
|
|
}
|
|
|
|
/**
|
|
* \brief Receive data on Parallel port
|
|
* \param port
|
|
* \param data
|
|
*/
|
|
int HAMLIB_API par_read_data(hamlib_port_t *port, unsigned char *data)
|
|
{
|
|
#ifdef HAVE_LINUX_PPDEV_H
|
|
int status;
|
|
status = ioctl(port->fd, PPRDATA, data);
|
|
return status == 0 ? RIG_OK : -RIG_EIO;
|
|
#elif defined(HAVE_DEV_PPBUS_PPI_H)
|
|
int status;
|
|
status = ioctl(port->fd, PPIGDATA, &data);
|
|
return status == 0 ? RIG_OK : -RIG_EIO;
|
|
#elif defined(WIN32)
|
|
unsigned char ret;
|
|
unsigned int dummy;
|
|
|
|
if (!(DeviceIoControl((HANDLE)(port->fd), NT_IOCTL_STATUS, NULL, 0, &ret,
|
|
sizeof(ret), (LPDWORD)&dummy, NULL))) {
|
|
rig_debug(RIG_DEBUG_ERR, "%s: DeviceIoControl failed!\n", __FUNCTION__);
|
|
return -RIG_EIO;
|
|
}
|
|
|
|
*data = ret ^ S1284_INVERTED;
|
|
return RIG_OK;
|
|
#else
|
|
return -RIG_ENIMPL;
|
|
#endif
|
|
}
|
|
|
|
/**
|
|
* \brief Set control data for Parallel Port
|
|
* \param port
|
|
* \param control
|
|
*/
|
|
int HAMLIB_API par_write_control(hamlib_port_t *port, unsigned char control)
|
|
{
|
|
#ifdef HAVE_LINUX_PPDEV_H
|
|
int status;
|
|
unsigned char ctrl = control ^ CP_ACTIVE_LOW_BITS;
|
|
status = ioctl(port->fd, PPWCONTROL, &ctrl);
|
|
if (status < 0)
|
|
rig_debug(RIG_DEBUG_ERR,"ioctl(PPWCONTROL) failed: %s\n", strerror(errno));
|
|
return status == 0 ? RIG_OK : -RIG_EIO;
|
|
#elif defined(HAVE_DEV_PPBUS_PPI_H)
|
|
int status;
|
|
unsigned char ctrl = control ^ CP_ACTIVE_LOW_BITS;
|
|
status = ioctl(port->fd, PPISCTRL, &ctrl);
|
|
return status == 0 ? RIG_OK : -RIG_EIO;
|
|
#elif defined(WIN32)
|
|
unsigned char ctr = control;
|
|
unsigned char dummyc;
|
|
unsigned int dummy;
|
|
const unsigned char wm = (C1284_NSTROBE |
|
|
C1284_NAUTOFD |
|
|
C1284_NINIT |
|
|
C1284_NSELECTIN);
|
|
|
|
if (ctr & 0x20)
|
|
{
|
|
rig_debug (RIG_DEBUG_WARN, "use ieee1284_data_dir to change data line direction!\n");
|
|
}
|
|
|
|
/* Deal with inversion issues. */
|
|
ctr ^= wm & C1284_INVERTED;
|
|
ctr = (ctr & ~wm) ^ (ctr & wm);
|
|
if (!(DeviceIoControl((HANDLE)(port->fd), NT_IOCTL_CONTROL, &ctr,
|
|
sizeof(ctr), &dummyc, sizeof(dummyc), (LPDWORD)&dummy, NULL))) {
|
|
rig_debug(RIG_DEBUG_ERR,"frob_control: DeviceIoControl failed!\n");
|
|
return -RIG_EIO;
|
|
}
|
|
return RIG_OK;
|
|
#else
|
|
return -RIG_ENIMPL;
|
|
#endif
|
|
}
|
|
|
|
/**
|
|
* \brief Read control data for Parallel Port
|
|
* \param port
|
|
* \param control
|
|
*/
|
|
int HAMLIB_API par_read_control(hamlib_port_t *port, unsigned char *control)
|
|
{
|
|
#ifdef HAVE_LINUX_PPDEV_H
|
|
int status;
|
|
unsigned char ctrl;
|
|
status = ioctl(port->fd, PPRCONTROL, &ctrl);
|
|
if (status < 0)
|
|
rig_debug(RIG_DEBUG_ERR,"ioctl(PPRCONTROL) failed: %s\n", strerror(errno));
|
|
*control = ctrl ^ CP_ACTIVE_LOW_BITS;
|
|
return status == 0 ? RIG_OK : -RIG_EIO;
|
|
#elif defined(HAVE_DEV_PPBUS_PPI_H)
|
|
int status;
|
|
unsigned char ctrl;
|
|
status = ioctl(port->fd, PPIGCTRL, &ctrl);
|
|
*control = ctrl ^ CP_ACTIVE_LOW_BITS;
|
|
return status == 0 ? RIG_OK : -RIG_EIO;
|
|
#elif defined(WIN32)
|
|
unsigned char ret;
|
|
unsigned int dummy;
|
|
|
|
if (!(DeviceIoControl((HANDLE)(port->fd), NT_IOCTL_CONTROL, NULL, 0, &ret,
|
|
sizeof(ret), (LPDWORD)&dummy, NULL))) {
|
|
rig_debug(RIG_DEBUG_ERR, "%s: DeviceIoControl failed!\n", __FUNCTION__);
|
|
return -RIG_EIO;
|
|
}
|
|
|
|
*control = ret ^ S1284_INVERTED;
|
|
return RIG_OK;
|
|
#else
|
|
return -RIG_ENIMPL;
|
|
#endif
|
|
}
|
|
|
|
/**
|
|
* \brief Get parallel port status
|
|
* \param port
|
|
* \param status
|
|
* \return RIG_OK or < 0 for error
|
|
*/
|
|
int HAMLIB_API par_read_status(hamlib_port_t *port, unsigned char *status)
|
|
{
|
|
#ifdef HAVE_LINUX_PPDEV_H
|
|
int ret;
|
|
unsigned char sta;
|
|
ret = ioctl(port->fd, PPRSTATUS, &sta);
|
|
*status = sta ^ SP_ACTIVE_LOW_BITS;
|
|
return ret == 0 ? RIG_OK : -RIG_EIO;
|
|
#elif defined(HAVE_DEV_PPBUS_PPI_H)
|
|
int ret;
|
|
unsigned char sta;
|
|
ret = ioctl(port->fd, PPIGSTATUS, &sta);
|
|
*status = sta ^ SP_ACTIVE_LOW_BITS;
|
|
return ret == 0 ? RIG_OK : -RIG_EIO;
|
|
#elif defined(WIN32)
|
|
unsigned char ret;
|
|
unsigned int dummy;
|
|
|
|
if (!(DeviceIoControl((HANDLE)(port->fd), NT_IOCTL_STATUS, NULL, 0, &ret,
|
|
sizeof(ret), (LPDWORD)&dummy, NULL))) {
|
|
rig_debug(RIG_DEBUG_ERR, "%s: DeviceIoControl failed!\n", __FUNCTION__);
|
|
return -RIG_EIO;
|
|
}
|
|
|
|
*status = ret ^ S1284_INVERTED;
|
|
return RIG_OK;
|
|
#else
|
|
return -RIG_ENIMPL;
|
|
#endif
|
|
}
|
|
|
|
/**
|
|
* \brief Get a lock on the Parallel Port
|
|
* \param port
|
|
* \return RIG_OK or < 0
|
|
*/
|
|
int HAMLIB_API par_lock(hamlib_port_t *port)
|
|
{
|
|
#ifdef HAVE_LINUX_PPDEV_H
|
|
if (ioctl(port->fd, PPCLAIM) < 0) {
|
|
rig_debug(RIG_DEBUG_ERR, "Claiming device \"%s\": %s\n", port->pathname, strerror(errno));
|
|
return -RIG_EIO;
|
|
}
|
|
return RIG_OK;
|
|
#elif defined(HAVE_DEV_PPBUS_PPI_H)
|
|
return RIG_OK;
|
|
#elif defined(WIN32)
|
|
return RIG_OK;
|
|
#else
|
|
return -RIG_ENIMPL;
|
|
#endif
|
|
}
|
|
|
|
/**
|
|
* \brief Release lock on Parallel Port
|
|
* \param port
|
|
* \return RIG_OK or < 0
|
|
*/
|
|
int HAMLIB_API par_unlock(hamlib_port_t *port)
|
|
{
|
|
#ifdef HAVE_LINUX_PPDEV_H
|
|
if (ioctl(port->fd, PPRELEASE) < 0) {
|
|
rig_debug(RIG_DEBUG_ERR, "Releasing device \"%s\": %s\n", port->pathname, strerror(errno));
|
|
return -RIG_EIO;
|
|
}
|
|
return RIG_OK;
|
|
#elif defined(HAVE_DEV_PPBUS_PPI_H)
|
|
return RIG_OK;
|
|
#elif defined(WIN32)
|
|
return RIG_OK;
|
|
#else
|
|
return -RIG_ENIMPL;
|
|
#endif
|
|
}
|
|
|
|
#ifndef PARPORT_CONTROL_STROBE
|
|
#define PARPORT_CONTROL_STROBE 0x1
|
|
#endif
|
|
#ifndef PARPORT_CONTROL_INIT
|
|
#define PARPORT_CONTROL_INIT 0x4
|
|
#endif
|
|
|
|
/**
|
|
* \brief Set or unset Push to talk bit on Parallel Port
|
|
* \param p
|
|
* \param pttx RIG_PTT_ON --> Set PTT
|
|
* \return RIG_OK or < 0 error
|
|
*/
|
|
int par_ptt_set(hamlib_port_t *p, ptt_t pttx)
|
|
{
|
|
switch(p->type.ptt) {
|
|
case RIG_PTT_PARALLEL:
|
|
{
|
|
unsigned char ctl;
|
|
int status;
|
|
|
|
par_lock (p);
|
|
status = par_read_control(p, &ctl);
|
|
if (status != RIG_OK)
|
|
return status;
|
|
|
|
/* Enable CW & PTT - /STROBE bit (pin 1) */
|
|
ctl &= ~PARPORT_CONTROL_STROBE;
|
|
|
|
/* TODO: kill parm.parallel.pin? */
|
|
|
|
/* PTT keying - /INIT bit (pin 16) (inverted) */
|
|
if (pttx == RIG_PTT_ON)
|
|
ctl |= PARPORT_CONTROL_INIT;
|
|
else
|
|
ctl &= ~PARPORT_CONTROL_INIT;
|
|
|
|
status = par_write_control(p, ctl);
|
|
par_unlock (p);
|
|
return status;
|
|
}
|
|
default:
|
|
rig_debug(RIG_DEBUG_ERR,"Unsupported PTT type %d\n",
|
|
p->type.ptt);
|
|
return -RIG_EINVAL;
|
|
}
|
|
return RIG_OK;
|
|
}
|
|
|
|
/**
|
|
* \brief Get state of Push to Talk from Parallel Port
|
|
* \param p
|
|
* \param pttx return value (must be non NULL)
|
|
* \return RIG_OK or < 0 error
|
|
*/
|
|
int par_ptt_get(hamlib_port_t *p, ptt_t *pttx)
|
|
{
|
|
switch(p->type.ptt) {
|
|
case RIG_PTT_PARALLEL:
|
|
{
|
|
unsigned char ctl;
|
|
int status;
|
|
|
|
par_lock (p);
|
|
status = par_read_control(p, &ctl);
|
|
par_unlock (p);
|
|
|
|
*pttx = (ctl & PARPORT_CONTROL_INIT) &&
|
|
!(ctl & PARPORT_CONTROL_STROBE) ?
|
|
RIG_PTT_ON : RIG_PTT_OFF;
|
|
return status;
|
|
}
|
|
default:
|
|
rig_debug(RIG_DEBUG_ERR,"Unsupported PTT type %d\n",
|
|
p->type.ptt);
|
|
return -RIG_ENAVAIL;
|
|
}
|
|
return RIG_OK;
|
|
}
|
|
|
|
/**
|
|
* \brief get Data Carrier Detect (squelch) from Parallel Port
|
|
* \param p
|
|
* \param dcdx return value (Must be non NULL)
|
|
* \return RIG_OK or < 0 error
|
|
*/
|
|
int par_dcd_get(hamlib_port_t *p, dcd_t *dcdx)
|
|
{
|
|
switch(p->type.dcd) {
|
|
case RIG_DCD_PARALLEL:
|
|
{
|
|
unsigned char reg;
|
|
int status;
|
|
|
|
status = par_read_data(p, ®);
|
|
*dcdx = reg & (1<<p->parm.parallel.pin) ?
|
|
RIG_DCD_ON:RIG_DCD_OFF;
|
|
return status;
|
|
}
|
|
default:
|
|
rig_debug(RIG_DEBUG_ERR,"Unsupported DCD type %d\n",
|
|
p->type.dcd);
|
|
return -RIG_ENAVAIL;
|
|
}
|
|
return RIG_OK;
|
|
}
|
|
|
|
/** @} */
|