1997/0404/carrera/devrtc.c (diff list | history)

1997/0403/sys/src/9/carrera/devrtc.c:20,28 – 1997/0404/sys/src/9/carrera/devrtc.c:20,26 (short | long | prev | next)
1993/0916		int mon; int year; };
1997/0327		static QLock rtclock; /* mutex on clock operations */
1993/0916
1995/0108		enum {
1993/0916		Qrtc = 1,
1997/0403/sys/src/9/carrera/devrtc.c:39,49 – 1997/0404/sys/src/9/carrera/devrtc.c:37,52
1997/0403		StatusC= 0x0C, StatusD= 0x0D,
1993/0916
1997/0404		Update= 0x80,
1993/0916		Nvsize = 4096,
1997/0403		Nclock= 6,
1993/0916		};
1997/0404		#define GETBCD(v) (((v) & 0x0F) + 10*((v)>>4)) #define PUTBCD(v) ((v) % 10)|((((v)/10) % 10)<<4)
1993/0916		Dirtab rtcdir[]={ "nvram", {Qnvram, 0}, Nvsize, 0664, "rtc", {Qrtc, 0}, 0, 0664,
1997/0403/sys/src/9/carrera/devrtc.c:52,61 – 1997/0404/sys/src/9/carrera/devrtc.c:55,65
1997/0327		static ulong rtc2sec(Rtc*); static void sec2rtc(ulong, Rtc*);
1993/0916
1997/0403		static uchar statusB;
1997/0404		static int isbinary; static Lock rtclock;
1997/0403		static void getstatusB(void)
1997/0404		rtcreset(void)
1997/0403		{ int i, x; uchar r;
1997/0403/sys/src/9/carrera/devrtc.c:68,74 – 1997/0404/sys/src/9/carrera/devrtc.c:72,78
1997/0403		continue; *(uchar*)Rtcindex = x|StatusB; statusB = *(uchar*)Rtcdata;
1997/0404		isbinary = *(uchar*)Rtcdata & 0x04;
1997/0403		break; } }
1997/0403/sys/src/9/carrera/devrtc.c:76,82 – 1997/0404/sys/src/9/carrera/devrtc.c:80,85
1997/0327		static Chan*
1993/0916		rtcattach(char *spec) {
1997/0403		getstatusB();
1993/0916		return devattach('r', spec); }
1997/0403/sys/src/9/carrera/devrtc.c:114,219 – 1997/0404/sys/src/9/carrera/devrtc.c:117,167
1993/0916		USED(c); } static uchar bcd2binary(int reg) { uchar x;
1994/0225
1993/0916		x = (*(uchar*)Rtcindex)&~0x7f; *(uchar*)Rtcindex = x|reg; x = *(uchar*)Rtcdata; return (x&0xf) + 10*(x>>4); }
1997/0403		#define GETBCD(o) ((clock[o]&0xf) + 10*(clock[o]>>4))                  static void dumprtcstatus(void) { int i, x; uchar status[4], r;                  for(i = 0; i < 10000; i++){ x = (*(uchar*)Rtcindex)&~0x7f; *(uchar*)Rtcindex = x|Status; r = *(uchar*)Rtcdata; if(r & 0x80) continue;                  status[0] = r; *(uchar*)Rtcindex = x|StatusB; status[1] = *(uchar*)Rtcdata; *(uchar*)Rtcindex = x|StatusC; status[2] = *(uchar*)Rtcdata; *(uchar*)Rtcindex = x|StatusD; status[3] = *(uchar*)Rtcdata;                  *(uchar*)Rtcindex = x|Status; r = *(uchar*)Rtcdata; if((r & 0x80) == 0) break; }                  print("RTC: %uX %uX %uX %uX\n", status[0], status[1], status[2], status[3]); }
1997/0401		static long _rtctime(void)
1993/0916		{ Rtc rtc;
1997/0401		int i, x;
1997/0403		uchar clock[Nclock], r; int busy;
1997/0404		uchar r;
1993/0916
1997/0403		/* don't do the read until the clock is no longer busy */ busy = 0;
1997/0401		for(i = 0; i < 10000; i++){ x = (*(uchar*)Rtcindex)&~0x7f; *(uchar*)Rtcindex = x|Status;
1997/0403		r = *(uchar*)Rtcdata; if(r & 0x80){ busy++;
1997/0404		if(r & Update)
1997/0401		continue;
1997/0403		}
1993/0916
1997/0403		/* read clock values */ *(uchar*)Rtcindex = x|Seconds; clock[0] = *(uchar*)Rtcdata;
1997/0404		rtc.sec = *(uchar*)Rtcdata;
1997/0403		*(uchar*)Rtcindex = x|Minutes; clock[1] = *(uchar*)Rtcdata;
1997/0404		rtc.min = *(uchar*)Rtcdata;
1997/0403		*(uchar*)Rtcindex = x|Hours; clock[2] = *(uchar*)Rtcdata;
1997/0404		rtc.hour = *(uchar*)Rtcdata;
1997/0403		*(uchar*)Rtcindex = x|Mday; clock[3] = *(uchar*)Rtcdata;
1997/0404		rtc.mday = *(uchar*)Rtcdata;
1997/0403		*(uchar*)Rtcindex = x|Month; clock[4] = *(uchar*)Rtcdata;
1997/0404		rtc.mon = *(uchar*)Rtcdata;
1997/0403		*(uchar*)Rtcindex = x|Year; clock[5] = *(uchar*)Rtcdata;
1997/0404		rtc.year = *(uchar*)Rtcdata;
1997/0401		*(uchar*)Rtcindex = x|Status;
1997/0403		r = *(uchar*)Rtcdata; if((r & 0x80) == 0)
1997/0404		if((r & Update) == 0)
1997/0401		break; }
1997/0403		if(statusB & 0x04){ rtc.sec = clock[0]; rtc.min = clock[1]; rtc.hour = clock[2]; rtc.mday = clock[3]; rtc.mon = clock[4]; rtc.year = clock[5]; } else{
1997/0404		if(!isbinary){
1997/0403		/* * convert from BCD */ rtc.sec = GETBCD(0); rtc.min = GETBCD(1); rtc.hour = GETBCD(2); rtc.mday = GETBCD(3); rtc.mon = GETBCD(4); rtc.year = GETBCD(5);
1997/0404		rtc.sec = GETBCD(rtc.sec); rtc.min = GETBCD(rtc.min); rtc.hour = GETBCD(rtc.hour); rtc.mday = GETBCD(rtc.mday); rtc.mon = GETBCD(rtc.mon); rtc.year = GETBCD(rtc.year);
1997/0403		} /*
1997/0403/sys/src/9/carrera/devrtc.c:224,240 – 1997/0404/sys/src/9/carrera/devrtc.c:172,184
1993/0916		return rtc2sec(&rtc); }
1997/0401		static Lock rtlock;                  long rtctime(void) {
1997/0403		#define notdef #ifdef notdef
1997/0401		int i; long t, ot; ilock(&rtlock);
1997/0404		ilock(&rtclock);
1997/0401		/* loop till we get two reads in a row the same */ t = _rtctime();
1997/0403/sys/src/9/carrera/devrtc.c:244,265 – 1997/0404/sys/src/9/carrera/devrtc.c:188,201
1997/0401		if(ot == t) break; } iunlock(&rtlock);
1997/0404		iunlock(&rtclock);
1997/0401
1997/0403		if(i == 100) print("we are boofheads\n");
1997/0401		return t;
1997/0403		#else extern ulong boottime;                  return boottime+TK2SEC(MACHP(0)->ticks); #endif /* notdef */
1997/0401		}
1997/0327		static long
1993/0916		rtcread(Chan *c, void *buf, long n, ulong offset) {
1997/0401		ulong t;
1993/0916		uchar *f, *to, *e; if(c->qid.path & CHDIR)
1997/0403/sys/src/9/carrera/devrtc.c:267,278 – 1997/0404/sys/src/9/carrera/devrtc.c:203,209
1993/0916		switch(c->qid.path){ case Qrtc:
1997/0401		qlock(&rtclock);
1993/0916		t = rtctime();
1997/0403		dumprtcstatus();
1997/0401		qunlock(&rtclock);
1993/0916		n = readnum(offset, buf, n, t, 12); return n;
1997/0404		return readnum(offset, buf, n, rtctime(), 12);
1993/0916		case Qnvram: if(offset > Nvsize) return -1;
1997/0403/sys/src/9/carrera/devrtc.c:289,308 – 1997/0404/sys/src/9/carrera/devrtc.c:220,225
1993/0916		return 0; } static void binary2bcd(int reg, uchar val) { uchar x;
1997/0403
1993/0916		x = (*(uchar*)Rtcindex)&~0x7f; *(uchar*)Rtcindex = x|reg;
1997/0403		if(statusB & 0x04) *(uchar*)Rtcdata = val; else *(uchar*)Rtcdata = (val % 10) | (((val / 10) % 10)<<4);
1993/0916		}
1997/0327		static long
1993/0916		rtcwrite(Chan *c, void *buf, long n, ulong offset) {
1997/0403/sys/src/9/carrera/devrtc.c:310,316 – 1997/0404/sys/src/9/carrera/devrtc.c:227,233
1993/0916		ulong secs; char *cp, *ep; uchar *f, *t, *e; int s;
1997/0404		uchar x;
1993/0916		USED(c); switch(c->qid.path){
1997/0403/sys/src/9/carrera/devrtc.c:327,345 – 1997/0404/sys/src/9/carrera/devrtc.c:244,280
1993/0916		} secs = strtoul(cp, 0, 0); sec2rtc(secs, &rtc);                  /* * convert to bcd */ s = splhi(); binary2bcd(Seconds, rtc.sec); binary2bcd(Minutes, rtc.min); binary2bcd(Hours, rtc.hour); binary2bcd(Mday, rtc.mday); binary2bcd(Month, rtc.mon);
1997/0401		binary2bcd(Year, rtc.year-1970);
1993/0916		splx(s);
1997/0404		rtc.year -= 1970;
1993/0916
1997/0404		if(!isbinary){ /* * convert to bcd */ rtc.sec = PUTBCD(rtc.sec); rtc.min = PUTBCD(rtc.min); rtc.hour = PUTBCD(rtc.hour); rtc.mday = PUTBCD(rtc.mday); rtc.mon = PUTBCD(rtc.mon); rtc.year = PUTBCD(rtc.year); } ilock(&rtclock); /* set clock values */ x = (*(uchar*)Rtcindex)&~0x7f; *(uchar*)Rtcindex = x|Seconds; *(uchar*)Rtcdata = rtc.sec; *(uchar*)Rtcindex = x|Minutes; *(uchar*)Rtcdata = rtc.min; *(uchar*)Rtcindex = x|Hours; *(uchar*)Rtcdata = rtc.hour; *(uchar*)Rtcindex = x|Mday; *(uchar*)Rtcdata = rtc.mday; *(uchar*)Rtcindex = x|Month; *(uchar*)Rtcdata = rtc.mon; *(uchar*)Rtcindex = x|Year; *(uchar*)Rtcdata = rtc.year; iunlock(&rtclock);
1993/0916		return n; case Qnvram: if(offset > Nvsize)
1997/0403/sys/src/9/carrera/devrtc.c:358,364 – 1997/0404/sys/src/9/carrera/devrtc.c:293,299
1995/0108		}
1997/0327		Dev rtcdevtab = { devreset,
1997/0404		rtcreset,
1997/0327		devinit, rtcattach, devclone,