1
0
mirror of https://frontier.innolan.net/rainlance/amiga-tz.git synced 2025-11-20 23:00:53 +00:00
Files
amiga-tz/date_patch.c
2015-06-22 23:49:55 +02:00

134 lines
3.6 KiB
C

/*
* Copyright (c) 2015 Carsten Larsen
* All rights reserved.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
*
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
*
*/
#include "private.h"
#include "amiga_tz.h"
#include "version.h"
const char *vers = "\0$VER: datepatch" AMIGA_VERSION;
struct Library *BattClockBase;
struct Library *DOSBase = NULL;
struct Library *UtilityBase = NULL;
struct Library *LocaleBase = NULL;
void amiga_open_lib_error(char *name, int version)
{
printf(OPEN_VER_ERROR, name, version);
printf(REQ_ERROR);
}
int amiga_open_libs()
{
if(!(DOSBase = OpenLibrary(DOSLIB_NAME, DOSLIB_REV))) {
amiga_open_lib_error(DOSLIB_NAME, DOSLIB_REV);
return 1;
}
if(!(LocaleBase = OpenLibrary(LOCALELIB_NAME, LOCALELIB_REV))) {
amiga_open_lib_error(LOCALELIB_NAME, LOCALELIB_REV);
return 1;
}
if(!(UtilityBase = OpenLibrary(UTILLIB_NAME, UTILLIB_REV))) {
amiga_open_lib_error(UTILLIB_NAME, UTILLIB_REV);
return 1;
}
BattClockBase = OpenResource(BATTCLOCK_NAME);
if (!(BattClockBase = OpenResource(BATTCLOCK_NAME))) {
printf(OPEN_ERROR, BATTCLOCK_NAME);
return 1;
}
return 0;
}
void amiga_close_libs()
{
if (LocaleBase != NULL) {
CloseLibrary(LocaleBase);
LocaleBase = NULL;
}
if (UtilityBase != NULL) {
CloseLibrary(UtilityBase);
UtilityBase = NULL;
}
if (DOSBase != NULL) {
CloseLibrary(DOSBase);
DOSBase = NULL;
}
}
void PatchedWriteBattClock(unsigned long time)
{
WriteBattClock(time - get_gmtoffset());
}
ULONG PatchedReadBattClock(void)
{
return ReadBattClock() + get_gmtoffset();
}
struct Locale *PatchedOpenLocale(STRPTR name)
{
struct Locale *locale = OpenLocale(name);
if (name == NULL) {
locale->loc_GMTOffset = get_gmtoffset() / 60;
}
return locale;
}
void amiga_patch_libs()
{
Forbid();
SetFunction(BattClockBase,(long)&ReadBattClock,(unsigned long (*)())PatchedReadBattClock);
SetFunction(BattClockBase,(long)&WriteBattClock,(unsigned long (*)())PatchedWriteBattClock);
SetFunction(LocaleBase,(long)&OpenLocale,(unsigned long (*)())PatchedOpenLocale);
Permit();
((struct CommandLineInterface *)BADDR(((struct Process *)FindTask(NULL))->pr_CLI))->cli_Module=NULL;
}
int
main(const int argc, char *argv[])
{
struct timeval tv;
amiga_open_libs();
amiga_patch_libs();
tv.tv_sec = (long)PatchedReadBattClock();
tv.tv_usec = 0;
settime(&tv);
amiga_close_libs();
}