]> sigrok.org Git - libsigrok.git/blobdiff - hardware/common/serial.c
libsigrok: Fix #includes.
[libsigrok.git] / hardware / common / serial.c
index 50a884e95c39cc0750c5cbf4d13b0b37ec608579..80b6f22cd2a37e2be1edae8e1344956343397863 100644 (file)
  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
  */
 
-#include <glob.h>
 #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>
+#endif
 #include <stdlib.h>
 #include <glib.h>
-#include <sigrok.h>
+#include "sigrok.h"
+#include "sigrok-internal.h"
+
+// FIXME: Must be moved, or rather passed as function argument.
+#ifdef _WIN32
+static HANDLE hdl;
+#endif
 
-char *serial_port_glob[] = {
+const char *serial_port_glob[] = {
        /* Linux */
        "/dev/ttyS*",
        "/dev/ttyUSB*",
@@ -42,70 +52,268 @@ char *serial_port_glob[] = {
 
 GSList *list_serial_ports(void)
 {
-       glob_t g;
        GSList *ports;
+
+#ifdef _WIN32
+       /* TODO */
+       ports = NULL;
+       ports = g_slist_append(ports, strdup("COM1"));
+#else
+       glob_t g;
        unsigned int i, j;
 
        ports = NULL;
        for (i = 0; serial_port_glob[i]; i++) {
-               if (!glob(serial_port_glob[i], 0, NULL, &g)) {
-                       for (j = 0; j < g.gl_pathc; j++)
-                               ports = g_slist_append(ports,
-                                                      strdup(g.gl_pathv[j]));
-                       globfree(&g);
-               }
+               if (glob(serial_port_glob[i], 0, NULL, &g))
+                       continue;
+               for (j = 0; j < g.gl_pathc; j++)
+                       ports = g_slist_append(ports, strdup(g.gl_pathv[j]));
+               globfree(&g);
        }
+#endif
 
        return ports;
 }
 
 int serial_open(const char *pathname, int flags)
 {
+#ifdef _WIN32
+       /* FIXME: Don't hardcode COM1. */
+       hdl = CreateFile("COM1", GENERIC_READ | GENERIC_WRITE, 0, 0,
+                        OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, 0);
+       if (hdl == INVALID_HANDLE_VALUE) {
+               /* TODO: Error handling. */
+       }
+       return 0;
+#else
        return open(pathname, flags);
+#endif
 }
 
+/*
+ * Close the serial port.
+ * Returns 0 upon success, -1 upon failure.
+ */
 int serial_close(int fd)
 {
+#ifdef _WIN32
+       /* Returns non-zero upon success, 0 upon failure. */
+       return (CloseHandle(hdl) == 0) ? -1 : 0;
+#else
+       /* Returns 0 upon success, -1 upon failure. */
        return close(fd);
+#endif
+}
+
+/*
+ * Flush serial port buffers (if any).
+ * Returns 0 upon success, -1 upon failure.
+ */
+int serial_flush(int fd)
+{
+#ifdef _WIN32
+       /* Returns non-zero upon success, 0 upon failure. */
+       return (PurgeComm(hdl, PURGE_RXCLEAR | PURGE_TXCLEAR) == 0) ? -1 : 0;
+#else
+       /* Returns 0 upon success, -1 upon failure. */
+       return tcflush(fd, TCIOFLUSH);
+#endif
+}
+
+/*
+ * Write a number of bytes to the specified serial port.
+ * Returns the number of bytes written, or -1 upon failure.
+ */
+int serial_write(int fd, const void *buf, size_t count)
+{
+#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. */
+       return write(fd, buf, count);
+#endif
+}
+
+/*
+ * Read a number of bytes from the specified serial port.
+ * Returns the number of bytes read, or -1 upon failure.
+ */
+int serial_read(int fd, void *buf, size_t count)
+{
+#ifdef _WIN32
+       DWORD tmp = 0;
+
+       /* 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. */
+       return read(fd, buf, count);
+#endif
 }
 
 void *serial_backup_params(int fd)
 {
+#ifdef _WIN32
+       /* TODO */
+#else
        struct termios *term;
 
-       term = malloc(sizeof(struct termios));
+       /* TODO: 'term' is never g_free()'d? */
+       if (!(term = g_try_malloc(sizeof(struct termios)))) {
+               sr_err("serial: %s: term malloc failed", __func__);
+               return NULL;
+       }
+
        tcgetattr(fd, term);
 
        return term;
+#endif
 }
 
 void serial_restore_params(int fd, void *backup)
 {
+#ifdef _WIN32
+       /* TODO */
+#else
        tcsetattr(fd, TCSADRAIN, (struct termios *)backup);
+#endif
 }
 
-/* flowcontrol 1 = rts/cts  2 = xon/xoff */
+/*
+ * Set serial parameters.
+ *
+ * flowcontrol: 1 = rts/cts, 2 = xon/xoff
+ * parity: 0 = none, 1 = even, 2 = odd
+ */
 int serial_set_params(int fd, int speed, int bits, int parity, int stopbits,
                      int flowcontrol)
 {
+#ifdef _WIN32
+       DCB dcb;
+
+       if (!GetCommState(hdl, &dcb)) {
+               /* TODO: Error handling. */
+               return SR_ERR;
+       }
+
+       /* TODO: Rename 'speed' to 'baudrate'. */
+       switch(speed) {
+       /* TODO: Support for higher baud rates. */
+       case 115200:
+               dcb.BaudRate = CBR_115200;
+               break;
+       case 57600:
+               dcb.BaudRate = CBR_57600;
+               break;
+       case 38400:
+               dcb.BaudRate = CBR_38400;
+               break;
+       case 19200:
+               dcb.BaudRate = CBR_19200;
+               break;
+       case 9600:
+               dcb.BaudRate = CBR_9600;
+               break;
+       default:
+               /* TODO: Error handling. */
+               break;
+       }
+       dcb.ByteSize = bits;
+       dcb.Parity = NOPARITY; /* TODO: Don't hardcode. */
+       dcb.StopBits = ONESTOPBIT; /* TODO: Don't hardcode. */
+
+       if (!SetCommState(hdl, &dcb)) {
+               /* TODO: Error handling. */
+               return SR_ERR;
+       }
+#else
        struct termios term;
+       speed_t baud;
 
-       /* Only supporting what we need really, currently the OLS driver. */
-       if (speed != 115200 || bits != 8 || parity != 0 || stopbits != 1
-           || flowcontrol != 2)
-               return SIGROK_ERR;
+       switch (speed) {
+       case 9600:
+               baud = B9600;
+               break;
+       case 38400:
+               baud = B38400;
+               break;
+       case 57600:
+               baud = B57600;
+               break;
+       case 115200:
+               baud = B115200;
+               break;
+#ifndef __APPLE__
+       case 460800:
+               baud = B460800;
+               break;
+#endif
+       default:
+               return SR_ERR;
+       }
 
        if (tcgetattr(fd, &term) < 0)
-               return SIGROK_ERR;
-       if (cfsetispeed(&term, B115200) < 0)
-               return SIGROK_ERR;
+               return SR_ERR;
+       if (cfsetispeed(&term, baud) < 0)
+               return SR_ERR;
+
        term.c_cflag &= ~CSIZE;
-       term.c_cflag |= CS8;
+       switch (bits) {
+       case 8:
+               term.c_cflag |= CS8;
+               break;
+       case 7:
+               term.c_cflag |= CS7;
+               break;
+       default:
+               return SR_ERR;
+       }
+
        term.c_cflag &= ~CSTOPB;
-       term.c_cflag |= IXON | IXOFF;
-       term.c_iflag |= IGNPAR;
+       switch (stopbits) {
+       case 1:
+               break;
+       case 2:
+               term.c_cflag |= CSTOPB;
+       default:
+               return SR_ERR;
+       }
+
+       term.c_cflag &= ~(IXON | IXOFF | CRTSCTS);
+       switch (flowcontrol) {
+       case 2:
+               term.c_cflag |= IXON | IXOFF;
+               break;
+       case 1:
+               term.c_cflag |= CRTSCTS;
+       default:
+               return SR_ERR;
+       }
+
+       term.c_iflag &= ~IGNPAR;
+       term.c_cflag &= ~(PARODD | PARENB);
+       switch (parity) {
+       case 0:
+               term.c_iflag |= IGNPAR;
+               break;
+       case 1:
+               term.c_cflag |= PARENB;
+               break;
+       case 2:
+               term.c_cflag |= PARENB | PARODD;
+               break;
+       default:
+               return SR_ERR;
+       }
+
        if (tcsetattr(fd, TCSADRAIN, &term) < 0)
-               return SIGROK_ERR;
+               return SR_ERR;
+#endif
 
-       return SIGROK_OK;
+       return SR_OK;
 }