| xj | b04a402 | 2021-11-25 15:01:52 +0800 | [diff] [blame] | 1 | /* display7seg.c - Driver implementation for the 7-segment display | 
|  | 2 | *                 present on Sun Microsystems CP1400 and CP1500 | 
|  | 3 | * | 
|  | 4 | * Copyright (c) 2000 Eric Brower (ebrower@usa.net) | 
|  | 5 | */ | 
|  | 6 |  | 
|  | 7 | #include <linux/device.h> | 
|  | 8 | #include <linux/kernel.h> | 
|  | 9 | #include <linux/module.h> | 
|  | 10 | #include <linux/fs.h> | 
|  | 11 | #include <linux/errno.h> | 
|  | 12 | #include <linux/major.h> | 
|  | 13 | #include <linux/miscdevice.h> | 
|  | 14 | #include <linux/ioport.h>		/* request_region */ | 
|  | 15 | #include <linux/slab.h> | 
|  | 16 | #include <linux/mutex.h> | 
|  | 17 | #include <linux/of.h> | 
|  | 18 | #include <linux/of_device.h> | 
|  | 19 | #include <linux/atomic.h> | 
|  | 20 | #include <linux/uaccess.h>		/* put_/get_user			*/ | 
|  | 21 | #include <asm/io.h> | 
|  | 22 |  | 
|  | 23 | #include <asm/display7seg.h> | 
|  | 24 |  | 
|  | 25 | #define DRIVER_NAME	"d7s" | 
|  | 26 | #define PFX		DRIVER_NAME ": " | 
|  | 27 |  | 
|  | 28 | static DEFINE_MUTEX(d7s_mutex); | 
|  | 29 | static int sol_compat = 0;		/* Solaris compatibility mode	*/ | 
|  | 30 |  | 
|  | 31 | /* Solaris compatibility flag - | 
|  | 32 | * The Solaris implementation omits support for several | 
|  | 33 | * documented driver features (ref Sun doc 806-0180-03). | 
|  | 34 | * By default, this module supports the documented driver | 
|  | 35 | * abilities, rather than the Solaris implementation: | 
|  | 36 | * | 
|  | 37 | * 	1) Device ALWAYS reverts to OBP-specified FLIPPED mode | 
|  | 38 | * 	   upon closure of device or module unload. | 
|  | 39 | * 	2) Device ioctls D7SIOCRD/D7SIOCWR honor toggling of | 
|  | 40 | * 	   FLIP bit | 
|  | 41 | * | 
|  | 42 | * If you wish the device to operate as under Solaris, | 
|  | 43 | * omitting above features, set this parameter to non-zero. | 
|  | 44 | */ | 
|  | 45 | module_param(sol_compat, int, 0); | 
|  | 46 | MODULE_PARM_DESC(sol_compat, | 
|  | 47 | "Disables documented functionality omitted from Solaris driver"); | 
|  | 48 |  | 
|  | 49 | MODULE_AUTHOR("Eric Brower <ebrower@usa.net>"); | 
|  | 50 | MODULE_DESCRIPTION("7-Segment Display driver for Sun Microsystems CP1400/1500"); | 
|  | 51 | MODULE_LICENSE("GPL"); | 
|  | 52 | MODULE_SUPPORTED_DEVICE("d7s"); | 
|  | 53 |  | 
|  | 54 | struct d7s { | 
|  | 55 | void __iomem	*regs; | 
|  | 56 | bool		flipped; | 
|  | 57 | }; | 
|  | 58 | struct d7s *d7s_device; | 
|  | 59 |  | 
|  | 60 | /* | 
|  | 61 | * Register block address- see header for details | 
|  | 62 | * ----------------------------------------- | 
|  | 63 | * | DP | ALARM | FLIP | 4 | 3 | 2 | 1 | 0 | | 
|  | 64 | * ----------------------------------------- | 
|  | 65 | * | 
|  | 66 | * DP 		- Toggles decimal point on/off | 
|  | 67 | * ALARM	- Toggles "Alarm" LED green/red | 
|  | 68 | * FLIP		- Inverts display for upside-down mounted board | 
|  | 69 | * bits 0-4	- 7-segment display contents | 
|  | 70 | */ | 
|  | 71 | static atomic_t d7s_users = ATOMIC_INIT(0); | 
|  | 72 |  | 
|  | 73 | static int d7s_open(struct inode *inode, struct file *f) | 
|  | 74 | { | 
|  | 75 | if (D7S_MINOR != iminor(inode)) | 
|  | 76 | return -ENODEV; | 
|  | 77 | atomic_inc(&d7s_users); | 
|  | 78 | return 0; | 
|  | 79 | } | 
|  | 80 |  | 
|  | 81 | static int d7s_release(struct inode *inode, struct file *f) | 
|  | 82 | { | 
|  | 83 | /* Reset flipped state to OBP default only if | 
|  | 84 | * no other users have the device open and we | 
|  | 85 | * are not operating in solaris-compat mode | 
|  | 86 | */ | 
|  | 87 | if (atomic_dec_and_test(&d7s_users) && !sol_compat) { | 
|  | 88 | struct d7s *p = d7s_device; | 
|  | 89 | u8 regval = 0; | 
|  | 90 |  | 
|  | 91 | regval = readb(p->regs); | 
|  | 92 | if (p->flipped) | 
|  | 93 | regval |= D7S_FLIP; | 
|  | 94 | else | 
|  | 95 | regval &= ~D7S_FLIP; | 
|  | 96 | writeb(regval, p->regs); | 
|  | 97 | } | 
|  | 98 |  | 
|  | 99 | return 0; | 
|  | 100 | } | 
|  | 101 |  | 
|  | 102 | static long d7s_ioctl(struct file *file, unsigned int cmd, unsigned long arg) | 
|  | 103 | { | 
|  | 104 | struct d7s *p = d7s_device; | 
|  | 105 | u8 regs = readb(p->regs); | 
|  | 106 | int error = 0; | 
|  | 107 | u8 ireg = 0; | 
|  | 108 |  | 
|  | 109 | if (D7S_MINOR != iminor(file_inode(file))) | 
|  | 110 | return -ENODEV; | 
|  | 111 |  | 
|  | 112 | mutex_lock(&d7s_mutex); | 
|  | 113 | switch (cmd) { | 
|  | 114 | case D7SIOCWR: | 
|  | 115 | /* assign device register values we mask-out D7S_FLIP | 
|  | 116 | * if in sol_compat mode | 
|  | 117 | */ | 
|  | 118 | if (get_user(ireg, (int __user *) arg)) { | 
|  | 119 | error = -EFAULT; | 
|  | 120 | break; | 
|  | 121 | } | 
|  | 122 | if (sol_compat) { | 
|  | 123 | if (regs & D7S_FLIP) | 
|  | 124 | ireg |= D7S_FLIP; | 
|  | 125 | else | 
|  | 126 | ireg &= ~D7S_FLIP; | 
|  | 127 | } | 
|  | 128 | writeb(ireg, p->regs); | 
|  | 129 | break; | 
|  | 130 |  | 
|  | 131 | case D7SIOCRD: | 
|  | 132 | /* retrieve device register values | 
|  | 133 | * NOTE: Solaris implementation returns D7S_FLIP bit | 
|  | 134 | * as toggled by user, even though it does not honor it. | 
|  | 135 | * This driver will not misinform you about the state | 
|  | 136 | * of your hardware while in sol_compat mode | 
|  | 137 | */ | 
|  | 138 | if (put_user(regs, (int __user *) arg)) { | 
|  | 139 | error = -EFAULT; | 
|  | 140 | break; | 
|  | 141 | } | 
|  | 142 | break; | 
|  | 143 |  | 
|  | 144 | case D7SIOCTM: | 
|  | 145 | /* toggle device mode-- flip display orientation */ | 
|  | 146 | regs ^= D7S_FLIP; | 
|  | 147 | writeb(regs, p->regs); | 
|  | 148 | break; | 
|  | 149 | } | 
|  | 150 | mutex_unlock(&d7s_mutex); | 
|  | 151 |  | 
|  | 152 | return error; | 
|  | 153 | } | 
|  | 154 |  | 
|  | 155 | static const struct file_operations d7s_fops = { | 
|  | 156 | .owner =		THIS_MODULE, | 
|  | 157 | .unlocked_ioctl =	d7s_ioctl, | 
|  | 158 | .compat_ioctl =		d7s_ioctl, | 
|  | 159 | .open =			d7s_open, | 
|  | 160 | .release =		d7s_release, | 
|  | 161 | .llseek = noop_llseek, | 
|  | 162 | }; | 
|  | 163 |  | 
|  | 164 | static struct miscdevice d7s_miscdev = { | 
|  | 165 | .minor		= D7S_MINOR, | 
|  | 166 | .name		= DRIVER_NAME, | 
|  | 167 | .fops		= &d7s_fops | 
|  | 168 | }; | 
|  | 169 |  | 
|  | 170 | static int d7s_probe(struct platform_device *op) | 
|  | 171 | { | 
|  | 172 | struct device_node *opts; | 
|  | 173 | int err = -EINVAL; | 
|  | 174 | struct d7s *p; | 
|  | 175 | u8 regs; | 
|  | 176 |  | 
|  | 177 | if (d7s_device) | 
|  | 178 | goto out; | 
|  | 179 |  | 
|  | 180 | p = devm_kzalloc(&op->dev, sizeof(*p), GFP_KERNEL); | 
|  | 181 | err = -ENOMEM; | 
|  | 182 | if (!p) | 
|  | 183 | goto out; | 
|  | 184 |  | 
|  | 185 | p->regs = of_ioremap(&op->resource[0], 0, sizeof(u8), "d7s"); | 
|  | 186 | if (!p->regs) { | 
|  | 187 | printk(KERN_ERR PFX "Cannot map chip registers\n"); | 
|  | 188 | goto out_free; | 
|  | 189 | } | 
|  | 190 |  | 
|  | 191 | err = misc_register(&d7s_miscdev); | 
|  | 192 | if (err) { | 
|  | 193 | printk(KERN_ERR PFX "Unable to acquire miscdevice minor %i\n", | 
|  | 194 | D7S_MINOR); | 
|  | 195 | goto out_iounmap; | 
|  | 196 | } | 
|  | 197 |  | 
|  | 198 | /* OBP option "d7s-flipped?" is honored as default for the | 
|  | 199 | * device, and reset default when detached | 
|  | 200 | */ | 
|  | 201 | regs = readb(p->regs); | 
|  | 202 | opts = of_find_node_by_path("/options"); | 
|  | 203 | if (opts && | 
|  | 204 | of_get_property(opts, "d7s-flipped?", NULL)) | 
|  | 205 | p->flipped = true; | 
|  | 206 |  | 
|  | 207 | if (p->flipped) | 
|  | 208 | regs |= D7S_FLIP; | 
|  | 209 | else | 
|  | 210 | regs &= ~D7S_FLIP; | 
|  | 211 |  | 
|  | 212 | writeb(regs,  p->regs); | 
|  | 213 |  | 
|  | 214 | printk(KERN_INFO PFX "7-Segment Display%pOF at [%s:0x%llx] %s\n", | 
|  | 215 | op->dev.of_node, | 
|  | 216 | (regs & D7S_FLIP) ? " (FLIPPED)" : "", | 
|  | 217 | op->resource[0].start, | 
|  | 218 | sol_compat ? "in sol_compat mode" : ""); | 
|  | 219 |  | 
|  | 220 | dev_set_drvdata(&op->dev, p); | 
|  | 221 | d7s_device = p; | 
|  | 222 | err = 0; | 
|  | 223 | of_node_put(opts); | 
|  | 224 |  | 
|  | 225 | out: | 
|  | 226 | return err; | 
|  | 227 |  | 
|  | 228 | out_iounmap: | 
|  | 229 | of_iounmap(&op->resource[0], p->regs, sizeof(u8)); | 
|  | 230 |  | 
|  | 231 | out_free: | 
|  | 232 | goto out; | 
|  | 233 | } | 
|  | 234 |  | 
|  | 235 | static int d7s_remove(struct platform_device *op) | 
|  | 236 | { | 
|  | 237 | struct d7s *p = dev_get_drvdata(&op->dev); | 
|  | 238 | u8 regs = readb(p->regs); | 
|  | 239 |  | 
|  | 240 | /* Honor OBP d7s-flipped? unless operating in solaris-compat mode */ | 
|  | 241 | if (sol_compat) { | 
|  | 242 | if (p->flipped) | 
|  | 243 | regs |= D7S_FLIP; | 
|  | 244 | else | 
|  | 245 | regs &= ~D7S_FLIP; | 
|  | 246 | writeb(regs, p->regs); | 
|  | 247 | } | 
|  | 248 |  | 
|  | 249 | misc_deregister(&d7s_miscdev); | 
|  | 250 | of_iounmap(&op->resource[0], p->regs, sizeof(u8)); | 
|  | 251 |  | 
|  | 252 | return 0; | 
|  | 253 | } | 
|  | 254 |  | 
|  | 255 | static const struct of_device_id d7s_match[] = { | 
|  | 256 | { | 
|  | 257 | .name = "display7seg", | 
|  | 258 | }, | 
|  | 259 | {}, | 
|  | 260 | }; | 
|  | 261 | MODULE_DEVICE_TABLE(of, d7s_match); | 
|  | 262 |  | 
|  | 263 | static struct platform_driver d7s_driver = { | 
|  | 264 | .driver = { | 
|  | 265 | .name = DRIVER_NAME, | 
|  | 266 | .of_match_table = d7s_match, | 
|  | 267 | }, | 
|  | 268 | .probe		= d7s_probe, | 
|  | 269 | .remove		= d7s_remove, | 
|  | 270 | }; | 
|  | 271 |  | 
|  | 272 | module_platform_driver(d7s_driver); |