Radioberry-2.x/SBC/rpi-4/device_driver/firmware/register.c

#include "register.h"
#include <arpa/inet.h>
#include <stdio.h>
#include <unistd.h>
#include <errno.h>

static char macaddress[24];
static char* radiocall;
static char* radiolocator;
char gatewareversion[16];
char driverversion[16];
char firmwareversion[16]; 
char fpgatype[16];

#define SA      struct sockaddr
#define MAXLINE 4096
#define MAXSUB  512

PROPERTY* properties=NULL;

int getMacAddress(void) {
	
	struct ifaddrs *ifaddr=NULL;
    struct ifaddrs *ifa = NULL;
	int found = 0;

    if (getifaddrs(&ifaddr) != -1) {
         for ( ifa = ifaddr; ifa != NULL; ifa = ifa->ifa_next) {
             if ( (ifa->ifa_addr) && (ifa->ifa_addr->sa_family == AF_PACKET) && !(ifa->ifa_flags & IFF_LOOPBACK) ) {
                  struct sockaddr_ll *s = (struct sockaddr_ll*)ifa->ifa_addr;
                  
				  if ((strstr(ifa->ifa_name, "eth") != NULL) || (strstr(ifa->ifa_name, "wlan") != NULL) ) {
					 char *macstr = "%02X:%02X:%02X:%02X:%02X:%02X";
					 sprintf(macaddress,macstr, s->sll_addr[0], s->sll_addr[1], s->sll_addr[2], s->sll_addr[3], s->sll_addr[4], s->sll_addr[5]);
					 found  = 1;
					 break;
				  }
             }
         }
	}
    freeifaddrs(ifaddr);
	
	return found;
}

void loadProperties(char* filename) {
    char string[80];
    char* name;
    char* value;
    FILE* f=fopen(filename,"r");
    PROPERTY* property;
    if(f) {
        while(fgets(string,sizeof(string),f)) {
            if(string[0]!='#') {
                name=strtok(string,"=");
                value=strtok(NULL,"\n");
				// Beware of "illegal" lines in corrupted files
				if (name != NULL && value != NULL) {
					  property=malloc(sizeof(PROPERTY));
					  property->name=malloc(strlen(name)+1);
					  strcpy(property->name,name);
					  property->value=malloc(strlen(value)+1);
					  strcpy(property->value,value);
					  property->next_property=properties;
					  properties=property;
				}
            }
        }
        fclose(f);
    }
}

char* getProperty(char* name) {
    char* value=NULL;
    PROPERTY* property=properties;
    while(property) {
        if(strcmp(name,property->name)==0) {
            value=property->value;
            break;
        }
        property=property->next_property;
    }
    return value;
}

void loadRadioberryProps() {
	
	loadProperties("/home/pi/.radioberry/radioberry.props");
	
	radiocall = getProperty("call");
	if (radiocall==NULL) radiocall="-";
	if (strlen(radiocall) > 16) radiocall[16]  = '\0';
	radiolocator = getProperty("locator");
	if (radiolocator==NULL) radiolocator="-";
	if (strlen(radiolocator) > 6) radiolocator[6]  = '\0';
}

ssize_t process_http(int sockfd, char *host, char *page, char *poststr)
{
	char sendline[MAXLINE + 1], recvline[MAXLINE + 1];
	ssize_t n;
	n = snprintf(sendline, MAXSUB,
		 "POST %s HTTP/1.0\r\n"
		 "Host: %s\r\n"
		 "Content-type: application/x-www-form-urlencoded\r\n"
		 "Content-length: %zu\r\n\r\n"
		 "%s", page, host, strlen(poststr), poststr);

	if(write(sockfd, sendline, n) < 0)
	    return -errno;
	//get response
	while ((n = read(sockfd, recvline, MAXLINE)) > 0) {
		recvline[n] = '\0';
		//printf("%s", recvline);
	}
	return n;
}

int postRadioberryConfiguration() {
	
	int result = 0;
	int sockfd;
	struct sockaddr_in servaddr;

	char **pptr;
	char *hname = "www.pa3gsb.nl";
	char *page = "/radioberry/api/write.php";
	char *poststr = "macaddress=%s&radiocall=%s&radiolocator=%s&gatewareversion=%s&driverversion=%s&firmwareversion=%s&fpgatype=%s\r\n";

	// make message for registration.
	char post_message[4096];
	sprintf(post_message,poststr, macaddress, radiocall, radiolocator, gatewareversion, driverversion, firmwareversion, fpgatype);

	char str[50];
	struct hostent *hptr;
	if ((hptr = gethostbyname(hname)) == NULL) return -1;
	if (hptr->h_addrtype == AF_INET && (pptr = hptr->h_addr_list) != NULL) inet_ntop(hptr->h_addrtype, *pptr, str, sizeof(str));
	sockfd = socket(AF_INET, SOCK_STREAM, 0);
	bzero(&servaddr, sizeof(servaddr));
	servaddr.sin_family = AF_INET;
	servaddr.sin_port = htons(80);
	inet_pton(AF_INET, str, &servaddr.sin_addr);
	
	if (connect(sockfd, (SA *) & servaddr, sizeof(servaddr)) >= 0) 	process_http(sockfd, hname, page, post_message); else result = -1;
	
	close(sockfd);
	
	return result;
}

void registerRadioberry() {
	if (!getMacAddress()) return;
	loadRadioberryProps();
	if (postRadioberryConfiguration()) fprintf(stderr, "Registering your Radioberry not registered."); else fprintf(stderr, "Your Radioberry is registered: http://www.pa3gsb.nl/radioberry/api/read.php\n");
}

//end of source