Merge git://git.kernel.org/pub/scm/linux/kernel/git/tglx/linux-2.6-hrt
[linux-2.6] / fs / sysfs / file.c
1 /*
2  * fs/sysfs/file.c - sysfs regular (text) file implementation
3  *
4  * Copyright (c) 2001-3 Patrick Mochel
5  * Copyright (c) 2007 SUSE Linux Products GmbH
6  * Copyright (c) 2007 Tejun Heo <teheo@suse.de>
7  *
8  * This file is released under the GPLv2.
9  *
10  * Please see Documentation/filesystems/sysfs.txt for more information.
11  */
12
13 #include <linux/module.h>
14 #include <linux/kobject.h>
15 #include <linux/kallsyms.h>
16 #include <linux/slab.h>
17 #include <linux/namei.h>
18 #include <linux/poll.h>
19 #include <linux/list.h>
20 #include <linux/mutex.h>
21 #include <asm/uaccess.h>
22
23 #include "sysfs.h"
24
25 /*
26  * There's one sysfs_buffer for each open file and one
27  * sysfs_open_dirent for each sysfs_dirent with one or more open
28  * files.
29  *
30  * filp->private_data points to sysfs_buffer and
31  * sysfs_dirent->s_attr.open points to sysfs_open_dirent.  s_attr.open
32  * is protected by sysfs_open_dirent_lock.
33  */
34 static DEFINE_SPINLOCK(sysfs_open_dirent_lock);
35
36 struct sysfs_open_dirent {
37         atomic_t                refcnt;
38         atomic_t                event;
39         wait_queue_head_t       poll;
40         struct list_head        buffers; /* goes through sysfs_buffer.list */
41 };
42
43 struct sysfs_buffer {
44         size_t                  count;
45         loff_t                  pos;
46         char                    * page;
47         struct sysfs_ops        * ops;
48         struct mutex            mutex;
49         int                     needs_read_fill;
50         int                     event;
51         struct list_head        list;
52 };
53
54 /**
55  *      fill_read_buffer - allocate and fill buffer from object.
56  *      @dentry:        dentry pointer.
57  *      @buffer:        data buffer for file.
58  *
59  *      Allocate @buffer->page, if it hasn't been already, then call the
60  *      kobject's show() method to fill the buffer with this attribute's 
61  *      data. 
62  *      This is called only once, on the file's first read unless an error
63  *      is returned.
64  */
65 static int fill_read_buffer(struct dentry * dentry, struct sysfs_buffer * buffer)
66 {
67         struct sysfs_dirent *attr_sd = dentry->d_fsdata;
68         struct kobject *kobj = attr_sd->s_parent->s_dir.kobj;
69         struct sysfs_ops * ops = buffer->ops;
70         int ret = 0;
71         ssize_t count;
72
73         if (!buffer->page)
74                 buffer->page = (char *) get_zeroed_page(GFP_KERNEL);
75         if (!buffer->page)
76                 return -ENOMEM;
77
78         /* need attr_sd for attr and ops, its parent for kobj */
79         if (!sysfs_get_active_two(attr_sd))
80                 return -ENODEV;
81
82         buffer->event = atomic_read(&attr_sd->s_attr.open->event);
83         count = ops->show(kobj, attr_sd->s_attr.attr, buffer->page);
84
85         sysfs_put_active_two(attr_sd);
86
87         /*
88          * The code works fine with PAGE_SIZE return but it's likely to
89          * indicate truncated result or overflow in normal use cases.
90          */
91         if (count >= (ssize_t)PAGE_SIZE) {
92                 print_symbol("fill_read_buffer: %s returned bad count\n",
93                         (unsigned long)ops->show);
94                 /* Try to struggle along */
95                 count = PAGE_SIZE - 1;
96         }
97         if (count >= 0) {
98                 buffer->needs_read_fill = 0;
99                 buffer->count = count;
100         } else {
101                 ret = count;
102         }
103         return ret;
104 }
105
106 /**
107  *      sysfs_read_file - read an attribute. 
108  *      @file:  file pointer.
109  *      @buf:   buffer to fill.
110  *      @count: number of bytes to read.
111  *      @ppos:  starting offset in file.
112  *
113  *      Userspace wants to read an attribute file. The attribute descriptor
114  *      is in the file's ->d_fsdata. The target object is in the directory's
115  *      ->d_fsdata.
116  *
117  *      We call fill_read_buffer() to allocate and fill the buffer from the
118  *      object's show() method exactly once (if the read is happening from
119  *      the beginning of the file). That should fill the entire buffer with
120  *      all the data the object has to offer for that attribute.
121  *      We then call flush_read_buffer() to copy the buffer to userspace
122  *      in the increments specified.
123  */
124
125 static ssize_t
126 sysfs_read_file(struct file *file, char __user *buf, size_t count, loff_t *ppos)
127 {
128         struct sysfs_buffer * buffer = file->private_data;
129         ssize_t retval = 0;
130
131         mutex_lock(&buffer->mutex);
132         if (buffer->needs_read_fill || *ppos == 0) {
133                 retval = fill_read_buffer(file->f_path.dentry,buffer);
134                 if (retval)
135                         goto out;
136         }
137         pr_debug("%s: count = %zd, ppos = %lld, buf = %s\n",
138                  __FUNCTION__, count, *ppos, buffer->page);
139         retval = simple_read_from_buffer(buf, count, ppos, buffer->page,
140                                          buffer->count);
141 out:
142         mutex_unlock(&buffer->mutex);
143         return retval;
144 }
145
146 /**
147  *      fill_write_buffer - copy buffer from userspace.
148  *      @buffer:        data buffer for file.
149  *      @buf:           data from user.
150  *      @count:         number of bytes in @userbuf.
151  *
152  *      Allocate @buffer->page if it hasn't been already, then
153  *      copy the user-supplied buffer into it.
154  */
155
156 static int 
157 fill_write_buffer(struct sysfs_buffer * buffer, const char __user * buf, size_t count)
158 {
159         int error;
160
161         if (!buffer->page)
162                 buffer->page = (char *)get_zeroed_page(GFP_KERNEL);
163         if (!buffer->page)
164                 return -ENOMEM;
165
166         if (count >= PAGE_SIZE)
167                 count = PAGE_SIZE - 1;
168         error = copy_from_user(buffer->page,buf,count);
169         buffer->needs_read_fill = 1;
170         /* if buf is assumed to contain a string, terminate it by \0,
171            so e.g. sscanf() can scan the string easily */
172         buffer->page[count] = 0;
173         return error ? -EFAULT : count;
174 }
175
176
177 /**
178  *      flush_write_buffer - push buffer to kobject.
179  *      @dentry:        dentry to the attribute
180  *      @buffer:        data buffer for file.
181  *      @count:         number of bytes
182  *
183  *      Get the correct pointers for the kobject and the attribute we're
184  *      dealing with, then call the store() method for the attribute, 
185  *      passing the buffer that we acquired in fill_write_buffer().
186  */
187
188 static int
189 flush_write_buffer(struct dentry * dentry, struct sysfs_buffer * buffer, size_t count)
190 {
191         struct sysfs_dirent *attr_sd = dentry->d_fsdata;
192         struct kobject *kobj = attr_sd->s_parent->s_dir.kobj;
193         struct sysfs_ops * ops = buffer->ops;
194         int rc;
195
196         /* need attr_sd for attr and ops, its parent for kobj */
197         if (!sysfs_get_active_two(attr_sd))
198                 return -ENODEV;
199
200         rc = ops->store(kobj, attr_sd->s_attr.attr, buffer->page, count);
201
202         sysfs_put_active_two(attr_sd);
203
204         return rc;
205 }
206
207
208 /**
209  *      sysfs_write_file - write an attribute.
210  *      @file:  file pointer
211  *      @buf:   data to write
212  *      @count: number of bytes
213  *      @ppos:  starting offset
214  *
215  *      Similar to sysfs_read_file(), though working in the opposite direction.
216  *      We allocate and fill the data from the user in fill_write_buffer(),
217  *      then push it to the kobject in flush_write_buffer().
218  *      There is no easy way for us to know if userspace is only doing a partial
219  *      write, so we don't support them. We expect the entire buffer to come
220  *      on the first write. 
221  *      Hint: if you're writing a value, first read the file, modify only the
222  *      the value you're changing, then write entire buffer back. 
223  */
224
225 static ssize_t
226 sysfs_write_file(struct file *file, const char __user *buf, size_t count, loff_t *ppos)
227 {
228         struct sysfs_buffer * buffer = file->private_data;
229         ssize_t len;
230
231         mutex_lock(&buffer->mutex);
232         len = fill_write_buffer(buffer, buf, count);
233         if (len > 0)
234                 len = flush_write_buffer(file->f_path.dentry, buffer, len);
235         if (len > 0)
236                 *ppos += len;
237         mutex_unlock(&buffer->mutex);
238         return len;
239 }
240
241 /**
242  *      sysfs_get_open_dirent - get or create sysfs_open_dirent
243  *      @sd: target sysfs_dirent
244  *      @buffer: sysfs_buffer for this instance of open
245  *
246  *      If @sd->s_attr.open exists, increment its reference count;
247  *      otherwise, create one.  @buffer is chained to the buffers
248  *      list.
249  *
250  *      LOCKING:
251  *      Kernel thread context (may sleep).
252  *
253  *      RETURNS:
254  *      0 on success, -errno on failure.
255  */
256 static int sysfs_get_open_dirent(struct sysfs_dirent *sd,
257                                  struct sysfs_buffer *buffer)
258 {
259         struct sysfs_open_dirent *od, *new_od = NULL;
260
261  retry:
262         spin_lock(&sysfs_open_dirent_lock);
263
264         if (!sd->s_attr.open && new_od) {
265                 sd->s_attr.open = new_od;
266                 new_od = NULL;
267         }
268
269         od = sd->s_attr.open;
270         if (od) {
271                 atomic_inc(&od->refcnt);
272                 list_add_tail(&buffer->list, &od->buffers);
273         }
274
275         spin_unlock(&sysfs_open_dirent_lock);
276
277         if (od) {
278                 kfree(new_od);
279                 return 0;
280         }
281
282         /* not there, initialize a new one and retry */
283         new_od = kmalloc(sizeof(*new_od), GFP_KERNEL);
284         if (!new_od)
285                 return -ENOMEM;
286
287         atomic_set(&new_od->refcnt, 0);
288         atomic_set(&new_od->event, 1);
289         init_waitqueue_head(&new_od->poll);
290         INIT_LIST_HEAD(&new_od->buffers);
291         goto retry;
292 }
293
294 /**
295  *      sysfs_put_open_dirent - put sysfs_open_dirent
296  *      @sd: target sysfs_dirent
297  *      @buffer: associated sysfs_buffer
298  *
299  *      Put @sd->s_attr.open and unlink @buffer from the buffers list.
300  *      If reference count reaches zero, disassociate and free it.
301  *
302  *      LOCKING:
303  *      None.
304  */
305 static void sysfs_put_open_dirent(struct sysfs_dirent *sd,
306                                   struct sysfs_buffer *buffer)
307 {
308         struct sysfs_open_dirent *od = sd->s_attr.open;
309
310         spin_lock(&sysfs_open_dirent_lock);
311
312         list_del(&buffer->list);
313         if (atomic_dec_and_test(&od->refcnt))
314                 sd->s_attr.open = NULL;
315         else
316                 od = NULL;
317
318         spin_unlock(&sysfs_open_dirent_lock);
319
320         kfree(od);
321 }
322
323 static int sysfs_open_file(struct inode *inode, struct file *file)
324 {
325         struct sysfs_dirent *attr_sd = file->f_path.dentry->d_fsdata;
326         struct kobject *kobj = attr_sd->s_parent->s_dir.kobj;
327         struct sysfs_buffer *buffer;
328         struct sysfs_ops *ops;
329         int error = -EACCES;
330
331         /* need attr_sd for attr and ops, its parent for kobj */
332         if (!sysfs_get_active_two(attr_sd))
333                 return -ENODEV;
334
335         /* every kobject with an attribute needs a ktype assigned */
336         if (kobj->ktype && kobj->ktype->sysfs_ops)
337                 ops = kobj->ktype->sysfs_ops;
338         else {
339                 printk(KERN_ERR "missing sysfs attribute operations for "
340                        "kobject: %s\n", kobject_name(kobj));
341                 WARN_ON(1);
342                 goto err_out;
343         }
344
345         /* File needs write support.
346          * The inode's perms must say it's ok, 
347          * and we must have a store method.
348          */
349         if (file->f_mode & FMODE_WRITE) {
350                 if (!(inode->i_mode & S_IWUGO) || !ops->store)
351                         goto err_out;
352         }
353
354         /* File needs read support.
355          * The inode's perms must say it's ok, and we there
356          * must be a show method for it.
357          */
358         if (file->f_mode & FMODE_READ) {
359                 if (!(inode->i_mode & S_IRUGO) || !ops->show)
360                         goto err_out;
361         }
362
363         /* No error? Great, allocate a buffer for the file, and store it
364          * it in file->private_data for easy access.
365          */
366         error = -ENOMEM;
367         buffer = kzalloc(sizeof(struct sysfs_buffer), GFP_KERNEL);
368         if (!buffer)
369                 goto err_out;
370
371         mutex_init(&buffer->mutex);
372         buffer->needs_read_fill = 1;
373         buffer->ops = ops;
374         file->private_data = buffer;
375
376         /* make sure we have open dirent struct */
377         error = sysfs_get_open_dirent(attr_sd, buffer);
378         if (error)
379                 goto err_free;
380
381         /* open succeeded, put active references */
382         sysfs_put_active_two(attr_sd);
383         return 0;
384
385  err_free:
386         kfree(buffer);
387  err_out:
388         sysfs_put_active_two(attr_sd);
389         return error;
390 }
391
392 static int sysfs_release(struct inode *inode, struct file *filp)
393 {
394         struct sysfs_dirent *sd = filp->f_path.dentry->d_fsdata;
395         struct sysfs_buffer *buffer = filp->private_data;
396
397         sysfs_put_open_dirent(sd, buffer);
398
399         if (buffer->page)
400                 free_page((unsigned long)buffer->page);
401         kfree(buffer);
402
403         return 0;
404 }
405
406 /* Sysfs attribute files are pollable.  The idea is that you read
407  * the content and then you use 'poll' or 'select' to wait for
408  * the content to change.  When the content changes (assuming the
409  * manager for the kobject supports notification), poll will
410  * return POLLERR|POLLPRI, and select will return the fd whether
411  * it is waiting for read, write, or exceptions.
412  * Once poll/select indicates that the value has changed, you
413  * need to close and re-open the file, or seek to 0 and read again.
414  * Reminder: this only works for attributes which actively support
415  * it, and it is not possible to test an attribute from userspace
416  * to see if it supports poll (Neither 'poll' nor 'select' return
417  * an appropriate error code).  When in doubt, set a suitable timeout value.
418  */
419 static unsigned int sysfs_poll(struct file *filp, poll_table *wait)
420 {
421         struct sysfs_buffer * buffer = filp->private_data;
422         struct sysfs_dirent *attr_sd = filp->f_path.dentry->d_fsdata;
423         struct sysfs_open_dirent *od = attr_sd->s_attr.open;
424
425         /* need parent for the kobj, grab both */
426         if (!sysfs_get_active_two(attr_sd))
427                 goto trigger;
428
429         poll_wait(filp, &od->poll, wait);
430
431         sysfs_put_active_two(attr_sd);
432
433         if (buffer->event != atomic_read(&od->event))
434                 goto trigger;
435
436         return 0;
437
438  trigger:
439         buffer->needs_read_fill = 1;
440         return POLLERR|POLLPRI;
441 }
442
443 void sysfs_notify(struct kobject *k, char *dir, char *attr)
444 {
445         struct sysfs_dirent *sd = k->sd;
446
447         mutex_lock(&sysfs_mutex);
448
449         if (sd && dir)
450                 sd = sysfs_find_dirent(sd, dir);
451         if (sd && attr)
452                 sd = sysfs_find_dirent(sd, attr);
453         if (sd) {
454                 struct sysfs_open_dirent *od;
455
456                 spin_lock(&sysfs_open_dirent_lock);
457
458                 od = sd->s_attr.open;
459                 if (od) {
460                         atomic_inc(&od->event);
461                         wake_up_interruptible(&od->poll);
462                 }
463
464                 spin_unlock(&sysfs_open_dirent_lock);
465         }
466
467         mutex_unlock(&sysfs_mutex);
468 }
469 EXPORT_SYMBOL_GPL(sysfs_notify);
470
471 const struct file_operations sysfs_file_operations = {
472         .read           = sysfs_read_file,
473         .write          = sysfs_write_file,
474         .llseek         = generic_file_llseek,
475         .open           = sysfs_open_file,
476         .release        = sysfs_release,
477         .poll           = sysfs_poll,
478 };
479
480 int sysfs_add_file_mode(struct sysfs_dirent *dir_sd,
481                         const struct attribute *attr, int type, mode_t amode)
482 {
483         umode_t mode = (amode & S_IALLUGO) | S_IFREG;
484         struct sysfs_addrm_cxt acxt;
485         struct sysfs_dirent *sd;
486         int rc;
487
488         sd = sysfs_new_dirent(attr->name, mode, type);
489         if (!sd)
490                 return -ENOMEM;
491         sd->s_attr.attr = (void *)attr;
492
493         sysfs_addrm_start(&acxt, dir_sd);
494         rc = sysfs_add_one(&acxt, sd);
495         sysfs_addrm_finish(&acxt);
496
497         if (rc)
498                 sysfs_put(sd);
499
500         return rc;
501 }
502
503
504 int sysfs_add_file(struct sysfs_dirent *dir_sd, const struct attribute *attr,
505                    int type)
506 {
507         return sysfs_add_file_mode(dir_sd, attr, type, attr->mode);
508 }
509
510
511 /**
512  *      sysfs_create_file - create an attribute file for an object.
513  *      @kobj:  object we're creating for. 
514  *      @attr:  attribute descriptor.
515  */
516
517 int sysfs_create_file(struct kobject * kobj, const struct attribute * attr)
518 {
519         BUG_ON(!kobj || !kobj->sd || !attr);
520
521         return sysfs_add_file(kobj->sd, attr, SYSFS_KOBJ_ATTR);
522
523 }
524
525
526 /**
527  * sysfs_add_file_to_group - add an attribute file to a pre-existing group.
528  * @kobj: object we're acting for.
529  * @attr: attribute descriptor.
530  * @group: group name.
531  */
532 int sysfs_add_file_to_group(struct kobject *kobj,
533                 const struct attribute *attr, const char *group)
534 {
535         struct sysfs_dirent *dir_sd;
536         int error;
537
538         if (group)
539                 dir_sd = sysfs_get_dirent(kobj->sd, group);
540         else
541                 dir_sd = sysfs_get(kobj->sd);
542
543         if (!dir_sd)
544                 return -ENOENT;
545
546         error = sysfs_add_file(dir_sd, attr, SYSFS_KOBJ_ATTR);
547         sysfs_put(dir_sd);
548
549         return error;
550 }
551 EXPORT_SYMBOL_GPL(sysfs_add_file_to_group);
552
553 /**
554  * sysfs_chmod_file - update the modified mode value on an object attribute.
555  * @kobj: object we're acting for.
556  * @attr: attribute descriptor.
557  * @mode: file permissions.
558  *
559  */
560 int sysfs_chmod_file(struct kobject *kobj, struct attribute *attr, mode_t mode)
561 {
562         struct sysfs_dirent *victim_sd = NULL;
563         struct dentry *victim = NULL;
564         struct inode * inode;
565         struct iattr newattrs;
566         int rc;
567
568         rc = -ENOENT;
569         victim_sd = sysfs_get_dirent(kobj->sd, attr->name);
570         if (!victim_sd)
571                 goto out;
572
573         mutex_lock(&sysfs_rename_mutex);
574         victim = sysfs_get_dentry(victim_sd);
575         mutex_unlock(&sysfs_rename_mutex);
576         if (IS_ERR(victim)) {
577                 rc = PTR_ERR(victim);
578                 victim = NULL;
579                 goto out;
580         }
581
582         inode = victim->d_inode;
583
584         mutex_lock(&inode->i_mutex);
585
586         newattrs.ia_mode = (mode & S_IALLUGO) | (inode->i_mode & ~S_IALLUGO);
587         newattrs.ia_valid = ATTR_MODE | ATTR_CTIME;
588         rc = notify_change(victim, &newattrs);
589
590         if (rc == 0) {
591                 mutex_lock(&sysfs_mutex);
592                 victim_sd->s_mode = newattrs.ia_mode;
593                 mutex_unlock(&sysfs_mutex);
594         }
595
596         mutex_unlock(&inode->i_mutex);
597  out:
598         dput(victim);
599         sysfs_put(victim_sd);
600         return rc;
601 }
602 EXPORT_SYMBOL_GPL(sysfs_chmod_file);
603
604
605 /**
606  *      sysfs_remove_file - remove an object attribute.
607  *      @kobj:  object we're acting for.
608  *      @attr:  attribute descriptor.
609  *
610  *      Hash the attribute name and kill the victim.
611  */
612
613 void sysfs_remove_file(struct kobject * kobj, const struct attribute * attr)
614 {
615         sysfs_hash_and_remove(kobj->sd, attr->name);
616 }
617
618
619 /**
620  * sysfs_remove_file_from_group - remove an attribute file from a group.
621  * @kobj: object we're acting for.
622  * @attr: attribute descriptor.
623  * @group: group name.
624  */
625 void sysfs_remove_file_from_group(struct kobject *kobj,
626                 const struct attribute *attr, const char *group)
627 {
628         struct sysfs_dirent *dir_sd;
629
630         if (group)
631                 dir_sd = sysfs_get_dirent(kobj->sd, group);
632         else
633                 dir_sd = sysfs_get(kobj->sd);
634         if (dir_sd) {
635                 sysfs_hash_and_remove(dir_sd, attr->name);
636                 sysfs_put(dir_sd);
637         }
638 }
639 EXPORT_SYMBOL_GPL(sysfs_remove_file_from_group);
640
641 struct sysfs_schedule_callback_struct {
642         struct kobject          *kobj;
643         void                    (*func)(void *);
644         void                    *data;
645         struct module           *owner;
646         struct work_struct      work;
647 };
648
649 static void sysfs_schedule_callback_work(struct work_struct *work)
650 {
651         struct sysfs_schedule_callback_struct *ss = container_of(work,
652                         struct sysfs_schedule_callback_struct, work);
653
654         (ss->func)(ss->data);
655         kobject_put(ss->kobj);
656         module_put(ss->owner);
657         kfree(ss);
658 }
659
660 /**
661  * sysfs_schedule_callback - helper to schedule a callback for a kobject
662  * @kobj: object we're acting for.
663  * @func: callback function to invoke later.
664  * @data: argument to pass to @func.
665  * @owner: module owning the callback code
666  *
667  * sysfs attribute methods must not unregister themselves or their parent
668  * kobject (which would amount to the same thing).  Attempts to do so will
669  * deadlock, since unregistration is mutually exclusive with driver
670  * callbacks.
671  *
672  * Instead methods can call this routine, which will attempt to allocate
673  * and schedule a workqueue request to call back @func with @data as its
674  * argument in the workqueue's process context.  @kobj will be pinned
675  * until @func returns.
676  *
677  * Returns 0 if the request was submitted, -ENOMEM if storage could not
678  * be allocated, -ENODEV if a reference to @owner isn't available.
679  */
680 int sysfs_schedule_callback(struct kobject *kobj, void (*func)(void *),
681                 void *data, struct module *owner)
682 {
683         struct sysfs_schedule_callback_struct *ss;
684
685         if (!try_module_get(owner))
686                 return -ENODEV;
687         ss = kmalloc(sizeof(*ss), GFP_KERNEL);
688         if (!ss) {
689                 module_put(owner);
690                 return -ENOMEM;
691         }
692         kobject_get(kobj);
693         ss->kobj = kobj;
694         ss->func = func;
695         ss->data = data;
696         ss->owner = owner;
697         INIT_WORK(&ss->work, sysfs_schedule_callback_work);
698         schedule_work(&ss->work);
699         return 0;
700 }
701 EXPORT_SYMBOL_GPL(sysfs_schedule_callback);
702
703
704 EXPORT_SYMBOL_GPL(sysfs_create_file);
705 EXPORT_SYMBOL_GPL(sysfs_remove_file);