1 //===-- Debugger.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/Core/Debugger.h" 11 12 #include <map> 13 14 #include "clang/AST/DeclCXX.h" 15 #include "clang/AST/Type.h" 16 17 #include "lldb/lldb-private.h" 18 #include "lldb/Core/ConnectionFileDescriptor.h" 19 #include "lldb/Core/FormatManager.h" 20 #include "lldb/Core/InputReader.h" 21 #include "lldb/Core/RegisterValue.h" 22 #include "lldb/Core/State.h" 23 #include "lldb/Core/StreamAsynchronousIO.h" 24 #include "lldb/Core/StreamString.h" 25 #include "lldb/Core/Timer.h" 26 #include "lldb/Core/ValueObject.h" 27 #include "lldb/Host/Terminal.h" 28 #include "lldb/Interpreter/CommandInterpreter.h" 29 #include "lldb/Target/TargetList.h" 30 #include "lldb/Target/Process.h" 31 #include "lldb/Target/RegisterContext.h" 32 #include "lldb/Target/StopInfo.h" 33 #include "lldb/Target/Thread.h" 34 35 36 using namespace lldb; 37 using namespace lldb_private; 38 39 40 static uint32_t g_shared_debugger_refcount = 0; 41 static lldb::user_id_t g_unique_id = 1; 42 43 #pragma mark Static Functions 44 45 static Mutex & 46 GetDebuggerListMutex () 47 { 48 static Mutex g_mutex(Mutex::eMutexTypeRecursive); 49 return g_mutex; 50 } 51 52 typedef std::vector<DebuggerSP> DebuggerList; 53 54 static DebuggerList & 55 GetDebuggerList() 56 { 57 // hide the static debugger list inside a singleton accessor to avoid 58 // global init contructors 59 static DebuggerList g_list; 60 return g_list; 61 } 62 63 64 #pragma mark Debugger 65 66 UserSettingsControllerSP & 67 Debugger::GetSettingsController () 68 { 69 static UserSettingsControllerSP g_settings_controller; 70 return g_settings_controller; 71 } 72 73 int 74 Debugger::TestDebuggerRefCount () 75 { 76 return g_shared_debugger_refcount; 77 } 78 79 void 80 Debugger::Initialize () 81 { 82 if (g_shared_debugger_refcount == 0) 83 { 84 lldb_private::Initialize(); 85 } 86 g_shared_debugger_refcount++; 87 88 } 89 90 void 91 Debugger::Terminate () 92 { 93 if (g_shared_debugger_refcount > 0) 94 { 95 g_shared_debugger_refcount--; 96 if (g_shared_debugger_refcount == 0) 97 { 98 lldb_private::WillTerminate(); 99 lldb_private::Terminate(); 100 101 // Clear our master list of debugger objects 102 Mutex::Locker locker (GetDebuggerListMutex ()); 103 GetDebuggerList().clear(); 104 } 105 } 106 } 107 108 void 109 Debugger::SettingsInitialize () 110 { 111 static bool g_initialized = false; 112 113 if (!g_initialized) 114 { 115 g_initialized = true; 116 UserSettingsControllerSP &usc = GetSettingsController(); 117 usc.reset (new SettingsController); 118 UserSettingsController::InitializeSettingsController (usc, 119 SettingsController::global_settings_table, 120 SettingsController::instance_settings_table); 121 // Now call SettingsInitialize for each settings 'child' of Debugger 122 Target::SettingsInitialize (); 123 } 124 } 125 126 void 127 Debugger::SettingsTerminate () 128 { 129 130 // Must call SettingsTerminate() for each settings 'child' of Debugger, before terminating the Debugger's 131 // Settings. 132 133 Target::SettingsTerminate (); 134 135 // Now terminate the Debugger Settings. 136 137 UserSettingsControllerSP &usc = GetSettingsController(); 138 UserSettingsController::FinalizeSettingsController (usc); 139 usc.reset(); 140 } 141 142 DebuggerSP 143 Debugger::CreateInstance () 144 { 145 DebuggerSP debugger_sp (new Debugger); 146 // Scope for locker 147 { 148 Mutex::Locker locker (GetDebuggerListMutex ()); 149 GetDebuggerList().push_back(debugger_sp); 150 } 151 return debugger_sp; 152 } 153 154 void 155 Debugger::Destroy (lldb::DebuggerSP &debugger_sp) 156 { 157 if (debugger_sp.get() == NULL) 158 return; 159 160 Mutex::Locker locker (GetDebuggerListMutex ()); 161 DebuggerList &debugger_list = GetDebuggerList (); 162 DebuggerList::iterator pos, end = debugger_list.end(); 163 for (pos = debugger_list.begin (); pos != end; ++pos) 164 { 165 if ((*pos).get() == debugger_sp.get()) 166 { 167 debugger_list.erase (pos); 168 return; 169 } 170 } 171 172 } 173 174 lldb::DebuggerSP 175 Debugger::GetSP () 176 { 177 lldb::DebuggerSP debugger_sp; 178 179 Mutex::Locker locker (GetDebuggerListMutex ()); 180 DebuggerList &debugger_list = GetDebuggerList(); 181 DebuggerList::iterator pos, end = debugger_list.end(); 182 for (pos = debugger_list.begin(); pos != end; ++pos) 183 { 184 if ((*pos).get() == this) 185 { 186 debugger_sp = *pos; 187 break; 188 } 189 } 190 return debugger_sp; 191 } 192 193 lldb::DebuggerSP 194 Debugger::FindDebuggerWithInstanceName (const ConstString &instance_name) 195 { 196 lldb::DebuggerSP debugger_sp; 197 198 Mutex::Locker locker (GetDebuggerListMutex ()); 199 DebuggerList &debugger_list = GetDebuggerList(); 200 DebuggerList::iterator pos, end = debugger_list.end(); 201 202 for (pos = debugger_list.begin(); pos != end; ++pos) 203 { 204 if ((*pos).get()->m_instance_name == instance_name) 205 { 206 debugger_sp = *pos; 207 break; 208 } 209 } 210 return debugger_sp; 211 } 212 213 TargetSP 214 Debugger::FindTargetWithProcessID (lldb::pid_t pid) 215 { 216 lldb::TargetSP target_sp; 217 Mutex::Locker locker (GetDebuggerListMutex ()); 218 DebuggerList &debugger_list = GetDebuggerList(); 219 DebuggerList::iterator pos, end = debugger_list.end(); 220 for (pos = debugger_list.begin(); pos != end; ++pos) 221 { 222 target_sp = (*pos)->GetTargetList().FindTargetWithProcessID (pid); 223 if (target_sp) 224 break; 225 } 226 return target_sp; 227 } 228 229 230 Debugger::Debugger () : 231 UserID (g_unique_id++), 232 DebuggerInstanceSettings (*GetSettingsController()), 233 m_input_comm("debugger.input"), 234 m_input_file (), 235 m_output_file (), 236 m_error_file (), 237 m_target_list (), 238 m_platform_list (), 239 m_listener ("lldb.Debugger"), 240 m_source_manager (), 241 m_command_interpreter_ap (new CommandInterpreter (*this, eScriptLanguageDefault, false)), 242 m_input_reader_stack (), 243 m_input_reader_data () 244 { 245 m_command_interpreter_ap->Initialize (); 246 // Always add our default platform to the platform list 247 PlatformSP default_platform_sp (Platform::GetDefaultPlatform()); 248 assert (default_platform_sp.get()); 249 m_platform_list.Append (default_platform_sp, true); 250 } 251 252 Debugger::~Debugger () 253 { 254 CleanUpInputReaders(); 255 int num_targets = m_target_list.GetNumTargets(); 256 for (int i = 0; i < num_targets; i++) 257 { 258 ProcessSP process_sp (m_target_list.GetTargetAtIndex (i)->GetProcessSP()); 259 if (process_sp) 260 process_sp->Destroy(); 261 } 262 DisconnectInput(); 263 } 264 265 266 bool 267 Debugger::GetCloseInputOnEOF () const 268 { 269 return m_input_comm.GetCloseOnEOF(); 270 } 271 272 void 273 Debugger::SetCloseInputOnEOF (bool b) 274 { 275 m_input_comm.SetCloseOnEOF(b); 276 } 277 278 bool 279 Debugger::GetAsyncExecution () 280 { 281 return !m_command_interpreter_ap->GetSynchronous(); 282 } 283 284 void 285 Debugger::SetAsyncExecution (bool async_execution) 286 { 287 m_command_interpreter_ap->SetSynchronous (!async_execution); 288 } 289 290 291 void 292 Debugger::SetInputFileHandle (FILE *fh, bool tranfer_ownership) 293 { 294 File &in_file = GetInputFile(); 295 in_file.SetStream (fh, tranfer_ownership); 296 if (in_file.IsValid() == false) 297 in_file.SetStream (stdin, true); 298 299 // Disconnect from any old connection if we had one 300 m_input_comm.Disconnect (); 301 m_input_comm.SetConnection (new ConnectionFileDescriptor (in_file.GetDescriptor(), true)); 302 m_input_comm.SetReadThreadBytesReceivedCallback (Debugger::DispatchInputCallback, this); 303 304 Error error; 305 if (m_input_comm.StartReadThread (&error) == false) 306 { 307 File &err_file = GetErrorFile(); 308 309 err_file.Printf ("error: failed to main input read thread: %s", error.AsCString() ? error.AsCString() : "unkown error"); 310 exit(1); 311 } 312 } 313 314 void 315 Debugger::SetOutputFileHandle (FILE *fh, bool tranfer_ownership) 316 { 317 File &out_file = GetOutputFile(); 318 out_file.SetStream (fh, tranfer_ownership); 319 if (out_file.IsValid() == false) 320 out_file.SetStream (stdout, false); 321 322 GetCommandInterpreter().GetScriptInterpreter()->ResetOutputFileHandle (fh); 323 } 324 325 void 326 Debugger::SetErrorFileHandle (FILE *fh, bool tranfer_ownership) 327 { 328 File &err_file = GetErrorFile(); 329 err_file.SetStream (fh, tranfer_ownership); 330 if (err_file.IsValid() == false) 331 err_file.SetStream (stderr, false); 332 } 333 334 ExecutionContext 335 Debugger::GetSelectedExecutionContext () 336 { 337 ExecutionContext exe_ctx; 338 exe_ctx.Clear(); 339 340 lldb::TargetSP target_sp = GetSelectedTarget(); 341 exe_ctx.target = target_sp.get(); 342 343 if (target_sp) 344 { 345 exe_ctx.process = target_sp->GetProcessSP().get(); 346 if (exe_ctx.process && exe_ctx.process->IsRunning() == false) 347 { 348 exe_ctx.thread = exe_ctx.process->GetThreadList().GetSelectedThread().get(); 349 if (exe_ctx.thread == NULL) 350 exe_ctx.thread = exe_ctx.process->GetThreadList().GetThreadAtIndex(0).get(); 351 if (exe_ctx.thread) 352 { 353 exe_ctx.frame = exe_ctx.thread->GetSelectedFrame().get(); 354 if (exe_ctx.frame == NULL) 355 exe_ctx.frame = exe_ctx.thread->GetStackFrameAtIndex (0).get(); 356 } 357 } 358 } 359 return exe_ctx; 360 361 } 362 363 InputReaderSP 364 Debugger::GetCurrentInputReader () 365 { 366 InputReaderSP reader_sp; 367 368 if (!m_input_reader_stack.IsEmpty()) 369 { 370 // Clear any finished readers from the stack 371 while (CheckIfTopInputReaderIsDone()) ; 372 373 if (!m_input_reader_stack.IsEmpty()) 374 reader_sp = m_input_reader_stack.Top(); 375 } 376 377 return reader_sp; 378 } 379 380 void 381 Debugger::DispatchInputCallback (void *baton, const void *bytes, size_t bytes_len) 382 { 383 if (bytes_len > 0) 384 ((Debugger *)baton)->DispatchInput ((char *)bytes, bytes_len); 385 else 386 ((Debugger *)baton)->DispatchInputEndOfFile (); 387 } 388 389 390 void 391 Debugger::DispatchInput (const char *bytes, size_t bytes_len) 392 { 393 if (bytes == NULL || bytes_len == 0) 394 return; 395 396 WriteToDefaultReader (bytes, bytes_len); 397 } 398 399 void 400 Debugger::DispatchInputInterrupt () 401 { 402 m_input_reader_data.clear(); 403 404 InputReaderSP reader_sp (GetCurrentInputReader ()); 405 if (reader_sp) 406 { 407 reader_sp->Notify (eInputReaderInterrupt); 408 409 // If notifying the reader of the interrupt finished the reader, we should pop it off the stack. 410 while (CheckIfTopInputReaderIsDone ()) ; 411 } 412 } 413 414 void 415 Debugger::DispatchInputEndOfFile () 416 { 417 m_input_reader_data.clear(); 418 419 InputReaderSP reader_sp (GetCurrentInputReader ()); 420 if (reader_sp) 421 { 422 reader_sp->Notify (eInputReaderEndOfFile); 423 424 // If notifying the reader of the end-of-file finished the reader, we should pop it off the stack. 425 while (CheckIfTopInputReaderIsDone ()) ; 426 } 427 } 428 429 void 430 Debugger::CleanUpInputReaders () 431 { 432 m_input_reader_data.clear(); 433 434 // The bottom input reader should be the main debugger input reader. We do not want to close that one here. 435 while (m_input_reader_stack.GetSize() > 1) 436 { 437 InputReaderSP reader_sp (GetCurrentInputReader ()); 438 if (reader_sp) 439 { 440 reader_sp->Notify (eInputReaderEndOfFile); 441 reader_sp->SetIsDone (true); 442 } 443 } 444 } 445 446 void 447 Debugger::NotifyTopInputReader (InputReaderAction notification) 448 { 449 InputReaderSP reader_sp (GetCurrentInputReader()); 450 if (reader_sp) 451 { 452 reader_sp->Notify (notification); 453 454 // Flush out any input readers that are done. 455 while (CheckIfTopInputReaderIsDone ()) 456 /* Do nothing. */; 457 } 458 } 459 460 bool 461 Debugger::InputReaderIsTopReader (const lldb::InputReaderSP& reader_sp) 462 { 463 InputReaderSP top_reader_sp (GetCurrentInputReader()); 464 465 return (reader_sp.get() == top_reader_sp.get()); 466 } 467 468 469 void 470 Debugger::WriteToDefaultReader (const char *bytes, size_t bytes_len) 471 { 472 if (bytes && bytes_len) 473 m_input_reader_data.append (bytes, bytes_len); 474 475 if (m_input_reader_data.empty()) 476 return; 477 478 while (!m_input_reader_stack.IsEmpty() && !m_input_reader_data.empty()) 479 { 480 // Get the input reader from the top of the stack 481 InputReaderSP reader_sp (GetCurrentInputReader ()); 482 if (!reader_sp) 483 break; 484 485 size_t bytes_handled = reader_sp->HandleRawBytes (m_input_reader_data.c_str(), 486 m_input_reader_data.size()); 487 if (bytes_handled) 488 { 489 m_input_reader_data.erase (0, bytes_handled); 490 } 491 else 492 { 493 // No bytes were handled, we might not have reached our 494 // granularity, just return and wait for more data 495 break; 496 } 497 } 498 499 // Flush out any input readers that are done. 500 while (CheckIfTopInputReaderIsDone ()) 501 /* Do nothing. */; 502 503 } 504 505 void 506 Debugger::PushInputReader (const InputReaderSP& reader_sp) 507 { 508 if (!reader_sp) 509 return; 510 511 // Deactivate the old top reader 512 InputReaderSP top_reader_sp (GetCurrentInputReader ()); 513 514 if (top_reader_sp) 515 top_reader_sp->Notify (eInputReaderDeactivate); 516 517 m_input_reader_stack.Push (reader_sp); 518 reader_sp->Notify (eInputReaderActivate); 519 ActivateInputReader (reader_sp); 520 } 521 522 bool 523 Debugger::PopInputReader (const lldb::InputReaderSP& pop_reader_sp) 524 { 525 bool result = false; 526 527 // The reader on the stop of the stack is done, so let the next 528 // read on the stack referesh its prompt and if there is one... 529 if (!m_input_reader_stack.IsEmpty()) 530 { 531 // Cannot call GetCurrentInputReader here, as that would cause an infinite loop. 532 InputReaderSP reader_sp(m_input_reader_stack.Top()); 533 534 if (!pop_reader_sp || pop_reader_sp.get() == reader_sp.get()) 535 { 536 m_input_reader_stack.Pop (); 537 reader_sp->Notify (eInputReaderDeactivate); 538 reader_sp->Notify (eInputReaderDone); 539 result = true; 540 541 if (!m_input_reader_stack.IsEmpty()) 542 { 543 reader_sp = m_input_reader_stack.Top(); 544 if (reader_sp) 545 { 546 ActivateInputReader (reader_sp); 547 reader_sp->Notify (eInputReaderReactivate); 548 } 549 } 550 } 551 } 552 return result; 553 } 554 555 bool 556 Debugger::CheckIfTopInputReaderIsDone () 557 { 558 bool result = false; 559 if (!m_input_reader_stack.IsEmpty()) 560 { 561 // Cannot call GetCurrentInputReader here, as that would cause an infinite loop. 562 InputReaderSP reader_sp(m_input_reader_stack.Top()); 563 564 if (reader_sp && reader_sp->IsDone()) 565 { 566 result = true; 567 PopInputReader (reader_sp); 568 } 569 } 570 return result; 571 } 572 573 void 574 Debugger::ActivateInputReader (const InputReaderSP &reader_sp) 575 { 576 int input_fd = m_input_file.GetFile().GetDescriptor(); 577 578 if (input_fd >= 0) 579 { 580 Terminal tty(input_fd); 581 582 tty.SetEcho(reader_sp->GetEcho()); 583 584 switch (reader_sp->GetGranularity()) 585 { 586 case eInputReaderGranularityByte: 587 case eInputReaderGranularityWord: 588 tty.SetCanonical (false); 589 break; 590 591 case eInputReaderGranularityLine: 592 case eInputReaderGranularityAll: 593 tty.SetCanonical (true); 594 break; 595 596 default: 597 break; 598 } 599 } 600 } 601 602 StreamSP 603 Debugger::GetAsyncOutputStream () 604 { 605 return StreamSP (new StreamAsynchronousIO (GetCommandInterpreter(), 606 CommandInterpreter::eBroadcastBitAsynchronousOutputData)); 607 } 608 609 StreamSP 610 Debugger::GetAsyncErrorStream () 611 { 612 return StreamSP (new StreamAsynchronousIO (GetCommandInterpreter(), 613 CommandInterpreter::eBroadcastBitAsynchronousErrorData)); 614 } 615 616 DebuggerSP 617 Debugger::FindDebuggerWithID (lldb::user_id_t id) 618 { 619 lldb::DebuggerSP debugger_sp; 620 621 Mutex::Locker locker (GetDebuggerListMutex ()); 622 DebuggerList &debugger_list = GetDebuggerList(); 623 DebuggerList::iterator pos, end = debugger_list.end(); 624 for (pos = debugger_list.begin(); pos != end; ++pos) 625 { 626 if ((*pos).get()->GetID() == id) 627 { 628 debugger_sp = *pos; 629 break; 630 } 631 } 632 return debugger_sp; 633 } 634 635 static void 636 TestPromptFormats (StackFrame *frame) 637 { 638 if (frame == NULL) 639 return; 640 641 StreamString s; 642 const char *prompt_format = 643 "{addr = '${addr}'\n}" 644 "{process.id = '${process.id}'\n}" 645 "{process.name = '${process.name}'\n}" 646 "{process.file.basename = '${process.file.basename}'\n}" 647 "{process.file.fullpath = '${process.file.fullpath}'\n}" 648 "{thread.id = '${thread.id}'\n}" 649 "{thread.index = '${thread.index}'\n}" 650 "{thread.name = '${thread.name}'\n}" 651 "{thread.queue = '${thread.queue}'\n}" 652 "{thread.stop-reason = '${thread.stop-reason}'\n}" 653 "{target.arch = '${target.arch}'\n}" 654 "{module.file.basename = '${module.file.basename}'\n}" 655 "{module.file.fullpath = '${module.file.fullpath}'\n}" 656 "{file.basename = '${file.basename}'\n}" 657 "{file.fullpath = '${file.fullpath}'\n}" 658 "{frame.index = '${frame.index}'\n}" 659 "{frame.pc = '${frame.pc}'\n}" 660 "{frame.sp = '${frame.sp}'\n}" 661 "{frame.fp = '${frame.fp}'\n}" 662 "{frame.flags = '${frame.flags}'\n}" 663 "{frame.reg.rdi = '${frame.reg.rdi}'\n}" 664 "{frame.reg.rip = '${frame.reg.rip}'\n}" 665 "{frame.reg.rsp = '${frame.reg.rsp}'\n}" 666 "{frame.reg.rbp = '${frame.reg.rbp}'\n}" 667 "{frame.reg.rflags = '${frame.reg.rflags}'\n}" 668 "{frame.reg.xmm0 = '${frame.reg.xmm0}'\n}" 669 "{frame.reg.carp = '${frame.reg.carp}'\n}" 670 "{function.id = '${function.id}'\n}" 671 "{function.name = '${function.name}'\n}" 672 "{function.addr-offset = '${function.addr-offset}'\n}" 673 "{function.line-offset = '${function.line-offset}'\n}" 674 "{function.pc-offset = '${function.pc-offset}'\n}" 675 "{line.file.basename = '${line.file.basename}'\n}" 676 "{line.file.fullpath = '${line.file.fullpath}'\n}" 677 "{line.number = '${line.number}'\n}" 678 "{line.start-addr = '${line.start-addr}'\n}" 679 "{line.end-addr = '${line.end-addr}'\n}" 680 ; 681 682 SymbolContext sc (frame->GetSymbolContext(eSymbolContextEverything)); 683 ExecutionContext exe_ctx; 684 frame->CalculateExecutionContext(exe_ctx); 685 const char *end = NULL; 686 if (Debugger::FormatPrompt (prompt_format, &sc, &exe_ctx, &sc.line_entry.range.GetBaseAddress(), s, &end)) 687 { 688 printf("%s\n", s.GetData()); 689 } 690 else 691 { 692 printf ("error: at '%s'\n", end); 693 printf ("what we got: %s\n", s.GetData()); 694 } 695 } 696 697 #define IFERROR_PRINT_IT if (error.Fail()) \ 698 { \ 699 if (log) \ 700 log->Printf("ERROR: %s\n", error.AsCString("unknown")); \ 701 break; \ 702 } 703 704 static bool 705 ScanFormatDescriptor(const char* var_name_begin, 706 const char* var_name_end, 707 const char** var_name_final, 708 const char** percent_position, 709 lldb::Format* custom_format, 710 ValueObject::ValueObjectRepresentationStyle* val_obj_display) 711 { 712 LogSP log(lldb_private::GetLogIfAllCategoriesSet (LIBLLDB_LOG_TYPES)); 713 *percent_position = ::strchr(var_name_begin,'%'); 714 if (!*percent_position || *percent_position > var_name_end) 715 { 716 if (log) 717 log->Printf("no format descriptor in string, skipping"); 718 *var_name_final = var_name_end; 719 } 720 else 721 { 722 *var_name_final = *percent_position; 723 char* format_name = new char[var_name_end-*var_name_final]; format_name[var_name_end-*var_name_final-1] = '\0'; 724 memcpy(format_name, *var_name_final+1, var_name_end-*var_name_final-1); 725 if (log) 726 log->Printf("parsing %s as a format descriptor", format_name); 727 if ( !FormatManager::GetFormatFromCString(format_name, 728 true, 729 *custom_format) ) 730 { 731 if (log) 732 log->Printf("%s is an unknown format", format_name); 733 // if this is an @ sign, print ObjC description 734 if (*format_name == '@') 735 *val_obj_display = ValueObject::eDisplayLanguageSpecific; 736 // if this is a V, print the value using the default format 737 else if (*format_name == 'V') 738 *val_obj_display = ValueObject::eDisplayValue; 739 // if this is an L, print the location of the value 740 else if (*format_name == 'L') 741 *val_obj_display = ValueObject::eDisplayLocation; 742 // if this is an S, print the summary after all 743 else if (*format_name == 'S') 744 *val_obj_display = ValueObject::eDisplaySummary; 745 else if (*format_name == '#') 746 *val_obj_display = ValueObject::eDisplayChildrenCount; 747 else if (log) 748 log->Printf("%s is an error, leaving the previous value alone", format_name); 749 } 750 // a good custom format tells us to print the value using it 751 else 752 { 753 if (log) 754 log->Printf("will display value for this VO"); 755 *val_obj_display = ValueObject::eDisplayValue; 756 } 757 delete format_name; 758 } 759 if (log) 760 log->Printf("final format description outcome: custom_format = %d, val_obj_display = %d", 761 *custom_format, 762 *val_obj_display); 763 return true; 764 } 765 766 static bool 767 ScanBracketedRange(const char* var_name_begin, 768 const char* var_name_end, 769 const char* var_name_final, 770 const char** open_bracket_position, 771 const char** separator_position, 772 const char** close_bracket_position, 773 const char** var_name_final_if_array_range, 774 int64_t* index_lower, 775 int64_t* index_higher) 776 { 777 LogSP log(lldb_private::GetLogIfAllCategoriesSet (LIBLLDB_LOG_TYPES)); 778 *open_bracket_position = ::strchr(var_name_begin,'['); 779 if (*open_bracket_position && *open_bracket_position < var_name_final) 780 { 781 *separator_position = ::strchr(*open_bracket_position,'-'); // might be NULL if this is a simple var[N] bitfield 782 *close_bracket_position = ::strchr(*open_bracket_position,']'); 783 // as usual, we assume that [] will come before % 784 //printf("trying to expand a []\n"); 785 *var_name_final_if_array_range = *open_bracket_position; 786 if (*close_bracket_position - *open_bracket_position == 1) 787 { 788 if (log) 789 log->Printf("[] detected.. going from 0 to end of data"); 790 *index_lower = 0; 791 } 792 else if (*separator_position == NULL || *separator_position > var_name_end) 793 { 794 char *end = NULL; 795 *index_lower = ::strtoul (*open_bracket_position+1, &end, 0); 796 *index_higher = *index_lower; 797 if (log) 798 log->Printf("[%d] detected, high index is same",index_lower); 799 } 800 else if (*close_bracket_position && *close_bracket_position < var_name_end) 801 { 802 char *end = NULL; 803 *index_lower = ::strtoul (*open_bracket_position+1, &end, 0); 804 *index_higher = ::strtoul (*separator_position+1, &end, 0); 805 if (log) 806 log->Printf("[%d-%d] detected",index_lower,index_higher); 807 } 808 else 809 { 810 if (log) 811 log->Printf("expression is erroneous, cannot extract indices out of it"); 812 return false; 813 } 814 if (*index_lower > *index_higher && *index_higher > 0) 815 { 816 if (log) 817 log->Printf("swapping indices"); 818 int temp = *index_lower; 819 *index_lower = *index_higher; 820 *index_higher = temp; 821 } 822 } 823 else if (log) 824 log->Printf("no bracketed range, skipping entirely"); 825 return true; 826 } 827 828 829 static ValueObjectSP 830 ExpandExpressionPath(ValueObject* vobj, 831 StackFrame* frame, 832 bool* do_deref_pointer, 833 const char* var_name_begin, 834 const char* var_name_final, 835 Error& error) 836 { 837 LogSP log(lldb_private::GetLogIfAllCategoriesSet (LIBLLDB_LOG_TYPES)); 838 StreamString sstring; 839 VariableSP var_sp; 840 841 if (*do_deref_pointer) 842 { 843 if (log) 844 log->Printf("been told to deref_pointer by caller"); 845 sstring.PutChar('*'); 846 } 847 else if (vobj->IsDereferenceOfParent() && ClangASTContext::IsPointerType(vobj->GetParent()->GetClangType()) && !vobj->IsArrayItemForPointer()) 848 { 849 if (log) 850 log->Printf("decided to deref_pointer myself"); 851 sstring.PutChar('*'); 852 *do_deref_pointer = true; 853 } 854 855 vobj->GetExpressionPath(sstring, true, ValueObject::eHonorPointers); 856 if (log) 857 log->Printf("expression path to expand in phase 0: %s",sstring.GetData()); 858 sstring.PutRawBytes(var_name_begin+3, var_name_final-var_name_begin-3); 859 if (log) 860 log->Printf("expression path to expand in phase 1: %s",sstring.GetData()); 861 std::string name = std::string(sstring.GetData()); 862 ValueObjectSP target = frame->GetValueForVariableExpressionPath (name.c_str(), 863 eNoDynamicValues, 864 0, 865 var_sp, 866 error); 867 return target; 868 } 869 870 static ValueObjectSP 871 ExpandIndexedExpression(ValueObject* vobj, 872 uint32_t index, 873 StackFrame* frame, 874 bool deref_pointer) 875 { 876 LogSP log(lldb_private::GetLogIfAllCategoriesSet (LIBLLDB_LOG_TYPES)); 877 const char* ptr_deref_format = "[%d]"; 878 std::auto_ptr<char> ptr_deref_buffer(new char[10]); 879 ::sprintf(ptr_deref_buffer.get(), ptr_deref_format, index); 880 if (log) 881 log->Printf("name to deref: %s",ptr_deref_buffer.get()); 882 const char* first_unparsed; 883 ValueObject::GetValueForExpressionPathOptions options; 884 ValueObject::ExpressionPathEndResultType final_value_type; 885 ValueObject::ExpressionPathScanEndReason reason_to_stop; 886 ValueObject::ExpressionPathAftermath what_next = (deref_pointer ? ValueObject::eDereference : ValueObject::eNothing); 887 ValueObjectSP item = vobj->GetValueForExpressionPath (ptr_deref_buffer.get(), 888 &first_unparsed, 889 &reason_to_stop, 890 &final_value_type, 891 options, 892 &what_next); 893 if (!item) 894 { 895 if (log) 896 log->Printf("ERROR: unparsed portion = %s, why stopping = %d," 897 " final_value_type %d", 898 first_unparsed, reason_to_stop, final_value_type); 899 } 900 else 901 { 902 if (log) 903 log->Printf("ALL RIGHT: unparsed portion = %s, why stopping = %d," 904 " final_value_type %d", 905 first_unparsed, reason_to_stop, final_value_type); 906 } 907 return item; 908 } 909 910 bool 911 Debugger::FormatPrompt 912 ( 913 const char *format, 914 const SymbolContext *sc, 915 const ExecutionContext *exe_ctx, 916 const Address *addr, 917 Stream &s, 918 const char **end, 919 ValueObject* vobj 920 ) 921 { 922 ValueObject* realvobj = NULL; // makes it super-easy to parse pointers 923 bool success = true; 924 const char *p; 925 LogSP log(lldb_private::GetLogIfAllCategoriesSet (LIBLLDB_LOG_TYPES)); 926 for (p = format; *p != '\0'; ++p) 927 { 928 if (realvobj) 929 { 930 vobj = realvobj; 931 realvobj = NULL; 932 } 933 size_t non_special_chars = ::strcspn (p, "${}\\"); 934 if (non_special_chars > 0) 935 { 936 if (success) 937 s.Write (p, non_special_chars); 938 p += non_special_chars; 939 } 940 941 if (*p == '\0') 942 { 943 break; 944 } 945 else if (*p == '{') 946 { 947 // Start a new scope that must have everything it needs if it is to 948 // to make it into the final output stream "s". If you want to make 949 // a format that only prints out the function or symbol name if there 950 // is one in the symbol context you can use: 951 // "{function =${function.name}}" 952 // The first '{' starts a new scope that end with the matching '}' at 953 // the end of the string. The contents "function =${function.name}" 954 // will then be evaluated and only be output if there is a function 955 // or symbol with a valid name. 956 StreamString sub_strm; 957 958 ++p; // Skip the '{' 959 960 if (FormatPrompt (p, sc, exe_ctx, addr, sub_strm, &p, vobj)) 961 { 962 // The stream had all it needed 963 s.Write(sub_strm.GetData(), sub_strm.GetSize()); 964 } 965 if (*p != '}') 966 { 967 success = false; 968 break; 969 } 970 } 971 else if (*p == '}') 972 { 973 // End of a enclosing scope 974 break; 975 } 976 else if (*p == '$') 977 { 978 // We have a prompt variable to print 979 ++p; 980 if (*p == '{') 981 { 982 ++p; 983 const char *var_name_begin = p; 984 const char *var_name_end = ::strchr (p, '}'); 985 986 if (var_name_end && var_name_begin < var_name_end) 987 { 988 // if we have already failed to parse, skip this variable 989 if (success) 990 { 991 const char *cstr = NULL; 992 Address format_addr; 993 bool calculate_format_addr_function_offset = false; 994 // Set reg_kind and reg_num to invalid values 995 RegisterKind reg_kind = kNumRegisterKinds; 996 uint32_t reg_num = LLDB_INVALID_REGNUM; 997 FileSpec format_file_spec; 998 const RegisterInfo *reg_info = NULL; 999 RegisterContext *reg_ctx = NULL; 1000 bool do_deref_pointer = false; 1001 ValueObject::ExpressionPathScanEndReason reason_to_stop = ValueObject::eEndOfString; 1002 ValueObject::ExpressionPathEndResultType final_value_type = ValueObject::ePlain; 1003 1004 // Each variable must set success to true below... 1005 bool var_success = false; 1006 switch (var_name_begin[0]) 1007 { 1008 case '*': 1009 case 'v': 1010 case 's': 1011 { 1012 if (!vobj) 1013 break; 1014 1015 if (log) 1016 log->Printf("initial string: %s",var_name_begin); 1017 1018 // check for *var and *svar 1019 if (*var_name_begin == '*') 1020 { 1021 do_deref_pointer = true; 1022 var_name_begin++; 1023 } 1024 1025 if (log) 1026 log->Printf("initial string: %s",var_name_begin); 1027 1028 if (*var_name_begin == 's') 1029 { 1030 vobj = vobj->GetSyntheticValue(lldb::eUseSyntheticFilter).get(); 1031 var_name_begin++; 1032 } 1033 1034 if (log) 1035 log->Printf("initial string: %s",var_name_begin); 1036 1037 // should be a 'v' by now 1038 if (*var_name_begin != 'v') 1039 break; 1040 1041 if (log) 1042 log->Printf("initial string: %s",var_name_begin); 1043 1044 ValueObject::ExpressionPathAftermath what_next = (do_deref_pointer ? 1045 ValueObject::eDereference : ValueObject::eNothing); 1046 ValueObject::GetValueForExpressionPathOptions options; 1047 options.DontCheckDotVsArrowSyntax().DoAllowBitfieldSyntax().DoAllowFragileIVar(); 1048 ValueObject::ValueObjectRepresentationStyle val_obj_display = ValueObject::eDisplaySummary; 1049 ValueObject* target = NULL; 1050 lldb::Format custom_format = eFormatInvalid; 1051 const char* var_name_final = NULL; 1052 const char* var_name_final_if_array_range = NULL; 1053 const char* close_bracket_position = NULL; 1054 int64_t index_lower = -1; 1055 int64_t index_higher = -1; 1056 bool is_array_range = false; 1057 const char* first_unparsed; 1058 1059 if (!vobj) break; 1060 // simplest case ${var}, just print vobj's value 1061 if (::strncmp (var_name_begin, "var}", strlen("var}")) == 0) 1062 { 1063 target = vobj; 1064 val_obj_display = ValueObject::eDisplayValue; 1065 } 1066 else if (::strncmp(var_name_begin,"var%",strlen("var%")) == 0) 1067 { 1068 // this is a variable with some custom format applied to it 1069 const char* percent_position; 1070 target = vobj; 1071 val_obj_display = ValueObject::eDisplayValue; 1072 ScanFormatDescriptor (var_name_begin, 1073 var_name_end, 1074 &var_name_final, 1075 &percent_position, 1076 &custom_format, 1077 &val_obj_display); 1078 } 1079 // this is ${var.something} or multiple .something nested 1080 else if (::strncmp (var_name_begin, "var", strlen("var")) == 0) 1081 { 1082 1083 const char* percent_position; 1084 ScanFormatDescriptor (var_name_begin, 1085 var_name_end, 1086 &var_name_final, 1087 &percent_position, 1088 &custom_format, 1089 &val_obj_display); 1090 1091 const char* open_bracket_position; 1092 const char* separator_position; 1093 ScanBracketedRange (var_name_begin, 1094 var_name_end, 1095 var_name_final, 1096 &open_bracket_position, 1097 &separator_position, 1098 &close_bracket_position, 1099 &var_name_final_if_array_range, 1100 &index_lower, 1101 &index_higher); 1102 1103 Error error; 1104 1105 std::auto_ptr<char> expr_path(new char[var_name_final-var_name_begin-1]); 1106 ::memset(expr_path.get(), 0, var_name_final-var_name_begin-1); 1107 memcpy(expr_path.get(), var_name_begin+3,var_name_final-var_name_begin-3); 1108 1109 if (log) 1110 log->Printf("symbol to expand: %s",expr_path.get()); 1111 1112 target = vobj->GetValueForExpressionPath(expr_path.get(), 1113 &first_unparsed, 1114 &reason_to_stop, 1115 &final_value_type, 1116 options, 1117 &what_next).get(); 1118 1119 if (!target) 1120 { 1121 if (log) 1122 log->Printf("ERROR: unparsed portion = %s, why stopping = %d," 1123 " final_value_type %d", 1124 first_unparsed, reason_to_stop, final_value_type); 1125 break; 1126 } 1127 else 1128 { 1129 if (log) 1130 log->Printf("ALL RIGHT: unparsed portion = %s, why stopping = %d," 1131 " final_value_type %d", 1132 first_unparsed, reason_to_stop, final_value_type); 1133 } 1134 } 1135 else 1136 break; 1137 1138 is_array_range = (final_value_type == ValueObject::eBoundedRange || 1139 final_value_type == ValueObject::eUnboundedRange); 1140 1141 do_deref_pointer = (what_next == ValueObject::eDereference); 1142 1143 if (do_deref_pointer && !is_array_range) 1144 { 1145 // I have not deref-ed yet, let's do it 1146 // this happens when we are not going through GetValueForVariableExpressionPath 1147 // to get to the target ValueObject 1148 Error error; 1149 target = target->Dereference(error).get(); 1150 IFERROR_PRINT_IT 1151 do_deref_pointer = false; 1152 } 1153 1154 bool is_array = ClangASTContext::IsArrayType(target->GetClangType()); 1155 bool is_pointer = ClangASTContext::IsPointerType(target->GetClangType()); 1156 1157 if ((is_array || is_pointer) && (!is_array_range) && val_obj_display == ValueObject::eDisplayValue) // this should be wrong, but there are some exceptions 1158 { 1159 if (log) 1160 log->Printf("I am into array || pointer && !range"); 1161 // try to use the special cases 1162 var_success = target->DumpPrintableRepresentation(s,val_obj_display, custom_format); 1163 if (!var_success) 1164 s << "<invalid, please use [] operator>"; 1165 if (log) 1166 log->Printf("special cases did%s match", var_success ? "" : "n't"); 1167 break; 1168 } 1169 1170 if (!is_array_range) 1171 { 1172 if (log) 1173 log->Printf("dumping ordinary printable output"); 1174 var_success = target->DumpPrintableRepresentation(s,val_obj_display, custom_format); 1175 } 1176 else 1177 { 1178 if (log) 1179 log->Printf("checking if I can handle as array"); 1180 if (!is_array && !is_pointer) 1181 break; 1182 if (log) 1183 log->Printf("handle as array"); 1184 const char* special_directions = NULL; 1185 StreamString special_directions_writer; 1186 if (close_bracket_position && (var_name_end-close_bracket_position > 1)) 1187 { 1188 ConstString additional_data; 1189 additional_data.SetCStringWithLength(close_bracket_position+1, var_name_end-close_bracket_position-1); 1190 special_directions_writer.Printf("${%svar%s}", 1191 do_deref_pointer ? "*" : "", 1192 additional_data.GetCString()); 1193 special_directions = special_directions_writer.GetData(); 1194 } 1195 1196 // let us display items index_lower thru index_higher of this array 1197 s.PutChar('['); 1198 var_success = true; 1199 1200 if (index_higher < 0) 1201 index_higher = vobj->GetNumChildren() - 1; 1202 1203 for (;index_lower<=index_higher;index_lower++) 1204 { 1205 ValueObject* item = ExpandIndexedExpression(target, 1206 index_lower, 1207 exe_ctx->frame, 1208 false).get(); 1209 1210 if (!item) 1211 { 1212 if (log) 1213 log->Printf("ERROR in getting child item at index %d", index_lower); 1214 } 1215 else 1216 { 1217 if (log) 1218 log->Printf("special_directions for child item: %s",special_directions); 1219 } 1220 1221 if (!special_directions) 1222 var_success &= item->DumpPrintableRepresentation(s,val_obj_display, custom_format); 1223 else 1224 var_success &= FormatPrompt(special_directions, sc, exe_ctx, addr, s, NULL, item); 1225 1226 if (index_lower < index_higher) 1227 s.PutChar(','); 1228 } 1229 s.PutChar(']'); 1230 } 1231 } 1232 break; 1233 case 'a': 1234 if (::strncmp (var_name_begin, "addr}", strlen("addr}")) == 0) 1235 { 1236 if (addr && addr->IsValid()) 1237 { 1238 var_success = true; 1239 format_addr = *addr; 1240 } 1241 } 1242 break; 1243 1244 case 'p': 1245 if (::strncmp (var_name_begin, "process.", strlen("process.")) == 0) 1246 { 1247 if (exe_ctx && exe_ctx->process != NULL) 1248 { 1249 var_name_begin += ::strlen ("process."); 1250 if (::strncmp (var_name_begin, "id}", strlen("id}")) == 0) 1251 { 1252 s.Printf("%i", exe_ctx->process->GetID()); 1253 var_success = true; 1254 } 1255 else if ((::strncmp (var_name_begin, "name}", strlen("name}")) == 0) || 1256 (::strncmp (var_name_begin, "file.basename}", strlen("file.basename}")) == 0) || 1257 (::strncmp (var_name_begin, "file.fullpath}", strlen("file.fullpath}")) == 0)) 1258 { 1259 ModuleSP exe_module_sp (exe_ctx->process->GetTarget().GetExecutableModule()); 1260 if (exe_module_sp) 1261 { 1262 if (var_name_begin[0] == 'n' || var_name_begin[5] == 'f') 1263 { 1264 format_file_spec.GetFilename() = exe_module_sp->GetFileSpec().GetFilename(); 1265 var_success = format_file_spec; 1266 } 1267 else 1268 { 1269 format_file_spec = exe_module_sp->GetFileSpec(); 1270 var_success = format_file_spec; 1271 } 1272 } 1273 } 1274 } 1275 } 1276 break; 1277 1278 case 't': 1279 if (::strncmp (var_name_begin, "thread.", strlen("thread.")) == 0) 1280 { 1281 if (exe_ctx && exe_ctx->thread) 1282 { 1283 var_name_begin += ::strlen ("thread."); 1284 if (::strncmp (var_name_begin, "id}", strlen("id}")) == 0) 1285 { 1286 s.Printf("0x%4.4x", exe_ctx->thread->GetID()); 1287 var_success = true; 1288 } 1289 else if (::strncmp (var_name_begin, "index}", strlen("index}")) == 0) 1290 { 1291 s.Printf("%u", exe_ctx->thread->GetIndexID()); 1292 var_success = true; 1293 } 1294 else if (::strncmp (var_name_begin, "name}", strlen("name}")) == 0) 1295 { 1296 cstr = exe_ctx->thread->GetName(); 1297 var_success = cstr && cstr[0]; 1298 if (var_success) 1299 s.PutCString(cstr); 1300 } 1301 else if (::strncmp (var_name_begin, "queue}", strlen("queue}")) == 0) 1302 { 1303 cstr = exe_ctx->thread->GetQueueName(); 1304 var_success = cstr && cstr[0]; 1305 if (var_success) 1306 s.PutCString(cstr); 1307 } 1308 else if (::strncmp (var_name_begin, "stop-reason}", strlen("stop-reason}")) == 0) 1309 { 1310 StopInfoSP stop_info_sp = exe_ctx->thread->GetStopInfo (); 1311 if (stop_info_sp) 1312 { 1313 cstr = stop_info_sp->GetDescription(); 1314 if (cstr && cstr[0]) 1315 { 1316 s.PutCString(cstr); 1317 var_success = true; 1318 } 1319 } 1320 } 1321 } 1322 } 1323 else if (::strncmp (var_name_begin, "target.", strlen("target.")) == 0) 1324 { 1325 Target *target = Target::GetTargetFromContexts (exe_ctx, sc); 1326 if (target) 1327 { 1328 var_name_begin += ::strlen ("target."); 1329 if (::strncmp (var_name_begin, "arch}", strlen("arch}")) == 0) 1330 { 1331 ArchSpec arch (target->GetArchitecture ()); 1332 if (arch.IsValid()) 1333 { 1334 s.PutCString (arch.GetArchitectureName()); 1335 var_success = true; 1336 } 1337 } 1338 } 1339 } 1340 break; 1341 1342 1343 case 'm': 1344 if (::strncmp (var_name_begin, "module.", strlen("module.")) == 0) 1345 { 1346 if (sc && sc->module_sp.get()) 1347 { 1348 Module *module = sc->module_sp.get(); 1349 var_name_begin += ::strlen ("module."); 1350 1351 if (::strncmp (var_name_begin, "file.", strlen("file.")) == 0) 1352 { 1353 if (module->GetFileSpec()) 1354 { 1355 var_name_begin += ::strlen ("file."); 1356 1357 if (::strncmp (var_name_begin, "basename}", strlen("basename}")) == 0) 1358 { 1359 format_file_spec.GetFilename() = module->GetFileSpec().GetFilename(); 1360 var_success = format_file_spec; 1361 } 1362 else if (::strncmp (var_name_begin, "fullpath}", strlen("fullpath}")) == 0) 1363 { 1364 format_file_spec = module->GetFileSpec(); 1365 var_success = format_file_spec; 1366 } 1367 } 1368 } 1369 } 1370 } 1371 break; 1372 1373 1374 case 'f': 1375 if (::strncmp (var_name_begin, "file.", strlen("file.")) == 0) 1376 { 1377 if (sc && sc->comp_unit != NULL) 1378 { 1379 var_name_begin += ::strlen ("file."); 1380 1381 if (::strncmp (var_name_begin, "basename}", strlen("basename}")) == 0) 1382 { 1383 format_file_spec.GetFilename() = sc->comp_unit->GetFilename(); 1384 var_success = format_file_spec; 1385 } 1386 else if (::strncmp (var_name_begin, "fullpath}", strlen("fullpath}")) == 0) 1387 { 1388 format_file_spec = *sc->comp_unit; 1389 var_success = format_file_spec; 1390 } 1391 } 1392 } 1393 else if (::strncmp (var_name_begin, "frame.", strlen("frame.")) == 0) 1394 { 1395 if (exe_ctx && exe_ctx->frame) 1396 { 1397 var_name_begin += ::strlen ("frame."); 1398 if (::strncmp (var_name_begin, "index}", strlen("index}")) == 0) 1399 { 1400 s.Printf("%u", exe_ctx->frame->GetFrameIndex()); 1401 var_success = true; 1402 } 1403 else if (::strncmp (var_name_begin, "pc}", strlen("pc}")) == 0) 1404 { 1405 reg_kind = eRegisterKindGeneric; 1406 reg_num = LLDB_REGNUM_GENERIC_PC; 1407 var_success = true; 1408 } 1409 else if (::strncmp (var_name_begin, "sp}", strlen("sp}")) == 0) 1410 { 1411 reg_kind = eRegisterKindGeneric; 1412 reg_num = LLDB_REGNUM_GENERIC_SP; 1413 var_success = true; 1414 } 1415 else if (::strncmp (var_name_begin, "fp}", strlen("fp}")) == 0) 1416 { 1417 reg_kind = eRegisterKindGeneric; 1418 reg_num = LLDB_REGNUM_GENERIC_FP; 1419 var_success = true; 1420 } 1421 else if (::strncmp (var_name_begin, "flags}", strlen("flags}")) == 0) 1422 { 1423 reg_kind = eRegisterKindGeneric; 1424 reg_num = LLDB_REGNUM_GENERIC_FLAGS; 1425 var_success = true; 1426 } 1427 else if (::strncmp (var_name_begin, "reg.", strlen ("reg.")) == 0) 1428 { 1429 reg_ctx = exe_ctx->frame->GetRegisterContext().get(); 1430 if (reg_ctx) 1431 { 1432 var_name_begin += ::strlen ("reg."); 1433 if (var_name_begin < var_name_end) 1434 { 1435 std::string reg_name (var_name_begin, var_name_end); 1436 reg_info = reg_ctx->GetRegisterInfoByName (reg_name.c_str()); 1437 if (reg_info) 1438 var_success = true; 1439 } 1440 } 1441 } 1442 } 1443 } 1444 else if (::strncmp (var_name_begin, "function.", strlen("function.")) == 0) 1445 { 1446 if (sc && (sc->function != NULL || sc->symbol != NULL)) 1447 { 1448 var_name_begin += ::strlen ("function."); 1449 if (::strncmp (var_name_begin, "id}", strlen("id}")) == 0) 1450 { 1451 if (sc->function) 1452 s.Printf("function{0x%8.8x}", sc->function->GetID()); 1453 else 1454 s.Printf("symbol[%u]", sc->symbol->GetID()); 1455 1456 var_success = true; 1457 } 1458 else if (::strncmp (var_name_begin, "name}", strlen("name}")) == 0) 1459 { 1460 if (sc->function) 1461 cstr = sc->function->GetName().AsCString (NULL); 1462 else if (sc->symbol) 1463 cstr = sc->symbol->GetName().AsCString (NULL); 1464 if (cstr) 1465 { 1466 s.PutCString(cstr); 1467 1468 if (sc->block) 1469 { 1470 Block *inline_block = sc->block->GetContainingInlinedBlock (); 1471 if (inline_block) 1472 { 1473 const InlineFunctionInfo *inline_info = sc->block->GetInlinedFunctionInfo(); 1474 if (inline_info) 1475 { 1476 s.PutCString(" [inlined] "); 1477 inline_info->GetName().Dump(&s); 1478 } 1479 } 1480 } 1481 var_success = true; 1482 } 1483 } 1484 else if (::strncmp (var_name_begin, "addr-offset}", strlen("addr-offset}")) == 0) 1485 { 1486 var_success = addr != NULL; 1487 if (var_success) 1488 { 1489 format_addr = *addr; 1490 calculate_format_addr_function_offset = true; 1491 } 1492 } 1493 else if (::strncmp (var_name_begin, "line-offset}", strlen("line-offset}")) == 0) 1494 { 1495 var_success = sc->line_entry.range.GetBaseAddress().IsValid(); 1496 if (var_success) 1497 { 1498 format_addr = sc->line_entry.range.GetBaseAddress(); 1499 calculate_format_addr_function_offset = true; 1500 } 1501 } 1502 else if (::strncmp (var_name_begin, "pc-offset}", strlen("pc-offset}")) == 0) 1503 { 1504 var_success = exe_ctx->frame; 1505 if (var_success) 1506 { 1507 format_addr = exe_ctx->frame->GetFrameCodeAddress(); 1508 calculate_format_addr_function_offset = true; 1509 } 1510 } 1511 } 1512 } 1513 break; 1514 1515 case 'l': 1516 if (::strncmp (var_name_begin, "line.", strlen("line.")) == 0) 1517 { 1518 if (sc && sc->line_entry.IsValid()) 1519 { 1520 var_name_begin += ::strlen ("line."); 1521 if (::strncmp (var_name_begin, "file.", strlen("file.")) == 0) 1522 { 1523 var_name_begin += ::strlen ("file."); 1524 1525 if (::strncmp (var_name_begin, "basename}", strlen("basename}")) == 0) 1526 { 1527 format_file_spec.GetFilename() = sc->line_entry.file.GetFilename(); 1528 var_success = format_file_spec; 1529 } 1530 else if (::strncmp (var_name_begin, "fullpath}", strlen("fullpath}")) == 0) 1531 { 1532 format_file_spec = sc->line_entry.file; 1533 var_success = format_file_spec; 1534 } 1535 } 1536 else if (::strncmp (var_name_begin, "number}", strlen("number}")) == 0) 1537 { 1538 var_success = true; 1539 s.Printf("%u", sc->line_entry.line); 1540 } 1541 else if ((::strncmp (var_name_begin, "start-addr}", strlen("start-addr}")) == 0) || 1542 (::strncmp (var_name_begin, "end-addr}", strlen("end-addr}")) == 0)) 1543 { 1544 var_success = sc && sc->line_entry.range.GetBaseAddress().IsValid(); 1545 if (var_success) 1546 { 1547 format_addr = sc->line_entry.range.GetBaseAddress(); 1548 if (var_name_begin[0] == 'e') 1549 format_addr.Slide (sc->line_entry.range.GetByteSize()); 1550 } 1551 } 1552 } 1553 } 1554 break; 1555 } 1556 1557 if (var_success) 1558 { 1559 // If format addr is valid, then we need to print an address 1560 if (reg_num != LLDB_INVALID_REGNUM) 1561 { 1562 // We have a register value to display... 1563 if (reg_num == LLDB_REGNUM_GENERIC_PC && reg_kind == eRegisterKindGeneric) 1564 { 1565 format_addr = exe_ctx->frame->GetFrameCodeAddress(); 1566 } 1567 else 1568 { 1569 if (reg_ctx == NULL) 1570 reg_ctx = exe_ctx->frame->GetRegisterContext().get(); 1571 1572 if (reg_ctx) 1573 { 1574 if (reg_kind != kNumRegisterKinds) 1575 reg_num = reg_ctx->ConvertRegisterKindToRegisterNumber(reg_kind, reg_num); 1576 reg_info = reg_ctx->GetRegisterInfoAtIndex (reg_num); 1577 var_success = reg_info != NULL; 1578 } 1579 } 1580 } 1581 1582 if (reg_info != NULL) 1583 { 1584 RegisterValue reg_value; 1585 var_success = reg_ctx->ReadRegister (reg_info, reg_value); 1586 if (var_success) 1587 { 1588 reg_value.Dump(&s, reg_info, false, false, eFormatDefault); 1589 } 1590 } 1591 1592 if (format_file_spec) 1593 { 1594 s << format_file_spec; 1595 } 1596 1597 // If format addr is valid, then we need to print an address 1598 if (format_addr.IsValid()) 1599 { 1600 var_success = false; 1601 1602 if (calculate_format_addr_function_offset) 1603 { 1604 Address func_addr; 1605 1606 if (sc) 1607 { 1608 if (sc->function) 1609 { 1610 func_addr = sc->function->GetAddressRange().GetBaseAddress(); 1611 if (sc->block) 1612 { 1613 // Check to make sure we aren't in an inline 1614 // function. If we are, use the inline block 1615 // range that contains "format_addr" since 1616 // blocks can be discontiguous. 1617 Block *inline_block = sc->block->GetContainingInlinedBlock (); 1618 AddressRange inline_range; 1619 if (inline_block && inline_block->GetRangeContainingAddress (format_addr, inline_range)) 1620 func_addr = inline_range.GetBaseAddress(); 1621 } 1622 } 1623 else if (sc->symbol && sc->symbol->GetAddressRangePtr()) 1624 func_addr = sc->symbol->GetAddressRangePtr()->GetBaseAddress(); 1625 } 1626 1627 if (func_addr.IsValid()) 1628 { 1629 if (func_addr.GetSection() == format_addr.GetSection()) 1630 { 1631 addr_t func_file_addr = func_addr.GetFileAddress(); 1632 addr_t addr_file_addr = format_addr.GetFileAddress(); 1633 if (addr_file_addr > func_file_addr) 1634 s.Printf(" + %llu", addr_file_addr - func_file_addr); 1635 else if (addr_file_addr < func_file_addr) 1636 s.Printf(" - %llu", func_file_addr - addr_file_addr); 1637 var_success = true; 1638 } 1639 else 1640 { 1641 Target *target = Target::GetTargetFromContexts (exe_ctx, sc); 1642 if (target) 1643 { 1644 addr_t func_load_addr = func_addr.GetLoadAddress (target); 1645 addr_t addr_load_addr = format_addr.GetLoadAddress (target); 1646 if (addr_load_addr > func_load_addr) 1647 s.Printf(" + %llu", addr_load_addr - func_load_addr); 1648 else if (addr_load_addr < func_load_addr) 1649 s.Printf(" - %llu", func_load_addr - addr_load_addr); 1650 var_success = true; 1651 } 1652 } 1653 } 1654 } 1655 else 1656 { 1657 Target *target = Target::GetTargetFromContexts (exe_ctx, sc); 1658 addr_t vaddr = LLDB_INVALID_ADDRESS; 1659 if (exe_ctx && !target->GetSectionLoadList().IsEmpty()) 1660 vaddr = format_addr.GetLoadAddress (target); 1661 if (vaddr == LLDB_INVALID_ADDRESS) 1662 vaddr = format_addr.GetFileAddress (); 1663 1664 if (vaddr != LLDB_INVALID_ADDRESS) 1665 { 1666 int addr_width = target->GetArchitecture().GetAddressByteSize() * 2; 1667 if (addr_width == 0) 1668 addr_width = 16; 1669 s.Printf("0x%*.*llx", addr_width, addr_width, vaddr); 1670 var_success = true; 1671 } 1672 } 1673 } 1674 } 1675 1676 if (var_success == false) 1677 success = false; 1678 } 1679 p = var_name_end; 1680 } 1681 else 1682 break; 1683 } 1684 else 1685 { 1686 // We got a dollar sign with no '{' after it, it must just be a dollar sign 1687 s.PutChar(*p); 1688 } 1689 } 1690 else if (*p == '\\') 1691 { 1692 ++p; // skip the slash 1693 switch (*p) 1694 { 1695 case 'a': s.PutChar ('\a'); break; 1696 case 'b': s.PutChar ('\b'); break; 1697 case 'f': s.PutChar ('\f'); break; 1698 case 'n': s.PutChar ('\n'); break; 1699 case 'r': s.PutChar ('\r'); break; 1700 case 't': s.PutChar ('\t'); break; 1701 case 'v': s.PutChar ('\v'); break; 1702 case '\'': s.PutChar ('\''); break; 1703 case '\\': s.PutChar ('\\'); break; 1704 case '0': 1705 // 1 to 3 octal chars 1706 { 1707 // Make a string that can hold onto the initial zero char, 1708 // up to 3 octal digits, and a terminating NULL. 1709 char oct_str[5] = { 0, 0, 0, 0, 0 }; 1710 1711 int i; 1712 for (i=0; (p[i] >= '0' && p[i] <= '7') && i<4; ++i) 1713 oct_str[i] = p[i]; 1714 1715 // We don't want to consume the last octal character since 1716 // the main for loop will do this for us, so we advance p by 1717 // one less than i (even if i is zero) 1718 p += i - 1; 1719 unsigned long octal_value = ::strtoul (oct_str, NULL, 8); 1720 if (octal_value <= UINT8_MAX) 1721 { 1722 char octal_char = octal_value; 1723 s.Write (&octal_char, 1); 1724 } 1725 } 1726 break; 1727 1728 case 'x': 1729 // hex number in the format 1730 if (isxdigit(p[1])) 1731 { 1732 ++p; // Skip the 'x' 1733 1734 // Make a string that can hold onto two hex chars plus a 1735 // NULL terminator 1736 char hex_str[3] = { 0,0,0 }; 1737 hex_str[0] = *p; 1738 if (isxdigit(p[1])) 1739 { 1740 ++p; // Skip the first of the two hex chars 1741 hex_str[1] = *p; 1742 } 1743 1744 unsigned long hex_value = strtoul (hex_str, NULL, 16); 1745 if (hex_value <= UINT8_MAX) 1746 s.PutChar (hex_value); 1747 } 1748 else 1749 { 1750 s.PutChar('x'); 1751 } 1752 break; 1753 1754 default: 1755 // Just desensitize any other character by just printing what 1756 // came after the '\' 1757 s << *p; 1758 break; 1759 1760 } 1761 1762 } 1763 } 1764 if (end) 1765 *end = p; 1766 return success; 1767 } 1768 1769 1770 static FormatManager& 1771 GetFormatManager() { 1772 static FormatManager g_format_manager; 1773 return g_format_manager; 1774 } 1775 1776 void 1777 Debugger::Formatting::ForceUpdate() 1778 { 1779 GetFormatManager().Changed(); 1780 } 1781 1782 bool 1783 Debugger::Formatting::ValueFormats::Get(ValueObject& vobj, lldb::DynamicValueType use_dynamic, ValueFormat::SharedPointer &entry) 1784 { 1785 return GetFormatManager().Value().Get(vobj,entry, use_dynamic); 1786 } 1787 1788 void 1789 Debugger::Formatting::ValueFormats::Add(const ConstString &type, const ValueFormat::SharedPointer &entry) 1790 { 1791 GetFormatManager().Value().Add(type.AsCString(),entry); 1792 } 1793 1794 bool 1795 Debugger::Formatting::ValueFormats::Delete(const ConstString &type) 1796 { 1797 return GetFormatManager().Value().Delete(type.AsCString()); 1798 } 1799 1800 void 1801 Debugger::Formatting::ValueFormats::Clear() 1802 { 1803 GetFormatManager().Value().Clear(); 1804 } 1805 1806 void 1807 Debugger::Formatting::ValueFormats::LoopThrough(ValueFormat::ValueCallback callback, void* callback_baton) 1808 { 1809 GetFormatManager().Value().LoopThrough(callback, callback_baton); 1810 } 1811 1812 uint32_t 1813 Debugger::Formatting::ValueFormats::GetCurrentRevision() 1814 { 1815 return GetFormatManager().GetCurrentRevision(); 1816 } 1817 1818 uint32_t 1819 Debugger::Formatting::ValueFormats::GetCount() 1820 { 1821 return GetFormatManager().Value().GetCount(); 1822 } 1823 1824 bool 1825 Debugger::Formatting::GetSummaryFormat(ValueObject& vobj, 1826 lldb::DynamicValueType use_dynamic, 1827 lldb::SummaryFormatSP& entry) 1828 { 1829 return GetFormatManager().Get(vobj, entry, use_dynamic); 1830 } 1831 bool 1832 Debugger::Formatting::GetSyntheticFilter(ValueObject& vobj, 1833 lldb::DynamicValueType use_dynamic, 1834 lldb::SyntheticChildrenSP& entry) 1835 { 1836 return GetFormatManager().Get(vobj, entry, use_dynamic); 1837 } 1838 1839 bool 1840 Debugger::Formatting::Categories::Get(const ConstString &category, lldb::FormatCategorySP &entry) 1841 { 1842 entry = GetFormatManager().Category(category.GetCString()); 1843 return true; 1844 } 1845 1846 void 1847 Debugger::Formatting::Categories::Add(const ConstString &category) 1848 { 1849 GetFormatManager().Category(category.GetCString()); 1850 } 1851 1852 bool 1853 Debugger::Formatting::Categories::Delete(const ConstString &category) 1854 { 1855 GetFormatManager().DisableCategory(category.GetCString()); 1856 return GetFormatManager().Categories().Delete(category.GetCString()); 1857 } 1858 1859 void 1860 Debugger::Formatting::Categories::Clear() 1861 { 1862 GetFormatManager().Categories().Clear(); 1863 } 1864 1865 void 1866 Debugger::Formatting::Categories::Clear(ConstString &category) 1867 { 1868 GetFormatManager().Category(category.GetCString())->ClearSummaries(); 1869 } 1870 1871 void 1872 Debugger::Formatting::Categories::Enable(ConstString& category) 1873 { 1874 if (GetFormatManager().Category(category.GetCString())->IsEnabled() == false) 1875 GetFormatManager().EnableCategory(category.GetCString()); 1876 else 1877 { 1878 GetFormatManager().DisableCategory(category.GetCString()); 1879 GetFormatManager().EnableCategory(category.GetCString()); 1880 } 1881 } 1882 1883 void 1884 Debugger::Formatting::Categories::Disable(ConstString& category) 1885 { 1886 if (GetFormatManager().Category(category.GetCString())->IsEnabled() == true) 1887 GetFormatManager().DisableCategory(category.GetCString()); 1888 } 1889 1890 void 1891 Debugger::Formatting::Categories::LoopThrough(FormatManager::CategoryCallback callback, void* callback_baton) 1892 { 1893 GetFormatManager().LoopThroughCategories(callback, callback_baton); 1894 } 1895 1896 uint32_t 1897 Debugger::Formatting::Categories::GetCurrentRevision() 1898 { 1899 return GetFormatManager().GetCurrentRevision(); 1900 } 1901 1902 uint32_t 1903 Debugger::Formatting::Categories::GetCount() 1904 { 1905 return GetFormatManager().Categories().GetCount(); 1906 } 1907 1908 bool 1909 Debugger::Formatting::NamedSummaryFormats::Get(const ConstString &type, SummaryFormat::SharedPointer &entry) 1910 { 1911 return GetFormatManager().NamedSummary().Get(type.AsCString(),entry); 1912 } 1913 1914 void 1915 Debugger::Formatting::NamedSummaryFormats::Add(const ConstString &type, const SummaryFormat::SharedPointer &entry) 1916 { 1917 GetFormatManager().NamedSummary().Add(type.AsCString(),entry); 1918 } 1919 1920 bool 1921 Debugger::Formatting::NamedSummaryFormats::Delete(const ConstString &type) 1922 { 1923 return GetFormatManager().NamedSummary().Delete(type.AsCString()); 1924 } 1925 1926 void 1927 Debugger::Formatting::NamedSummaryFormats::Clear() 1928 { 1929 GetFormatManager().NamedSummary().Clear(); 1930 } 1931 1932 void 1933 Debugger::Formatting::NamedSummaryFormats::LoopThrough(SummaryFormat::SummaryCallback callback, void* callback_baton) 1934 { 1935 GetFormatManager().NamedSummary().LoopThrough(callback, callback_baton); 1936 } 1937 1938 uint32_t 1939 Debugger::Formatting::NamedSummaryFormats::GetCurrentRevision() 1940 { 1941 return GetFormatManager().GetCurrentRevision(); 1942 } 1943 1944 uint32_t 1945 Debugger::Formatting::NamedSummaryFormats::GetCount() 1946 { 1947 return GetFormatManager().NamedSummary().GetCount(); 1948 } 1949 1950 #pragma mark Debugger::SettingsController 1951 1952 //-------------------------------------------------- 1953 // class Debugger::SettingsController 1954 //-------------------------------------------------- 1955 1956 Debugger::SettingsController::SettingsController () : 1957 UserSettingsController ("", lldb::UserSettingsControllerSP()) 1958 { 1959 m_default_settings.reset (new DebuggerInstanceSettings (*this, false, 1960 InstanceSettings::GetDefaultName().AsCString())); 1961 } 1962 1963 Debugger::SettingsController::~SettingsController () 1964 { 1965 } 1966 1967 1968 lldb::InstanceSettingsSP 1969 Debugger::SettingsController::CreateInstanceSettings (const char *instance_name) 1970 { 1971 DebuggerInstanceSettings *new_settings = new DebuggerInstanceSettings (*GetSettingsController(), 1972 false, instance_name); 1973 lldb::InstanceSettingsSP new_settings_sp (new_settings); 1974 return new_settings_sp; 1975 } 1976 1977 #pragma mark DebuggerInstanceSettings 1978 //-------------------------------------------------- 1979 // class DebuggerInstanceSettings 1980 //-------------------------------------------------- 1981 1982 DebuggerInstanceSettings::DebuggerInstanceSettings 1983 ( 1984 UserSettingsController &owner, 1985 bool live_instance, 1986 const char *name 1987 ) : 1988 InstanceSettings (owner, name ? name : InstanceSettings::InvalidName().AsCString(), live_instance), 1989 m_term_width (80), 1990 m_prompt (), 1991 m_frame_format (), 1992 m_thread_format (), 1993 m_script_lang (), 1994 m_use_external_editor (false), 1995 m_auto_confirm_on (false) 1996 { 1997 // CopyInstanceSettings is a pure virtual function in InstanceSettings; it therefore cannot be called 1998 // until the vtables for DebuggerInstanceSettings are properly set up, i.e. AFTER all the initializers. 1999 // For this reason it has to be called here, rather than in the initializer or in the parent constructor. 2000 // The same is true of CreateInstanceName(). 2001 2002 if (GetInstanceName() == InstanceSettings::InvalidName()) 2003 { 2004 ChangeInstanceName (std::string (CreateInstanceName().AsCString())); 2005 m_owner.RegisterInstanceSettings (this); 2006 } 2007 2008 if (live_instance) 2009 { 2010 const lldb::InstanceSettingsSP &pending_settings = m_owner.FindPendingSettings (m_instance_name); 2011 CopyInstanceSettings (pending_settings, false); 2012 } 2013 } 2014 2015 DebuggerInstanceSettings::DebuggerInstanceSettings (const DebuggerInstanceSettings &rhs) : 2016 InstanceSettings (*Debugger::GetSettingsController(), CreateInstanceName ().AsCString()), 2017 m_prompt (rhs.m_prompt), 2018 m_frame_format (rhs.m_frame_format), 2019 m_thread_format (rhs.m_thread_format), 2020 m_script_lang (rhs.m_script_lang), 2021 m_use_external_editor (rhs.m_use_external_editor), 2022 m_auto_confirm_on(rhs.m_auto_confirm_on) 2023 { 2024 const lldb::InstanceSettingsSP &pending_settings = m_owner.FindPendingSettings (m_instance_name); 2025 CopyInstanceSettings (pending_settings, false); 2026 m_owner.RemovePendingSettings (m_instance_name); 2027 } 2028 2029 DebuggerInstanceSettings::~DebuggerInstanceSettings () 2030 { 2031 } 2032 2033 DebuggerInstanceSettings& 2034 DebuggerInstanceSettings::operator= (const DebuggerInstanceSettings &rhs) 2035 { 2036 if (this != &rhs) 2037 { 2038 m_term_width = rhs.m_term_width; 2039 m_prompt = rhs.m_prompt; 2040 m_frame_format = rhs.m_frame_format; 2041 m_thread_format = rhs.m_thread_format; 2042 m_script_lang = rhs.m_script_lang; 2043 m_use_external_editor = rhs.m_use_external_editor; 2044 m_auto_confirm_on = rhs.m_auto_confirm_on; 2045 } 2046 2047 return *this; 2048 } 2049 2050 bool 2051 DebuggerInstanceSettings::ValidTermWidthValue (const char *value, Error err) 2052 { 2053 bool valid = false; 2054 2055 // Verify we have a value string. 2056 if (value == NULL || value[0] == '\0') 2057 { 2058 err.SetErrorString ("Missing value. Can't set terminal width without a value.\n"); 2059 } 2060 else 2061 { 2062 char *end = NULL; 2063 const uint32_t width = ::strtoul (value, &end, 0); 2064 2065 if (end && end[0] == '\0') 2066 { 2067 if (width >= 10 && width <= 1024) 2068 valid = true; 2069 else 2070 err.SetErrorString ("Invalid term-width value; value must be between 10 and 1024.\n"); 2071 } 2072 else 2073 err.SetErrorStringWithFormat ("'%s' is not a valid unsigned integer string.\n", value); 2074 } 2075 2076 return valid; 2077 } 2078 2079 2080 void 2081 DebuggerInstanceSettings::UpdateInstanceSettingsVariable (const ConstString &var_name, 2082 const char *index_value, 2083 const char *value, 2084 const ConstString &instance_name, 2085 const SettingEntry &entry, 2086 VarSetOperationType op, 2087 Error &err, 2088 bool pending) 2089 { 2090 2091 if (var_name == TermWidthVarName()) 2092 { 2093 if (ValidTermWidthValue (value, err)) 2094 { 2095 m_term_width = ::strtoul (value, NULL, 0); 2096 } 2097 } 2098 else if (var_name == PromptVarName()) 2099 { 2100 UserSettingsController::UpdateStringVariable (op, m_prompt, value, err); 2101 if (!pending) 2102 { 2103 // 'instance_name' is actually (probably) in the form '[<instance_name>]'; if so, we need to 2104 // strip off the brackets before passing it to BroadcastPromptChange. 2105 2106 std::string tmp_instance_name (instance_name.AsCString()); 2107 if ((tmp_instance_name[0] == '[') 2108 && (tmp_instance_name[instance_name.GetLength() - 1] == ']')) 2109 tmp_instance_name = tmp_instance_name.substr (1, instance_name.GetLength() - 2); 2110 ConstString new_name (tmp_instance_name.c_str()); 2111 2112 BroadcastPromptChange (new_name, m_prompt.c_str()); 2113 } 2114 } 2115 else if (var_name == GetFrameFormatName()) 2116 { 2117 UserSettingsController::UpdateStringVariable (op, m_frame_format, value, err); 2118 } 2119 else if (var_name == GetThreadFormatName()) 2120 { 2121 UserSettingsController::UpdateStringVariable (op, m_thread_format, value, err); 2122 } 2123 else if (var_name == ScriptLangVarName()) 2124 { 2125 bool success; 2126 m_script_lang = Args::StringToScriptLanguage (value, eScriptLanguageDefault, 2127 &success); 2128 } 2129 else if (var_name == UseExternalEditorVarName ()) 2130 { 2131 UserSettingsController::UpdateBooleanVariable (op, m_use_external_editor, value, false, err); 2132 } 2133 else if (var_name == AutoConfirmName ()) 2134 { 2135 UserSettingsController::UpdateBooleanVariable (op, m_auto_confirm_on, value, false, err); 2136 } 2137 } 2138 2139 bool 2140 DebuggerInstanceSettings::GetInstanceSettingsValue (const SettingEntry &entry, 2141 const ConstString &var_name, 2142 StringList &value, 2143 Error *err) 2144 { 2145 if (var_name == PromptVarName()) 2146 { 2147 value.AppendString (m_prompt.c_str(), m_prompt.size()); 2148 2149 } 2150 else if (var_name == ScriptLangVarName()) 2151 { 2152 value.AppendString (ScriptInterpreter::LanguageToString (m_script_lang).c_str()); 2153 } 2154 else if (var_name == TermWidthVarName()) 2155 { 2156 StreamString width_str; 2157 width_str.Printf ("%d", m_term_width); 2158 value.AppendString (width_str.GetData()); 2159 } 2160 else if (var_name == GetFrameFormatName ()) 2161 { 2162 value.AppendString(m_frame_format.c_str(), m_frame_format.size()); 2163 } 2164 else if (var_name == GetThreadFormatName ()) 2165 { 2166 value.AppendString(m_thread_format.c_str(), m_thread_format.size()); 2167 } 2168 else if (var_name == UseExternalEditorVarName()) 2169 { 2170 if (m_use_external_editor) 2171 value.AppendString ("true"); 2172 else 2173 value.AppendString ("false"); 2174 } 2175 else if (var_name == AutoConfirmName()) 2176 { 2177 if (m_auto_confirm_on) 2178 value.AppendString ("true"); 2179 else 2180 value.AppendString ("false"); 2181 } 2182 else 2183 { 2184 if (err) 2185 err->SetErrorStringWithFormat ("unrecognized variable name '%s'", var_name.AsCString()); 2186 return false; 2187 } 2188 return true; 2189 } 2190 2191 void 2192 DebuggerInstanceSettings::CopyInstanceSettings (const lldb::InstanceSettingsSP &new_settings, 2193 bool pending) 2194 { 2195 if (new_settings.get() == NULL) 2196 return; 2197 2198 DebuggerInstanceSettings *new_debugger_settings = (DebuggerInstanceSettings *) new_settings.get(); 2199 2200 m_prompt = new_debugger_settings->m_prompt; 2201 if (!pending) 2202 { 2203 // 'instance_name' is actually (probably) in the form '[<instance_name>]'; if so, we need to 2204 // strip off the brackets before passing it to BroadcastPromptChange. 2205 2206 std::string tmp_instance_name (m_instance_name.AsCString()); 2207 if ((tmp_instance_name[0] == '[') 2208 && (tmp_instance_name[m_instance_name.GetLength() - 1] == ']')) 2209 tmp_instance_name = tmp_instance_name.substr (1, m_instance_name.GetLength() - 2); 2210 ConstString new_name (tmp_instance_name.c_str()); 2211 2212 BroadcastPromptChange (new_name, m_prompt.c_str()); 2213 } 2214 m_frame_format = new_debugger_settings->m_frame_format; 2215 m_thread_format = new_debugger_settings->m_thread_format; 2216 m_term_width = new_debugger_settings->m_term_width; 2217 m_script_lang = new_debugger_settings->m_script_lang; 2218 m_use_external_editor = new_debugger_settings->m_use_external_editor; 2219 m_auto_confirm_on = new_debugger_settings->m_auto_confirm_on; 2220 } 2221 2222 2223 bool 2224 DebuggerInstanceSettings::BroadcastPromptChange (const ConstString &instance_name, const char *new_prompt) 2225 { 2226 std::string tmp_prompt; 2227 2228 if (new_prompt != NULL) 2229 { 2230 tmp_prompt = new_prompt ; 2231 int len = tmp_prompt.size(); 2232 if (len > 1 2233 && (tmp_prompt[0] == '\'' || tmp_prompt[0] == '"') 2234 && (tmp_prompt[len-1] == tmp_prompt[0])) 2235 { 2236 tmp_prompt = tmp_prompt.substr(1,len-2); 2237 } 2238 len = tmp_prompt.size(); 2239 if (tmp_prompt[len-1] != ' ') 2240 tmp_prompt.append(" "); 2241 } 2242 EventSP new_event_sp; 2243 new_event_sp.reset (new Event(CommandInterpreter::eBroadcastBitResetPrompt, 2244 new EventDataBytes (tmp_prompt.c_str()))); 2245 2246 if (instance_name.GetLength() != 0) 2247 { 2248 // Set prompt for a particular instance. 2249 Debugger *dbg = Debugger::FindDebuggerWithInstanceName (instance_name).get(); 2250 if (dbg != NULL) 2251 { 2252 dbg->GetCommandInterpreter().BroadcastEvent (new_event_sp); 2253 } 2254 } 2255 2256 return true; 2257 } 2258 2259 const ConstString 2260 DebuggerInstanceSettings::CreateInstanceName () 2261 { 2262 static int instance_count = 1; 2263 StreamString sstr; 2264 2265 sstr.Printf ("debugger_%d", instance_count); 2266 ++instance_count; 2267 2268 const ConstString ret_val (sstr.GetData()); 2269 2270 return ret_val; 2271 } 2272 2273 const ConstString & 2274 DebuggerInstanceSettings::PromptVarName () 2275 { 2276 static ConstString prompt_var_name ("prompt"); 2277 2278 return prompt_var_name; 2279 } 2280 2281 const ConstString & 2282 DebuggerInstanceSettings::GetFrameFormatName () 2283 { 2284 static ConstString prompt_var_name ("frame-format"); 2285 2286 return prompt_var_name; 2287 } 2288 2289 const ConstString & 2290 DebuggerInstanceSettings::GetThreadFormatName () 2291 { 2292 static ConstString prompt_var_name ("thread-format"); 2293 2294 return prompt_var_name; 2295 } 2296 2297 const ConstString & 2298 DebuggerInstanceSettings::ScriptLangVarName () 2299 { 2300 static ConstString script_lang_var_name ("script-lang"); 2301 2302 return script_lang_var_name; 2303 } 2304 2305 const ConstString & 2306 DebuggerInstanceSettings::TermWidthVarName () 2307 { 2308 static ConstString term_width_var_name ("term-width"); 2309 2310 return term_width_var_name; 2311 } 2312 2313 const ConstString & 2314 DebuggerInstanceSettings::UseExternalEditorVarName () 2315 { 2316 static ConstString use_external_editor_var_name ("use-external-editor"); 2317 2318 return use_external_editor_var_name; 2319 } 2320 2321 const ConstString & 2322 DebuggerInstanceSettings::AutoConfirmName () 2323 { 2324 static ConstString use_external_editor_var_name ("auto-confirm"); 2325 2326 return use_external_editor_var_name; 2327 } 2328 2329 //-------------------------------------------------- 2330 // SettingsController Variable Tables 2331 //-------------------------------------------------- 2332 2333 2334 SettingEntry 2335 Debugger::SettingsController::global_settings_table[] = 2336 { 2337 //{ "var-name", var-type, "default", enum-table, init'd, hidden, "help-text"}, 2338 // The Debugger level global table should always be empty; all Debugger settable variables should be instance 2339 // variables. 2340 { NULL, eSetVarTypeNone, NULL, NULL, 0, 0, NULL } 2341 }; 2342 2343 #define MODULE_WITH_FUNC "{ ${module.file.basename}{`${function.name}${function.pc-offset}}}" 2344 #define FILE_AND_LINE "{ at ${line.file.basename}:${line.number}}" 2345 2346 #define DEFAULT_THREAD_FORMAT "thread #${thread.index}: tid = ${thread.id}"\ 2347 "{, ${frame.pc}}"\ 2348 MODULE_WITH_FUNC\ 2349 FILE_AND_LINE\ 2350 "{, stop reason = ${thread.stop-reason}}"\ 2351 "\\n" 2352 2353 //#define DEFAULT_THREAD_FORMAT "thread #${thread.index}: tid = ${thread.id}"\ 2354 // "{, ${frame.pc}}"\ 2355 // MODULE_WITH_FUNC\ 2356 // FILE_AND_LINE\ 2357 // "{, stop reason = ${thread.stop-reason}}"\ 2358 // "{, name = ${thread.name}}"\ 2359 // "{, queue = ${thread.queue}}"\ 2360 // "\\n" 2361 2362 #define DEFAULT_FRAME_FORMAT "frame #${frame.index}: ${frame.pc}"\ 2363 MODULE_WITH_FUNC\ 2364 FILE_AND_LINE\ 2365 "\\n" 2366 2367 SettingEntry 2368 Debugger::SettingsController::instance_settings_table[] = 2369 { 2370 // NAME Setting variable type Default Enum Init'd Hidden Help 2371 // ======================= ======================= ====================== ==== ====== ====== ====================== 2372 { "frame-format", eSetVarTypeString, DEFAULT_FRAME_FORMAT, NULL, false, false, "The default frame format string to use when displaying thread information." }, 2373 { "prompt", eSetVarTypeString, "(lldb) ", NULL, false, false, "The debugger command line prompt displayed for the user." }, 2374 { "script-lang", eSetVarTypeString, "python", NULL, false, false, "The script language to be used for evaluating user-written scripts." }, 2375 { "term-width", eSetVarTypeInt, "80" , NULL, false, false, "The maximum number of columns to use for displaying text." }, 2376 { "thread-format", eSetVarTypeString, DEFAULT_THREAD_FORMAT, NULL, false, false, "The default thread format string to use when displaying thread information." }, 2377 { "use-external-editor", eSetVarTypeBoolean, "false", NULL, false, false, "Whether to use an external editor or not." }, 2378 { "auto-confirm", eSetVarTypeBoolean, "false", NULL, false, false, "If true all confirmation prompts will receive their default reply." }, 2379 { NULL, eSetVarTypeNone, NULL, NULL, false, false, NULL } 2380 }; 2381