- add ability for openocd to communicate to gdb using pipes (stdin/stdout).
[fw/openocd] / src / helper / log.c
index f8dc1a3a199f95cca7f1a3bd0e3ff3c51da7431c..8e320084f21f84447aeb564a57dd111e6aaf6407 100644 (file)
@@ -2,9 +2,12 @@
  *   Copyright (C) 2005 by Dominic Rath                                    *
  *   Dominic.Rath@gmx.de                                                   *
  *                                                                         *
- *   Copyright (C) 2007,2008 Øyvind Harboe                                      *
+ *   Copyright (C) 2007,2008 Øyvind Harboe                                 *
  *   oyvind.harboe@zylin.com                                               *
  *                                                                         *
+ *   Copyright (C) 2008 by Spencer Oliver                                  *
+ *   spen@spen-soft.co.uk                                                  *
+ *                                                                         *
  *   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     *
@@ -28,6 +31,7 @@
 #include "configuration.h"
 #include "time_support.h"
 #include "command.h"
+#include "server.h"
 
 #include <stdio.h>
 #include <stdlib.h>
@@ -61,14 +65,14 @@ static char *log_strings[5] =
 static int count = 0;
 
 /* The log_puts() serves to somewhat different goals:
- * 
+ *
  * - logging
  * - feeding low-level info to the user in GDB or Telnet
- * 
+ *
  * The latter dictates that strings without newline are not logged, lest there
- * will be *MANY log lines when sending one char at the time(e.g. 
+ * will be *MANY log lines when sending one char at the time(e.g.
  * target_request.c).
- * 
+ *
  */
 static void log_puts(enum log_levels level, const char *file, int line, const char *function, const char *string)
 {
@@ -91,7 +95,7 @@ static void log_puts(enum log_levels level, const char *file, int line, const ch
                {
                        /* print with count and time information */
                        int t=(int)(timeval_ms()-start);
-#if PRINT_MEM()        
+#if PRINT_MEM()
                        struct mallinfo info;
                        info = mallinfo();
 #endif
@@ -99,26 +103,31 @@ static void log_puts(enum log_levels level, const char *file, int line, const ch
 #if PRINT_MEM()
                                        " %d"
 #endif
-                                       ": %s", log_strings[level+1], count, t, file, line, function, 
+                                       ": %s", log_strings[level+1], count, t, file, line, function,
 #if PRINT_MEM()
                                        info.fordblks,
 #endif
                                        string);
                }
-               else
+               else if(server_use_pipes == 0)
                {
-                       /* print human readable output */
-                       fprintf(log_output, "%s%s",
-                                       (level > LOG_LVL_USER)?log_strings[level+1]:"", string);
+                       /* if we are using gdb through pipes then we do not want any output
+                        * to the pipe otherwise we get repeated strings */
+                       if (strcmp(string, "\n") != 0)
+                       {
+                               /* print human readable output - but skip empty lines */
+                               fprintf(log_output, "%s%s",
+                                               (level > LOG_LVL_USER)?log_strings[level+1]:"", string);
+                       }
                }
        } else
        {
-               /* only entire lines are logged. Otherwise it's 
+               /* only entire lines are logged. Otherwise it's
                 * single chars intended for the log callbacks. */
        }
 
        fflush(log_output);
-       
+
        /* Never forward LOG_LVL_DEBUG, too verbose and they can be found in the log if need be */
        if (level <= LOG_LVL_INFO)
        {
@@ -151,7 +160,7 @@ void log_printf(enum log_levels level, const char *file, int line, const char *f
                log_puts(level, file, line, function, string);
                free(string);
        }
-       
+
        va_end(ap);
 }
 
@@ -163,9 +172,9 @@ void log_printf_lf(enum log_levels level, const char *file, int line, const char
        count++;
        if (level > debug_level)
                return;
-       
+
        va_start(ap, format);
-       
+
        string = alloc_vprintf(format, ap);
        if (string != NULL)
        {
@@ -173,7 +182,7 @@ void log_printf_lf(enum log_levels level, const char *file, int line, const char
                log_puts(level, file, line, function, string);
                free(string);
        }
-       
+
        va_end(ap);
 }
 
@@ -197,6 +206,18 @@ int handle_debug_level_command(struct command_context_s *cmd_ctx, char *cmd, cha
        if (debug_level > 3)
                debug_level = 3;
 
+       if (debug_level >= LOG_LVL_DEBUG && server_use_pipes == 1)
+       {
+               /* if we are enabling debug info then we need to write to a log file
+                * otherwise the pipe will get full and cause issues with gdb */
+               FILE* file = fopen("openocd.log", "w");
+               if (file)
+               {
+                       log_output = file;
+                       LOG_WARNING("enabling log output as we are using pipes");
+               }
+       }
+       
        return ERROR_OK;
 }
 
@@ -205,7 +226,7 @@ int handle_log_output_command(struct command_context_s *cmd_ctx, char *cmd, char
        if (argc == 1)
        {
                FILE* file = fopen(args[0], "w");
-               
+
                if (file)
                {
                        log_output = file;
@@ -231,17 +252,17 @@ int log_init(struct command_context_s *cmd_ctx)
        /* set defaults for daemon configuration, if not set by cmdline or cfgfile */
        if (debug_level == -1)
                debug_level = LOG_LVL_INFO;
-       
+
        if (log_output == NULL)
        {
                log_output = stderr;
        }
-       
+
        start=last_time=timeval_ms();
-       
+
        return ERROR_OK;
 }
-       
+
 int set_log_output(struct command_context_s *cmd_ctx, FILE *output)
 {
        log_output = output;
@@ -296,7 +317,7 @@ char *alloc_vprintf(const char *fmt, va_list ap)
 {
        /* no buffer at the beginning, force realloc to do the job */
        char *string = NULL;
-       
+
        /* start with buffer size suitable for typical messages */
        int size = 128;
 
@@ -323,7 +344,7 @@ char *alloc_vprintf(const char *fmt, va_list ap)
                /* there was just enough or not enough space, allocate more in the next round */
                size *= 2; /* double the buffer size */
        }
-       
+
        /* the returned buffer is by principle guaranteed to be at least one character longer */
        return string;
 }
@@ -340,10 +361,10 @@ char *alloc_printf(const char *format, ...)
 
 /* Code must return to the server loop before 1000ms has returned or invoke
  * this function.
- * 
+ *
  * The GDB connection will time out if it spends >2000ms and you'll get nasty
  * error messages from GDB:
- * 
+ *
  * Ignoring packet error, continuing...
  * Reply contains invalid hex digit 116
  *
@@ -351,29 +372,36 @@ char *alloc_printf(const char *format, ...)
  * in GDB, OpenOCD guarantees that it sends keep-alive packages on the
  * GDB protocol and it is a bug in OpenOCD not to either return to the server
  * loop or invoke keep_alive() every 1000ms.
- * 
+ *
  * This function will send a keep alive packet if >500ms has passed since last time
  * it was invoked.
- * 
+ *
+ * Note that this function can be invoked often, so it needs to be relatively
+ * fast when invoked more often than every 500ms.
+ *
  */
 void keep_alive()
 {
        current_time=timeval_ms();
        if (current_time-last_time>1000)
        {
-               LOG_WARNING("BUG: keep_alive() was not invoked in the 1000ms timelimit. GDB alive packet not sent! (%lld)", current_time-last_time); 
-               last_time=current_time;
-       } else if (current_time-last_time>500)
+               LOG_WARNING("BUG: keep_alive() was not invoked in the 1000ms timelimit. GDB alive packet not sent! (%lld)", current_time-last_time);
+       }
+       if (current_time-last_time>500)
        {
                /* this will keep the GDB connection alive */
                LOG_USER_N("%s", "");
+
+               /* DANGER!!!! do not add code to invoke e.g. target event processing,
+                * jim timer processing, etc. it can cause infinite recursion +
+                * jim event callbacks need to happen at a well defined time,
+                * not anywhere keep_alive() is invoked.
+                *
+                * These functions should be invoked at a well defined spot in server.c
+                */
+
                last_time=current_time;
        }
-
-       /* also process TCL events (we have to do this from 'log.c' since its
-        * keep_alive() is the only routine guaranteed to be called at least
-        * once per second :( */
-       process_jim_events ();
 }
 
 /* reset keep alive timer without sending message */
@@ -382,3 +410,30 @@ void kept_alive()
        current_time=timeval_ms();
        last_time=current_time;
 }
+
+/* if we sleep for extended periods of time, we must invoke keep_alive() intermittantly */
+void alive_sleep(int ms)
+{
+       int i;
+       int napTime=10;
+       for (i=0; i<ms; i+=napTime)
+       {
+               int sleep_a_bit=ms-i;
+               if (sleep_a_bit>napTime)
+               {
+                       sleep_a_bit=napTime;
+               }
+               usleep(sleep_a_bit*1000);
+               keep_alive();
+       }
+}
+
+void busy_sleep(int ms)
+{
+       long long then;
+       then=timeval_ms();
+       while ((timeval_ms()-then)<ms)
+       {
+               /* busy wait */
+       }
+}