spark: add spark_fp tool

this needs my patched aotom driver to work


Origin commit data
------------------
Branch: master
Commit: e91dcc03bc
Author: Stefan Seyfried <seife@tuxbox-git.slipkontur.de>
Date: 2012-04-15 (Sun, 15 Apr 2012)



------------------
This commit was generated by Migit
This commit is contained in:
Stefan Seyfried
2012-04-15 18:53:58 +02:00
parent 206e0202a4
commit 236ad74fd5
5 changed files with 239 additions and 2 deletions

6
tools/Makefile.am Normal file
View File

@@ -0,0 +1,6 @@
bin_PROGRAMS =
if BOXTYPE_SPARK
bin_PROGRAMS += spark_fp
spark_fp_SOURCES = spark_fp.c
endif

230
tools/spark_fp.c Normal file
View File

@@ -0,0 +1,230 @@
/*
* spark_fp - frontcontroller tool for SPARK boxes
*
* (C) 2012 Stefan Seyfried <seife@tuxboxcvs.slipkontur.de>
*
* License: GPL v2 or later
*
* 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
* of the License, 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, see <http://www.gnu.org/licenses/>.
*/
#include <ctype.h>
#include <stdbool.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <fcntl.h>
#include <time.h>
#include <unistd.h>
#include <sys/ioctl.h>
#include <aotom_main.h>
#define FP_DEV "/dev/vfd"
void usage()
{
printf("usage spark_fp <option>\n");
printf("\t-g: get wakeup reason (return code == reason)\n");
printf("\t-t: get current FP time\n");
printf("\t-s <time>: set FP time (time = 0: use current time)\n");
printf("\t-w <time>: set FP wakeup time and power down (time = 1: no wakeup)\n");
printf("times are given in unix time (UTC, seconds since 1970-01-01 00:00:00)\n");
printf("\n");
}
#if 0
double mod_julian_date(struct tm *t)
{
double date;
int month;
int day;
int year;
year = t->tm_year + 1900;
month = t->tm_mon + 1;
day = t->tm_mday;
date = day - 32076 +
1461 * (year + 4800 + (month - 14) / 12) / 4 +
367 * (month - 2 - (month - 14) / 12 * 12) / 12 -
3 * ((year + 4900 + (month - 14) / 12 ) / 100) / 4;
date += (t->tm_hour + 12.0) / 24.0;
date += (t->tm_min) / 1440.0;
date += (t->tm_sec) / 86400.0;
date -= 2400000.5;
return date;
}
#endif
void time_to_aotom(time_t t, char *dest)
{
/* from u-boot aotom */
struct tm* tmp;
tmp = localtime(&t);
#if 0
/* this mjd stuff is totally useless: driver only uses dest[2] and dest[3]... */
double mjd = mod_julian_date(tmp);
int mjd_int = mjd;
dest[0] = mjd_int >> 8;
dest[1] = mjd_int & 0xff;
#else
dest[0] = dest[1] = 0;
#endif
dest[2] = tmp->tm_hour;
dest[3] = tmp->tm_min;
dest[4] = tmp->tm_sec;
}
int set_aotom_time(int fd, time_t t)
{
struct tm *tmp;
struct aotom_ioctl_data aotom;
memset(&aotom, 0, sizeof(aotom));
tmp = localtime(&t);
t += tmp->tm_gmtoff;
if (ioctl(fd, VFDSETTIME2, &t) >= 0)
return 0;
fprintf(stderr, "warning: VFDSETTIME2 failed (%m), falling back to VFDSETTIME\n");
time_to_aotom(t, aotom.u.time.time);
if (ioctl(fd, VFDSETTIME, &aotom) < 0)
{
perror("ioctl VFDSETTIME");
return -1;
}
return 0;
}
int main(int argc, char **argv)
{
const char *wakeupreason[4] = { "unknown", "poweron", "standby", "timer" };
struct aotom_ioctl_data aotom;
memset(&aotom, 0, sizeof(aotom));
int ret, c, val;
time_t t, t2, diff;
struct tm *tmp;
int fd = open(FP_DEV, O_RDWR);
if (fd < 0)
{
fprintf(stderr, "error: cannot open %s: %m\n", FP_DEV);
return 64;
}
if (argc == 1)
{
usage();
return 0;
}
ret = 0;
while ((c = getopt (argc, argv, "gs:tw:")) != -1)
{
switch (c)
{
case 'g':
ret = ioctl(fd, VFDGETSTARTUPSTATE, &val);
if (ret < 0)
perror("ioctl VFDGETSTARTUPSTATE");
else
{
printf("%s\n", wakeupreason[val & 0x03]);
ret = val;
}
break;
case 's':
t = atol(optarg);
if (t == 0)
t = time(NULL),
ret = set_aotom_time(fd, t);
break;
case 't':
ret = ioctl(fd, VFDGETTIME, &t);
if (ret < 0)
perror("ioctl VFDGETTIME");
else
{
tmp = localtime(&t);
t -= tmp->tm_gmtoff;
printf("%ld\n", t);
}
break;
case 'w':
t = atol(optarg);
if (t == 0)
{
fprintf(stderr, "invalid time?\n");
ret = 1;
break;
}
/* set AOTOM time to current time... */
t2 = time(NULL);
ret = set_aotom_time(fd, t2);
if (ret < 0)
break;
diff = t - t2;
/* green LED off */
aotom.u.led.on = LOG_OFF;
aotom.u.led.led_nr = 1;
ioctl(fd, VFDSETLED, &aotom);
/* red LED on */
aotom.u.led.on = LOG_ON;
aotom.u.led.led_nr = 0;
ioctl(fd, VFDSETLED, &aotom);
if (t < t2)
{
/* no valid wakeup time -> clear... */
t = 0;
}
else
{
/* green LED on */
aotom.u.led.on = LOG_ON;
aotom.u.led.led_nr = 1;
ioctl(fd, VFDSETLED, &aotom);
ret = ioctl(fd, VFDGETTIME, &t);
if (ret < 0)
{
perror("ioctl VFDGETTIME");
break;
}
t += diff;
}
tmp = gmtime(&t2);
fprintf(stderr, "current time: %04d-%02d-%02d %02d:%02d:%02d\n", tmp->tm_year + 1900,
tmp->tm_mon + 1, tmp->tm_mday, tmp->tm_hour, tmp->tm_min, tmp->tm_sec);
tmp = gmtime(&t);
fprintf(stderr, "wakeup time: %04d-%02d-%02d %02d:%02d:%02d\n", tmp->tm_year + 1900,
tmp->tm_mon + 1, tmp->tm_mday, tmp->tm_hour, tmp->tm_min, tmp->tm_sec);
ret = ioctl(fd, VFDSTANDBY, &t);
/* driver always returns einval here...
if (ret < 0)
perror("ioctl VFDSTANDBY");
*/
sleep(2); /* not reached... */
break;
default:
usage();
return 0;
}
}
close(fd);
return ret;
}