]>
Commit | Line | Data |
---|---|---|
6d2010ae A |
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 | |
65 | func(char *fnam) | |
66 | { | |
67 | value = open (fnam,flgs,mod); | |
68 | return (value < 0); | |
69 | } | |
70 | ||
71 | static int | |
72 | ffunc(char *fnam) | |
73 | { | |
74 | fvalue = fopen (fnam,ftyp); | |
75 | return (fvalue == 0); | |
76 | } | |
77 | ||
78 | int | |
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) return (-1); | |
84 | return (value); | |
85 | } | |
86 | ||
87 | FILE * | |
88 | fopenp(const char *fpath, char *file, char *complete, const char *ftype) | |
89 | { | |
90 | ftyp = ftype; | |
91 | if (searchp(fpath,file,complete,ffunc) < 0) return (0); | |
92 | return (fvalue); | |
93 | } |