1 // SPDX-License-Identifier: GPL-2.0-only
2 /* flash.c: Allow mmap access to the OBP Flash, for OBP updates.
3 *
4 * Copyright (C) 1997 Eddie C. Dost (ecd@skynet.be)
5 */
6
7 #include <linux/module.h>
8 #include <linux/types.h>
9 #include <linux/errno.h>
10 #include <linux/miscdevice.h>
11 #include <linux/fcntl.h>
12 #include <linux/poll.h>
13 #include <linux/mutex.h>
14 #include <linux/spinlock.h>
15 #include <linux/mm.h>
16 #include <linux/of.h>
17 #include <linux/of_device.h>
18
19 #include <linux/uaccess.h>
20 #include <asm/io.h>
21 #include <asm/upa.h>
22
23 static DEFINE_MUTEX(flash_mutex);
24 static DEFINE_SPINLOCK(flash_lock);
25 static struct {
26 unsigned long read_base; /* Physical read address */
27 unsigned long write_base; /* Physical write address */
28 unsigned long read_size; /* Size of read area */
29 unsigned long write_size; /* Size of write area */
30 unsigned long busy; /* In use? */
31 } flash;
32
33 static int
flash_mmap(struct file * file,struct vm_area_struct * vma)34 flash_mmap(struct file *file, struct vm_area_struct *vma)
35 {
36 unsigned long addr;
37 unsigned long size;
38
39 spin_lock(&flash_lock);
40 if (flash.read_base == flash.write_base) {
41 addr = flash.read_base;
42 size = flash.read_size;
43 } else {
44 if ((vma->vm_flags & VM_READ) &&
45 (vma->vm_flags & VM_WRITE)) {
46 spin_unlock(&flash_lock);
47 return -EINVAL;
48 }
49 if (vma->vm_flags & VM_READ) {
50 addr = flash.read_base;
51 size = flash.read_size;
52 } else if (vma->vm_flags & VM_WRITE) {
53 addr = flash.write_base;
54 size = flash.write_size;
55 } else {
56 spin_unlock(&flash_lock);
57 return -ENXIO;
58 }
59 }
60 spin_unlock(&flash_lock);
61
62 if ((vma->vm_pgoff << PAGE_SHIFT) > size)
63 return -ENXIO;
64 addr = vma->vm_pgoff + (addr >> PAGE_SHIFT);
65
66 if (vma->vm_end - (vma->vm_start + (vma->vm_pgoff << PAGE_SHIFT)) > size)
67 size = vma->vm_end - (vma->vm_start + (vma->vm_pgoff << PAGE_SHIFT));
68
69 vma->vm_page_prot = pgprot_noncached(vma->vm_page_prot);
70
71 if (io_remap_pfn_range(vma, vma->vm_start, addr, size, vma->vm_page_prot))
72 return -EAGAIN;
73
74 return 0;
75 }
76
77 static long long
flash_llseek(struct file * file,long long offset,int origin)78 flash_llseek(struct file *file, long long offset, int origin)
79 {
80 mutex_lock(&flash_mutex);
81 switch (origin) {
82 case 0:
83 file->f_pos = offset;
84 break;
85 case 1:
86 file->f_pos += offset;
87 if (file->f_pos > flash.read_size)
88 file->f_pos = flash.read_size;
89 break;
90 case 2:
91 file->f_pos = flash.read_size;
92 break;
93 default:
94 mutex_unlock(&flash_mutex);
95 return -EINVAL;
96 }
97 mutex_unlock(&flash_mutex);
98 return file->f_pos;
99 }
100
101 static ssize_t
flash_read(struct file * file,char __user * buf,size_t count,loff_t * ppos)102 flash_read(struct file * file, char __user * buf,
103 size_t count, loff_t *ppos)
104 {
105 loff_t p = *ppos;
106 int i;
107
108 if (count > flash.read_size - p)
109 count = flash.read_size - p;
110
111 for (i = 0; i < count; i++) {
112 u8 data = upa_readb(flash.read_base + p + i);
113 if (put_user(data, buf))
114 return -EFAULT;
115 buf++;
116 }
117
118 *ppos += count;
119 return count;
120 }
121
122 static int
flash_open(struct inode * inode,struct file * file)123 flash_open(struct inode *inode, struct file *file)
124 {
125 mutex_lock(&flash_mutex);
126 if (test_and_set_bit(0, (void *)&flash.busy) != 0) {
127 mutex_unlock(&flash_mutex);
128 return -EBUSY;
129 }
130
131 mutex_unlock(&flash_mutex);
132 return 0;
133 }
134
135 static int
flash_release(struct inode * inode,struct file * file)136 flash_release(struct inode *inode, struct file *file)
137 {
138 spin_lock(&flash_lock);
139 flash.busy = 0;
140 spin_unlock(&flash_lock);
141
142 return 0;
143 }
144
145 static const struct file_operations flash_fops = {
146 /* no write to the Flash, use mmap
147 * and play flash dependent tricks.
148 */
149 .owner = THIS_MODULE,
150 .llseek = flash_llseek,
151 .read = flash_read,
152 .mmap = flash_mmap,
153 .open = flash_open,
154 .release = flash_release,
155 };
156
157 static struct miscdevice flash_dev = { SBUS_FLASH_MINOR, "flash", &flash_fops };
158
flash_probe(struct platform_device * op)159 static int flash_probe(struct platform_device *op)
160 {
161 struct device_node *dp = op->dev.of_node;
162 struct device_node *parent;
163
164 parent = dp->parent;
165
166 if (!of_node_name_eq(parent, "sbus") &&
167 !of_node_name_eq(parent, "sbi") &&
168 !of_node_name_eq(parent, "ebus"))
169 return -ENODEV;
170
171 flash.read_base = op->resource[0].start;
172 flash.read_size = resource_size(&op->resource[0]);
173 if (op->resource[1].flags) {
174 flash.write_base = op->resource[1].start;
175 flash.write_size = resource_size(&op->resource[1]);
176 } else {
177 flash.write_base = op->resource[0].start;
178 flash.write_size = resource_size(&op->resource[0]);
179 }
180 flash.busy = 0;
181
182 printk(KERN_INFO "%pOF: OBP Flash, RD %lx[%lx] WR %lx[%lx]\n",
183 op->dev.of_node,
184 flash.read_base, flash.read_size,
185 flash.write_base, flash.write_size);
186
187 return misc_register(&flash_dev);
188 }
189
flash_remove(struct platform_device * op)190 static int flash_remove(struct platform_device *op)
191 {
192 misc_deregister(&flash_dev);
193
194 return 0;
195 }
196
197 static const struct of_device_id flash_match[] = {
198 {
199 .name = "flashprom",
200 },
201 {},
202 };
203 MODULE_DEVICE_TABLE(of, flash_match);
204
205 static struct platform_driver flash_driver = {
206 .driver = {
207 .name = "flash",
208 .of_match_table = flash_match,
209 },
210 .probe = flash_probe,
211 .remove = flash_remove,
212 };
213
214 module_platform_driver(flash_driver);
215
216 MODULE_LICENSE("GPL");
217