Remove FSF address from GPL notices
[fw/openocd] / src / target / smp.c
1 /***************************************************************************
2  *                                                                         *
3  * Copyright (C) ST-Ericsson SA 2011                                       *
4  * Author: Michel Jaouen <michel.jaouen@stericsson.com> for ST-Ericsson.   *
5  *   This program is free software; you can redistribute it and/or modify  *
6  *   it under the terms of the GNU General Public License as published by  *
7  *   the Free Software Foundation; either version 2 of the License, or     *
8  *   (at your option) any later version.                                   *
9  *                                                                         *
10  *   This program is distributed in the hope that it will be useful,       *
11  *   but WITHOUT ANY WARRANTY; without even the implied warranty of        *
12  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the         *
13  *   GNU General Public License for more details.                          *
14  *                                                                         *
15  *   You should have received a copy of the GNU General Public License     *
16  *   along with this program.  If not, see <http://www.gnu.org/licenses/>. *
17  ***************************************************************************/
18
19 #ifdef HAVE_CONFIG_H
20 #include "config.h"
21 #endif
22
23 #include "server/server.h"
24
25 #include "target/target.h"
26
27 #include "server/gdb_server.h"
28 #include "smp.h"
29 #include "helper/binarybuffer.h"
30
31 /*  implementation of new packet in gdb interface for smp feature          */
32 /*                                                                         */
33 /*   j : smp  status request                                               */
34 /*   J : smp  set request                                                  */
35 /*                                                                         */
36 /*   jc :read core id displayed by gdb connection                          */
37 /*   reply XXXXXXXX core id is int32_t , 8 hex digits                      */
38 /*                                                                         */
39 /*   Reply ENN error not supported (target not smp)                        */
40 /*                                                                         */
41 /*   JcXX  set core id displayed at next gdb continue                      */
42 /*   maximum 8 bytes described core id int32_t (8 hex digits)              */
43 /*  (core id -1 , reserved for returning to normal continue mode) */
44 /*  Reply ENN error not supported(target not smp,core id out of range)     */
45 /*  Reply OK : for success                                                 */
46 /*                                                                         */
47 /*  handling of this packet within gdb can be done by the creation         */
48 /*  internal variable by mean of function allocate_computed_value          */
49 /*  set $_core 1 => Jc01 packet is sent                                    */
50 /*  print $_core => jc packet is sent and result is affected in $          */
51 /*  Another way to test this packet is the usage of maintenance packet     */
52 /*  maint packet Jc01                                                      */
53 /*  maint packet jc                                                        */
54
55 /* packet j :smp status request */
56 int gdb_read_smp_packet(struct connection *connection,
57                 char const *packet, int packet_size)
58 {
59         struct target *target = get_target_from_connection(connection);
60         int retval = ERROR_OK;
61         if (target->smp) {
62                 if (strncmp(packet, "jc", 2) == 0) {
63                         const uint32_t len = sizeof(target->gdb_service->core[0]);
64                         char hex_buffer[len * 2 + 1];
65                         uint8_t buffer[len];
66                         buf_set_u32(buffer, 0, len * 8, target->gdb_service->core[0]);
67                         int pkt_len = hexify(hex_buffer, (char *)buffer, sizeof(buffer), sizeof(hex_buffer));
68
69                         retval = gdb_put_packet(connection, hex_buffer, pkt_len);
70                 }
71         } else
72                 retval = gdb_put_packet(connection, "E01", 3);
73         return retval;
74 }
75
76 /* J :  smp set request */
77 int gdb_write_smp_packet(struct connection *connection,
78                 char const *packet, int packet_size)
79 {
80         struct target *target = get_target_from_connection(connection);
81         char *separator;
82         int coreid = 0;
83         int retval = ERROR_OK;
84
85         /* skip command character */
86         if (target->smp) {
87                 if (strncmp(packet, "Jc", 2) == 0) {
88                         packet += 2;
89                         coreid = strtoul(packet, &separator, 16);
90                         target->gdb_service->core[1] = coreid;
91                         retval = gdb_put_packet(connection, "OK", 2);
92                 }
93         } else
94                 retval = gdb_put_packet(connection, "E01", 3);
95
96         return retval;
97 }