void NativeParserTest::PrintList()
{
const TokenList* tokens = m_Parser.GetTokenTree()->GetTokens();
for (TokenList::const_iterator it=tokens->begin(); it!=tokens->end(); ++it)
{
Token* token = (*it);
if (token)
{
wxString log;
log << token->GetTokenKindString() << _T(" ")
<< token->DisplayName() << _T("\t[")
<< token->m_Line << _T(",")
<< token->m_ImplLine << _T("]");
CCLogger::Get()->Log(log);
}
}
}
void CCTestFrame::Start()
{
if (m_ParserCtrl) m_ParserCtrl->SetSelection(1); // make sure "Output" tab is selected
CCTestAppGlobal::s_includeDirs.Clear();
CCTestAppGlobal::s_fileQueue.Clear();
CCTestAppGlobal::s_filesParsed.Clear();
// Obtain all include directories
wxStringTokenizer tkz_inc(m_IncludeCtrl->GetValue(), _T("\r\n"));
while ( tkz_inc.HasMoreTokens() )
{
wxString include = tkz_inc.GetNextToken().Trim(true).Trim(false);
if (!include.IsEmpty())
CCTestAppGlobal::s_includeDirs.Add(include);
}
if (m_DoHeadersCtrl->IsChecked())
{
// Obtain all priority header files
wxStringTokenizer tkz_hdr(m_HeadersCtrl->GetValue(), _T(","));
while (tkz_hdr.HasMoreTokens())
{
wxString header = tkz_hdr.GetNextToken().Trim(false).Trim(true);
// Remove <> (if any)
int lt = header.Find(wxT('<')); int gt = header.Find(wxT('>'),true);
if (lt!=wxNOT_FOUND && gt!=wxNOT_FOUND && gt>lt)
header = header.AfterFirst(wxT('<')).BeforeLast(wxT('>'));
// Remove "" (if any)
int oq = header.Find(wxT('"')); int cq = header.Find(wxT('"'),true);
if (oq!=wxNOT_FOUND && cq!=wxNOT_FOUND && cq>oq)
header = header.AfterFirst(wxT('"')).BeforeLast(wxT('"'));
header = header.Trim(false).Trim(true);
// Find the header files in include path's as provided
// (practically the same as ParserBase::FindFileInIncludeDirs())
for (size_t i=0; i<CCTestAppGlobal::s_includeDirs.GetCount(); ++i)
{
// Normalize the path (as in C::B's "NormalizePath()")
wxFileName f_header(header);
wxString base_path(CCTestAppGlobal::s_includeDirs[i]);
if (f_header.Normalize(wxPATH_NORM_ALL & ~wxPATH_NORM_CASE, base_path))
{
wxString this_header = f_header.GetFullPath();
if ( ::wxFileExists(this_header) )
CCTestAppGlobal::s_fileQueue.Add(this_header);
}
}
}
}
if (CCTestAppGlobal::s_fileQueue.IsEmpty() && !m_Control->GetLength())
{
wxMessageBox(wxT("Main file not found and buffer empty. Nothing to do."),
_("Information"), wxOK | wxICON_INFORMATION, this);
return;
}
if (m_DoHideCtrl && m_DoHideCtrl->IsChecked()) Hide();
m_ProgDlg = new wxProgressDialog(_T("Please wait, operating..."), _("Preparing...\nPlease wait..."), 0, this, wxPD_APP_MODAL);
m_ProgDlg->SetSize(640,100);
m_ProgDlg->Layout();
m_ProgDlg->CenterOnParent();
m_LogCount = 0;
m_LogCtrl->Clear();
CCTest::Get()->Clear(); // initial clearance
// make sure not to over-write an existing file (in case content had changed)
wxString tf(wxFileName::CreateTempFileName(wxT("cc")));
// make the parser recognise it as header file:
wxFileName fn(tf); fn.SetExt(wxT("h")); wxRemoveFile(tf); // no longer needed
if (m_Control->SaveFile(fn.GetFullPath()))
CCTestAppGlobal::s_fileQueue.Add(fn.GetFullPath());
else
AppendToLog(_T("Unable to parse buffer (could not convert to file)."));
AppendToLog(_T("--------------M-a-i-n--L-o-g--------------\r\n\r\n"));
// parse file from the queue one-by-one
while (!CCTestAppGlobal::s_fileQueue.IsEmpty())
{
wxString file = CCTestAppGlobal::s_fileQueue.Item(0);
CCTestAppGlobal::s_fileQueue.Remove(file);
if (file.IsEmpty()) continue;
AppendToLog(_T("-----------I-n-t-e-r-i-m--L-o-g-----------"));
m_CurrentFile = file;
m_ProgDlg->Update(-1, m_CurrentFile);
m_StatuBar->SetStatusText(m_CurrentFile);
// This is the core parse stage for files
CCTest::Get()->Start(m_CurrentFile);
CCTestAppGlobal::s_filesParsed.Add(m_CurrentFile); // done
}
// don't forget to remove the temporary file (w/ ".h" extension)
wxRemoveFile(fn.GetFullPath());
m_ProgDlg->Update(-1, wxT("Creating tree log..."));
AppendToLog(_T("--------------T-r-e-e--L-o-g--------------\r\n"));
CCTest::Get()->PrintTree();
m_ProgDlg->Update(-1, wxT("Creating list log..."));
AppendToLog(_T("--------------L-i-s-t--L-o-g--------------\r\n"));
CCTest::Get()->PrintList();
if (m_DoTreeCtrl->IsChecked())
{
m_ProgDlg->Update(-1, wxT("Serializing tree..."));
Freeze();
m_TreeCtrl->SetValue( CCTest::Get()->SerializeTree() );
Thaw();
}
// Here we are going to test the expression solving algorithm
NativeParserTest nativeParserTest;
wxString exp = _T("obj.m_Member1");
TokenIdxSet searchScope;
searchScope.insert(-1);
TokenIdxSet result;
TokenTree *tree = CCTest::Get()->GetTokenTree();
nativeParserTest.TestExpression(exp,
tree,
searchScope,
result );
wxLogMessage(_T("Result have %lu matches"), static_cast<unsigned long>(result.size()));
for (TokenIdxSet::iterator it=result.begin(); it!=result.end(); ++it)
{
Token* token = tree->at(*it);
if (token)
{
wxString log;
log << token->GetTokenKindString() << _T(" ")
<< token->DisplayName() << _T("\t[")
<< token->m_Line << _T(",")
<< token->m_ImplLine << _T("]");
CCLogger::Get()->Log(log);
}
}
if (m_ProgDlg) { delete m_ProgDlg; m_ProgDlg = 0; }
if ( !IsShown() ) Show();
TokenTree* tt = CCTest::Get()->GetTokenTree();
if (tt)
{
AppendToLog((wxString::Format(_("The parser contains %lu tokens, found in %lu files."),
static_cast<unsigned long>(tt->size()), static_cast<unsigned long>(tt->m_FileMap.size()))));
}
}
void CCDebugInfo::OnSave(wxCommandEvent& /*event*/)
{
TokensTree* tokens = m_Parser->GetTokensTree();
wxArrayString saveWhat;
saveWhat.Add(_("Dump the tokens tree"));
saveWhat.Add(_("Dump the file list"));
saveWhat.Add(_("Dump the list of include directories"));
saveWhat.Add(_("Dump the token list of files"));
int sel = wxGetSingleChoiceIndex(_("What do you want to save?"),
_("CC Debug Info"), saveWhat, this);
switch (sel)
{
case -1:
// cancelled
return;
case 0:
{
wxString tt;
{ // life time of wxWindowDisabler/wxBusyInfo
wxWindowDisabler disableAll;
wxBusyInfo running(_("Obtaining tokens tree... please wait (this may take several seconds)..."),
Manager::Get()->GetAppWindow());
tt = tokens->m_Tree.dump();
}
SaveCCDebugInfo(_("Save tokens tree"), tt);
}
break;
case 1:
{
wxString files;
for (size_t i = 0; i < tokens->m_FilenamesMap.size(); ++i)
{
wxString file = tokens->m_FilenamesMap.GetString(i);
if (!file.IsEmpty())
files += file + _T("\r\n");
}
SaveCCDebugInfo(_("Save file list"), files);
}
break;
case 2:
{
wxString dirs;
const wxArrayString& dirsArray = m_Parser->GetIncludeDirs();
for (size_t i = 0; i < dirsArray.GetCount(); ++i)
{
const wxString& dir = dirsArray[i];
if (!dir.IsEmpty())
dirs += dir + _T("\r\n");
}
SaveCCDebugInfo(_("Save list of include directories"), dirs);
}
break;
case 3:
{
wxString fileTokens;
{
wxWindowDisabler disableAll;
wxBusyInfo running(_("Obtaining tokens tree... please wait (this may take several seconds)..."),
Manager::Get()->GetAppWindow());
for (size_t i = 0; i < tokens->m_FilenamesMap.size(); ++i)
{
const wxString file = tokens->m_FilenamesMap.GetString(i);
if (!file.IsEmpty())
{
fileTokens += file + _T("\r\n");
TokenIdxSet result;
tokens->FindTokensInFile(file, result, tkUndefined);
for (TokenIdxSet::iterator it = result.begin(); it != result.end(); ++it)
{
Token* token = tokens->at(*it);
fileTokens << token->GetTokenKindString() << _T(" ");
if (token->m_TokenKind == tkFunction)
fileTokens << token->m_Name << token->GetFormattedArgs() << _T("\t");
else
fileTokens << token->DisplayName() << _T("\t");
fileTokens << _T("[") << token->m_Line << _T(",") << token->m_ImplLine << _T("]");
fileTokens << _T("\r\n");
}
}
fileTokens += _T("\r\n");
}
}
SaveCCDebugInfo(_("Save token list of files"), fileTokens);
}
break;
default:
cbMessageBox(_("Invalid selection."), _("CC Debug Info"));
}
}