52 lines
1.1 KiB
C
52 lines
1.1 KiB
C
/* Copyright (c) 1990, 1991 UNIX System Laboratories, Inc. */
|
|
/* Copyright (c) 1988 AT&T */
|
|
/* All Rights Reserved */
|
|
|
|
/* THIS IS UNPUBLISHED PROPRIETARY SOURCE CODE OF */
|
|
/* UNIX System Laboratories, Inc. */
|
|
/* The copyright notice above does not evidence any */
|
|
/* actual or intended publication of such source code. */
|
|
|
|
/* #ident "@(#)sccs:lib/comobj/del_ab.c 6.3" */
|
|
#ident "$Revision: 1.5 $"
|
|
# include "../../hdr/defines.h"
|
|
|
|
char
|
|
del_ab(p,dt,pkt)
|
|
register char *p;
|
|
register struct deltab *dt;
|
|
struct packet *pkt;
|
|
{
|
|
extern char *satoi();
|
|
int n;
|
|
extern char *Datep;
|
|
char *sid_ab(), *strncpy();
|
|
int index(), date_ab();
|
|
void fmterr();
|
|
|
|
if (*p++ != CTLCHAR)
|
|
fmterr(pkt);
|
|
if (*p++ != BDELTAB)
|
|
return(*--p);
|
|
NONBLANK(p);
|
|
dt->d_type = *p++;
|
|
NONBLANK(p);
|
|
p = sid_ab(p,&dt->d_sid);
|
|
NONBLANK(p);
|
|
date_ab(p,&dt->d_datetime);
|
|
p = Datep;
|
|
NONBLANK(p);
|
|
if ((n = index(p," ")) < 0)
|
|
fmterr(pkt);
|
|
strncpy(dt->d_pgmr,p,(unsigned) n);
|
|
dt->d_pgmr[n] = 0;
|
|
p += n + 1;
|
|
NONBLANK(p);
|
|
p = satoi(p,&dt->d_serial);
|
|
NONBLANK(p);
|
|
p = satoi(p,&dt->d_pred);
|
|
if (*p != '\n')
|
|
fmterr(pkt);
|
|
return(BDELTAB);
|
|
}
|