1da2e3ebdSchin /***********************************************************************
2da2e3ebdSchin *                                                                      *
3da2e3ebdSchin *               This software is part of the ast package               *
4*b30d1939SAndy Fiddaman *          Copyright (c) 1985-2011 AT&T Intellectual Property          *
5da2e3ebdSchin *                      and is licensed under the                       *
6*b30d1939SAndy Fiddaman *                 Eclipse Public License, Version 1.0                  *
77c2fbfb3SApril Chin *                    by AT&T Intellectual Property                     *
8da2e3ebdSchin *                                                                      *
9da2e3ebdSchin *                A copy of the License is available at                 *
10*b30d1939SAndy Fiddaman *          http://www.eclipse.org/org/documents/epl-v10.html           *
11*b30d1939SAndy Fiddaman *         (with md5 checksum b35adb5213ca9657e911e9befb180842)         *
12da2e3ebdSchin *                                                                      *
13da2e3ebdSchin *              Information and Software Systems Research               *
14da2e3ebdSchin *                            AT&T Research                             *
15da2e3ebdSchin *                           Florham Park NJ                            *
16da2e3ebdSchin *                                                                      *
17da2e3ebdSchin *                 Glenn Fowler <gsf@research.att.com>                  *
18da2e3ebdSchin *                  David Korn <dgk@research.att.com>                   *
19da2e3ebdSchin *                   Phong Vo <kpv@research.att.com>                    *
20da2e3ebdSchin *                                                                      *
21da2e3ebdSchin ***********************************************************************/
22da2e3ebdSchin #include	"sfdchdr.h"
23da2e3ebdSchin 
24da2e3ebdSchin /*	A discipline to tee the output to a stream to another stream.
25da2e3ebdSchin **	This is similar to what the "tee" program does. As implemented
26da2e3ebdSchin **	this discipline only works with file streams.
27da2e3ebdSchin **
28da2e3ebdSchin **	Written by Kiem-Phong Vo, kpv@research.att.com, 03/18/1998.
29da2e3ebdSchin */
30da2e3ebdSchin 
31da2e3ebdSchin /* the discipline structure for tee-ing */
32da2e3ebdSchin typedef struct _tee_s
33da2e3ebdSchin {	Sfdisc_t	disc;	/* the sfio discipline structure */
34da2e3ebdSchin 	Sfio_t*		tee;	/* the stream to tee to */
35da2e3ebdSchin 	int		status;	/* if tee stream is still ok */
36da2e3ebdSchin } Tee_t;
37da2e3ebdSchin 
38da2e3ebdSchin /*	write to the teed stream.  */
39da2e3ebdSchin #if __STD_C
teewrite(Sfio_t * f,const Void_t * buf,size_t size,Sfdisc_t * disc)40da2e3ebdSchin static ssize_t teewrite(Sfio_t* f, const Void_t* buf, size_t size, Sfdisc_t* disc)
41da2e3ebdSchin #else
42da2e3ebdSchin static ssize_t teewrite(f,buf,size,disc)
43da2e3ebdSchin Sfio_t* 	f;	/* the stream being written to */
44da2e3ebdSchin Void_t*		buf;	/* the buffer of data being output */
45da2e3ebdSchin size_t		size;	/* the data size */
46da2e3ebdSchin Sfdisc_t*	disc;	/* the tee discipline */
47da2e3ebdSchin #endif
48da2e3ebdSchin {
49da2e3ebdSchin 	reg Tee_t*	te = (Tee_t*)disc;
50da2e3ebdSchin 
51da2e3ebdSchin 	/* tee data if still ok */
52da2e3ebdSchin 	if(te->status == 0 && sfwrite(te->tee,buf,size) != (ssize_t)size)
53da2e3ebdSchin 		te->status = -1;
54da2e3ebdSchin 
55da2e3ebdSchin 	/* do the actual write */
56da2e3ebdSchin 	return sfwr(f,buf,size,disc);
57da2e3ebdSchin }
58da2e3ebdSchin 
59da2e3ebdSchin /* on close, remove the discipline */
60da2e3ebdSchin #if __STD_C
teeexcept(Sfio_t * f,int type,Void_t * data,Sfdisc_t * disc)61da2e3ebdSchin static int teeexcept(Sfio_t* f, int type, Void_t* data, Sfdisc_t* disc)
62da2e3ebdSchin #else
63da2e3ebdSchin static int teeexcept(f,type,data,disc)
64da2e3ebdSchin Sfio_t*		f;
65da2e3ebdSchin int		type;
66da2e3ebdSchin Void_t*		data;
67da2e3ebdSchin Sfdisc_t*	disc;
68da2e3ebdSchin #endif
69da2e3ebdSchin {
70da2e3ebdSchin 	if(type == SF_FINAL || type == SF_DPOP)
71da2e3ebdSchin 		free(disc);
72da2e3ebdSchin 
73da2e3ebdSchin 	return 0;
74da2e3ebdSchin }
75da2e3ebdSchin 
76da2e3ebdSchin #if __STD_C
sfdctee(Sfio_t * f,Sfio_t * tee)77da2e3ebdSchin int sfdctee(Sfio_t* f, Sfio_t* tee)
78da2e3ebdSchin #else
79da2e3ebdSchin int sfdctee(f, tee)
80da2e3ebdSchin Sfio_t*	f;	/* stream to tee from	*/
81da2e3ebdSchin Sfio_t*	tee;	/* stream to tee to	*/
82da2e3ebdSchin #endif
83da2e3ebdSchin {
84da2e3ebdSchin 	reg Tee_t*	te;
85da2e3ebdSchin 
86da2e3ebdSchin 	if(!(te = (Tee_t*)malloc(sizeof(Tee_t))) )
87da2e3ebdSchin 		return -1;
88da2e3ebdSchin 
89da2e3ebdSchin 	te->disc.readf = NIL(Sfread_f);
90da2e3ebdSchin 	te->disc.seekf = NIL(Sfseek_f);
91da2e3ebdSchin 	te->disc.writef = teewrite;
92da2e3ebdSchin 	te->disc.exceptf = teeexcept;
93da2e3ebdSchin 	te->tee = tee;
94da2e3ebdSchin 	te->status = 0;
95da2e3ebdSchin 
96da2e3ebdSchin 	if(sfdisc(f,(Sfdisc_t*)te) != (Sfdisc_t*)te)
97da2e3ebdSchin 	{	free(te);
98da2e3ebdSchin 		return -1;
99da2e3ebdSchin 	}
100da2e3ebdSchin 
101da2e3ebdSchin 	return 0;
102da2e3ebdSchin }
103