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