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 e

⟦334c43fb6⟧ TextFile

    Length: 1719 (0x6b7)
    Types: TextFile
    Names: »encinfo2rfc.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/encinfo2rfc.c« 

TextFile

/* encinfo2rfc.c - Converts a EncodedIT struct into a RFC string */

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

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



#include                "util.h"
#include                <isode/cmd_srch.h>
#include                "mta.h"
#include                "tb_bpt84.h"

extern CMD_TABLE        bptbl_body_parts84 [/* body part types */];



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


extern char	*hdr_822_bp,
		*hdr_p2_bp;

void encinfo2rfc (eit, buffer)  /* EncodedInformationTypes -> RFC */
EncodedIT       *eit;
char            *buffer;
{
	LIST_BPT        *list;
	char            tbuf[LINESIZE],
			*odif, *undef, *value;
	int             comma=FALSE;

	bzero (&tbuf[0], LINESIZE);
	odif  = rcmd_srch (BPT_ODIF, bptbl_body_parts84);
	undef = rcmd_srch (BPT_UNDEFINED, bptbl_body_parts84);

	for (list = eit->eit_types; list; list = list->li_next) {
		value = list -> li_name;
		if (strncmp (hdr_822_bp, value, strlen(hdr_822_bp)) == 0)
			continue;
		if (strncmp (hdr_p2_bp, value, strlen(hdr_p2_bp)) == 0)
			continue;
		if (strncmp ("delivery.", value, 9) == 0)
			continue;
		if (lexequ (value, odif) == 0)
			value = undef;
		if (comma)
			(void) strcat (&tbuf[0], ", ");
		else
			comma = TRUE;
		(void) strcat (&tbuf[0], value);
	}

	(void) strcpy (buffer, tbuf);

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

	return;
}