Code:

RTC.C // VisualBoyAdvance - Nintendo Gameboy/GameboyAdvance (TM) emulator. // Copyright (C) 1999-2003 Forgotten // Copyright (C) 2005 Forgotten and the VBA development team // This program is free software; you can redistribute it and/or modify // it under the terms of the GNU General Public License as published by // the Free Software Foundation; either version 2, or(at your option) // any later version. // // This program is distributed in the hope that it will be useful, // but WITHOUT ANY WARRANTY; without even the implied warranty of // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the // GNU General Public License for more details. // // You should have received a copy of the GNU General Public License // along with this program; if not, write to the Free Software Foundation, // Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. #include "ipc.h" #include "System.h" #include "GBA.h" #include "Globals.h" #include "Port.h" #include "Util.h" #include "NLS.h" #include <time.h> #include <nds/memory.h>//#include <memory.h> ichfly #include <nds/ndstypes.h> #include <nds/memory.h> #include <nds/bios.h> #include <nds/system.h> #include <nds/arm9/math.h> #include <nds/arm9/video.h> #include <nds/arm9/videoGL.h> #include <nds/arm9/trig_lut.h> #include <nds/arm9/sassert.h> enum RTCSTATE { IDLE, COMMAND, DATA, READDATA }; typedef struct { u8 byte0; u8 byte1; u8 byte2; u8 command; int dataLen; int bits; RTCSTATE state; u8 data[12]; // reserved variables for future u8 reserved[12]; bool reserved2; u32 reserved3; } RTCCLOCKDATA; static RTCCLOCKDATA rtcClockData; static bool rtcEnabled = false; void rtcEnable(bool e) { rtcEnabled = e; } bool rtcIsEnabled() { return rtcEnabled; } u16 rtcRead(u32 address) { if(rtcEnabled) { if(address == 0x80000c8) return rtcClockData.byte2; else if(address == 0x80000c6) return rtcClockData.byte1; else if(address == 0x80000c4) { return rtcClockData.byte0; } } return READ16LE((&rom[address & 0x1FFFFFE])); //your little endian u16 read from gba map gets replaced here } static u8 toBCD(u8 value) { value = value % 100; int l = value % 10; int h = value / 10; return h * 16 + l; } bool rtcWrite(u32 address, u16 value) { if(!rtcEnabled) return false; if(address == 0x80000c8) { rtcClockData.byte2 = (u8)value; // enable ? } else if(address == 0x80000c6) { rtcClockData.byte1 = (u8)value; // read/write } else if(address == 0x80000c4) { if(rtcClockData.byte2 & 1) { if(rtcClockData.state == IDLE && rtcClockData.byte0 == 1 && value == 5) { rtcClockData.state = COMMAND; rtcClockData.bits = 0; rtcClockData.command = 0; } else if(!(rtcClockData.byte0 & 1) && (value & 1)) { // bit transfer rtcClockData.byte0 = (u8)value; switch(rtcClockData.state) { case COMMAND: rtcClockData.command |= ((value & 2) >> 1) << (7-rtcClockData.bits); rtcClockData.bits++; if(rtcClockData.bits == 8) { rtcClockData.bits = 0; switch(rtcClockData.command) { case 0x60: // not sure what this command does but it doesn't take parameters // maybe it is a reset or stop rtcClockData.state = IDLE; rtcClockData.bits = 0; break; case 0x62: // this sets the control state but not sure what those values are rtcClockData.state = READDATA; rtcClockData.dataLen = 1; break; case 0x63: rtcClockData.dataLen = 1; rtcClockData.data[0] = 0x40; rtcClockData.state = DATA; break; case 0x64: break; case 0x65: { /* struct tm *newtime; time_t long_time; time( &long_time ); // Get time as long integer. newtime = localtime( &long_time );// Convert to local time. rtcClockData.dataLen = 7; rtcClockData.data[0] = toBCD(newtime->tm_year); rtcClockData.data[1] = toBCD(newtime->tm_mon+1); rtcClockData.data[2] = toBCD(newtime->tm_mday); rtcClockData.data[3] = toBCD(newtime->tm_wday); rtcClockData.data[4] = toBCD(newtime->tm_hour); rtcClockData.data[5] = toBCD(newtime->tm_min); rtcClockData.data[6] = toBCD(newtime->tm_sec); rtcClockData.state = DATA; */ //coto: own IPC. rtcClockData.dataLen = 7; rtcClockData.data[0] = toBCD(gba_get_yearbytertc()); rtcClockData.data[1] = toBCD(gba_get_monthrtc()); rtcClockData.data[2] = toBCD(gba_get_dayrtc()); rtcClockData.data[3] = toBCD(gba_get_dayofweekrtc()); rtcClockData.data[4] = toBCD(gba_get_hourrtc()); rtcClockData.data[5] = toBCD(gba_get_minrtc()); rtcClockData.data[6] = toBCD(gba_get_secrtc()); rtcClockData.state = DATA; } break; case 0x67: { /* struct tm *newtime; time_t long_time; time( &long_time ); // Get time as long integer. newtime = localtime( &long_time ); // Convert to local time. rtcClockData.dataLen = 3; rtcClockData.data[0] = toBCD(newtime->tm_hour); rtcClockData.data[1] = toBCD(newtime->tm_min); rtcClockData.data[2] = toBCD(newtime->tm_sec); rtcClockData.state = DATA; */ //coto: own IPC. rtcClockData.dataLen = 3; rtcClockData.data[0] = toBCD(gba_get_hourrtc()); rtcClockData.data[1] = toBCD(gba_get_minrtc()); rtcClockData.data[2] = toBCD(gba_get_secrtc()); rtcClockData.state = DATA; } break; default: systemMessage(0, N_("Unknown RTC command %02x"), rtcClockData.command); rtcClockData.state = IDLE; break; } } break; case DATA: if(rtcClockData.byte1 & 2) { } else { rtcClockData.byte0 = (rtcClockData.byte0 & ~2) | ((rtcClockData.data[rtcClockData.bits >> 3] >> (rtcClockData.bits & 7)) & 1)*2; rtcClockData.bits++; if(rtcClockData.bits == 8*rtcClockData.dataLen) { rtcClockData.bits = 0; rtcClockData.state = IDLE; } } break; case READDATA: if(!(rtcClockData.byte1 & 2)) { } else { rtcClockData.data[rtcClockData.bits >> 3] = (rtcClockData.data[rtcClockData.bits >> 3] >> 1) | ((value << 6) & 128); rtcClockData.bits++; if(rtcClockData.bits == 8*rtcClockData.dataLen) { rtcClockData.bits = 0; rtcClockData.state = IDLE; } } break; default: break; } } else rtcClockData.byte0 = (u8)value; } } return true; } void rtcReset() { memset(&rtcClockData, 0, sizeof(rtcClockData)); rtcClockData.byte0 = 0; rtcClockData.byte1 = 0; rtcClockData.byte2 = 0; rtcClockData.command = 0; rtcClockData.dataLen = 0; rtcClockData.bits = 0; rtcClockData.state = IDLE; }