void time_update(void)
{
extern struct tm *time_ptr;
extern char qsonrstr[];
extern int bandinx;
extern int this_second;
extern int system_secs;
extern int miniterm;
char time_buf[11];
int currentterm = 0;
static int s = 0;
static int m = 0;
static int oldsecs = -1; /* trigger immediate update */
get_time();
this_second = time_ptr->tm_sec; /* seconds */
system_secs = time_ptr->tm_min * 60 + time_ptr->tm_sec;
if (this_second != oldsecs) {
/* do it every second */
oldsecs = this_second;
if (wpx == 1) {
if (minute_timer > 0)
minute_timer--;
}
s = (s + 1) % 2;
if (s > 0) { /* every 2 seconds */
strftime(time_buf, 10, "%H:%M:%S", time_ptr);
time_buf[5] = '\0';
if ((time_buf[6] == '1') && (m >= 30)) {
m = 0;
getwwv();
} else {
m++;
}
currentterm = miniterm;
miniterm = 0;
broadcast_lan();
update_line(time_buf);
show_freq();
clusterinfo(); /* update cluster info (2 seconds) */
attron(COLOR_PAIR(C_LOG) | A_STANDOUT);
mvprintw(7, 0, logline0);
mvprintw(8, 0, logline1);
mvprintw(9, 0, logline2);
mvprintw(10, 0, logline3);
mvprintw(11, 0, logline4);
mvprintw(13, 0,
" ");
attron(COLOR_PAIR(C_WINDOW));
mvprintw(12, 23, qsonrstr);
printcall();
showscore(); /* update score window every 2 seconds */
show_zones(bandinx);
miniterm = currentterm;
}
}
}
int main(int argc, char *argv[]) {
int j;
int ret;
char tlfversion[80] = "";
parse_options(argc, argv);
ui_init();
strcat(logline0, backgrnd_str);
strcat(logline1, backgrnd_str);
strcat(logline2, backgrnd_str);
strcat(logline3, backgrnd_str);
strcat(logline4, backgrnd_str);
strcat(terminal1, backgrnd_str);
strcat(terminal2, backgrnd_str);
strcat(terminal3, backgrnd_str);
strcat(terminal4, backgrnd_str);
termbuf[0] = '\0';
hiscall[0] = '\0';
sprintf(tlfversion,
" Welcome to tlf-%s by PA0R!!", VERSION);
showmsg(tlfversion);
showmsg("");
total = 0;
if (databases_load() == EXIT_FAILURE) {
sleep(2);
endwin();
exit(EXIT_FAILURE);
}
if (convert_cabrillo == 1) {
char tstring[100] = "";
sprintf(tstring, "Converting cabrillo for contest %s from file %s.cbr",
whichcontest, g_strstrip(call));
showmsg(tstring);
showmsg("");
getstationinfo();
if (0 != readcabrillo(READCAB_MODE_CLI))
showmsg("Sorry. Conversion failed....");
else
showmsg("Done...");
sleep(2);
endwin();
exit(EXIT_SUCCESS);
}
/* now setup colors */
ui_color_init();
// if (strlen(synclogfile) > 0)
// synclog(synclogfile);
hamlib_init();
fldigi_init();
lan_init();
keyer_init();
clear();
mvprintw(0, 0, " Welcome to tlf-%s by PA0R!!\n\n", VERSION);
refreshp();
checkparameters(); /* check .paras file */
getmessages(); /* read .paras file */
packet_init();
getwwv(); /* get the latest wwv info from packet */
scroll_log(); /* read the last 5 log lines and set the qso number */
nr_qsos = readcalls(); /* read the logfile for score and dupe */
clear_display(); /* tidy up the display */
attron(COLOR_PAIR(C_LOG) | A_STANDOUT);
for (j = 13; j <= 23; j++) { /* wipe lower window */
mvprintw(j, 0, backgrnd_str);
}
refreshp();
bm_init(); /* initialize bandmap */
atexit(tlf_cleanup); /* register cleanup function */
/* Create the background thread */
ret = pthread_create(&background_thread, NULL, background_process, NULL);
if (ret) {
perror("pthread_create: backgound_process");
endwin();
exit(EXIT_FAILURE);
}
/* now start logging !! Does never return */
logit();
return 0;
}
int main(int argc, char *argv[])
{
int j;
pthread_t thrd1, thrd2;
int ret;
int retval;
char keyerbuff[3];
char tlfversion[80] = "";
int status;
while ((argc > 1) && (argv[1][0] == '-')) {
switch (argv[1][1]) {
/* verbose option */
case 'f':
if (strlen(argv[1] + 2) > 0) {
if ((*(argv[1] + 2) == '~') && (*(argv[1] + 3) == '/')) {
/* tilde expansion */
config_file = g_strconcat( g_get_home_dir(),
argv[1] + 3, NULL);
}
else {
config_file = g_strdup(argv[1] + 2);
}
}
break;
case 's':
if (strlen(argv[1] + 2) > 0)
strcpy(synclogfile, argv[1] + 2);
break;
case 'd': // debug rigctl
debugflag = 1;
break;
case 'v': // verbose startup
verbose = 1;
break;
case 'V': // output version
printf("Version: tlf-%s\n", VERSION);
exit(0);
break;
case 'n': // output version
nopacket = 1;
break;
default:
printf("Use: tlf [-v] Verbose\n");
printf(" [-V] Version\n");
printf(" [-f] Configuration file\n");
printf(" [-d] Debug mode\n");
printf(" [-h] This message\n");
printf(" [-n] Start without cluster hookup\n");
exit(0);
break;
}
--argc;
++argv;
}
buffer[0] = '\0';
buffer[79] = '\0';
bufloc = 0;
strcat(logline0, backgrnd_str);
strcat(logline1, backgrnd_str);
strcat(logline2, backgrnd_str);
strcat(logline3, backgrnd_str);
strcat(logline4, backgrnd_str);
strcat(terminal1, backgrnd_str);
strcat(terminal2, backgrnd_str);
strcat(terminal3, backgrnd_str);
strcat(terminal4, backgrnd_str);
termbuf[0] = '\0';
hiscall[0] = '\0';
/* getting users terminal string and (if RXVT) setting rxvt colours on it */
/* LZ3NY hack :) */
if (strcasecmp(getenv("TERM"), "rxvt") == 0) {
use_rxvt = 1;
printf("terminal is:%s", getenv("TERM"));
} else if (strcasecmp(getenv("TERM"), "xterm") == 0) {
use_xterm = 1;
use_rxvt = 1;
} else
putenv("TERM=rxvt"); /*or going to native console linux driver */
if ((mainscreen = newterm(NULL, stdout, stdin)) == NULL) { /* activate ncurses terminal control */
perror("initscr");
printf
("\n Sorry, wrong terminal type !!!!! \nTry a linux text terminal or set TERM=linux !!!");
sleep(5);
exit(EXIT_FAILURE);
}
//keypad(stdscr,TRUE);
InitSearchPanel(); /* at least one panel has to be defined
for refreshp() to work */
getmaxyx(stdscr, ymax, xmax);
if ((ymax < 25) || (xmax < 80)) {
char c;
showmsg( "!! TLF needs at least 25 lines and 80 columns !!");
showmsg( " Continue anyway? Y/(N)" );
c = toupper( getch() );
if (c != 'Y') {
showmsg( "73 es cuagn" );
sleep(1);
endwin();
exit(1);
}
showmsg("");
}
noecho();
crmode();
strcpy(sp_return, message[12]);
strcpy(cq_return, message[13]);
refreshp();
if (has_colors()) {
if (start_color() == ERR) {
perror("start_color");
endwin();
printf
("\n Sorry, wrong terminal type !!!!! \n\nTry a linux text terminal or set TERM=linux !!!");
sleep(5);
exit(EXIT_FAILURE);
}
sprintf(tlfversion,
" Welcome to tlf-%s by PA0R!!" , VERSION);
showmsg(tlfversion);
showmsg("");
showmsg("reading country data");
readctydata(); /* read ctydb.dat */
showmsg("reading configuration data");
status = read_logcfg(); /* read the configuration file */
status |= read_rules(); /* read the additional contest rules in "rules/contestname" LZ3NY */
if (status != PARSE_OK) {
showmsg( "Problems in logcfg.dat or rule file detected! Continue Y/(N)?");
if (toupper( getchar() ) != 'Y') {
endwin();
exit(1);
}
}
/* make sure logfile is there and has the right format */
if (checklogfile_new(logfile) != 0) {
showmsg( "Giving up" );
sleep(2);
endwin();
exit(1);
}
// if (strlen(synclogfile) > 0)
// synclog(synclogfile);
if (*call == '\0') {
showmsg
("WARNING: No callsign defined in logcfg.dat! exiting...\n\n\n");
exit(1);
}
if (use_rxvt == 1) { // use rxvt colours
init_pair(COLOR_BLACK, COLOR_BLACK, COLOR_RED);
if (use_xterm == 1) {
init_pair(C_HEADER, COLOR_GREEN, COLOR_BLUE);
init_pair(COLOR_RED, COLOR_WHITE, 8);
init_pair(C_WINDOW, COLOR_CYAN, COLOR_MAGENTA);
init_pair(C_DUPE, COLOR_WHITE, COLOR_MAGENTA);
init_pair(C_INPUT, COLOR_BLUE, COLOR_WHITE);
} else {
init_pair(C_HEADER, COLOR_GREEN, COLOR_YELLOW);
init_pair(COLOR_RED, COLOR_WHITE, COLOR_RED);
init_pair(C_WINDOW, COLOR_CYAN, COLOR_RED);
init_pair(C_DUPE, COLOR_RED, COLOR_MAGENTA);
init_pair(C_INPUT, COLOR_BLUE, COLOR_YELLOW);
}
init_pair(C_LOG, COLOR_WHITE, COLOR_BLACK);
init_pair(C_BORDER, COLOR_CYAN, COLOR_YELLOW);
} else {
// use linux console colours
init_pair(COLOR_BLACK, tlfcolors[0][0], tlfcolors[0][1]); // b/w
init_pair(C_HEADER, tlfcolors[1][0], tlfcolors[1][1]); // Gn/Ye
init_pair(COLOR_RED, tlfcolors[2][0], tlfcolors[2][1]); // W/R
init_pair(C_WINDOW, tlfcolors[3][0], tlfcolors[3][1]); // Cy/W
init_pair(C_LOG, tlfcolors[4][0], tlfcolors[4][1]); // W/B
init_pair(C_DUPE, tlfcolors[5][0], tlfcolors[5][1]); // W/Mag
init_pair(C_INPUT, tlfcolors[6][0], tlfcolors[6][1]); // Bl/Y
init_pair(C_BORDER, tlfcolors[7][0], tlfcolors[7][1]); // W/B
}
mults_possible = g_ptr_array_new();
if (multlist == 1) {
showmsg("reading multiplier data ");
load_multipliers();
}
attron(COLOR_PAIR(COLOR_BLACK));
showmsg("reading callmaster data");
nr_callmastercalls = load_callmaster();
if (*exchange_list != '\0') {
// read initial exchange file
main_ie_list = make_ie_list(exchange_list);
if (main_ie_list == NULL) {
showmsg( "Problems in initial exchange file detected! Continue Y/(N)?");
if (toupper( getchar() ) != 'Y') {
endwin();
exit(1);
}
else {
showmsg( "Initial exchange data not loaded! Continuing ...");
sleep(2);
}
}
}
#ifdef HAVE_LIBHAMLIB // Code for hamlib interface
showmsg("HAMLIB defined");
if (trx_control != 0) {
shownr("Rignumber is", (int) myrig_model);
shownr("Rig speed is", serial_rate);
showmsg("Trying to start rig ctrl");
/** \todo fix exclusion of newer hamlib models */
if ((int) myrig_model > 1999)
status = init_native_rig();
else
status = init_tlf_rig();
}
#else
if (trx_control != 0) {
// trx_control = 0;
showmsg("No Hamlib library, using native driver");
shownr("Rignumber is", rignumber);
shownr("Rig speed is", serial_rate);
status = init_native_rig();
sleep(1);
}
#endif // end code for hamlib interface
if (status != 0) {
showmsg( "Continue without rig control Y/(N)?");
if (toupper( getchar() ) != 'Y') {
endwin();
exit(1);
}
trx_control = 0;
showmsg( "Disabling rig control!");
sleep(1);
}
if (keyerport == NET_KEYER) {
showmsg("Keyer is cwdaemon");
}
if (keyerport == MFJ1278_KEYER || keyerport == GMFSK) {
init_controller();
}
if (lan_active == 1) {
retval = lanrecv_init();
if (retval < 0) /* set up the network */
shownr("LAN receive init failed", retval);
else
showmsg("LAN receive initialized");
if (lan_send_init() < 0)
showmsg("LAN send init failed");
else
showmsg("LAN send initialized");
}
checkparameters(); /* check .paras file */
clear();
mvprintw(0, 0, " Welcome to tlf-%s by PA0R!!\n\n" , VERSION);
refreshp();
getmessages(); /* read .paras file */
if (nopacket == 1)
packetinterface = 0;
set_term(mainscreen);
refreshp();
if ((nopacket == 0) && (packetinterface != 0)) {
if (init_packet() == 0)
packet();
else
cleanup_telnet();
}
if (keyerport == NET_KEYER) {
if (netkeyer_init() < 0) {
mvprintw(24, 0, "Cannot open NET keyer daemon ");
refreshp();
sleep(1);
} else {
netkeyer(K_RESET, "0");
sprintf(weightbuf, "%d", weight);
write_tone();
snprintf(keyerbuff, 3, "%2d", GetCWSpeed());
netkeyer(K_SPEED, keyerbuff); // set speed
netkeyer(K_WEIGHT, weightbuf); // set weight
if (*keyer_device != '\0')
netkeyer(K_DEVICE, keyer_device); // set device
sprintf(keyerbuff, "%d", txdelay);
netkeyer(K_TOD, keyerbuff); // set TOD
if (sc_sidetone != 0) // set soundcard output
netkeyer(K_SIDETONE, "");
if (*sc_volume != '\0') // set soundcard volume
netkeyer(K_STVOLUME, sc_volume);
}
if (keyerport != NET_KEYER)
write_tone();
}
getwwv(); /* get the latest wwv info from packet */
scroll_log(); /* read the last 5 log lines and set the qso number */
nr_qsos = readcalls(); /* read the logfile for score and dupe */
clear_display(); /* tidy up the display */
qrb();
attron(COLOR_PAIR(C_LOG) | A_STANDOUT);
for (j = 13; j <= 23; j++) { /* wipe lower window */
mvprintw(j, 0, backgrnd_str);
}
bm_init(); /* initialize bandmap */
/* Create the first thread */
ret = pthread_create(&thrd1, NULL, (void *) logit, NULL);
if (ret) {
perror("pthread_create: logit");
endwin();
exit(EXIT_FAILURE);
}
/* Create the second thread */
ret =
pthread_create(&thrd2, NULL, (void *) background_process,
NULL);
if (ret) {
perror("pthread_create: backgound_process");
endwin();
exit(EXIT_FAILURE);
}
pthread_join(thrd2, NULL);
pthread_join(thrd1, NULL);
endwin();
exit(EXIT_SUCCESS);
} else {
printf("Terminal does not support color\n");
printf("\nTry TERM=linux or use a text console !!\n");
refreshp();
sleep(2);
}
cleanup_telnet();
if (trxmode == CWMODE && keyerport == NET_KEYER)
netkeyer_close();
else
close(cfd); /* close keyer */
endwin();
return (0);
}
