1 //===-- OptionGroupFormat.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 #include "lldb/lldb-python.h"
11 
12 #include "lldb/Interpreter/OptionGroupFormat.h"
13 
14 // C Includes
15 // C++ Includes
16 // Other libraries and framework includes
17 // Project includes
18 #include "lldb/Core/ArchSpec.h"
19 #include "lldb/Interpreter/CommandInterpreter.h"
20 #include "lldb/Target/ExecutionContext.h"
21 #include "lldb/Target/Target.h"
22 #include "lldb/Utility/Utils.h"
23 
24 using namespace lldb;
25 using namespace lldb_private;
26 
OptionGroupFormat(lldb::Format default_format,uint64_t default_byte_size,uint64_t default_count)27 OptionGroupFormat::OptionGroupFormat (lldb::Format default_format,
28                                       uint64_t default_byte_size,
29                                       uint64_t default_count) :
30     m_format (default_format, default_format),
31     m_byte_size (default_byte_size, default_byte_size),
32     m_count (default_count, default_count),
33     m_prev_gdb_format('x'),
34     m_prev_gdb_size('w')
35 {
36 }
37 
~OptionGroupFormat()38 OptionGroupFormat::~OptionGroupFormat ()
39 {
40 }
41 
42 static OptionDefinition
43 g_option_table[] =
44 {
45 { LLDB_OPT_SET_1, false, "format"    ,'f', required_argument, NULL, 0, eArgTypeFormat   , "Specify a format to be used for display."},
46 { LLDB_OPT_SET_2, false, "gdb-format",'G', required_argument, NULL, 0, eArgTypeGDBFormat, "Specify a format using a GDB format specifier string."},
47 { LLDB_OPT_SET_3, false, "size"      ,'s', required_argument, NULL, 0, eArgTypeByteSize , "The size in bytes to use when displaying with the selected format."},
48 { LLDB_OPT_SET_4, false, "count"     ,'c', required_argument, NULL, 0, eArgTypeCount    , "The number of total items to display."},
49 };
50 
51 uint32_t
GetNumDefinitions()52 OptionGroupFormat::GetNumDefinitions ()
53 {
54     if (m_byte_size.GetDefaultValue() < UINT64_MAX)
55     {
56         if (m_count.GetDefaultValue() < UINT64_MAX)
57             return 4;
58         else
59             return 3;
60     }
61     return 2;
62 }
63 
64 const OptionDefinition *
GetDefinitions()65 OptionGroupFormat::GetDefinitions ()
66 {
67     return g_option_table;
68 }
69 
70 Error
SetOptionValue(CommandInterpreter & interpreter,uint32_t option_idx,const char * option_arg)71 OptionGroupFormat::SetOptionValue (CommandInterpreter &interpreter,
72                                    uint32_t option_idx,
73                                    const char *option_arg)
74 {
75     Error error;
76     const int short_option = g_option_table[option_idx].short_option;
77 
78     switch (short_option)
79     {
80         case 'f':
81             error = m_format.SetValueFromCString (option_arg);
82             break;
83 
84         case 'c':
85             if (m_count.GetDefaultValue() == 0)
86             {
87                 error.SetErrorString ("--count option is disabled");
88             }
89             else
90             {
91                 error = m_count.SetValueFromCString (option_arg);
92                 if (m_count.GetCurrentValue() == 0)
93                     error.SetErrorStringWithFormat("invalid --count option value '%s'", option_arg);
94             }
95             break;
96 
97         case 's':
98             if (m_byte_size.GetDefaultValue() == 0)
99             {
100                 error.SetErrorString ("--size option is disabled");
101             }
102             else
103             {
104                 error = m_byte_size.SetValueFromCString (option_arg);
105                 if (m_byte_size.GetCurrentValue() == 0)
106                     error.SetErrorStringWithFormat("invalid --size option value '%s'", option_arg);
107             }
108             break;
109 
110         case 'G':
111             {
112                 char *end = NULL;
113                 const char *gdb_format_cstr = option_arg;
114                 uint64_t count = 0;
115                 if (::isdigit (gdb_format_cstr[0]))
116                 {
117                     count = strtoull (gdb_format_cstr, &end, 0);
118 
119                     if (option_arg != end)
120                         gdb_format_cstr = end;  // We have a valid count, advance the string position
121                     else
122                         count = 0;
123                 }
124 
125                 Format format = eFormatDefault;
126                 uint32_t byte_size = 0;
127 
128                 while (ParserGDBFormatLetter (interpreter, gdb_format_cstr[0], format, byte_size))
129                 {
130                     ++gdb_format_cstr;
131                 }
132 
133                 // We the first character of the "gdb_format_cstr" is not the
134                 // NULL terminator, we didn't consume the entire string and
135                 // something is wrong. Also, if none of the format, size or count
136                 // was specified correctly, then abort.
137                 if (gdb_format_cstr[0] || (format == eFormatInvalid && byte_size == 0 && count == 0))
138                 {
139                     // Nothing got set correctly
140                     error.SetErrorStringWithFormat ("invalid gdb format string '%s'", option_arg);
141                     return error;
142                 }
143 
144                 // At least one of the format, size or count was set correctly.
145                 // Anything that wasn't set correctly should be set to the
146                 // previous default
147                 if (format == eFormatInvalid)
148                     ParserGDBFormatLetter (interpreter, m_prev_gdb_format, format, byte_size);
149 
150                 const bool byte_size_enabled = m_byte_size.GetDefaultValue() < UINT64_MAX;
151                 const bool count_enabled = m_count.GetDefaultValue() < UINT64_MAX;
152                 if (byte_size_enabled)
153                 {
154                     // Byte size is enabled
155                     if (byte_size == 0)
156                         ParserGDBFormatLetter (interpreter, m_prev_gdb_size, format, byte_size);
157                 }
158                 else
159                 {
160                     // Byte size is disabled, make sure it wasn't specified
161                     if (byte_size > 0)
162                     {
163                         error.SetErrorString ("this command doesn't support specifying a byte size");
164                         return error;
165                     }
166                 }
167 
168                 if (count_enabled)
169                 {
170                     // Count is enabled and was not set, set it to the default for gdb format statements (which is 1).
171                     if (count == 0)
172                         count = 1;
173                 }
174                 else
175                 {
176                     // Count is disabled, make sure it wasn't specified
177                     if (count > 0)
178                     {
179                         error.SetErrorString ("this command doesn't support specifying a count");
180                         return error;
181                     }
182                 }
183 
184                 m_format.SetCurrentValue (format);
185                 m_format.SetOptionWasSet ();
186                 if (byte_size_enabled)
187                 {
188                     m_byte_size.SetCurrentValue (byte_size);
189                     m_byte_size.SetOptionWasSet ();
190                 }
191                 if (count_enabled)
192                 {
193                     m_count.SetCurrentValue(count);
194                     m_count.SetOptionWasSet ();
195                 }
196             }
197             break;
198 
199         default:
200             error.SetErrorStringWithFormat ("unrecognized option '%c'", short_option);
201             break;
202     }
203 
204     return error;
205 }
206 
207 bool
ParserGDBFormatLetter(CommandInterpreter & interpreter,char format_letter,Format & format,uint32_t & byte_size)208 OptionGroupFormat::ParserGDBFormatLetter (CommandInterpreter &interpreter, char format_letter, Format &format, uint32_t &byte_size)
209 {
210     m_has_gdb_format = true;
211     switch (format_letter)
212     {
213         case 'o': format = eFormatOctal;        m_prev_gdb_format = format_letter; return true;
214         case 'x': format = eFormatHex;          m_prev_gdb_format = format_letter; return true;
215         case 'd': format = eFormatDecimal;      m_prev_gdb_format = format_letter; return true;
216         case 'u': format = eFormatUnsigned;     m_prev_gdb_format = format_letter; return true;
217         case 't': format = eFormatBinary;       m_prev_gdb_format = format_letter; return true;
218         case 'f': format = eFormatFloat;        m_prev_gdb_format = format_letter; return true;
219         case 'a': format = eFormatAddressInfo;
220         {
221             ExecutionContext exe_ctx(interpreter.GetExecutionContext());
222             Target *target = exe_ctx.GetTargetPtr();
223             if (target)
224                 byte_size = target->GetArchitecture().GetAddressByteSize();
225             m_prev_gdb_format = format_letter;
226             return true;
227         }
228         case 'i': format = eFormatInstruction;  m_prev_gdb_format = format_letter; return true;
229         case 'c': format = eFormatChar;         m_prev_gdb_format = format_letter; return true;
230         case 's': format = eFormatCString;      m_prev_gdb_format = format_letter; return true;
231         case 'T': format = eFormatOSType;       m_prev_gdb_format = format_letter; return true;
232         case 'A': format = eFormatHexFloat;     m_prev_gdb_format = format_letter; return true;
233         case 'b': byte_size = 1;                m_prev_gdb_size = format_letter;   return true;
234         case 'h': byte_size = 2;                m_prev_gdb_size = format_letter;   return true;
235         case 'w': byte_size = 4;                m_prev_gdb_size = format_letter;   return true;
236         case 'g': byte_size = 8;                m_prev_gdb_size = format_letter;   return true;
237         default:  break;
238     }
239     return false;
240 }
241 
242 void
OptionParsingStarting(CommandInterpreter & interpreter)243 OptionGroupFormat::OptionParsingStarting (CommandInterpreter &interpreter)
244 {
245     m_format.Clear();
246     m_byte_size.Clear();
247     m_count.Clear();
248     m_has_gdb_format = false;
249 }
250