DataMuseum.dk

Presents historical artifacts from the history of:

DKUUG/EUUG Conference tapes

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about DKUUG/EUUG Conference tapes

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - metrics - download
Index: T g

⟦83aaa2c6f⟧ TextFile

    Length: 1385 (0x569)
    Types: TextFile
    Names: »globalid2rfc.c«

Derivation

└─⟦2d1937cfd⟧ Bits:30007241 EUUGD22: P.P 5.0
    └─⟦dc59850a2⟧ »EurOpenD22/pp5.0/pp-5.tar.Z« 
        └─⟦e5a54fb17⟧ 
            └─⟦this⟧ »pp-5.0/Lib/format/globalid2rfc.c« 

TextFile

/* globalid2rfc.c - Converts a GlobalDomId struct into a RFC string */

# ifndef lint
static char Rcsid[] = "@(#)$Header: /cs/research/pp/hubris/pp-beta/Lib/format/RCS/globalid2rfc.c,v 5.0 90/09/20 16:05:01 pp Exp Locker: pp $";
# endif

/*
 * $Header: /cs/research/pp/hubris/pp-beta/Lib/format/RCS/globalid2rfc.c,v 5.0 90/09/20 16:05:01 pp Exp Locker: pp $
 *
 * $Log:	globalid2rfc.c,v $
 * Revision 5.0  90/09/20  16:05:01  pp
 * rcsforce : 5.0 public release
 * 
 */



#include        "util.h"
#include        "mta.h"



/* ---------------------  Begin  Routines  -------------------------------- */



void globalid2rfc (gp, buffer)  /* GlobalDomainIdentifier -> RFC */
GlobalDomId     *gp;
char            *buffer;
{
	char    tbuf[LINESIZE];

	tbuf[0] = '\0';

	if (gp -> global_Private) 
		(void) sprintf (tbuf, "/PRMD=%s", gp -> global_Private);

	if (gp -> global_Admin) {
		if (tbuf[0] == '\0')
			(void) sprintf(tbuf,"/ADMD=%s",gp -> global_Admin);
		else
			(void) sprintf(tbuf,"%s/ADMD=%s",
				       tbuf,gp -> global_Admin);
	}

	if (gp -> global_Country) {
		if (tbuf[0] == '\0')
			(void) sprintf(tbuf,"/C=%s",gp -> global_Country);
		else
			(void) sprintf(tbuf, "%s/C=%s",
				       tbuf, gp -> global_Country);
	}
	if (tbuf[0] != '\0')
		(void) strcat (tbuf, "/");

	(void) strcpy (buffer, tbuf);

	PP_DBG (("Lib/globalid2rfc returns (%s)", buffer));

	return;
}