util.c revision 34e485807cef99a975f8962a04f4b7d1aa3529fe
/*
* CDDL HEADER START
*
* The contents of this file are subject to the terms of the
* Common Development and Distribution License, Version 1.0 only
* (the "License"). You may not use this file except in compliance
* with the License.
*
* You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
* or http://www.opensolaris.org/os/licensing.
* See the License for the specific language governing permissions
* and limitations under the License.
*
* When distributing Covered Code, include this CDDL HEADER in each
* file and include the License file at usr/src/OPENSOLARIS.LICENSE.
* If applicable, add the following below this CDDL HEADER, with the
* fields enclosed by brackets "[]" replaced with your own identifying
* information: Portions Copyright [yyyy] [name of copyright owner]
*
* CDDL HEADER END
*/
/* Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T */
/* All Rights Reserved */
/*
* Copyright 2005 Sun Microsystems, Inc. All rights reserved.
* Use is subject to license terms.
*/
#pragma ident "%Z%%M% %I% %E% SMI"
#include <stdio.h>
#include <stdlib.h>
#include <strings.h>
#include <ctype.h>
#include <sys/types.h>
#include <unistd.h>
#include "extern.h"
#include "misc.h"
#include <sac.h>
#include "structs.h"
#ifdef SAC
#include "msgs.h"
#endif
char Comment[SIZE]; /* place holder for comments */
/*
* nexttok - return next token, essentially a strtok, but it can
* deal with null fields and strtok can not
*
* args: str - the string to be examined, NULL if we should
* examine the remembered string
* delim - the list of valid delimiters
* ros - rest of string flag (1 for rest of string, 0 for
* normal processing)
*/
char *
nexttok(str, delim, ros)
char *str;
register char *delim;
int ros;
{
static char *savep; /* the remembered string */
register char *p; /* pointer to start of token */
register char *ep; /* pointer to end of token */
p = (str == NULL) ? savep : str ;
if (ros)
return(p);
if (p == NULL)
return(NULL);
ep = strpbrk(p, delim);
if (ep == NULL) {
savep = NULL;
return(p);
}
savep = ep + 1;
*ep = '\0';
return(p);
}
/*
* parse - parse a line from _sactab. This routine will return if the parse
* was successful, otherwise it will output an error and exit.
*
* args: p - pointer to the data read from the file
* sp - pointer to a structure in which the separated fields
* are placed
*
* A line in the file has the following format:
*
* tag:type:flags:restart_count:command_string #comment
*/
void
parse(p, sp)
register char *p;
register struct sactab *sp;
{
char scratch[SIZE]; /* a scratch buffer */
/*
* get the PM tag
*/
p = nexttok(p, DELIM, FALSE);
if (p == NULL) {
# ifdef SAC
error(E_BADFILE, EXIT);
# else
Saferrno = E_SAFERR;
error("_sactab file is corrupt");
# endif
}
if (strlen(p) > PMTAGSIZE) {
p[PMTAGSIZE] = '\0';
# ifdef SAC
(void) sprintf(scratch, "tag too long, truncated to <%s>", p);
log(scratch);
# else
(void) fprintf(stderr, "tag too long, truncated to <%s>", p);
# endif
}
(void) strcpy(sp->sc_tag, p);
/*
* get the PM type
*/
p = nexttok(NULL, DELIM, FALSE);
if (p == NULL) {
# ifdef SAC
error(E_BADFILE, EXIT);
# else
Saferrno = E_SAFERR;
error("_sactab file is corrupt");
# endif
}
if (strlen(p) > PMTYPESIZE) {
p[PMTYPESIZE] = '\0';
# ifdef SAC
(void) sprintf(scratch, "type too long, truncated to <%s>", p);
log(scratch);
# else
(void) fprintf(stderr, "type too long, truncated to <%s>", p);
# endif
}
(void) strcpy(sp->sc_type, p);
/*
* get the flags
*/
p = nexttok(NULL, DELIM, FALSE);
if (p == NULL) {
# ifdef SAC
error(E_BADFILE, EXIT);
# else
Saferrno = E_SAFERR;
error("_sactab file is corrupt");
# endif
}
sp->sc_flags = 0;
while (*p) {
switch (*p++) {
case 'd':
sp->sc_flags |= D_FLAG;
break;
case 'x':
sp->sc_flags |= X_FLAG;
break;
default:
(void) sprintf(scratch, "Unrecognized flag <%c>", *(p - 1));
# ifdef SAC
log(scratch);
# else
Saferrno = E_SAFERR;
error(scratch);
# endif
break;
}
}
/*
* get the restart count
*/
p = nexttok(NULL, DELIM, FALSE);
if (p == NULL) {
# ifdef SAC
error(E_BADFILE, EXIT);
# else
Saferrno = E_SAFERR;
error("_sactab file is corrupt");
# endif
}
sp->sc_rsmax = atoi(p);
/*
* get the command string
*/
p = nexttok(NULL, DELIM, FALSE);
if (p == NULL) {
# ifdef SAC
error(E_BADFILE, EXIT);
# else
Saferrno = E_SAFERR;
error("_sactab file is corrupt");
# endif
}
if ((sp->sc_cmd = malloc((unsigned) (strlen(p) + 1))) == NULL) {
# ifdef SAC
error(E_MALLOC, EXIT);
# else
Saferrno = E_SAFERR;
error("malloc failed");
# endif
}
(void) strcpy(sp->sc_cmd, p);
/*
* remember the comment string
*/
if ((sp->sc_comment = malloc((unsigned) (strlen(Comment) + 1))) == NULL) {
# ifdef SAC
error(E_MALLOC, EXIT);
# else
Saferrno = E_SAFERR;
error("malloc failed");
# endif
}
(void) strcpy(sp->sc_comment, Comment);
}
/*
* trim - remove comments, trim off trailing white space, done in place
* args: p - string to be acted upon
*/
char *
trim(p)
register char *p;
{
register char *tp; /* temp pointer */
/*
* remove comments, if any, but remember them for later
*/
tp = strchr(p, COMMENT);
Comment[0] = '\0';
if (tp) {
(void) strcpy(Comment, tp + 1); /* skip the '#' */
*tp = '\0';
tp = strchr(Comment, '\n');
if (tp)
*tp ='\0';
}
/*
* remove trailing whitespace, if any
*/
for (tp = p + strlen(p) - 1; tp >= p && isspace(*tp); --tp)
*tp = '\0';
return(p);
}
/*
* pstate - put port monitor state into intelligible form for output
* SSTATE is only used by sacadm
*
* args: state - binary representation of state
*/
char *
pstate(unchar state)
{
switch (state) {
case NOTRUNNING:
return("NOTRUNNING");
case STARTING:
return("STARTING");
case ENABLED:
return("ENABLED");
case DISABLED:
return("DISABLED");
case STOPPING:
return("STOPPING");
case FAILED:
return("FAILED");
case UNKNOWN:
return("UNKNOWN");
# ifndef SAC
case SSTATE:
return("NO_SAC");
# endif
default:
# ifdef SAC
error(E_BADSTATE, EXIT);
# else
Saferrno = E_SAFERR;
error("Improper message from SAC\n");
# endif
}
/* NOTREACHED */
return (NULL);
}