unsigned short moduleHwInit(void) {
unsigned int freq = 0;
char *socket = NULL;
if(settings_find_string("hw-socket", &socket) == 0) {
module_socket = socket;
}
if(strcmp(module_socket, "/var/lirc/lircd") == 0) {
logprintf(LOG_ERR, "refusing to connect to lircd socket");
return EXIT_FAILURE;
}
if(module_initialized == 0) {
if((module_fd = open(module_socket, O_RDWR)) < 0) {
logprintf(LOG_ERR, "could not open %s", module_socket);
return EXIT_FAILURE;
} else {
/* Only set the frequency once */
if(module_setfreq == 0) {
freq = FREQ433;
/* Set the lirc_rpi frequency to 433.92Mhz */
if(ioctl(module_fd, _IOW('i', 0x00000013, __u32), &freq) == -1) {
logprintf(LOG_ERR, "could not set lirc_rpi send frequency");
exit(EXIT_FAILURE);
}
module_setfreq = 1;
}
logprintf(LOG_DEBUG, "initialized lirc_rpi module");
module_initialized = 1;
}
}
return EXIT_SUCCESS;
}
int update_mirror_list(void) {
int i = 0, x = 0, furl = 0;
char *url = NULL;
char mirror[255];
memset(mirror, '\0', 255);
if(settings_find_string("update-mirror", &url) != 0) {
url = malloc(strlen(UPDATE_MIRROR)+1);
if(!url) {
logprintf(LOG_ERR, "out of memory");
exit(EXIT_FAILURE);
}
strcpy(url, UPDATE_MIRROR);
furl = 1;
}
http_parse_url(url, &update_filename);
update_ret = http_get(update_filename, &update_data, &update_lg, update_typebuf);
if(update_ret == 200 && strcmp(update_typebuf, "text/plain") == 0) {
char *tmp = update_data;
while(*tmp != '\0') {
if(*tmp == '\n' || *tmp == '\0') {
if(strlen(mirror) > 2) {
update_mirrors = realloc(update_mirrors, (size_t)((i+1)*(int)sizeof(char *)));
if(!update_mirrors) {
logprintf(LOG_ERR, "out of memory");
exit(EXIT_FAILURE);
}
mirror[x-1] = '\0';
update_mirrors[i] = malloc(strlen(mirror)+1);
if(!update_mirrors[i]) {
logprintf(LOG_ERR, "out of memory");
exit(EXIT_FAILURE);
}
strcpy(update_mirrors[i], mirror);
i++;
}
memset(mirror, '\0', 255);
x=0;
}
mirror[x] = *tmp;
tmp++;
x++;
}
}
if(update_filename) sfree((void *)&update_filename);
if(update_data) sfree((void *)&update_data);
if(furl) sfree((void *)&url);
return i;
}
void event_action_init(void) {
logprintf(LOG_STACK, "%s(...)", __FUNCTION__);
#include "action_init.h"
void *handle = NULL;
void (*init)(void);
void (*compatibility)(struct module_t *module);
char path[PATH_MAX];
struct module_t module;
char pilight_version[strlen(PILIGHT_VERSION)+1];
char pilight_commit[3];
char *action_root = NULL;
int check1 = 0, check2 = 0, valid = 1, action_root_free = 0;
strcpy(pilight_version, PILIGHT_VERSION);
struct dirent *file = NULL;
DIR *d = NULL;
struct stat s;
memset(pilight_commit, '\0', 3);
if(settings_find_string("action-root", &action_root) != 0) {
/* If no action root was set, use the default action root */
if(!(action_root = MALLOC(strlen(ACTION_ROOT)+1))) {
logprintf(LOG_ERR, "out of memory");
exit(EXIT_FAILURE);
}
strcpy(action_root, ACTION_ROOT);
action_root_free = 1;
}
size_t len = strlen(action_root);
if(action_root[len-1] != '/') {
strcat(action_root, "/");
}
if((d = opendir(action_root))) {
while((file = readdir(d)) != NULL) {
memset(path, '\0', PATH_MAX);
sprintf(path, "%s%s", action_root, file->d_name);
if(stat(path, &s) == 0) {
/* Check if file */
if(S_ISREG(s.st_mode)) {
if(strstr(file->d_name, ".so") != NULL) {
valid = 1;
if((handle = dso_load(path)) != NULL) {
init = dso_function(handle, "init");
compatibility = dso_function(handle, "compatibility");
if(init && compatibility) {
compatibility(&module);
if(module.name != NULL && module.version != NULL && module.reqversion != NULL) {
char ver[strlen(module.reqversion)+1];
strcpy(ver, module.reqversion);
if((check1 = vercmp(ver, pilight_version)) > 0) {
valid = 0;
}
if(check1 == 0 && module.reqcommit != NULL) {
char com[strlen(module.reqcommit)+1];
strcpy(com, module.reqcommit);
sscanf(HASH, "v%*[0-9].%*[0-9]-%[0-9]-%*[0-9a-zA-Z\n\r]", pilight_commit);
if(strlen(pilight_commit) > 0 && (check2 = vercmp(com, pilight_commit)) > 0) {
valid = 0;
}
}
if(valid == 1) {
char tmp[strlen(module.name)+1];
strcpy(tmp, module.name);
event_action_remove(tmp);
init();
logprintf(LOG_DEBUG, "loaded event action %s v%s", file->d_name, module.version);
} else {
if(module.reqcommit != NULL) {
logprintf(LOG_ERR, "event action %s requires at least pilight v%s (commit %s)", file->d_name, module.reqversion, module.reqcommit);
} else {
logprintf(LOG_ERR, "event action %s requires at least pilight v%s", file->d_name, module.reqversion);
}
}
} else {
logprintf(LOG_ERR, "invalid module %s", file->d_name);
}
}
}
}
}
}
}
closedir(d);
}
if(action_root_free) {
FREE(action_root);
}
}
int main(int argc, char **argv) {
gc_attach(main_gc);
/* Catch all exit signals for gc */
gc_catch();
log_shell_enable();
log_level_set(LOG_NOTICE);
struct options_t *options = NULL;
struct hardware_t *hardware = NULL;
char *args = NULL;
char *stmp = NULL;
int duration = 0;
int i = 0;
int y = 0;
int z = 0;
steps_t state = CAPTURE;
steps_t pState = WAIT;
int recording = 1;
int bit = 0;
int raw[255] = {0};
int pRaw[255] = {0};
int code[255] = {0};
int onCode[255] = {0};
int offCode[255] = {0};
int allCode[255] = {0};
int unit1Code[255] = {0};
int unit2Code[255] = {0};
int unit3Code[255] = {0};
int binary[255] = {0};
int pBinary[255] = {0};
int onBinary[255] = {0};
int offBinary[255] = {0};
int allBinary[255] = {0};
int unit1Binary[255] = {0};
int unit2Binary[255] = {0};
int unit3Binary[255] = {0};
int loop = 1;
unsigned short match = 0;
int temp[75] = {-1};
int footer = 0;
int pulse = 0;
int onoff[75] = {-1};
int all[75] = {-1};
int unit[75] = {-1};
int rawLength = 0;
int binaryLength = 0;
memset(onoff, -1, 75);
memset(unit, -1, 75);
memset(all, -1, 75);
memset(temp, -1, 75);
settingsfile = malloc(strlen(SETTINGS_FILE)+1);
strcpy(settingsfile, SETTINGS_FILE);
progname = malloc(16);
strcpy(progname, "pilight-learn");
options_add(&options, 'H', "help", no_value, 0, NULL);
options_add(&options, 'V', "version", no_value, 0, NULL);
options_add(&options, 'S', "settings", has_value, 0, NULL);
while (1) {
int c;
c = options_parse(&options, argc, argv, 1, &args);
if(c == -1 || c == -2)
break;
switch (c) {
case 'H':
printf("Usage: %s [options]\n", progname);
printf("\t -H --help\t\tdisplay usage summary\n");
printf("\t -V --version\t\tdisplay version\n");
printf("\t -S --settings\t\tsettings file\n");
return (EXIT_SUCCESS);
break;
case 'V':
printf("%s %s\n", progname, VERSION);
return (EXIT_SUCCESS);
break;
case 'S':
if(access(args, F_OK) != -1) {
settingsfile = realloc(settingsfile, strlen(args)+1);
strcpy(settingsfile, args);
settings_set_file(args);
} else {
fprintf(stderr, "%s: the settings file %s does not exists\n", progname, args);
return EXIT_FAILURE;
}
break;
default:
printf("Usage: %s [options]\n", progname);
return (EXIT_FAILURE);
break;
}
}
options_delete(options);
if(access(settingsfile, F_OK) != -1) {
if(settings_read() != 0) {
return EXIT_FAILURE;
}
}
if(settings_find_string("hw-mode", &stmp) == 0) {
hw_mode = stmp;
}
hardware_init();
struct hardwares_t *htmp = hardwares;
match = 0;
while(htmp) {
if(strcmp(htmp->listener->id, hw_mode) == 0) {
hardware = htmp->listener;
match = 1;
break;
}
htmp = htmp->next;
}
if(match == 1 && hardware->init) {
hardware->init();
printf("Please make sure the daemon is not running when using this debugger.\n\n");
}
if(match == 0 || !hardware->receive || strcmp(hw_mode, "none") == 0) {
printf("The hw-mode \"%s\" isn't compatible with %s\n", hw_mode, progname);
main_gc();
return EXIT_SUCCESS;
}
while(loop && match == 1 && hardware->receive) {
switch(state) {
case CAPTURE:
printf("1. Please send and hold one of the OFF buttons.");
break;
case ON:
/* Store the previous OFF button code */
for(i=0;i<binaryLength;i++) {
offBinary[i] = binary[i];
}
printf("2. Please send and hold the ON button for the same device\n");
printf(" as for which you send the previous OFF button.");
break;
case OFF:
/* Store the previous ON button code */
for(i=0;i<binaryLength;i++) {
onBinary[i] = binary[i];
}
for(i=0;i<rawLength;i++) {
onCode[i] = code[i];
}
z=0;
/* Compare the ON and OFF codes and save bit that are different */
for(i=0;i<binaryLength;i++) {
if(offBinary[i] != onBinary[i]) {
onoff[z++]=i;
}
}
for(i=0;i<rawLength;i++) {
offCode[i] = code[i];
}
printf("3. Please send and hold (one of the) ALL buttons.\n");
printf(" If you're remote doesn't support turning ON or OFF\n");
printf(" all devices at once, press the same OFF button as in\n");
printf(" the beginning.");
break;
case ALL:
z=0;
memset(temp,-1,75);
/* Store the ALL code */
for(i=0;i<binaryLength;i++) {
allBinary[i] = binary[i];
if(allBinary[i] != onBinary[i]) {
temp[z++] = i;
}
}
for(i=0;i<rawLength;i++) {
allCode[i] = code[i];
}
/* Compare the ALL code to the ON and OFF code and store the differences */
y=0;
for(i=0;i<binaryLength;i++) {
if(allBinary[i] != offBinary[i]) {
all[y++] = i;
}
}
if((unsigned int)z < y) {
for(i=0;i<z;i++) {
all[z]=temp[z];
}
}
printf("4. Please send and hold the ON button with the lowest ID.");
break;
case UNIT1:
/* Store the lowest unit code */
for(i=0;i<binaryLength;i++) {
unit1Binary[i] = binary[i];
}
for(i=0;i<rawLength;i++) {
unit1Code[i] = code[i];
}
printf("5. Please send and hold the ON button with the second to lowest ID.");
break;
case UNIT2:
/* Store the second to lowest unit code */
for(i=0;i<binaryLength;i++) {
unit2Binary[i] = binary[i];
}
for(i=0;i<rawLength;i++) {
unit2Code[i] = code[i];
}
printf("6. Please send and hold the ON button with the highest ID.");
break;
case PROCESSUNIT:
z=0;
/* Store the highest unit code and compare the three codes. Store all
bit that are different */
for(i=0;i<binaryLength;i++) {
unit3Binary[i] = binary[i];
if((unit2Binary[i] != unit1Binary[i]) || (unit1Binary[i] != unit3Binary[i]) || (unit2Binary[i] != unit3Binary[i])) {
unit[z++]=i;
}
}
for(i=0;i<rawLength;i++) {
unit3Code[i] = code[i];
}
state=STOP;
break;
case WAIT:
case STOP:
default:;
}
fflush(stdout);
if(state!=WAIT)
pState=state;
if(state==STOP)
loop = 0;
else
state=WAIT;
duration = hardware->receive();
/* If we are recording, keep recording until the next footer has been matched */
if(recording == 1) {
if(bit < 255) {
raw[bit++] = duration;
} else {
bit = 0;
recording = 0;
}
}
/* First try to catch code that seems to be a footer.
If a real footer has been recognized, start using that as the new footer */
if((duration > 4440 && footer == 0) || ((footer-(footer*0.1)<duration) && (footer+(footer*0.1)>duration))) {
recording = 1;
pulse_length = duration/PULSE_DIV;
/* Check if we are recording similar codes */
for(i=0;i<(bit-1);i++) {
if(!(((pRaw[i]-(pRaw[i]*0.3)) < raw[i]) && ((pRaw[i]+(pRaw[i]*0.3)) > raw[i]))) {
y=0;
z=0;
recording=0;
}
pRaw[i]=raw[i];
}
y++;
/* Continue if we have 2 matches */
if(y>2) {
/* If we are certain we are recording similar codes.
Save the raw code length */
if(footer>0) {
if(rawLength == 0)
rawLength=bit;
}
if(rawLength == 0 || rawLength == bit) {
/* Try to catch the footer, and the low and high values */
for(i=0;i<bit;i++) {
if((i+1)<bit && i > 2 && footer > 0) {
if((raw[i]/pulse_length) >= 2) {
pulse=raw[i];
}
}
if(duration > 5000 && duration < 100000)
footer=raw[i];
}
/* If we have gathered all data, stop with the loop */
if(footer > 0 && pulse > 0 && rawLength > 0) {
/* Convert the raw code into binary code */
for(i=0;i<rawLength;i++) {
if((unsigned int)raw[i] > (pulse-pulse_length)) {
code[i]=1;
} else {
code[i]=0;
}
}
for(i=2;i<rawLength; i+=4) {
if(code[i+1] == 1) {
binary[i/4]=1;
} else {
binary[i/4]=0;
}
}
if(binaryLength == 0)
binaryLength = (int)((float)i/4);
/* Check if the subsequent binary code matches
to check if the same button was still held */
if(binaryLength == (i/4)) {
for(i=0;i<binaryLength;i++) {
if(pBinary[i] != binary[i]) {
z=1;
}
}
/* If we are capturing a different button
continue to the next step */
if(z==1 || state == CAPTURE) {
switch(pState) {
case CAPTURE:
state=ON;
break;
case ON:
state=OFF;
break;
case OFF:
state=ALL;
break;
case ALL:
state=UNIT1;
break;
case UNIT1:
state=UNIT2;
break;
case UNIT2:
state=PROCESSUNIT;
break;
case PROCESSUNIT:
state=STOP;
break;
case WAIT:
case STOP:
default:;
}
printf(" Done.\n\n");
pState=WAIT;
}
}
}
}
}
bit=0;
}
/* Reset the button repeat counter */
if(z==1) {
z=0;
for(i=0;i<binaryLength;i++) {
pBinary[i]=binary[i];
}
}
}
rmDup(all, onoff);
rmDup(unit, onoff);
rmDup(all, unit);
/* Print everything */
printf("--[RESULTS]--\n");
printf("\n");
printf("pulse:\t\t%d\n",normalize(pulse));
printf("rawlen:\t\t%d\n",rawLength);
printf("binlen:\t\t%d\n",binaryLength);
printf("plslen:\t\t%d\n",pulse_length);
printf("\n");
printf("on-off bit(s):\t");
z=0;
while(onoff[z] > -1) {
printf("%d ",onoff[z++]);
}
printf("\n");
printf("all bit(s):\t");
z=0;
while(all[z] > -1) {
printf("%d ",all[z++]);
}
printf("\n");
printf("unit bit(s):\t");
z=0;
while(unit[z] > -1) {
printf("%d ",unit[z++]);
}
printf("\n\n");
printf("Raw code:\n");
for(i=0;i<rawLength;i++) {
printf("%d ",normalize(raw[i])*pulse_length);
}
printf("\n");
printf("Raw simplified:\n");
printf("On:\t");
for(i=0;i<rawLength;i++) {
printf("%d",onCode[i]);
}
printf("\n");
printf("Off:\t");
for(i=0;i<rawLength;i++) {
printf("%d",offCode[i]);
}
printf("\n");
printf("All:\t");
for(i=0;i<rawLength;i++) {
printf("%d",allCode[i]);
}
printf("\n");
printf("Unit 1:\t");
for(i=0;i<rawLength;i++) {
printf("%d",unit1Code[i]);
}
printf("\n");
printf("Unit 2:\t");
for(i=0;i<rawLength;i++) {
printf("%d",unit2Code[i]);
}
printf("\n");
printf("Unit 3:\t");
for(i=0;i<rawLength;i++) {
printf("%d",unit3Code[i]);
}
printf("\n");
printf("Binary code:\n");
printf("On:\t");
for(i=0;i<binaryLength;i++) {
printf("%d",onBinary[i]);
}
printf("\n");
printf("Off:\t");
for(i=0;i<binaryLength;i++) {
printf("%d",offBinary[i]);
}
printf("\n");
printf("All:\t");
for(i=0;i<binaryLength;i++) {
printf("%d",allBinary[i]);
}
printf("\n");
printf("Unit 1:\t");
for(i=0;i<binaryLength;i++) {
printf("%d",unit1Binary[i]);
}
printf("\n");
printf("Unit 2:\t");
for(i=0;i<binaryLength;i++) {
printf("%d",unit2Binary[i]);
}
printf("\n");
printf("Unit 3:\t");
for(i=0;i<binaryLength;i++) {
printf("%d",unit3Binary[i]);
}
printf("\n");
return (EXIT_SUCCESS);
}
int main(int argc, char **argv) {
gc_attach(main_gc);
/* Catch all exit signals for gc */
gc_catch();
log_shell_enable();
log_file_disable();
log_level_set(LOG_NOTICE);
struct options_t *options = NULL;
char *args = NULL;
char *hwfile = NULL;
pid_t pid = 0;
if(!(settingsfile = malloc(strlen(SETTINGS_FILE)+1))) {
logprintf(LOG_ERR, "out of memory");
exit(EXIT_FAILURE);
}
strcpy(settingsfile, SETTINGS_FILE);
if(!(progname = malloc(12))) {
logprintf(LOG_ERR, "out of memory");
exit(EXIT_FAILURE);
}
strcpy(progname, "pilight-raw");
options_add(&options, 'H', "help", OPTION_NO_VALUE, 0, JSON_NULL, NULL, NULL);
options_add(&options, 'V', "version", OPTION_NO_VALUE, 0, JSON_NULL, NULL, NULL);
options_add(&options, 'S', "settings", OPTION_HAS_VALUE, 0, JSON_NULL, NULL, NULL);
while (1) {
int c;
c = options_parse(&options, argc, argv, 1, &args);
if(c == -1)
break;
if(c == -2)
c = 'H';
switch (c) {
case 'H':
printf("Usage: %s [options]\n", progname);
printf("\t -H --help\t\tdisplay usage summary\n");
printf("\t -V --version\t\tdisplay version\n");
printf("\t -S --settings\t\tsettings file\n");
return (EXIT_SUCCESS);
break;
case 'V':
printf("%s %s\n", progname, VERSION);
return (EXIT_SUCCESS);
break;
case 'S':
if(access(args, F_OK) != -1) {
settingsfile = realloc(settingsfile, strlen(args)+1);
if(!settingsfile) {
logprintf(LOG_ERR, "out of memory");
exit(EXIT_FAILURE);
}
strcpy(settingsfile, args);
settings_set_file(args);
} else {
fprintf(stderr, "%s: the settings file %s does not exists\n", progname, args);
return EXIT_FAILURE;
}
break;
default:
printf("Usage: %s [options]\n", progname);
return (EXIT_FAILURE);
break;
}
}
options_delete(options);
char pilight_daemon[] = "pilight-daemon";
char pilight_learn[] = "pilight-learn";
char pilight_debug[] = "pilight-debug";
if((pid = findproc(pilight_daemon, NULL)) > 0) {
logprintf(LOG_ERR, "pilight-daemon instance found (%d)", (int)pid);
return (EXIT_FAILURE);
}
if((pid = findproc(pilight_learn, NULL)) > 0) {
logprintf(LOG_ERR, "pilight-learn instance found (%d)", (int)pid);
return (EXIT_FAILURE);
}
if((pid = findproc(pilight_debug, NULL)) > 0) {
logprintf(LOG_ERR, "pilight-debug instance found (%d)", (int)pid);
return (EXIT_FAILURE);
}
if(access(settingsfile, F_OK) != -1) {
if(settings_read() != 0) {
return EXIT_FAILURE;
}
}
hardware_init();
if(settings_find_string("hardware-file", &hwfile) == 0) {
hardware_set_file(hwfile);
if(hardware_read() == EXIT_FAILURE) {
goto clear;
}
}
/* Start threads library that keeps track of all threads used */
threads_create(&pth, NULL, &threads_start, (void *)NULL);
struct conf_hardware_t *tmp_confhw = conf_hardware;
while(tmp_confhw) {
if(tmp_confhw->hardware->init() == EXIT_FAILURE) {
logprintf(LOG_ERR, "could not initialize %s hardware mode", tmp_confhw->hardware->id);
goto clear;
}
threads_register(tmp_confhw->hardware->id, &receive_code, (void *)tmp_confhw->hardware, 0);
tmp_confhw = tmp_confhw->next;
}
while(main_loop) {
sleep(1);
}
clear:
main_gc();
return (EXIT_FAILURE);
}
void ewmh_update_wmname() {
ewmh_set_wmname(settings_find_string("wmname"));
}
