src/helper/configuration.h

[openocd.git] / src / helper / options.c

diff --git a/src/helper/options.c b/src/helper/options.c
index 5ad09fbd482cecea6cf49b91d2220016d2695154..afff55ba4964a75e03c5fd943160e6a24b12a13c 100644 (file)
--- a/src/helper/options.c
+++ b/src/helper/options.c
@@ -45,7 +45,7 @@ static struct option long_options[] =
        {0, 0, 0, 0}
 };
 
-int configuration_output_handler(struct command_context_s *context, char* line)
+int configuration_output_handler(struct command_context_s *context, const char* line)
 {
        LOG_INFO_N(line);
 
@@ -79,9 +79,19 @@ int parse_cmdline_args(struct command_context_s *cmd_ctx, int argc, char *argv[]
                                version_flag = 1;
                                break;
                        case 'f':       /* --file | -f */
-                               snprintf(command_buffer, 128, "script %s", optarg);
-                               add_config_file_name(command_buffer);
+                       {
+                               char *t=strrchr(optarg, '.');
+                               if (strcmp(t, ".tcl")==0)
+                               {
+                                       /* Files ending in .tcl are executed as Tcl files */
+                                       snprintf(command_buffer, 128, "source [find {%s}]", optarg);
+                               } else
+                               {
+                                       snprintf(command_buffer, 128, "script %s", optarg);
+                               }
+                               add_config_command(command_buffer);
                                break;
+                       }
                        case 's':       /* --search | -s */
                                add_script_search_dir(optarg);
                                break;
@@ -102,7 +112,7 @@ int parse_cmdline_args(struct command_context_s *cmd_ctx, int argc, char *argv[]
                        case 'c':       /* --command | -c */
                                if (optarg)
                                {
-                                       add_config_file_name(optarg);
+                                       add_config_command(optarg);
                                }       
                                break;