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