2 * support/nfs/cacheio.c
3 * support IO on the cache channel files in 2.5 and beyond.
4 * These use 'qwords' which are like words, but with a little quoting.
10 * Support routines for text-based upcalls.
11 * Fields are separated by spaces.
12 * Fields are either mangled to quote space tab newline slosh with slosh
13 * or a hexified with a leading \x
14 * Record is terminated with newline.
20 #include <stdio_ext.h>
23 #include <sys/types.h>
29 void qword_add(char **bpp, int *lp, char *str)
37 while ((c=*str++) && len)
45 *bp++ = '0' + ((c & 0300)>>6);
46 *bp++ = '0' + ((c & 0070)>>3);
47 *bp++ = '0' + ((c & 0007)>>0);
55 if (c || len <1) len = -1;
64 void qword_addhex(char **bpp, int *lp, char *buf, int blen)
75 while (blen && len >= 2) {
76 unsigned char c = *buf++;
77 *bp++ = '0' + ((c&0xf0)>>4) + (c>=0xa0)*('a'-'9'-1);
78 *bp++ = '0' + (c&0x0f) + ((c&0x0f)>=0x0a)*('a'-'9'-1);
83 if (blen || len<1) len = -1;
92 void qword_addint(char **bpp, int *lp, int n)
96 len = snprintf(*bpp, *lp, "%d ", n);
103 void qword_adduint(char **bpp, int *lp, unsigned int n)
107 len = snprintf(*bpp, *lp, "%u ", n);
114 void qword_addeol(char **bpp, int *lp)
123 static char qword_buf[8192];
124 void qword_print(FILE *f, char *str)
126 char *bp = qword_buf;
127 int len = sizeof(qword_buf);
128 qword_add(&bp, &len, str);
129 if (fwrite(qword_buf, bp-qword_buf, 1, f) != 1) {
130 xlog_warn("qword_print: fwrite failed: errno %d (%s)",
131 errno, strerror(errno));
135 void qword_printhex(FILE *f, char *str, int slen)
137 char *bp = qword_buf;
138 int len = sizeof(qword_buf);
139 qword_addhex(&bp, &len, str, slen);
140 if (fwrite(qword_buf, bp-qword_buf, 1, f) != 1) {
141 xlog_warn("qword_printhex: fwrite failed: errno %d (%s)",
142 errno, strerror(errno));
146 void qword_printint(FILE *f, int num)
148 fprintf(f, "%d ", num);
151 int qword_eol(FILE *f)
158 * We must send one line (and one line only) in a single write
159 * call. In case of a write error, libc may accumulate the
160 * unwritten data and try to write it again later, resulting in a
161 * multi-line write. So we must explicitly ask it to throw away
162 * any such cached data:
170 #define isodigit(c) (isdigit(c) && c <= '7')
171 int qword_get(char **bpp, char *dest, int bufsize)
173 /* return bytes copied, or -1 on error */
177 while (*bp == ' ') bp++;
179 if (bp[0] == '\\' && bp[1] == 'x') {
182 while (isxdigit(bp[0]) && isxdigit(bp[1]) && len < bufsize) {
183 int byte = isdigit(*bp) ? *bp-'0' : toupper(*bp)-'A'+10;
186 byte |= isdigit(*bp) ? *bp-'0' : toupper(*bp)-'A'+10;
192 /* text with \nnn octal quoting */
193 while (*bp != ' ' && *bp != '\n' && *bp && len < bufsize-1) {
195 isodigit(bp[1]) && (bp[1] <= '3') &&
198 int byte = (*++bp -'0');
200 byte = (byte << 3) | (*bp++ - '0');
201 byte = (byte << 3) | (*bp++ - '0');
211 if (*bp != ' ' && *bp != '\n' && *bp != '\0')
213 while (*bp == ' ') bp++;
219 int qword_get_int(char **bpp, int *anint)
224 int len = qword_get(bpp, buf, 50);
225 if (len < 0) return -1;
226 if (len ==0) return -1;
227 rv = strtol(buf, &ep, 0);
233 #define READLINE_BUFFER_INCREMENT 2048
235 int readline(int fd, char **buf, int *lenp)
237 /* read a line into *buf, which is malloced *len long
238 * realloc if needed until we find a \n
239 * nul out the \n and return
240 * 0 on eof, 1 on success
245 char *b = malloc(READLINE_BUFFER_INCREMENT);
249 *lenp = READLINE_BUFFER_INCREMENT;
251 len = read(fd, *buf, *lenp);
254 while ((*buf)[len-1] != '\n') {
255 /* now the less common case. There was no newline,
256 * so we have to keep reading after re-alloc
260 *lenp += READLINE_BUFFER_INCREMENT;
261 new = realloc(*buf, *lenp);
265 nl = read(fd, *buf + len, *lenp - len);
270 (*buf)[len-1] = '\0';
275 /* Check if we should use the new caching interface
276 * This succeeds iff the "nfsd" filesystem is mounted on
280 check_new_cache(void)
283 return (stat("/proc/fs/nfs/filehandle", &stb) == 0) ||
284 (stat("/proc/fs/nfsd/filehandle", &stb) == 0);
288 /* flush the kNFSd caches.
289 * Set the flush time to the mtime of _PATH_ETAB or
291 * the caches to flush are:
292 * auth.unix.ip nfsd.export nfsd.fh
296 cache_flush(int force)
303 /* Note: the order of these caches is important.
304 * They need to be flushed in dependancy order. So
305 * a cache that references items in another cache,
306 * as nfsd.fh entries reference items in nfsd.export,
307 * must be flushed before the cache that it references.
309 static char *cachelist[] = {
318 stat(_PATH_ETAB, &stb) != 0 ||
320 stb.st_mtime = time(0);
322 sprintf(stime, "%ld\n", stb.st_mtime);
323 for (c=0; cachelist[c]; c++) {
325 sprintf(path, "/proc/net/rpc/%s/flush", cachelist[c]);
326 fd = open(path, O_RDWR);
328 if (write(fd, stime, strlen(stime)) != strlen(stime)) {
329 xlog_warn("Writing to '%s' failed: errno %d (%s)",
330 path, errno, strerror(errno));