file.c revision 41989
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 *	$Id: file.c,v 1.3 1998/12/16 10:24:55 des Exp $
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
41FILE *
42fetchGetFile(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    return f;
51}
52
53FILE *
54fetchPutFile(struct url *u, char *flags)
55{
56    FILE *f;
57
58    if (strchr(flags, 'a'))
59	f = fopen(u->doc, "a");
60    else
61	f = fopen(u->doc, "w");
62
63    if (f == NULL)
64	_fetch_syserr();
65    return f;
66}
67
68static int
69_fetch_stat_file(char *fn, struct url_stat *us)
70{
71    struct stat sb;
72
73    if (stat(fn, &sb) == -1) {
74	_fetch_syserr();
75	return -1;
76    }
77    us->size = sb.st_size;
78    us->atime = sb.st_atime;
79    us->mtime = sb.st_mtime;
80    return 0;
81}
82
83int
84fetchStatFile(struct url *u, struct url_stat *us, char *flags)
85{
86    return _fetch_stat_file(u->doc, us);
87}
88
89struct url_ent *
90fetchListFile(struct url *u, char *flags)
91{
92    DIR *dir;
93    struct dirent *de;
94    struct url_stat us;
95    struct url_ent *ue;
96    int size, len;
97    char fn[MAXPATHLEN], *p;
98    int l;
99
100    if ((dir = opendir(u->doc)) == NULL) {
101	_fetch_syserr();
102	return NULL;
103    }
104
105    ue = NULL;
106    strncpy(fn, u->doc, sizeof fn - 2);
107    fn[sizeof fn - 2] = 0;
108    strcat(fn, "/");
109    p = strchr(fn, 0);
110    l = sizeof fn - strlen(fn) - 1;
111
112    while ((de = readdir(dir)) != NULL) {
113	strncpy(p, de->d_name, l - 1);
114	p[l - 1] = 0;
115	if (_fetch_stat_file(fn, &us) == -1)
116	    /* should I return a partial result, or abort? */
117	    break;
118	_fetch_add_entry(&ue, &size, &len, de->d_name, &us);
119    }
120
121    return ue;
122}
123