tcltrace-procs.tcl

Tcl trace procs, accompanied by tcltrace-init.tcl Add Tcl execution traces to asserted Tcl commands

Location:
packages/acs-tcl/tcl/tcltrace-procs.tcl
Created:
2015-06-11
Author:
Gustaf Neumann <neumann@wu-wien.ac.at>
CVS Identification:
$Id: tcltrace-procs.tcl,v 1.4.2.6 2021/02/01 10:51:09 gustafn Exp $

Procedures in this file

Detailed information

tcltrace::before (private)

 tcltrace::before [ -details ] cmd op

Generic trace proc for arbitrary commands. Simply reports calls to function (optionally with full context) to the error.log.

Switches:
-details
(boolean) (defaults to "false") (optional)
when set, use ad_log for reporting with full context
Parameters:
cmd - the full command as executed by Tcl
op - the trace operation

Partial Call Graph (max 5 caller/called nodes):
%3

Testcases:
No testcase defined.

tcltrace::before-ns_log (private)

 tcltrace::before-ns_log cmd op

Execute this proc before ns_log is called

Parameters:
cmd - the full command as executed by Tcl
op - the trace operation

Partial Call Graph (max 5 caller/called nodes):
%3 packages/acs-tcl/tcl/tcltrace-init.tcl packages/acs-tcl/ tcl/tcltrace-init.tcl tcltrace::before-ns_log tcltrace::before-ns_log packages/acs-tcl/tcl/tcltrace-init.tcl->tcltrace::before-ns_log ds_comment ds_comment (public) tcltrace::before-ns_log->ds_comment parameter::get_from_package_key parameter::get_from_package_key (public) tcltrace::before-ns_log->parameter::get_from_package_key

Testcases:
No testcase defined.

tcltrace::before-ns_return (private)

 tcltrace::before-ns_return cmd op

Execute this proc before ns_return is called. This proc saves the request in a file, which can be later used for validating the returned HTML. This works as well for admin pages, which can not be validated via web based HTML validators without giving away admin privileges.

Parameters:
cmd - the full command as executed by Tcl
op - the trace operation

Partial Call Graph (max 5 caller/called nodes):
%3 packages/acs-tcl/tcl/tcltrace-init.tcl packages/acs-tcl/ tcl/tcltrace-init.tcl tcltrace::before-ns_return tcltrace::before-ns_return packages/acs-tcl/tcl/tcltrace-init.tcl->tcltrace::before-ns_return ad_file ad_file (public) tcltrace::before-ns_return->ad_file ad_tmpdir ad_tmpdir (public) tcltrace::before-ns_return->ad_tmpdir parameter::get_from_package_key parameter::get_from_package_key (public) tcltrace::before-ns_return->parameter::get_from_package_key

Testcases:
No testcase defined.
[ show source ]