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