random: add tracepoints for easier debugging and verification
[linux-2.6.git] / drivers / char / bsr.c
1 /* IBM POWER Barrier Synchronization Register Driver
2  *
3  * Copyright IBM Corporation 2008
4  *
5  * Author: Sonny Rao <sonnyrao@us.ibm.com>
6  *
7  * This program is free software; you can redistribute it and/or modify
8  * it under the terms of the GNU General Public License as published by
9  * the Free Software Foundation; either version 2 of the License, or
10  * (at your option) any later version.
11  *
12  * This program is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15  * GNU General Public License for more details.
16  *
17  * You should have received a copy of the GNU General Public License
18  * along with this program; if not, write to the Free Software
19  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
20  */
21
22 #include <linux/kernel.h>
23 #include <linux/of.h>
24 #include <linux/of_device.h>
25 #include <linux/of_platform.h>
26 #include <linux/fs.h>
27 #include <linux/module.h>
28 #include <linux/cdev.h>
29 #include <linux/list.h>
30 #include <linux/mm.h>
31 #include <linux/slab.h>
32 #include <asm/pgtable.h>
33 #include <asm/io.h>
34
35 /*
36  This driver exposes a special register which can be used for fast
37  synchronization across a large SMP machine.  The hardware is exposed
38  as an array of bytes where each process will write to one of the bytes to
39  indicate it has finished the current stage and this update is broadcast to
40  all processors without having to bounce a cacheline between them. In
41  POWER5 and POWER6 there is one of these registers per SMP,  but it is
42  presented in two forms; first, it is given as a whole and then as a number
43  of smaller registers which alias to parts of the single whole register.
44  This can potentially allow multiple groups of processes to each have their
45  own private synchronization device.
46
47  Note that this hardware *must* be written to using *only* single byte writes.
48  It may be read using 1, 2, 4, or 8 byte loads which must be aligned since
49  this region is treated as cache-inhibited  processes should also use a
50  full sync before and after writing to the BSR to ensure all stores and
51  the BSR update have made it to all chips in the system
52 */
53
54 /* This is arbitrary number, up to Power6 it's been 17 or fewer  */
55 #define BSR_MAX_DEVS (32)
56
57 struct bsr_dev {
58         u64      bsr_addr;     /* Real address */
59         u64      bsr_len;      /* length of mem region we can map */
60         unsigned bsr_bytes;    /* size of the BSR reg itself */
61         unsigned bsr_stride;   /* interval at which BSR repeats in the page */
62         unsigned bsr_type;     /* maps to enum below */
63         unsigned bsr_num;      /* bsr id number for its type */
64         int      bsr_minor;
65
66         struct list_head bsr_list;
67
68         dev_t    bsr_dev;
69         struct cdev bsr_cdev;
70         struct device *bsr_device;
71         char     bsr_name[32];
72
73 };
74
75 static unsigned total_bsr_devs;
76 static struct list_head bsr_devs = LIST_HEAD_INIT(bsr_devs);
77 static struct class *bsr_class;
78 static int bsr_major;
79
80 enum {
81         BSR_8    = 0,
82         BSR_16   = 1,
83         BSR_64   = 2,
84         BSR_128  = 3,
85         BSR_4096 = 4,
86         BSR_UNKNOWN = 5,
87         BSR_MAX  = 6,
88 };
89
90 static unsigned bsr_types[BSR_MAX];
91
92 static ssize_t
93 bsr_size_show(struct device *dev, struct device_attribute *attr, char *buf)
94 {
95         struct bsr_dev *bsr_dev = dev_get_drvdata(dev);
96         return sprintf(buf, "%u\n", bsr_dev->bsr_bytes);
97 }
98
99 static ssize_t
100 bsr_stride_show(struct device *dev, struct device_attribute *attr, char *buf)
101 {
102         struct bsr_dev *bsr_dev = dev_get_drvdata(dev);
103         return sprintf(buf, "%u\n", bsr_dev->bsr_stride);
104 }
105
106 static ssize_t
107 bsr_len_show(struct device *dev, struct device_attribute *attr, char *buf)
108 {
109         struct bsr_dev *bsr_dev = dev_get_drvdata(dev);
110         return sprintf(buf, "%llu\n", bsr_dev->bsr_len);
111 }
112
113 static struct device_attribute bsr_dev_attrs[] = {
114         __ATTR(bsr_size, S_IRUGO, bsr_size_show, NULL),
115         __ATTR(bsr_stride, S_IRUGO, bsr_stride_show, NULL),
116         __ATTR(bsr_length, S_IRUGO, bsr_len_show, NULL),
117         __ATTR_NULL
118 };
119
120 static int bsr_mmap(struct file *filp, struct vm_area_struct *vma)
121 {
122         unsigned long size   = vma->vm_end - vma->vm_start;
123         struct bsr_dev *dev = filp->private_data;
124         int ret;
125
126         vma->vm_page_prot = pgprot_noncached(vma->vm_page_prot);
127
128         /* check for the case of a small BSR device and map one 4k page for it*/
129         if (dev->bsr_len < PAGE_SIZE && size == PAGE_SIZE)
130                 ret = remap_4k_pfn(vma, vma->vm_start, dev->bsr_addr >> 12,
131                                    vma->vm_page_prot);
132         else if (size <= dev->bsr_len)
133                 ret = io_remap_pfn_range(vma, vma->vm_start,
134                                          dev->bsr_addr >> PAGE_SHIFT,
135                                          size, vma->vm_page_prot);
136         else
137                 return -EINVAL;
138
139         if (ret)
140                 return -EAGAIN;
141
142         return 0;
143 }
144
145 static int bsr_open(struct inode * inode, struct file * filp)
146 {
147         struct cdev *cdev = inode->i_cdev;
148         struct bsr_dev *dev = container_of(cdev, struct bsr_dev, bsr_cdev);
149
150         filp->private_data = dev;
151         return 0;
152 }
153
154 static const struct file_operations bsr_fops = {
155         .owner = THIS_MODULE,
156         .mmap  = bsr_mmap,
157         .open  = bsr_open,
158         .llseek = noop_llseek,
159 };
160
161 static void bsr_cleanup_devs(void)
162 {
163         struct bsr_dev *cur, *n;
164
165         list_for_each_entry_safe(cur, n, &bsr_devs, bsr_list) {
166                 if (cur->bsr_device) {
167                         cdev_del(&cur->bsr_cdev);
168                         device_del(cur->bsr_device);
169                 }
170                 list_del(&cur->bsr_list);
171                 kfree(cur);
172         }
173 }
174
175 static int bsr_add_node(struct device_node *bn)
176 {
177         int bsr_stride_len, bsr_bytes_len, num_bsr_devs;
178         const u32 *bsr_stride;
179         const u32 *bsr_bytes;
180         unsigned i;
181         int ret = -ENODEV;
182
183         bsr_stride = of_get_property(bn, "ibm,lock-stride", &bsr_stride_len);
184         bsr_bytes  = of_get_property(bn, "ibm,#lock-bytes", &bsr_bytes_len);
185
186         if (!bsr_stride || !bsr_bytes ||
187             (bsr_stride_len != bsr_bytes_len)) {
188                 printk(KERN_ERR "bsr of-node has missing/incorrect property\n");
189                 return ret;
190         }
191
192         num_bsr_devs = bsr_bytes_len / sizeof(u32);
193
194         for (i = 0 ; i < num_bsr_devs; i++) {
195                 struct bsr_dev *cur = kzalloc(sizeof(struct bsr_dev),
196                                               GFP_KERNEL);
197                 struct resource res;
198                 int result;
199
200                 if (!cur) {
201                         printk(KERN_ERR "Unable to alloc bsr dev\n");
202                         ret = -ENOMEM;
203                         goto out_err;
204                 }
205
206                 result = of_address_to_resource(bn, i, &res);
207                 if (result < 0) {
208                         printk(KERN_ERR "bsr of-node has invalid reg property, skipping\n");
209                         kfree(cur);
210                         continue;
211                 }
212
213                 cur->bsr_minor  = i + total_bsr_devs;
214                 cur->bsr_addr   = res.start;
215                 cur->bsr_len    = resource_size(&res);
216                 cur->bsr_bytes  = bsr_bytes[i];
217                 cur->bsr_stride = bsr_stride[i];
218                 cur->bsr_dev    = MKDEV(bsr_major, i + total_bsr_devs);
219
220                 /* if we have a bsr_len of > 4k and less then PAGE_SIZE (64k pages) */
221                 /* we can only map 4k of it, so only advertise the 4k in sysfs */
222                 if (cur->bsr_len > 4096 && cur->bsr_len < PAGE_SIZE)
223                         cur->bsr_len = 4096;
224
225                 switch(cur->bsr_bytes) {
226                 case 8:
227                         cur->bsr_type = BSR_8;
228                         break;
229                 case 16:
230                         cur->bsr_type = BSR_16;
231                         break;
232                 case 64:
233                         cur->bsr_type = BSR_64;
234                         break;
235                 case 128:
236                         cur->bsr_type = BSR_128;
237                         break;
238                 case 4096:
239                         cur->bsr_type = BSR_4096;
240                         break;
241                 default:
242                         cur->bsr_type = BSR_UNKNOWN;
243                 }
244
245                 cur->bsr_num = bsr_types[cur->bsr_type];
246                 snprintf(cur->bsr_name, 32, "bsr%d_%d",
247                          cur->bsr_bytes, cur->bsr_num);
248
249                 cdev_init(&cur->bsr_cdev, &bsr_fops);
250                 result = cdev_add(&cur->bsr_cdev, cur->bsr_dev, 1);
251                 if (result) {
252                         kfree(cur);
253                         goto out_err;
254                 }
255
256                 cur->bsr_device = device_create(bsr_class, NULL, cur->bsr_dev,
257                                                 cur, cur->bsr_name);
258                 if (IS_ERR(cur->bsr_device)) {
259                         printk(KERN_ERR "device_create failed for %s\n",
260                                cur->bsr_name);
261                         cdev_del(&cur->bsr_cdev);
262                         kfree(cur);
263                         goto out_err;
264                 }
265
266                 bsr_types[cur->bsr_type] = cur->bsr_num + 1;
267                 list_add_tail(&cur->bsr_list, &bsr_devs);
268         }
269
270         total_bsr_devs += num_bsr_devs;
271
272         return 0;
273
274  out_err:
275
276         bsr_cleanup_devs();
277         return ret;
278 }
279
280 static int bsr_create_devs(struct device_node *bn)
281 {
282         int ret;
283
284         while (bn) {
285                 ret = bsr_add_node(bn);
286                 if (ret) {
287                         of_node_put(bn);
288                         return ret;
289                 }
290                 bn = of_find_compatible_node(bn, NULL, "ibm,bsr");
291         }
292         return 0;
293 }
294
295 static int __init bsr_init(void)
296 {
297         struct device_node *np;
298         dev_t bsr_dev;
299         int ret = -ENODEV;
300         int result;
301
302         np = of_find_compatible_node(NULL, NULL, "ibm,bsr");
303         if (!np)
304                 goto out_err;
305
306         bsr_class = class_create(THIS_MODULE, "bsr");
307         if (IS_ERR(bsr_class)) {
308                 printk(KERN_ERR "class_create() failed for bsr_class\n");
309                 goto out_err_1;
310         }
311         bsr_class->dev_attrs = bsr_dev_attrs;
312
313         result = alloc_chrdev_region(&bsr_dev, 0, BSR_MAX_DEVS, "bsr");
314         bsr_major = MAJOR(bsr_dev);
315         if (result < 0) {
316                 printk(KERN_ERR "alloc_chrdev_region() failed for bsr\n");
317                 goto out_err_2;
318         }
319
320         if ((ret = bsr_create_devs(np)) < 0) {
321                 np = NULL;
322                 goto out_err_3;
323         }
324
325         return 0;
326
327  out_err_3:
328         unregister_chrdev_region(bsr_dev, BSR_MAX_DEVS);
329
330  out_err_2:
331         class_destroy(bsr_class);
332
333  out_err_1:
334         of_node_put(np);
335
336  out_err:
337
338         return ret;
339 }
340
341 static void __exit  bsr_exit(void)
342 {
343
344         bsr_cleanup_devs();
345
346         if (bsr_class)
347                 class_destroy(bsr_class);
348
349         if (bsr_major)
350                 unregister_chrdev_region(MKDEV(bsr_major, 0), BSR_MAX_DEVS);
351 }
352
353 module_init(bsr_init);
354 module_exit(bsr_exit);
355 MODULE_LICENSE("GPL");
356 MODULE_AUTHOR("Sonny Rao <sonnyrao@us.ibm.com>");