<![CDATA[
<table cellspacing="0" cellpadding="0">
<tr height="150">
<td align="left"><img src="../../../../img/logo.gif" alt="IAC logo"></img></td>
<td width="100%" rowspan="2" align="left" valign="center">
<table cellspacing="0" cellpadding="0">
<tr>
<td>
<a name="delete_object">
<table width="84%" border="0" align="center">
<tr bgcolor="FFFFAA" align="center">
<td nowrap width="15%" height="32">
<tt class="label">1648</tt></td>
<td nowrap width="100%">
<tt class="label">delete_object</tt></td>
<td nowrap width="150"><tt class="label">09/29/93</tt></td>
</tr>
<tr><td align="left" colspan="3"><p>Deletes a geometry object having a user supplied name.</p></td></tr>
<tr><td align="left" colspan="3"><table class="avs5_repository">
<tr valign="top"><td><b>Author:</b></td><td>John Stephen, Tessella Support Services</td></tr>
<tr><td><b>Version:</b></td><td>1.000</td></tr>
<tr><td><b>Language:</b></td><td>C</td></tr>
<tr>
<td><b>Path:</b></td><td>source/data_output/delete_object/</td></tr>
</table></td></tr>
<tr><td align="left" colspan="3"><p>
<a href="delete_object.shtml" target="_top">
<img src="../../../../../img/doc_mod.gif" border="0"
width="30" height="30"
alt="Module Document - delete_object"></a>
<a href="source/data_output/delete_object/delete_object.tar.gz">
<img src="../../../../../img/targz.gif"
border="0" width="52" height="30"
alt="Archive - delete_object.tar.gz"></a>
<a href="source/data_output/delete_object/delete_object.tar.Z">
<img src="../../../../../img/tarz.gif"
border="0" width="52" height="30"
alt="Archive - delete_object.tar.Z"></a>
<a href="source/data_output/delete_object/delete_object.zip">
<img src="../../../../../img/zip.gif"
border="0" width="52" height="30"
alt="Archive - delete_object.zip"></a>
</p></td>
</tr>
</table>
<br>
</td>
</tr>
<tr>
<td>
<!-- BEGIN CONTENT PAGE -->
<html>
<head>
<title>delete_object</title>
</head>
<body bgcolor=#FFFFCC>
<h2>delete_object</h2>
<h3>Otherw</h3>
<blockquote>
<pre>
ise noted. Permission is hereby granted to do whatever you like with
it, subject to the conditions that may exist in copyrighted materials. Should
you wish to make a contribution toward the improvement, modification, or
general performance of this module, please send us your comments: why you
liked or disliked it, how you use it, and most important, how it helps your
work. We will receive your comments at avs@ncsc.org.
Please send AVS module bug reports to avs@ncsc.org.
******************************************************************************/
/* NOTE: THIS MODULE AND SOURCE CODE IS FOR USE
WITH THE AVS SOFTWARE ENVIRONMENT ONLY */
/* mod_gen Version 1 */
/* Module Name: "delete object" (Input) (Subroutine) */
</pre>
</blockquote>
<h3>Author</h3>
<blockquote>
<pre>
John Stephen (Tessella) 0235-555511 */
/* Date Created: Thu Apr 22 08:41:14 1993 */
/* */
/* This file is automatically generated by the Module Generator (mod_gen)*/
/* Please do not modify or move the contents of this comment block as */
/* mod_gen needs it in order to read module sources back in. */
/* */
/* param 0 "search string" typein "" "" ":" */
/* End of Module Description Comments */
#include <stdio.h>
#include <avs/avs.h>
#include <avs/port.h>
/* ----> START OF USER-SUPPLIED CODE SECTION #1 (INCLUDE FILES, GLOBAL VARIABLES)*/
/* <---- END OF USER-SUPPLIED CODE SECTION #1 */
/* *****************************************/
/* Module Description */
/* *****************************************/
int delete_object_desc()
{
int in_port, out_port, param, iresult;
extern int delete_object_compute();
AVSset_module_name("delete object", MODULE_RENDER);
/* Parameter Specifications */
param = AVSadd_parameter("search string", "string", "", "", ":");
AVSconnect_widget(param, "typein");
param = AVSadd_parameter("viewer", "string", "", "", ":");
AVSconnect_widget(param, "typein");
AVSset_compute_proc(delete_object_compute);
/* ----> START OF USER-SUPPLIED CODE SECTION #2 (ADDITIONAL SPECIFICATION INFO)*/
/* <---- END OF USER-SUPPLIED CODE SECTION #2 */
return(1);
}
/* *****************************************/
/* Module Compute Routine */
/* *****************************************/
int delete_object_compute( search_string, viewer)
char *search_string;
char *viewer;
{
char com[200], *out, *err;
char buf[1000];
char *a, *b, *c;
int i, j, lines, length, count;
/* viewer and search-sting names must be non-blank */
if(! viewer || ! *viewer)return(0);
if(! search_string || ! *search_string)return(0);
sprintf(com,"geom_set_scene -module %s",viewer);
AVScommand("kernel",com,&out,&err);
sprintf(com,"geom_get_all_obj_names");
AVScommand("kernel",com,&out,&err);
strcpy(buf,out);
length=strlen(out);
if(length > 1) {
lines=0;c=buf; for(i=0;i<length;i++){ if( *c == '\n'){ *c = '\0'; lines++;} c++; }
}
else {
lines=0;
}
c = buf;
j = 0;
for(j=0;j<lines;j++) {
if(strstr(c,search_string)) {
sprintf(com,"geom_delete_obj -object %s \n",c);
AVScommand("kernel",com,&out,&err);
}
while(*c != '\0'){c++;} c++;
}
sprintf(com,"geom_refresh");
AVScommand("kernel",com,&out,&err);
return(1);
}
/* ***********************************************************************/
/* Initialization for modules contained in this file. */
/* ***********************************************************************/
static int ((*mod_list[])()) = {
delete_object_desc
};
#define NMODS (sizeof(mod_list) / sizeof(char *))
AVSinit_modules()
{
AVSinit_from_module_list(mod_list, NMODS);
}
/* ----> START OF USER-SUPPLIED CODE SECTION #4 (SUBROUTINES, FUNCTIONS, UTILITY ROUTINES)*/
/* <---- END OF USER-SUPPLIED CODE SECTION #4 */
</pre>
</blockquote>
</body>
</html>
<!-- END CONTENT PAGE -->
</td>
</tr>
</table>
</td>
</tr>
<tr height="100%">
<td class="sideLink" width="25%" align="left" valign="top" nowrap="nowrap">
<p><a href="../../../../../general/index.shtml" target="_top">General Information</a></p>
<p><a href="../../../../../repository/index.shtml" target="_top">Repositories</a></p>
<p class="sideLinkLevel2"><a href="../../../../new/index.shtml" target="_top"> New Releases</a></p>
<p class="sideLinkLevel2"><a href="../../../../download/index.shtml" target="_top"> Download</a></p>
<p class="sideLinkLevel2"><a href="../../../../submit/index.shtml" target="_top"> Submit</a></p>
<p class="sideLinkLevel2"><a href="../../../../pfiles/index.shtml" target="_top"> Project Files</a></p>
<p class="sideLinkLevel2"><a href="../../../../avs5/index.shtml" target="_top"> AVS5</a></p>
<p class="sideLinkLevel3"><a href="../../../input.shtml" target="_top"> Data Input</a></p>
<p class="sideLinkLevel3"><a href="../../../filters.shtml" target="_top"> Filters</a></p>
<p class="sideLinkLevel3"><a href="../../../mappers.shtml" target="_top"> Mappers</a></p>
<p class="sideLinkLevel3"><a href="../../../output.shtml" target="_top"> Data Output</a></p>
<p class="sideLinkLevel3"><a href="../../../misc.shtml" target="_top"> Miscellaneous</a></p>
<p class="sideLinkLevel2"><a href="../../../../express/index.shtml" target="_top"> AVS/Express</a></p>
<p class="sideLinkLevel2"><a href="../../../../pog/index.shtml" target="_top"> Project Guidelines</a></p>
<p><a href="../../../../../usergroup/index.shtml" target="_top">User Group</a></p>
<p><a href="../../../../../training/index.shtml" target="_top">Training Materials</a></p>
</td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0" bgcolor="c6c6e0">
<tr>
<td><img src="../../../../../img/foot1.gif" alt="IAC" width="155" height="25"></td>
<td width="100%"> Last Updated:
<!-- #BeginEditable "date-stamp" -->
26th November 2002
<!-- #EndEditable --></td>
</tr>
</table>
]]>