1/*++
2/* NAME
3/*	stream2rec 1
4/* SUMMARY
5/*	convert stream-lf data to record format
6/* SYNOPSIS
7/*	stream2rec
8/* DESCRIPTION
9/*	stream2rec reads lines from standard input and writes
10/*	them to standard output in record form.
11/* DIAGNOSTICS
12/*	Problems are reported to the standard error stream.
13/* LICENSE
14/* .ad
15/* .fi
16/*	The Secure Mailer license must be distributed with this software.
17/* AUTHOR(S)
18/*	Wietse Venema
19/*	IBM T.J. Watson Research
20/*	P.O. Box 704
21/*	Yorktown Heights, NY 10598, USA
22/*--*/
23
24/* System library. */
25
26#include <sys_defs.h>
27
28/* Utility library. */
29
30#include <vstream.h>
31#include <vstring.h>
32
33/* Global library. */
34
35#include <record.h>
36#include <rec_streamlf.h>
37
38int     main(void)
39{
40    VSTRING *buf = vstring_alloc(150);
41    int     type;
42
43    while ((type = rec_streamlf_get(VSTREAM_IN, buf, 150)) > 0)
44	REC_PUT_BUF(VSTREAM_OUT, type, buf);
45    vstream_fflush(VSTREAM_OUT);
46    return (0);
47}
48