|
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 e
Length: 1719 (0x6b7) Types: TextFile Names: »encinfo2rfc.c«
└─⟦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«
/* 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; }