1
2
3
4
5
6
7
8#include <linux/fs.h>
9#include <linux/export.h>
10#include <linux/seq_file.h>
11#include <linux/vmalloc.h>
12#include <linux/slab.h>
13#include <linux/cred.h>
14#include <linux/mm.h>
15
16#include <asm/uaccess.h>
17#include <asm/page.h>
18
19static void seq_set_overflow(struct seq_file *m)
20{
21 m->count = m->size;
22}
23
24static void *seq_buf_alloc(unsigned long size)
25{
26 void *buf;
27
28
29
30
31
32 buf = kmalloc(size, GFP_KERNEL | __GFP_NORETRY | __GFP_NOWARN);
33 if (!buf && size > PAGE_SIZE)
34 buf = vmalloc(size);
35 return buf;
36}
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52int seq_open(struct file *file, const struct seq_operations *op)
53{
54 struct seq_file *p = file->private_data;
55
56 if (!p) {
57 p = kmalloc(sizeof(*p), GFP_KERNEL);
58 if (!p)
59 return -ENOMEM;
60 file->private_data = p;
61 }
62 memset(p, 0, sizeof(*p));
63 mutex_init(&p->lock);
64 p->op = op;
65#ifdef CONFIG_USER_NS
66 p->user_ns = file->f_cred->user_ns;
67#endif
68
69
70
71
72
73
74 file->f_version = 0;
75
76
77
78
79
80
81
82
83
84
85 file->f_mode &= ~FMODE_PWRITE;
86 return 0;
87}
88EXPORT_SYMBOL(seq_open);
89
90static int traverse(struct seq_file *m, loff_t offset)
91{
92 loff_t pos = 0, index;
93 int error = 0;
94 void *p;
95
96 m->version = 0;
97 index = 0;
98 m->count = m->from = 0;
99 if (!offset) {
100 m->index = index;
101 return 0;
102 }
103 if (!m->buf) {
104 m->buf = seq_buf_alloc(m->size = PAGE_SIZE);
105 if (!m->buf)
106 return -ENOMEM;
107 }
108 p = m->op->start(m, &index);
109 while (p) {
110 error = PTR_ERR(p);
111 if (IS_ERR(p))
112 break;
113 error = m->op->show(m, p);
114 if (error < 0)
115 break;
116 if (unlikely(error)) {
117 error = 0;
118 m->count = 0;
119 }
120 if (seq_has_overflowed(m))
121 goto Eoverflow;
122 if (pos + m->count > offset) {
123 m->from = offset - pos;
124 m->count -= m->from;
125 m->index = index;
126 break;
127 }
128 pos += m->count;
129 m->count = 0;
130 if (pos == offset) {
131 index++;
132 m->index = index;
133 break;
134 }
135 p = m->op->next(m, p, &index);
136 }
137 m->op->stop(m, p);
138 m->index = index;
139 return error;
140
141Eoverflow:
142 m->op->stop(m, p);
143 kvfree(m->buf);
144 m->count = 0;
145 m->buf = seq_buf_alloc(m->size <<= 1);
146 return !m->buf ? -ENOMEM : -EAGAIN;
147}
148
149
150
151
152
153
154
155
156
157
158ssize_t seq_read(struct file *file, char __user *buf, size_t size, loff_t *ppos)
159{
160 struct seq_file *m = file->private_data;
161 size_t copied = 0;
162 loff_t pos;
163 size_t n;
164 void *p;
165 int err = 0;
166
167 mutex_lock(&m->lock);
168
169
170
171
172
173
174
175
176
177
178
179
180 m->version = file->f_version;
181
182
183 if (unlikely(*ppos != m->read_pos)) {
184 while ((err = traverse(m, *ppos)) == -EAGAIN)
185 ;
186 if (err) {
187
188 m->read_pos = 0;
189 m->version = 0;
190 m->index = 0;
191 m->count = 0;
192 goto Done;
193 } else {
194 m->read_pos = *ppos;
195 }
196 }
197
198
199 if (!m->buf) {
200 m->buf = seq_buf_alloc(m->size = PAGE_SIZE);
201 if (!m->buf)
202 goto Enomem;
203 }
204
205 if (m->count) {
206 n = min(m->count, size);
207 err = copy_to_user(buf, m->buf + m->from, n);
208 if (err)
209 goto Efault;
210 m->count -= n;
211 m->from += n;
212 size -= n;
213 buf += n;
214 copied += n;
215 if (!m->count)
216 m->index++;
217 if (!size)
218 goto Done;
219 }
220
221 pos = m->index;
222 p = m->op->start(m, &pos);
223 while (1) {
224 err = PTR_ERR(p);
225 if (!p || IS_ERR(p))
226 break;
227 err = m->op->show(m, p);
228 if (err < 0)
229 break;
230 if (unlikely(err))
231 m->count = 0;
232 if (unlikely(!m->count)) {
233 p = m->op->next(m, p, &pos);
234 m->index = pos;
235 continue;
236 }
237 if (m->count < m->size)
238 goto Fill;
239 m->op->stop(m, p);
240 kvfree(m->buf);
241 m->count = 0;
242 m->buf = seq_buf_alloc(m->size <<= 1);
243 if (!m->buf)
244 goto Enomem;
245 m->version = 0;
246 pos = m->index;
247 p = m->op->start(m, &pos);
248 }
249 m->op->stop(m, p);
250 m->count = 0;
251 goto Done;
252Fill:
253
254 while (m->count < size) {
255 size_t offs = m->count;
256 loff_t next = pos;
257 p = m->op->next(m, p, &next);
258 if (!p || IS_ERR(p)) {
259 err = PTR_ERR(p);
260 break;
261 }
262 err = m->op->show(m, p);
263 if (seq_has_overflowed(m) || err) {
264 m->count = offs;
265 if (likely(err <= 0))
266 break;
267 }
268 pos = next;
269 }
270 m->op->stop(m, p);
271 n = min(m->count, size);
272 err = copy_to_user(buf, m->buf, n);
273 if (err)
274 goto Efault;
275 copied += n;
276 m->count -= n;
277 if (m->count)
278 m->from = n;
279 else
280 pos++;
281 m->index = pos;
282Done:
283 if (!copied)
284 copied = err;
285 else {
286 *ppos += copied;
287 m->read_pos += copied;
288 }
289 file->f_version = m->version;
290 mutex_unlock(&m->lock);
291 return copied;
292Enomem:
293 err = -ENOMEM;
294 goto Done;
295Efault:
296 err = -EFAULT;
297 goto Done;
298}
299EXPORT_SYMBOL(seq_read);
300
301
302
303
304
305
306
307
308
309loff_t seq_lseek(struct file *file, loff_t offset, int whence)
310{
311 struct seq_file *m = file->private_data;
312 loff_t retval = -EINVAL;
313
314 mutex_lock(&m->lock);
315 m->version = file->f_version;
316 switch (whence) {
317 case SEEK_CUR:
318 offset += file->f_pos;
319 case SEEK_SET:
320 if (offset < 0)
321 break;
322 retval = offset;
323 if (offset != m->read_pos) {
324 while ((retval = traverse(m, offset)) == -EAGAIN)
325 ;
326 if (retval) {
327
328 file->f_pos = 0;
329 m->read_pos = 0;
330 m->version = 0;
331 m->index = 0;
332 m->count = 0;
333 } else {
334 m->read_pos = offset;
335 retval = file->f_pos = offset;
336 }
337 } else {
338 file->f_pos = offset;
339 }
340 }
341 file->f_version = m->version;
342 mutex_unlock(&m->lock);
343 return retval;
344}
345EXPORT_SYMBOL(seq_lseek);
346
347
348
349
350
351
352
353
354
355int seq_release(struct inode *inode, struct file *file)
356{
357 struct seq_file *m = file->private_data;
358 kvfree(m->buf);
359 kfree(m);
360 return 0;
361}
362EXPORT_SYMBOL(seq_release);
363
364
365
366
367
368
369
370
371
372
373
374int seq_escape(struct seq_file *m, const char *s, const char *esc)
375{
376 char *end = m->buf + m->size;
377 char *p;
378 char c;
379
380 for (p = m->buf + m->count; (c = *s) != '\0' && p < end; s++) {
381 if (!strchr(esc, c)) {
382 *p++ = c;
383 continue;
384 }
385 if (p + 3 < end) {
386 *p++ = '\\';
387 *p++ = '0' + ((c & 0300) >> 6);
388 *p++ = '0' + ((c & 070) >> 3);
389 *p++ = '0' + (c & 07);
390 continue;
391 }
392 seq_set_overflow(m);
393 return -1;
394 }
395 m->count = p - m->buf;
396 return 0;
397}
398EXPORT_SYMBOL(seq_escape);
399
400int seq_vprintf(struct seq_file *m, const char *f, va_list args)
401{
402 int len;
403
404 if (m->count < m->size) {
405 len = vsnprintf(m->buf + m->count, m->size - m->count, f, args);
406 if (m->count + len < m->size) {
407 m->count += len;
408 return 0;
409 }
410 }
411 seq_set_overflow(m);
412 return -1;
413}
414EXPORT_SYMBOL(seq_vprintf);
415
416int seq_printf(struct seq_file *m, const char *f, ...)
417{
418 int ret;
419 va_list args;
420
421 va_start(args, f);
422 ret = seq_vprintf(m, f, args);
423 va_end(args);
424
425 return ret;
426}
427EXPORT_SYMBOL(seq_printf);
428
429
430
431
432
433
434
435
436
437
438
439
440char *mangle_path(char *s, const char *p, const char *esc)
441{
442 while (s <= p) {
443 char c = *p++;
444 if (!c) {
445 return s;
446 } else if (!strchr(esc, c)) {
447 *s++ = c;
448 } else if (s + 4 > p) {
449 break;
450 } else {
451 *s++ = '\\';
452 *s++ = '0' + ((c & 0300) >> 6);
453 *s++ = '0' + ((c & 070) >> 3);
454 *s++ = '0' + (c & 07);
455 }
456 }
457 return NULL;
458}
459EXPORT_SYMBOL(mangle_path);
460
461
462
463
464
465
466
467
468
469
470int seq_path(struct seq_file *m, const struct path *path, const char *esc)
471{
472 char *buf;
473 size_t size = seq_get_buf(m, &buf);
474 int res = -1;
475
476 if (size) {
477 char *p = d_path(path, buf, size);
478 if (!IS_ERR(p)) {
479 char *end = mangle_path(buf, p, esc);
480 if (end)
481 res = end - buf;
482 }
483 }
484 seq_commit(m, res);
485
486 return res;
487}
488EXPORT_SYMBOL(seq_path);
489
490
491
492
493int seq_path_root(struct seq_file *m, const struct path *path,
494 const struct path *root, const char *esc)
495{
496 char *buf;
497 size_t size = seq_get_buf(m, &buf);
498 int res = -ENAMETOOLONG;
499
500 if (size) {
501 char *p;
502
503 p = __d_path(path, root, buf, size);
504 if (!p)
505 return SEQ_SKIP;
506 res = PTR_ERR(p);
507 if (!IS_ERR(p)) {
508 char *end = mangle_path(buf, p, esc);
509 if (end)
510 res = end - buf;
511 else
512 res = -ENAMETOOLONG;
513 }
514 }
515 seq_commit(m, res);
516
517 return res < 0 && res != -ENAMETOOLONG ? res : 0;
518}
519
520
521
522
523int seq_dentry(struct seq_file *m, struct dentry *dentry, const char *esc)
524{
525 char *buf;
526 size_t size = seq_get_buf(m, &buf);
527 int res = -1;
528
529 if (size) {
530 char *p = dentry_path(dentry, buf, size);
531 if (!IS_ERR(p)) {
532 char *end = mangle_path(buf, p, esc);
533 if (end)
534 res = end - buf;
535 }
536 }
537 seq_commit(m, res);
538
539 return res;
540}
541
542static void *single_start(struct seq_file *p, loff_t *pos)
543{
544 return NULL + (*pos == 0);
545}
546
547static void *single_next(struct seq_file *p, void *v, loff_t *pos)
548{
549 ++*pos;
550 return NULL;
551}
552
553static void single_stop(struct seq_file *p, void *v)
554{
555}
556
557int single_open(struct file *file, int (*show)(struct seq_file *, void *),
558 void *data)
559{
560 struct seq_operations *op = kmalloc(sizeof(*op), GFP_KERNEL);
561 int res = -ENOMEM;
562
563 if (op) {
564 op->start = single_start;
565 op->next = single_next;
566 op->stop = single_stop;
567 op->show = show;
568 res = seq_open(file, op);
569 if (!res)
570 ((struct seq_file *)file->private_data)->private = data;
571 else
572 kfree(op);
573 }
574 return res;
575}
576EXPORT_SYMBOL(single_open);
577
578int single_open_size(struct file *file, int (*show)(struct seq_file *, void *),
579 void *data, size_t size)
580{
581 char *buf = seq_buf_alloc(size);
582 int ret;
583 if (!buf)
584 return -ENOMEM;
585 ret = single_open(file, show, data);
586 if (ret) {
587 kvfree(buf);
588 return ret;
589 }
590 ((struct seq_file *)file->private_data)->buf = buf;
591 ((struct seq_file *)file->private_data)->size = size;
592 return 0;
593}
594EXPORT_SYMBOL(single_open_size);
595
596int single_release(struct inode *inode, struct file *file)
597{
598 const struct seq_operations *op = ((struct seq_file *)file->private_data)->op;
599 int res = seq_release(inode, file);
600 kfree(op);
601 return res;
602}
603EXPORT_SYMBOL(single_release);
604
605int seq_release_private(struct inode *inode, struct file *file)
606{
607 struct seq_file *seq = file->private_data;
608
609 kfree(seq->private);
610 seq->private = NULL;
611 return seq_release(inode, file);
612}
613EXPORT_SYMBOL(seq_release_private);
614
615void *__seq_open_private(struct file *f, const struct seq_operations *ops,
616 int psize)
617{
618 int rc;
619 void *private;
620 struct seq_file *seq;
621
622 private = kzalloc(psize, GFP_KERNEL);
623 if (private == NULL)
624 goto out;
625
626 rc = seq_open(f, ops);
627 if (rc < 0)
628 goto out_free;
629
630 seq = f->private_data;
631 seq->private = private;
632 return private;
633
634out_free:
635 kfree(private);
636out:
637 return NULL;
638}
639EXPORT_SYMBOL(__seq_open_private);
640
641int seq_open_private(struct file *filp, const struct seq_operations *ops,
642 int psize)
643{
644 return __seq_open_private(filp, ops, psize) ? 0 : -ENOMEM;
645}
646EXPORT_SYMBOL(seq_open_private);
647
648int seq_putc(struct seq_file *m, char c)
649{
650 if (m->count < m->size) {
651 m->buf[m->count++] = c;
652 return 0;
653 }
654 return -1;
655}
656EXPORT_SYMBOL(seq_putc);
657
658int seq_puts(struct seq_file *m, const char *s)
659{
660 int len = strlen(s);
661 if (m->count + len < m->size) {
662 memcpy(m->buf + m->count, s, len);
663 m->count += len;
664 return 0;
665 }
666 seq_set_overflow(m);
667 return -1;
668}
669EXPORT_SYMBOL(seq_puts);
670
671
672
673
674
675
676
677
678int seq_put_decimal_ull(struct seq_file *m, char delimiter,
679 unsigned long long num)
680{
681 int len;
682
683 if (m->count + 2 >= m->size)
684 goto overflow;
685
686 if (delimiter)
687 m->buf[m->count++] = delimiter;
688
689 if (num < 10) {
690 m->buf[m->count++] = num + '0';
691 return 0;
692 }
693
694 len = num_to_str(m->buf + m->count, m->size - m->count, num);
695 if (!len)
696 goto overflow;
697 m->count += len;
698 return 0;
699overflow:
700 seq_set_overflow(m);
701 return -1;
702}
703EXPORT_SYMBOL(seq_put_decimal_ull);
704
705int seq_put_decimal_ll(struct seq_file *m, char delimiter,
706 long long num)
707{
708 if (num < 0) {
709 if (m->count + 3 >= m->size) {
710 seq_set_overflow(m);
711 return -1;
712 }
713 if (delimiter)
714 m->buf[m->count++] = delimiter;
715 num = -num;
716 delimiter = '-';
717 }
718 return seq_put_decimal_ull(m, delimiter, num);
719
720}
721EXPORT_SYMBOL(seq_put_decimal_ll);
722
723
724
725
726
727
728
729
730
731int seq_write(struct seq_file *seq, const void *data, size_t len)
732{
733 if (seq->count + len < seq->size) {
734 memcpy(seq->buf + seq->count, data, len);
735 seq->count += len;
736 return 0;
737 }
738 seq_set_overflow(seq);
739 return -1;
740}
741EXPORT_SYMBOL(seq_write);
742
743
744
745
746
747
748void seq_pad(struct seq_file *m, char c)
749{
750 int size = m->pad_until - m->count;
751 if (size > 0)
752 seq_printf(m, "%*s", size, "");
753 if (c)
754 seq_putc(m, c);
755}
756EXPORT_SYMBOL(seq_pad);
757
758struct list_head *seq_list_start(struct list_head *head, loff_t pos)
759{
760 struct list_head *lh;
761
762 list_for_each(lh, head)
763 if (pos-- == 0)
764 return lh;
765
766 return NULL;
767}
768EXPORT_SYMBOL(seq_list_start);
769
770struct list_head *seq_list_start_head(struct list_head *head, loff_t pos)
771{
772 if (!pos)
773 return head;
774
775 return seq_list_start(head, pos - 1);
776}
777EXPORT_SYMBOL(seq_list_start_head);
778
779struct list_head *seq_list_next(void *v, struct list_head *head, loff_t *ppos)
780{
781 struct list_head *lh;
782
783 lh = ((struct list_head *)v)->next;
784 ++*ppos;
785 return lh == head ? NULL : lh;
786}
787EXPORT_SYMBOL(seq_list_next);
788
789
790
791
792
793
794
795
796struct hlist_node *seq_hlist_start(struct hlist_head *head, loff_t pos)
797{
798 struct hlist_node *node;
799
800 hlist_for_each(node, head)
801 if (pos-- == 0)
802 return node;
803 return NULL;
804}
805EXPORT_SYMBOL(seq_hlist_start);
806
807
808
809
810
811
812
813
814
815struct hlist_node *seq_hlist_start_head(struct hlist_head *head, loff_t pos)
816{
817 if (!pos)
818 return SEQ_START_TOKEN;
819
820 return seq_hlist_start(head, pos - 1);
821}
822EXPORT_SYMBOL(seq_hlist_start_head);
823
824
825
826
827
828
829
830
831
832struct hlist_node *seq_hlist_next(void *v, struct hlist_head *head,
833 loff_t *ppos)
834{
835 struct hlist_node *node = v;
836
837 ++*ppos;
838 if (v == SEQ_START_TOKEN)
839 return head->first;
840 else
841 return node->next;
842}
843EXPORT_SYMBOL(seq_hlist_next);
844
845
846
847
848
849
850
851
852
853
854
855
856struct hlist_node *seq_hlist_start_rcu(struct hlist_head *head,
857 loff_t pos)
858{
859 struct hlist_node *node;
860
861 __hlist_for_each_rcu(node, head)
862 if (pos-- == 0)
863 return node;
864 return NULL;
865}
866EXPORT_SYMBOL(seq_hlist_start_rcu);
867
868
869
870
871
872
873
874
875
876
877
878
879
880struct hlist_node *seq_hlist_start_head_rcu(struct hlist_head *head,
881 loff_t pos)
882{
883 if (!pos)
884 return SEQ_START_TOKEN;
885
886 return seq_hlist_start_rcu(head, pos - 1);
887}
888EXPORT_SYMBOL(seq_hlist_start_head_rcu);
889
890
891
892
893
894
895
896
897
898
899
900
901
902struct hlist_node *seq_hlist_next_rcu(void *v,
903 struct hlist_head *head,
904 loff_t *ppos)
905{
906 struct hlist_node *node = v;
907
908 ++*ppos;
909 if (v == SEQ_START_TOKEN)
910 return rcu_dereference(head->first);
911 else
912 return rcu_dereference(node->next);
913}
914EXPORT_SYMBOL(seq_hlist_next_rcu);
915
916
917
918
919
920
921
922
923
924struct hlist_node *
925seq_hlist_start_percpu(struct hlist_head __percpu *head, int *cpu, loff_t pos)
926{
927 struct hlist_node *node;
928
929 for_each_possible_cpu(*cpu) {
930 hlist_for_each(node, per_cpu_ptr(head, *cpu)) {
931 if (pos-- == 0)
932 return node;
933 }
934 }
935 return NULL;
936}
937EXPORT_SYMBOL(seq_hlist_start_percpu);
938
939
940
941
942
943
944
945
946
947
948struct hlist_node *
949seq_hlist_next_percpu(void *v, struct hlist_head __percpu *head,
950 int *cpu, loff_t *pos)
951{
952 struct hlist_node *node = v;
953
954 ++*pos;
955
956 if (node->next)
957 return node->next;
958
959 for (*cpu = cpumask_next(*cpu, cpu_possible_mask); *cpu < nr_cpu_ids;
960 *cpu = cpumask_next(*cpu, cpu_possible_mask)) {
961 struct hlist_head *bucket = per_cpu_ptr(head, *cpu);
962
963 if (!hlist_empty(bucket))
964 return bucket->first;
965 }
966 return NULL;
967}
968EXPORT_SYMBOL(seq_hlist_next_percpu);
969