xref: /freebsd/lib/libfetch/file.c (revision 64db83a8ab2d1f72a9b2174b39d2ef42b5b0580c)
1 /*-
2  * Copyright (c) 1998 Dag-Erling Co�dan Sm�rgrav
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer
10  *    in this position and unchanged.
11  * 2. Redistributions in binary form must reproduce the above copyright
12  *    notice, this list of conditions and the following disclaimer in the
13  *    documentation and/or other materials provided with the distribution.
14  * 3. The name of the author may not be used to endorse or promote products
15  *    derived from this software without specific prior written permission
16  *
17  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27  *
28  * $FreeBSD$
29  */
30 
31 #include <sys/param.h>
32 #include <sys/stat.h>
33 
34 #include <dirent.h>
35 #include <stdio.h>
36 #include <string.h>
37 
38 #include "fetch.h"
39 #include "common.h"
40 
41 FILE *
42 fetchGetFile(struct url *u, char *flags)
43 {
44     FILE *f;
45 
46     f = fopen(u->doc, "r");
47 
48     if (f == NULL)
49 	_fetch_syserr();
50 
51     if (u->offset && fseek(f, u->offset, SEEK_SET) == -1) {
52 	fclose(f);
53 	_fetch_syserr();
54     }
55 
56     return f;
57 }
58 
59 FILE *
60 fetchPutFile(struct url *u, char *flags)
61 {
62     FILE *f;
63 
64     if (flags && strchr(flags, 'a'))
65 	f = fopen(u->doc, "a");
66     else
67 	f = fopen(u->doc, "w+");
68 
69     if (f == NULL)
70 	_fetch_syserr();
71 
72     if (u->offset && fseek(f, u->offset, SEEK_SET) == -1) {
73 	fclose(f);
74 	_fetch_syserr();
75     }
76 
77     return f;
78 }
79 
80 static int
81 _fetch_stat_file(char *fn, struct url_stat *us)
82 {
83     struct stat sb;
84 
85     us->size = -1;
86     us->atime = us->mtime = 0;
87     if (stat(fn, &sb) == -1) {
88 	_fetch_syserr();
89 	return -1;
90     }
91     us->size = sb.st_size;
92     us->atime = sb.st_atime;
93     us->mtime = sb.st_mtime;
94     return 0;
95 }
96 
97 int
98 fetchStatFile(struct url *u, struct url_stat *us, char *flags)
99 {
100     return _fetch_stat_file(u->doc, us);
101 }
102 
103 struct url_ent *
104 fetchListFile(struct url *u, char *flags)
105 {
106     DIR *dir;
107     struct dirent *de;
108     struct url_stat us;
109     struct url_ent *ue;
110     int size, len;
111     char fn[MAXPATHLEN], *p;
112     int l;
113 
114     if ((dir = opendir(u->doc)) == NULL) {
115 	_fetch_syserr();
116 	return NULL;
117     }
118 
119     ue = NULL;
120     strncpy(fn, u->doc, sizeof fn - 2);
121     fn[sizeof fn - 2] = 0;
122     strcat(fn, "/");
123     p = strchr(fn, 0);
124     l = sizeof fn - strlen(fn) - 1;
125 
126     while ((de = readdir(dir)) != NULL) {
127 	strncpy(p, de->d_name, l - 1);
128 	p[l - 1] = 0;
129 	if (_fetch_stat_file(fn, &us) == -1)
130 	    /* should I return a partial result, or abort? */
131 	    break;
132 	_fetch_add_entry(&ue, &size, &len, de->d_name, &us);
133     }
134 
135     return ue;
136 }
137