0707070000020063011006640001460001440000010520720357512565500000500000000004Size150 0707070000020063461006640001460001440000010543420360430631100000500000000051NameCTRACE for the UNIX PC - from THE STORE! 0707070000020063321007750001460001440000010520740357512533600000700000000325Removeecho "Removing CTRACE for the UNIX PC" rm -f /usr/lbin/ctrace echo "Removing CTRACE libraries: /usr/lbin/ctrace_lib" rm -fr /usr/lbin/ctrace_lib message -i "CTRACE has been removed.\n\nTouch to continue." 0707070000020063221007740001460001440000010520760357512533600001000000002175Installcat < to continue END read dummy BINDIR=/usr/lbin MANDIR=/usr/man LIBDIR=${BINDIR}/ctrace_lib for directory in ${MANDIR} ${BINDIR} ${LIBDIR} do if [ ! -d ${directory} ] then echo "Creating directory ${directory}" mkdir ${directory} fi done if [ ! -s ${BINDIR}/man ] then echo "Installing primitive man(1) command in ${BINDIR}" ln man ${BINDIR}/man chmod +x ${BINDIR}/man chown bin ${BINDIR}/man chgrp bin ${BINDIR}/man fi ln ctrace ${BINDIR}/ctrace ln 1.ctrace ${MANDIR}/1.ctrace ln ctrace.1 ${HOME}/Filecabinet/ctrace.1 ln runtime.c ${LIBDIR}/runtime.c chmod +x ${BINDIR}/ctrace chown bin ${BINDIR}/ctrace chgrp bin ${BINDIR}/ctrace for file in runtime.c do chown bin ${LIBDIR}/${file} chgrp bin ${LIBDIR}/${file} done message -i "CTRACE installation is now complete.\nA manual page is available with the man(1) command.\n\nTouch to continue." 0707070000020062761006640001460001440000010521000357512533600000600000000160Files./Size ./Name ./Remove ./Install ./Files ./MAKEcpio ./MAKEflop ./1.ctrace ./ctrace ./ctrace.1 ./man ./runtime.c 0707070000020063051007740001460001440000010521020357512572000001100000000043MAKEcpiocat Files | cpio -ocBv > CTRACE+IN 0707070000020063131007740001460001440000010521030357512533700001100000000061MAKEflopcat Files | cpio -ocBv > /dev/rfp021 dismount -f 07070700000200632510066400014600014400000105210403575125534000011000000436071.ctrace CCCCTTTTRRRRAAAACCCCEEEE((((1111)))) UUUUNNNNIIIIXXXX 5555....0000 CCCCTTTTRRRRAAAACCCCEEEE((((1111)))) NNNNAAAAMMMMEEEE ctrace - C program debugger SSSSYYYYNNNNOOOOPPPPSSSSIIIISSSS ccccttttrrrraaaacccceeee [ options ] [ file ] DDDDEEEESSSSCCCCRRRRIIIIPPPPTTTTIIIIOOOONNNN _C_t_r_a_c_e allows you to follow the execution of a C program, statement by statement. The effect is similar to executing a shell procedure with the ----xxxx option. _C_t_r_a_c_e reads the C program in _f_i_l_e (or from standard input if you do not specify _f_i_l_e), inserts statements to print the text of each executable statement and the values of all variables referenced or modified, and writes the modified program to the standard output. You must put the output of _c_t_r_a_c_e into a temporary file because the _c_c(1) command does not allow the use of a pipe. You then compile and execute this file. As each statement in the program executes it will be listed at the terminal, followed by the name and value of any variables referenced or modified in the statement, followed by any output from the statement. Loops in the trace output are detected and tracing is stopped until the loop is exited or a different sequence of statements within the loop is executed. A warning message is printed every 1000 times through the loop to help you detect infinite loops. The trace output goes to the standard output so you can put it into a file for examination with an editor or the _b_f_s(1) or _t_a_i_l(1) commands. The only _o_p_t_i_o_n_s you will commonly use are: ----ffff _f_u_n_c_t_i_o_n_s Trace only these _f_u_n_c_t_i_o_n_s. ----vvvv _f_u_n_c_t_i_o_n_s Trace all but these _f_u_n_c_t_i_o_n_s. You may want to add to the default formats for printing variables. Long and pointer variables are always printed as signed integers. Pointers to character arrays are also printed as strings if appropriate. Char, short, and int variables are also printed as signed integers and, if appropriate, as characters. Double variables are printed as floating point numbers in scientific notation. You can request that variables be printed in additional formats, if appropriate, with these _o_p_t_i_o_n_s: ----oooo Octal ----xxxx Hexadecimal ----uuuu Unsigned ----eeee Floating point These _o_p_t_i_o_n_s are used only in special circumstances: Page 1 (printed 12/4/85) CCCCTTTTRRRRAAAACCCCEEEE((((1111)))) UUUUNNNNIIIIXXXX 5555....0000 CCCCTTTTRRRRAAAACCCCEEEE((((1111)))) ----llll _n Check _n consecutively executed statements for looping trace output, instead of the default of 20. Use 0 to get all the trace output from loops. ----ssss Suppress redundant trace output from simple assignment statements and string copy function calls. This option can hide a bug caused by use of the = operator in place of the == operator. ----tttt _n Trace _n variables per statement instead of the default of 10 (the maximum number is 20). The Diagnostics section explains when to use this option. ----PPPP Run the C preprocessor on the input before tracing it. You can also use the ----DDDD, ----IIII, and ----UUUU _c_c(1) preprocessor options. These _o_p_t_i_o_n_s are used to tailor the run-time trace package when the traced program will run in a non-UNIX system environment: ----bbbb Use only basic functions in the trace code, that is, those in _c_t_y_p_e(3C), _p_r_i_n_t_f(3S), and _s_t_r_i_n_g(3C). These are usually available even in cross-compilers for microprocessors. In particular, this option is needed when the traced program runs under an operating system that does not have _s_i_g_n_a_l(2), _f_f_l_u_s_h(3S), _l_o_n_g_j_m_p(3C), or _s_e_t_j_m_p(3C). ----pppp '_s' Change the trace print function from the default of 'printf('. For example, 'fprintf(stderr,' would send the trace to the standard error output. ----rrrr ffff Use file _f in place of the _r_u_n_t_i_m_e._c trace function package. This lets you change the entire print function, instead of just the name and leading arguments (see the ----pppp option). EEEEXXXXAAAAMMMMPPPPLLLLEEEE If the file _l_c._c contains this C program: 1 #include 2 main() /* count lines in input */ 3 { 4 int c, nl; 5 6 nl = 0; 7 while ((c = getchar()) != EOF) 8 if (c = '\n') 9 ++nl; 10 printf("%d\n", nl); 11 } and you enter these commands and test data: cc lc.c a.out Page 2 (printed 12/4/85) CCCCTTTTRRRRAAAACCCCEEEE((((1111)))) UUUUNNNNIIIIXXXX 5555....0000 CCCCTTTTRRRRAAAACCCCEEEE((((1111)))) 1 (cntl-d) the program will be compiled and executed. The output of the program will be the number 2222, which is not correct because there is only one line in the test data. The error in this program is common, but subtle. If you invoke _c_t_r_a_c_e with these commands: ctrace lc.c >temp.c cc temp.c a.out the output will be: 2 main() 6 nl = 0; /* nl == 0 */ 7 while ((c = getchar()) != EOF) The program is now waiting for input. If you enter the same test data as before, the output will be: /* c == 49 or '1' */ 8 if (c = '\n') /* c == 10 or '\n' */ 9 ++nl; /* nl == 1 */ 7 while ((c = getchar()) != EOF) /* c == 10 or '\n' */ 8 if (c = '\n') /* c == 10 or '\n' */ 9 ++nl; /* nl == 2 */ 7 while ((c = getchar()) != EOF) If you now enter an end of file character (cntl-d) the final output will be: /* c == -1 */ 10 printf("%d\n", nl); /* nl == 2 */2 /* return */ Note that the program output printed at the end of the trace line for the nnnnllll variable. Also note the rrrreeeettttuuuurrrrnnnn comment added by _c_t_r_a_c_e at the end of the trace output. This shows the implicit return at the terminating brace in the function. The trace output shows that variable cccc is assigned the value Page 3 (printed 12/4/85) CCCCTTTTRRRRAAAACCCCEEEE((((1111)))) UUUUNNNNIIIIXXXX 5555....0000 CCCCTTTTRRRRAAAACCCCEEEE((((1111)))) '1' in line 7, but in line 8 it has the value '\n'. Once your attention is drawn to this iiiiffff statement, you will probably realize that you used the assignment operator (=) in place of the equal operator (==). You can easily miss this error during code reading. EEEEXXXXEEEECCCCUUUUTTTTIIIIOOOONNNN----TTTTIIIIMMMMEEEE TTTTRRRRAAAACCCCEEEE CCCCOOOONNNNTTTTRRRROOOOLLLL The default operation for _c_t_r_a_c_e is to trace the entire program file, unless you use the ----ffff or ----vvvv options to trace specific functions. This does not give you statement by statement control of the tracing, nor does it let you turn the tracing off and on when executing the traced program. You can do both of these by adding _c_t_r_o_f_f() and _c_t_r_o_n() function calls to your program to turn the tracing off and on, respectively, at execution time. Thus, you can code arbitrarily complex criteria for trace control with _i_f statements, and you can even conditionally include this code because _c_t_r_a_c_e defines the CCCCTTTTRRRRAAAACCCCEEEE preprocessor variable. For example: #ifdef CTRACE if (c == '!' && i > 1000) ctron(); #endif You can also call these functions from _s_d_b(1) if you compile with the ----gggg option. For example, to trace all but lines 7 to 10 in the main function, enter: sdb a.out main:7b ctroff() main:11b ctron() r You can also turn the trace off and on by setting static variable tr_ct_ to 0 and 1, respectively. This is useful if you are using a debugger that cannot call these functions directly, such as _a_d_b(1). DDDDIIIIAAAAGGGGNNNNOOOOSSSSTTTTIIIICCCCSSSS This section contains diagnostic messages from both _c_t_r_a_c_e and _c_c(1), since the traced code often gets some _c_c warning messages. You can get _c_c error messages in some rare cases, all of which can be avoided. CCCCttttrrrraaaacccceeee DDDDiiiiaaaaggggnnnnoooossssttttiiiiccccssss _w_a_r_n_i_n_g: _s_o_m_e _v_a_r_i_a_b_l_e_s _a_r_e _n_o_t _t_r_a_c_e_d _i_n _t_h_i_s _s_t_a_t_e_m_e_n_t Only 10 variables are traced in a statement to prevent the C compiler "out of tree space; simplify expression" error. Use the ----tttt option to increase this number. Page 4 (printed 12/4/85) CCCCTTTTRRRRAAAACCCCEEEE((((1111)))) UUUUNNNNIIIIXXXX 5555....0000 CCCCTTTTRRRRAAAACCCCEEEE((((1111)))) _w_a_r_n_i_n_g: _s_t_a_t_e_m_e_n_t _t_o_o _l_o_n_g _t_o _t_r_a_c_e This statement is over 400 characters long. Make sure that you are using tabs to indent your code, not spaces. _c_a_n_n_o_t _h_a_n_d_l_e _p_r_e_p_r_o_c_e_s_s_o_r _c_o_d_e, _u_s_e -_P _o_p_t_i_o_n This is usually caused by #ifdef/#endif preprocessor statements in the middle of a C statement, or by a semicolon at the end of a #define preprocessor statement. '_i_f ... _e_l_s_e _i_f' _s_e_q_u_e_n_c_e _t_o_o _l_o_n_g Split the sequence by removing an eeeellllsssseeee from the middle. _p_o_s_s_i_b_l_e _s_y_n_t_a_x _e_r_r_o_r, _t_r_y -_P _o_p_t_i_o_n Use the ----PPPP option to preprocess the _c_t_r_a_c_e input, along with any appropriate ----DDDD, ----IIII, and ----UUUU preprocessor options. If you still get the error message, check the Warnings section below. CCCCcccc DDDDiiiiaaaaggggnnnnoooossssttttiiiiccccssss _w_a_r_n_i_n_g: _f_l_o_a_t_i_n_g _p_o_i_n_t _n_o_t _i_m_p_l_e_m_e_n_t_e_d _w_a_r_n_i_n_g: _i_l_l_e_g_a_l _c_o_m_b_i_n_a_t_i_o_n _o_f _p_o_i_n_t_e_r _a_n_d _i_n_t_e_g_e_r _w_a_r_n_i_n_g: _s_i_z_e_o_f _r_e_t_u_r_n_s _0 _w_a_r_n_i_n_g: _s_i_z_e_o_f _r_e_t_u_r_n_s _v_a_l_u_e _l_e_s_s _t_h_a_n _o_r _e_q_u_a_l _t_o _z_e_r_o _w_a_r_n_i_n_g: _s_t_a_t_e_m_e_n_t _n_o_t _r_e_a_c_h_e_d Ignore these messages. _c_o_m_p_i_l_e_r _t_a_k_e_s _s_i_z_e _o_f _f_u_n_c_t_i_o_n See the _c_t_r_a_c_e "possible syntax error" message above. _y_a_c_c _s_t_a_c_k _o_v_e_r_f_l_o_w See the _c_t_r_a_c_e "'if ... else if' sequence too long" message above. _o_u_t _o_f _t_r_e_e _s_p_a_c_e; _s_i_m_p_l_i_f_y _e_x_p_r_e_s_s_i_o_n Use the ----tttt option to reduce the number of traced variables per statement from the default of 10. Ignore the "ctrace: too many variables to trace" warnings you will now get. _r_e_d_e_c_l_a_r_a_t_i_o_n _o_f _s_i_g_n_a_l Either correct this declaration of _s_i_g_n_a_l(2), or remove it and #include . _u_n_i_m_p_l_e_m_e_n_t_e_d _s_t_r_u_c_t_u_r_e _a_s_s_i_g_n_m_e_n_t This is caused by a bug in the C compiler for the PDP-11. Use _p_c_c(1) instead of _c_c(1). _e_x_p_r_e_s_s_i_o_n _c_a_u_s_e_s _c_o_m_p_i_l_e_r _l_o_o_p: _t_r_y _s_i_m_p_l_i_f_y_i_n_g This is caused by a bug in the UNIX/370 C compiler. Unfortunately, the only way to avoid it is to use the Page 5 (printed 12/4/85) CCCCTTTTRRRRAAAACCCCEEEE((((1111)))) UUUUNNNNIIIIXXXX 5555....0000 CCCCTTTTRRRRAAAACCCCEEEE((((1111)))) _c_t_r_a_c_e ----vvvv option to not trace the function containing this line. WWWWAAAARRRRNNNNIIIINNNNGGGGSSSS You will get a _c_t_r_a_c_e syntax error if you omit the semicolon at the end of the last element declaration in a structure or union, just before the right brace (}). This is optional in some C compilers. Defining a function with the same name as a system function may cause a syntax error if the number of arguments is changed. Just use a different name. _C_t_r_a_c_e assumes that BADMAG is a preprocessor macro, and that EOF and NULL are #defined constants. Declaring any of these to be variables, e.g. "int EOF;", will cause a syntax error. BBBBUUUUGGGGSSSS _C_t_r_a_c_e does not know about the components of aggregates like structures, unions, and arrays. It cannot choose a format to print all the components of an aggregate when an assignment is made to the entire aggregate. _C_t_r_a_c_e may choose to print the address of an aggregate or use the wrong format (e.g., %e for a structure with two integer members) when printing the value of an aggregate. Pointer values are always treated as pointers to character strings. The loop trace output elimination is done separately for each file of a multi-file program. This can result in functions called from a loop still being traced, or the elimination of trace output from one function in a file until another in the same file is called. FFFFIIIILLLLEEEESSSS runtime.c run-time trace package SSSSEEEEEEEE AAAALLLLSSSSOOOO ctc(1), signal(2), ctype(3C), fflush(3S), longjmp(3C), printf(3S), setjmp(3C), string(3C) in the _U_N_I_X _S_y_s_t_e_m _P_r_o_g_r_a_m_m_e_r _R_e_f_e_r_e_n_c_e _M_a_n_u_a_l. AAAAUUUUTTTTHHHHOOOORRRR Joe Steffen Page 6 (printed 12/4/85) 0707070000020063141007750001460001440000010521270357512540400000700000103674ctraceR��&>�C�&� .text>� .data C�D@.bss C� C�&��.lib jf jf/< jfN�1X� OQ�.�/HJ�f��/H#�0N�#�� 4`2.��N�.j`$p#� ( nA�#� C�`VpѮ n-P�� n��-g.�N�1 U�"n��1.fp��`&.��N�1 r��o n��B(R� @S�n��R�`� n��P��pѮ�� n��Jf��opѮ n-P�� n��0m9n.��N�1V-@��f.t��f.��H�H�.�/< �`�.��H�H��lg&�tf&#�� op#� `#�� ,S�opѮ n P-g��#�0� 5J�oL n#� 8.� n/9 8N�1RX� @#� 5f$.� 8/< p/<0�N�1�P�p.�N�1xJ� gp.� �/9 8N�1X�J�g.� 8/9 C�N�RX� @#� C�.� �/9 C�N�1�X� @#� 5f.� �/<0�N�1�X�p.�N�1x.� �N�1�J� fJ� gJ� $g.� �N�1�.� 8/< �N�1�X�N�-�J� $f�N� �S�0�mr y0�R�0�r �`n n��H�H�.�/< �/<0�N�1�P�.� �/<0�N�1�X�.� */<0�N�1�X�p.�N�1xR��`�,.�0�p /N�1�X�J� DgJ� gJ� $gN�"N��N^NuNV��H��.�N�1 $.�N�1 ЂX�.�/.N�1NX� @-Hf.� �/<0�N�1�X�p.�N�1x.� �/.N�1�X�.�/.N�1�X�.� �/.N�1�X� n L��N^NuNV��J� (gB� M`p#� MB�� .�� @l4�"y C�.�/.N�1X�J�f,J� (g p#� M`B� MJ� Mgp#� DN^NuR��`��NV��H��J� ?hg.� N�1�.� +`J� f.� UN�1�J� ?lfJ� f.� iN�1�.� /< ~N�1�X�.� 0/< �N�1�X�J� g.� �N�1�J� g.� �N�1�J� g.� �N�1�J� g.� �N�1�J� g.� �N�1�J� ,g.� ,/< �N�1�X�J� $g.� `.� N�1�.� 'Hn��N�1X�J� 4g.� 4Hn��N�1X�.� FHn��N�1RX� @$H f&Hn��/< H/<0�N�1��p.�N�1xHn��/< rN�1�P�`. y0�R�0�"�`.�0� 2��/N�1�X�S�m jR�p`.�N�1�$p��gS�0�m�`��L��N^NuNV��.�N�p#� t/< �/<0�N�1�P�N^NuNV�� Y�� [>d�`J� `fpL�<��N^Nup�#� ` �"| �&1��o�J� `lN�x#� `lB� `ֹ `m^�Vm`T �"| b&1 �"| (^ 1�� `f0p�#� ` | M"| M"�"�"�$J� `o��S� ``�� "| .B&1p��f�J� `lN�x#� `lB� `*| �`P��f� -��f�`d.� D(N�.j`�B� �`�p#� �`�J� �f��.�`� *��r��l *��`p#� C�.� | ` ��//< D(N�1P� 9 C�"| D(`�J� �g��#� >t C�� C�pO.� | ` ��//< C�N�1P�`�x#� M"`�bJ� �g�X *��r��l *��`p#� C�.� | ` ��//< C�N�1P� 9 C�"| C�B1`�.� a�N�/�p#� �`��.� C�N�0.� 4�N�1�`rB� �B� �J� �f�p.�/< 4�p/`�.� a�N�/�#� >t C�pP.�/< ` /< C�N�1P�B� �`�tJ� �gB� �`p.�/< C�/9 C�N�=&P�p#� �`�@J� �gB� �`p.�/< ` /9 >tN�=&P�.� a�N�/�`�B� �`��.� a�N�/�`�p.�/< ` /9 >tN�=&P�`�N�/�`��p.�/< ` /9 >tN�=&P�.� a�p/N�4X�N�0�S�0�l.�0�p{/N�1�X�`�xS�0�l .�0�p}/N�1�X�`�X.� a�N�/�S�0�m y0�R�0�r{�`.�0�p{/N�1�X�p.�/< ` /9 >tN�=&`�S�0�l�.�0�p}/N�1�X�`��p.�/< ` /9 >tN�=&P�.��p/N�4X�p.�/< ` /9 >tN�=&P� *��g>J� Mg6J� 5f.S�0�m y0�R�0�r,�`.�0�p,/N�1�X�.� a�/*��N�4X�N�0�S�0�l�.�0�p{/N�1�X�`�$S�0�l�.�0�p}/N�1�X�`�.��p/N�4X�p.�/< ` /9 >tN�=&P�J� Mg6J� 5f.S�0�m y0�R�0�r,�`.�0�p,/N�1�X�.� a�/*��N�4X�N�0�S�0�m y0�R�0�r{`,.�0�p{/N�1�X�`�XS�0�m y0�R�0�r}�`�:.�0�p}/N�1�X�`�$p.�/< ` /9 >tN�=&P�S�0�m y0�R�0�r}�`.�0�p}/N�1�X�.� a�p/N�4X�N�0�`��p.�/< ` /9 >tN�=&P�.� a�p/N�4X�N�0�p#� �`�� *#� M"#� M`�r#� M"`J#� M"�o *`p"*��o `�o *`p#� M&��g�A��.�/(/(N�2�P�J� gJ�g�J� g|�fp.�/*/*`X#� M"�o *`p"*��o `�o *`p#� M&��gA��.�/(/(N�2�P�p.�/*/*��`J#� M"�o *`p"*��o `�o *`p"*�ز�nP�o *`p"*��n4�o *`p#� M&`��f��p.�/*//*/*/*N�1��`��#� M"#� M&�f��.�/*��/*/*/*`#� M"B� M&�fp#� M&.�/*/*`4#� M"B� M&`�>#� M"�o *`p#� M&�f�p.�/*//*/*/*N�1��`��#� M"�o *`p#� M&�g��p.�/*/*��/*/*/*N�1��`��#� M"��o *��`p#� M&��g�lp.�/*/*��A��/(/(/(N�1��`�@#� M"#� M&`�,#� M" *�䰪��n *��#� M&�g�p#� M&`��#� M"p#� M&`�A��.�/(/(N�3hP�#� M"p`��#� M"#�� M&.�/*��A��`.p`��#� M"#�� M&��f�.�/*��A��/(/(/(N�2��`�X#� M"p#� M&��g�@p`#� M"p#� M&��g�$p.�/*/*��A��`�#� M"p#� M&��g(p.�/*/*��A��/(/(/(N�1��g��J��g�p.�/*��/*��A��/(/(/(N�1��`�#� M"p#� M&��g�zp.�/*/*��A��/(/(/(`��#� M"p#� M&��g�BJ� g(J��f"B� M&A��.�/(/(N�2�P�`�J� g,��f"p#� M&A��.�/(/(N�2�P�`8��g.J��g(p.�/*��/*��A��/(/(/(N�1��p.�/*/*��A��`�*�g�`��#� M" *�䰪��n *��#� M&��g.J��g(p.�/*��/*��A��/(/(/(N�1��g�"J��g�p.�/*��/*��A��/(/(/(N�1��`��#� M" *�䰪��n *��"*�̲�o `�� *�䰪��n�� *��`��#� M"#�� M&��g�J��g�p.�/*��/*��A��/(/(/(N�1��`�f[��b�Z�@0; N�J��$�J�J�4�>�J�J�J�J�J�J�J�J�J�J�J�J�J�J�J�J�J�J�J�J�J�J�J�J�J�J�J�J�J�J�J�J�J�J�J�J�J�J�J�J�J�J�J�J�J�J�J�J�\�J�J�J�J�J�J��J�J�J�J�J�J�J�J�J�J�J�J�J�T�J�J�J�J�J�J�J�J�J�D�\�x��J�J�J�J�D��N�J�^�4�4�J�J�J�J�J��^�J�J�J�J�J�z�z�J�z�J��J�J��H�h�(�H��(��J��J��|��f��`�� R�f�~�J��J�J�J�J�J�J�J�J��<��^��J�J�J��P�J�m �� `f�&-lp`��J�g��#� _�$K �"| %(1f�� "ЀЁ��A�"| M"�"�"� �"| !�&1 则� �"| � 1ДR�$�Vl& �"| b$1 �"| (^ 1"D��g�$ �"| � 1�"| b$1`�� "ЀЁ��A�"| M"�"�"� �"| !�&1 则� �"| � 1ДR�$�Vl$ �"| b$1 �"| (^ 1"D��g �"| � 1�"| b$1#� _�#� _�#� _� 9 _�`��NV��N�-@��mt .��#b6�@0; N�J�$��HX�� 6@DPP�r��N��J�g��pN^Nu | ` �� a�#� DRN�� y DRdf� 9 a�"| ` 1;f.� >�N��.� DP/< D2/< >�/9 DRN�1��r��g*.� DP/< D2/< >�/9 DRN�1��r��f.�/< D2N�.�X�.� >t/< >�/9 DRN�1�P�r��fv�� >tp".�/9 DRN�1&X� @#� DVgRp".�/N�1,X� @B y DVA�.�N�/ @#� 8f.� ?N��p.�/9 DVN�1&X� @�"J� �gtp.�/< ?/9 DRN�1P�J�f.�`"p.�/< ?/9 DRN�1P�J�f.�N� F`�dp.�/< ?/9 DRN�1P�J�f.�`�J� �gFS� 5 | ` �� 5.�/< ?N�1�X� 9 5"| ` B1#� 5 a�p#� a�`B� 5J� >tf.� 8/< ?"N�1�X�`�L.� 8/9 >t/< ?0N�1�P�`�.U� a�N�r`JJ� 5f.� ` /< ?@`f#� a� 5p#� a�`��J� 5f #� a� 5#� a� 5p#� a�`��J� 5f�#� a� 5p(.�/< `/< a�N�1P�`�.� `��p'`p".�N�h`� 9 5�� 5g� 5f.�` | ` �� 5.�N�-�`�.� | ` �� 5/N�.�X�`x.�`�:.�`�0.�`�&.�`�.�`�.�`�.�`��.�`��.� `��.�`�� 9 a�"| ` 1H�H�.�`��.��/< ?C/9 5 N�1�P�`��NV��H�� a� >xcp�� >x y >xH�H�`* y 5S�m y 5"hR�p`.� 5N�1�#� a�r ��fR� >t` 9 a�r��fp` 9 a�H�H�"|0 1g.� ?X/< ` N�1�X�Z� a�H�H�#� a�� fS� >t y >xR� >x� a�J� �f..� ` /< ?^/9 5 N�1�P�`N��`H�H�#� a�� fS� >t y >xR� >x� a�`��/g�\f�J� �f6 y 5 S�m y 5 "hR��`.� 5 0��/N�1�X�� a�l 9 a�R� a�"| ` �� a� >xcp�� >x y >xH�H�`* y 5S�m y 5"hR�p`.� 5N�1�#� a�r ��fR� >t` 9 a�r��fp` 9 a�J� �f� y 5 S�m� y 5 "hR��`�� a� >xcp�� >x y >xH�H�`* y 5S�m y 5"hR�p`.� 5N�1�#� a�r ��fR� >t` 9 a�r��fp` 9 a�*f�:`�..� 5 0��/N�1�X�� a�l 9 a�R� a�"| ` �� a� >xcp�� >x y >xH�H�`* y 5S�m y 5"hR�p`.� 5N�1�#� a�r ��fR� >t` 9 a�r��fp` 9 a� g H�H�`��H�H�#� a�� fS� >t y >xR� >x� a� 9 a�"| ` B1L��N^NuNV��H��.� ?aN�1�� a� >xcp�� >x y >xH�H�`* y 5S�m y 5"hR�p`.� 5N�1�#� a�r ��fR� >t` 9 a�r��fp` 9 a�S�0�m0 y0�R�0��`6S�0�m� y0�R�0��`�.�0�0��/N�1�X�� a� >xcp�� >x y >xH�H�`* y 5S�m y 5"hR�p`.� 5N�1�#� a�r ��fR� >t` 9 a�r��fp` 9 a�f�P`*.�0�0��/N�1�X�*f/g`�ZL��N^NuNV��H�<��.`�H�H�J�g`�\f�� a� >xcp�� >x y >xH�H�`* y 5S�m y 5"hR�p`.� 5N�1�#� a�r ��fR� >t` 9 a�r��fp` 9 a� 9 a�R� a�"| ` �� a�mN� 9 a�R� a�(� a� >xcp�� >x y >xH�H�`* y 5S�m y 5"hR�p`.� 5N�1�#� a�r ��fR� >t` 9 a�r��fp` 9 a�"| ` ��f�� 9 a�"| ` B1 < L�<��N^Nup`�NV��H��$.�� a�oN�B#� 5 M 9 a�#� 5#� Mp#� a�#� 5 5#� 5 L��N^NuNV��p#� 5 9 a�"| ` B1.�/< ?d/9 5 N�1�P�B� a�N^NuNV��pN^NuNV��H��p-@��J� a�gB� a� | ` �� a�-H��&| c�$y =�#� a�� >|f��(R�� 6�fJ��f-j��g� n�� 6�g�� a� >xcp�� >x y >xH�H�`* y 5S�m y 5"hR�p`.� 5N�1�#� a�r ��fR� >t` 9 a�r��fp` 9 a�-@��"n��R��B��-L�� 6�o .��Ѐ"L`p � 6�l� < 6��Ѐ"| 6�A�-H��(H .��ЀI�� =�bH�H��"ЀЁ"| ;,A��g@ .��"| =�1H�H�Ѐ"n��I�� =�bZH�H��"ЀЁ"| ;,A��f>,H�H��"ЀЁ"| ;,A��g4,H�H��"ЀЁ"| ;,E�&�`�d$j g(R�� 6�f�p��`� KY�� c�c$ n��S��BJ�g� S#� jbg� y jbJ�o�#� j^ y jb "| >JJ1gb`6Y� n��S��H�H�#� a�� fS� >t y >xR� >x� a� y jb D�.� S/(N�tX�r��g �� c�b�� n��H�H�#� >|#� jZ � ` R�#� a�"| ` B1 y jbX� jb L��N^Nu n��H�H�#� a�� fS� >t y >xR� >x� a�`��J9 ` f#� a� >xp`�� a� >xcp�� >x y >xH�H�`* y 5S�m y 5"hR�p`.� 5N�1�#� a�r ��fR� >t` 9 a�r��fp` 9 a�� ` H�H�#� >|J�o8 y 5 S�m y 5 "hR�� >`.� 5 p9 >/N�1�X�-| ` ��`�NV��J�fpN^Nu nJ�g�X� ��f�p`�NV�� a� >xcp�� >x y >xH�H�`* y 5S�m y 5"hR�p`.� 5N�1�#� a�r ��fR� >t` 9 a�r��fpN^Nu 9 a�`�NV�� y 5 S�m y 5 "hR�.�N^Nu.� 5 p./N�1�X�`�NV��#� a�� a�fS� >t y >xR� >x� a�N^NuNV��H��t` �"ЀЁ"| ?pA�.�N�rR�p/��e�L��N^NuNV��H��$n.�N��"| DZ&q g6.�/ N�1X�J�f<�+f p#� ?h`�,fp#� ?l <L��N^Nu +`�&k`�NV��.�/.N�X�N^NuNV��.�N��h-@��fxp.�N�1B @-H��.g.�N�d @"n��"�f.� B�N��`B n��".!A-A��.��N�l�f .� B� n��/N�1X�J�fp#� ?h .��N^NuNV��.�N�1 R�.�N�1B @-H��g.�/N�1X� n�� N^NuNV��H��$n.�N�&$ �"| DZ%q �#�L��N^NuNV��H��$nt`H�H�ԀJf�p/.� N�1�� L��N^NuNV��.� a�N� .� 8/9 >t/< B�N�1�P�N^NuNV��H��$.�� a�m.�0�/< ` N�1�X�p`nv`BS�0�m y0�R�0�"| ` 18�`.�0� | ` r08/N�1�X�R��m� | ` A�(.�/< ` N�1X� 9 a��#� 5#� a�B� B�L��N^NuNV��p#� 5#� a�#� B�J� B�g.� B�N��B� B�J� 5g.� C*N��.� a�N��B� 5N^NuNV��H��J� MgH 9 B�S�$`6 �"�Ё"| K� 1��f �"�Ё"| K� 1��gS�J�l�` L��N^NuJ�l 9 B氹 l|R� B�$ �"�Ё"| K~#� �"�Ё"| K�#� �"�Ё"| K�#� �"�Ё"| K�#� �"�Ё"| K�#�`�jp#� B�`�^NV��H�� 9 B�S�$`l �"�Ё"| K~A�". �& �"�Ё"| K�#� �"�Ё"| K�A�". �( �"�Ё"| K�#�L��N^NuJ�m� �"�Ё"| K� 1��f( �"�Ё"| K� 1��f�g�`�RS�`�NV��H�$�� 9 B�S�$`4 R��"�Ё* �"�Ё"| K~A�� R�`@S�J�mD �"�Ё"| K� 1��f� �"�Ё"| K� 1��f�S� B洹 B�m��L�$��N^NuNV��H�L�� 9 B�S�$`v �"�Ё"| K� 1��mX �"�Ё 1��nBS� B�&`0 R��"�Ё, �"�Ё"| K~A�� R�� B�m�S�J�l��L�L��N^NuNV��H��$.J� 5f<&.` �"| E>B�R��m�v`j �"�Ё"| K� 1�"| E>� �"�Ё"| K� 1�"| E>� �"�Ё"| K� 1�"| E>�R�� B�m��&.` �"| E>1g�x`� �"�Ё"| K� 1��f�.�N��J�f4.� CFN�1�.�N� �"�Ё"| K~A�.�/(N�JX�.� CIN�1� �"�Ё"| K��f.� CM`*L��N^Nu �"�Ё"| K��f.� CTN�1�`" �"�Ё"| K~A�.�/(N��X� �"�Ё"| K��f� �"�Ё"| K� 1"| ` 1+f,S�0�m y0�R�0�r-`*.�0�p-/N�1�X�`.S�0�m y0�R�0�r+�`.�0�p+/N�1�X�S�0�m y0�R�0�r1�`.�0�p1/N�1�X�S�0�m y0�R�0�r)�`.�0�p)/N�1�X�R�� B�m�( �"| E>1g�x`� �"�Ё"| K� 1��f�S�0�m y0�R�0�r(�`.�0�p(/N�1�X�.�N��J�g.�N�`H �"�Ё"| K��f.� C[` �"�Ё"| K��f.� CeN�1�R�� B�m�TS�0�m y0�R�0�"| ` 18�`.�0� | ` r08/N�1�X�R��l��`��NV��H��$. �"�Ё"| K~.1 �"�Ё"| K� 1��f" �"�Ё"| K�-q�� "�Ё"| K� 1��f�v�� B�lж�g� �"�Ё"| K~-q�� "�Ё"| K� 1��m2 �"�Ё"| K�-q�� "�Ё"| K� 1��oh �"�Ё"| K~-q�� "�Ё"| K� 1��g6 �"�Ё"| K�-q�� "�Ё"| K� 1��gR�`�*�� B�fpL��N^Nup`�NV��H��$. �"�Ё"| K��g �"�Ё�f.� Co`.� CwN�1�v`H�H�.�N��R� | a�08f�.� CN�1� �"�Ё"| K~A�.�/(N��X�.� C�N�1� �"�Ё"| K��gN �"�Ё�g:.� C�N�1� �"�Ё"| K~A�.�/(N�PX�.� C�N�1�L��N^NuNV��H��$.` | ` 0(H�H�.�N��R��m�L��N^NuNV��H��S�0�m ."| ` 1"y0�R�0��`.�0� | ` ��p/N�1�X� .R�$`N �"| E>1gv` �"�Ё"| K� 1��f� �"�Ё"| K��f� �"�Ё"| K� 1"| ` 1+f,S�0�m y0�R�0�r-`*.�0�p-/N�1�X�`.S�0�m y0�R�0�r+�`.�0�p+/N�1�X�.� C�N�1�` �"�Ё"| K��f0 �"�Ё"| K� 1S��n� �"�Ё"| K�`�R�� B�m�� "| E>1g�v`� �"�Ё"| K� 1��f� �"�Ё"| K��f.S�0�m y0�R�0�r(�`.�0�p(/N�1�X� �"�Ё"| K��f8 �"�Ё"| K~ 1S��o ` �"�Ё"| K~ 1S�$`LR�� B�m�BS�0�m y0�R�0�"| ` 1(�`.�0� | ` r0(/N�1�X�R��m��L��N^NuNV��H��J� Mg�J� 5f�.� C�N�1�J�fF.� C�N�1� n fv`.�N��R�`v n08H�H�$ |0 0(f�`L n f@v`p ��fS�R� n08H�H�$f�.�/< C�N�1�X�v`.�N�@R�`v n08H�H�$f�.� C�N�1�J�g.� C�N�1�L��N^NuNV��H��$. � g6� g6�"g�\f..� C�N�1�L��N^Nu.� C�`�.� C�`�.� C�`�S�0�m y0�R�0�"�`�.�0� 2��/N�1�X�`� H Pprintf(/lib/cpp -C -DCTRACEctrace: out of storagectrace: version 3.3 ctrace: -%c option: missing or invalid numeric value ctrace: unknown option: -%c Usage: ctrace [-beosuxPV] [C preprocessor options] [-f|v functions] [-p string] [-r file] [-l number] [-t number] [file] rctrace: cannot open file %s rctrace: cannot run preprocessor#define CTRACE 1 #include #line 1 "%s" ctrace: out of storage ''#undef stdout #define stdout (&_iob[1]) #undef stderr #define stderr (&_iob[2]) #include #include #define VM_CT_ %d #define PF_CT_ %s #define O_CT_ #define X_CT_ #define U_CT_ #define E_CT_ #define B_CT_ #define LM_CT_ %d #define S_CT_ #define S_CT_ static /usr/lbin/ctrace_lib/runtime.crctrace: cannot open runtime code file %s #line 1 "%s" %s warning: %s ctrace: "%s", line %d: ctrace: see man page Diagnostics section for what to do next ��*(;#$%&'()*��,N;N��,M;M��K��/{*��(��1{!��}W��R��4:��5:��N{��h}��]r E-, `��B v!"�P�{��20;.��~��7��Q��tHQoYx��=�t��3�@|jB��5[V�=n7k��8:<9;<O��@��H�4:>Q=j�s��>�8�Jq��r��}� T�`>S�V�Q��w ��KJ�6��K��Tl`�SNeVGE��DCQ��Df��!"F!Tg`�S��V�*��d��v�/1��Cu��!TA`qSn�Vb�?��aIXL>(NM 'Q&S%UT$+��#R�9!T_`SWV= h�ilkcm��?AsF Gowxz�yM!IL6 uf[WUX_45"2+,0�.3-Z)�1/abcgeidh `uWUX_45"Y2+,0.3-Z)1/abcgeidh WUX_45"2+,0.3-Z)1/abcgeidh R�WUX_45"2+,0.3-Z)1/abcgeidhT`SVWUXI_\]T` SVZabcgeidh��T`SVT`SV�T`SVWUXp_\]m��ZOabcgeidh!"��#$%('*&)!"��#$%('*&)WUX_\]WUXZ_\]abcgeidhZabcgeidhWUX_\]WUXZ_\]abcgeidhWUXZ_\]abcgeidh��Zabcgeidh�!"��!"#$%('*&)!"#$%('*&)�p��#$%('*&)��^��\�� Z��78��P��^�� - ��5�� - ��P5 R7�?��m��bbbbbbb��2�� b��B��bbbbbbbbbbbbbbbb��bb�� b�bbbbbbbb��h�� 0�� b��0��NwH"��F��!��qpon��h��b��b��b��b�bbbbb�� +��F��S��,��-��b��b��<��b6b��9�� 2��bbbb�� b��b��b��U�� A -��bN��~}{;Bzvut>srp<%Qon�ml:kjdb`^][VTSPJGEC>=;930.'��7c !!$##%%&&'''''(((((()**,,++++.0.// --"12564337777<777799999::BB;;;C8DEDFG=HIHJ>K?L@MANN OOOOOO ��!��;��*(��#$%)'&*(��{��{��,��([��([��=��)��(��)]��*& - �� (#$%)'��&*()))]��{),��,=��{��],=?|^&+-* [(��(��((((((((]��{��}��:}��)��*(��,��,:��:])))[��)��,��,,,,,)}��))��)��}��](),)),��}��{��" )��;;}��:��:(((��(;��))��;:��;��);)")��(��}��;��)��);��) ��[IA��X:LEF��&��N6<YCGDV"$J =>Z��;@78OB+W \?��9VQTH',./125#%��V-4]��P03b��SU ��^cdefgh_ymnopqr��jklbvx��t��i`��swub|~��zb��a��cannot handle preprocessor code, use -P optionyacc stack overflow'if ... else if' sequence too longsyntax errorpossible syntax error, try -P optionyacc stack overflowsyntax errorchar *_ctstr;int _ctint;/* return */0�0�""��" """""""" """""" "��""��! �� " #'$ !% () *3*3 ! ,-&&&&&&&&&&&&&&&&&&&&&2&&&&&&05&050505****&**&&&&&&*+*05&0505&05005*05...*/0111.........../.0.4.4.4.4.4.4.4.4.4.4.4.4.4.4.4.4.4.4.4.4.4.4.4.4.4.4.4.4.4.4.4.4.4.4.4.4.4.4.4.4.4.4.4.4.4.4.4.4.4.4.4.4.411111111111111111111111111111111111/1101111144444444444444444444111111144444444444444444444444444444444444444444444444444441111441444444444444444444444444444444444444444444444444444411111 6� 6� ;8 6� 5& 7 5. 7 5> 7 5J 6� 5V 7 5b 7( 5n 7 ;� 5z 6� 5� 6� ;� 5� 6� ;� 5� 7 ;� 5� 7^ 5� 7 ;� 5� 7| 5� 7 ;� 5� 7� 5� 7, ;� 5� 5@ 5� 6� ;� 6 6� 6 6� ;\ 6 6� 6" 7 7( ;h 6* 6� 62 7 6� 6: 6� ;� 6B 7 6� 6J 6� 6R 6� 6Z 6� 6b 6� <� 6j 6� ;� 6r 6� 6z 6� <� 6� 6� 6� 7 6� 6� 6� 6� 6� 6� <� 6� 96 6� 6� 5� 3� <( 6� 6� 6� 6� 6� :* 6� 6� 6� ;( ;8 %%%%%.%0000000000<= 2 main() /* count lines in input */ 3 { 4 int c, nl; 5 6 nl = 0; 7 while ((c = getchar()) != EOF) 8 if (c = '\\n') 9 ++nl; 10 printf("%d\\n", nl); 11 } .DE and you enter these commands and test data: .DS I cc lc.c a.out 1 (cntl-d) .DE the program will be compiled and executed. The output of the program will be the number \f32\fR, which is not correct because there is only one line in the test data. The error in this program is common, but subtle. If you invoke \f2ctrace\fR with these commands: .DS I ctrace lc.c >temp.c cc temp.c a.out .DE the output will be: .DS I 2 main() 6 nl = 0; /* nl == 0 */ 7 while ((c = getchar()) != EOF) .DE The program is now waiting for input. If you enter the same test data as before, the output will be: .DS I /* c == 49 or '1' */ 8 if (c = '\\n') /* c == 10 or '\\n' */ 9 ++nl; /* nl == 1 */ 7 while ((c = getchar()) != EOF) /* c == 10 or '\\n' */ 8 if (c = '\\n') /* c == 10 or '\\n' */ 9 ++nl; /* nl == 2 */ 7 while ((c = getchar()) != EOF) .DE If you now enter an end of file character (cntl-d) the final output will be: .DS I /* c == -1 */ 10 printf("%d\\n", nl); /* nl == 2 */2 /* return */ .DE Note that the program output printed at the end of the trace line for the \f3nl\fR variable. Also note the \f3return\fR comment added by \f2ctrace\fR at the end of the trace output. This shows the implicit return at the terminating brace in the function. .P The trace output shows that variable \f3c\fR is assigned the value '1' in line 7, but in line 8 it has the value '\\n'. Once your attention is drawn to this \f3if\fR statement, you will probably realize that you used the assignment operator (=) in place of the equal operator (==). You can easily miss this error during code reading. .SH EXECUTION-TIME TRACE CONTROL The default operation for .I ctrace is to trace the entire program file, unless you use the .B -f or .B -v options to trace specific functions. This does not give you statement by statement control of the tracing, nor does it let you turn the tracing off and on when executing the traced program. .P You can do both of these by adding .IR ctroff () and .IR ctron () function calls to your program to turn the tracing off and on, respectively, at execution time. Thus, you can code arbitrarily complex criteria for trace control with .I if statements, and you can even conditionally include this code because .I ctrace defines the .B CTRACE preprocessor variable. For example: .DS #ifdef CTRACE if (c == '!' && i > 1000) ctron(); #endif .DE You can also call these functions from .IR sdb (1) if you compile with the .B -g option. For example, to trace all but lines 7 to 10 in the main function, enter: .DS sdb a.out main:7b ctroff() main:11b ctron() r .DE You can also turn the trace off and on by setting static variable tr_ct_ to 0 and 1, respectively. This is useful if you are using a debugger that cannot call these functions directly, such as .IR adb (1). .SH DIAGNOSTICS This section contains diagnostic messages from both .I ctrace and .IR cc (1), since the traced code often gets some .I cc warning messages. You can get .I cc error messages in some rare cases, all of which can be avoided. .P .SS Ctrace Diagnostics .I "warning: some variables are not traced in this statement" .RS Only 10 variables are traced in a statement to prevent the C compiler "out of tree space; simplify expression" error. Use the \f3-t\fR option to increase this number. .RE .P .I "warning: statement too long to trace" .RS This statement is over 400 characters long. Make sure that you are using tabs to indent your code, not spaces. .RE .P .I "cannot handle preprocessor code, use -P option" .RS This is usually caused by #ifdef/#endif preprocessor statements in the middle of a C statement, or by a semicolon at the end of a #define preprocessor statement. .RE .P .I "'if ... else if' sequence too long" .RS Split the sequence by removing an \f3else\fR from the middle. .RE .P .I "possible syntax error, try -P option" .RS Use the .B -P option to preprocess the .I ctrace input, along with any appropriate .BR -D , .BR -I , and .B -U preprocessor options. If you still get the error message, check the Warnings section below. .RE .P .SS Cc Diagnostics .I "warning: floating point not implemented" .br .I "warning: illegal combination of pointer and integer" .br .I "warning: sizeof returns 0" .br .I "warning: sizeof returns value less than or equal to zero" .br .I "warning: statement not reached" .RS Ignore these messages. .RE .P .I "compiler takes size of function" .RS See the .I ctrace "possible syntax error" message above. .RE .P .I "yacc stack overflow" .RS See the .I ctrace "'if ... else if' sequence too long" message above. .RE .P .I "out of tree space; simplify expression" .RS Use the \f3-t\fR option to reduce the number of traced variables per statement from the default of 10. Ignore the "ctrace: too many variables to trace" warnings you will now get. .RE .P .I "redeclaration of signal" .RS Either correct this declaration of .IR signal (2), or remove it and #include . .RE .P .I "unimplemented structure assignment" .RS This is caused by a bug in the C compiler for the PDP\-11. Use .IR pcc (1) instead of .IR cc (1). .RE .ig .P .I "offset xxxx in control section ..." .RS This is caused by a problem in the current UNIX/370 C compiler. Use the .IR cc (1) .B -b2,2 option. .RE .. .P .I "expression causes compiler loop: try simplifying" .RS This is caused by a bug in the UNIX/370 C compiler. Unfortunately, the only way to avoid it is to use the .I ctrace .B -v option to not trace the function containing this line. .RE .SH WARNINGS You will get a .I ctrace syntax error if you omit the semicolon at the end of the last element declaration in a structure or union, just before the right brace (}). This is optional in some C compilers. .P Defining a function with the same name as a system function may cause a syntax error if the number of arguments is changed. Just use a different name. .P \f2Ctrace\fR assumes that BADMAG is a preprocessor macro, and that EOF and NULL are #defined constants. Declaring any of these to be variables, e.g. "int EOF;", will cause a syntax error. .SH BUGS \f2Ctrace\fR does not know about the components of aggregates like structures, unions, and arrays. It cannot choose a format to print all the components of an aggregate when an assignment is made to the entire aggregate. \f2Ctrace\fR may choose to print the address of an aggregate or use the wrong format (e.g., %e for a structure with two integer members) when printing the value of an aggregate. .P Pointer values are always treated as pointers to character strings. .P The loop trace output elimination is done separately for each file of a multi-file program. This can result in functions called from a loop still being traced, or the elimination of trace output from one function in a file until another in the same file is called. .SH FILES runtime.c run-time trace package .SH SEE ALSO .fi ctc(1), signal(2), ctype(3C), fflush(3S), longjmp(3C), printf(3S), setjmp(3C), string(3C) in the \f2\s-1UNIX\s+1 System Programmer Reference Manual\fR. .SH AUTHOR Joe Steffen 0707070000020063041007750001460001440000010535610357512535200000400000000616manif [ $# -eq 1 ] then if [ -s /usr/man/1.$1 ] then cat /usr/man/1.$1 exit 0 else echo "$0: cannot find /usr/man/1.$1" >&2 exit 1 fi fi echo "Usage: $0 command_name Only one command name may be specified. This is not a full implementation of the man command as this machine does not have many manual pages. For a list of manual pages available, list the /usr/man directory" >&2 exit 2 0707070000020062771006440001460001440000010535620357512567000001200000020360runtime.c/* ctrace - C program debugging tool * * run-time package of trace functions */ #define M_CT_ "" /* mark was " \b" for obsolete tool tlimit */ #ifndef B_CT_ /* signal catching function used by u_ct_ */ static jmp_buf sj_ct_; static f_ct_() { longjmp(sj_ct_, 1); } #endif #ifdef LM_CT_ #define I_CT_(x) ((x + LM_CT_) % LM_CT_) /* global data used by loop detection code */ static int ts_ct_; /* trace state */ #endif /* global data used by duplicate variable trace code */ static int vc_ct_; /* var trace count within statement */ static struct { /* var values within statement */ char *vn_ct_; /* var name */ int vt_ct_; /* var type (0 is string, > 0 is size) */ union { /* var value */ char *vs_ct_;/* string */ int vi_ct_; /* int */ long vl_ct_; /* long */ double vd_ct_; /* double */ } vv_ct_; } v_ct_[VM_CT_]; /* trace on/off control */ S_CT_ int tr_ct_ = 1; S_CT_ ctron() { tr_ct_ = 1; t_ct_("\n ctron();"); /* suppress "ctron();" in loops */ } S_CT_ ctroff() { tr_ct_ = 0; } /* print the statement text */ S_CT_ t_ct_(text) register char *text; { #ifdef LM_CT_ static int loop_start; static int next_stmt; static char *stmt[LM_CT_]; static long loops; register int i; register char *s; register char c; #endif /* return if tracing is off */ if (!tr_ct_) { return; } #ifdef LM_CT_ if (ts_ct_ == 2) /* if not tracing */ if (strcmp(text, stmt[next_stmt]) == 0) { if (strcmp(text, stmt[loop_start]) == 0) { ++loops; if (loops % 1000 == 0) PF_CT_"%s\n\r /* still repeating after %ld times */%s", M_CT_, loops, M_CT_); next_stmt = loop_start; } next_stmt = I_CT_(next_stmt + 1); vc_ct_ = 0; /* reset the var count */ return; } else { /* doesn't match next statement */ PF_CT_"%s\n\r /* repeated ", M_CT_); if (loops == 0) PF_CT_"< 1 time"); else PF_CT_"%ld times", loops); PF_CT_" */%s", M_CT_); loops = 0; PF_CT_"%s%s%s", M_CT_, stmt[I_CT_(next_stmt - 1)], M_CT_); /* print last statement */ ts_ct_ = 4; /* force var printing */ for (i = 0; i < vc_ct_; ++i) /* print its vars */ if (v_ct_[i].vt_ct_ == 0) /* string? */ s_ct_(v_ct_[i].vn_ct_, v_ct_[i].vv_ct_.vs_ct_); /* yes */ else if (v_ct_[i].vt_ct_ == sizeof(int)) u_ct_(v_ct_[i].vn_ct_, v_ct_[i].vt_ct_, v_ct_[i].vv_ct_.vi_ct_); else if (v_ct_[i].vt_ct_ == sizeof(long)) u_ct_(v_ct_[i].vn_ct_, v_ct_[i].vt_ct_, v_ct_[i].vv_ct_.vl_ct_); else /* double */ u_ct_(v_ct_[i].vn_ct_, v_ct_[i].vt_ct_, v_ct_[i].vv_ct_.vd_ct_); ts_ct_ = 0; /* start tracing */ } #endif vc_ct_ = 0; /* reset the var count */ #ifdef LM_CT_ if (ts_ct_ == 0) { /* if looking for the start of a loop */ /* if statement in list */ for (i = I_CT_(next_stmt - 2); i != I_CT_(next_stmt - 1); i = I_CT_(i - 1)) if ((s = stmt[i]) != 0 && /* saved text could be null */ strcmp(text, s) == 0 && /* if text matches */ (c = s[strlen(s) - 1]) != '{' && c != '}') { /* and is not a brace */ ts_ct_ = 1; /* look for the loop end */ loop_start = i; next_stmt = I_CT_(loop_start + 1); goto print_stmt; } } else /* if looking for the loop end */ if (strcmp(text, stmt[loop_start]) == 0) { /* if start stmt */ ts_ct_ = 2; /* stop tracing */ PF_CT_"%s\n\r /* repeating */%s", M_CT_, M_CT_); stmt[next_stmt] = text; /* save as end marker */ next_stmt = I_CT_(loop_start + 1); return; } else if (strcmp(text, stmt[next_stmt]) != 0) /* if not next stmt */ ts_ct_ = 0; /* look for the start of a loop */ stmt[next_stmt] = text; /* save this statement */ next_stmt = I_CT_(next_stmt + 1); /* inc the pointer */ print_stmt: #endif /* goto the beginning of the line even if in raw mode */ if (text[0] == '\n') { PF_CT_"\r"); } PF_CT_"%s%s%s", M_CT_, text, M_CT_); /* print this statement */ #ifndef B_CT_ fflush(stdout); /* flush the output buffer */ #endif } /* dump a string variable */ S_CT_ s_ct_(name, value) char *name; char *value; { /* return if tracing is off */ if (!tr_ct_) { return; } #ifdef LM_CT_ /* save the var name and value */ if (ts_ct_ != 4) { /* if not forcing var printing */ v_ct_[vc_ct_].vn_ct_ = name; v_ct_[vc_ct_].vt_ct_ = 0; /* var type is string */ v_ct_[vc_ct_].vv_ct_.vs_ct_ = value; ++vc_ct_; } if (ts_ct_ == 2) /* if not tracing */ return; #endif PF_CT_"%s\n\r %s == \"", M_CT_, name); /* flush before printing the string because it may cause an abort if it is not null terminated */ #ifndef B_CT_ fflush(stdout); #endif PF_CT_"%s\" */%s", value, M_CT_); #ifndef B_CT_ fflush(stdout); #endif } /* dump a variable of an unknown type */ S_CT_ u_ct_(name, _size, value) /* size is a macro in */ char *name; register int _size; union { char *p; int i; long l; double d; } value; { #ifndef isprint #include #endif register int i; register char *s; register char c; /* return if tracing is off */ if (!tr_ct_) { return; } /* normalize the size (pointer and float are the same size as either int or long) */ if (_size == sizeof(char) || _size == sizeof(short)) _size = sizeof(int); else if (_size != sizeof(int) && _size != sizeof(long) && _size != sizeof(double)) /* this is an extern pointer (size=0), or array or struct address */ _size = sizeof(char *); #ifdef LM_CT_ if (ts_ct_ != 4) { /* if not forcing var printing */ #endif /* don't dump the variable if its value is the same */ for (i = 0; i < vc_ct_; ++i) if (_size == v_ct_[i].vt_ct_ && strcmp(name, v_ct_[i].vn_ct_) == 0) if (_size == sizeof(int)) { if (value.i == v_ct_[i].vv_ct_.vi_ct_) return; } else if (_size == sizeof(long)) { if (value.l == v_ct_[i].vv_ct_.vl_ct_) return; } else /* double */ if (value.d == v_ct_[i].vv_ct_.vd_ct_) return; /* save the var name and value */ v_ct_[vc_ct_].vn_ct_ = name; v_ct_[vc_ct_].vt_ct_ = _size; if (_size == sizeof(int)) { v_ct_[vc_ct_].vv_ct_.vi_ct_ = value.i; } else if (_size == sizeof(long)) { v_ct_[vc_ct_].vv_ct_.vl_ct_ = value.l; } else /* double */ v_ct_[vc_ct_].vv_ct_.vd_ct_ = value.d; ++vc_ct_; #ifdef LM_CT_ } if (ts_ct_ == 2) /* if not tracing */ return; #endif /* determine the variable type and print it */ PF_CT_"%s\n\r %s == ", M_CT_, name); if (_size == sizeof(int)) { PF_CT_"%d", value.i); /* decimal */ #ifdef O_CT_ if ((unsigned) value.i > 7) /* octal */ PF_CT_" or 0%o", value.i); #endif #ifdef X_CT_ if ((unsigned) value.i > 9) /* hexadecimal */ PF_CT_" or 0x%x", value.i); #endif #ifdef U_CT_ if (value.i < 0) /* unsigned */ PF_CT_" or %u", value.i); #endif #ifdef E_CT_ if (_size == sizeof(float)) /* float */ PF_CT_" or %e", value.i); #endif if ((unsigned) value.i <= 255) /* character */ if (isprint(value.i)) PF_CT_" or '%c'", value.i); else if (iscntrl(value.i)) { switch (value.i) { case '\n': c = 'n'; break; case '\t': c = 't'; break; case '\b': c = 'b'; break; case '\r': c = 'r'; break; case '\f': c = 'f'; break; case '\v': c = 'v'; break; default: c = '\0'; } if (c != '\0') PF_CT_" or '\\%c'", c); } } else if (_size == sizeof(long)) { PF_CT_"%ld", value.l); /* decimal */ #ifdef O_CT_ if ((unsigned) value.l > 7) /* octal */ PF_CT_" or 0%lo", value.l); #endif #ifdef X_CT_ if ((unsigned) value.l > 9) /* hexadecimal */ PF_CT_" or 0x%lx", value.l); #endif #ifdef U_CT_ if (value.l < 0) /* unsigned */ PF_CT_" or %lu", value.l); #endif #ifdef E_CT_ if (_size == sizeof(float)) /* float */ PF_CT_" or %e", value.l); #endif } else if (_size == sizeof(double)) /* double */ PF_CT_"%e", value.d); #ifndef B_CT_ /* check for a possible non-null pointer */ if (_size == sizeof(char *) && value.p != 0) { int (*sigbus)(), (*sigsegv)(); /* see if this is a non-null string */ if (setjmp(sj_ct_) == 0) { sigbus = signal(SIGBUS, f_ct_); sigsegv = signal(SIGSEGV, f_ct_); if (*value.p != '\0') for (s = value.p; ; ++s) { if ((c = *s) == '\0') { PF_CT_" or \"%s\"", value.p); break; } /* don't use isspace(3) because \v and others will not print properly */ if (!isprint(c) && c != '\t' && c != '\n') break; /* not string */ } } signal(SIGBUS, sigbus); signal(SIGSEGV, sigsegv); } #endif PF_CT_" */%s", M_CT_); #ifndef B_CT_ fflush(stdout); #endif } 0707070000020062771006440001460001440000010535620357512567000001300000000000TRAILER!!!ct_[vc_ct_].vv_ct_.vs_ct_ = value; ++vc_ct_; } if (ts_ct_ == 2) /* if not tracing */ return; #endif PF_CT_"%s\n\r %s == \"", M_CT_, name); /* flush before printing the string because it may cause an abort if it is not null terminated */ #ifndef B_CT_ fflush(stdout); #endif PF_CT_"%s\" */%s", value, M_CT_); #ifndef B_CT_ fflush(stdout); #endif } /* dump a variable of an unknown type */ S_CT_ u_ct_(name, _size, value) /* size is a macro in */ char *name; register int _size; union { char *p; int i; long l; double d; } value; { #ifndef isprint #include #endif register int i; register char *s; register char c; /* return if tracing is off */ if (!tr_ct_) { return; } /* normalize the size (pointer and float are the same size as either int or long) */ if (_size == sizeof(char) || _size