|
|
DataMuseum.dkPresents historical artifacts from the history of: DKUUG/EUUG Conference tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about DKUUG/EUUG Conference tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - downloadIndex: T u
Length: 2072 (0x818)
Types: TextFile
Names: »ut_p1_st.c«
└─⟦2d1937cfd⟧ Bits:30007241 EUUGD22: P.P 5.0
└─⟦dc59850a2⟧ »EurOpenD22/pp5.0/pp-5.tar.Z«
└─⟦e5a54fb17⟧
└─⟦this⟧ »pp-5.0/Lib/pp/ut_p1_st.c«
/* ut_p1_st.c: Deals with new p1 structures */
# ifndef lint
static char Rcsid[] = "@(#)$Header: /cs/research/pp/hubris/pp-beta/Lib/pp/RCS/ut_p1_st.c,v 5.0 90/09/20 16:13:10 pp Exp Locker: pp $";
# endif
/*
* $Header: /cs/research/pp/hubris/pp-beta/Lib/pp/RCS/ut_p1_st.c,v 5.0 90/09/20 16:13:10 pp Exp Locker: pp $
*
* $Log: ut_p1_st.c,v $
* Revision 5.0 90/09/20 16:13:10 pp
* rcsforce : 5.0 public release
*
*/
#include "util.h"
#include "mta.h"
#include <sys/time.h>
extern GlobalDomId Myglobalname;
extern char *loc_dom_mta;
extern char *loc_dom_site;
/* --------------------- Begin Routines -------------------------------- */
new_GlobalDomId (gp) /* generate a new global id */
GlobalDomId *gp;
{
PP_DBG (("Lib/pp/new_GlobalDomId()"));
gp->global_Country = strdup(Myglobalname.global_Country);
gp->global_Admin = strdup(Myglobalname.global_Admin);
if(Myglobalname.global_Private)
gp->global_Private = strdup(Myglobalname.global_Private);
}
GlobalDomId_dup(new, old)
GlobalDomId *new, *old;
{
if (old->global_Country)
new->global_Country = strdup(old->global_Country);
if (old->global_Admin)
new->global_Admin = strdup(old->global_Admin);
if (old->global_Private)
new->global_Private = strdup(old->global_Private);
}
new_MPDUid(mp)
MPDUid *mp;
{
time_t t, time();
struct tm *tp;
char tbuf[LINESIZE];
PP_DBG (("Lib/pp/new_MPDUid()"));
t = time((time_t *)0);
tp = gmtime(&t);
(void) sprintf(tbuf, "%s.%d:%02d.%02d.%02d.%02d.%02d.%02d",
loc_dom_mta, getpid(),
tp->tm_mday, tp->tm_mon, tp->tm_year+70,
tp->tm_hour, tp->tm_min, tp->tm_sec);
mp->mpduid_string = strdup(tbuf);
new_GlobalDomId(&mp->mpduid_DomId);
}
new_Trace_add (tpp)
register Trace **tpp;
{
Trace *new,
*tp = *tpp;
PP_DBG (("new_trace_add()"));
new = (Trace *) smalloc (sizeof (*new));
bzero ((char *) new, sizeof (*new));
new->trace_mta = strdup (loc_dom_mta);
new_GlobalDomId (&new->trace_DomId);
new->trace_DomSinfo.dsi_time = utcnow ();
if (tp != (Trace *)0)
new->trace_next = tp;
*tpp = new;
return (OK);
}