1 /*
2 * Copyright (c) 1999 Apple Computer, Inc. All rights reserved.
3 *
4 * @APPLE_LICENSE_HEADER_START@
5 *
6 * "Portions Copyright (c) 1999 Apple Computer, Inc. All Rights
7 * Reserved. This file contains Original Code and/or Modifications of
8 * Original Code as defined in and that are subject to the Apple Public
9 * Source License Version 1.0 (the 'License'). You may not use this file
10 * except in compliance with the License. Please obtain a copy of the
11 * License at http://www.apple.com/publicsource and read it before using
12 * this file.
13 *
14 * The Original Code and all software distributed under the License are
15 * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
16 * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
17 * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
18 * FITNESS FOR A PARTICULAR PURPOSE OR NON-INFRINGEMENT. Please see the
19 * License for the specific language governing rights and limitations
20 * under the License."
21 *
22 * @APPLE_LICENSE_HEADER_END@
23 */
24 /* openp, fopenp -- search pathlist and open file
25 *
26 * Usage:
27 * i = openp (path,file,complete,flags,mode)
28 * f = fopenp (path,file,complete,type)
29 * int i,flags,mode;
30 * FILE *f;
31 * char *path,*file,*complete,*type;
32 *
33 * Openp searches for "file" in the pathlist "path";
34 * when the file is found and can be opened by open()
35 * with the specified "flags" and "mode", then the full filename
36 * is copied into "complete" and openp returns the file
37 * descriptor. If no such file is found, openp returns -1.
38 * Fopenp performs the same function, using fopen() instead
39 * of open() and type instead of flags/mode; it returns 0 if no
40 * file is found.
41 *
42 * HISTORY
43 * 30-Apr-85 Steven Shafer (sas) at Carnegie-Mellon University
44 * Adapted for 4.2 BSD UNIX. Added new parameter to openp.c;
45 * changed names of flags, mode, and type parameters to reflect
46 * current manual entries for open and fopen.
47 *
48 * 20-Nov-79 Steven Shafer (sas) at Carnegie-Mellon University
49 * Created for VAX.
50 *
51 */
52
53 #include <stdio.h>
54 #include <fcntl.h> /* open */
55 #include "config.h"
56
57
58 int openp(const char *fpath, char *file, char *complete, int flags, int mode);
59
60 static int flgs, mod, value;
61 static const char *ftyp;
62 static FILE *fvalue;
63
64 static int
func(char * fnam)65 func(char *fnam)
66 {
67 value = open(fnam, flgs, mod);
68 return value < 0;
69 }
70
71 static int
ffunc(char * fnam)72 ffunc(char *fnam)
73 {
74 fvalue = fopen(fnam, ftyp);
75 return fvalue == 0;
76 }
77
78 int
openp(const char * fpath,char * file,char * complete,int flags,int mode)79 openp(const char *fpath, char *file, char *complete, int flags, int mode)
80 {
81 flgs = flags;
82 mod = mode;
83 if (searchp(fpath, file, complete, func) < 0) {
84 return -1;
85 }
86 return value;
87 }
88
89 FILE *
fopenp(const char * fpath,char * file,char * complete,const char * ftype)90 fopenp(const char *fpath, char *file, char *complete, const char *ftype)
91 {
92 ftyp = ftype;
93 if (searchp(fpath, file, complete, ffunc) < 0) {
94 return 0;
95 }
96 return fvalue;
97 }
98