xref: /llvm-project/lldb/source/Utility/StringExtractorGDBRemote.cpp (revision 783bfc8caa4c50c0248f90ea7adf2dbd1e48f4e7)
1 //===-- StringExtractorGDBRemote.cpp ----------------------------*- C++ -*-===//
2 //
3 //                     The LLVM Compiler Infrastructure
4 //
5 // This file is distributed under the University of Illinois Open Source
6 // License. See LICENSE.TXT for details.
7 //
8 //===----------------------------------------------------------------------===//
9 
10 // C Includes
11 #include <string.h>
12 
13 // C++ Includes
14 // Other libraries and framework includes
15 // Project includes
16 #include "Utility/StringExtractorGDBRemote.h"
17 
18 
19 
20 StringExtractorGDBRemote::ResponseType
21 StringExtractorGDBRemote::GetResponseType () const
22 {
23     if (m_packet.empty())
24         return eUnsupported;
25 
26     switch (m_packet[0])
27     {
28     case 'E':
29         if (m_packet.size() == 3 &&
30             isxdigit(m_packet[1]) &&
31             isxdigit(m_packet[2]))
32             return eError;
33         break;
34 
35     case 'O':
36         if (m_packet.size() == 2 && m_packet[1] == 'K')
37             return eOK;
38         break;
39 
40     case '+':
41         if (m_packet.size() == 1)
42             return eAck;
43         break;
44 
45     case '-':
46         if (m_packet.size() == 1)
47             return eNack;
48         break;
49     }
50     return eResponse;
51 }
52 
53 StringExtractorGDBRemote::ServerPacketType
54 StringExtractorGDBRemote::GetServerPacketType () const
55 {
56 #define PACKET_MATCHES(s) ((packet_size == (sizeof(s)-1)) && (strcmp((packet_cstr),(s)) == 0))
57 #define PACKET_STARTS_WITH(s) ((packet_size >= (sizeof(s)-1)) && ::strncmp(packet_cstr, s, (sizeof(s)-1))==0)
58 
59     // Empty is not a supported packet...
60     if (m_packet.empty())
61         return eServerPacketType_invalid;
62 
63     const size_t packet_size = m_packet.size();
64     const char *packet_cstr = m_packet.c_str();
65     switch (m_packet[0])
66     {
67 
68     case '%':
69         return eServerPacketType_notify;
70 
71     case '\x03':
72         if (packet_size == 1) return eServerPacketType_interrupt;
73         break;
74 
75     case '-':
76         if (packet_size == 1) return eServerPacketType_nack;
77         break;
78 
79     case '+':
80         if (packet_size == 1) return eServerPacketType_ack;
81         break;
82 
83     case 'A':
84         return eServerPacketType_A;
85 
86     case 'Q':
87 
88         switch (packet_cstr[1])
89         {
90         case 'E':
91             if (PACKET_STARTS_WITH ("QEnvironment:"))           return eServerPacketType_QEnvironment;
92             if (PACKET_STARTS_WITH ("QEnvironmentHexEncoded:")) return eServerPacketType_QEnvironmentHexEncoded;
93             break;
94 
95         case 'S':
96             if (PACKET_MATCHES ("QStartNoAckMode"))               return eServerPacketType_QStartNoAckMode;
97             if (PACKET_STARTS_WITH ("QSaveRegisterState"))        return eServerPacketType_QSaveRegisterState;
98             if (PACKET_STARTS_WITH ("QSetDisableASLR:"))          return eServerPacketType_QSetDisableASLR;
99             if (PACKET_STARTS_WITH ("QSetDetachOnError:"))        return eServerPacketType_QSetDetachOnError;
100             if (PACKET_STARTS_WITH ("QSetSTDIN:"))                return eServerPacketType_QSetSTDIN;
101             if (PACKET_STARTS_WITH ("QSetSTDOUT:"))               return eServerPacketType_QSetSTDOUT;
102             if (PACKET_STARTS_WITH ("QSetSTDERR:"))               return eServerPacketType_QSetSTDERR;
103             if (PACKET_STARTS_WITH ("QSetWorkingDir:"))           return eServerPacketType_QSetWorkingDir;
104             if (PACKET_STARTS_WITH ("QSetLogging:"))              return eServerPacketType_QSetLogging;
105             if (PACKET_STARTS_WITH ("QSetMaxPacketSize:"))        return eServerPacketType_QSetMaxPacketSize;
106             if (PACKET_STARTS_WITH ("QSetMaxPayloadSize:"))       return eServerPacketType_QSetMaxPayloadSize;
107             if (PACKET_STARTS_WITH ("QSetEnableAsyncProfiling;")) return eServerPacketType_QSetEnableAsyncProfiling;
108             if (PACKET_STARTS_WITH ("QSyncThreadState:"))         return eServerPacketType_QSyncThreadState;
109             break;
110 
111         case 'L':
112             if (PACKET_STARTS_WITH ("QLaunchArch:"))              return eServerPacketType_QLaunchArch;
113             if (PACKET_MATCHES("QListThreadsInStopReply"))        return eServerPacketType_QListThreadsInStopReply;
114             break;
115 
116         case 'R':
117             if (PACKET_STARTS_WITH ("QRestoreRegisterState:"))    return eServerPacketType_QRestoreRegisterState;
118             break;
119 
120         case 'T':
121             if (PACKET_MATCHES ("QThreadSuffixSupported"))        return eServerPacketType_QThreadSuffixSupported;
122             break;
123         }
124         break;
125 
126     case 'q':
127         switch (packet_cstr[1])
128         {
129         case 's':
130             if (PACKET_MATCHES ("qsProcessInfo"))               return eServerPacketType_qsProcessInfo;
131             if (PACKET_MATCHES ("qsThreadInfo"))                return eServerPacketType_qsThreadInfo;
132             break;
133 
134         case 'f':
135             if (PACKET_STARTS_WITH ("qfProcessInfo"))           return eServerPacketType_qfProcessInfo;
136             if (PACKET_STARTS_WITH ("qfThreadInfo"))            return eServerPacketType_qfThreadInfo;
137             break;
138 
139         case 'C':
140             if (packet_size == 2)                               return eServerPacketType_qC;
141             break;
142 
143         case 'E':
144             if (PACKET_STARTS_WITH ("qEcho:"))                  return eServerPacketType_qEcho;
145             break;
146 
147         case 'F':
148             if (PACKET_STARTS_WITH ("qFileLoadAddress:"))       return eServerPacketType_qFileLoadAddress;
149             break;
150 
151         case 'G':
152             if (PACKET_STARTS_WITH ("qGroupName:"))             return eServerPacketType_qGroupName;
153             if (PACKET_MATCHES ("qGetWorkingDir"))              return eServerPacketType_qGetWorkingDir;
154             if (PACKET_MATCHES ("qGetPid"))                     return eServerPacketType_qGetPid;
155             if (PACKET_STARTS_WITH ("qGetProfileData;"))        return eServerPacketType_qGetProfileData;
156             if (PACKET_MATCHES ("qGDBServerVersion"))           return eServerPacketType_qGDBServerVersion;
157             break;
158 
159         case 'H':
160             if (PACKET_MATCHES ("qHostInfo"))                   return eServerPacketType_qHostInfo;
161             break;
162 
163         case 'K':
164             if (PACKET_STARTS_WITH ("qKillSpawnedProcess"))     return eServerPacketType_qKillSpawnedProcess;
165             break;
166 
167         case 'L':
168             if (PACKET_STARTS_WITH ("qLaunchGDBServer"))        return eServerPacketType_qLaunchGDBServer;
169             if (PACKET_MATCHES ("qLaunchSuccess"))              return eServerPacketType_qLaunchSuccess;
170             break;
171 
172         case 'M':
173             if (PACKET_STARTS_WITH ("qMemoryRegionInfo:"))      return eServerPacketType_qMemoryRegionInfo;
174             if (PACKET_MATCHES ("qMemoryRegionInfo"))           return eServerPacketType_qMemoryRegionInfoSupported;
175             if (PACKET_STARTS_WITH ("qModuleInfo:"))             return eServerPacketType_qModuleInfo;
176             break;
177 
178         case 'P':
179             if (PACKET_STARTS_WITH ("qProcessInfoPID:"))        return eServerPacketType_qProcessInfoPID;
180             if (PACKET_STARTS_WITH ("qPlatform_shell:"))        return eServerPacketType_qPlatform_shell;
181             if (PACKET_STARTS_WITH ("qPlatform_mkdir:"))        return eServerPacketType_qPlatform_mkdir;
182             if (PACKET_STARTS_WITH ("qPlatform_chmod:"))        return eServerPacketType_qPlatform_chmod;
183             if (PACKET_MATCHES ("qProcessInfo"))                return eServerPacketType_qProcessInfo;
184             break;
185 
186         case 'R':
187             if (PACKET_STARTS_WITH ("qRcmd,"))                  return eServerPacketType_qRcmd;
188             if (PACKET_STARTS_WITH ("qRegisterInfo"))           return eServerPacketType_qRegisterInfo;
189             break;
190 
191         case 'S':
192             if (PACKET_STARTS_WITH ("qSpeedTest:"))             return eServerPacketType_qSpeedTest;
193             if (PACKET_MATCHES ("qShlibInfoAddr"))              return eServerPacketType_qShlibInfoAddr;
194             if (PACKET_MATCHES ("qStepPacketSupported"))        return eServerPacketType_qStepPacketSupported;
195             if (PACKET_STARTS_WITH ("qSupported"))              return eServerPacketType_qSupported;
196             if (PACKET_MATCHES ("qSyncThreadStateSupported"))   return eServerPacketType_qSyncThreadStateSupported;
197             break;
198 
199         case 'T':
200             if (PACKET_STARTS_WITH ("qThreadExtraInfo,"))       return eServerPacketType_qThreadExtraInfo;
201             if (PACKET_STARTS_WITH ("qThreadStopInfo"))         return eServerPacketType_qThreadStopInfo;
202             break;
203 
204         case 'U':
205             if (PACKET_STARTS_WITH ("qUserName:"))              return eServerPacketType_qUserName;
206             break;
207 
208         case 'V':
209             if (PACKET_MATCHES ("qVAttachOrWaitSupported"))     return eServerPacketType_qVAttachOrWaitSupported;
210             break;
211 
212         case 'W':
213             if (PACKET_STARTS_WITH ("qWatchpointSupportInfo:")) return eServerPacketType_qWatchpointSupportInfo;
214             if (PACKET_MATCHES ("qWatchpointSupportInfo"))      return eServerPacketType_qWatchpointSupportInfoSupported;
215             break;
216 
217         case 'X':
218             if (PACKET_STARTS_WITH ("qXfer:auxv:read::"))       return eServerPacketType_qXfer_auxv_read;
219             break;
220         }
221         break;
222     case 'v':
223             if (PACKET_STARTS_WITH("vFile:"))
224             {
225                 if (PACKET_STARTS_WITH("vFile:open:"))          return eServerPacketType_vFile_open;
226                 else if (PACKET_STARTS_WITH("vFile:close:"))    return eServerPacketType_vFile_close;
227                 else if (PACKET_STARTS_WITH("vFile:pread"))     return eServerPacketType_vFile_pread;
228                 else if (PACKET_STARTS_WITH("vFile:pwrite"))    return eServerPacketType_vFile_pwrite;
229                 else if (PACKET_STARTS_WITH("vFile:size"))      return eServerPacketType_vFile_size;
230                 else if (PACKET_STARTS_WITH("vFile:exists"))    return eServerPacketType_vFile_exists;
231                 else if (PACKET_STARTS_WITH("vFile:stat"))      return eServerPacketType_vFile_stat;
232                 else if (PACKET_STARTS_WITH("vFile:mode"))      return eServerPacketType_vFile_mode;
233                 else if (PACKET_STARTS_WITH("vFile:MD5"))       return eServerPacketType_vFile_md5;
234                 else if (PACKET_STARTS_WITH("vFile:symlink"))   return eServerPacketType_vFile_symlink;
235                 else if (PACKET_STARTS_WITH("vFile:unlink"))    return eServerPacketType_vFile_unlink;
236 
237             } else {
238               if (PACKET_STARTS_WITH ("vAttach;"))              return eServerPacketType_vAttach;
239               if (PACKET_STARTS_WITH ("vAttachWait;"))          return eServerPacketType_vAttachWait;
240               if (PACKET_STARTS_WITH ("vAttachOrWait;"))        return eServerPacketType_vAttachOrWait;
241               if (PACKET_STARTS_WITH ("vAttachName;"))          return eServerPacketType_vAttachName;
242               if (PACKET_STARTS_WITH("vCont;"))                 return eServerPacketType_vCont;
243               if (PACKET_MATCHES ("vCont?"))                    return eServerPacketType_vCont_actions;
244             }
245             break;
246       case '_':
247         switch (packet_cstr[1])
248         {
249         case 'M':
250             return eServerPacketType__M;
251 
252         case 'm':
253             return eServerPacketType__m;
254         }
255         break;
256 
257       case '?':
258         if (packet_size == 1) return eServerPacketType_stop_reason;
259         break;
260 
261       case 'c':
262         return eServerPacketType_c;
263 
264       case 'C':
265         return eServerPacketType_C;
266 
267       case 'D':
268         if (packet_size == 1) return eServerPacketType_D;
269         break;
270 
271       case 'g':
272         if (packet_size == 1) return eServerPacketType_g;
273         break;
274 
275       case 'G':
276         return eServerPacketType_G;
277 
278       case 'H':
279         return eServerPacketType_H;
280 
281       case 'I':
282         return eServerPacketType_I;
283 
284       case 'k':
285         if (packet_size == 1) return eServerPacketType_k;
286         break;
287 
288       case 'm':
289         return eServerPacketType_m;
290 
291       case 'M':
292         return eServerPacketType_M;
293 
294       case 'p':
295         return eServerPacketType_p;
296 
297       case 'P':
298         return eServerPacketType_P;
299 
300       case 's':
301         if (packet_size == 1) return eServerPacketType_s;
302         break;
303 
304       case 'S':
305         return eServerPacketType_S;
306 
307       case 'T':
308         return eServerPacketType_T;
309 
310       case 'z':
311         if (packet_cstr[1] >= '0' && packet_cstr[1] <= '4')
312           return eServerPacketType_z;
313         break;
314 
315       case 'Z':
316         if (packet_cstr[1] >= '0' && packet_cstr[1] <= '4')
317           return eServerPacketType_Z;
318         break;
319     }
320     return eServerPacketType_unimplemented;
321 }
322 
323 bool
324 StringExtractorGDBRemote::IsOKResponse() const
325 {
326     return GetResponseType () == eOK;
327 }
328 
329 
330 bool
331 StringExtractorGDBRemote::IsUnsupportedResponse() const
332 {
333     return GetResponseType () == eUnsupported;
334 }
335 
336 bool
337 StringExtractorGDBRemote::IsNormalResponse() const
338 {
339     return GetResponseType () == eResponse;
340 }
341 
342 bool
343 StringExtractorGDBRemote::IsErrorResponse() const
344 {
345     return GetResponseType () == eError &&
346            m_packet.size() == 3 &&
347            isxdigit(m_packet[1]) &&
348            isxdigit(m_packet[2]);
349 }
350 
351 uint8_t
352 StringExtractorGDBRemote::GetError ()
353 {
354     if (GetResponseType() == eError)
355     {
356         SetFilePos(1);
357         return GetHexU8(255);
358     }
359     return 0;
360 }
361 
362 size_t
363 StringExtractorGDBRemote::GetEscapedBinaryData (std::string &str)
364 {
365     // Just get the data bytes in the string as GDBRemoteCommunication::CheckForPacket()
366     // already removes any 0x7d escaped characters. If any 0x7d characters are left in
367     // the packet, then they are supposed to be there...
368     str.clear();
369     const size_t bytes_left = GetBytesLeft();
370     if (bytes_left > 0)
371     {
372         str.assign(m_packet, m_index, bytes_left);
373         m_index += bytes_left;
374     }
375     return str.size();
376 }
377 
378