diff options
| author | neodarz <neodarz@neodarz.net> | 2018-08-11 20:21:34 +0200 |
|---|---|---|
| committer | neodarz <neodarz@neodarz.net> | 2018-08-11 20:21:34 +0200 |
| commit | 0ea5fc66924303d1bf73ba283a383e2aadee02f2 (patch) | |
| tree | 2568e71a7ccc44ec23b8bb3f0ff97fb6bf2ed709 /docs/doxygen/nel/code__branche__run__debug_8cpp-source.html | |
| download | nevrax-website-self-hostable-0ea5fc66924303d1bf73ba283a383e2aadee02f2.tar.xz nevrax-website-self-hostable-0ea5fc66924303d1bf73ba283a383e2aadee02f2.zip | |
Initial commit
Diffstat (limited to 'docs/doxygen/nel/code__branche__run__debug_8cpp-source.html')
| -rw-r--r-- | docs/doxygen/nel/code__branche__run__debug_8cpp-source.html | 688 |
1 files changed, 688 insertions, 0 deletions
diff --git a/docs/doxygen/nel/code__branche__run__debug_8cpp-source.html b/docs/doxygen/nel/code__branche__run__debug_8cpp-source.html new file mode 100644 index 00000000..6b7cccde --- /dev/null +++ b/docs/doxygen/nel/code__branche__run__debug_8cpp-source.html @@ -0,0 +1,688 @@ +<!doctype html public "-//W3C//DTD HTML 4.0 Transitional//EN" "http://www.w3.org/TR/REC-html40/loose.dtd"> +<HTML> +<HEAD> + <TITLE>nevrax.org : docs</TITLE> + <LINK REL=stylesheet TYPE="text/css" HREF="http://www.nevrax.org/inc/css/nevrax.css"> + <link href="doxygen.css" rel="stylesheet" type="text/css"> +</HEAD> +<BODY MARGINHEIGHT="0" MARGINWIDTH="0"> + +<!-- uplinks --> +<TABLE CELLSPACING=0 CELLPADDING=0 BORDER=0> + <TR> + <TD WIDTH=16><IMG SRC="http://www.nevrax.org/inc/img/pixel.gif" WIDTH="16" HEIGHT="16" BORDER=0 ALT=""></TD> + <TD WIDTH=140 BGCOLOR=#dddddd><IMG SRC="http://www.nevrax.org/inc/img/pixel.gif" WIDTH="140" HEIGHT="16" BORDER=0 ALT=""></TD> + <TD WIDTH=16><IMG SRC="http://www.nevrax.org/inc/img/pixel.gif" WIDTH="16" HEIGHT="16" BORDER=0 ALT=""></TD> + <TD><IMG width=6 height=14 SRC="http://www.nevrax.org/inc/img/reddots.gif" ALT="#" VSPACE=2 HSPACE=2 BORDER=0 ></TD><TD VALIGN=middle> <A CLASS=uplinks HREF=http://www.nevrax.org><b>Home</B></FONT></A> </TD> + <TD><IMG width=6 height=14 SRC="http://www.nevrax.org/inc/img/reddots.gif" ALT="#" VSPACE=2 HSPACE=2 BORDER=0 ></TD><TD VALIGN=middle> <A CLASS=uplinks HREF=http://www.nevrax.com><b>nevrax.com</B></FONT></A> </TD> + </TR> +</TABLE> + +<!-- banner Nevrax --> +<TABLE CELLSPACING=0 CELLPADDING=0 BORDER=0 WIDTH=100%> + <TR><TD BGCOLOR="#000000" BACKGROUND="http://www.nevrax.org/inc/img/black_banner.jpg"><A HREF="http://www.nevrax.org"><IMG SRC="http://www.nevrax.org/inc/img/nevrax.gif" WIDTH="170" HEIGHT="45" BORDER=0 ALT="Nevrax" ></A></TD></TR> +</TABLE> + +<!-- main table --> +<TABLE CELLSPACING=0 CELLPADDING=0 BORDER=0 height=100%> + <TR> + <TD WIDTH=16><IMG SRC="http://www.nevrax.org/inc/img/pixel.gif" WIDTH="16" HEIGHT="10" BORDER=0 ALT=""></TD> + <TD WIDTH=140 BGCOLOR=#dddddd VALIGN=TOP ALIGN=middle><IMG SRC="http://www.nevrax.org/inc/img/pixel.gif" WIDTH="140" HEIGHT="10" BORDER=0 ALT=""> + + <!------ Begin Box ------> + <TABLE BORDER=0 CELLSPACING=0 CELLPADDING=0 BGCOLOR=black><TR><TD><TABLE border=0 cellspacing=2 cellpadding=0 width=120><tr><TD ALIGN=middle bgcolor=black> + <FONT COLOR=white FACE="sans-serif"><B>Nevrax.org</B></FONT></TD></TR><tr><td colspan=2 bgcolor=#FFFFFF> + <TABLE cellspacing=0 cellpadding=1 border=0> + <tr><td ALIGN=middle><a class='linkbox' href="http://www.nevrax.org/news/" TITLE="Rubrique news"><img width=13 height=15 hspace=5 border=0 src=http://www.nevrax.org/inc/img/picto-news.gif ALT=#></A></td><td><a class='linkbox' href="http://www.nevrax.org/news/" TITLE="News">News</a></td></tr> + <tr><td ALIGN=middle><a class='linkbox' href="http://www.nevrax.org/mail/" TITLE="Rubrique mail"><img width=15 height=11 hspace=5 border=0 src=http://www.nevrax.org/inc/img/picto-mail.gif ALT=#></A></td><td><a class='linkbox' href="http://www.nevrax.org/mail/" TITLE="Mailing list archive">Mailing-list</a></td></tr> + <tr><td ALIGN=middle><a class='linkbox' href="http://www.nevrax.org/docs/" TITLE="Rubrique docs"><img width=14 height=16 hspace=5 border=0 src=http://www.nevrax.org/inc/img/picto-docs.gif ALT=#></A></td><td><a class='linkbox' href="http://www.nevrax.org/docs/" TITLE="Documentation">Documentation</a></td></tr> + <tr><td ALIGN=middle><a class='linkbox' href="http://www.nevrax.org/cvs/" TITLE="Rubrique cvs"><img width=13 height=17 hspace=5 border=0 src=http://www.nevrax.org/inc/img/picto-cvs.gif ALT=#></A></td><td><a class='linkbox' href="http://www.nevrax.org/cvs/" TITLE="CVS Web">CVS</a></td></tr> + <tr><td ALIGN=middle><a class='linkbox' href="http://www.nevrax.org/bugs/" TITLE="Rubrique bugs"><img width=20 height=16 hspace=5 border=0 src=http://www.nevrax.org/inc/img/picto-bugs.gif ALT=#></A></td><td><a class='linkbox' href="http://www.nevrax.org/bugs/" TITLE="Bugtracking">Bugs</a></td></tr> + <tr><td ALIGN=middle><a class='linkbox' href="http://www.nevrax.org/GPL.php3" TITLE="Rubrique license"><img width=18 height=12 hspace=5 border=0 src=http://www.nevrax.org/inc/img/picto-gpl.gif ALT=#></A></td><td><a class='linkbox' href="http://www.nevrax.org/GPL.php3" TITLE="License">License</a></td></tr> + </TABLE> + </TD></TR></TABLE></TD></TR></TABLE> + <!------ End Box ------> + + </TD> + <TD WIDTH=15><IMG SRC="http://www.nevrax.org/inc/img/pixel.gif" WIDTH="16" HEIGHT="16" BORDER=0 ALT=""></TD> + <TD ALIGN=left valign=top><IMG SRC="http://www.nevrax.org/inc/img/pixel.gif" WIDTH="140" HEIGHT="10" BORDER=0 ALT=""> + +<!-- title --> +<TABLE background="http://www.nevrax.org/inc/img/redline.gif" CELLSPACING=0 CELLPADDING=0 BORDER=0 width=100%><tr><td> +<A HREF="http://www.nevrax.org/docs/"><img src="http://www.nevrax.org/inc/img/t_docs.gif" ALT="Docs" HEIGHT=20 BORDER=0></A> +</td><td><IMG SRC="http://www.nevrax.org/inc/img/pixel.gif" WIDTH="1" HEIGHT="1" BORDER=0 ALT=""> +</td></tr></table> + + +<!-- block --> +<TABLE bgcolor="#dddddd" CELLSPACING=0 CELLPADDING=0 BORDER=0 width=100%><tr><td width=1% valign=middle><img width=6 height=14 hspace=2 vspace=2 src="http://www.nevrax.org/inc/img/reddots.gif"></TD> + <TD><B>Documentation</B></TD> + <TD ALIGN=RIGHT> </td> +</tr></table> +<!-- Generated by Doxygen 1.2.14 --> +<center> +<a class="qindex" href="index.html">Main Page</a> <a class="qindex" href="namespaces.html">Namespace List</a> <a class="qindex" href="hierarchy.html">Class Hierarchy</a> <a class="qindex" href="classes.html">Alphabetical List</a> <a class="qindex" href="annotated.html">Compound List</a> <a class="qindex" href="files.html">File List</a> <a class="qindex" href="namespacemembers.html">Namespace Members</a> <a class="qindex" href="functions.html">Compound Members</a> <a class="qindex" href="globals.html">File Members</a> <a class="qindex" href="pages.html">Related Pages</a> <a class="qindexRef" doxygen="_cgi:http://www.nevrax.org/cgi-bin/nel-search.cgi" href="http://www.nevrax.org/cgi-bin/nel-search.cgi">Search</a> </center> +<hr><h1>code_branche_run_debug.cpp</h1><a href="code__branche__run__debug_8cpp.html">Go to the documentation of this file.</a><div class="fragment"><pre>00001 +00006 <font class="comment">/* Copyright, 2000 Nevrax Ltd.</font> +00007 <font class="comment"> *</font> +00008 <font class="comment"> * This file is part of NEVRAX NEL.</font> +00009 <font class="comment"> * NEVRAX NEL is free software; you can redistribute it and/or modify</font> +00010 <font class="comment"> * it under the terms of the GNU General Public License as published by</font> +00011 <font class="comment"> * the Free Software Foundation; either version 2, or (at your option)</font> +00012 <font class="comment"> * any later version.</font> +00013 <font class="comment"></font> +00014 <font class="comment"> * NEVRAX NEL is distributed in the hope that it will be useful, but</font> +00015 <font class="comment"> * WITHOUT ANY WARRANTY; without even the implied warranty of</font> +00016 <font class="comment"> * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU</font> +00017 <font class="comment"> * General Public License for more details.</font> +00018 <font class="comment"></font> +00019 <font class="comment"> * You should have received a copy of the GNU General Public License</font> +00020 <font class="comment"> * along with NEVRAX NEL; see the file COPYING. If not, write to the</font> +00021 <font class="comment"> * Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,</font> +00022 <font class="comment"> * MA 02111-1307, USA.</font> +00023 <font class="comment"> */</font> +00024 +00025 <font class="preprocessor">#include "<a class="code" href="code__branche__run__debug_8h.html">nel/ai/script/code_branche_run_debug.h</a>"</font> +00026 <font class="preprocessor">#include "<a class="code" href="varstack_8h.html">nel/ai/script/varstack.h</a>"</font> +00027 +00028 <font class="preprocessor">#ifdef NL_DEBUG</font> +00029 <font class="preprocessor"></font><font class="preprocessor">#ifdef NL_OS_WINDOWS</font> +00030 <font class="preprocessor"></font><font class="preprocessor">#include "windows.h"</font> +00031 <font class="preprocessor">#endif</font> +00032 <font class="preprocessor"></font><font class="preprocessor">#endif</font> +00033 <font class="preprocessor"></font> +00034 <font class="keyword">namespace </font>NLAISCRIPT +00035 { +00036 <font class="comment">/*</font> +00037 <font class="comment"> * Constructor</font> +00038 <font class="comment"> */</font> +00039 +<a name="l00040"></a><a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#c0">00040</a> <font class="keywordtype">void</font> CCodeBrancheRunDebug::initCBRD() +00041 { +00042 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#o0">_LineInSourceCodeArray</a> = <font class="keyword">new</font> <font class="keywordtype">int</font>[<a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#n2">_Count</a>]; +00043 <font class="keywordflow">for</font>(sint32 i = 0 ;i < <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#n2">_Count</a>; i ++) +00044 { +00045 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#o0">_LineInSourceCodeArray</a>[i] = 0; <font class="comment">// It's a mark, because 0 could'nt be a true value.</font> +00046 } +00047 } +00048 +<a name="l00049"></a><a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#a0">00049</a> CCodeBrancheRunDebug::CCodeBrancheRunDebug(sint32 N,<font class="keyword">const</font> IOpCode &op): +00050 CCodeBrancheRun(N, op), _SourceCode(NULL) +00051 { +00052 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#c0">initCBRD</a>(); +00053 } +00054 +<a name="l00055"></a><a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#a1">00055</a> CCodeBrancheRunDebug::CCodeBrancheRunDebug(sint32 N, IScriptDebugSource* sourceCode): +00056 CCodeBrancheRun(N), +00057 _SourceCode(sourceCode) +00058 { +00059 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#o1">_SourceCode</a>->incRef(); +00060 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#c0">initCBRD</a>(); +00061 } +00062 +<a name="l00063"></a><a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#a2">00063</a> CCodeBrancheRunDebug::CCodeBrancheRunDebug(<font class="keyword">const</font> <a class="code" href="classstd_1_1list.html">tListCode</a> &<a class="code" href="namespaceNLAISCRIPT.html#a20">l</a>): +00064 CCodeBrancheRun(<a class="code" href="namespaceNLAISCRIPT.html#a20">l</a>), +00065 _SourceCode(NULL) +00066 { +00067 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#c0">initCBRD</a>(); +00068 } +00069 +<a name="l00070"></a><a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#a3">00070</a> CCodeBrancheRunDebug::CCodeBrancheRunDebug(<font class="keyword">const</font> CCodeBrancheRunDebug &<a class="code" href="namespaceNLAISCRIPT.html#a20">l</a>): +00071 CCodeBrancheRun(<a class="code" href="namespaceNLAISCRIPT.html#a20">l</a>), +00072 _LineInSourceCodeArray(NULL), +00073 _SourceCode(<a class="code" href="namespaceNLAISCRIPT.html#a20">l</a>._SourceCode) +00074 { +00075 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#o1">_SourceCode</a>->incRef(); +00076 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#c0">initCBRD</a>(); +00077 <font class="keywordflow">for</font>(sint32 i = 0 ;i < <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#n2">_Count</a>; i ++) +00078 { +00079 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#o0">_LineInSourceCodeArray</a>[i] = <a class="code" href="namespaceNLAISCRIPT.html#a20">l</a>._LineInSourceCodeArray[i]; +00080 } +00081 } +00082 +<a name="l00083"></a><a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#a4">00083</a> CCodeBrancheRunDebug::~CCodeBrancheRunDebug() +00084 { +00085 <font class="keyword">delete</font> []<a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#o0">_LineInSourceCodeArray</a>; +00086 <font class="keywordflow">if</font> (_SourceCode) <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#o1">_SourceCode</a>->release(); +00087 } +00088 +<a name="l00089"></a><a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#z213_1">00089</a> <font class="keyword">const</font> <a class="code" href="classNLAIC_1_1IBasicType.html">NLAIC::IBasicType</a>* CCodeBrancheRunDebug::clone()<font class="keyword"> const </font> +00090 <font class="keyword"> </font>{ +00091 <a class="code" href="classNLAIC_1_1IBasicType.html">NLAIC::IBasicType</a> *<a class="code" href="driver__opengl__extension__def_8h.html#a364">x</a> = <font class="keyword">new</font> <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#a0">CCodeBrancheRunDebug</a>(*<font class="keyword">this</font>); +00092 <font class="keywordflow">return</font> x; +00093 } +00094 +<a name="l00095"></a><a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#z213_2">00095</a> <font class="keyword">const</font> <a class="code" href="classNLAIC_1_1IBasicType.html">NLAIC::IBasicType</a> *CCodeBrancheRunDebug::newInstance()<font class="keyword"> const </font> +00096 <font class="keyword"> </font>{ +00097 <a class="code" href="classNLAIC_1_1IBasicType.html">NLAIC::IBasicType</a> *<a class="code" href="driver__opengl__extension__def_8h.html#a364">x</a> = <font class="keyword">new</font> <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#a0">CCodeBrancheRunDebug</a>(1,CHaltOpCode()); +00098 <font class="keywordflow">return</font> x; +00099 } +00100 +<a name="l00101"></a><a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#z213_3">00101</a> <font class="keywordtype">void</font> CCodeBrancheRunDebug::save(<a class="code" href="classNLMISC_1_1IStream.html">NLMISC::IStream</a> &os) +00102 { +00103 CCodeBrancheRun::save(os); +00104 +00105 <font class="keywordflow">for</font>(<font class="keywordtype">int</font> i = 0 ;i < <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#n2">_Count</a>; i ++) +00106 { +00107 sint32 n = <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#o0">_LineInSourceCodeArray</a>[i]; +00108 os.<a class="code" href="classNLMISC_1_1IStream.html#a5">serial</a>( n ); +00109 } +00110 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#o1">_SourceCode</a>->save(os); +00111 +00112 } +00113 +<a name="l00114"></a><a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#z213_4">00114</a> <font class="keywordtype">void</font> CCodeBrancheRunDebug::load(<a class="code" href="classNLMISC_1_1IStream.html">NLMISC::IStream</a> &is) +00115 { +00116 <font class="keywordtype">int</font> i; +00117 CCodeBrancheRun::load(is); +00118 <font class="keyword">delete</font>[] <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#o0">_LineInSourceCodeArray</a>; +00119 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#o0">_LineInSourceCodeArray</a> = <font class="keyword">new</font> <font class="keywordtype">int</font>[<a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#n2">_Count</a>]; +00120 <font class="keywordflow">for</font>(i = 0 ;i < <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#n2">_Count</a>; i ++) +00121 { +00122 sint32 n; +00123 is.<a class="code" href="classNLMISC_1_1IStream.html#a5">serial</a>( n ); +00124 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#o0">_LineInSourceCodeArray</a>[i] = (int)n; +00125 } +00126 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#o1">_SourceCode</a>->load(is); +00127 } +00128 +<a name="l00129"></a><a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#a8">00129</a> <font class="keyword">const</font> <a class="code" href="structNLAIAGENT_1_1IObjectIA_1_1CProcessResult.html">NLAIAGENT::IObjectIA::CProcessResult</a>& CCodeBrancheRunDebug::run(<a class="code" href="classNLAIAGENT_1_1IObjectIA.html">NLAIAGENT::IObjectIA</a> &self) +00130 { +00131 CStackPointer stack,heap; +00132 CCodeContext p(stack,heap,<font class="keyword">this</font>,&self,<a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#p0">InputOutput</a>); +00133 CVarPStack::_LocalTableRef = &heap[0]; +00134 stack --; +00135 +00136 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#z212_0">run</a>(p); +00137 +00138 stack -= (sint32)stack; +00139 heap -= (sint32)heap; +00140 <font class="keywordflow">return</font> <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#n3">_RunState</a>; +00141 } +00142 +<a name="l00143"></a><a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#a9">00143</a> <font class="keyword">const</font> <a class="code" href="structNLAIAGENT_1_1IObjectIA_1_1CProcessResult.html">NLAIAGENT::IObjectIA::CProcessResult</a> &CCodeBrancheRunDebug::run(CCodeContext &p) +00144 { +00145 NLAIAGENT::TProcessStatement i = NLAIAGENT::processIdle; +00146 +00147 p.ContextDebug.Active = <font class="keyword">true</font>; <font class="comment">// We are in Debug mode.</font> +00148 p.ContextDebug.callStackPush(<font class="keyword">this</font>); +00149 +00150 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#n3">_RunState</a>.<a class="code" href="structNLAIAGENT_1_1IObjectIA_1_1CProcessResult.html#m1">Result</a> = NULL; +00151 <font class="keywordflow">while</font>(i != NLAIAGENT::processEnd) +00152 { +00153 i = <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#a10">runOpCode</a>(p); +00154 } +00155 +00156 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#n3">_RunState</a>.<a class="code" href="structNLAIAGENT_1_1IObjectIA_1_1CProcessResult.html#m0">ResultState</a> = NLAIAGENT::processIdle; +00157 <font class="keywordflow">return</font> <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#n3">_RunState</a>; +00158 } +00159 <font class="preprocessor">#ifdef NL_DEBUG</font> +00160 <font class="preprocessor"></font> <font class="keyword">extern</font> <font class="keywordtype">bool</font> NL_AI_DEBUG_SERVER; +00161 <font class="preprocessor">#endif</font> +<a name="l00162"></a><a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#a10">00162</a> <font class="preprocessor"></font> NLAIAGENT::TProcessStatement CCodeBrancheRunDebug::runOpCode(CCodeContext &p) +00163 { +00164 std::string buf; +00165 p.ContextDebug.Active = <font class="keyword">true</font>; <font class="comment">// We are in Debug mode.</font> +00166 +00167 <a class="code" href="classNLAISCRIPT_1_1IOpCode.html#a0">IOpCode</a> &op = <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#a13">nextCode</a>(); +00168 +00169 <font class="preprocessor">#ifdef NL_DEBUG</font> +00170 <font class="preprocessor"></font> <font class="keywordflow">if</font>(NL_AI_DEBUG_SERVER) +00171 { +00172 std::string chaine; +00173 op.getDebugResult(chaine,p); +00174 <font class="preprocessor">#ifdef NL_OS_WINDOWS</font> +00175 <font class="preprocessor"></font> OutputDebugString(chaine.c_str()); +00176 OutputDebugString(<font class="stringliteral">"\n"</font>); +00177 <font class="preprocessor">#endif</font> +00178 <font class="preprocessor"></font> } +00179 <font class="preprocessor">#endif</font> +00180 <font class="preprocessor"></font> <font class="keywordflow">if</font> (<a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#o0">_LineInSourceCodeArray</a>[<a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#n1">_Ip</a>-1] != 0) +00181 { +00182 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#c1">fixContextDebugMode</a>(p); +00183 +00184 <font class="comment">// We print info debug only if we are running the stepByStep codeBrancheRun.</font> +00185 <font class="keywordflow">if</font> ( p.ContextDebug.getDebugMode() == <a class="code" href="namespaceNLAISCRIPT.html#a52a13">stepByStepMode</a> +00186 && p.ContextDebug.getCallStackTopIndex() == p.ContextDebug.getStepIndex()) +00187 { +00188 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#a14">printCurrentSourceCodeLine</a>(); +00189 +00190 <font class="keywordtype">bool</font> executOpcode = <font class="keyword">false</font>; +00191 +00192 <font class="keywordflow">while</font> (!executOpcode) +00193 { +00194 <font class="comment">// Wait command</font> +00195 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#p0">InputOutput</a>-><a class="code" href="classNLAIC_1_1IIO.html#a1">Echo</a>(<font class="stringliteral">"(db) "</font>); +00196 buf = <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#p0">InputOutput</a>-><a class="code" href="classNLAIC_1_1IIO.html#a2">InPut</a>(); +00197 executOpcode = <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#c2">readCommandLine</a>(p, buf.c_str()); +00198 <font class="keywordflow">if</font> (0 != buf.c_str()[0]) p.ContextDebug.setLastCommandLine(buf.c_str()); +00199 } +00200 } +00201 } +00202 +00203 <font class="keywordflow">if</font> (p.ContextDebug.getDebugMode() == <a class="code" href="namespaceNLAISCRIPT.html#a52a16">stopMode</a>) +00204 { +00205 <font class="keywordflow">return</font> NLAIAGENT::processEnd; +00206 } +00207 <font class="keywordflow">else</font> +00208 { +00209 <font class="keywordflow">return</font> op.runOpCode(p); +00210 } +00211 } +00212 +<a name="l00213"></a><a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#a7">00213</a> <font class="keywordtype">void</font> CCodeBrancheRunDebug::getDebugResult(std::string &str,CCodeContext &p)<font class="keyword"> const</font> +00214 <font class="keyword"> </font>{ +00215 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#n0">_TableCode</a>[<a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#n1">_Ip</a>]->getDebugResult(str,p); +00216 } +00217 +<a name="l00218"></a><a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#z213_0">00218</a> <font class="keyword">const</font> <a class="code" href="classNLAIC_1_1CIdentType.html">NLAIC::CIdentType</a>& CCodeBrancheRunDebug::getType()<font class="keyword"> const</font> +00219 <font class="keyword"> </font>{ +00220 <font class="keywordflow">return</font> <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#p0">IdCodeBrancheRunDebug</a>; +00221 } +00222 +<a name="l00223"></a><a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#a5">00223</a> <font class="keywordtype">void</font> CCodeBrancheRunDebug::initCode(<font class="keyword">const</font> <a class="code" href="classstd_1_1list.html">tListCode</a> &<a class="code" href="namespaceNLAISCRIPT.html#a20">l</a>) +00224 { +00225 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#b0">del</a>(); +00226 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#n2">_Count</a> = l.size(); +00227 +00228 tListCode::const_iterator i; +00229 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#n0">_TableCode</a> = <font class="keyword">new</font> <a class="code" href="classNLAISCRIPT_1_1IOpCode.html#a0">IOpCode</a> * [l.size()]; +00230 i = l.begin(); +00231 sint32 k = 0; +00232 <font class="keywordflow">while</font>(i != l.end()) +00233 { +00234 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#n0">_TableCode</a>[k ++] = (<a class="code" href="classNLAISCRIPT_1_1IOpCode.html#a0">IOpCode</a> *)*i++; +00235 } +00236 } +00237 +<a name="l00238"></a><a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#a6">00238</a> <font class="keywordtype">void</font> CCodeBrancheRunDebug::initCode(<font class="keyword">const</font> CCodeBrancheRunDebug &<a class="code" href="namespaceNLAISCRIPT.html#a20">l</a>) +00239 { +00240 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#b0">del</a>(); +00241 +00242 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#n1">_Ip</a> = 0; +00243 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#n2">_Count</a> = <a class="code" href="namespaceNLAISCRIPT.html#a20">l</a>._Count; +00244 +00245 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#n0">_TableCode</a> = <font class="keyword">new</font> <a class="code" href="classNLAISCRIPT_1_1IOpCode.html#a0">IOpCode</a> * [<a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#n2">_Count</a>]; +00246 <font class="keywordflow">for</font>(sint32 i = 0; i < <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#n2">_Count</a>;i ++) +00247 { +00248 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#n0">_TableCode</a>[i] = (<a class="code" href="classNLAISCRIPT_1_1IOpCode.html#a0">IOpCode</a> *)<a class="code" href="namespaceNLAISCRIPT.html#a20">l</a>._TableCode[i]->clone(); +00249 } +00250 } +00251 +<a name="l00252"></a><a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#a11">00252</a> <font class="keywordtype">void</font> CCodeBrancheRunDebug::setLineCode(<font class="keywordtype">int</font> ligne, <font class="keywordtype">int</font> <a class="code" href="driver__opengl__extension__def_8h.html#a358">index</a>) +00253 { +00254 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#o0">_LineInSourceCodeArray</a>[<a class="code" href="driver__opengl__extension__def_8h.html#a358">index</a>] = ligne; +00255 } +00256 +<a name="l00257"></a><a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#a12">00257</a> std::string CCodeBrancheRunDebug::getSourceFileName()<font class="keyword"> const</font> +00258 <font class="keyword"> </font>{ +00259 <font class="keywordflow">return</font> <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#o1">_SourceCode</a>->getSourceName().c_str(); +00260 } +00261 +<a name="l00262"></a><a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#c1">00262</a> <font class="keywordtype">void</font> CCodeBrancheRunDebug::fixContextDebugMode(CCodeContext &P)<font class="keyword"> const</font> +00263 <font class="keyword"> </font>{ +00264 <font class="comment">// We are in step by step mode on the current CCodeBrancheRun :</font> +00265 <font class="keywordflow">if</font> ( P.ContextDebug.getBreakPointValue(<a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#o0">_LineInSourceCodeArray</a>[<a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#n1">_Ip</a>-1],<a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#a12">getSourceFileName</a>().c_str()) <font class="comment">// After a BreakPoint.</font> +00266 || P.ContextDebug.getDebugMode() == <a class="code" href="namespaceNLAISCRIPT.html#a52a14">stepInMode</a> <font class="comment">// After a stepInMode.</font> +00267 || P.ContextDebug.getDebugMode() == <a class="code" href="namespaceNLAISCRIPT.html#a52a15">stepOutMode</a> && (P.ContextDebug.getCallStackTopIndex() < P.ContextDebug.getStepIndex()) <font class="comment">// After leaving a branche in stepOutMode.</font> +00268 || P.ContextDebug.getDebugMode() == <a class="code" href="namespaceNLAISCRIPT.html#a52a13">stepByStepMode</a> && P.ContextDebug.getCallStackTopIndex() < P.ContextDebug.getStepIndex()) <font class="comment">// If we reach a higer level branch in stepBySteplMode.</font> +00269 { +00270 P.ContextDebug.setDebugMode(<a class="code" href="namespaceNLAISCRIPT.html#a52a13">stepByStepMode</a>); +00271 P.ContextDebug.setStepIndex(P.ContextDebug.getCallStackTopIndex()); +00272 } +00273 } +00274 +<a name="l00275"></a><a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#a15">00275</a> <font class="keywordtype">void</font> CCodeBrancheRunDebug::printSourceCodeLine(<font class="keywordtype">int</font> first, <font class="keywordtype">int</font> last)<font class="keyword"> const</font> +00276 <font class="keyword"> </font>{ +00277 sint32 i, j, k, size, lineNumber; +00278 <font class="keyword">const</font> <font class="keywordtype">char</font>* buf; +00279 <font class="keywordtype">char</font>* lineTxt; +00280 std::string code; +00281 +00282 lineNumber = this-><a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#a13">getCurrentSourceCodeLineNumber</a>(); +00283 code = <font class="stringliteral">" "</font>; +00284 code += <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#o1">_SourceCode</a>->getSourceBuffer(); +00285 code +=<font class="stringliteral">"\n"</font>; +00286 size = code.size(); +00287 buf = code.c_str(); +00288 +00289 <font class="comment">// first should be lowest than last.</font> +00290 <font class="keywordflow">if</font> (first > last) last = first; +00291 +00292 <font class="comment">// Seek the good line</font> +00293 i = 0; <font class="comment">// Line start</font> +00294 j = 0; <font class="comment">// Line end</font> +00295 k = 0; <font class="comment">// Line number</font> +00296 lineTxt = <font class="keyword">new</font> <font class="keywordtype">char</font>[1024]; +00297 +00298 <font class="comment">// Seek the first line</font> +00299 <font class="keywordflow">while</font> (k != first && j < size) +00300 { +00301 j++; +00302 i = j; +00303 <font class="keywordflow">while</font> (buf[j] != <font class="charliteral">'\n'</font>) +00304 { +00305 j++; +00306 } +00307 k++; +00308 } +00309 +00310 <font class="comment">// Print until the last line</font> +00311 <font class="keywordflow">while</font> (k != last+1 && j < size) +00312 { +00313 strncpy (lineTxt, buf+i,j-i); +00314 lineTxt[j-i] = 0; +00315 +00316 <font class="comment">// Print debug informations</font> +00317 <font class="keywordflow">if</font> ( k == lineNumber) +00318 { +00319 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#p0">InputOutput</a>-><a class="code" href="classNLAIC_1_1IIO.html#a1">Echo</a>(<font class="stringliteral">"%d ->\t %s\n"</font>, k, lineTxt); +00320 } +00321 <font class="keywordflow">else</font> +00322 { +00323 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#p0">InputOutput</a>-><a class="code" href="classNLAIC_1_1IIO.html#a1">Echo</a>(<font class="stringliteral">"%d \t %s\n"</font>, k, lineTxt); +00324 } +00325 +00326 j++; +00327 i = j; +00328 <font class="keywordflow">while</font> (buf[j] != <font class="charliteral">'\n'</font>) +00329 { +00330 j++; +00331 } +00332 k++; +00333 } +00334 <font class="keyword">delete</font>[] lineTxt; +00335 } +00336 +<a name="l00337"></a><a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#a14">00337</a> <font class="keywordtype">void</font> CCodeBrancheRunDebug::printCurrentSourceCodeLine()<font class="keyword"> const</font> +00338 <font class="keyword"> </font>{ +00339 uint16 lineNumber = <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#a13">getCurrentSourceCodeLineNumber</a>(); +00340 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#a15">printSourceCodeLine</a>(lineNumber, lineNumber); +00341 } +00342 +<a name="l00343"></a><a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#a13">00343</a> uint16 CCodeBrancheRunDebug::getCurrentSourceCodeLineNumber()<font class="keyword"> const</font> +00344 <font class="keyword"> </font>{ +00345 <font class="keywordflow">if</font> (<a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#n1">_Ip</a> ==0) +00346 <font class="keywordflow">return</font> 0; <font class="comment">// This shouldn't appen.</font> +00347 +00348 <font class="keywordflow">if</font> (<a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#o0">_LineInSourceCodeArray</a>[<a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#n1">_Ip</a>-1] != 0) +00349 { +00350 <font class="keywordflow">return</font> (<a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#o0">_LineInSourceCodeArray</a>[<a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#n1">_Ip</a>-1]); +00351 } +00352 <font class="keywordflow">else</font> +00353 { +00354 sint32 i = 2; +00355 <font class="keywordflow">while</font> (<a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#o0">_LineInSourceCodeArray</a>[<a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#n1">_Ip</a>-i] == 0) +00356 { +00357 i++; +00358 } +00359 <font class="keywordflow">return</font> <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#o0">_LineInSourceCodeArray</a>[<a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#n1">_Ip</a>-i]; +00360 } +00361 } +00362 +<a name="l00363"></a><a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#c3">00363</a> <font class="keywordtype">void</font> CCodeBrancheRunDebug::printVariable (CCodeContext &P, <font class="keyword">const</font> <font class="keywordtype">char</font>* c)<font class="keyword"> const</font> +00364 <font class="keyword"> </font>{ +00365 sint32 begin; +00366 <font class="keyword">const</font> <a class="code" href="classNLAIAGENT_1_1IObjectIA.html">NLAIAGENT::IObjectIA</a>* base; +00367 <font class="keyword">const</font> <a class="code" href="classNLAIAGENT_1_1IVarName.html">NLAIAGENT::IVarName</a>* ivn; +00368 <a class="code" href="classNLAIAGENT_1_1CStringType.html">NLAIAGENT::CStringType</a>* st; +00369 <a class="code" href="classNLAIAGENT_1_1CStringVarName.html">NLAIAGENT::CStringVarName</a>* svn; +00370 <font class="keywordtype">char</font>* buf = <font class="keyword">new</font> <font class="keywordtype">char</font>[1024*8]; +00371 <font class="keywordtype">char</font>* bufA = <font class="keyword">new</font> <font class="keywordtype">char</font>[1024*8]; +00372 <font class="keywordtype">char</font>* bufX = <font class="keyword">new</font> <font class="keywordtype">char</font>[1024*8]; +00373 <font class="keywordtype">int</font> i; +00374 <font class="keywordtype">int</font> j; +00375 <font class="keywordtype">char</font>* dotPos; +00376 buf[0] = 0; +00377 bufA[0] = 0; +00378 bufX[0] = 0; +00379 +00380 <font class="comment">// Wee look if it's a composed varaible. If so, we just store the first part in buf and the second in bufX.</font> +00381 strcpy (buf, c); +00382 dotPos = strchr(buf,<font class="charliteral">'.'</font>); +00383 <font class="keywordflow">if</font>(dotPos != NULL) +00384 { +00385 strcpy(bufX, dotPos+1); +00386 strchr(buf,<font class="charliteral">'.'</font>)[0]= <font class="charliteral">'\0'</font>; +00387 } +00388 +00389 <font class="comment">// Seek in the heap from the bottom the buf in order to know if it's a local variable.</font> +00390 begin = (int)P.ContextDebug.HeapDebug; +00391 <font class="keywordflow">for</font> (i = begin; i>=0; i--) +00392 { +00393 base = P.ContextDebug.HeapDebug[i]; +00394 <font class="keywordflow">if</font> (base) +00395 { +00396 <font class="keywordflow">if</font> (base-><a class="code" href="classNLAIC_1_1IBasicType.html#a2">getType</a>() == <a class="code" href="classNLAIAGENT_1_1CStringType.html#p0">NLAIAGENT::CStringType::IdStringType</a>) +00397 { +00398 st = (<a class="code" href="classNLAIAGENT_1_1CStringType.html">NLAIAGENT::CStringType</a>*) base; +00399 ivn = &(st-><a class="code" href="classNLAIAGENT_1_1CStringType.html#a10">getStr</a>()); +00400 <font class="keywordflow">if</font> (ivn-><a class="code" href="classNLAIC_1_1IBasicType.html#a2">getType</a>() == <a class="code" href="classNLAIAGENT_1_1CStringVarName.html#p0">NLAIAGENT::CStringVarName::IdStringVarName</a>) +00401 { +00402 svn = (<a class="code" href="classNLAIAGENT_1_1CStringVarName.html">NLAIAGENT::CStringVarName</a>*) ivn; +00403 <font class="keywordflow">if</font> (strcmp(svn-><a class="code" href="classNLAIAGENT_1_1CStringVarName.html#a4">getString</a>(), buf) == 0) +00404 { +00405 <font class="keywordflow">break</font>; +00406 } +00407 } +00408 } +00409 } +00410 } +00411 +00412 base = NULL; +00413 <font class="keywordflow">if</font> (i>=0) +00414 { +00415 <font class="comment">// It's a local variable</font> +00416 base = P.Heap[i]; +00417 } +00418 <font class="keywordflow">else</font> +00419 { +00420 j = P.Self-><a class="code" href="classNLAIAGENT_1_1IObjectIA.html#a6">getStaticMemberIndex</a>(<a class="code" href="classNLAIAGENT_1_1CStringVarName.html">NLAIAGENT::CStringVarName</a>(buf)); +00421 <font class="keywordflow">if</font> (j >= 0) +00422 { +00423 <font class="comment">// It's a static member.</font> +00424 base = P.Self-><a class="code" href="classNLAIAGENT_1_1IObjectIA.html#a7">getStaticMember</a>(j); +00425 } +00426 } +00427 +00428 <font class="keywordflow">if</font> (base != NULL) +00429 { +00430 <font class="comment">// We found a reference.</font> +00431 <font class="keywordflow">if</font> (bufX[0] == 0) +00432 { +00433 <font class="comment">// The variable wasn't composit.</font> +00434 std::string buf; +00435 base-><a class="code" href="classNLAIC_1_1IBasicType.html#a5">getDebugString</a>(buf); +00436 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#p0">InputOutput</a>-><a class="code" href="classNLAIC_1_1IIO.html#a1">Echo</a>(<font class="stringliteral">"%s\n"</font>,buf.c_str()); +00437 } +00438 <font class="keywordflow">else</font> +00439 { +00440 <font class="comment">// The variable was composit.</font> +00441 dotPos = strchr(bufX,<font class="charliteral">'.'</font>); +00442 <font class="keywordflow">while</font> (dotPos != NULL) +00443 { +00444 strcpy(buf,bufX); +00445 strcpy(bufX, dotPos+1); +00446 strcpy(bufA,buf); +00447 strchr(bufA,<font class="charliteral">'.'</font>)[0]= <font class="charliteral">'\0'</font>; +00448 j = base-><a class="code" href="classNLAIAGENT_1_1IObjectIA.html#a6">getStaticMemberIndex</a>(<a class="code" href="classNLAIAGENT_1_1CStringVarName.html">NLAIAGENT::CStringVarName</a>(bufA)); +00449 <font class="keywordflow">if</font> (j >= 0) +00450 { +00451 base = base-><a class="code" href="classNLAIAGENT_1_1IObjectIA.html#a7">getStaticMember</a>(j); +00452 } +00453 dotPos = strchr(bufX,<font class="charliteral">'.'</font>); +00454 } +00455 j = base-><a class="code" href="classNLAIAGENT_1_1IObjectIA.html#a6">getStaticMemberIndex</a>(<a class="code" href="classNLAIAGENT_1_1CStringVarName.html">NLAIAGENT::CStringVarName</a>(bufX)); +00456 <font class="keywordflow">if</font> (j >= 0) +00457 { +00458 std::string buf; +00459 base-><a class="code" href="classNLAIAGENT_1_1IObjectIA.html#a7">getStaticMember</a>(j)->getDebugString(buf); +00460 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#p0">InputOutput</a>-><a class="code" href="classNLAIC_1_1IIO.html#a1">Echo</a>(<font class="stringliteral">"%s\n"</font>,buf.c_str()); +00461 } +00462 } +00463 } +00464 +00465 <font class="keyword">delete</font>[] buf; +00466 <font class="keyword">delete</font>[] bufA; +00467 <font class="keyword">delete</font>[] bufX; +00468 } +<a name="l00469"></a><a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#c4">00469</a> <font class="keywordtype">void</font> CCodeBrancheRunDebug::printArgs (CCodeContext &P)<font class="keyword"> const</font> +00470 <font class="keyword"> </font>{ +00471 <font class="keywordflow">if</font> (P.Param.size() >0 ) +00472 { +00473 <a class="code" href="classNLAIAGENT_1_1CIteratorContener.html">NLAIAGENT::CIteratorContener</a> Ita = ((<a class="code" href="classNLAIAGENT_1_1CGroupType.html">NLAIAGENT::CGroupType</a> *) P.ContextDebug.Param.back())->getIterator(); +00474 <a class="code" href="classNLAIAGENT_1_1CIteratorContener.html">NLAIAGENT::CIteratorContener</a> Itb = ((<a class="code" href="classNLAIAGENT_1_1CGroupType.html">NLAIAGENT::CGroupType</a> *) P.Param.back())->getIterator();; +00475 <font class="keywordflow">while</font>(!Ita.<a class="code" href="classNLAIAGENT_1_1CConstIteratorContener.html#a6">isInEnd</a>()) +00476 { +00477 std::string buf; +00478 Ita++; +00479 <a class="code" href="classNLAIAGENT_1_1CStringType.html">NLAIAGENT::CStringType</a> *p = (<a class="code" href="classNLAIAGENT_1_1CStringType.html">NLAIAGENT::CStringType</a> *)Itb++; +00480 p-><a class="code" href="classNLAIAGENT_1_1CStringType.html#a9">getDebugString</a>(buf); +00481 <font class="comment">// InputOutput->Echo("%s = %s\n", o->getStr().getString(), buf);</font> +00482 } +00483 } +00484 } +00485 +<a name="l00486"></a><a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#c2">00486</a> <font class="keywordtype">bool</font> CCodeBrancheRunDebug::readCommandLine(CCodeContext &P, <font class="keyword">const</font> <font class="keywordtype">char</font>* buf) +00487 { +00488 <font class="keywordtype">char</font>* sourceFileName; +00489 <font class="keywordtype">char</font>* varName; +00490 uint32 lineNumber; +00491 sint32 first, last; +00492 <font class="keywordtype">bool</font> ret = <font class="keyword">false</font>; +00493 +00494 <font class="keywordflow">switch</font> (buf[0]) +00495 { +00496 <font class="keywordflow">case</font> <font class="charliteral">'p'</font> : +00497 <font class="comment">// p(rint) expression | Inspect variables / attributes, evaluate expressions, call functions/methods.</font> +00498 varName = <font class="keyword">new</font> <font class="keywordtype">char</font>[1024]; +00499 sscanf(buf+1, <font class="stringliteral">"%s"</font>, varName); +00500 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#c3">printVariable</a>(P,varName); +00501 <font class="keyword">delete</font>[] varName; +00502 <font class="keywordflow">break</font>; +00503 <font class="keywordflow">case</font> <font class="charliteral">'w'</font> : +00504 <font class="comment">// w(here) | Dump the call stack : the context of the current program location.</font> +00505 P.ContextDebug.callStackPrint(<a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#p0">InputOutput</a>); +00506 <font class="keywordflow">break</font>; +00507 <font class="keywordflow">case</font> <font class="charliteral">'u'</font> : +00508 <font class="comment">// u(p) | Travel up (to newer) frames in the call stack.</font> +00509 P.ContextDebug.stepIndexUp(); +00510 <font class="keywordflow">break</font>; +00511 <font class="keywordflow">case</font> <font class="charliteral">'d'</font> : +00512 <font class="comment">// d(own) | Travel down (to older) frames in the call stack.</font> +00513 P.ContextDebug.stepIndexDown(); +00514 <font class="keywordflow">break</font>; +00515 <font class="keywordflow">case</font> <font class="charliteral">'l'</font> : +00516 <font class="comment">// l(ist) first?, last? | List the current context's source code file : 11 lines, or around lines numbers.</font> +00517 first = last = 0; +00518 sscanf(buf+1, <font class="stringliteral">"%d %d"</font>,&first, &last); +00519 <font class="keywordflow">if</font> (0 == first) first = this-><a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#a13">getCurrentSourceCodeLineNumber</a>() - 6; +00520 <font class="keywordflow">if</font> (0 > first) first = 0; +00521 <font class="keywordflow">if</font> (0 == last) last = first + 11; +00522 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#a15">printSourceCodeLine</a>(first, last); +00523 <font class="keywordflow">break</font>; +00524 <font class="keywordflow">case</font> <font class="charliteral">'b'</font> : +00525 <font class="comment">// b(reak) line? | Set more breakpoints on functions or line numbers, or list active breaks.</font> +00526 sourceFileName = <font class="keyword">new</font> <font class="keywordtype">char</font>[1024]; +00527 sourceFileName[0] = 0; +00528 lineNumber = 0; +00529 sscanf(buf+1,<font class="stringliteral">"%d %s"</font>,&lineNumber,sourceFileName); +00530 <font class="keywordflow">if</font> (0 == lineNumber) +00531 { +00532 P.ContextDebug.printActiveBeaks(<a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#p0">InputOutput</a>); +00533 } +00534 <font class="keywordflow">else</font> +00535 { +00536 <font class="keywordflow">if</font> (sourceFileName[0]) +00537 { +00538 P.ContextDebug.addBreakPoint((uint16)lineNumber,sourceFileName); +00539 } +00540 <font class="keywordflow">else</font> +00541 { +00542 P.ContextDebug.addBreakPoint((uint16)lineNumber,<a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#a12">getSourceFileName</a>().c_str()); +00543 } +00544 } +00545 <font class="keyword">delete</font>[] sourceFileName; +00546 <font class="keywordflow">break</font>; +00547 <font class="keywordflow">case</font> <font class="charliteral">'e'</font> : +00548 <font class="comment">// e(rase) line? | Erase a specific breakpoint (or all of them)</font> +00549 sourceFileName = <font class="keyword">new</font> <font class="keywordtype">char</font>[1024]; +00550 sourceFileName[0] = 0; +00551 sscanf(buf+1,<font class="stringliteral">"%d %s"</font>,&lineNumber,sourceFileName); +00552 <font class="keywordflow">if</font> (sourceFileName[0]) +00553 { +00554 P.ContextDebug.eraseBreakPoint((uint16)lineNumber,sourceFileName); +00555 } +00556 <font class="keywordflow">else</font> +00557 { +00558 P.ContextDebug.eraseBreakPoint((uint16)lineNumber,<a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#a12">getSourceFileName</a>().c_str()); +00559 } +00560 <font class="keyword">delete</font>[] sourceFileName; +00561 <font class="keywordflow">break</font>; +00562 <font class="keywordflow">case</font> <font class="charliteral">'s'</font> : +00563 <font class="comment">// s(tep) | Run the next line and stop; stop in called functions.</font> +00564 P.ContextDebug.setDebugMode(<a class="code" href="namespaceNLAISCRIPT.html#a52a14">stepInMode</a>); +00565 ret = <font class="keyword">true</font>; +00566 <font class="keywordflow">break</font>; +00567 <font class="keywordflow">case</font> <font class="charliteral">'n'</font> : +00568 <font class="comment">// n(ext) | Run the next line and stop, but don't stop in functions it calls.</font> +00569 P.ContextDebug.setDebugMode(<a class="code" href="namespaceNLAISCRIPT.html#a52a13">stepByStepMode</a>); +00570 ret = <font class="keyword">true</font>; +00571 <font class="keywordflow">break</font>; +00572 <font class="keywordflow">case</font> <font class="charliteral">'r'</font> : +00573 <font class="comment">// r(eturn) | Continue silently until the current function returns.</font> +00574 P.ContextDebug.setDebugMode(<a class="code" href="namespaceNLAISCRIPT.html#a52a15">stepOutMode</a>); +00575 ret = <font class="keyword">true</font>; +00576 <font class="keywordflow">break</font>; +00577 <font class="keywordflow">case</font> <font class="charliteral">'c'</font> : +00578 <font class="comment">// c(ontinue) | Continue programm execution until an error, breakpoint, or exit.</font> +00579 P.ContextDebug.setDebugMode(<a class="code" href="namespaceNLAISCRIPT.html#a52a12">runMode</a>); +00580 ret = <font class="keyword">true</font>; +00581 <font class="keywordflow">break</font>; +00582 <font class="keywordflow">case</font> <font class="charliteral">'a'</font> : +00583 <font class="comment">// a(rgs) | Print arguments passed to the current context's function.</font> +00584 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#c4">printArgs</a>(P); +00585 <font class="keywordflow">break</font>; +00586 <font class="keywordflow">case</font> <font class="charliteral">'q'</font> : +00587 <font class="comment">// q(uit) | Quit the debugger; also terminates the code being debugged.</font> +00588 P.ContextDebug.setDebugMode(<a class="code" href="namespaceNLAISCRIPT.html#a52a16">stopMode</a>); +00589 ret = <font class="keyword">true</font>; +00590 <font class="keywordflow">break</font>; +00591 <font class="keywordflow">case</font> 0 : +00592 <font class="comment">// <enter-key> | Repeat the last command.</font> +00593 ret = this-><a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRunDebug.html#c2">readCommandLine</a>(P, P.ContextDebug.getLastCommandLine()); +00594 <font class="keywordflow">break</font>; +00595 <font class="keywordflow">case</font> <font class="charliteral">'h'</font> : +00596 <font class="comment">// h(elp) command ? | Get command help; you can forget the rest if you remember 'h'.</font> +00597 +00598 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#p0">InputOutput</a>-><a class="code" href="classNLAIC_1_1IIO.html#a1">Echo</a>(<font class="stringliteral">"p(rint) expr.\t| Inspect variables / attributes.\n"</font>); +00599 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#p0">InputOutput</a>-><a class="code" href="classNLAIC_1_1IIO.html#a1">Echo</a>(<font class="stringliteral">"w(here)\t\t| Dump the call stack.\n"</font>); +00600 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#p0">InputOutput</a>-><a class="code" href="classNLAIC_1_1IIO.html#a1">Echo</a>(<font class="stringliteral">"u(p)\t\t| Travel up (to newer) frames in the call stack.\n"</font>); +00601 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#p0">InputOutput</a>-><a class="code" href="classNLAIC_1_1IIO.html#a1">Echo</a>(<font class="stringliteral">"d(own)\t\t| Travel down (to older) frames in the call stack.\n"</font>); +00602 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#p0">InputOutput</a>-><a class="code" href="classNLAIC_1_1IIO.html#a1">Echo</a>(<font class="stringliteral">"l(ist) f?, l?\t| List the current context's source code file.\n"</font>); +00603 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#p0">InputOutput</a>-><a class="code" href="classNLAIC_1_1IIO.html#a1">Echo</a>(<font class="stringliteral">"b(reak) line?\t| Set more breakpoints on line numbers, or list active breaks.\n"</font>); +00604 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#p0">InputOutput</a>-><a class="code" href="classNLAIC_1_1IIO.html#a1">Echo</a>(<font class="stringliteral">"e(rase) line?\t| Erase a specific breakpoint (or all of them)\n"</font>); +00605 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#p0">InputOutput</a>-><a class="code" href="classNLAIC_1_1IIO.html#a1">Echo</a>(<font class="stringliteral">"s(tep)\t\t| Run the next line and stop; stop in called functions.\n"</font>); +00606 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#p0">InputOutput</a>-><a class="code" href="classNLAIC_1_1IIO.html#a1">Echo</a>(<font class="stringliteral">"n(ext)\t\t| Run the next line and stop, don't stop in functions it calls.\n"</font>); +00607 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#p0">InputOutput</a>-><a class="code" href="classNLAIC_1_1IIO.html#a1">Echo</a>(<font class="stringliteral">"r(eturn)\t| Continue silently until the current function returns.\n"</font>); +00608 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#p0">InputOutput</a>-><a class="code" href="classNLAIC_1_1IIO.html#a1">Echo</a>(<font class="stringliteral">"c(ontinue)\t| Continue programm execution until breakpoint, or exit.\n"</font>); +00609 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#p0">InputOutput</a>-><a class="code" href="classNLAIC_1_1IIO.html#a1">Echo</a>(<font class="stringliteral">"a(rgs)\t\t| Print arguments passed to the current context's function.\n"</font>); +00610 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#p0">InputOutput</a>-><a class="code" href="classNLAIC_1_1IIO.html#a1">Echo</a>(<font class="stringliteral">"q(uit)\t\t| Quit the debugger; also terminates the code being debugged.\n"</font>); +00611 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#p0">InputOutput</a>-><a class="code" href="classNLAIC_1_1IIO.html#a1">Echo</a>(<font class="stringliteral">"<enter-key>\t| Repeat the last command.\n"</font>); +00612 <a class="code" href="classNLAISCRIPT_1_1CCodeBrancheRun.html#p0">InputOutput</a>-><a class="code" href="classNLAIC_1_1IIO.html#a1">Echo</a>(<font class="stringliteral">"h(elp) command ?| Get command help; you can forget the rest if you remember 'h'.\n"</font>); +00613 <font class="keywordflow">break</font>; +00614 } +00615 +00616 <font class="keywordflow">return</font> ret; +00617 } +00618 } +</pre></div> + +<!-- footer --> +<BR><FONT Size=+5> </FONT> +</TD> +<TD WIDTH=15><IMG SRC=http://www.nevrax.org/inc/img/pixel.gif WIDTH=15 HEIGHT=15 BORDER=0 ALT=""></TD> +</TR> +</TABLE> +</BODY> +</HTML> |