1 /* 2 * Generic file access functions. 3 * 4 * Copyright (C) 2019, 2022 Paul Boddie <paul@boddie.org.uk> 5 * 6 * This program is free software; you can redistribute it and/or 7 * modify it under the terms of the GNU General Public License as 8 * published by the Free Software Foundation; either version 2 of 9 * the License, or (at your option) any later version. 10 * 11 * This program is distributed in the hope that it will be useful, 12 * but WITHOUT ANY WARRANTY; without even the implied warranty of 13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 14 * GNU General Public License for more details. 15 * 16 * You should have received a copy of the GNU General Public License 17 * along with this program; if not, write to the Free Software 18 * Foundation, Inc., 51 Franklin Street, Fifth Floor, 19 * Boston, MA 02110-1301, USA 20 */ 21 22 #include <stdio.h> 23 #include <string.h> 24 #include <sys/stat.h> 25 #include <sys/types.h> 26 27 28 29 /* Test object types in the external environment. */ 30 31 int isdir(const char *name) 32 { 33 struct stat st; 34 35 if (!lstat(name, &st)) 36 return S_ISDIR(st.st_mode); 37 else 38 return 0; 39 } 40 41 int isdir_dirname(const char *name) 42 { 43 char dirname[strlen(name) + 1]; 44 char *s; 45 46 strcpy(dirname, name); 47 s = strrchr(dirname, (int) '/'); 48 49 if (s != NULL) 50 *s = '\0'; 51 52 return isdir(dirname); 53 } 54 55 int isfile(const char *name) 56 { 57 struct stat st; 58 59 if (!lstat(name, &st)) 60 return S_ISREG(st.st_mode); 61 else 62 return 0; 63 } 64 65 /* Open a file in the external environment. */ 66 67 FILE *open_file_in_dir(const char *dirname, const char *basename, 68 const char *mode) 69 { 70 char pathname[strlen(dirname) + strlen(basename) + 1]; 71 72 strcpy(pathname, dirname); 73 strcat(pathname, "/"); 74 strcat(pathname, basename); 75 76 return fopen(pathname, mode); 77 } 78 79 /* vim: tabstop=4 expandtab shiftwidth=4 80 */