seq_file: return a negative error code when seq_path_root() fails.
[linux-2.6.git] / fs / seq_file.c
1 /*
2  * linux/fs/seq_file.c
3  *
4  * helper functions for making synthetic files from sequences of records.
5  * initial implementation -- AV, Oct 2001.
6  */
7
8 #include <linux/fs.h>
9 #include <linux/module.h>
10 #include <linux/seq_file.h>
11 #include <linux/slab.h>
12
13 #include <asm/uaccess.h>
14 #include <asm/page.h>
15
16 /**
17  *      seq_open -      initialize sequential file
18  *      @file: file we initialize
19  *      @op: method table describing the sequence
20  *
21  *      seq_open() sets @file, associating it with a sequence described
22  *      by @op.  @op->start() sets the iterator up and returns the first
23  *      element of sequence. @op->stop() shuts it down.  @op->next()
24  *      returns the next element of sequence.  @op->show() prints element
25  *      into the buffer.  In case of error ->start() and ->next() return
26  *      ERR_PTR(error).  In the end of sequence they return %NULL. ->show()
27  *      returns 0 in case of success and negative number in case of error.
28  *      Returning SEQ_SKIP means "discard this element and move on".
29  */
30 int seq_open(struct file *file, const struct seq_operations *op)
31 {
32         struct seq_file *p = file->private_data;
33
34         if (!p) {
35                 p = kmalloc(sizeof(*p), GFP_KERNEL);
36                 if (!p)
37                         return -ENOMEM;
38                 file->private_data = p;
39         }
40         memset(p, 0, sizeof(*p));
41         mutex_init(&p->lock);
42         p->op = op;
43
44         /*
45          * Wrappers around seq_open(e.g. swaps_open) need to be
46          * aware of this. If they set f_version themselves, they
47          * should call seq_open first and then set f_version.
48          */
49         file->f_version = 0;
50
51         /*
52          * seq_files support lseek() and pread().  They do not implement
53          * write() at all, but we clear FMODE_PWRITE here for historical
54          * reasons.
55          *
56          * If a client of seq_files a) implements file.write() and b) wishes to
57          * support pwrite() then that client will need to implement its own
58          * file.open() which calls seq_open() and then sets FMODE_PWRITE.
59          */
60         file->f_mode &= ~FMODE_PWRITE;
61         return 0;
62 }
63 EXPORT_SYMBOL(seq_open);
64
65 static int traverse(struct seq_file *m, loff_t offset)
66 {
67         loff_t pos = 0, index;
68         int error = 0;
69         void *p;
70
71         m->version = 0;
72         index = 0;
73         m->count = m->from = 0;
74         if (!offset) {
75                 m->index = index;
76                 return 0;
77         }
78         if (!m->buf) {
79                 m->buf = kmalloc(m->size = PAGE_SIZE, GFP_KERNEL);
80                 if (!m->buf)
81                         return -ENOMEM;
82         }
83         p = m->op->start(m, &index);
84         while (p) {
85                 error = PTR_ERR(p);
86                 if (IS_ERR(p))
87                         break;
88                 error = m->op->show(m, p);
89                 if (error < 0)
90                         break;
91                 if (unlikely(error)) {
92                         error = 0;
93                         m->count = 0;
94                 }
95                 if (m->count == m->size)
96                         goto Eoverflow;
97                 if (pos + m->count > offset) {
98                         m->from = offset - pos;
99                         m->count -= m->from;
100                         m->index = index;
101                         break;
102                 }
103                 pos += m->count;
104                 m->count = 0;
105                 if (pos == offset) {
106                         index++;
107                         m->index = index;
108                         break;
109                 }
110                 p = m->op->next(m, p, &index);
111         }
112         m->op->stop(m, p);
113         m->index = index;
114         return error;
115
116 Eoverflow:
117         m->op->stop(m, p);
118         kfree(m->buf);
119         m->buf = kmalloc(m->size <<= 1, GFP_KERNEL);
120         return !m->buf ? -ENOMEM : -EAGAIN;
121 }
122
123 /**
124  *      seq_read -      ->read() method for sequential files.
125  *      @file: the file to read from
126  *      @buf: the buffer to read to
127  *      @size: the maximum number of bytes to read
128  *      @ppos: the current position in the file
129  *
130  *      Ready-made ->f_op->read()
131  */
132 ssize_t seq_read(struct file *file, char __user *buf, size_t size, loff_t *ppos)
133 {
134         struct seq_file *m = (struct seq_file *)file->private_data;
135         size_t copied = 0;
136         loff_t pos;
137         size_t n;
138         void *p;
139         int err = 0;
140
141         mutex_lock(&m->lock);
142
143         /* Don't assume *ppos is where we left it */
144         if (unlikely(*ppos != m->read_pos)) {
145                 m->read_pos = *ppos;
146                 while ((err = traverse(m, *ppos)) == -EAGAIN)
147                         ;
148                 if (err) {
149                         /* With prejudice... */
150                         m->read_pos = 0;
151                         m->version = 0;
152                         m->index = 0;
153                         m->count = 0;
154                         goto Done;
155                 }
156         }
157
158         /*
159          * seq_file->op->..m_start/m_stop/m_next may do special actions
160          * or optimisations based on the file->f_version, so we want to
161          * pass the file->f_version to those methods.
162          *
163          * seq_file->version is just copy of f_version, and seq_file
164          * methods can treat it simply as file version.
165          * It is copied in first and copied out after all operations.
166          * It is convenient to have it as  part of structure to avoid the
167          * need of passing another argument to all the seq_file methods.
168          */
169         m->version = file->f_version;
170         /* grab buffer if we didn't have one */
171         if (!m->buf) {
172                 m->buf = kmalloc(m->size = PAGE_SIZE, GFP_KERNEL);
173                 if (!m->buf)
174                         goto Enomem;
175         }
176         /* if not empty - flush it first */
177         if (m->count) {
178                 n = min(m->count, size);
179                 err = copy_to_user(buf, m->buf + m->from, n);
180                 if (err)
181                         goto Efault;
182                 m->count -= n;
183                 m->from += n;
184                 size -= n;
185                 buf += n;
186                 copied += n;
187                 if (!m->count)
188                         m->index++;
189                 if (!size)
190                         goto Done;
191         }
192         /* we need at least one record in buffer */
193         pos = m->index;
194         p = m->op->start(m, &pos);
195         while (1) {
196                 err = PTR_ERR(p);
197                 if (!p || IS_ERR(p))
198                         break;
199                 err = m->op->show(m, p);
200                 if (err < 0)
201                         break;
202                 if (unlikely(err))
203                         m->count = 0;
204                 if (unlikely(!m->count)) {
205                         p = m->op->next(m, p, &pos);
206                         m->index = pos;
207                         continue;
208                 }
209                 if (m->count < m->size)
210                         goto Fill;
211                 m->op->stop(m, p);
212                 kfree(m->buf);
213                 m->buf = kmalloc(m->size <<= 1, GFP_KERNEL);
214                 if (!m->buf)
215                         goto Enomem;
216                 m->count = 0;
217                 m->version = 0;
218                 pos = m->index;
219                 p = m->op->start(m, &pos);
220         }
221         m->op->stop(m, p);
222         m->count = 0;
223         goto Done;
224 Fill:
225         /* they want more? let's try to get some more */
226         while (m->count < size) {
227                 size_t offs = m->count;
228                 loff_t next = pos;
229                 p = m->op->next(m, p, &next);
230                 if (!p || IS_ERR(p)) {
231                         err = PTR_ERR(p);
232                         break;
233                 }
234                 err = m->op->show(m, p);
235                 if (m->count == m->size || err) {
236                         m->count = offs;
237                         if (likely(err <= 0))
238                                 break;
239                 }
240                 pos = next;
241         }
242         m->op->stop(m, p);
243         n = min(m->count, size);
244         err = copy_to_user(buf, m->buf, n);
245         if (err)
246                 goto Efault;
247         copied += n;
248         m->count -= n;
249         if (m->count)
250                 m->from = n;
251         else
252                 pos++;
253         m->index = pos;
254 Done:
255         if (!copied)
256                 copied = err;
257         else {
258                 *ppos += copied;
259                 m->read_pos += copied;
260         }
261         file->f_version = m->version;
262         mutex_unlock(&m->lock);
263         return copied;
264 Enomem:
265         err = -ENOMEM;
266         goto Done;
267 Efault:
268         err = -EFAULT;
269         goto Done;
270 }
271 EXPORT_SYMBOL(seq_read);
272
273 /**
274  *      seq_lseek -     ->llseek() method for sequential files.
275  *      @file: the file in question
276  *      @offset: new position
277  *      @origin: 0 for absolute, 1 for relative position
278  *
279  *      Ready-made ->f_op->llseek()
280  */
281 loff_t seq_lseek(struct file *file, loff_t offset, int origin)
282 {
283         struct seq_file *m = (struct seq_file *)file->private_data;
284         loff_t retval = -EINVAL;
285
286         mutex_lock(&m->lock);
287         m->version = file->f_version;
288         switch (origin) {
289                 case 1:
290                         offset += file->f_pos;
291                 case 0:
292                         if (offset < 0)
293                                 break;
294                         retval = offset;
295                         if (offset != m->read_pos) {
296                                 while ((retval=traverse(m, offset)) == -EAGAIN)
297                                         ;
298                                 if (retval) {
299                                         /* with extreme prejudice... */
300                                         file->f_pos = 0;
301                                         m->read_pos = 0;
302                                         m->version = 0;
303                                         m->index = 0;
304                                         m->count = 0;
305                                 } else {
306                                         m->read_pos = offset;
307                                         retval = file->f_pos = offset;
308                                 }
309                         }
310         }
311         file->f_version = m->version;
312         mutex_unlock(&m->lock);
313         return retval;
314 }
315 EXPORT_SYMBOL(seq_lseek);
316
317 /**
318  *      seq_release -   free the structures associated with sequential file.
319  *      @file: file in question
320  *      @inode: file->f_path.dentry->d_inode
321  *
322  *      Frees the structures associated with sequential file; can be used
323  *      as ->f_op->release() if you don't have private data to destroy.
324  */
325 int seq_release(struct inode *inode, struct file *file)
326 {
327         struct seq_file *m = (struct seq_file *)file->private_data;
328         kfree(m->buf);
329         kfree(m);
330         return 0;
331 }
332 EXPORT_SYMBOL(seq_release);
333
334 /**
335  *      seq_escape -    print string into buffer, escaping some characters
336  *      @m:     target buffer
337  *      @s:     string
338  *      @esc:   set of characters that need escaping
339  *
340  *      Puts string into buffer, replacing each occurrence of character from
341  *      @esc with usual octal escape.  Returns 0 in case of success, -1 - in
342  *      case of overflow.
343  */
344 int seq_escape(struct seq_file *m, const char *s, const char *esc)
345 {
346         char *end = m->buf + m->size;
347         char *p;
348         char c;
349
350         for (p = m->buf + m->count; (c = *s) != '\0' && p < end; s++) {
351                 if (!strchr(esc, c)) {
352                         *p++ = c;
353                         continue;
354                 }
355                 if (p + 3 < end) {
356                         *p++ = '\\';
357                         *p++ = '0' + ((c & 0300) >> 6);
358                         *p++ = '0' + ((c & 070) >> 3);
359                         *p++ = '0' + (c & 07);
360                         continue;
361                 }
362                 m->count = m->size;
363                 return -1;
364         }
365         m->count = p - m->buf;
366         return 0;
367 }
368 EXPORT_SYMBOL(seq_escape);
369
370 int seq_printf(struct seq_file *m, const char *f, ...)
371 {
372         va_list args;
373         int len;
374
375         if (m->count < m->size) {
376                 va_start(args, f);
377                 len = vsnprintf(m->buf + m->count, m->size - m->count, f, args);
378                 va_end(args);
379                 if (m->count + len < m->size) {
380                         m->count += len;
381                         return 0;
382                 }
383         }
384         m->count = m->size;
385         return -1;
386 }
387 EXPORT_SYMBOL(seq_printf);
388
389 /**
390  *      mangle_path -   mangle and copy path to buffer beginning
391  *      @s: buffer start
392  *      @p: beginning of path in above buffer
393  *      @esc: set of characters that need escaping
394  *
395  *      Copy the path from @p to @s, replacing each occurrence of character from
396  *      @esc with usual octal escape.
397  *      Returns pointer past last written character in @s, or NULL in case of
398  *      failure.
399  */
400 char *mangle_path(char *s, char *p, char *esc)
401 {
402         while (s <= p) {
403                 char c = *p++;
404                 if (!c) {
405                         return s;
406                 } else if (!strchr(esc, c)) {
407                         *s++ = c;
408                 } else if (s + 4 > p) {
409                         break;
410                 } else {
411                         *s++ = '\\';
412                         *s++ = '0' + ((c & 0300) >> 6);
413                         *s++ = '0' + ((c & 070) >> 3);
414                         *s++ = '0' + (c & 07);
415                 }
416         }
417         return NULL;
418 }
419 EXPORT_SYMBOL(mangle_path);
420
421 /**
422  * seq_path - seq_file interface to print a pathname
423  * @m: the seq_file handle
424  * @path: the struct path to print
425  * @esc: set of characters to escape in the output
426  *
427  * return the absolute path of 'path', as represented by the
428  * dentry / mnt pair in the path parameter.
429  */
430 int seq_path(struct seq_file *m, struct path *path, char *esc)
431 {
432         if (m->count < m->size) {
433                 char *s = m->buf + m->count;
434                 char *p = d_path(path, s, m->size - m->count);
435                 if (!IS_ERR(p)) {
436                         s = mangle_path(s, p, esc);
437                         if (s) {
438                                 p = m->buf + m->count;
439                                 m->count = s - m->buf;
440                                 return s - p;
441                         }
442                 }
443         }
444         m->count = m->size;
445         return -1;
446 }
447 EXPORT_SYMBOL(seq_path);
448
449 /*
450  * Same as seq_path, but relative to supplied root.
451  *
452  * root may be changed, see __d_path().
453  */
454 int seq_path_root(struct seq_file *m, struct path *path, struct path *root,
455                   char *esc)
456 {
457         int err = -ENAMETOOLONG;
458         if (m->count < m->size) {
459                 char *s = m->buf + m->count;
460                 char *p;
461
462                 spin_lock(&dcache_lock);
463                 p = __d_path(path, root, s, m->size - m->count);
464                 spin_unlock(&dcache_lock);
465                 err = PTR_ERR(p);
466                 if (!IS_ERR(p)) {
467                         s = mangle_path(s, p, esc);
468                         if (s) {
469                                 p = m->buf + m->count;
470                                 m->count = s - m->buf;
471                                 return 0;
472                         }
473                         err = -ENAMETOOLONG;
474                 }
475         }
476         m->count = m->size;
477         return err;
478 }
479
480 /*
481  * returns the path of the 'dentry' from the root of its filesystem.
482  */
483 int seq_dentry(struct seq_file *m, struct dentry *dentry, char *esc)
484 {
485         if (m->count < m->size) {
486                 char *s = m->buf + m->count;
487                 char *p = dentry_path(dentry, s, m->size - m->count);
488                 if (!IS_ERR(p)) {
489                         s = mangle_path(s, p, esc);
490                         if (s) {
491                                 p = m->buf + m->count;
492                                 m->count = s - m->buf;
493                                 return s - p;
494                         }
495                 }
496         }
497         m->count = m->size;
498         return -1;
499 }
500
501 int seq_bitmap(struct seq_file *m, const unsigned long *bits,
502                                    unsigned int nr_bits)
503 {
504         if (m->count < m->size) {
505                 int len = bitmap_scnprintf(m->buf + m->count,
506                                 m->size - m->count, bits, nr_bits);
507                 if (m->count + len < m->size) {
508                         m->count += len;
509                         return 0;
510                 }
511         }
512         m->count = m->size;
513         return -1;
514 }
515 EXPORT_SYMBOL(seq_bitmap);
516
517 int seq_bitmap_list(struct seq_file *m, const unsigned long *bits,
518                 unsigned int nr_bits)
519 {
520         if (m->count < m->size) {
521                 int len = bitmap_scnlistprintf(m->buf + m->count,
522                                 m->size - m->count, bits, nr_bits);
523                 if (m->count + len < m->size) {
524                         m->count += len;
525                         return 0;
526                 }
527         }
528         m->count = m->size;
529         return -1;
530 }
531 EXPORT_SYMBOL(seq_bitmap_list);
532
533 static void *single_start(struct seq_file *p, loff_t *pos)
534 {
535         return NULL + (*pos == 0);
536 }
537
538 static void *single_next(struct seq_file *p, void *v, loff_t *pos)
539 {
540         ++*pos;
541         return NULL;
542 }
543
544 static void single_stop(struct seq_file *p, void *v)
545 {
546 }
547
548 int single_open(struct file *file, int (*show)(struct seq_file *, void *),
549                 void *data)
550 {
551         struct seq_operations *op = kmalloc(sizeof(*op), GFP_KERNEL);
552         int res = -ENOMEM;
553
554         if (op) {
555                 op->start = single_start;
556                 op->next = single_next;
557                 op->stop = single_stop;
558                 op->show = show;
559                 res = seq_open(file, op);
560                 if (!res)
561                         ((struct seq_file *)file->private_data)->private = data;
562                 else
563                         kfree(op);
564         }
565         return res;
566 }
567 EXPORT_SYMBOL(single_open);
568
569 int single_release(struct inode *inode, struct file *file)
570 {
571         const struct seq_operations *op = ((struct seq_file *)file->private_data)->op;
572         int res = seq_release(inode, file);
573         kfree(op);
574         return res;
575 }
576 EXPORT_SYMBOL(single_release);
577
578 int seq_release_private(struct inode *inode, struct file *file)
579 {
580         struct seq_file *seq = file->private_data;
581
582         kfree(seq->private);
583         seq->private = NULL;
584         return seq_release(inode, file);
585 }
586 EXPORT_SYMBOL(seq_release_private);
587
588 void *__seq_open_private(struct file *f, const struct seq_operations *ops,
589                 int psize)
590 {
591         int rc;
592         void *private;
593         struct seq_file *seq;
594
595         private = kzalloc(psize, GFP_KERNEL);
596         if (private == NULL)
597                 goto out;
598
599         rc = seq_open(f, ops);
600         if (rc < 0)
601                 goto out_free;
602
603         seq = f->private_data;
604         seq->private = private;
605         return private;
606
607 out_free:
608         kfree(private);
609 out:
610         return NULL;
611 }
612 EXPORT_SYMBOL(__seq_open_private);
613
614 int seq_open_private(struct file *filp, const struct seq_operations *ops,
615                 int psize)
616 {
617         return __seq_open_private(filp, ops, psize) ? 0 : -ENOMEM;
618 }
619 EXPORT_SYMBOL(seq_open_private);
620
621 int seq_putc(struct seq_file *m, char c)
622 {
623         if (m->count < m->size) {
624                 m->buf[m->count++] = c;
625                 return 0;
626         }
627         return -1;
628 }
629 EXPORT_SYMBOL(seq_putc);
630
631 int seq_puts(struct seq_file *m, const char *s)
632 {
633         int len = strlen(s);
634         if (m->count + len < m->size) {
635                 memcpy(m->buf + m->count, s, len);
636                 m->count += len;
637                 return 0;
638         }
639         m->count = m->size;
640         return -1;
641 }
642 EXPORT_SYMBOL(seq_puts);
643
644 /**
645  * seq_write - write arbitrary data to buffer
646  * @seq: seq_file identifying the buffer to which data should be written
647  * @data: data address
648  * @len: number of bytes
649  *
650  * Return 0 on success, non-zero otherwise.
651  */
652 int seq_write(struct seq_file *seq, const void *data, size_t len)
653 {
654         if (seq->count + len < seq->size) {
655                 memcpy(seq->buf + seq->count, data, len);
656                 seq->count += len;
657                 return 0;
658         }
659         seq->count = seq->size;
660         return -1;
661 }
662 EXPORT_SYMBOL(seq_write);
663
664 struct list_head *seq_list_start(struct list_head *head, loff_t pos)
665 {
666         struct list_head *lh;
667
668         list_for_each(lh, head)
669                 if (pos-- == 0)
670                         return lh;
671
672         return NULL;
673 }
674
675 EXPORT_SYMBOL(seq_list_start);
676
677 struct list_head *seq_list_start_head(struct list_head *head, loff_t pos)
678 {
679         if (!pos)
680                 return head;
681
682         return seq_list_start(head, pos - 1);
683 }
684
685 EXPORT_SYMBOL(seq_list_start_head);
686
687 struct list_head *seq_list_next(void *v, struct list_head *head, loff_t *ppos)
688 {
689         struct list_head *lh;
690
691         lh = ((struct list_head *)v)->next;
692         ++*ppos;
693         return lh == head ? NULL : lh;
694 }
695
696 EXPORT_SYMBOL(seq_list_next);