![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to rtc.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [GnuMach] / Gnu-Mach / i386 / i386at|
Return to rtc.c CVS log | Up to [GnuMach] / Gnu-Mach / i386 / i386at |
1.1.1.2 ! root 1: /* 1.1 root 2: * Mach Operating System 3: * Copyright (c) 1991,1990,1989 Carnegie Mellon University 4: * All Rights Reserved. 1.1.1.2 ! root 5: * 1.1 root 6: * Permission to use, copy, modify and distribute this software and its 7: * documentation is hereby granted, provided that both the copyright 8: * notice and this permission notice appear in all copies of the 9: * software, derivative works or modified versions, and any portions 10: * thereof, and that both notices appear in supporting documentation. 1.1.1.2 ! root 11: * 1.1 root 12: * CARNEGIE MELLON ALLOWS FREE USE OF THIS SOFTWARE IN ITS "AS IS" 13: * CONDITION. CARNEGIE MELLON DISCLAIMS ANY LIABILITY OF ANY KIND FOR 14: * ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE. 1.1.1.2 ! root 15: * 1.1 root 16: * Carnegie Mellon requests users of this software to return to 1.1.1.2 ! root 17: * 1.1 root 18: * Software Distribution Coordinator or [email protected] 19: * School of Computer Science 20: * Carnegie Mellon University 21: * Pittsburgh PA 15213-3890 1.1.1.2 ! root 22: * 1.1 root 23: * any improvements or extensions that they make and grant Carnegie Mellon 24: * the rights to redistribute these changes. 25: */ 26: 27: /* 28: Copyright 1988, 1989 by Intel Corporation, Santa Clara, California. 29: 30: All Rights Reserved 31: 32: Permission to use, copy, modify, and distribute this software and 33: its documentation for any purpose and without fee is hereby 34: granted, provided that the above copyright notice appears in all 35: copies and that both the copyright notice and this permission notice 36: appear in supporting documentation, and that the name of Intel 37: not be used in advertising or publicity pertaining to distribution 38: of the software without specific, written prior permission. 39: 40: INTEL DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE 41: INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, 42: IN NO EVENT SHALL INTEL BE LIABLE FOR ANY SPECIAL, INDIRECT, OR 43: CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM 44: LOSS OF USE, DATA OR PROFITS, WHETHER IN ACTION OF CONTRACT, 45: NEGLIGENCE, OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION 46: WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. 47: */ 48: 49: #include <sys/types.h> 50: #include <sys/time.h> 51: #include <kern/time_out.h> 52: #include <i386/machspl.h> 53: #include <i386at/rtc.h> 54: 55: static unsigned char rtc[RTC_NREG]; 56: static int first_rtcopen_ever = 1; 57: 58: rtcinit() 59: { 60: outb(RTC_ADDR, RTC_A); 61: outb(RTC_DATA, RTC_DIV2 | RTC_RATE6); 62: outb(RTC_ADDR, RTC_B); 63: outb(RTC_DATA, RTC_HM); 64: } 65: 66: 67: int 68: rtcget(regs) 69: unsigned char *regs; 70: { 71: if (first_rtcopen_ever) { 72: rtcinit(); 73: first_rtcopen_ever = 0; 74: } 1.1.1.2 ! root 75: outb(RTC_ADDR, RTC_D); 1.1 root 76: if (inb(RTC_DATA) & RTC_VRT == 0) return(-1); 1.1.1.2 ! root 77: outb(RTC_ADDR, RTC_A); 1.1 root 78: while (inb(RTC_DATA) & RTC_UIP) /* busy wait */ 1.1.1.2 ! root 79: outb(RTC_ADDR, RTC_A); 1.1 root 80: load_rtc(regs); 81: return(0); 1.1.1.2 ! root 82: } 1.1 root 83: 84: rtcput(regs) 85: unsigned char *regs; 86: { 87: register unsigned char x; 88: 89: if (first_rtcopen_ever) { 90: rtcinit(); 91: first_rtcopen_ever = 0; 92: } 93: outb(RTC_ADDR, RTC_B); 94: x = inb(RTC_DATA); 95: outb(RTC_ADDR, RTC_B); 1.1.1.2 ! root 96: outb(RTC_DATA, x | RTC_SET); 1.1 root 97: save_rtc(regs); 98: outb(RTC_ADDR, RTC_B); 1.1.1.2 ! root 99: outb(RTC_DATA, x & ~RTC_SET); 1.1 root 100: } 101: 102: 103: extern struct timeval time; 104: extern struct timezone tz; 105: 106: static int month[12] = {31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31}; 107: 108: yeartoday(year) 109: int year; 110: { 111: return((year%4) ? 365 : 366); 112: } 113: 114: hexdectodec(n) 115: char n; 116: { 117: return(((n>>4)&0x0F)*10 + (n&0x0F)); 118: } 119: 120: char 121: dectohexdec(n) 122: int n; 123: { 124: return((char)(((n/10)<<4)&0xF0) | ((n%10)&0x0F)); 125: } 126: 127: 128: readtodc(tp) 129: u_int *tp; 130: { 131: struct rtc_st rtclk; 132: time_t n; 133: int sec, min, hr, dom, mon, yr; 134: int i, days = 0; 135: spl_t ospl; 136: 137: #ifdef MACH_KERNEL 138: ospl = splclock(); 1.1.1.2 ! root 139: #else /* MACH_KERNEL */ 1.1 root 140: ospl = spl5(); 1.1.1.2 ! root 141: #endif /* MACH_KERNEL */ 1.1 root 142: if (rtcget(&rtclk)) { 143: splx(ospl); 144: return(-1); 145: } 146: splx (ospl); 147: 148: sec = hexdectodec(rtclk.rtc_sec); 149: min = hexdectodec(rtclk.rtc_min); 150: hr = hexdectodec(rtclk.rtc_hr); 151: dom = hexdectodec(rtclk.rtc_dom); 152: mon = hexdectodec(rtclk.rtc_mon); 153: yr = hexdectodec(rtclk.rtc_yr); 154: yr = (yr < 70) ? yr+100 : yr; 155: 156: n = sec + 60 * min + 3600 * hr; 157: n += (dom - 1) * 3600 * 24; 158: 159: if (yeartoday(yr) == 366) 160: month[1] = 29; 161: for (i = mon - 2; i >= 0; i--) 162: days += month[i]; 163: month[1] = 28; 164: for (i = 70; i < yr; i++) 165: days += yeartoday(i); 166: n += days * 3600 * 24; 167: 168: #ifdef MACH_KERNEL 1.1.1.2 ! root 169: #else /* MACH_KERNEL */ 1.1 root 170: n += tz.tz_minuteswest * 60; 171: if (tz.tz_dsttime) 172: n -= 3600; 1.1.1.2 ! root 173: #endif /* MACH_KERNEL */ 1.1 root 174: 175: *tp = n; 176: 177: return(0); 178: } 179: 180: writetodc() 181: { 182: struct rtc_st rtclk; 183: time_t n; 184: int diff, i, j; 185: spl_t ospl; 186: 187: #ifdef MACH_KERNEL 188: ospl = splclock(); 1.1.1.2 ! root 189: #else /* MACH_KERNEL */ 1.1 root 190: ospl = spl5(); 1.1.1.2 ! root 191: #endif /* MACH_KERNEL */ 1.1 root 192: if (rtcget(&rtclk)) { 193: splx(ospl); 194: return(-1); 195: } 196: splx(ospl); 197: 198: #ifdef MACH_KERNEL 199: diff = 0; 1.1.1.2 ! root 200: #else /* MACH_KERNEL */ 1.1 root 201: diff = tz.tz_minuteswest * 60; 202: if (tz.tz_dsttime) 203: diff -= 3600; 1.1.1.2 ! root 204: #endif /* MACH_KERNEL */ 1.1 root 205: n = (time.tv_sec - diff) % (3600 * 24); /* hrs+mins+secs */ 206: rtclk.rtc_sec = dectohexdec(n%60); 207: n /= 60; 208: rtclk.rtc_min = dectohexdec(n%60); 209: rtclk.rtc_hr = dectohexdec(n/60); 210: 211: n = (time.tv_sec - diff) / (3600 * 24); /* days */ 212: rtclk.rtc_dow = (n + 4) % 7; /* 1/1/70 is Thursday */ 213: 214: for (j = 1970, i = yeartoday(j); n >= i; j++, i = yeartoday(j)) 215: n -= i; 216: 217: rtclk.rtc_yr = dectohexdec(j - 1900); 218: 219: if (i == 366) 220: month[1] = 29; 221: for (i = 0; n >= month[i]; i++) 222: n -= month[i]; 223: month[1] = 28; 224: rtclk.rtc_mon = dectohexdec(++i); 225: 226: rtclk.rtc_dom = dectohexdec(++n); 227: 228: #ifdef MACH_KERNEL 229: ospl = splclock(); 1.1.1.2 ! root 230: #else /* MACH_KERNEL */ 1.1 root 231: ospl = spl5(); 1.1.1.2 ! root 232: #endif /* MACH_KERNEL */ 1.1 root 233: rtcput(&rtclk); 234: splx(ospl); 235: 236: return(0); 237: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.