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 'G':
148             if (PACKET_STARTS_WITH ("qGroupName:"))             return eServerPacketType_qGroupName;
149             if (PACKET_MATCHES ("qGetWorkingDir"))              return eServerPacketType_qGetWorkingDir;
150             if (PACKET_MATCHES ("qGetPid"))                     return eServerPacketType_qGetPid;
151             if (PACKET_STARTS_WITH ("qGetProfileData;"))        return eServerPacketType_qGetProfileData;
152             if (PACKET_MATCHES ("qGDBServerVersion"))           return eServerPacketType_qGDBServerVersion;
153             break;
154 
155         case 'H':
156             if (PACKET_MATCHES ("qHostInfo"))                   return eServerPacketType_qHostInfo;
157             break;
158 
159         case 'K':
160             if (PACKET_STARTS_WITH ("qKillSpawnedProcess"))     return eServerPacketType_qKillSpawnedProcess;
161             break;
162 
163         case 'L':
164             if (PACKET_STARTS_WITH ("qLaunchGDBServer"))        return eServerPacketType_qLaunchGDBServer;
165             if (PACKET_MATCHES ("qLaunchSuccess"))              return eServerPacketType_qLaunchSuccess;
166             break;
167 
168         case 'M':
169             if (PACKET_STARTS_WITH ("qMemoryRegionInfo:"))      return eServerPacketType_qMemoryRegionInfo;
170             if (PACKET_MATCHES ("qMemoryRegionInfo"))           return eServerPacketType_qMemoryRegionInfoSupported;
171             if (PACKET_STARTS_WITH ("qModuleInfo:"))             return eServerPacketType_qModuleInfo;
172             break;
173 
174         case 'P':
175             if (PACKET_STARTS_WITH ("qProcessInfoPID:"))        return eServerPacketType_qProcessInfoPID;
176             if (PACKET_STARTS_WITH ("qPlatform_shell:"))        return eServerPacketType_qPlatform_shell;
177             if (PACKET_STARTS_WITH ("qPlatform_mkdir:"))        return eServerPacketType_qPlatform_mkdir;
178             if (PACKET_STARTS_WITH ("qPlatform_chmod:"))        return eServerPacketType_qPlatform_chmod;
179             if (PACKET_MATCHES ("qProcessInfo"))                return eServerPacketType_qProcessInfo;
180             break;
181 
182         case 'R':
183             if (PACKET_STARTS_WITH ("qRcmd,"))                  return eServerPacketType_qRcmd;
184             if (PACKET_STARTS_WITH ("qRegisterInfo"))           return eServerPacketType_qRegisterInfo;
185             break;
186 
187         case 'S':
188             if (PACKET_STARTS_WITH ("qSpeedTest:"))             return eServerPacketType_qSpeedTest;
189             if (PACKET_MATCHES ("qShlibInfoAddr"))              return eServerPacketType_qShlibInfoAddr;
190             if (PACKET_MATCHES ("qStepPacketSupported"))        return eServerPacketType_qStepPacketSupported;
191             if (PACKET_STARTS_WITH ("qSupported"))              return eServerPacketType_qSupported;
192             if (PACKET_MATCHES ("qSyncThreadStateSupported"))   return eServerPacketType_qSyncThreadStateSupported;
193             break;
194 
195         case 'T':
196             if (PACKET_STARTS_WITH ("qThreadExtraInfo,"))       return eServerPacketType_qThreadExtraInfo;
197             if (PACKET_STARTS_WITH ("qThreadStopInfo"))         return eServerPacketType_qThreadStopInfo;
198             break;
199 
200         case 'U':
201             if (PACKET_STARTS_WITH ("qUserName:"))              return eServerPacketType_qUserName;
202             break;
203 
204         case 'V':
205             if (PACKET_MATCHES ("qVAttachOrWaitSupported"))     return eServerPacketType_qVAttachOrWaitSupported;
206             break;
207 
208         case 'W':
209             if (PACKET_STARTS_WITH ("qWatchpointSupportInfo:")) return eServerPacketType_qWatchpointSupportInfo;
210             if (PACKET_MATCHES ("qWatchpointSupportInfo"))      return eServerPacketType_qWatchpointSupportInfoSupported;
211             break;
212 
213         case 'X':
214             if (PACKET_STARTS_WITH ("qXfer:auxv:read::"))       return eServerPacketType_qXfer_auxv_read;
215             break;
216         }
217         break;
218     case 'v':
219             if (PACKET_STARTS_WITH("vFile:"))
220             {
221                 if (PACKET_STARTS_WITH("vFile:open:"))          return eServerPacketType_vFile_open;
222                 else if (PACKET_STARTS_WITH("vFile:close:"))    return eServerPacketType_vFile_close;
223                 else if (PACKET_STARTS_WITH("vFile:pread"))     return eServerPacketType_vFile_pread;
224                 else if (PACKET_STARTS_WITH("vFile:pwrite"))    return eServerPacketType_vFile_pwrite;
225                 else if (PACKET_STARTS_WITH("vFile:size"))      return eServerPacketType_vFile_size;
226                 else if (PACKET_STARTS_WITH("vFile:exists"))    return eServerPacketType_vFile_exists;
227                 else if (PACKET_STARTS_WITH("vFile:stat"))      return eServerPacketType_vFile_stat;
228                 else if (PACKET_STARTS_WITH("vFile:mode"))      return eServerPacketType_vFile_mode;
229                 else if (PACKET_STARTS_WITH("vFile:MD5"))       return eServerPacketType_vFile_md5;
230                 else if (PACKET_STARTS_WITH("vFile:symlink"))   return eServerPacketType_vFile_symlink;
231                 else if (PACKET_STARTS_WITH("vFile:unlink"))    return eServerPacketType_vFile_unlink;
232 
233             } else {
234               if (PACKET_STARTS_WITH ("vAttach;"))              return eServerPacketType_vAttach;
235               if (PACKET_STARTS_WITH ("vAttachWait;"))          return eServerPacketType_vAttachWait;
236               if (PACKET_STARTS_WITH ("vAttachOrWait;"))        return eServerPacketType_vAttachOrWait;
237               if (PACKET_STARTS_WITH ("vAttachName;"))          return eServerPacketType_vAttachName;
238               if (PACKET_STARTS_WITH("vCont;"))                 return eServerPacketType_vCont;
239               if (PACKET_MATCHES ("vCont?"))                    return eServerPacketType_vCont_actions;
240             }
241             break;
242       case '_':
243         switch (packet_cstr[1])
244         {
245         case 'M':
246             return eServerPacketType__M;
247 
248         case 'm':
249             return eServerPacketType__m;
250         }
251         break;
252 
253       case '?':
254         if (packet_size == 1) return eServerPacketType_stop_reason;
255         break;
256 
257       case 'c':
258         return eServerPacketType_c;
259 
260       case 'C':
261         return eServerPacketType_C;
262 
263       case 'D':
264         if (packet_size == 1) return eServerPacketType_D;
265         break;
266 
267       case 'g':
268         if (packet_size == 1) return eServerPacketType_g;
269         break;
270 
271       case 'G':
272         return eServerPacketType_G;
273 
274       case 'H':
275         return eServerPacketType_H;
276 
277       case 'I':
278         return eServerPacketType_I;
279 
280       case 'k':
281         if (packet_size == 1) return eServerPacketType_k;
282         break;
283 
284       case 'm':
285         return eServerPacketType_m;
286 
287       case 'M':
288         return eServerPacketType_M;
289 
290       case 'p':
291         return eServerPacketType_p;
292 
293       case 'P':
294         return eServerPacketType_P;
295 
296       case 's':
297         if (packet_size == 1) return eServerPacketType_s;
298         break;
299 
300       case 'S':
301         return eServerPacketType_S;
302 
303       case 'T':
304         return eServerPacketType_T;
305 
306       case 'z':
307         if (packet_cstr[1] >= '0' && packet_cstr[1] <= '4')
308           return eServerPacketType_z;
309         break;
310 
311       case 'Z':
312         if (packet_cstr[1] >= '0' && packet_cstr[1] <= '4')
313           return eServerPacketType_Z;
314         break;
315     }
316     return eServerPacketType_unimplemented;
317 }
318 
319 bool
320 StringExtractorGDBRemote::IsOKResponse() const
321 {
322     return GetResponseType () == eOK;
323 }
324 
325 
326 bool
327 StringExtractorGDBRemote::IsUnsupportedResponse() const
328 {
329     return GetResponseType () == eUnsupported;
330 }
331 
332 bool
333 StringExtractorGDBRemote::IsNormalResponse() const
334 {
335     return GetResponseType () == eResponse;
336 }
337 
338 bool
339 StringExtractorGDBRemote::IsErrorResponse() const
340 {
341     return GetResponseType () == eError &&
342            m_packet.size() == 3 &&
343            isxdigit(m_packet[1]) &&
344            isxdigit(m_packet[2]);
345 }
346 
347 uint8_t
348 StringExtractorGDBRemote::GetError ()
349 {
350     if (GetResponseType() == eError)
351     {
352         SetFilePos(1);
353         return GetHexU8(255);
354     }
355     return 0;
356 }
357 
358 size_t
359 StringExtractorGDBRemote::GetEscapedBinaryData (std::string &str)
360 {
361     // Just get the data bytes in the string as GDBRemoteCommunication::CheckForPacket()
362     // already removes any 0x7d escaped characters. If any 0x7d characters are left in
363     // the packet, then they are supposed to be there...
364     str.clear();
365     const size_t bytes_left = GetBytesLeft();
366     if (bytes_left > 0)
367     {
368         str.assign(m_packet, m_index, bytes_left);
369         m_index += bytes_left;
370     }
371     return str.size();
372 }
373 
374