Revision: 33606
http://brlcad.svn.sourceforge.net/brlcad/?rev=33606&view=rev
Author: bob1961
Date: 2009-01-26 19:36:48 +0000 (Mon, 26 Jan 2009)
Log Message:
-----------
Added the following functions to libged (also modified MGED to use them):
ged_debugbu, ged_debugdir, ged_debuglib, ged_debugmem and ged_debugnmg.
Modified Paths:
--------------
brlcad/trunk/include/ged.h
brlcad/trunk/misc/win32-msvc8/libged/libged.vcproj
brlcad/trunk/src/libged/Makefile.am
brlcad/trunk/src/mged/chgview.c
brlcad/trunk/src/mged/dir.c
brlcad/trunk/src/mged/setup.c
Modified: brlcad/trunk/include/ged.h
===================================================================
--- brlcad/trunk/include/ged.h 2009-01-25 16:41:48 UTC (rev 33605)
+++ brlcad/trunk/include/ged.h 2009-01-26 19:36:48 UTC (rev 33606)
@@ -1387,6 +1387,51 @@
GED_EXPORT BU_EXTERN(int ged_dbip, (struct ged *gedp, int argc, const char
*argv[]));
/**
+ * Set/get libbu's debug bit vector
+ *
+ * Usage:
+ * debugbu [hex_code]
+ *
+ */
+GED_EXPORT BU_EXTERN(int ged_debugbu, (struct ged *gedp, int argc, const char
*argv[]));
+
+/**
+ * Dump of the database's directory
+ *
+ * Usage:
+ * debugdir
+ *
+ */
+GED_EXPORT BU_EXTERN(int ged_debugdir, (struct ged *gedp, int argc, const char
*argv[]));
+
+/**
+ * Set/get librt's debug bit vector
+ *
+ * Usage:
+ * debuglib [hex_code]
+ *
+ */
+GED_EXPORT BU_EXTERN(int ged_debuglib, (struct ged *gedp, int argc, const char
*argv[]));
+
+/**
+ * Provides user-level access to LIBBU's bu_prmem()
+ *
+ * Usage:
+ * debugmem
+ *
+ */
+GED_EXPORT BU_EXTERN(int ged_debugmem, (struct ged *gedp, int argc, const char
*argv[]));
+
+/**
+ * Set/get librt's NMG debug bit vector
+ *
+ * Usage:
+ * debugnmg [hex_code]
+ *
+ */
+GED_EXPORT BU_EXTERN(int ged_debugnmg, (struct ged *gedp, int argc, const char
*argv[]));
+
+/**
* Decompose nmg_solid into maximally connected shells
*
* Usage:
Modified: brlcad/trunk/misc/win32-msvc8/libged/libged.vcproj
===================================================================
--- brlcad/trunk/misc/win32-msvc8/libged/libged.vcproj 2009-01-25 16:41:48 UTC
(rev 33605)
+++ brlcad/trunk/misc/win32-msvc8/libged/libged.vcproj 2009-01-26 19:36:48 UTC
(rev 33606)
@@ -378,6 +378,26 @@
>
</File>
<File
+ RelativePath="..\..\..\src\libged\debugbu.c"
+ >
+ </File>
+ <File
+ RelativePath="..\..\..\src\libged\debugdir.c"
+ >
+ </File>
+ <File
+ RelativePath="..\..\..\src\libged\debuglib.c"
+ >
+ </File>
+ <File
+ RelativePath="..\..\..\src\libged\debugmem.c"
+ >
+ </File>
+ <File
+ RelativePath="..\..\..\src\libged\debugnmg.c"
+ >
+ </File>
+ <File
RelativePath="..\..\..\src\libged\decompose.c"
>
</File>
Modified: brlcad/trunk/src/libged/Makefile.am
===================================================================
--- brlcad/trunk/src/libged/Makefile.am 2009-01-25 16:41:48 UTC (rev 33605)
+++ brlcad/trunk/src/libged/Makefile.am 2009-01-26 19:36:48 UTC (rev 33606)
@@ -41,6 +41,11 @@
copyeval.c \
cpi.c \
dbip.c \
+ debugbu.c \
+ debugdir.c \
+ debuglib.c \
+ debugmem.c \
+ debugnmg.c \
decompose.c \
delay.c \
dg_obj.c \
Modified: brlcad/trunk/src/mged/chgview.c
===================================================================
--- brlcad/trunk/src/mged/chgview.c 2009-01-25 16:41:48 UTC (rev 33605)
+++ brlcad/trunk/src/mged/chgview.c 2009-01-26 19:36:48 UTC (rev 33606)
@@ -603,152 +603,6 @@
}
/*
- * F _ D E B U G B U
- *
- * Provide user-level access to LIBBU debug bit vector.
- */
-int
-f_debugbu(ClientData clientData,
- Tcl_Interp *interp,
- int argc,
- char **argv)
-{
- struct bu_vls vls;
-
- bu_vls_init(&vls);
-
- if (argc < 1 || 2 < argc) {
- bu_vls_printf(&vls, "help debugbu");
- Tcl_Eval(interp, bu_vls_addr(&vls));
- bu_vls_free(&vls);
- return TCL_ERROR;
- }
-
-
- if ( argc >= 2 ) {
- sscanf( argv[1], "%x", (unsigned int *)&bu_debug );
- } else {
- bu_vls_printb(&vls, "Possible flags", 0xffffffffL, BU_DEBUG_FORMAT );
- bu_vls_printf(&vls, "\n");
- }
- bu_vls_printb(&vls, "bu_debug", bu_debug, BU_DEBUG_FORMAT );
- bu_vls_printf(&vls, "\n");
-
- Tcl_AppendResult(interp, bu_vls_addr(&vls), (char *)NULL);
- bu_vls_free(&vls);
-
- return TCL_OK;
-}
-
-/*
- * F _ D E B U G L I B
- *
- * Provide user-level access to LIBRT debug bit vector
- */
-int
-f_debuglib(ClientData clientData,
- Tcl_Interp *interp,
- int argc,
- char **argv)
-{
- struct bu_vls vls;
-
- bu_vls_init(&vls);
-
- if (argc < 1 || 2 < argc) {
- bu_vls_printf(&vls, "help debuglib");
- Tcl_Eval(interp, bu_vls_addr(&vls));
- bu_vls_free(&vls);
- return TCL_ERROR;
- }
-
- if (argc >= 2) {
- sscanf(argv[1], "%x", (unsigned int *)&rt_g.debug);
- if (RT_G_DEBUG) bu_debug |= BU_DEBUG_COREDUMP;
- } else {
- bu_vls_printb(&vls, "Possible flags", 0xffffffffL, DEBUG_FORMAT);
- bu_vls_printf(&vls, "\n");
- }
- bu_vls_printb(&vls, "librt RT_G_DEBUG", RT_G_DEBUG, DEBUG_FORMAT);
- bu_vls_printf(&vls, "\n");
-
- Tcl_AppendResult(interp, bu_vls_addr(&vls), (char *)NULL);
- bu_vls_free(&vls);
-
- return TCL_OK;
-}
-
-/*
- * F _ D E B U G M E M
- *
- * Provide user-level access to LIBBU bu_prmem() routine.
- * Must be used in concert with BU_DEBUG_MEM_CHECK flag.
- */
-int
-f_debugmem(ClientData clientData,
- Tcl_Interp *interp,
- int argc,
- char **argv)
-{
- if (argc < 1 || 1 < argc) {
- struct bu_vls vls;
-
- bu_vls_init(&vls);
- bu_vls_printf(&vls, "help debugmem");
- Tcl_Eval(interp, bu_vls_addr(&vls));
- bu_vls_free(&vls);
- return TCL_ERROR;
- }
-
- if ( setjmp( jmp_env ) == 0 )
- (void)signal( SIGINT, sig3 ); /* allow interrupts */
- else
- return TCL_OK;
-
- bu_prmem("Invoked via MGED command");
-
- (void)signal(SIGINT, SIG_IGN);
- return TCL_OK;
-}
-
-/*
- * F _ D E B U G N M G
- *
- * Provide user-level access to LIBRT NMG_debug flags.
- */
-int
-f_debugnmg(ClientData clientData,
- Tcl_Interp *interp,
- int argc,
- char **argv)
-{
- struct bu_vls vls;
-
- bu_vls_init(&vls);
-
- if (argc < 1 || 2 < argc) {
- bu_vls_printf(&vls, "help debugnmg");
- Tcl_Eval(interp, bu_vls_addr(&vls));
- bu_vls_free(&vls);
- return TCL_ERROR;
- }
-
- if (argc >= 2) {
- sscanf(argv[1], "%x", (unsigned int *)&rt_g.NMG_debug);
- } else {
- bu_vls_printb(&vls, "possible flags", 0xffffffffL, NMG_DEBUG_FORMAT);
- bu_vls_printf(&vls, "\n");
- }
- bu_vls_printb(&vls, "librt rt_g.NMG_debug", rt_g.NMG_debug,
NMG_DEBUG_FORMAT);
- bu_vls_printf(&vls, "\n");
-
- Tcl_AppendResult(interp, bu_vls_addr(&vls), (char *)NULL);
- bu_vls_free(&vls);
-
- return TCL_OK;
-}
-
-/*
* D O _ L I S T
*/
void
Modified: brlcad/trunk/src/mged/dir.c
===================================================================
--- brlcad/trunk/src/mged/dir.c 2009-01-25 16:41:48 UTC (rev 33605)
+++ brlcad/trunk/src/mged/dir.c 2009-01-26 19:36:48 UTC (rev 33606)
@@ -321,25 +321,7 @@
comb_leaf->tr_l.tl_name = bu_strdup( new_name );
}
-int
-f_debugdir(ClientData clientData, Tcl_Interp *interp, int argc, char **argv)
-{
- CHECK_DBI_NULL;
- if (argc < 1 || 1 < argc) {
- struct bu_vls vls;
-
- bu_vls_init(&vls);
- bu_vls_printf(&vls, "help debugdir");
- Tcl_Eval(interp, bu_vls_addr(&vls));
- bu_vls_free(&vls);
- return TCL_ERROR;
- }
-
- db_pr_dir( dbip );
- return TCL_OK;
-}
-
/*
* Local Variables:
* mode: C
Modified: brlcad/trunk/src/mged/setup.c
===================================================================
--- brlcad/trunk/src/mged/setup.c 2009-01-25 16:41:48 UTC (rev 33605)
+++ brlcad/trunk/src/mged/setup.c 2009-01-26 19:36:48 UTC (rev 33606)
@@ -104,11 +104,11 @@
{"dbfind", cmd_ged_plain_wrapper, ged_find},
{"dbip", cmd_ged_plain_wrapper, ged_dbip},
{"dbversion", cmd_ged_plain_wrapper, ged_version},
- {"debugbu", f_debugbu, GED_FUNC_PTR_NULL},
- {"debugdir", f_debugdir, GED_FUNC_PTR_NULL},
- {"debuglib", f_debuglib, GED_FUNC_PTR_NULL},
- {"debugmem", f_debugmem, GED_FUNC_PTR_NULL},
- {"debugnmg", f_debugnmg, GED_FUNC_PTR_NULL},
+ {"debugbu", cmd_ged_plain_wrapper, ged_debugbu},
+ {"debugdir", cmd_ged_plain_wrapper, ged_debugdir},
+ {"debuglib", cmd_ged_plain_wrapper, ged_debuglib},
+ {"debugmem", cmd_ged_plain_wrapper, ged_debugmem},
+ {"debugnmg", cmd_ged_plain_wrapper, ged_debugnmg},
{"decompose", cmd_ged_plain_wrapper, ged_decompose},
{"delay", cmd_ged_plain_wrapper, ged_delay},
{"dir2ae", cmd_ged_plain_wrapper, ged_dir2ae},
This was sent by the SourceForge.net collaborative development platform, the
world's largest Open Source development site.
------------------------------------------------------------------------------
This SF.net email is sponsored by:
SourcForge Community
SourceForge wants to tell your story.
http://p.sf.net/sfu/sf-spreadtheword
_______________________________________________
BRL-CAD Source Commits mailing list
brlcad-commits@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/brlcad-commits
