|
- /***************************************************************************
- * Copyright (C) 2011 by Richard Uhler *
- * ruhler@mit.edu *
- * *
- * This program is free software; you can redistribute it and/or modify *
- * it under the terms of the GNU 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 General Public License for more details. *
- * *
- * You should have received a copy of the GNU General Public License *
- * along with this program; if not, write to the *
- * Free Software Foundation, Inc., *
- * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA. *
- ***************************************************************************/
-
- #ifdef HAVE_CONFIG_H
- #include "config.h"
- #endif
-
- #ifndef _WIN32
- #include <sys/un.h>
- #include <netdb.h>
- #endif
- #include <jtag/interface.h>
- #include "bitbang.h"
-
- /* arbitrary limit on host name length: */
- #define REMOTE_BITBANG_HOST_MAX 255
-
- #define REMOTE_BITBANG_RAISE_ERROR(expr ...) \
- do { \
- LOG_ERROR(expr); \
- LOG_ERROR("Terminating openocd."); \
- exit(-1); \
- } while (0)
-
- static char *remote_bitbang_host;
- static char *remote_bitbang_port;
-
- FILE *remote_bitbang_in;
- FILE *remote_bitbang_out;
-
- static void remote_bitbang_putc(int c)
- {
- if (EOF == fputc(c, remote_bitbang_out))
- REMOTE_BITBANG_RAISE_ERROR("remote_bitbang_putc: %s", strerror(errno));
- }
-
- static int remote_bitbang_quit(void)
- {
- if (EOF == fputc('Q', remote_bitbang_out)) {
- LOG_ERROR("fputs: %s", strerror(errno));
- return ERROR_FAIL;
- }
-
- if (EOF == fflush(remote_bitbang_out)) {
- LOG_ERROR("fflush: %s", strerror(errno));
- return ERROR_FAIL;
- }
-
- /* We only need to close one of the FILE*s, because they both use the same */
- /* underlying file descriptor. */
- if (EOF == fclose(remote_bitbang_out)) {
- LOG_ERROR("fclose: %s", strerror(errno));
- return ERROR_FAIL;
- }
-
- free(remote_bitbang_host);
- free(remote_bitbang_port);
-
- LOG_INFO("remote_bitbang interface quit");
- return ERROR_OK;
- }
-
- /* Get the next read response. */
- static int remote_bitbang_rread(void)
- {
- if (EOF == fflush(remote_bitbang_out)) {
- remote_bitbang_quit();
- REMOTE_BITBANG_RAISE_ERROR("fflush: %s", strerror(errno));
- }
-
- int c = fgetc(remote_bitbang_in);
- switch (c) {
- case '0':
- return 0;
- case '1':
- return 1;
- default:
- remote_bitbang_quit();
- REMOTE_BITBANG_RAISE_ERROR(
- "remote_bitbang: invalid read response: %c(%i)", c, c);
- }
- }
-
- static int remote_bitbang_read(void)
- {
- remote_bitbang_putc('R');
- return remote_bitbang_rread();
- }
-
- static void remote_bitbang_write(int tck, int tms, int tdi)
- {
- char c = '0' + ((tck ? 0x4 : 0x0) | (tms ? 0x2 : 0x0) | (tdi ? 0x1 : 0x0));
- remote_bitbang_putc(c);
- }
-
- static void remote_bitbang_reset(int trst, int srst)
- {
- char c = 'r' + ((trst ? 0x2 : 0x0) | (srst ? 0x1 : 0x0));
- remote_bitbang_putc(c);
- }
-
- static void remote_bitbang_blink(int on)
- {
- char c = on ? 'B' : 'b';
- remote_bitbang_putc(c);
- }
-
- static struct bitbang_interface remote_bitbang_bitbang = {
- .read = &remote_bitbang_read,
- .write = &remote_bitbang_write,
- .reset = &remote_bitbang_reset,
- .blink = &remote_bitbang_blink,
- };
-
- static int remote_bitbang_init_tcp(void)
- {
- struct addrinfo hints = { .ai_family = AF_UNSPEC, .ai_socktype = SOCK_STREAM };
- struct addrinfo *result, *rp;
- int fd;
-
- LOG_INFO("Connecting to %s:%s",
- remote_bitbang_host ? remote_bitbang_host : "localhost",
- remote_bitbang_port);
-
- /* Obtain address(es) matching host/port */
- int s = getaddrinfo(remote_bitbang_host, remote_bitbang_port, &hints, &result);
- if (s != 0) {
- LOG_ERROR("getaddrinfo: %s\n", gai_strerror(s));
- return ERROR_FAIL;
- }
-
- /* getaddrinfo() returns a list of address structures.
- Try each address until we successfully connect(2).
- If socket(2) (or connect(2)) fails, we (close the socket
- and) try the next address. */
-
- for (rp = result; rp != NULL ; rp = rp->ai_next) {
- fd = socket(rp->ai_family, rp->ai_socktype, rp->ai_protocol);
- if (fd == -1)
- continue;
-
- if (connect(fd, rp->ai_addr, rp->ai_addrlen) != -1)
- break; /* Success */
-
- close(fd);
- }
-
- freeaddrinfo(result); /* No longer needed */
-
- if (rp == NULL) { /* No address succeeded */
- LOG_ERROR("Failed to connect: %s", strerror(errno));
- return ERROR_FAIL;
- }
-
- return fd;
- }
-
- static int remote_bitbang_init_unix(void)
- {
- if (remote_bitbang_host == NULL) {
- LOG_ERROR("host/socket not specified");
- return ERROR_FAIL;
- }
-
- LOG_INFO("Connecting to unix socket %s", remote_bitbang_host);
- int fd = socket(PF_UNIX, SOCK_STREAM, 0);
- if (fd < 0) {
- LOG_ERROR("socket: %s", strerror(errno));
- return ERROR_FAIL;
- }
-
- struct sockaddr_un addr;
- addr.sun_family = AF_UNIX;
- strncpy(addr.sun_path, remote_bitbang_host, sizeof(addr.sun_path));
- addr.sun_path[sizeof(addr.sun_path)-1] = '\0';
-
- if (connect(fd, (struct sockaddr *)&addr, sizeof(struct sockaddr_un)) < 0) {
- LOG_ERROR("connect: %s", strerror(errno));
- return ERROR_FAIL;
- }
-
- return fd;
- }
-
- static int remote_bitbang_init(void)
- {
- int fd;
- bitbang_interface = &remote_bitbang_bitbang;
-
- LOG_INFO("Initializing remote_bitbang driver");
- if (remote_bitbang_port == NULL)
- fd = remote_bitbang_init_unix();
- else
- fd = remote_bitbang_init_tcp();
-
- if (fd < 0)
- return fd;
-
- remote_bitbang_in = fdopen(fd, "r");
- if (remote_bitbang_in == NULL) {
- LOG_ERROR("fdopen: failed to open read stream");
- close(fd);
- return ERROR_FAIL;
- }
-
- remote_bitbang_out = fdopen(fd, "w");
- if (remote_bitbang_out == NULL) {
- LOG_ERROR("fdopen: failed to open write stream");
- fclose(remote_bitbang_in);
- return ERROR_FAIL;
- }
-
- LOG_INFO("remote_bitbang driver initialized");
- return ERROR_OK;
- }
-
- COMMAND_HANDLER(remote_bitbang_handle_remote_bitbang_port_command)
- {
- if (CMD_ARGC == 1) {
- uint16_t port;
- COMMAND_PARSE_NUMBER(u16, CMD_ARGV[0], port);
- free(remote_bitbang_port);
- remote_bitbang_port = port == 0 ? NULL : strdup(CMD_ARGV[0]);
- return ERROR_OK;
- }
- return ERROR_COMMAND_SYNTAX_ERROR;
- }
-
- COMMAND_HANDLER(remote_bitbang_handle_remote_bitbang_host_command)
- {
- if (CMD_ARGC == 1) {
- free(remote_bitbang_host);
- remote_bitbang_host = strdup(CMD_ARGV[0]);
- return ERROR_OK;
- }
- return ERROR_COMMAND_SYNTAX_ERROR;
- }
-
- static const struct command_registration remote_bitbang_command_handlers[] = {
- {
- .name = "remote_bitbang_port",
- .handler = remote_bitbang_handle_remote_bitbang_port_command,
- .mode = COMMAND_CONFIG,
- .help = "Set the port to use to connect to the remote jtag.\n"
- " if 0 or unset, use unix sockets to connect to the remote jtag.",
- .usage = "port_number",
- },
- {
- .name = "remote_bitbang_host",
- .handler = remote_bitbang_handle_remote_bitbang_host_command,
- .mode = COMMAND_CONFIG,
- .help = "Set the host to use to connect to the remote jtag.\n"
- " if port is 0 or unset, this is the name of the unix socket to use.",
- .usage = "host_name",
- },
- COMMAND_REGISTRATION_DONE,
- };
-
- struct jtag_interface remote_bitbang_interface = {
- .name = "remote_bitbang",
- .execute_queue = &bitbang_execute_queue,
- .commands = remote_bitbang_command_handlers,
- .init = &remote_bitbang_init,
- .quit = &remote_bitbang_quit,
- };
|