ioutil: make the file compile on MacOS
[fw/openocd] / src / target / target_request.c
1 /***************************************************************************
2  *   Copyright (C) 2007 by Dominic Rath                                    *
3  *   Dominic.Rath@gmx.de                                                   *
4  *                                                                         *
5  *   Copyright (C) 2007,2008 Ã˜yvind Harboe                                 *
6  *   oyvind.harboe@zylin.com                                               *
7  *                                                                         *
8  *   Copyright (C) 2008 by Spencer Oliver                                  *
9  *   spen@spen-soft.co.uk                                                  *
10  *                                                                         *
11  *   This program is free software; you can redistribute it and/or modify  *
12  *   it under the terms of the GNU General Public License as published by  *
13  *   the Free Software Foundation; either version 2 of the License, or     *
14  *   (at your option) any later version.                                   *
15  *                                                                         *
16  *   This program is distributed in the hope that it will be useful,       *
17  *   but WITHOUT ANY WARRANTY; without even the implied warranty of        *
18  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the         *
19  *   GNU General Public License for more details.                          *
20  *                                                                         *
21  *   You should have received a copy of the GNU General Public License     *
22  *   along with this program; if not, write to the                         *
23  *   Free Software Foundation, Inc.,                                       *
24  *   59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.             *
25  ***************************************************************************/
26
27 #ifdef HAVE_CONFIG_H
28 #include "config.h"
29 #endif
30
31 #include <helper/log.h>
32 #include <helper/binarybuffer.h>
33
34 #include "target.h"
35 #include "target_request.h"
36 #include "target_type.h"
37 #include "trace.h"
38
39 static bool got_message;
40
41 bool target_got_message(void)
42 {
43         bool t = got_message;
44         got_message = false;
45         return t;
46 }
47
48 static int charmsg_mode;
49
50 static int target_asciimsg(struct target *target, uint32_t length)
51 {
52         char *msg = malloc(DIV_ROUND_UP(length + 1, 4) * 4);
53         struct debug_msg_receiver *c = target->dbgmsg;
54
55         target->type->target_request_data(target, DIV_ROUND_UP(length, 4), (uint8_t *)msg);
56         msg[length] = 0;
57
58         LOG_DEBUG("%s", msg);
59
60         while (c) {
61                 command_print(c->cmd_ctx, "%s", msg);
62                 c = c->next;
63         }
64
65         return ERROR_OK;
66 }
67
68 static int target_charmsg(struct target *target, uint8_t msg)
69 {
70         LOG_USER_N("%c", msg);
71
72         return ERROR_OK;
73 }
74
75 static int target_hexmsg(struct target *target, int size, uint32_t length)
76 {
77         uint8_t *data = malloc(DIV_ROUND_UP(length * size, 4) * 4);
78         char line[128];
79         int line_len;
80         struct debug_msg_receiver *c = target->dbgmsg;
81         uint32_t i;
82
83         LOG_DEBUG("size: %i, length: %i", (int)size, (int)length);
84
85         target->type->target_request_data(target, DIV_ROUND_UP(length * size, 4), (uint8_t *)data);
86
87         line_len = 0;
88         for (i = 0; i < length; i++) {
89                 switch (size) {
90                         case 4:
91                                 line_len += snprintf(line + line_len, 128 - line_len, "%8.8" PRIx32 " ", le_to_h_u32(data + (4*i)));
92                                 break;
93                         case 2:
94                                 line_len += snprintf(line + line_len, 128 - line_len, "%4.4x ", le_to_h_u16(data + (2*i)));
95                                 break;
96                         case 1:
97                                 line_len += snprintf(line + line_len, 128 - line_len, "%2.2x ", data[i]);
98                                 break;
99                 }
100
101                 if ((i%8 == 7) || (i == length - 1)) {
102                         LOG_DEBUG("%s", line);
103
104                         while (c) {
105                                 command_print(c->cmd_ctx, "%s", line);
106                                 c = c->next;
107                         }
108                         c = target->dbgmsg;
109                         line_len = 0;
110                 }
111         }
112
113         free(data);
114
115         return ERROR_OK;
116 }
117
118 /* handle requests from the target received by a target specific
119  * side-band channel (e.g. ARM7/9 DCC)
120  */
121 int target_request(struct target *target, uint32_t request)
122 {
123         target_req_cmd_t target_req_cmd = request & 0xff;
124
125         /* Record that we got a target message for back-off algorithm */
126         got_message = true;
127
128         if (charmsg_mode) {
129                 target_charmsg(target, target_req_cmd);
130                 return ERROR_OK;
131         }
132
133         switch (target_req_cmd) {
134                 case TARGET_REQ_TRACEMSG:
135                         trace_point(target, (request & 0xffffff00) >> 8);
136                         break;
137                 case TARGET_REQ_DEBUGMSG:
138                         if (((request & 0xff00) >> 8) == 0)
139                                 target_asciimsg(target, (request & 0xffff0000) >> 16);
140                         else
141                                 target_hexmsg(target, (request & 0xff00) >> 8, (request & 0xffff0000) >> 16);
142                         break;
143                 case TARGET_REQ_DEBUGCHAR:
144                         target_charmsg(target, (request & 0x00ff0000) >> 16);
145                         break;
146 /*              case TARGET_REQ_SEMIHOSTING:
147  *                      break;
148  */
149                 default:
150                         LOG_ERROR("unknown target request: %2.2x", target_req_cmd);
151                         break;
152         }
153
154         return ERROR_OK;
155 }
156
157 static int add_debug_msg_receiver(struct command_context *cmd_ctx, struct target *target)
158 {
159         struct debug_msg_receiver **p = &target->dbgmsg;
160
161         if (target == NULL)
162                 return ERROR_COMMAND_SYNTAX_ERROR;
163
164         /* see if there's already a list */
165         if (*p) {
166                 /* find end of linked list */
167                 while ((*p)->next)
168                         p = &((*p)->next);
169                 p = &((*p)->next);
170         }
171
172         /* add new debug message receiver */
173         (*p) = malloc(sizeof(struct debug_msg_receiver));
174         (*p)->cmd_ctx = cmd_ctx;
175         (*p)->next = NULL;
176
177         /* enable callback */
178         target->dbg_msg_enabled = 1;
179
180         return ERROR_OK;
181 }
182
183 static struct debug_msg_receiver *find_debug_msg_receiver(struct command_context *cmd_ctx,
184                 struct target *target)
185 {
186         int do_all_targets = 0;
187
188         /* if no target has been specified search all of them */
189         if (target == NULL) {
190                 /* if no targets haven been specified */
191                 if (all_targets == NULL)
192                         return NULL;
193
194                 target = all_targets;
195                 do_all_targets = 1;
196         }
197
198         /* so we target != null */
199         struct debug_msg_receiver **p = &target->dbgmsg;
200         do {
201                 while (*p) {
202                         if ((*p)->cmd_ctx == cmd_ctx)
203                                 return *p;
204                         p = &((*p)->next);
205                 }
206
207                 target = target->next;
208         } while (target && do_all_targets);
209
210         return NULL;
211 }
212
213 int delete_debug_msg_receiver(struct command_context *cmd_ctx, struct target *target)
214 {
215         struct debug_msg_receiver **p;
216         struct debug_msg_receiver *c;
217         int do_all_targets = 0;
218
219         /* if no target has been specified search all of them */
220         if (target == NULL) {
221                 /* if no targets haven been specified */
222                 if (all_targets == NULL)
223                         return ERROR_OK;
224
225                 target = all_targets;
226                 do_all_targets = 1;
227         }
228
229         do {
230                 p = &target->dbgmsg;
231                 c = *p;
232                 while (c) {
233                         struct debug_msg_receiver *next = c->next;
234                         if (c->cmd_ctx == cmd_ctx) {
235                                 *p = next;
236                                 free(c);
237                                 if (*p == NULL) {
238                                         /* disable callback */
239                                         target->dbg_msg_enabled = 0;
240                                 }
241                                 return ERROR_OK;
242                         } else
243                                 p = &(c->next);
244                         c = next;
245                 }
246
247                 target = target->next;
248         } while (target && do_all_targets);
249
250         return ERROR_OK;
251 }
252
253 COMMAND_HANDLER(handle_target_request_debugmsgs_command)
254 {
255         struct target *target = get_current_target(CMD_CTX);
256
257         int receiving = 0;
258
259         /* see if reciever is already registered */
260         if (find_debug_msg_receiver(CMD_CTX, target) != NULL)
261                 receiving = 1;
262
263         if (CMD_ARGC > 0) {
264                 if (!strcmp(CMD_ARGV[0], "enable") || !strcmp(CMD_ARGV[0], "charmsg")) {
265                         /* don't register if this command context is already receiving */
266                         if (!receiving) {
267                                 receiving = 1;
268                                 add_debug_msg_receiver(CMD_CTX, target);
269                         }
270                         charmsg_mode = !strcmp(CMD_ARGV[0], "charmsg");
271                 } else if (!strcmp(CMD_ARGV[0], "disable")) {
272                         /* no need to delete a receiver if none is registered */
273                         if (receiving) {
274                                 receiving = 0;
275                                 delete_debug_msg_receiver(CMD_CTX, target);
276                         }
277                 } else
278                         return ERROR_COMMAND_SYNTAX_ERROR;
279         }
280
281         command_print(CMD_CTX, "receiving debug messages from current target %s",
282                         (receiving) ? (charmsg_mode ? "charmsg" : "enabled") : "disabled");
283         return ERROR_OK;
284 }
285
286 static const struct command_registration target_req_exec_command_handlers[] = {
287         {
288                 .name = "debugmsgs",
289                 .handler = handle_target_request_debugmsgs_command,
290                 .mode = COMMAND_EXEC,
291                 .help = "display and/or modify reception of debug messages from target",
292                 .usage = "['enable'|'charmsg'|'disable']",
293         },
294         COMMAND_REGISTRATION_DONE
295 };
296 static const struct command_registration target_req_command_handlers[] = {
297         {
298                 .name = "target_request",
299                 .mode = COMMAND_ANY,
300                 .help = "target request command group",
301                 .usage = "",
302                 .chain = target_req_exec_command_handlers,
303         },
304         COMMAND_REGISTRATION_DONE
305 };
306
307 int target_request_register_commands(struct command_context *cmd_ctx)
308 {
309         return register_commands(cmd_ctx, NULL, target_req_command_handlers);
310 }