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*                  Common Public License, Version 1.0                  *
7*                    by AT&T Intellectual Property                     *
8*                                                                      *
9*                A copy of the License is available at                 *
10*            http://www.opensource.org/licenses/cpl1.0.txt             *
11*         (with md5 checksum 059e8cd6165cb4c31e351f2b69388fd9)         *
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	"sfhdr.h"
23
24/*	Set some control flags or file descript for the stream
25**
26**	Written by Kiem-Phong Vo.
27*/
28
29#if __STD_C
30int sfset(Sfio_t* f, int flags, int set)
31#else
32int sfset(f,flags,set)
33Sfio_t*		f;
34int		flags;
35int		set;
36#endif
37{
38	reg int	oflags, tflags, rv;
39	SFMTXDECL(f);
40
41	SFMTXENTER(f,0);
42
43	if(flags == 0 && set == 0)
44		SFMTXRETURN(f, (f->flags&SF_FLAGS));
45
46	if((oflags = (f->mode&SF_RDWR)) != (int)f->mode)
47	{	/* avoid sfsetbuf() isatty() call if user sets (SF_LINE|SF_WCWIDTH) */
48		if(set && (flags & (SF_LINE|SF_WCWIDTH)) && !(f->flags & (SF_LINE|SF_WCWIDTH)))
49		{	tflags = (SF_LINE|SF_WCWIDTH);
50			f->flags |= tflags;
51		}
52		else	tflags = 0;
53		rv = _sfmode(f,oflags,0);
54		if(tflags)
55			f->flags &= ~tflags;
56		if(rv < 0)
57			SFMTXRETURN(f, 0);
58	}
59	if(flags == 0)
60		SFMTXRETURN(f, (f->flags&SF_FLAGS));
61
62	SFLOCK(f,0);
63
64	/* preserve at least one rd/wr flag */
65	oflags = f->flags;
66	if(!(f->bits&SF_BOTH) || (flags&SF_RDWR) == SF_RDWR )
67		flags &= ~SF_RDWR;
68
69	/* set the flag */
70	if(set)
71		f->flags |=  (flags&SF_SETS);
72	else	f->flags &= ~(flags&SF_SETS);
73
74	/* must have at least one of read/write */
75	if(!(f->flags&SF_RDWR))
76		f->flags |= (oflags&SF_RDWR);
77
78	if(f->extent < 0)
79		f->flags &= ~SF_APPENDWR;
80
81	/* turn to appropriate mode as necessary */
82	if((flags &= SF_RDWR) )
83	{	if(!set)
84		{	if(flags == SF_READ)
85				flags = SF_WRITE;
86			else	flags = SF_READ;
87		}
88		if((flags == SF_WRITE && !(f->mode&SF_WRITE)) ||
89		   (flags == SF_READ && !(f->mode&(SF_READ|SF_SYNCED))) )
90			(void)_sfmode(f,flags,1);
91	}
92
93	/* if not shared or unseekable, public means nothing */
94	if(!(f->flags&SF_SHARE) || f->extent < 0)
95		f->flags &= ~SF_PUBLIC;
96
97	SFOPEN(f,0);
98	SFMTXRETURN(f, (oflags&SF_FLAGS));
99}
100