/*
* 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 */
#ident "%Z%%M% %I% %E% SMI" /* from SVR4 bnu:systat.c 2.7 */
#include "uucp.h"
#define STATNAME(f, n) ((void)sprintf(f, "%s/%s", STATDIR, n))
#define S_SIZE 100
/*
* make system status entry
* name -> system name
* text -> text string to read
* type -> ?
* return:
* none
*/
void
systat(name, type, text, retry)
register int type;
char *name, *text;
long retry;
{
register FILE *fp;
int count;
char filename[MAXFULLNAME], line[S_SIZE];
time_t prestime;
long presretry = 0;
char *vec[5];
line[0] = '\0';
(void) time(&prestime);
count = 0;
STATNAME(filename, name);
fp = fopen(filename, "r");
if (fp != NULL) {
if (fgets(line, S_SIZE, fp) != NULL)
if (getargs(line, vec, 4) == 4) {
count = atoi(vec[1]);
presretry = atol(vec[3]);
}
if (count <= 0)
count = 0;
fclose(fp);
}
switch (type) {
/* if there is already a status file - don't change */
case SS_TIME_WRONG:
case SS_LOCKED_DEVICE:
case SS_CANT_ACCESS_DEVICE:
if (count > 1)
return;
break;
/* reset count on successful call */
case SS_OK:
case SS_INPROGRESS:
case SS_CONVERSATION: /* failure during conversation - contact ok */
retry = 0;
count = 0;
break;
/* Startup failure means protocol mismatch--some administrative
* action must be taken
*/
case SS_STARTUP:
retry = MAXRETRYTIME;
count = 0;
break;
default: /* increment count and set up retry time */
count++;
if (!retry) { /* use exponential backoff */
if (presretry < RETRYTIME)
retry = RETRYTIME;
else {
retry = presretry + presretry;
if (retry > MAXRETRYTIME)
retry = MAXRETRYTIME;
}
}
else { /* use specified time */
if (retry < RETRYTIME)
retry = RETRYTIME;
}
break;
}
fp = fopen(filename, "w");
/* can't ASSERT since assert() calls systat() */
if (fp == NULL) {
errent(Ct_OPEN, filename, errno, __FILE__, __LINE__);
cleanup(FAIL);
}
(void) chmod(filename, PUB_FILEMODE);
(void) fprintf(fp, "%d %d %ld %ld %s %s\n",
type, count, prestime, retry, text, name);
(void) fclose(fp);
return;
}
/*
* check system status for call
* name -> system to check
* return:
* 0 -> ok
* >0 -> system status
*/
int
callok(name)
char *name;
{
register FILE *fp;
register int t;
long retrytime;
int count, type;
char filename[MAXFULLNAME], line[S_SIZE];
time_t lasttime, prestime;
STATNAME(filename, name);
fp = fopen(filename, "r");
if (fp == NULL)
return(SS_OK);
if (fgets(line, S_SIZE, fp) == NULL) {
/* no data */
fclose(fp);
(void) unlink(filename);
return(SS_OK);
}
fclose(fp);
(void) time(&prestime);
sscanf(line, "%d%d%ld%ld", &type, &count, &lasttime, &retrytime);
t = type;
switch(t) {
case SS_SEQBAD:
case SS_LOGIN_FAILED:
case SS_DIAL_FAILED:
case SS_BAD_LOG_MCH:
case SS_BADSYSTEM:
case SS_CANT_ACCESS_DEVICE:
case SS_WRONG_MCH:
case SS_RLOCKED:
case SS_RUNKNOWN:
case SS_RLOGIN:
case SS_UNKNOWN_RESPONSE:
case SS_CHAT_FAILED:
case SS_CALLBACK_LOOP:
if (prestime - lasttime < retrytime) {
logent("RETRY TIME NOT REACHED", "NO CALL");
CDEBUG(4, "RETRY TIME (%ld) NOT REACHED\n", retrytime);
return(type);
}
return(SS_OK);
default:
return(SS_OK);
}
}