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	"sfhdr.h"
23da2e3ebdSchin 
24da2e3ebdSchin /*	Set some control flags or file descript for the stream
25da2e3ebdSchin **
26da2e3ebdSchin **	Written by Kiem-Phong Vo.
27da2e3ebdSchin */
28da2e3ebdSchin 
29da2e3ebdSchin #if __STD_C
sfset(Sfio_t * f,int flags,int set)307c2fbfb3SApril Chin int sfset(Sfio_t* f, int flags, int set)
31da2e3ebdSchin #else
32da2e3ebdSchin int sfset(f,flags,set)
337c2fbfb3SApril Chin Sfio_t*		f;
347c2fbfb3SApril Chin int		flags;
357c2fbfb3SApril Chin int		set;
36da2e3ebdSchin #endif
37da2e3ebdSchin {
38*b30d1939SAndy Fiddaman 	reg int	oflags, tflags, rv;
397c2fbfb3SApril Chin 	SFMTXDECL(f);
40da2e3ebdSchin 
417c2fbfb3SApril Chin 	SFMTXENTER(f,0);
42da2e3ebdSchin 
43da2e3ebdSchin 	if(flags == 0 && set == 0)
44da2e3ebdSchin 		SFMTXRETURN(f, (f->flags&SF_FLAGS));
45da2e3ebdSchin 
46*b30d1939SAndy Fiddaman 	if((oflags = (f->mode&SF_RDWR)) != (int)f->mode)
47*b30d1939SAndy Fiddaman 	{	/* avoid sfsetbuf() isatty() call if user sets (SF_LINE|SF_WCWIDTH) */
48*b30d1939SAndy Fiddaman 		if(set && (flags & (SF_LINE|SF_WCWIDTH)) && !(f->flags & (SF_LINE|SF_WCWIDTH)))
49*b30d1939SAndy Fiddaman 		{	tflags = (SF_LINE|SF_WCWIDTH);
50*b30d1939SAndy Fiddaman 			f->flags |= tflags;
51*b30d1939SAndy Fiddaman 		}
52*b30d1939SAndy Fiddaman 		else	tflags = 0;
53*b30d1939SAndy Fiddaman 		rv = _sfmode(f,oflags,0);
54*b30d1939SAndy Fiddaman 		if(tflags)
55*b30d1939SAndy Fiddaman 			f->flags &= ~tflags;
56*b30d1939SAndy Fiddaman 		if(rv < 0)
57*b30d1939SAndy Fiddaman 			SFMTXRETURN(f, 0);
58*b30d1939SAndy Fiddaman 	}
59da2e3ebdSchin 	if(flags == 0)
60da2e3ebdSchin 		SFMTXRETURN(f, (f->flags&SF_FLAGS));
61da2e3ebdSchin 
62da2e3ebdSchin 	SFLOCK(f,0);
63da2e3ebdSchin 
64da2e3ebdSchin 	/* preserve at least one rd/wr flag */
65da2e3ebdSchin 	oflags = f->flags;
66da2e3ebdSchin 	if(!(f->bits&SF_BOTH) || (flags&SF_RDWR) == SF_RDWR )
67da2e3ebdSchin 		flags &= ~SF_RDWR;
68da2e3ebdSchin 
69da2e3ebdSchin 	/* set the flag */
70da2e3ebdSchin 	if(set)
71da2e3ebdSchin 		f->flags |=  (flags&SF_SETS);
72da2e3ebdSchin 	else	f->flags &= ~(flags&SF_SETS);
73da2e3ebdSchin 
74da2e3ebdSchin 	/* must have at least one of read/write */
75da2e3ebdSchin 	if(!(f->flags&SF_RDWR))
76da2e3ebdSchin 		f->flags |= (oflags&SF_RDWR);
77da2e3ebdSchin 
78da2e3ebdSchin 	if(f->extent < 0)
79da2e3ebdSchin 		f->flags &= ~SF_APPENDWR;
80da2e3ebdSchin 
81da2e3ebdSchin 	/* turn to appropriate mode as necessary */
82da2e3ebdSchin 	if((flags &= SF_RDWR) )
83da2e3ebdSchin 	{	if(!set)
84da2e3ebdSchin 		{	if(flags == SF_READ)
85da2e3ebdSchin 				flags = SF_WRITE;
86da2e3ebdSchin 			else	flags = SF_READ;
87da2e3ebdSchin 		}
88da2e3ebdSchin 		if((flags == SF_WRITE && !(f->mode&SF_WRITE)) ||
89da2e3ebdSchin 		   (flags == SF_READ && !(f->mode&(SF_READ|SF_SYNCED))) )
90da2e3ebdSchin 			(void)_sfmode(f,flags,1);
91da2e3ebdSchin 	}
92da2e3ebdSchin 
93da2e3ebdSchin 	/* if not shared or unseekable, public means nothing */
94da2e3ebdSchin 	if(!(f->flags&SF_SHARE) || f->extent < 0)
95da2e3ebdSchin 		f->flags &= ~SF_PUBLIC;
96da2e3ebdSchin 
97da2e3ebdSchin 	SFOPEN(f,0);
98da2e3ebdSchin 	SFMTXRETURN(f, (oflags&SF_FLAGS));
99da2e3ebdSchin }
100