WSJT-X/plrs_subs_win.c
Joe Taylor 2f2c111860 Corrected typo in moon2.f
Added "localhost" address to plrs_subs_win.c.
Use static variables in Astro.F.


git-svn-id: svn+ssh://svn.code.sf.net/p/wsjt/wsjt/branches/map65@1004 ab8295b8-cf94-4d9e-aec4-7959e3be5d79
2008-09-03 15:40:52 +00:00

65 lines
1.7 KiB
C

#include <winsock2.h>
#include <ws2tcpip.h>
#include <stdlib.h>
#include <stdio.h>
#define HELLO_PORT 50004
//#define HELLO_GROUP "239.255.0.0"
#define HELLO_GROUP "127.0.0.1"
struct sockaddr_in addr;
int fd;
void __stdcall SETUP_SSOCKET(void)
{
struct ip_mreq mreq;
// Make sure that we have compatible Winsock support
WORD wVersionRequested;
WSADATA wsaData;
int err;
wVersionRequested = MAKEWORD( 2, 2 );
err = WSAStartup( wVersionRequested, &wsaData );
if ( err != 0 ) {
/* Tell the user that we could not find a usable */
/* WinSock DLL. */
exit(1);
}
/* Confirm that the WinSock DLL supports 2.2.*/
/* Note that if the DLL supports versions greater */
/* than 2.2 in addition to 2.2, it will still return */
/* 2.2 in wVersion since that is the version we */
/* requested. */
if ( LOBYTE( wsaData.wVersion ) != 2 ||
HIBYTE( wsaData.wVersion ) != 2 ) {
/* Tell the user that we could not find a usable */
/* WinSock DLL. */
WSACleanup( );
exit(1);
}
/* The WinSock DLL is acceptable. Proceed. */
/* create what looks like an ordinary UDP socket */
if ((fd=socket(AF_INET,SOCK_DGRAM,IPPROTO_UDP)) < 0) {
perror("socket");
exit(1);
}
/* set up destination address */
memset(&addr,0,sizeof(addr));
addr.sin_family=AF_INET;
addr.sin_addr.s_addr=inet_addr(HELLO_GROUP);
addr.sin_port=htons(HELLO_PORT);
}
void __stdcall SEND_PKT(char buf[])
{
if (sendto(fd,buf,1416,0,
(struct sockaddr *) &addr, sizeof(addr)) < 0) {
perror("sendto");
exit(1);}
}