Previous 199869 Revisions Next

r17468 Saturday 25th August, 2012 at 17:27:38 UTC by Angelo Salese
Give the RTC some life
[src/emu/machine]s3520cf.c s3520cf.h

trunk/src/emu/machine/s3520cf.c
r17467r17468
66
77TODO:
88- kludge on address?
9- SRAM hook-ups;
10- SRAM load/save;
11- system bits;
912
1013***************************************************************************/
1114
r17467r17468
3639
3740}
3841
42void s3520cf_device::timer_callback()
43{
44   static const UINT8 dpm[12] = { 0x31, 0x28, 0x31, 0x30, 0x31, 0x30, 0x31, 0x31, 0x30, 0x31, 0x30, 0x31 };
45   int dpm_count;
3946
47   m_rtc.sec++;
48
49   if((m_rtc.sec & 0x0f) >= 0x0a)            { m_rtc.sec+=0x10; m_rtc.sec&=0xf0; }
50   if((m_rtc.sec & 0xf0) >= 0x60)            { m_rtc.min++; m_rtc.sec = 0; }
51   if((m_rtc.min & 0x0f) >= 0x0a)            { m_rtc.min+=0x10; m_rtc.min&=0xf0; }
52   if((m_rtc.min & 0xf0) >= 0x60)            { m_rtc.hour++; m_rtc.min = 0; }
53   if((m_rtc.hour & 0x0f) >= 0x0a)            { m_rtc.hour+=0x10; m_rtc.hour&=0xf0; }
54   if((m_rtc.hour & 0xff) >= 0x24)            { m_rtc.day++; m_rtc.wday++; m_rtc.hour = 0; }
55   if(m_rtc.wday >= 7)                     { m_rtc.wday = 0; }
56   if((m_rtc.day & 0x0f) >= 0x0a)            { m_rtc.day+=0x10; m_rtc.day&=0xf0; }
57
58   /* TODO: crude leap year support */
59   dpm_count = (m_rtc.month & 0xf) + (((m_rtc.month & 0x10) >> 4)*10)-1;
60
61   if(((m_rtc.year % 4) == 0) && m_rtc.month == 2)
62   {
63      if((m_rtc.day & 0xff) >= dpm[dpm_count]+1+1)
64         { m_rtc.month++; m_rtc.day = 0x01; }
65   }
66   else if((m_rtc.day & 0xff) >= dpm[dpm_count]+1){ m_rtc.month++; m_rtc.day = 0x01; }
67   if((m_rtc.month & 0x0f) >= 0x0a)         { m_rtc.month = 0x10; }
68   if(m_rtc.month >= 0x13)                  { m_rtc.year++; m_rtc.month = 1; }
69   if((m_rtc.year & 0x0f) >= 0x0a)            { m_rtc.year+=0x10; m_rtc.year&=0xf0; }
70   if((m_rtc.year & 0xf0) >= 0xa0)            { m_rtc.year = 0; } //1901-2000 possible timeframe
71}
72
73TIMER_CALLBACK( s3520cf_device::rtc_inc_callback )
74{
75   reinterpret_cast<s3520cf_device *>(ptr)->timer_callback();
76}
77
4078//-------------------------------------------------
4179//  device_validity_check - perform validity checks
4280//  on this device
r17467r17468
5391
5492void s3520cf_device::device_start()
5593{
94   /* let's call the timer callback every second for now */
95   machine().scheduler().timer_pulse(attotime::from_hz(clock() / XTAL_32_768kHz), FUNC(rtc_inc_callback), 0, (void *)this);
5696
97   system_time systime;
98   machine().base_datetime(systime);
99
100   m_rtc.day = ((systime.local_time.mday / 10)<<4) | ((systime.local_time.mday % 10) & 0xf);
101   m_rtc.month = (((systime.local_time.month+1) / 10) << 4) | (((systime.local_time.month+1) % 10) & 0xf);
102   m_rtc.wday = systime.local_time.weekday;
103   m_rtc.year = (((systime.local_time.year % 100)/10)<<4) | ((systime.local_time.year % 10) & 0xf);
104   m_rtc.hour = ((systime.local_time.hour / 10)<<4) | ((systime.local_time.hour % 10) & 0xf);
105   m_rtc.min = ((systime.local_time.minute / 10)<<4) | ((systime.local_time.minute % 10) & 0xf);
106   m_rtc.sec = ((systime.local_time.second / 10)<<4) | ((systime.local_time.second % 10) & 0xf);
57107}
58108
59109
r17467r17468
63113
64114void s3520cf_device::device_reset()
65115{
116   m_mode = 0;
66117}
67118
68119//-------------------------------------------------
r17467r17468
75126
76127   res = 0;
77128
78   switch(offset)
129   if(m_mode != 0)
79130   {
80//      case 0: // 1 sec
81//      case 1: // 10 sec
82//      case 2: // 1 min
83//      case 3: // 10 min
84//      case 6: // week
85//      case 7: // 1 day
86      case 4: // 1 hour
87         res = 1;
88         break;
89      case 5: // 10 hour
90         res = 2;
91         break;
131      if(offset == 0xf)
132         res = (m_sysr << 3) | m_mode;
133      else
134      {
135         res = 0;
136         printf("Warning: S-3520CF RTC reads SRAM %02x %02x\n",offset,m_mode);
137      }
92138   }
139   else
140   {
141      switch(offset)
142      {
143         case 0x0: res = m_rtc.sec & 0xf; break;
144         case 0x1: res = m_rtc.sec >> 4; break;
145         case 0x2: res = m_rtc.min & 0xf; break;
146         case 0x3: res = m_rtc.min >> 4; break;
147         case 0x4: res = m_rtc.hour & 0xf; break;
148         case 0x5: res = m_rtc.hour >> 4; break;
149         case 0x6: res = m_rtc.wday & 0xf; break;
150         case 0x7: res = m_rtc.day & 0xf; break;
151         case 0x8: res = m_rtc.day >> 4; break;
152         case 0x9: res = m_rtc.month & 0xf; break;
153         case 0xa: res = m_rtc.month >> 4; break;
154         case 0xb: res = m_rtc.year & 0xf; break;
155         case 0xc: res = m_rtc.year >> 4; break;
156      }
157   }
93158
94
95
96159   return res;
97160}
98161
99162inline void s3520cf_device::rtc_write(UINT8 offset,UINT8 data)
100163{
101
164   if(offset == 0xf)
165   {
166      m_mode = data & 3;
167      m_sysr = (data & 8) >> 3;
168      printf("%02x\n",data);
169   }
170   else
171   {
172      if(m_mode != 0)
173         printf("Warning: S-3520CF RTC writes SRAM %02x %d\n",offset,m_mode);
174   }
102175}
103176
104177
r17467r17468
154227
155228            if(m_cmd_stream_pos == 4)
156229            {
157               m_rtc_addr = (m_current_cmd + 1) & 0xf; /* TODO: +1??? */
230               m_rtc_addr = (m_current_cmd) & 0xf;
158231               m_rtc_state = RTC_SET_DATA;
159232               m_cmd_stream_pos = 0;
160233               m_current_cmd = 0;
r17467r17468
167240               {
168241                  //printf("%02x %d\n",m_rtc_addr,m_cmd_stream_pos);
169242               }
170               m_read_latch = (rtc_read(m_rtc_addr) >> (m_cmd_stream_pos)) & 1;
243               m_read_latch = (rtc_read((m_rtc_addr+1) & 0xf) >> (m_cmd_stream_pos)) & 1; /* TODO: +1??? */
171244            }
172245
173246            m_current_cmd = (m_current_cmd >> 1) | ((m_latch<<3)&8);
r17467r17468
176249            {
177250               if(m_dir == 0) // WRITE
178251               {
179                  printf("%02x %02x\n",m_rtc_addr,m_current_cmd);
180                  rtc_write(m_rtc_addr,m_current_cmd);
252                  //printf("%02x %02x\n",m_rtc_addr,m_current_cmd);
253                  rtc_write((m_rtc_addr - 1) & 0xf,m_current_cmd); /* TODO: -1??? */
181254               }
182255
183256               m_rtc_addr = m_current_cmd;
trunk/src/emu/machine/s3520cf.h
r17467r17468
2929   RTC_SET_DATA
3030} s3520cf_state_t;
3131
32typedef struct
33{
34   UINT8 sec, min, hour, day, wday, month, year;
35} rtc_regs_t;
3236
37
3338// ======================> s3520cf_device
3439
3540class s3520cf_device :   public device_t
r17467r17468
4449   WRITE_LINE_MEMBER( set_cs_line );
4550   WRITE_LINE_MEMBER( set_clock_line );
4651   WRITE_LINE_MEMBER( write_bit );
52   void timer_callback();
4753
4854protected:
4955   // device-level overrides
r17467r17468
5359   inline UINT8 rtc_read(UINT8 offset);
5460   inline void rtc_write(UINT8 offset,UINT8 data);
5561
62   static TIMER_CALLBACK( rtc_inc_callback );
63
5664   int m_dir;
5765   int m_latch;
5866   int m_reset_line;
r17467r17468
6068   UINT8 m_current_cmd;
6169   UINT8 m_cmd_stream_pos;
6270   UINT8 m_rtc_addr;
71   UINT8 m_mode, m_sysr;
6372
6473   s3520cf_state_t m_rtc_state;
74   rtc_regs_t m_rtc;
6575
6676};
6777

Previous 199869 Revisions Next

© 1997-2024 The MAME Team