static void tree_class( GtkTreeStore *tree, GtkTreeIter *parent, struct UMLClass *c )
{
struct ListLink *iter;
GtkTreeIter child, operation_child, attribute_child;
gtk_tree_store_append(tree, &child, parent);
gtk_tree_store_set(tree, &child, COLUMN, nv_get_name(c), -1);
gtk_tree_store_append(tree, &attribute_child, &child);
gtk_tree_store_set(tree, &attribute_child, COLUMN, "Attributes", -1);
for(iter = nv_list_front(&c->attributes); iter; iter = nv_list_next(iter)) {
GtkTreeIter att_child;
struct UMLAttribute *a = NV_LIST_GET_DATA( iter, struct UMLAttribute, link );
gtk_tree_store_append(tree, &att_child, &attribute_child);
gtk_tree_store_set(tree, &att_child, COLUMN, nv_get_name(a), -1);
}
gtk_tree_store_append(tree, &operation_child, &child);
gtk_tree_store_set(tree, &operation_child, COLUMN, "Operations", -1);
for(iter = nv_list_front(&c->operations); iter; iter = nv_list_next(iter)) {
GtkTreeIter op_child;
struct UMLOperation *o = NV_LIST_GET_DATA( iter, struct UMLOperation, link );
gtk_tree_store_append(tree, &op_child, &operation_child);
gtk_tree_store_set(tree, &op_child, COLUMN, nv_get_name(o), -1);
}
}
static void nv_graphviz_write_operation(FILE *fp, struct UMLOperation *o)
{
struct ListLink *iter;
char comma[3] = {'\0','\0','\0'};
struct UMLParameter *p;
struct UMLType *t;
enum UMLVisibility v;
v = nv_uml_element_get_visibility((struct UMLElement *)o);
fprintf(fp, "%c ", visibility_char(v));
if( nv_uml_element_get_stereotypes((struct UMLElement *)o) & NV_STEREOTYPE_DESTROY) {
fprintf(fp, "~");
}
fprintf(fp, "%s(",nv_get_name(o));
for(iter = nv_list_front(&o->parameters); iter; iter = nv_list_next(iter)) {
struct UMLParameter *p = NV_LIST_GET_DATA(iter, struct UMLParameter, link);
if (nv_uml_parameter_get_direction(p) != NV_RETURN) {
t = nv_uml_parameter_get_type(p);
fprintf(fp, "%s", comma);
fprintf(fp, "%s ", nv_uml_element_get_name((struct UMLElement *)t));
fprintf(fp, "%s", nv_uml_element_get_name((struct UMLElement *)p));
comma[0] = ',';
comma[1] = ' ';
}
}
fprintf(fp, ")");
p = nv_uml_operation_get_return_parameter(o);
if (p != NULL) {
t = nv_uml_parameter_get_type(p);
fprintf(fp, ":%s ", nv_uml_element_get_name((struct UMLElement *)t));
fprintf(fp, "%s", nv_uml_element_get_name((struct UMLElement *)p));
}
fprintf(fp, "\\l");
}
static void dump_log_data( int fd, struct service_config *scp, int tab_level )
{
struct log *lp = SC_LOG( scp ) ;
struct filelog *flp ;
int i ;
switch ( LOG_GET_TYPE( lp ) )
{
case L_NONE:
tabprint( fd, tab_level, "No logging\n" ) ;
return ;
case L_COMMON_FILE:
tabprint( fd, tab_level, "Logging to common log file\n" ) ;
break ;
case L_FILE:
flp = LOG_GET_FILELOG( lp ) ;
tabprint( fd, tab_level, "Logging to file: %s", flp->fl_filename ) ;
if ( FILELOG_SIZE_CONTROL( flp ) )
Sprint( fd, " (soft=%d hard=%d)\n",
flp->fl_soft_limit, flp->fl_hard_limit ) ;
else
Sprint( fd, " (no limits)\n" ) ;
break ;
case L_SYSLOG:
tabprint( fd, tab_level,
"Logging to syslog. Facility = %s, level = %s\n",
nv_get_name( syslog_facilities, lp->l_sl.sl_facility ),
nv_get_name( syslog_levels, lp->l_sl.sl_level ) ) ;
break ;
}
tabprint( fd, tab_level, "Log_on_success flags =" ) ;
for ( i = 0 ; success_log_options[ i ].name != NULL ; i++ )
if ( M_IS_SET( SC_LOG_ON_SUCCESS(scp), success_log_options[ i ].value ) )
Sprint( fd, " %s", success_log_options[ i ].name ) ;
Sputchar( fd, '\n' ) ;
tabprint( fd, tab_level, "Log_on_failure flags =" ) ;
for ( i = 0 ; failure_log_options[ i ].name != NULL ; i++ )
if ( M_IS_SET( SC_LOG_ON_FAILURE(scp), failure_log_options[ i ].value ) )
Sprint( fd, " %s", failure_log_options[ i ].name ) ;
Sputchar( fd, '\n' ) ;
}
void svc_dump( const struct service *sp, int fd )
{
tabprint( fd, 0, "Service = %s\n", SC_NAME( SVC_CONF( sp ) ) ) ;
tabprint( fd, 1, "State = %s\n",
nv_get_name( service_states, (int) SVC_STATE(sp) ) ) ;
sc_dump( SVC_CONF( sp ), fd, 1, FALSE ) ;
if ( SVC_IS_ACTIVE(sp) )
{
tabprint( fd, 1, "running servers = %d\n", SVC_RUNNING_SERVERS(sp) ) ;
tabprint( fd, 1, "retry servers = %d\n", SVC_RETRIES(sp) ) ;
tabprint( fd, 1, "attempts = %d\n", SVC_ATTEMPTS(sp) ) ;
tabprint( fd, 1, "service fd = %d\n", SVC_FD(sp) ) ;
}
Sputchar( fd, '\n' ) ;
}
static void tree_model( GtkTreeStore *tree, struct UMLModel *model )
{
struct ListLink *iter;
GtkTreeIter child, class_child, package_child;
gtk_tree_store_append(tree, &child, NULL);
gtk_tree_store_set(tree, &child, COLUMN, nv_get_name(model), -1);
gtk_tree_store_append(tree, &package_child, &child);
gtk_tree_store_set(tree, &package_child, COLUMN, "Packages", -1);
gtk_tree_store_append(tree, &class_child, &child);
gtk_tree_store_set(tree, &class_child, COLUMN, "Classes", -1);
for(iter = nv_list_front(&model->super.classes); iter; iter = nv_list_next(iter)) {
struct UMLClass *c = NV_LIST_GET_DATA( iter, struct UMLClass, link );
tree_class( tree, &class_child, c );
}
}
/*
* Print info about service scp to file descriptor fd
*/
void sc_dump( struct service_config *scp,
int fd,
int tab_level,
bool_int is_defaults )
{
const struct name_value *nvp ;
unsigned u ;
char **pp ;
if ( is_defaults )
tabprint( fd, tab_level, "Service defaults\n" ) ;
else
tabprint( fd, tab_level, "Service configuration: %s\n", SC_NAME(scp) ) ;
if ( ! is_defaults )
{
tabprint( fd, tab_level+1, "id = %s\n", SC_ID(scp) ) ;
if ( ! M_ARE_ALL_CLEAR( SC_XFLAGS(scp) ) )
{
tabprint( fd, tab_level+1, "flags =" ) ;
for ( nvp = &service_flags[ 0 ] ; nvp->name != NULL ; nvp++ )
if ( M_IS_SET( SC_XFLAGS(scp), nvp->value ) )
Sprint( fd, " %s", nvp->name ) ;
Sputchar( fd, '\n' ) ;
}
if ( ! M_ARE_ALL_CLEAR( SC_TYPE(scp) ) )
{
tabprint( fd, tab_level+1, "type =" ) ;
for ( nvp = &service_types[ 0 ] ; nvp->name != NULL ; nvp++ )
if ( M_IS_SET( SC_TYPE(scp), nvp->value ) )
Sprint( fd, " %s", nvp->name ) ;
Sputchar( fd, '\n' ) ;
}
tabprint( fd, tab_level+1, "socket_type = %s\n",
nv_get_name( socket_types, SC_SOCKET_TYPE(scp) ) ) ;
tabprint( fd, tab_level+1, "Protocol (name,number) = (%s,%d)\n",
SC_PROTONAME(scp), SC_PROTOVAL(scp) ) ;
if ( SC_SPECIFIED( scp, A_PORT ) )
tabprint( fd, tab_level+1, "port = %d\n", SC_PORT(scp) ) ;
}
if ( SC_SPECIFIED( scp, A_INSTANCES ) ) {
if ( SC_INSTANCES(scp) == UNLIMITED )
tabprint( fd, tab_level+1, "Instances = UNLIMITED\n" ) ;
else
tabprint( fd, tab_level+1, "Instances = %d\n", SC_INSTANCES(scp) ) ;
}
if ( SC_SPECIFIED( scp, A_WAIT ) ) {
if ( SC_WAIT(scp) )
tabprint( fd, tab_level+1, "wait = yes\n" ) ;
else
tabprint( fd, tab_level+1, "wait = no\n" ) ;
}
if ( SC_SPECIFIED( scp, A_USER ) )
tabprint( fd, tab_level+1, "user = %d\n", SC_UID(scp) ) ;
if ( SC_SPECIFIED( scp, A_GROUP ) )
tabprint( fd, tab_level+1, "group = %d\n", SC_GID(scp) ) ;
if ( SC_SPECIFIED( scp, A_GROUPS ) )
{
if (SC_GROUPS(scp) == 1)
tabprint( fd, tab_level+1, "Groups = yes\n" );
else
tabprint( fd, tab_level+1, "Groups = no\n" );
}
if ( SC_SPECIFIED( scp, A_UMASK ) )
tabprint( fd, tab_level+1, "umask = %o\n", SC_UMASK(scp) ) ;
if ( SC_SPECIFIED( scp, A_NICE ) )
tabprint( fd, tab_level+1, "Nice = %d\n", SC_NICE(scp) ) ;
if ( SC_SPECIFIED( scp, A_CPS ) )
tabprint( fd, tab_level+1, "CPS = max conn:%lu wait:%lu\n",
SC_TIME_CONN_MAX(scp), SC_TIME_WAIT(scp) );
if ( SC_SPECIFIED( scp, A_PER_SOURCE ) )
tabprint( fd, tab_level+1, "PER_SOURCE = %d\n",
SC_PER_SOURCE(scp) );
if ( SC_SPECIFIED( scp, A_BIND ) ) {
if ( SC_BIND_ADDR(scp) ) {
char bindname[NI_MAXHOST];
unsigned int len = 0;
if( SC_BIND_ADDR(scp)->sa.sa_family == AF_INET )
len = sizeof(struct sockaddr_in);
else
len = sizeof(struct sockaddr_in6);
memset(bindname, 0, sizeof(bindname));
if( getnameinfo(&SC_BIND_ADDR(scp)->sa, len, bindname,
NI_MAXHOST, NULL, 0, 0) != 0 )
strcpy(bindname, "unknown");
tabprint( fd, tab_level+1, "Bind = %s\n", bindname );
}
else if ( SC_ORIG_BIND_ADDR(scp) ) {
tabprint( fd, tab_level+1, "Bind = %s\n",
SC_ORIG_BIND_ADDR(scp) );
}
else { /* This should NEVER happen */
msg(LOG_ERR, "sc_dump", "bad configuration for %s:",
SC_NAME(scp));
}
}
else
tabprint( fd, tab_level+1, "Bind = All addresses.\n" );
if ( ! is_defaults )
{
if ( (! SC_IS_INTERNAL( scp )) && (SC_REDIR_ADDR(scp) == NULL) )
{
tabprint( fd, tab_level+1, "Server = %s\n", SC_SERVER(scp) ) ;
tabprint( fd, tab_level+1, "Server argv =" ) ;
if ( SC_SERVER_ARGV(scp) )
{
for ( pp = SC_SERVER_ARGV(scp) ; *pp ; pp++ )
Sprint( fd, " %s", *pp ) ;
}
else
Sprint( fd, " (NULL)");
Sputchar( fd, '\n' ) ;
}
#ifdef LIBWRAP
if ( SC_LIBWRAP(scp) != NULL )
{
tabprint( fd, tab_level + 1, "Libwrap = %s\n", SC_LIBWRAP(scp) );
}
#endif
if ( SC_REDIR_ADDR(scp) != NULL )
{
char redirname[NI_MAXHOST];
unsigned int len = 0;
if( SC_REDIR_ADDR(scp)->sa.sa_family == AF_INET )
len = sizeof(struct sockaddr_in);
if( SC_REDIR_ADDR(scp)->sa.sa_family == AF_INET6 )
len = sizeof(struct sockaddr_in6);
memset(redirname, 0, sizeof(redirname));
if( getnameinfo(&SC_REDIR_ADDR(scp)->sa, len, redirname, NI_MAXHOST,
NULL, 0, 0) != 0 )
strcpy(redirname, "unknown");
tabprint( fd, tab_level+1, "Redirect = %s:%d\n", redirname,
SC_REDIR_ADDR(scp)->sa_in.sin_port );
}
if ( SC_IS_RPC( scp ) )
{
struct rpc_data *rdp = SC_RPCDATA( scp ) ;
tabprint( fd, tab_level+1, "RPC data\n" ) ;
tabprint( fd, tab_level+2,
"program number = %ld\n", rdp->rd_program_number ) ;
tabprint( fd, tab_level+2, "rpc_version = " ) ;
if ( rdp->rd_min_version == rdp->rd_max_version )
Sprint( fd, "%ld\n", rdp->rd_min_version ) ;
else
Sprint( fd, "%ld-%ld\n",
rdp->rd_min_version, rdp->rd_max_version ) ;
}
if ( SC_SPECIFIED( scp, A_ACCESS_TIMES ) )
{
tabprint( fd, tab_level+1, "Access times =" ) ;
ti_dump( SC_ACCESS_TIMES(scp), fd ) ;
Sputchar ( fd, '\n' ) ;
}
}
/* This is important enough that each service should list it. */
tabprint( fd, tab_level+1, "Only from: " ) ;
if ( SC_ONLY_FROM(scp) )
{ /* Next check is done since -= doesn't zero out lists. */
if ( pset_count(SC_ONLY_FROM(scp)) == 0)
Sprint( fd, "All sites" );
else
addrlist_dump( SC_ONLY_FROM(scp), fd ) ;
}
else
Sprint( fd, "All sites" );
Sputchar( fd, '\n' ) ;
/* This is important enough that each service should list it. */
tabprint( fd, tab_level+1, "No access: " ) ;
if ( SC_NO_ACCESS(scp) )
{ /* Next check is done since -= doesn't zero out lists. */
if ( pset_count(SC_NO_ACCESS(scp)) == 0)
Sprint( fd, "No blocked sites" );
else
addrlist_dump( SC_NO_ACCESS(scp), fd ) ;
}
else
Sprint( fd, "No blocked sites" );
Sputchar( fd, '\n' ) ;
if ( SC_SENSOR(scp) )
{
tabprint( fd, tab_level+1, "Deny Time: " ) ;
Sprint( fd, "%d\n", SC_DENY_TIME(scp));
}
dump_log_data( fd, scp, tab_level+1 ) ;
if ( SC_IS_PRESENT( scp, A_PASSENV ) )
{
tabprint( fd, tab_level+1, "Passenv =" ) ;
for ( u = 0 ; u < pset_count( SC_PASS_ENV_VARS(scp) ) ; u++ )
Sprint( fd, " %s",
(char *) pset_pointer( SC_PASS_ENV_VARS(scp), u ) ) ;
Sputchar ( fd, '\n' ) ;
}
if ( ! is_defaults )
if ( SC_SPECIFIED( scp, A_ENV ) )
{
tabprint( fd, tab_level+1, "Environment additions:\n" ) ;
for ( u = 0 ; u < pset_count( SC_ENV_VAR_DEFS(scp) ) ; u++ )
tabprint( fd, tab_level+2,
"%s\n", (char *) pset_pointer( SC_ENV_VAR_DEFS(scp), u ) ) ;
}
if ( SC_ENV( scp )->env_type == CUSTOM_ENV )
{
tabprint( fd, tab_level+1, "Environment strings:\n" ) ;
for ( pp = env_getvars( SC_ENV( scp )->env_handle ) ; *pp ; pp++ )
tabprint( fd, tab_level+2, "%s\n", *pp ) ;
}
Sflush( fd ) ;
}
