1 /* @(#)file_getraise.c	1.1 07/04/03 Copyright 2007 J. Schilling */
2 /*
3  *	Copyright (c) 2007 J. Schilling
4  */
5 /*
6  * The contents of this file are subject to the terms of the
7  * Common Development and Distribution License, Version 1.0 only
8  * (the "License").  You may not use this file except in compliance
9  * with the License.
10  *
11  * See the file CDDL.Schily.txt in this distribution for details.
12  * A copy of the CDDL is also available via the Internet at
13  * http://www.opensource.org/licenses/cddl1.txt
14  *
15  * When distributing Covered Code, include this CDDL HEADER in each
16  * file and include the License file CDDL.Schily.txt from this distribution.
17  */
18 
19 #include "schilyio.h"
20 
21 EXPORT int
file_getraise(f)22 file_getraise(f)
23 	register FILE *f;
24 {
25 	int	oflag;
26 extern	int	_io_glflag;
27 
28 	if (f == (FILE *)NULL)
29 		return ((_io_glflag & _JS_IONORAISE) != 0);
30 
31 	down(f);
32 
33 	oflag = my_flag(f);
34 	return ((oflag & _JS_IONORAISE) != 0);
35 }
36