1da2e3ebdSchin /***********************************************************************
2da2e3ebdSchin * *
3da2e3ebdSchin * This software is part of the ast package *
4*3e14f97fSRoger A. Faulkner * Copyright (c) 1985-2010 AT&T Intellectual Property *
5da2e3ebdSchin * and is licensed under the *
6da2e3ebdSchin * Common Public License, Version 1.0 *
77c2fbfb3SApril Chin * by AT&T Intellectual Property *
8da2e3ebdSchin * *
9da2e3ebdSchin * A copy of the License is available at *
10da2e3ebdSchin * http://www.opensource.org/licenses/cpl1.0.txt *
11da2e3ebdSchin * (with md5 checksum 059e8cd6165cb4c31e351f2b69388fd9) *
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