/* $Id$
 * $URL$
 *
 * time plugin
 *
 * Copyright (C) 2003, 2004 Michael Reinelt <michael@reinelt.co.at>
 * Copyright (C) 2004 The LCD4Linux Team <lcd4linux-devel@users.sourceforge.net>
 *
 * This file is part of LCD4Linux.
 *
 * LCD4Linux 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.
 *
 * LCD4Linux 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., 675 Mass Ave, Cambridge, MA 02139, USA.
 *
 */

/* 
 * exported functions:
 *
 * int plugin_init_time (void)
 *  adds some handy time functions
 *
 */


#include "config.h"

#include <time.h>
#include <stdlib.h>
#include <string.h>

#include "debug.h"
#include "plugin.h"


static void my_time(RESULT * result)
{
    double value = time(NULL);
    SetResult(&result, R_NUMBER, &value);
}


static void my_strftime(RESULT * result, RESULT * arg1, RESULT * arg2)
{
    char value[256];
    time_t t = R2N(arg2);

    value[0] = '\0';
    strftime(value, sizeof(value), R2S(arg1), localtime(&t));

    SetResult(&result, R_STRING, value);
}

static void my_stftime_tz(RESULT * result, RESULT * arg1, RESULT * arg2, RESULT * arg3)
{
    char value[256] = "";
    time_t t = R2N(arg2);
    char *tz = R2S(arg3);
    char *old_tz;

    old_tz = getenv("TZ");

    /*
     * because the next setenv() call may overwrite that string, we
     * duplicate it here
     */
    if (old_tz) {
	old_tz = strdup(old_tz);
    }

    setenv("TZ", tz, 1);
    tzset();

    strftime(value, sizeof(value), R2S(arg1), localtime(&t));

    if (old_tz) {
	setenv("TZ", old_tz, 1);
    } else {
	unsetenv("TZ");
    }
    tzset();

    free(old_tz);

    SetResult(&result, R_STRING, value);
}


int plugin_init_time(void)
{

    /* register some basic time functions */
    AddFunction("time", 0, my_time);
    AddFunction("strftime", 2, my_strftime);
    AddFunction("strftime_tz", 3, my_stftime_tz);

    return 0;
}

void plugin_exit_time(void)
{
    /* empty */
}
s.git/log/?id=adc83640b11269a0e3b99aa52869d9a82b9de35b&amp;showmsg=1&amp;follow=1'>root</a>/<a href='/dtv-scan-tables.git/log/dvb-h?id=adc83640b11269a0e3b99aa52869d9a82b9de35b&amp;showmsg=1&amp;follow=1'>dvb-h</a>/<a href='/dtv-scan-tables.git/log/dvb-h/fi-Helsinki?id=adc83640b11269a0e3b99aa52869d9a82b9de35b&amp;showmsg=1&amp;follow=1'>fi-Helsinki</a> (<a href='/dtv-scan-tables.git/log/dvb-h/fi-Helsinki?id=adc83640b11269a0e3b99aa52869d9a82b9de35b&amp;showmsg=1'>unfollow</a>)</div><div class='content'><table class='list nowrap'><tr class='nohover'><th class='left'>Age</th><th class='left'>Commit message (<a href='/dtv-scan-tables.git/log/dvb-h/fi-Helsinki?id=adc83640b11269a0e3b99aa52869d9a82b9de35b&amp;follow=1'>Collapse</a>)</th><th class='left'>Author</th><th class='left'>Files</th><th class='left'>Lines</th></tr>
<tr class='logheader'><td><span title='2011-01-07 13:35:20 +0100'>2011-01-07</span></td><td class='logsubject'><a href='/dtv-scan-tables.git/commit/dvb-c/de-neftv?id=d84b573b32b3dc304754e78fc56f5347f78f7425&amp;follow=1'>update scan file for de-neftv</a></td><td>Christoph Pfister</td><td>1</td><td><span class='deletions'>-5</span>/<span class='insertions'>+16</span></td></tr>
<tr class='nohover-highlight'><td/><td colspan='5' class='logmsg'>
submitted by poempelfox mulder.franken.de


</td></tr>
<tr class='logheader'><td><span title='2010-12-28 19:02:15 +0100'>2010-12-28</span></td><td class='logsubject'><a href='/dtv-scan-tables.git/commit/dvb-t/is-Reykjavik?id=82bd95f9148742fb13c6e01d53f7c9b5ff002428&amp;follow=1'>strict syntax</a></td><td>Christoph Pfister</td><td>1</td><td><span class='deletions'>-16</span>/<span class='insertions'>+16</span></td></tr>
<tr class='nohover-highlight'><td/><td colspan='5' class='logmsg'>
</td></tr>
<tr class='logheader'><td><span title='2010-12-25 16:38:08 +0100'>2010-12-25</span></td><td class='logsubject'><a href='/dtv-scan-tables.git/commit/dvb-c/fi-dna?id=f14ff00a57d531ddda78c794acc106b696e61711&amp;follow=1'>merge fi-3ktv and fi-Oulu into fi-dna</a></td><td>Christoph Pfister</td><td>2</td><td><span class='deletions'>-20</span>/<span class='insertions'>+6</span></td></tr>
<tr class='nohover-highlight'><td/><td colspan='5' class='logmsg'>
suggested by Antti Palosaari


</td></tr>
<tr class='logheader'><td><span title='2010-12-25 16:01:07 +0100'>2010-12-25</span></td><td class='logsubject'><a href='/dtv-scan-tables.git/commit/dvb-t/ax-Smedsbole?id=c3a7be0fa4ee9ce27847604a4cda0dc642fa160a&amp;follow=1'>rename fi-Smedsbole to ax-Smedsbole</a></td><td>Christoph Pfister</td><td>1</td><td><span class='deletions'>-0</span>/<span class='insertions'>+0</span></td></tr>
<tr class='nohover-highlight'><td/><td colspan='5' class='logmsg'>
suggested by Antti Palosaari


</td></tr>
<tr class='logheader'><td><span title='2010-12-25 15:51:29 +0100'>2010-12-25</span></td><td class='logsubject'><a href='/dtv-scan-tables.git/commit/dvb-t/fi-Varpaisjarvi_Honkamaki?id=17b3f813e3c33088b9aa1bcb7c06909d5031ae98&amp;follow=1'>changeset: 1407:d38a19ce8521</a></td><td>Christoph Pfister</td><td>60</td><td><span class='deletions'>-4</span>/<span class='insertions'>+54</span></td></tr>
<tr class='nohover-highlight'><td/><td colspan='5' class='logmsg'>
tag: tip
user: Antti Palosaari &lt;crope@iki.fi&gt;
date: Fri Dec 10 18:32:39 2010 +0200
summary: dvb-apps: update DVB-T intial tuning files for Finland (fi-*)


</td></tr>
<tr class='logheader'><td><span title='2010-12-25 15:38:18 +0100'>2010-12-25</span></td><td class='logsubject'><a href='/dtv-scan-tables.git/commit/dvb-t/ch-Geneva?id=3f6438890d161834774cc7e3a02a6d2920185000&amp;follow=1'>update scan file for ch-Geneva</a></td><td>Christoph Pfister</td><td>1</td><td><span class='deletions'>-5</span>/<span class='insertions'>+5</span></td></tr>
<tr class='nohover-highlight'><td/><td colspan='5' class='logmsg'>
submitted by tkernen deckpoint.ch


</td></tr>
<tr class='logheader'><td><span title='2010-11-28 21:24:42 +0100'>2010-11-28</span></td><td class='logsubject'><a href='/dtv-scan-tables.git/commit/dvb-t/fr-Reims?id=3686d3bd6164ee20026258a8f4c428a3d45fe15e&amp;follow=1'>update scan file for fr-Reims</a></td><td>Christoph Pfister</td><td>1</td><td><span class='deletions'>-11</span>/<span class='insertions'>+7</span></td></tr>
<tr class='nohover-highlight'><td/><td colspan='5' class='logmsg'>
submitted by sylvestre.cartier gmail.com


</td></tr>
<tr class='logheader'><td><span title='2010-11-21 17:45:40 +0100'>2010-11-21</span></td><td class='logsubject'><a href='/dtv-scan-tables.git/commit/dvb-t/fr-Tours?id=415d26331c7e27805b1b1162e9ede1f1b93cdcbd&amp;follow=1'>update scan file for fr-Tours</a></td><td>Christoph Pfister</td><td>1</td><td><span class='deletions'>-23</span>/<span class='insertions'>+9</span></td></tr>
<tr class='nohover-highlight'><td/><td colspan='5' class='logmsg'>
submitted by lissyx lissyx.dyndns.org


</td></tr>