/*
 * Tlf - contest logging program for amateur radio operators
 * Copyright (C) 2001-2002-2003 Rein Couperus <pa0rct@amsat.org>
 *
 * 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 Library 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.
 */
	/* ------------------------------------------------------------
 	*        Page-up increases CW speed with 2 wpm
 	*
 	*--------------------------------------------------------------*/

#include "speedup.h"
#include "tlf.h"
#include "cwkeyer.h"
#include "clear_display.h"
#include "netkeyer.h"

int speedup(void)
{

extern int speed;
extern char speedstr[];
extern int trxmode;
extern int keyerport;
extern int cfd;
extern char buffer[];

int  retval = 0;
char buff[3];

		if (trxmode != CWMODE)
		return (0);

if (keyerport == COM1_KEYER) {
	if (speed < 20)
	{
	  speed++;

		strncpy(buff, speedstr+(speed * 2), 2);

		retval = ioctl(cfd, CWSPEED, atoi(buff));
		buff[2] = '\0';
		if	(retval)
		{
			mvprintw(24,0, "keyer not active");
//			trxmode = SSBMODE;
			sleep(1);
			clear_display();
		}

	}
}

if (keyerport == LPT_KEYER) {

 	if (speed < 20) {

 		speed++;

 		strncpy(buff, speedstr+(speed * 2), 2);
		buff[2] = '\0';

		retval = ioctl(cfd, CWKEYER_IOCSSPEED, atoi(buff));

		if	(retval)
		{
			mvprintw(24,0, "keyer not active");
//			trxmode = SSBMODE;
			sleep(1);
			clear_display();
		}

 	}
}
if (keyerport == NET_KEYER) {

 	if (speed < 20) {

 		speed++;

 		strncpy(buff, speedstr+(speed * 2), 2);
		buff[2] = '\0';

		retval = netkeyer(K_SPEED, buff);

		if	(retval < 0)
		{
			mvprintw(24,0, "keyer not active");
//			trxmode = SSBMODE;
			sleep(1);
			clear_display();
		}

 	}
}

if (keyerport == MFJ1278_KEYER) {

 	if (speed < 20) {

 		speed++;

 		strncpy(buff, speedstr+(speed * 2), 2);
		buff[2] = '\0';

		strcpy (buffer, "\\\015");
		sendbuf();
		usleep(500000);
		strcpy (buffer, "MSP ");
		strcat (buffer, buff);
		strcat (buffer, " \015");
		sendbuf();
		usleep(500000);
		strcpy (buffer, "CONV\015\n");
		sendbuf();

		if	(retval < 0)
		{
			mvprintw(24,0, "keyer not active");
//			trxmode = SSBMODE;
			sleep(1);
			clear_display();
		}

 	}
}

if (keyerport == ORION_KEYER) {

 	if (speed < 20) {

 		speed++;

 		strncpy(buff, speedstr+(speed * 2), 2);
		buff[2] = '\0';

		orion_set_cw_speed(atoi(buff));

 	}
}
return (speed)	;
}

int setweight(int weight) {					//  write weight to netkeyer

extern int keyerport;

int retval;
char buff[4];

 	if (keyerport == NET_KEYER && weight > -51 && weight < 51) {

 		sprintf(buff, "%d", weight);

		retval = netkeyer(K_WEIGHT, buff);

		if	(retval < 0)
		{
			mvprintw(24,0, "keyer not active ?");
			sleep(1);
			clear_display();
		}

 	}

return (0)	;

}