|
|
|
@ -1,5 +1,6 @@
|
|
|
|
|
#include <stdio.h>
|
|
|
|
|
#include <sys/socket.h>
|
|
|
|
|
#include <ctype.h>
|
|
|
|
|
|
|
|
|
|
#include "cwprotocol.h"
|
|
|
|
|
|
|
|
|
@ -13,6 +14,8 @@ struct data_packet_format tx_data_packet;
|
|
|
|
|
int tx_sequence = 0, rx_sequence;
|
|
|
|
|
int fd_socket;
|
|
|
|
|
|
|
|
|
|
struct morse_timig_format morse_timing;
|
|
|
|
|
|
|
|
|
|
int prepare_id (struct data_packet_format *id_packet, char *id)
|
|
|
|
|
{
|
|
|
|
|
id_packet->command = DAT;
|
|
|
|
@ -65,7 +68,7 @@ int send_latch (void)
|
|
|
|
|
tx_data_packet.code[0] = -1;
|
|
|
|
|
tx_data_packet.code[1] = 1;
|
|
|
|
|
tx_data_packet.n = 2;
|
|
|
|
|
for(i = 0; i < 5; i++) send(fd_socket, &tx_data_packet, SIZE_DATA_PACKET, 0);
|
|
|
|
|
for(i = 0; i < TX_RETRIES; i++) send(fd_socket, &tx_data_packet, SIZE_DATA_PACKET, 0);
|
|
|
|
|
tx_data_packet.n = 0;
|
|
|
|
|
return 0;
|
|
|
|
|
}
|
|
|
|
@ -78,8 +81,78 @@ int send_unlatch (void)
|
|
|
|
|
tx_data_packet.code[0] = -1;
|
|
|
|
|
tx_data_packet.code[1] = 2;
|
|
|
|
|
tx_data_packet.n = 2;
|
|
|
|
|
for(i = 0; i < 5; i++) send(fd_socket, &tx_data_packet, SIZE_DATA_PACKET, 0);
|
|
|
|
|
for(i = 0; i < TX_RETRIES; i++) send(fd_socket, &tx_data_packet, SIZE_DATA_PACKET, 0);
|
|
|
|
|
tx_data_packet.n = 0;
|
|
|
|
|
return 0;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
int prepare_text2morse (int wpm)
|
|
|
|
|
{
|
|
|
|
|
morse_timing.wpm = wpm;
|
|
|
|
|
morse_timing.dot_len = (int) (1200/wpm); // in ms - PARIS standard
|
|
|
|
|
morse_timing.dash_len = 3*morse_timing.dot_len;
|
|
|
|
|
morse_timing.charspace_len = 3*morse_timing.dot_len;
|
|
|
|
|
morse_timing.wordspace_len = 7*morse_timing.dot_len;
|
|
|
|
|
|
|
|
|
|
return 0;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
int clean_tx (void)
|
|
|
|
|
{
|
|
|
|
|
int i;
|
|
|
|
|
for (i=0; i<SIZE_CODE; i++)
|
|
|
|
|
tx_data_packet.code[i] = 0;
|
|
|
|
|
for (i=0; i<SIZE_STATUS; i++)
|
|
|
|
|
tx_data_packet.status[i] = ' ';
|
|
|
|
|
tx_data_packet.n = 0;
|
|
|
|
|
return 0;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
// FIXME: This function is really nasty, even for this code :)
|
|
|
|
|
int char2morse(int ff)
|
|
|
|
|
{
|
|
|
|
|
clean_tx();
|
|
|
|
|
|
|
|
|
|
int c, d, e;
|
|
|
|
|
int a=0, b=0;
|
|
|
|
|
int i=0;
|
|
|
|
|
int k=0;
|
|
|
|
|
c=ff;
|
|
|
|
|
tx_sequence++;
|
|
|
|
|
tx_data_packet.sequence = tx_sequence;
|
|
|
|
|
|
|
|
|
|
// why? because!!!
|
|
|
|
|
// http://stackoverflow.com/questions/1352587/convert-a-string-into-morse-code/1355594^
|
|
|
|
|
for(;c= c?c:(c=a=toupper(getchar())-32)?c<0?1:"\x95#\x8CKa`^ZRBCEIQiw#S#nx(37+$6-2&@/4)'18=,*%.:0;?5" [c-12]-34:-3;c/=2) {
|
|
|
|
|
e=d;
|
|
|
|
|
if (a!=b) {
|
|
|
|
|
tx_data_packet.status[k] = a+32; //putchar (a+32);
|
|
|
|
|
k++;
|
|
|
|
|
}
|
|
|
|
|
b=a;
|
|
|
|
|
d=(c/2?46-c%2:32);
|
|
|
|
|
//putchar (d);
|
|
|
|
|
if (d == ' ' && e == ' ') break;
|
|
|
|
|
tx_data_packet.code[i] = -1*morse_timing.dot_len;
|
|
|
|
|
i++;
|
|
|
|
|
int j;
|
|
|
|
|
if (d == '.')
|
|
|
|
|
j=1;
|
|
|
|
|
if (d == '-')
|
|
|
|
|
j=3;
|
|
|
|
|
if (d == ' ')
|
|
|
|
|
j=-3;
|
|
|
|
|
tx_data_packet.code[i] = j*morse_timing.dot_len;
|
|
|
|
|
i++;
|
|
|
|
|
//printf ("(%d %d) ",tx_data_packet.code[i-2],tx_data_packet.code[i-1] );
|
|
|
|
|
}
|
|
|
|
|
tx_data_packet.code[i] = -1*morse_timing.dot_len;
|
|
|
|
|
i++;
|
|
|
|
|
tx_data_packet.n = i;
|
|
|
|
|
|
|
|
|
|
for(i = 0; i < TX_RETRIES; i++)
|
|
|
|
|
send(fd_socket, &tx_data_packet, SIZE_DATA_PACKET, 0);
|
|
|
|
|
tx_data_packet.n = 0;
|
|
|
|
|
|
|
|
|
|
return 0;
|
|
|
|
|
}
|
|
|
|
|