1 /*
2  * CMOS/NV-RAM driver for Linux
3  *
4  * Copyright (C) 1997 Roman Hodek <Roman.Hodek@informatik.uni-erlangen.de>
5  * idea by and with help from Richard Jelinek <rj@suse.de>
6  * Portions copyright (c) 2001,2002 Sun Microsystems (thockin@sun.com)
7  *
8  * This driver allows you to access the contents of the non-volatile memory in
9  * the mc146818rtc.h real-time clock. This chip is built into all PCs and into
10  * many Atari machines. In the former it's called "CMOS-RAM", in the latter
11  * "NVRAM" (NV stands for non-volatile).
12  *
13  * The data are supplied as a (seekable) character device, /dev/nvram. The
14  * size of this file is dependant on the controller.  The usual size is 114,
15  * the number of freely available bytes in the memory (i.e., not used by the
16  * RTC itself).
17  *
18  * Checksums over the NVRAM contents are managed by this driver. In case of a
19  * bad checksum, reads and writes return -EIO. The checksum can be initialized
20  * to a sane state either by ioctl(NVRAM_INIT) (clear whole NVRAM) or
21  * ioctl(NVRAM_SETCKS) (doesn't change contents, just makes checksum valid
22  * again; use with care!)
23  *
24  * This file also provides some functions for other parts of the kernel that
25  * want to access the NVRAM: nvram_{read,write,check_checksum,set_checksum}.
26  * Obviously this can be used only if this driver is always configured into
27  * the kernel and is not a module. Since the functions are used by some Atari
28  * drivers, this is the case on the Atari.
29  *
30  *
31  * 	1.1	Cesar Barros: SMP locking fixes
32  * 		added changelog
33  * 	1.2	Erik Gilling: Cobalt Networks support
34  * 		Tim Hockin: general cleanup, Cobalt support
35  */
36 
37 #define NVRAM_VERSION	"1.2"
38 
39 #include <linux/module.h>
40 #include <linux/config.h>
41 #include <linux/sched.h>
42 #include <linux/smp_lock.h>
43 #include <linux/nvram.h>
44 
45 #define PC		1
46 #define ATARI		2
47 #define COBALT		3
48 
49 /* select machine configuration */
50 #if defined(CONFIG_ATARI)
51 #  define MACH ATARI
52 #elif defined(__i386__) || defined(__x86_64__) || defined(__arm__)  /* and others?? */
53 #define MACH PC
54 #  if defined(CONFIG_COBALT)
55 #    include <linux/cobalt-nvram.h>
56 #    define MACH COBALT
57 #  else
58 #    define MACH PC
59 #  endif
60 #else
61 #  error Cannot build nvram driver for this machine configuration.
62 #endif
63 
64 #if MACH == PC
65 
66 /* RTC in a PC */
67 #define CHECK_DRIVER_INIT()	1
68 
69 /* On PCs, the checksum is built only over bytes 2..31 */
70 #define PC_CKS_RANGE_START	2
71 #define PC_CKS_RANGE_END	31
72 #define PC_CKS_LOC		32
73 #define NVRAM_BYTES		(128-NVRAM_FIRST_BYTE)
74 
75 #define mach_check_checksum	pc_check_checksum
76 #define mach_set_checksum	pc_set_checksum
77 #define mach_proc_infos		pc_proc_infos
78 
79 #endif
80 
81 #if MACH == COBALT
82 
83 #define CHECK_DRIVER_INIT()     1
84 
85 #define NVRAM_BYTES		(128-NVRAM_FIRST_BYTE)
86 
87 #define mach_check_checksum	cobalt_check_checksum
88 #define mach_set_checksum	cobalt_set_checksum
89 #define mach_proc_infos		cobalt_proc_infos
90 
91 #endif
92 
93 #if MACH == ATARI
94 
95 /* Special parameters for RTC in Atari machines */
96 #include <asm/atarihw.h>
97 #include <asm/atariints.h>
98 #define RTC_PORT(x)		(TT_RTC_BAS + 2*(x))
99 #define CHECK_DRIVER_INIT()	(MACH_IS_ATARI && ATARIHW_PRESENT(TT_CLK))
100 
101 #define NVRAM_BYTES		50
102 
103 /* On Ataris, the checksum is over all bytes except the checksum bytes
104  * themselves; these are at the very end */
105 #define ATARI_CKS_RANGE_START	0
106 #define ATARI_CKS_RANGE_END	47
107 #define ATARI_CKS_LOC		48
108 
109 #define mach_check_checksum	atari_check_checksum
110 #define mach_set_checksum	atari_set_checksum
111 #define mach_proc_infos		atari_proc_infos
112 
113 #endif
114 
115 /* Note that *all* calls to CMOS_READ and CMOS_WRITE must be done with
116  * rtc_lock held. Due to the index-port/data-port design of the RTC, we
117  * don't want two different things trying to get to it at once. (e.g. the
118  * periodic 11 min sync from time.c vs. this driver.)
119  */
120 
121 #include <linux/types.h>
122 #include <linux/errno.h>
123 #include <linux/miscdevice.h>
124 #include <linux/slab.h>
125 #include <linux/ioport.h>
126 #include <linux/fcntl.h>
127 #include <linux/mc146818rtc.h>
128 #include <linux/init.h>
129 #include <linux/proc_fs.h>
130 #include <linux/spinlock.h>
131 
132 #include <asm/io.h>
133 #include <asm/uaccess.h>
134 #include <asm/system.h>
135 
136 static spinlock_t nvram_state_lock = SPIN_LOCK_UNLOCKED;
137 static int nvram_open_cnt;	/* #times opened */
138 static int nvram_open_mode;	/* special open modes */
139 #define NVRAM_WRITE		1 /* opened for writing (exclusive) */
140 #define NVRAM_EXCL		2 /* opened with O_EXCL */
141 
142 static int mach_check_checksum(void);
143 static void mach_set_checksum(void);
144 
145 #ifdef CONFIG_PROC_FS
146 static int mach_proc_infos(unsigned char *contents, char *buffer, int *len,
147     off_t *begin, off_t offset, int size);
148 #endif
149 
150 /*
151  * These functions are provided to be called internally or by other parts of
152  * the kernel. It's up to the caller to ensure correct checksum before reading
153  * or after writing (needs to be done only once).
154  *
155  * It is worth noting that these functions all access bytes of general
156  * purpose memory in the NVRAM - that is to say, they all add the
157  * NVRAM_FIRST_BYTE offset.  Pass them offsets into NVRAM as if you did not
158  * know about the RTC cruft.
159  */
160 
161 unsigned char
__nvram_read_byte(int i)162 __nvram_read_byte(int i)
163 {
164 	return CMOS_READ(NVRAM_FIRST_BYTE + i);
165 }
166 
167 unsigned char
nvram_read_byte(int i)168 nvram_read_byte(int i)
169 {
170 	unsigned long flags;
171 	unsigned char c;
172 
173 	spin_lock_irqsave(&rtc_lock, flags);
174 	c = __nvram_read_byte(i);
175 	spin_unlock_irqrestore(&rtc_lock, flags);
176 	return c;
177 }
178 
179 /* This races nicely with trying to read with checksum checking (nvram_read) */
180 void
__nvram_write_byte(unsigned char c,int i)181 __nvram_write_byte(unsigned char c, int i)
182 {
183 	CMOS_WRITE(c, NVRAM_FIRST_BYTE + i);
184 }
185 
186 void
nvram_write_byte(unsigned char c,int i)187 nvram_write_byte(unsigned char c, int i)
188 {
189 	unsigned long flags;
190 
191 	spin_lock_irqsave(&rtc_lock, flags);
192 	__nvram_write_byte(c, i);
193 	spin_unlock_irqrestore(&rtc_lock, flags);
194 }
195 
196 int
__nvram_check_checksum(void)197 __nvram_check_checksum(void)
198 {
199 	return mach_check_checksum();
200 }
201 
202 int
nvram_check_checksum(void)203 nvram_check_checksum(void)
204 {
205 	unsigned long flags;
206 	int rv;
207 
208 	spin_lock_irqsave(&rtc_lock, flags);
209 	rv = __nvram_check_checksum();
210 	spin_unlock_irqrestore(&rtc_lock, flags);
211 	return rv;
212 }
213 
214 void
__nvram_set_checksum(void)215 __nvram_set_checksum(void)
216 {
217 	mach_set_checksum();
218 }
219 
220 void
nvram_set_checksum(void)221 nvram_set_checksum(void)
222 {
223 	unsigned long flags;
224 
225 	spin_lock_irqsave(&rtc_lock, flags);
226 	__nvram_set_checksum();
227 	spin_unlock_irqrestore(&rtc_lock, flags);
228 }
229 
230 /*
231  * The are the file operation function for user access to /dev/nvram
232  */
233 
234 static long long
nvram_llseek(struct file * file,loff_t offset,int origin)235 nvram_llseek(struct file *file, loff_t offset, int origin)
236 {
237 	switch (origin) {
238 	case 0:
239 		/* nothing to do */
240 		break;
241 	case 1:
242 		offset += file->f_pos;
243 		break;
244 	case 2:
245 		offset += NVRAM_BYTES;
246 		break;
247 	}
248 	return (offset >= 0) ? (file->f_pos = offset) : -EINVAL;
249 }
250 
251 static ssize_t
nvram_read(struct file * file,char * buf,size_t count,loff_t * ppos)252 nvram_read(struct file *file, char *buf, size_t count, loff_t *ppos)
253 {
254 	unsigned char contents[NVRAM_BYTES];
255 	loff_t n = *ppos;
256 	unsigned i = n;
257 	unsigned char *tmp;
258 
259 	if (i != n || i >= NVRAM_BYTES)
260 		return 0;
261 
262 	spin_lock_irq(&rtc_lock);
263 
264 	if (!__nvram_check_checksum())
265 		goto checksum_err;
266 
267 	for (tmp = contents; count-- > 0 && i < NVRAM_BYTES; ++i, ++tmp)
268 		*tmp = __nvram_read_byte(i);
269 
270 	spin_unlock_irq(&rtc_lock);
271 
272 	if (copy_to_user(buf, contents, tmp - contents))
273 		return -EFAULT;
274 
275 	*ppos = i;
276 
277 	return tmp - contents;
278 
279       checksum_err:
280 	spin_unlock_irq(&rtc_lock);
281 	return -EIO;
282 }
283 
284 static ssize_t
nvram_write(struct file * file,const char * buf,size_t count,loff_t * ppos)285 nvram_write(struct file *file, const char *buf, size_t count, loff_t *ppos)
286 {
287 	unsigned char contents[NVRAM_BYTES];
288 	loff_t n = *ppos;
289 	unsigned i = n;
290 	unsigned char *tmp;
291 	int len;
292 
293 	if (i != n || i >= NVRAM_BYTES)
294 		return 0;
295 
296 	len = (NVRAM_BYTES - i) < count ? (NVRAM_BYTES - i) : count;
297 	if (copy_from_user(contents, buf, len))
298 		return -EFAULT;
299 
300 	spin_lock_irq(&rtc_lock);
301 
302 	if (!__nvram_check_checksum())
303 		goto checksum_err;
304 
305 	for (tmp = contents; count-- > 0 && i < NVRAM_BYTES; ++i, ++tmp)
306 		__nvram_write_byte(*tmp, i);
307 
308 	__nvram_set_checksum();
309 
310 	spin_unlock_irq(&rtc_lock);
311 
312 	*ppos = i;
313 
314 	return tmp - contents;
315 
316       checksum_err:
317 	spin_unlock_irq(&rtc_lock);
318 	return -EIO;
319 }
320 
321 static int
nvram_ioctl(struct inode * inode,struct file * file,unsigned int cmd,unsigned long arg)322 nvram_ioctl(struct inode *inode, struct file *file,
323     unsigned int cmd, unsigned long arg)
324 {
325 	int i;
326 
327 	switch (cmd) {
328 
329 	case NVRAM_INIT:
330 		/* initialize NVRAM contents and checksum */
331 		if (!capable(CAP_SYS_ADMIN))
332 			return -EACCES;
333 
334 		spin_lock_irq(&rtc_lock);
335 
336 		for (i = 0; i < NVRAM_BYTES; ++i)
337 			__nvram_write_byte(0, i);
338 		__nvram_set_checksum();
339 
340 		spin_unlock_irq(&rtc_lock);
341 		return 0;
342 
343 	case NVRAM_SETCKS:
344 		/* just set checksum, contents unchanged (maybe useful after
345 		 * checksum garbaged somehow...) */
346 		if (!capable(CAP_SYS_ADMIN))
347 			return -EACCES;
348 
349 		spin_lock_irq(&rtc_lock);
350 		__nvram_set_checksum();
351 		spin_unlock_irq(&rtc_lock);
352 		return 0;
353 
354 	default:
355 		return -ENOTTY;
356 	}
357 }
358 
359 static int
nvram_open(struct inode * inode,struct file * file)360 nvram_open(struct inode *inode, struct file *file)
361 {
362 	spin_lock(&nvram_state_lock);
363 
364 	if ((nvram_open_cnt && (file->f_flags & O_EXCL)) ||
365 	    (nvram_open_mode & NVRAM_EXCL) ||
366 	    ((file->f_mode & 2) && (nvram_open_mode & NVRAM_WRITE))) {
367 		spin_unlock(&nvram_state_lock);
368 		return -EBUSY;
369 	}
370 
371 	if (file->f_flags & O_EXCL)
372 		nvram_open_mode |= NVRAM_EXCL;
373 	if (file->f_mode & 2)
374 		nvram_open_mode |= NVRAM_WRITE;
375 	nvram_open_cnt++;
376 
377 	spin_unlock(&nvram_state_lock);
378 
379 	return 0;
380 }
381 
382 static int
nvram_release(struct inode * inode,struct file * file)383 nvram_release(struct inode *inode, struct file *file)
384 {
385 	spin_lock(&nvram_state_lock);
386 
387 	nvram_open_cnt--;
388 
389 	/* if only one instance is open, clear the EXCL bit */
390 	if (nvram_open_mode & NVRAM_EXCL)
391 		nvram_open_mode &= ~NVRAM_EXCL;
392 	if (file->f_mode & 2)
393 		nvram_open_mode &= ~NVRAM_WRITE;
394 
395 	spin_unlock(&nvram_state_lock);
396 
397 	return 0;
398 }
399 
400 #ifndef CONFIG_PROC_FS
401 static int
nvram_read_proc(char * buffer,char ** start,off_t offset,int size,int * eof,void * data)402 nvram_read_proc(char *buffer, char **start, off_t offset,
403     int size, int *eof, void *data)
404 {
405 	return 0;
406 }
407 #else
408 
409 static int
nvram_read_proc(char * buffer,char ** start,off_t offset,int size,int * eof,void * data)410 nvram_read_proc(char *buffer, char **start, off_t offset,
411     int size, int *eof, void *data)
412 {
413 	unsigned char contents[NVRAM_BYTES];
414 	int i, len = 0;
415 	off_t begin = 0;
416 
417 	spin_lock_irq(&rtc_lock);
418 	for (i = 0; i < NVRAM_BYTES; ++i)
419 		contents[i] = __nvram_read_byte(i);
420 	spin_unlock_irq(&rtc_lock);
421 
422 	*eof = mach_proc_infos(contents, buffer, &len, &begin, offset, size);
423 
424 	if (offset >= begin + len)
425 		return 0;
426 	*start = buffer + (offset - begin);
427 	return (size < begin + len - offset) ? size : begin + len - offset;
428 
429 }
430 
431 /* This macro frees the machine specific function from bounds checking and
432  * this like that... */
433 #define PRINT_PROC(fmt,args...)					\
434 	do {							\
435 		*len += sprintf(buffer+*len, fmt, ##args);	\
436 		if (*begin + *len > offset + size)		\
437 			return 0;				\
438 		if (*begin + *len < offset) {			\
439 			*begin += *len;				\
440 			*len = 0;				\
441 		}						\
442 	} while(0)
443 
444 #endif /* CONFIG_PROC_FS */
445 
446 static struct file_operations nvram_fops = {
447 	owner:		THIS_MODULE,
448 	llseek:		nvram_llseek,
449 	read:		nvram_read,
450 	write:		nvram_write,
451 	ioctl:		nvram_ioctl,
452 	open:		nvram_open,
453 	release:	nvram_release,
454 };
455 
456 static struct miscdevice nvram_dev = {
457 	NVRAM_MINOR,
458 	"nvram",
459 	&nvram_fops
460 };
461 
462 static int __init
nvram_init(void)463 nvram_init(void)
464 {
465 	int ret;
466 
467 	/* First test whether the driver should init at all */
468 	if (!CHECK_DRIVER_INIT())
469 		return -ENXIO;
470 
471 	ret = misc_register(&nvram_dev);
472 	if (ret) {
473 		printk(KERN_ERR "nvram: can't misc_register on minor=%d\n",
474 		    NVRAM_MINOR);
475 		goto out;
476 	}
477 	if (!create_proc_read_entry("driver/nvram", 0, 0, nvram_read_proc,
478 		NULL)) {
479 		printk(KERN_ERR "nvram: can't create /proc/driver/nvram\n");
480 		ret = -ENOMEM;
481 		goto outmisc;
482 	}
483 	ret = 0;
484 	printk(KERN_INFO "Non-volatile memory driver v" NVRAM_VERSION "\n");
485       out:
486 	return ret;
487       outmisc:
488 	misc_deregister(&nvram_dev);
489 	goto out;
490 }
491 
492 static void __exit
nvram_cleanup_module(void)493 nvram_cleanup_module(void)
494 {
495 	remove_proc_entry("driver/nvram", 0);
496 	misc_deregister(&nvram_dev);
497 }
498 
499 module_init(nvram_init);
500 module_exit(nvram_cleanup_module);
501 
502 /*
503  * Machine specific functions
504  */
505 
506 #if MACH == PC
507 
508 static int
pc_check_checksum(void)509 pc_check_checksum(void)
510 {
511 	int i;
512 	unsigned short sum = 0;
513 	unsigned short expect;
514 
515 	for (i = PC_CKS_RANGE_START; i <= PC_CKS_RANGE_END; ++i)
516 		sum += __nvram_read_byte(i);
517 	expect = __nvram_read_byte(PC_CKS_LOC)<<8 |
518 	    __nvram_read_byte(PC_CKS_LOC+1);
519 	return ((sum & 0xffff) == expect);
520 }
521 
522 static void
pc_set_checksum(void)523 pc_set_checksum(void)
524 {
525 	int i;
526 	unsigned short sum = 0;
527 
528 	for (i = PC_CKS_RANGE_START; i <= PC_CKS_RANGE_END; ++i)
529 		sum += __nvram_read_byte(i);
530 	__nvram_write_byte(sum >> 8, PC_CKS_LOC);
531 	__nvram_write_byte(sum & 0xff, PC_CKS_LOC + 1);
532 }
533 
534 #ifdef CONFIG_PROC_FS
535 
536 static char *floppy_types[] = {
537 	"none", "5.25'' 360k", "5.25'' 1.2M", "3.5'' 720k", "3.5'' 1.44M",
538 	"3.5'' 2.88M", "3.5'' 2.88M"
539 };
540 
541 static char *gfx_types[] = {
542 	"EGA, VGA, ... (with BIOS)",
543 	"CGA (40 cols)",
544 	"CGA (80 cols)",
545 	"monochrome",
546 };
547 
548 static int
pc_proc_infos(unsigned char * nvram,char * buffer,int * len,off_t * begin,off_t offset,int size)549 pc_proc_infos(unsigned char *nvram, char *buffer, int *len,
550     off_t *begin, off_t offset, int size)
551 {
552 	int checksum;
553 	int type;
554 
555 	spin_lock_irq(&rtc_lock);
556 	checksum = __nvram_check_checksum();
557 	spin_unlock_irq(&rtc_lock);
558 
559 	PRINT_PROC("Checksum status: %svalid\n", checksum ? "" : "not ");
560 
561 	PRINT_PROC("# floppies     : %d\n",
562 	    (nvram[6] & 1) ? (nvram[6] >> 6) + 1 : 0);
563 	PRINT_PROC("Floppy 0 type  : ");
564 	type = nvram[2] >> 4;
565 	if (type < sizeof (floppy_types) / sizeof (*floppy_types))
566 		PRINT_PROC("%s\n", floppy_types[type]);
567 	else
568 		PRINT_PROC("%d (unknown)\n", type);
569 	PRINT_PROC("Floppy 1 type  : ");
570 	type = nvram[2] & 0x0f;
571 	if (type < sizeof (floppy_types) / sizeof (*floppy_types))
572 		PRINT_PROC("%s\n", floppy_types[type]);
573 	else
574 		PRINT_PROC("%d (unknown)\n", type);
575 
576 	PRINT_PROC("HD 0 type      : ");
577 	type = nvram[4] >> 4;
578 	if (type)
579 		PRINT_PROC("%02x\n", type == 0x0f ? nvram[11] : type);
580 	else
581 		PRINT_PROC("none\n");
582 
583 	PRINT_PROC("HD 1 type      : ");
584 	type = nvram[4] & 0x0f;
585 	if (type)
586 		PRINT_PROC("%02x\n", type == 0x0f ? nvram[12] : type);
587 	else
588 		PRINT_PROC("none\n");
589 
590 	PRINT_PROC("HD type 48 data: %d/%d/%d C/H/S, precomp %d, lz %d\n",
591 	    nvram[18] | (nvram[19] << 8),
592 	    nvram[20], nvram[25],
593 	    nvram[21] | (nvram[22] << 8), nvram[23] | (nvram[24] << 8));
594 	PRINT_PROC("HD type 49 data: %d/%d/%d C/H/S, precomp %d, lz %d\n",
595 	    nvram[39] | (nvram[40] << 8),
596 	    nvram[41], nvram[46],
597 	    nvram[42] | (nvram[43] << 8), nvram[44] | (nvram[45] << 8));
598 
599 	PRINT_PROC("DOS base memory: %d kB\n", nvram[7] | (nvram[8] << 8));
600 	PRINT_PROC("Extended memory: %d kB (configured), %d kB (tested)\n",
601 	    nvram[9] | (nvram[10] << 8), nvram[34] | (nvram[35] << 8));
602 
603 	PRINT_PROC("Gfx adapter    : %s\n", gfx_types[(nvram[6] >> 4) & 3]);
604 
605 	PRINT_PROC("FPU            : %sinstalled\n",
606 	    (nvram[6] & 2) ? "" : "not ");
607 
608 	return 1;
609 }
610 #endif
611 
612 #endif /* MACH == PC */
613 
614 #if MACH == COBALT
615 
616 /* the cobalt CMOS has a wider range of it's checksum */
cobalt_check_checksum(void)617 static int cobalt_check_checksum(void)
618 {
619 	int i;
620 	unsigned short sum = 0;
621 	unsigned short expect;
622 
623 	for (i = COBT_CMOS_CKS_START; i <= COBT_CMOS_CKS_END; ++i) {
624 		if ((i == COBT_CMOS_CHECKSUM) || (i == (COBT_CMOS_CHECKSUM+1)))
625 			continue;
626 
627 		sum += __nvram_read_byte(i);
628 	}
629 	expect = __nvram_read_byte(COBT_CMOS_CHECKSUM) << 8 |
630 	    __nvram_read_byte(COBT_CMOS_CHECKSUM+1);
631 	return ((sum & 0xffff) == expect);
632 }
633 
cobalt_set_checksum(void)634 static void cobalt_set_checksum(void)
635 {
636 	int i;
637 	unsigned short sum = 0;
638 
639 	for (i = COBT_CMOS_CKS_START; i <= COBT_CMOS_CKS_END; ++i) {
640 		if ((i == COBT_CMOS_CHECKSUM) || (i == (COBT_CMOS_CHECKSUM+1)))
641 			continue;
642 
643 		sum += __nvram_read_byte(i);
644 	}
645 
646 	__nvram_write_byte(sum >> 8, COBT_CMOS_CHECKSUM);
647 	__nvram_write_byte(sum & 0xff, COBT_CMOS_CHECKSUM+1);
648 }
649 
650 #ifdef CONFIG_PROC_FS
651 
cobalt_proc_infos(unsigned char * nvram,char * buffer,int * len,off_t * begin,off_t offset,int size)652 static int cobalt_proc_infos(unsigned char *nvram, char *buffer, int *len,
653 	off_t *begin, off_t offset, int size)
654 {
655 	int i;
656 	unsigned int checksum;
657 	unsigned int flags;
658 	char sernum[14];
659 	char *key = "cNoEbTaWlOtR!";
660 	unsigned char bto_csum;
661 
662 	spin_lock_irq(&rtc_lock);
663 	checksum = __nvram_check_checksum();
664 	spin_unlock_irq(&rtc_lock);
665 
666 	PRINT_PROC("Checksum status: %svalid\n", checksum ? "" : "not ");
667 
668 	flags = nvram[COBT_CMOS_FLAG_BYTE_0] << 8
669 	    | nvram[COBT_CMOS_FLAG_BYTE_1];
670 
671 	PRINT_PROC("Console: %s\n",
672 		flags & COBT_CMOS_CONSOLE_FLAG ?  "on": "off");
673 
674 	PRINT_PROC("Firmware Debug Messages: %s\n",
675 		flags & COBT_CMOS_DEBUG_FLAG ? "on": "off");
676 
677 	PRINT_PROC("Auto Prompt: %s\n",
678 		flags & COBT_CMOS_AUTO_PROMPT_FLAG ? "on": "off");
679 
680 	PRINT_PROC("Shutdown Status: %s\n",
681 		flags & COBT_CMOS_CLEAN_BOOT_FLAG ? "clean": "dirty");
682 
683 	PRINT_PROC("Hardware Probe: %s\n",
684 		flags & COBT_CMOS_HW_NOPROBE_FLAG ? "partial": "full");
685 
686 	PRINT_PROC("System Fault: %sdetected\n",
687 		flags & COBT_CMOS_SYSFAULT_FLAG ? "": "not ");
688 
689 	PRINT_PROC("Panic on OOPS: %s\n",
690 		flags & COBT_CMOS_OOPSPANIC_FLAG ? "yes": "no");
691 
692 	PRINT_PROC("Delayed Cache Initialization: %s\n",
693 		flags & COBT_CMOS_DELAY_CACHE_FLAG ? "yes": "no");
694 
695 	PRINT_PROC("Show Logo at Boot: %s\n",
696 		flags & COBT_CMOS_NOLOGO_FLAG ? "no": "yes");
697 
698 	PRINT_PROC("Boot Method: ");
699 	switch (nvram[COBT_CMOS_BOOT_METHOD]) {
700 	case COBT_CMOS_BOOT_METHOD_DISK:
701 		PRINT_PROC("disk\n");
702 		break;
703 
704 	case COBT_CMOS_BOOT_METHOD_ROM:
705 		PRINT_PROC("rom\n");
706 		break;
707 
708 	case COBT_CMOS_BOOT_METHOD_NET:
709 		PRINT_PROC("net\n");
710 		break;
711 
712 	default:
713 		PRINT_PROC("unknown\n");
714 		break;
715 	}
716 
717 	PRINT_PROC("Primary Boot Device: %d:%d\n",
718 		nvram[COBT_CMOS_BOOT_DEV0_MAJ],
719 		nvram[COBT_CMOS_BOOT_DEV0_MIN] );
720 	PRINT_PROC("Secondary Boot Device: %d:%d\n",
721 		nvram[COBT_CMOS_BOOT_DEV1_MAJ],
722 		nvram[COBT_CMOS_BOOT_DEV1_MIN] );
723 	PRINT_PROC("Tertiary Boot Device: %d:%d\n",
724 		nvram[COBT_CMOS_BOOT_DEV2_MAJ],
725 		nvram[COBT_CMOS_BOOT_DEV2_MIN] );
726 
727 	PRINT_PROC("Uptime: %d\n",
728 		nvram[COBT_CMOS_UPTIME_0] << 24 |
729 		nvram[COBT_CMOS_UPTIME_1] << 16 |
730 		nvram[COBT_CMOS_UPTIME_2] << 8  |
731 		nvram[COBT_CMOS_UPTIME_3]);
732 
733 	PRINT_PROC("Boot Count: %d\n",
734 		nvram[COBT_CMOS_BOOTCOUNT_0] << 24 |
735 		nvram[COBT_CMOS_BOOTCOUNT_1] << 16 |
736 		nvram[COBT_CMOS_BOOTCOUNT_2] << 8  |
737 		nvram[COBT_CMOS_BOOTCOUNT_3]);
738 
739 	/* 13 bytes of serial num */
740 	for (i=0 ; i<13 ; i++) {
741 		sernum[i] = nvram[COBT_CMOS_SYS_SERNUM_0 + i];
742 	}
743 	sernum[13] = '\0';
744 
745 	checksum = 0;
746 	for (i=0 ; i<13 ; i++) {
747 		checksum += sernum[i] ^ key[i];
748 	}
749 	checksum = ((checksum & 0x7f) ^ (0xd6)) & 0xff;
750 
751 	PRINT_PROC("Serial Number: %s", sernum);
752 	if (checksum != nvram[COBT_CMOS_SYS_SERNUM_CSUM]) {
753 		PRINT_PROC(" (invalid checksum)");
754 	}
755 	PRINT_PROC("\n");
756 
757 	PRINT_PROC("Rom Revison: %d.%d.%d\n", nvram[COBT_CMOS_ROM_REV_MAJ],
758 		nvram[COBT_CMOS_ROM_REV_MIN], nvram[COBT_CMOS_ROM_REV_REV]);
759 
760 	PRINT_PROC("BTO Server: %d.%d.%d.%d", nvram[COBT_CMOS_BTO_IP_0],
761 		nvram[COBT_CMOS_BTO_IP_1], nvram[COBT_CMOS_BTO_IP_2],
762 		nvram[COBT_CMOS_BTO_IP_3]);
763 	bto_csum = nvram[COBT_CMOS_BTO_IP_0] + nvram[COBT_CMOS_BTO_IP_1]
764 		+ nvram[COBT_CMOS_BTO_IP_2] + nvram[COBT_CMOS_BTO_IP_3];
765 	if (bto_csum != nvram[COBT_CMOS_BTO_IP_CSUM]) {
766 		PRINT_PROC(" (invalid checksum)");
767 	}
768 	PRINT_PROC("\n");
769 
770 	if (flags & COBT_CMOS_VERSION_FLAG
771 	 && nvram[COBT_CMOS_VERSION] >= COBT_CMOS_VER_BTOCODE) {
772 		PRINT_PROC("BTO Code: 0x%x\n",
773 			nvram[COBT_CMOS_BTO_CODE_0] << 24 |
774 			nvram[COBT_CMOS_BTO_CODE_1] << 16 |
775 			nvram[COBT_CMOS_BTO_CODE_2] << 8 |
776 			nvram[COBT_CMOS_BTO_CODE_3]);
777 	}
778 
779 	return 1;
780 }
781 #endif /* CONFIG_PROC_FS */
782 
783 #endif /* MACH == COBALT */
784 
785 #if MACH == ATARI
786 
787 static int
atari_check_checksum(void)788 atari_check_checksum(void)
789 {
790 	int i;
791 	unsigned char sum = 0;
792 
793 	for (i = ATARI_CKS_RANGE_START; i <= ATARI_CKS_RANGE_END; ++i)
794 		sum += __nvram_read_byte(i);
795 	return (__nvram_read_byte(ATARI_CKS_LOC) == (~sum & 0xff) &&
796 	    __nvram_read_byte(ATARI_CKS_LOC + 1) == (sum & 0xff));
797 }
798 
799 static void
atari_set_checksum(void)800 atari_set_checksum(void)
801 {
802 	int i;
803 	unsigned char sum = 0;
804 
805 	for (i = ATARI_CKS_RANGE_START; i <= ATARI_CKS_RANGE_END; ++i)
806 		sum += __nvram_read_byte(i);
807 	__nvram_write_byte(~sum, ATARI_CKS_LOC);
808 	__nvram_write_byte(sum, ATARI_CKS_LOC + 1);
809 }
810 
811 #ifdef CONFIG_PROC_FS
812 
813 static struct {
814 	unsigned char val;
815 	char *name;
816 } boot_prefs[] = {
817 	{ 0x80, "TOS" },
818 	{ 0x40, "ASV" },
819 	{ 0x20, "NetBSD (?)" },
820 	{ 0x10, "Linux" },
821 	{ 0x00, "unspecified" }
822 };
823 
824 static char *languages[] = {
825 	"English (US)",
826 	"German",
827 	"French",
828 	"English (UK)",
829 	"Spanish",
830 	"Italian",
831 	"6 (undefined)",
832 	"Swiss (French)",
833 	"Swiss (German)"
834 };
835 
836 static char *dateformat[] = {
837 	"MM%cDD%cYY",
838 	"DD%cMM%cYY",
839 	"YY%cMM%cDD",
840 	"YY%cDD%cMM",
841 	"4 (undefined)",
842 	"5 (undefined)",
843 	"6 (undefined)",
844 	"7 (undefined)"
845 };
846 
847 static char *colors[] = {
848 	"2", "4", "16", "256", "65536", "??", "??", "??"
849 };
850 
851 #define fieldsize(a)	(sizeof(a)/sizeof(*a))
852 
853 static int
atari_proc_infos(unsigned char * nvram,char * buffer,int * len,off_t * begin,off_t offset,int size)854 atari_proc_infos(unsigned char *nvram, char *buffer, int *len,
855     off_t *begin, off_t offset, int size)
856 {
857 	int checksum = nvram_check_checksum();
858 	int i;
859 	unsigned vmode;
860 
861 	PRINT_PROC("Checksum status  : %svalid\n", checksum ? "" : "not ");
862 
863 	PRINT_PROC("Boot preference  : ");
864 	for (i = fieldsize(boot_prefs) - 1; i >= 0; --i) {
865 		if (nvram[1] == boot_prefs[i].val) {
866 			PRINT_PROC("%s\n", boot_prefs[i].name);
867 			break;
868 		}
869 	}
870 	if (i < 0)
871 		PRINT_PROC("0x%02x (undefined)\n", nvram[1]);
872 
873 	PRINT_PROC("SCSI arbitration : %s\n",
874 	    (nvram[16] & 0x80) ? "on" : "off");
875 	PRINT_PROC("SCSI host ID     : ");
876 	if (nvram[16] & 0x80)
877 		PRINT_PROC("%d\n", nvram[16] & 7);
878 	else
879 		PRINT_PROC("n/a\n");
880 
881 	/* the following entries are defined only for the Falcon */
882 	if ((atari_mch_cookie >> 16) != ATARI_MCH_FALCON)
883 		return 1;
884 
885 	PRINT_PROC("OS language      : ");
886 	if (nvram[6] < fieldsize(languages))
887 		PRINT_PROC("%s\n", languages[nvram[6]]);
888 	else
889 		PRINT_PROC("%u (undefined)\n", nvram[6]);
890 	PRINT_PROC("Keyboard language: ");
891 	if (nvram[7] < fieldsize(languages))
892 		PRINT_PROC("%s\n", languages[nvram[7]]);
893 	else
894 		PRINT_PROC("%u (undefined)\n", nvram[7]);
895 	PRINT_PROC("Date format      : ");
896 	PRINT_PROC(dateformat[nvram[8] & 7],
897 	    nvram[9] ? nvram[9] : '/', nvram[9] ? nvram[9] : '/');
898 	PRINT_PROC(", %dh clock\n", nvram[8] & 16 ? 24 : 12);
899 	PRINT_PROC("Boot delay       : ");
900 	if (nvram[10] == 0)
901 		PRINT_PROC("default");
902 	else
903 		PRINT_PROC("%ds%s\n", nvram[10],
904 		    nvram[10] < 8 ? ", no memory test" : "");
905 
906 	vmode = (nvram[14] << 8) || nvram[15];
907 	PRINT_PROC("Video mode       : %s colors, %d columns, %s %s monitor\n",
908 	    colors[vmode & 7],
909 	    vmode & 8 ? 80 : 40,
910 	    vmode & 16 ? "VGA" : "TV", vmode & 32 ? "PAL" : "NTSC");
911 	PRINT_PROC("                   %soverscan, compat. mode %s%s\n",
912 	    vmode & 64 ? "" : "no ",
913 	    vmode & 128 ? "on" : "off",
914 	    vmode & 256 ?
915 	    (vmode & 16 ? ", line doubling" : ", half screen") : "");
916 
917 	return 1;
918 }
919 #endif
920 
921 #endif /* MACH == ATARI */
922 
923 MODULE_LICENSE("GPL");
924 
925 EXPORT_SYMBOL(__nvram_read_byte);
926 EXPORT_SYMBOL(nvram_read_byte);
927 EXPORT_SYMBOL(__nvram_write_byte);
928 EXPORT_SYMBOL(nvram_write_byte);
929 EXPORT_SYMBOL(__nvram_check_checksum);
930 EXPORT_SYMBOL(nvram_check_checksum);
931 EXPORT_SYMBOL(__nvram_set_checksum);
932 EXPORT_SYMBOL(nvram_set_checksum);
933