]> sigrok.org Git - libsigrok.git/blobdiff - hardware/common/serial.c
Update for renamed libserialport header file.
[libsigrok.git] / hardware / common / serial.c
index 6cf43f987f6bdec63d9d4f86824f5f95d955c88e..841b011ec98201aa96f75c550b3a8a2d25d753fb 100644 (file)
@@ -1,5 +1,5 @@
 /*
- * This file is part of the sigrok project.
+ * This file is part of the libsigrok project.
  *
  * Copyright (C) 2010-2012 Bert Vermeulen <bert@biot.com>
  * Copyright (C) 2010-2012 Uwe Hermann <uwe@hermann-uwe.de>
  */
 
 #include <string.h>
-#include <sys/types.h>
-#include <sys/stat.h>
-#include <fcntl.h>
-#include <unistd.h>
-#ifdef _WIN32
-#include <windows.h>
-#else
-#include <glob.h>
-#include <termios.h>
-#include <sys/ioctl.h>
-#endif
 #include <stdlib.h>
-#include <errno.h>
 #include <glib.h>
+#include <libserialport.h>
 #include "libsigrok.h"
 #include "libsigrok-internal.h"
 
-/* Message logging helpers with driver-specific prefix string. */
-#define DRIVER_LOG_DOMAIN "serial: "
-#define sr_log(l, s, args...) sr_log(l, DRIVER_LOG_DOMAIN s, ## args)
-#define sr_spew(s, args...) sr_spew(DRIVER_LOG_DOMAIN s, ## args)
-#define sr_dbg(s, args...) sr_dbg(DRIVER_LOG_DOMAIN s, ## args)
-#define sr_info(s, args...) sr_info(DRIVER_LOG_DOMAIN s, ## args)
-#define sr_warn(s, args...) sr_warn(DRIVER_LOG_DOMAIN s, ## args)
-#define sr_err(s, args...) sr_err(DRIVER_LOG_DOMAIN s, ## args)
-
-// FIXME: Must be moved, or rather passed as function argument.
-#ifdef _WIN32
-static HANDLE hdl;
-#endif
+/* Message logging helpers with subsystem-specific prefix string. */
+#define LOG_PREFIX "serial: "
+#define sr_log(l, s, args...) sr_log(l, LOG_PREFIX s, ## args)
+#define sr_spew(s, args...) sr_spew(LOG_PREFIX s, ## args)
+#define sr_dbg(s, args...) sr_dbg(LOG_PREFIX s, ## args)
+#define sr_info(s, args...) sr_info(LOG_PREFIX s, ## args)
+#define sr_warn(s, args...) sr_warn(LOG_PREFIX s, ## args)
+#define sr_err(s, args...) sr_err(LOG_PREFIX s, ## args)
 
 /**
  * Open the specified serial port.
@@ -65,10 +49,8 @@ static HANDLE hdl;
  */
 SR_PRIV int serial_open(struct sr_serial_dev_inst *serial, int flags)
 {
-       int flags_local = 0;
-#ifdef _WIN32
-       DWORD desired_access = 0, flags_and_attributes = 0;
-#endif
+       int ret;
+       char *error;
 
        if (!serial) {
                sr_dbg("Invalid serial port.");
@@ -77,37 +59,24 @@ SR_PRIV int serial_open(struct sr_serial_dev_inst *serial, int flags)
 
        sr_spew("Opening serial port '%s' (flags %d).", serial->port, flags);
 
-#ifdef _WIN32
-       /* Map 'flags' to the OS-specific settings. */
-       desired_access |= GENERIC_READ;
-       flags_and_attributes = FILE_ATTRIBUTE_NORMAL;
-       if (flags & SERIAL_RDWR)
-               desired_access |= GENERIC_WRITE;
-       if (flags & SERIAL_NONBLOCK)
-               flags_and_attributes |= FILE_FLAG_OVERLAPPED;
-
-       hdl = CreateFile(serial->port, desired_access, 0, 0,
-                        OPEN_EXISTING, flags_and_attributes, 0);
-       if (hdl == INVALID_HANDLE_VALUE) {
-               sr_err("Error opening serial port '%s'.", serial->port);
-               return SR_ERR;
-       }
-#else
-       /* Map 'flags' to the OS-specific settings. */
-       if (flags & SERIAL_RDWR)
-               flags_local |= O_RDWR;
-       if (flags & SERIAL_RDONLY)
-               flags_local |= O_RDONLY;
-       if (flags & SERIAL_NONBLOCK)
-               flags_local |= O_NONBLOCK;
-
-       if ((serial->fd = open(serial->port, flags_local)) < 0) {
-               sr_err("Error opening serial port '%s': %s.", serial->port,
-                      strerror(errno));
-               return SR_ERR;
+       sp_get_port_by_name(serial->port, &serial->data);
+
+       ret = sp_open(serial->data, flags);
+
+       switch (ret)
+       {
+               case SP_ERR_ARG:
+                       sr_err("Attempt to open serial port with invalid parameters.");
+                       return SR_ERR_ARG;
+               case SP_ERR_FAIL:
+                       error = sp_last_error_message();
+                       sr_err("Error opening port: %s.", error);
+                       sp_free_error_message(error);
+                       return SR_ERR;
        }
 
-       sr_spew("Opened serial port '%s' (fd %d).", serial->port, serial->fd);
+#ifndef _WIN32
+       serial->fd = serial->data->fd;
 #endif
 
        if (serial->serialcomm)
@@ -126,6 +95,7 @@ SR_PRIV int serial_open(struct sr_serial_dev_inst *serial, int flags)
 SR_PRIV int serial_close(struct sr_serial_dev_inst *serial)
 {
        int ret;
+       char *error;
 
        if (!serial) {
                sr_dbg("Invalid serial port.");
@@ -141,18 +111,19 @@ SR_PRIV int serial_close(struct sr_serial_dev_inst *serial)
        sr_spew("Closing serial port %s (fd %d).", serial->port, serial->fd);
        ret = SR_OK;
 
-#ifdef _WIN32
-       /* Returns non-zero upon success, 0 upon failure. */
-       if (CloseHandle(hdl) == 0)
-               ret = SR_ERR;
-#else
-       /* Returns 0 upon success, -1 upon failure. */
-       if (close(serial->fd) < 0) {
-               sr_err("Error closing serial port: %s (fd %d).", strerror(errno),
-                               serial->fd);
-               ret = SR_ERR;
+       ret = sp_close(serial->data);
+
+       switch (ret)
+       {
+               case SP_ERR_ARG:
+                       sr_err("Attempt to close an invalid serial port.");
+                       return SR_ERR_ARG;
+               case SP_ERR_FAIL:
+                       error = sp_last_error_message();
+                       sr_err("Error closing port: %s.", error);
+                       sp_free_error_message(error);
+                       return SR_ERR;
        }
-#endif
 
        serial->fd = -1;
 
@@ -169,6 +140,7 @@ SR_PRIV int serial_close(struct sr_serial_dev_inst *serial)
 SR_PRIV int serial_flush(struct sr_serial_dev_inst *serial)
 {
        int ret;
+       char *error;
 
        if (!serial) {
                sr_dbg("Invalid serial port.");
@@ -182,23 +154,22 @@ SR_PRIV int serial_flush(struct sr_serial_dev_inst *serial)
        }
 
        sr_spew("Flushing serial port %s (fd %d).", serial->port, serial->fd);
-       ret = SR_OK;
 
-#ifdef _WIN32
-       /* Returns non-zero upon success, 0 upon failure. */
-       if (PurgeComm(hdl, PURGE_RXCLEAR | PURGE_TXCLEAR) == 0) {
-               sr_err("Error flushing serial port: %s.", strerror(errno));
-               ret = SR_ERR;
-       }
-#else
-       /* Returns 0 upon success, -1 upon failure. */
-       if (tcflush(serial->fd, TCIOFLUSH) < 0) {
-               sr_err("Error flushing serial port: %s.", strerror(errno));
-               ret = SR_ERR;
+       ret = sp_flush(serial->data);
+
+       switch (ret)
+       {
+               case SP_ERR_ARG:
+                       sr_err("Attempt to flush an invalid serial port.");
+                       return SR_ERR_ARG;
+               case SP_ERR_FAIL:
+                       error = sp_last_error_message();
+                       sr_err("Error flushing port: %s.", error);
+                       sp_free_error_message(error);
+                       return SR_ERR;
        }
 
        return ret;
-#endif
 }
 
 /**
@@ -214,6 +185,7 @@ SR_PRIV int serial_write(struct sr_serial_dev_inst *serial,
                const void *buf, size_t count)
 {
        ssize_t ret;
+       char *error;
 
        if (!serial) {
                sr_dbg("Invalid serial port.");
@@ -226,20 +198,21 @@ SR_PRIV int serial_write(struct sr_serial_dev_inst *serial,
                return -1;
        }
 
-#ifdef _WIN32
-       DWORD tmp = 0;
-
-       /* FIXME */
-       /* Returns non-zero upon success, 0 upon failure. */
-       WriteFile(hdl, buf, count, &tmp, NULL);
-#else
-       /* Returns the number of bytes written, or -1 upon failure. */
-       ret = write(serial->fd, buf, count);
-       if (ret < 0)
-               sr_err("Write error: %s.", strerror(errno));
-       else
-               sr_spew("Wrote %d/%d bytes (fd %d).", ret, count, serial->fd);
-#endif
+       ret = sp_write(serial->data, buf, count);
+
+       switch (ret)
+       {
+               case SP_ERR_ARG:
+                       sr_err("Attempted serial port write with invalid arguments.");
+                       return SR_ERR_ARG;
+               case SP_ERR_FAIL:
+                       error = sp_last_error_message();
+                       sr_err("Write error: %s.", error);
+                       sp_free_error_message(error);
+                       return SR_ERR;
+       }
+
+       sr_spew("Wrote %d/%d bytes (fd %d).", ret, count, serial->fd);
 
        return ret;
 }
@@ -257,6 +230,7 @@ SR_PRIV int serial_read(struct sr_serial_dev_inst *serial, void *buf,
                size_t count)
 {
        ssize_t ret;
+       char *error;
 
        if (!serial) {
                sr_dbg("Invalid serial port.");
@@ -269,16 +243,21 @@ SR_PRIV int serial_read(struct sr_serial_dev_inst *serial, void *buf,
                return -1;
        }
 
-#ifdef _WIN32
-       DWORD tmp = 0;
+       ret = sp_read(serial->data, buf, count);
 
-       /* FIXME */
-       /* Returns non-zero upon success, 0 upon failure. */
-       return ReadFile(hdl, buf, count, &tmp, NULL);
-#else
-       /* Returns the number of bytes read, or -1 upon failure. */
-       ret = read(serial->fd, buf, count);
-#endif
+       switch (ret)
+       {
+               case SP_ERR_ARG:
+                       sr_err("Attempted serial port read with invalid arguments.");
+                       return SR_ERR_ARG;
+               case SP_ERR_FAIL:
+                       error = sp_last_error_message();
+                       sr_err("Read error: %s.", error);
+                       sp_free_error_message(error);
+                       return SR_ERR;
+       }
+
+       sr_spew("Read %d/%d bytes (fd %d).", ret, count, serial->fd);
 
        return ret;
 }
@@ -300,6 +279,9 @@ SR_PRIV int serial_set_params(struct sr_serial_dev_inst *serial, int baudrate,
                              int bits, int parity, int stopbits,
                              int flowcontrol, int rts, int dtr)
 {
+       int ret;
+       char *error;
+
        if (!serial) {
                sr_dbg("Invalid serial port.");
                return SR_ERR;
@@ -314,315 +296,21 @@ SR_PRIV int serial_set_params(struct sr_serial_dev_inst *serial, int baudrate,
        sr_spew("Setting serial parameters on port %s (fd %d).", serial->port,
                serial->fd);
 
-#ifdef _WIN32
-       DCB dcb;
-
-       if (!GetCommState(hdl, &dcb)) {
-               sr_err("Failed to get comm state on port %s (fd %d): %d.",
-                      serial->port, serial->fd, GetLastError());
-               return SR_ERR;
-       }
-
-       switch (baudrate) {
-       /*
-        * The baudrates 50/75/134/150/200/1800/230400/460800 do not seem to
-        * have documented CBR_* macros.
-        */
-       case 110:
-               dcb.BaudRate = CBR_110;
-               break;
-       case 300:
-               dcb.BaudRate = CBR_300;
-               break;
-       case 600:
-               dcb.BaudRate = CBR_600;
-               break;
-       case 1200:
-               dcb.BaudRate = CBR_1200;
-               break;
-       case 2400:
-               dcb.BaudRate = CBR_2400;
-               break;
-       case 4800:
-               dcb.BaudRate = CBR_4800;
-               break;
-       case 9600:
-               dcb.BaudRate = CBR_9600;
-               break;
-       case 14400:
-               dcb.BaudRate = CBR_14400; /* Not available on Unix? */
-               break;
-       case 19200:
-               dcb.BaudRate = CBR_19200;
-               break;
-       case 38400:
-               dcb.BaudRate = CBR_38400;
-               break;
-       case 57600:
-               dcb.BaudRate = CBR_57600;
-               break;
-       case 115200:
-               dcb.BaudRate = CBR_115200;
-               break;
-       case 128000:
-               dcb.BaudRate = CBR_128000; /* Not available on Unix? */
-               break;
-       case 256000:
-               dcb.BaudRate = CBR_256000; /* Not available on Unix? */
-               break;
-       default:
-               sr_err("Unsupported baudrate: %d.", baudrate);
-               return SR_ERR;
-       }
-       sr_spew("Configuring baudrate to %d (%d).", baudrate, dcb.BaudRate);
-
-       sr_spew("Configuring %d data bits.", bits);
-       dcb.ByteSize = bits;
-
-       sr_spew("Configuring %d stop bits.", stopbits);
-       switch (stopbits) {
-       /* Note: There's also ONE5STOPBITS == 1.5 (unneeded so far). */
-       case 1:
-               dcb.StopBits = ONESTOPBIT;
-               break;
-       case 2:
-               dcb.StopBits = TWOSTOPBITS;
-               break;
-       default:
-               sr_err("Unsupported stopbits number: %d.", stopbits);
-               return SR_ERR;
-       }
-
-       switch (parity) {
-       /* Note: There's also SPACEPARITY, MARKPARITY (unneeded so far). */
-       case SERIAL_PARITY_NONE:
-               sr_spew("Configuring no parity.");
-               dcb.Parity = NOPARITY;
-               break;
-       case SERIAL_PARITY_EVEN:
-               sr_spew("Configuring even parity.");
-               dcb.Parity = EVENPARITY;
-               break;
-       case SERIAL_PARITY_ODD:
-               sr_spew("Configuring odd parity.");
-               dcb.Parity = ODDPARITY;
-               break;
-       default:
-               sr_err("Unsupported parity setting: %d.", parity);
-               return SR_ERR;
-       }
-
-       if (rts != -1) {
-               sr_spew("Setting RTS %s.", rts ? "high" : "low");
-               if (rts)
-                       dcb.fRtsControl = RTS_CONTROL_ENABLE;
-               else
-                       dcb.fRtsControl = RTS_CONTROL_DISABLE;
-       }
-
-       if (dtr != -1) {
-               sr_spew("Setting DTR %s.", dtr ? "high" : "low");
-               if (rts)
-                       dcb.fDtrControl = DTR_CONTROL_ENABLE;
-               else
-                       dcb.fDtrControl = DTR_CONTROL_DISABLE;
-       }
-
-       if (!SetCommState(hdl, &dcb)) {
-               sr_err("Failed to set comm state on port %s (fd %d): %d.",
-                      serial->port, serial->fd, GetLastError());
-               return SR_ERR;
-       }
-#else
-       struct termios term;
-       speed_t baud;
-       int ret, controlbits;
-
-       if (tcgetattr(serial->fd, &term) < 0) {
-               sr_err("tcgetattr() error on port %s (fd %d): %s.",
-                               serial->port, serial->fd, strerror(errno));
-               return SR_ERR;
-       }
-
-       switch (baudrate) {
-       case 50:
-               baud = B50;
-               break;
-       case 75:
-               baud = B75;
-               break;
-       case 110:
-               baud = B110;
-               break;
-       case 134:
-               baud = B134;
-               break;
-       case 150:
-               baud = B150;
-               break;
-       case 200:
-               baud = B200;
-               break;
-       case 300:
-               baud = B300;
-               break;
-       case 600:
-               baud = B600;
-               break;
-       case 1200:
-               baud = B1200;
-               break;
-       case 1800:
-               baud = B1800;
-               break;
-       case 2400:
-               baud = B2400;
-               break;
-       case 4800:
-               baud = B4800;
-               break;
-       case 9600:
-               baud = B9600;
-               break;
-       case 19200:
-               baud = B19200;
-               break;
-       case 38400:
-               baud = B38400;
-               break;
-       case 57600:
-               baud = B57600;
-               break;
-       case 115200:
-               baud = B115200;
-               break;
-       case 230400:
-               baud = B230400;
-               break;
-#ifndef __APPLE__
-       case 460800:
-               baud = B460800;
-               break;
-#endif
-       default:
-               sr_err("Unsupported baudrate: %d.", baudrate);
-               return SR_ERR;
-       }
-
-       sr_spew("Configuring output baudrate to %d (%d).", baudrate, baud);
-       if (cfsetospeed(&term, baud) < 0) {
-               sr_err("cfsetospeed() error: %s.", strerror(errno));
-               return SR_ERR;
-       }
-
-       sr_spew("Configuring input baudrate to %d (%d).", baudrate, baud);
-       if (cfsetispeed(&term, baud) < 0) {
-               sr_err("cfsetispeed() error: %s.", strerror(errno));
-               return SR_ERR;
-       }
-
-       sr_spew("Configuring %d data bits.", bits);
-       term.c_cflag &= ~CSIZE;
-       switch (bits) {
-       case 8:
-               term.c_cflag |= CS8;
-               break;
-       case 7:
-               term.c_cflag |= CS7;
-               break;
-       default:
-               sr_err("Unsupported data bits number %d.", bits);
-               return SR_ERR;
-       }
-
-       sr_spew("Configuring %d stop bits.", stopbits);
-       term.c_cflag &= ~CSTOPB;
-       switch (stopbits) {
-       case 1:
-               term.c_cflag &= ~CSTOPB;
-               break;
-       case 2:
-               term.c_cflag |= CSTOPB;
-               break;
-       default:
-               sr_err("Unsupported stopbits number %d.", stopbits);
-               return SR_ERR;
-       }
-
-       term.c_iflag &= ~(IXON | IXOFF);
-       term.c_cflag &= ~CRTSCTS;
-       switch (flowcontrol) {
-       case 0:
-               /* No flow control. */
-               sr_spew("Configuring no flow control.");
-               break;
-       case 1:
-               sr_spew("Configuring RTS/CTS flow control.");
-               term.c_cflag |= CRTSCTS;
-               break;
-       case 2:
-               sr_spew("Configuring XON/XOFF flow control.");
-               term.c_iflag |= IXON | IXOFF;
-               break;
-       default:
-               sr_err("Unsupported flow control setting %d.", flowcontrol);
-               return SR_ERR;
-       }
-
-       term.c_iflag &= ~IGNPAR;
-       term.c_cflag &= ~(PARODD | PARENB);
-       switch (parity) {
-       case SERIAL_PARITY_NONE:
-               sr_spew("Configuring no parity.");
-               term.c_iflag |= IGNPAR;
-               break;
-       case SERIAL_PARITY_EVEN:
-               sr_spew("Configuring even parity.");
-               term.c_cflag |= PARENB;
-               break;
-       case SERIAL_PARITY_ODD:
-               sr_spew("Configuring odd parity.");
-               term.c_cflag |= PARENB | PARODD;
-               break;
-       default:
-               sr_err("Unsupported parity setting %d.", parity);
-               return SR_ERR;
-       }
-
-       /* Do not translate carriage return to newline on input. */
-       term.c_iflag &= ~(ICRNL);
-
-       /* Disable canonical mode, and don't echo input characters. */
-       term.c_lflag &= ~(ICANON | ECHO);
-
-       /* Write the configured settings. */
-       if (tcsetattr(serial->fd, TCSADRAIN, &term) < 0) {
-               sr_err("tcsetattr() error: %s.", strerror(errno));
-               return SR_ERR;
-       }
-
-       if (rts != -1) {
-               sr_spew("Setting RTS %s.", rts ? "high" : "low");
-               controlbits = TIOCM_RTS;
-               if ((ret = ioctl(serial->fd, rts ? TIOCMBIS : TIOCMBIC,
-                               &controlbits)) < 0) {
-                       sr_err("Error setting RTS: %s.", strerror(errno));
-                       return SR_ERR;
-               }
-       }
-
-       if (dtr != -1) {
-               sr_spew("Setting DTR %s.", dtr ? "high" : "low");
-               controlbits = TIOCM_DTR;
-               if ((ret = ioctl(serial->fd, dtr ? TIOCMBIS : TIOCMBIC,
-                               &controlbits)) < 0) {
-                       sr_err("Error setting DTR: %s.", strerror(errno));
+       ret = sp_set_params(serial->data, baudrate, bits, parity, stopbits,
+                       flowcontrol, rts, dtr);
+
+       switch (ret)
+       {
+               case SP_ERR_ARG:
+                       sr_err("Invalid arguments for setting serial port parameters.");
+                       return SR_ERR_ARG;
+               case SP_ERR_FAIL:
+                       error = sp_last_error_message();
+                       sr_err("Error setting serial port parameters: %s.", error);
+                       sp_free_error_message(error);
                        return SR_ERR;
-               }
        }
 
-#endif
-
        return SR_OK;
 }
 
@@ -631,8 +319,8 @@ SR_PRIV int serial_set_params(struct sr_serial_dev_inst *serial, int baudrate,
  *
  * @param serial Previously initialized serial port structure.
  * @param paramstr A serial communication parameters string, in the form
- * of <speed>/<data bits><parity><stopbits>, for example "9600/8n1" or
- * "600/7o2".
+ * of <speed>/<data bits><parity><stopbits><flow>, for example "9600/8n1" or
+ * "600/7o2" or "460800/8n1/flow=2" where flow is 0 for none, 1 for rts/cts and 2 for xon/xoff.
  *
  * @return SR_OK upon success, SR_ERR upon failure.
  */
@@ -642,10 +330,10 @@ SR_PRIV int serial_set_paramstr(struct sr_serial_dev_inst *serial,
 {
        GRegex *reg;
        GMatchInfo *match;
-       int speed, databits, parity, stopbits, rts, dtr, i;
+       int speed, databits, parity, stopbits, flow, rts, dtr, i;
        char *mstr, **opts, **kv;
 
-       speed = databits = parity = stopbits = 0;
+       speed = databits = parity = stopbits = flow = 0;
        rts = dtr = -1;
        sr_spew("Parsing parameters from \"%s\".", paramstr);
        reg = g_regex_new(SERIAL_COMM_SPEC, 0, 0, NULL);
@@ -700,6 +388,17 @@ SR_PRIV int serial_set_paramstr(struct sr_serial_dev_inst *serial,
                                                        sr_dbg("invalid value for dtr: %c", kv[1][0]);
                                                        speed = 0;
                                                }
+                                       } else if (!strncmp(kv[0], "flow", 4)) {
+                                               if (kv[1][0] == '0')
+                                                       flow = 0;
+                                               else if (kv[1][0] == '1')
+                                                       flow = 1;
+                                               else if (kv[1][0] == '2')
+                                                       flow = 2;
+                                               else {
+                                                       sr_dbg("invalid value for flow: %c", kv[1][0]);
+                                                       speed = 0;
+                                               }
                                        }
                                        g_strfreev(kv);
                                }
@@ -713,7 +412,7 @@ SR_PRIV int serial_set_paramstr(struct sr_serial_dev_inst *serial,
 
        if (speed) {
                return serial_set_params(serial, speed, databits, parity,
-                                        stopbits, 0, rts, dtr);
+                                        stopbits, flow, rts, dtr);
        } else {
                sr_dbg("Could not infer speed from parameter string.");
                return SR_ERR_ARG;
@@ -772,7 +471,8 @@ SR_PRIV int serial_readline(struct sr_serial_dev_inst *serial, char **buf,
                if (g_get_monotonic_time() - start > timeout_ms)
                        /* Timeout */
                        break;
-               g_usleep(2000);
+               if (len < 1)
+                       g_usleep(2000);
        }
        if (*buflen)
                sr_dbg("Received %d: '%s'.", *buflen, *buf);
@@ -853,7 +553,8 @@ SR_PRIV int serial_stream_detect(struct sr_serial_dev_inst *serial,
                        sr_dbg("Detection timed out after %dms.", time);
                        break;
                }
-               g_usleep(byte_delay_us);
+               if (len < 1)
+                       g_usleep(byte_delay_us);
        }
 
        *buflen = ibuf;