void BaseBytecodeStream::assert_raw_stream(bool want_raw) const {
if (want_raw) {
assert( is_raw(), "this function only works on raw streams");
} else {
assert(!is_raw(), "this function only works on non-raw streams");
}
}
void fprint_remote_signal_foot(FILE *f, struct ir_remote *rem)
{
if(!is_raw(rem))
fprintf(f, " end codes\n\n");
else
fprintf(f, " end raw_codes\n\n");
}
void fprint_remote_signal_head(FILE *f, struct ir_remote *rem)
{
if(!is_raw(rem))
fprintf(f, " begin codes\n");
else
fprintf(f, " begin raw_codes\n\n");
}
/** Print a line for each remote definition in lircd.conf file on path. */
void print_remotes(const char* path)
{
char my_path[256];
char photo[256];
char lircmd[256];
struct ir_remote* r;
FILE* f;
const char* dir;
const char* base;
const char* timing;
strncpy(my_path, path, sizeof(my_path));
base = basename(my_path);
dir = dirname(my_path);
if (strrchr(dir, '/') != NULL)
dir = strrchr(dir, '/') + 1;
f = fopen(path, "r");
if (f == NULL) {
fprintf(stderr, "Cannot open %s (!)\n", path);
return;
}
r = read_config(f, path);
if (opt_silent)
return;
while (r != NULL && r != (void*)-1) {
timing = r->pzero != 0 || r->pzero != 0 || is_raw(r) ?
"timing" : "no_timing";
strncpy(photo, path, sizeof(photo));
get_photo(path, photo, sizeof(photo));
get_lircmd(path, lircmd, sizeof(lircmd));
printf("%s;%s;%s;%s;%s;%s;%s;%s\n",
dir,
base,
lircmd,
photo,
r->name,
timing,
is_raw(r) ? "raw" : "no_raw",
r->driver != NULL ? r->driver : "no_driver");
fflush(stdout);
if (opt_dump)
fprint_remote(stdout, r, "Dumped by lirc-lsremotes");
r = r->next;
}
;
fclose(f);
}
void BaseBytecodeStream::assert_raw_index_size(int size) const {
if (raw_code() == Bytecodes::_invokedynamic && is_raw()) {
// in raw mode, pretend indy is "bJJ__"
assert(size == 2, "raw invokedynamic instruction has 2-byte index only");
} else {
bytecode()->assert_index_size(size, raw_code(), is_wide());
}
}
static int sanityChecks(struct ir_remote *rem)
{
struct ir_ncode *codes;
struct ir_code_node *node;
if (!rem->name)
{
logprintf(LOG_ERR,"you must specify a remote name");
return 0;
}
if(rem->gap == 0)
{
logprintf(LOG_WARNING, "you should specify a valid gap value");
}
if(has_repeat_gap(rem) && is_const(rem))
{
logprintf(LOG_WARNING, "repeat_gap will be ignored if "
"CONST_LENGTH flag is set");
}
if(is_raw(rem)) return 1;
if((rem->pre_data&gen_mask(rem->pre_data_bits)) != rem->pre_data)
{
logprintf(LOG_WARNING, "invalid pre_data found for %s",
rem->name);
rem->pre_data &= gen_mask(rem->pre_data_bits);
}
if((rem->post_data&gen_mask(rem->post_data_bits)) != rem->post_data)
{
logprintf(LOG_WARNING, "invalid post_data found for %s",
rem->name);
rem->post_data &= gen_mask(rem->post_data_bits);
}
for(codes = rem->codes; codes->name != NULL; codes++)
{
if((codes->code&gen_mask(rem->bits)) != codes->code)
{
logprintf(LOG_WARNING, "invalid code found for %s: %s",
rem->name, codes->name);
codes->code &= gen_mask(rem->bits);
}
for(node = codes->next; node != NULL; node = node->next)
{
if((node->code&gen_mask(rem->bits)) != node->code)
{
logprintf(LOG_WARNING, "invalid code found "
"for %s: %s",
rem->name, codes->name);
node->code &= gen_mask(rem->bits);
}
}
}
return 1;
}
void fprint_remote_signal(FILE *f,struct ir_remote *rem, struct ir_ncode *codes)
{
int i,j;
if(!is_raw(rem))
{
char format[30];
struct ir_code_node *loop;
# ifdef LONG_IR_CODE
sprintf(format, " %%-24s 0x%%0%dllX",
(rem->bits+3)/4);
# else
sprintf(format, " %%-24s 0x%%0%dlX",
(rem->bits+3)/4);
# endif
fprintf(f, format, codes->name, codes->code);
sprintf(format, " 0x%%0%dlX", (rem->bits+3)/4);
for(loop=codes->next; loop!=NULL; loop=loop->next)
{
fprintf(f, format, loop->code);
}
fprintf(f, "\n");
}
else
{
fprintf(f, " name %s\n",codes->name);
j=0;
for(i=0;i<codes->length;i++){
if (j==0){
fprintf(f, " %7lu",
(unsigned long) codes->signals[i]);
}else if (j<5){
fprintf(f, " %7lu",
(unsigned long) codes->signals[i]);
}else{
fprintf(f, " %7lu\n",
(unsigned long) codes->signals[i]);
j=-1;
}
j++;
}
codes++;
if (j==0)
{
fprintf(f,"\n");
}else
{
fprintf(f,"\n\n");
j=0;
}
}
}
void fprint_remote_signal(FILE* f, const struct ir_remote* rem, const struct ir_ncode* codes)
{
int i, j;
if (!is_raw(rem)) {
char format[30];
const struct ir_code_node* loop;
sprintf(format, " %%-24s 0x%%0%dllX", (rem->bits + 3) / 4);
fprintf(f, format, codes->name, codes->code);
sprintf(format, " 0x%%0%dlX", (rem->bits + 3) / 4);
for (loop = codes->next; loop != NULL; loop = loop->next)
fprintf(f, format, loop->code);
fprintf(f, "\n");
} else {
fprintf(f, " name %s\n", codes->name);
j = 0;
for (i = 0; i < codes->length; i++) {
if (j == 0) {
fprintf(f, " %7u", (__u32)codes->signals[i]);
} else if (j < 5) {
fprintf(f, " %7u", (__u32)codes->signals[i]);
} else {
fprintf(f, " %7u\n", (__u32)codes->signals[i]);
j = -1;
}
j++;
}
codes++;
if (j == 0) {
fprintf(f, "\n");
} else {
fprintf(f, "\n\n");
}
}
}
static struct ir_remote * read_config_recursive(FILE *f, const char *name, int depth)
{
char buf[LINE_LEN+1], *key, *val, *val2;
int len,argc;
struct ir_remote *top_rem=NULL,*rem=NULL;
struct void_array codes_list,raw_codes,signals;
struct ir_ncode raw_code={NULL,0,0,NULL};
struct ir_ncode name_code={NULL,0,0,NULL};
struct ir_ncode *code;
int mode=ID_none;
line=0;
parse_error=0;
LOGPRINTF(2, "parsing '%s'", name);
while(fgets(buf,LINE_LEN,f)!=NULL)
{
line++;
len=strlen(buf);
if(len==LINE_LEN && buf[len-1]!='\n')
{
logprintf(LOG_ERR,"line %d too long in config file",
line);
parse_error=1;
break;
}
if(len>0)
{
len--;
if(buf[len]=='\n') buf[len]=0;
}
if(len>0)
{
len--;
if(buf[len]=='\r') buf[len]=0;
}
/* ignore comments */
if(buf[0]=='#'){
continue;
}
key=strtok(buf, whitespace);
/* ignore empty lines */
if(key==NULL) continue;
val=strtok(NULL, whitespace);
if(val!=NULL){
val2=strtok(NULL, whitespace);
LOGPRINTF(3,"\"%s\" \"%s\"",key,val);
if (strcasecmp("include",key)==0){
FILE* childFile;
const char *childName;
const char *fullPath;
char result[FILENAME_MAX+1];
if (depth > MAX_INCLUDES) {
logprintf(LOG_ERR,"error opening child file defined at %s:%d",name,line);
logprintf(LOG_ERR,"too many files included");
parse_error=-1;
break;
}
childName = lirc_parse_include(val);
if (!childName){
logprintf(LOG_ERR,"error parsing child file value defined at line %d:",line);
logprintf(LOG_ERR,"invalid quoting");
parse_error=-1;
break;
}
fullPath = lirc_parse_relative(result, sizeof(result), childName, name);
if (!fullPath) {
logprintf(LOG_ERR,"error composing relative file path defined at line %d:",line);
logprintf(LOG_ERR,"resulting path too long");
parse_error=-1;
break;
}
childFile = fopen(fullPath, "r");
if (childFile == NULL){
logprintf(LOG_ERR,"error opening child file '%s' defined at line %d:",fullPath, line);
logprintf(LOG_ERR,"ignoring this child file for now.");
}
else{
int save_line = line;
if (!top_rem){
/* create first remote */
LOGPRINTF(2,"creating first remote");
rem = read_config_recursive(childFile, fullPath, depth + 1);
if(rem != (void *) -1 && rem != NULL) {
top_rem = rem;
} else {
rem = NULL;
}
}else{
/* create new remote */
LOGPRINTF(2,"creating next remote");
rem->next=read_config_recursive(childFile, fullPath, depth + 1);
if(rem->next != (void *) -1 && rem->next != NULL) {
rem=rem->next;
} else {
rem->next = NULL;
}
}
fclose(childFile);
line = save_line;
}
}else if (strcasecmp("begin",key)==0){
if (strcasecmp("codes", val)==0){
/* init codes mode */
LOGPRINTF(2," begin codes");
if (!checkMode(mode, ID_remote,
"begin codes")) break;
if (rem->codes){
logprintf(LOG_ERR,"error in configfile line %d:",line);
logprintf(LOG_ERR,"codes are already defined");
parse_error=1;
break;
}
init_void_array(&codes_list,30, sizeof(struct ir_ncode));
mode=ID_codes;
}else if(strcasecmp("raw_codes",val)==0){
/* init raw_codes mode */
LOGPRINTF(2," begin raw_codes");
if(!checkMode(mode, ID_remote,
"begin raw_codes")) break;
if (rem->codes){
logprintf(LOG_ERR,"error in configfile line %d:",line);
logprintf(LOG_ERR,"codes are already defined");
parse_error=1;
break;
}
set_protocol(rem, RAW_CODES);
raw_code.code=0;
init_void_array(&raw_codes,30, sizeof(struct ir_ncode));
mode=ID_raw_codes;
}else if(strcasecmp("remote",val)==0){
/* create new remote */
LOGPRINTF(1,"parsing remote");
if(!checkMode(mode, ID_none,
"begin remote")) break;
mode=ID_remote;
if (!top_rem){
/* create first remote */
LOGPRINTF(2,"creating first remote");
rem=top_rem=s_malloc(sizeof(struct ir_remote));
}else{
/* create new remote */
LOGPRINTF(2,"creating next remote");
rem->next=s_malloc(sizeof(struct ir_remote));;
rem=rem->next;
}
}else if(mode==ID_codes){
code=defineCode(key, val, &name_code);
while(!parse_error && val2!=NULL)
{
struct ir_code_node *node;
if(val2[0]=='#') break; /* comment */
node=defineNode(code, val2);
val2=strtok(NULL, whitespace);
}
code->current=NULL;
add_void_array(&codes_list, code);
}else{
logprintf(LOG_ERR,"error in configfile line %d:",line);
logprintf(LOG_ERR,"unknown section \"%s\"",val);
parse_error=1;
}
if(!parse_error && val2!=NULL)
{
logprintf(LOG_WARNING,"garbage after "
"'%s' token in line %d ignored",
val,line);
}
}else if (strcasecmp("end",key)==0){
if (strcasecmp("codes", val)==0){
/* end Codes mode */
LOGPRINTF(2," end codes");
if (!checkMode(mode, ID_codes,
"end codes")) break;
rem->codes=get_void_array(&codes_list);
mode=ID_remote; /* switch back */
}else if(strcasecmp("raw_codes",val)==0){
/* end raw codes mode */
LOGPRINTF(2," end raw_codes");
if(mode==ID_raw_name){
raw_code.signals=get_void_array(&signals);
raw_code.length=signals.nr_items;
if(raw_code.length%2==0)
{
logprintf(LOG_ERR,"error in configfile line %d:",line);
logprintf(LOG_ERR,"bad signal length");
parse_error=1;
}
if(!add_void_array(&raw_codes, &raw_code))
break;
mode=ID_raw_codes;
}
if(!checkMode(mode,ID_raw_codes,
"end raw_codes")) break;
rem->codes=get_void_array(&raw_codes);
mode=ID_remote; /* switch back */
}else if(strcasecmp("remote",val)==0){
/* end remote mode */
LOGPRINTF(2,"end remote");
/* print_remote(rem); */
if (!checkMode(mode,ID_remote,
"end remote")) break;
if(!sanityChecks(rem)) {
parse_error=1;
break;
}
# ifdef DYNCODES
if(rem->dyncodes_name==NULL)
{
rem->dyncodes_name=s_strdup("unknown");
}
rem->dyncodes[0].name=rem->dyncodes_name;
rem->dyncodes[1].name=rem->dyncodes_name;
# endif
/* not really necessary because we
clear the alloced memory */
rem->next=NULL;
rem->last_code=NULL;
mode=ID_none; /* switch back */
}else if(mode==ID_codes){
code=defineCode(key, val, &name_code);
while(!parse_error && val2!=NULL)
{
struct ir_code_node *node;
if(val2[0]=='#') break; /* comment */
node=defineNode(code, val2);
val2=strtok(NULL, whitespace);
}
code->current=NULL;
add_void_array(&codes_list, code);
}else{
logprintf(LOG_ERR,"error in configfile line %d:",line);
logprintf(LOG_ERR,"unknown section %s",val);
parse_error=1;
}
if(!parse_error && val2!=NULL)
{
logprintf(LOG_WARNING,"garbage after '%s'"
" token in line %d ignored",
val,line);
}
} else {
switch (mode){
case ID_remote:
argc=defineRemote(key, val, val2, rem);
if(!parse_error && ((argc==1 && val2!=NULL) ||
(argc==2 && val2!=NULL && strtok(NULL, whitespace)!=NULL)))
{
logprintf(LOG_WARNING,"garbage after '%s'"
" token in line %d ignored",
key,line);
}
break;
case ID_codes:
code=defineCode(key, val, &name_code);
while(!parse_error && val2!=NULL)
{
struct ir_code_node *node;
if(val2[0]=='#') break; /* comment */
node=defineNode(code, val2);
val2=strtok(NULL, whitespace);
}
code->current=NULL;
add_void_array(&codes_list, code);
break;
case ID_raw_codes:
case ID_raw_name:
if(strcasecmp("name",key)==0){
LOGPRINTF(3,"Button: \"%s\"",val);
if(mode==ID_raw_name)
{
raw_code.signals=get_void_array(&signals);
raw_code.length=signals.nr_items;
if(raw_code.length%2==0)
{
logprintf(LOG_ERR,"error in configfile line %d:",line);
logprintf(LOG_ERR,"bad signal length");
parse_error=1;
}
if(!add_void_array(&raw_codes, &raw_code))
break;
}
if(!(raw_code.name=s_strdup(val))){
break;
}
raw_code.code++;
init_void_array(&signals,50,sizeof(lirc_t));
mode=ID_raw_name;
if(!parse_error && val2!=NULL)
{
logprintf(LOG_WARNING,"garbage after '%s'"
" token in line %d ignored",
key,line);
}
}else{
if(mode==ID_raw_codes)
{
logprintf(LOG_ERR,"no name for signal defined at line %d",line);
parse_error=1;
break;
}
if(!addSignal(&signals, key)) break;
if(!addSignal(&signals, val)) break;
if (val2){
if (!addSignal(&signals, val2)){
break;
}
}
while ((val=strtok(NULL, whitespace))){
if (!addSignal(&signals, val)) break;
}
}
break;
}
}
}else if(mode==ID_raw_name){
if(!addSignal(&signals, key)){
break;
}
}else{
logprintf(LOG_ERR,"error in configfile line %d", line);
parse_error=1;
break;
}
if (parse_error){
break;
}
}
if(mode!=ID_none)
{
switch(mode)
{
case ID_raw_name:
if(raw_code.name!=NULL)
{
free(raw_code.name);
if(get_void_array(&signals)!=NULL)
free(get_void_array(&signals));
}
case ID_raw_codes:
rem->codes=get_void_array(&raw_codes);
break;
case ID_codes:
rem->codes=get_void_array(&codes_list);
break;
}
if(!parse_error)
{
logprintf(LOG_ERR,"unexpected end of file");
parse_error=1;
}
}
if (parse_error){
static int print_error = 1;
if(print_error) {
logprintf(LOG_ERR, "reading of file '%s' failed",
name);
print_error = 0;
}
free_config(top_rem);
if(depth == 0) print_error = 1;
return((void *) -1);
}
/* kick reverse flag */
/* handle RC6 flag to be backwards compatible: previous RC-6
config files did not set rc6_mask */
rem=top_rem;
while(rem!=NULL)
{
if((!is_raw(rem)) && rem->flags&REVERSE)
{
struct ir_ncode *codes;
if(has_pre(rem))
{
rem->pre_data=reverse(rem->pre_data,
rem->pre_data_bits);
}
if(has_post(rem))
{
rem->post_data=reverse(rem->post_data,
rem->post_data_bits);
}
codes=rem->codes;
while(codes->name!=NULL)
{
codes->code=reverse(codes->code,rem->bits);
codes++;
}
rem->flags=rem->flags&(~REVERSE);
rem->flags=rem->flags|COMPAT_REVERSE;
/* don't delete the flag because we still need
it to remain compatible with older versions
*/
}
if(rem->flags&RC6 && rem->rc6_mask==0 && rem->toggle_bit>0)
{
int all_bits=bit_count(rem);
rem->rc6_mask=((ir_code) 1)<<(all_bits-rem->toggle_bit);
}
if(rem->toggle_bit > 0)
{
int all_bits=bit_count(rem);
if(has_toggle_bit_mask(rem))
{
logprintf(LOG_WARNING,
"%s uses both toggle_bit and "
"toggle_bit_mask", rem->name);
}
else
{
rem->toggle_bit_mask=((ir_code) 1)<<(all_bits-rem->toggle_bit);
}
rem->toggle_bit = 0;
}
if(has_toggle_bit_mask(rem))
{
if(!is_raw(rem) && rem->codes)
{
rem->toggle_bit_mask_state = (rem->codes->code & rem->toggle_bit_mask);
if(rem->toggle_bit_mask_state)
{
/* start with state set to 0 for backwards compatibility */
rem->toggle_bit_mask_state ^= rem->toggle_bit_mask;
}
}
}
if(is_serial(rem))
{
lirc_t base;
if(rem->baud>0)
{
base=1000000/rem->baud;
if(rem->pzero==0 && rem->szero==0)
{
rem->pzero=base;
}
if(rem->pone==0 && rem->sone==0)
{
rem->sone=base;
}
}
if(rem->bits_in_byte==0)
{
rem->bits_in_byte=8;
}
}
if(rem->min_code_repeat>0)
{
if(!has_repeat(rem) ||
rem->min_code_repeat>rem->min_repeat)
{
logprintf(LOG_WARNING,
"invalid min_code_repeat value");
rem->min_code_repeat = 0;
}
}
calculate_signal_lengths(rem);
rem=rem->next;
}
top_rem = sort_by_bit_count(top_rem);
# if defined(DEBUG) && !defined(DAEMONIZE)
/*fprint_remotes(stderr, top_rem);*/
# endif
return (top_rem);
}
void fprint_remote_head(FILE *f, struct ir_remote *rem)
{
fprintf(f, "begin remote\n\n");
if(!is_raw(rem)){
fprintf(f, " name %s\n",rem->name);
fprintf(f, " bits %5d\n",rem->bits);
fprint_flags(f,rem->flags);
fprintf(f, " eps %5d\n",rem->eps);
fprintf(f, " aeps %5d\n\n",rem->aeps);
if(has_header(rem))
{
fprintf(f, " header %5lu %5lu\n",
(unsigned long) rem->phead,
(unsigned long) rem->shead);
}
if(rem->pthree!=0 || rem->sthree!=0)
fprintf(f, " three %5lu %5lu\n",
(unsigned long) rem->pthree,
(unsigned long) rem->sthree);
if(rem->ptwo!=0 || rem->stwo!=0)
fprintf(f, " two %5lu %5lu\n",
(unsigned long) rem->ptwo,
(unsigned long) rem->stwo);
fprintf(f, " one %5lu %5lu\n",
(unsigned long) rem->pone,
(unsigned long) rem->sone);
fprintf(f, " zero %5lu %5lu\n",
(unsigned long) rem->pzero,
(unsigned long) rem->szero);
if(rem->ptrail!=0)
{
fprintf(f, " ptrail %5lu\n",
(unsigned long) rem->ptrail);
}
if(rem->plead!=0)
{
fprintf(f, " plead %5lu\n",
(unsigned long) rem->plead);
}
if(has_foot(rem))
{
fprintf(f, " foot %5lu %5lu\n",
(unsigned long) rem->pfoot,
(unsigned long) rem->sfoot);
}
if(has_repeat(rem))
{
fprintf(f, " repeat %5lu %5lu\n",
(unsigned long) rem->prepeat,
(unsigned long) rem->srepeat);
}
if(rem->pre_data_bits>0)
{
fprintf(f, " pre_data_bits %d\n",rem->pre_data_bits);
# ifdef LONG_IR_CODE
fprintf(f, " pre_data 0x%llX\n",rem->pre_data);
# else
fprintf(f, " pre_data 0x%lX\n",rem->pre_data);
# endif
}
if(rem->post_data_bits>0)
{
fprintf(f, " post_data_bits %d\n",rem->post_data_bits);
# ifdef LONG_IR_CODE
fprintf(f, " post_data 0x%llX\n",rem->post_data);
# else
fprintf(f, " post_data 0x%lX\n",rem->post_data);
# endif
}
if(rem->pre_p!=0 && rem->pre_s!=0)
{
fprintf(f, " pre %5lu %5lu\n",
(unsigned long) rem->pre_p,
(unsigned long) rem->pre_s);
}
if(rem->post_p!=0 && rem->post_s!=0)
{
fprintf(f, " post %5lu %5lu\n",
(unsigned long) rem->post_p,
(unsigned long) rem->post_s);
}
fprintf(f, " gap %lu\n",
(unsigned long) rem->gap);
if(has_repeat_gap(rem))
{
fprintf(f, " repeat_gap %lu\n",
(unsigned long) rem->repeat_gap);
}
if(rem->min_repeat>0)
{
fprintf(f, " min_repeat %d\n",rem->min_repeat);
}
if(rem->min_code_repeat>0)
{
fprintf(f, " min_code_repeat %d\n",
rem->min_code_repeat);
}
# ifdef LONG_IR_CODE
fprintf(f, " toggle_bit_mask 0x%llX\n",
rem->toggle_bit_mask);
# else
fprintf(f, " toggle_bit_mask 0x%lX\n",
rem->toggle_bit_mask);
# endif
if(has_toggle_mask(rem))
{
# ifdef LONG_IR_CODE
fprintf(f, " toggle_mask 0x%llX\n",
rem->toggle_mask);
# else
fprintf(f, " toggle_mask 0x%lX\n",
rem->toggle_mask);
# endif
}
if(rem->rc6_mask!=0)
{
# ifdef LONG_IR_CODE
fprintf(f, " rc6_mask 0x%llX\n",
rem->rc6_mask);
# else
fprintf(f, " rc6_mask 0x%lX\n",
rem->rc6_mask);
# endif
}
if(is_serial(rem))
{
fprintf(f, " baud %d\n",rem->baud);
fprintf(f, " serial_mode %dN%d%s\n",
rem->bits_in_byte,
rem->stop_bits/2,
rem->stop_bits%2 ? ".5":"");
}
}
else
{
fprintf(f, " name %s\n",rem->name);
fprint_flags(f,rem->flags);
fprintf(f, " eps %5d\n",rem->eps);
fprintf(f, " aeps %5d\n\n",rem->aeps);
fprintf(f, " ptrail %5lu\n",(unsigned long) rem->ptrail);
fprintf(f, " repeat %5lu %5lu\n",
(unsigned long) rem->prepeat,
(unsigned long) rem->srepeat);
fprintf(f, " gap %lu\n",(unsigned long) rem->gap);
}
if(rem->freq!=0)
{
fprintf(f, " frequency %u\n",rem->freq);
}
if(rem->duty_cycle!=0)
{
fprintf(f, " duty_cycle %u\n",rem->duty_cycle);
}
fprintf(f,"\n");
}
void preprocess(char*& str)
{
const char* read = str; // Reads the string
char* write = str; // Writes into the string
size_t line = 1;
// Nested comments level handle
stack<comment_t> level;
// Whether a string is a raw string
bool raw = false;
// Cross the string
while (*read != '\0')
{
if (*read == '"')
{
// Found a string
if (level.empty())
{
// Overall priority
raw = is_raw(read);
while (*read)
{
*write++ = *read++;
if (*read == '"'
&& (raw || !is_escaped(read)))
{
*write++ = *read++;
break;
}
}
}
else if (level.top() == comment_t::BLOCK)
{
// Overall priority
raw = is_raw(read);
while (*read)
{
++read;
if (*read == '"'
&& (raw || !is_escaped(read)))
{
++read;
break;
}
}
}
}
else if (*read == '#')
{
if (level.empty())
{
// Skip all until the end of the line
while (*++read && *read != '\n');
}
else
{
if (*++read == '$')
{
// Level down the comments level
level.pop();
++read;
}
else if (level.top() == comment_t::BLOCK)
{
// Skip all until the end of the line
while (*++read && *read != '\n');
*write++ = '\n';
}
}
}
else if (*read == '$')
{
if (*++read == '#')
{
// Simple block comment
level.push(comment_t::BLOCK);
++read;
}
else if (*read == '$' && *++read == '#')
{
// Documentation block
level.push(comment_t::DOC);
++read;
}
else if (level.empty())
{
error(error_t::STRAY_CHAR, line, '$');
}
}
if (level.empty() || *read == '\n')
{
if (*read == '\n')
{
++line;
}
// Copy the characters in the string
// Also copy the new lines to keep track
// of the lines where errors may appear
*write++ = *read++;
}
else
{
++read;
}
}
*write++ = '\0'; // nul-terminate the string
// Shrink the string to reduce memory usage
char* new_str = new char[write-str+1];
strcpy(new_str, str);
delete[] str;
str = new_str;
}
int receive_decode(struct ir_remote *remote,
ir_code *prep,ir_code *codep,ir_code *postp,
int *repeat_flagp,lirc_t *remaining_gapp)
{
ir_code pre,code,post,code_mask=0,post_mask=0;
lirc_t sync;
int header;
struct timeval current;
sync=0; /* make compiler happy */
code=pre=post=0;
header=0;
if(hw.rec_mode==LIRC_MODE_MODE2 ||
hw.rec_mode==LIRC_MODE_PULSE ||
hw.rec_mode==LIRC_MODE_RAW)
{
rewind_rec_buffer();
rec_buffer.is_biphase=is_biphase(remote) ? 1:0;
/* we should get a long space first */
if(!(sync=sync_rec_buffer(remote)))
{
LOGPRINTF(1,"failed on sync");
return(0);
}
LOGPRINTF(1,"sync");
if(has_repeat(remote) && last_remote==remote)
{
if(remote->flags&REPEAT_HEADER && has_header(remote))
{
if(!get_header(remote))
{
LOGPRINTF(1,"failed on repeat "
"header");
return(0);
}
LOGPRINTF(1,"repeat header");
}
if(get_repeat(remote))
{
if(remote->last_code==NULL)
{
logprintf(LOG_NOTICE,"repeat code "
"without last_code "
"received");
return(0);
}
*prep=remote->pre_data;
*codep=remote->last_code->code;
*postp=remote->post_data;
*repeat_flagp=1;
*remaining_gapp=
is_const(remote) ?
(remote->gap>rec_buffer.sum ?
remote->gap-rec_buffer.sum:0):
(has_repeat_gap(remote) ?
remote->repeat_gap:remote->gap);
return(1);
}
else
{
LOGPRINTF(1,"no repeat");
rewind_rec_buffer();
sync_rec_buffer(remote);
}
}
if(has_header(remote))
{
header=1;
if(!get_header(remote))
{
header=0;
if(!(remote->flags&NO_HEAD_REP &&
(sync<=remote->gap+remote->gap*remote->eps/100
|| sync<=remote->gap+remote->aeps)))
{
LOGPRINTF(1,"failed on header");
return(0);
}
}
LOGPRINTF(1,"header");
}
}
if(is_raw(remote))
{
struct ir_ncode *codes,*found;
int i;
if(hw.rec_mode==LIRC_MODE_CODE ||
hw.rec_mode==LIRC_MODE_LIRCCODE)
return(0);
codes=remote->codes;
found=NULL;
while(codes->name!=NULL && found==NULL)
{
found=codes;
for(i=0;i<codes->length;)
{
if(!expectpulse(remote,codes->signals[i++]))
{
found=NULL;
rewind_rec_buffer();
sync_rec_buffer(remote);
break;
}
if(i<codes->length &&
!expectspace(remote,codes->signals[i++]))
{
found=NULL;
rewind_rec_buffer();
sync_rec_buffer(remote);
break;
}
}
codes++;
}
if(found!=NULL)
{
if(!get_gap(remote,
is_const(remote) ?
remote->gap-rec_buffer.sum:
remote->gap))
found=NULL;
}
if(found==NULL) return(0);
code=found->code;
}
else
{
if(hw.rec_mode==LIRC_MODE_CODE ||
hw.rec_mode==LIRC_MODE_LIRCCODE)
{
int i;
lirc_t sum;
# ifdef LONG_IR_CODE
LOGPRINTF(1,"decoded: %llx",rec_buffer.decoded);
# else
LOGPRINTF(1,"decoded: %lx",rec_buffer.decoded);
# endif
if((hw.rec_mode==LIRC_MODE_CODE &&
hw.code_length<remote->pre_data_bits
+remote->bits+remote->post_data_bits)
||
(hw.rec_mode==LIRC_MODE_LIRCCODE &&
hw.code_length!=remote->pre_data_bits
+remote->bits+remote->post_data_bits))
{
return(0);
}
for(i=0;i<remote->post_data_bits;i++)
{
post_mask=(post_mask<<1)+1;
}
post=rec_buffer.decoded&post_mask;
post_mask=0;
rec_buffer.decoded=
rec_buffer.decoded>>remote->post_data_bits;
for(i=0;i<remote->bits;i++)
{
code_mask=(code_mask<<1)+1;
}
code=rec_buffer.decoded&code_mask;
code_mask=0;
pre=rec_buffer.decoded>>remote->bits;
gettimeofday(¤t,NULL);
sum=remote->phead+remote->shead+
lirc_t_max(remote->pone+remote->sone,
remote->pzero+remote->szero)*
(remote->bits+
remote->pre_data_bits+
remote->post_data_bits)+
remote->plead+
remote->ptrail+
remote->pfoot+remote->sfoot+
remote->pre_p+remote->pre_s+
remote->post_p+remote->post_s;
rec_buffer.sum=sum>=remote->gap ? remote->gap-1:sum;
sync=time_elapsed(&remote->last_send,¤t)-
rec_buffer.sum;
}
else
{
if(!get_lead(remote))
void fprint_remote_head(FILE* f, const struct ir_remote* rem)
{
fprintf(f, "begin remote\n\n");
fprintf(f, " name %s\n", rem->name);
if (rem->manual_sort)
fprintf(f, " manual_sort %d\n", rem->manual_sort);
if (rem->driver)
fprintf(f, " driver %s\n", rem->driver);
if (!is_raw(rem))
fprintf(f, " bits %5d\n", rem->bits);
fprint_flags(f, rem->flags);
fprintf(f, " eps %5d\n", rem->eps);
fprintf(f, " aeps %5d\n\n", rem->aeps);
if (!is_raw(rem)) {
if (has_header(rem))
fprintf(f, " header %5u %5u\n", (__u32)rem->phead, (__u32)rem->shead);
if (rem->pthree != 0 || rem->sthree != 0)
fprintf(f, " three %5u %5u\n", (__u32)rem->pthree, (__u32)rem->sthree);
if (rem->ptwo != 0 || rem->stwo != 0)
fprintf(f, " two %5u %5u\n", (__u32)rem->ptwo, (__u32)rem->stwo);
fprintf(f, " one %5u %5u\n", (__u32)rem->pone, (__u32)rem->sone);
fprintf(f, " zero %5u %5u\n", (__u32)rem->pzero, (__u32)rem->szero);
}
if (rem->ptrail != 0)
fprintf(f, " ptrail %5u\n", (__u32)rem->ptrail);
if (!is_raw(rem)) {
if (rem->plead != 0)
fprintf(f, " plead %5u\n", (__u32)rem->plead);
if (has_foot(rem))
fprintf(f, " foot %5u %5u\n", (__u32)rem->pfoot, (__u32)rem->sfoot);
}
if (has_repeat(rem))
fprintf(f, " repeat %5u %5u\n", (__u32)rem->prepeat, (__u32)rem->srepeat);
if (!is_raw(rem)) {
if (rem->pre_data_bits > 0) {
fprintf(f, " pre_data_bits %d\n", rem->pre_data_bits);
fprintf(f, " pre_data 0x%llX\n", (unsigned long long)rem->pre_data);
}
if (rem->post_data_bits > 0) {
fprintf(f, " post_data_bits %d\n", rem->post_data_bits);
fprintf(f, " post_data 0x%llX\n", (unsigned long long)rem->post_data);
}
if (rem->pre_p != 0 && rem->pre_s != 0)
fprintf(f, " pre %5u %5u\n", (__u32)rem->pre_p, (__u32)rem->pre_s);
if (rem->post_p != 0 && rem->post_s != 0)
fprintf(f, " post %5u %5u\n", (__u32)rem->post_p, (__u32)rem->post_s);
}
fprint_remote_gap(f, rem);
if (has_repeat_gap(rem))
fprintf(f, " repeat_gap %u\n", (__u32)rem->repeat_gap);
if (rem->suppress_repeat > 0)
fprintf(f, " suppress_repeat %d\n", rem->suppress_repeat);
if (rem->min_repeat > 0) {
fprintf(f, " min_repeat %d\n", rem->min_repeat);
if (rem->suppress_repeat == 0) {
fprintf(f, "# suppress_repeat %d\n", rem->min_repeat);
fprintf(f, "# uncomment to suppress unwanted repeats\n");
}
}
if (!is_raw(rem)) {
if (rem->min_code_repeat > 0)
fprintf(f, " min_code_repeat %d\n", rem->min_code_repeat);
fprintf(f, " toggle_bit_mask 0x%llX\n", (unsigned long long)rem->toggle_bit_mask);
if (has_toggle_mask(rem))
fprintf(f, " toggle_mask 0x%llX\n", (unsigned long long)rem->toggle_mask);
if (rem->repeat_mask != 0)
fprintf(f, " repeat_mask 0x%llX\n", (unsigned long long)rem->repeat_mask);
if (rem->rc6_mask != 0)
fprintf(f, " rc6_mask 0x%llX\n", (unsigned long long)rem->rc6_mask);
if (has_ignore_mask(rem))
fprintf(f, " ignore_mask 0x%llX\n", (unsigned long long)rem->ignore_mask);
if (is_serial(rem)) {
fprintf(f, " baud %d\n", rem->baud);
fprintf(f, " serial_mode %dN%d%s\n", rem->bits_in_byte, rem->stop_bits / 2,
rem->stop_bits % 2 ? ".5" : "");
}
}
if (rem->freq != 0)
fprintf(f, " frequency %u\n", rem->freq);
if (rem->duty_cycle != 0)
fprintf(f, " duty_cycle %u\n", rem->duty_cycle);
fprintf(f, "\n");
}
int init_send(struct ir_remote *remote,struct ir_ncode *code)
{
int i, repeat=0;
if(is_grundig(remote) ||
is_goldstar(remote) || is_serial(remote) || is_bo(remote))
{
logprintf(LOG_ERR,"sorry, can't send this protocol yet");
return(0);
}
clear_send_buffer();
if(is_biphase(remote))
{
send_buffer.is_biphase=1;
}
if(repeat_remote==NULL)
{
remote->repeat_countdown=remote->min_repeat;
}
else
{
repeat = 1;
}
init_send_loop:
if(repeat && has_repeat(remote))
{
if(remote->flags&REPEAT_HEADER && has_header(remote))
{
send_header(remote);
}
send_repeat(remote);
}
else
{
if(!is_raw(remote))
{
ir_code next_code;
if(code->transmit_state == NULL)
{
next_code = code->code;
}
else
{
next_code = code->transmit_state->code;
}
send_code(remote, next_code, repeat);
if(has_toggle_mask(remote))
{
remote->toggle_mask_state++;
if(remote->toggle_mask_state==4)
{
remote->toggle_mask_state=2;
}
}
send_buffer.data=send_buffer._data;
}
else
{
if(code->signals==NULL)
{
logprintf(LOG_ERR, "no signals for raw send");
return 0;
}
if(send_buffer.wptr>0)
{
send_signals(code->signals, code->length);
}
else
{
send_buffer.data=code->signals;
send_buffer.wptr=code->length;
for(i=0; i<code->length; i++)
{
send_buffer.sum+=code->signals[i];
}
}
}
}
sync_send_buffer();
if(bad_send_buffer())
{
logprintf(LOG_ERR,"buffer too small");
return(0);
}
if(has_repeat_gap(remote) && repeat && has_repeat(remote))
{
remote->min_remaining_gap=remote->repeat_gap;
remote->max_remaining_gap=remote->repeat_gap;
}
else if(is_const(remote))
{
if(min_gap(remote)>send_buffer.sum)
{
remote->min_remaining_gap=min_gap(remote)-send_buffer.sum;
remote->max_remaining_gap=max_gap(remote)-send_buffer.sum;
}
else
{
logprintf(LOG_ERR,"too short gap: %u",remote->gap);
remote->min_remaining_gap=min_gap(remote);
remote->max_remaining_gap=max_gap(remote);
return(0);
}
}
else
{
remote->min_remaining_gap=min_gap(remote);
remote->max_remaining_gap=max_gap(remote);
}
/* update transmit state */
if(code->next != NULL)
{
if(code->transmit_state == NULL)
{
code->transmit_state = code->next;
}
else
{
code->transmit_state = code->transmit_state->next;
}
}
if((remote->repeat_countdown>0 || code->transmit_state != NULL) &&
remote->min_remaining_gap<LIRCD_EXACT_GAP_THRESHOLD)
{
if(send_buffer.data!=send_buffer._data)
{
lirc_t *signals;
int n;
LOGPRINTF(1, "unrolling raw signal optimisation");
signals=send_buffer.data;
n=send_buffer.wptr;
send_buffer.data=send_buffer._data;
send_buffer.wptr=0;
send_signals(signals, n);
}
LOGPRINTF(1, "concatenating low gap signals");
if(code->next == NULL || code->transmit_state == NULL)
{
remote->repeat_countdown--;
}
send_space(remote->min_remaining_gap);
flush_send_buffer();
send_buffer.sum=0;
repeat = 1;
goto init_send_loop;
}
LOGPRINTF(3, "transmit buffer ready");
return(1);
}
struct ir_remote * read_config(FILE *f)
{
char buf[LINE_LEN+1], *key, *val, *val2;
int len,argc;
struct ir_remote *top_rem=NULL,*rem=NULL;
struct void_array codes_list,raw_codes,signals;
struct ir_ncode raw_code={NULL,0,0,NULL};
struct ir_ncode name_code={NULL,0,0,NULL};
int mode=ID_none;
line=0;
parse_error=0;
while(fgets(buf,LINE_LEN,f)!=NULL)
{
line++;
len=strlen(buf);
if(len==LINE_LEN && buf[len-1]!='\n')
{
logprintf(LOG_ERR,"line %d too long in config file",
line);
parse_error=1;
break;
}
/* ignore comments */
len--;
if(buf[len]=='\n') buf[len]=0;
if(buf[0]=='#'){
continue;
}
key=strtok(buf," \t");
/* ignore empty lines */
if(key==NULL) continue;
val=strtok(NULL, " \t");
if(val!=NULL){
val2=strtok(NULL, " \t");
LOGPRINTF(3,"\"%s\" \"%s\"",key,val);
if (strcasecmp("begin",key)==0){
if (strcasecmp("codes", val)==0){
/* init codes mode */
LOGPRINTF(2," begin codes");
if (!checkMode(mode, ID_remote,
"begin codes")) break;
if (rem->codes){
logprintf(LOG_ERR,"error in configfile line %d:",line);
logprintf(LOG_ERR,"codes are already defined");
parse_error=1;
break;
}
init_void_array(&codes_list,30, sizeof(struct ir_ncode));
mode=ID_codes;
}else if(strcasecmp("raw_codes",val)==0){
/* init raw_codes mode */
LOGPRINTF(2," begin raw_codes");
if(!checkMode(mode, ID_remote,
"begin raw_codes")) break;
if (rem->codes){
logprintf(LOG_ERR,"error in configfile line %d:",line);
logprintf(LOG_ERR,"codes are already defined");
parse_error=1;
break;
}
rem->flags|=RAW_CODES;
raw_code.code=0;
init_void_array(&raw_codes,30, sizeof(struct ir_ncode));
mode=ID_raw_codes;
}else if(strcasecmp("remote",val)==0){
/* create new remote */
LOGPRINTF(1,"parsing remote");
if(!checkMode(mode, ID_none,
"begin remote")) break;
mode=ID_remote;
if (!top_rem){
/* create first remote */
LOGPRINTF(2,"creating first remote");
rem=top_rem=s_malloc(sizeof(struct ir_remote));
}else{
/* create new remote */
LOGPRINTF(2,"creating next remote");
rem->next=s_malloc(sizeof(struct ir_remote));;
rem=rem->next;
}
}else{
logprintf(LOG_ERR,"error in configfile line %d:",line);
logprintf(LOG_ERR,"unknown section \"%s\"",val);
parse_error=1;
}
if(!parse_error && val2!=NULL)
{
logprintf(LOG_WARNING,"garbage after "
"'%s' token in line %d ignored",
val,line);
}
}else if (strcasecmp("end",key)==0){
if (strcasecmp("codes", val)==0){
/* end Codes mode */
LOGPRINTF(2," end codes");
if (!checkMode(mode, ID_codes,
"end codes")) break;
rem->codes=get_void_array(&codes_list);
mode=ID_remote; /* switch back */
}else if(strcasecmp("raw_codes",val)==0){
/* end raw codes mode */
LOGPRINTF(2," end raw_codes");
if(mode==ID_raw_name){
raw_code.signals=get_void_array(&signals);
raw_code.length=signals.nr_items;
if(raw_code.length%2==0)
{
logprintf(LOG_ERR,"error in configfile line %d:",line);
logprintf(LOG_ERR,"bad signal length",val);
parse_error=1;
}
if(!add_void_array(&raw_codes, &raw_code))
break;
mode=ID_raw_codes;
}
if(!checkMode(mode,ID_raw_codes,
"end raw_codes")) break;
rem->codes=get_void_array(&raw_codes);
mode=ID_remote; /* switch back */
}else if(strcasecmp("remote",val)==0){
/* end remote mode */
LOGPRINTF(2,"end remote");
/* print_remote(rem); */
if (!checkMode(mode,ID_remote,
"end remote")) break;
if (!rem->name){
logprintf(LOG_ERR,"you must specify a remote name");
parse_error=1;
break;
}
/* not really necessary because we
clear the alloced memory */
rem->next=NULL;
rem->last_code=NULL;
mode=ID_none; /* switch back */
if(has_repeat_gap(rem) &&
is_const(rem))
{
logprintf(LOG_WARNING,"repeat_gap will be ignored if CONST_LENGTH flag is set");
}
}else{
logprintf(LOG_ERR,"error in configfile line %d:",line);
logprintf(LOG_ERR,"unknown section %s",val);
parse_error=1;
}
if(!parse_error && val2!=NULL)
{
logprintf(LOG_WARNING,"garbage after '%s'"
" token in line %d ignored",
val,line);
}
} else {
switch (mode){
case ID_remote:
argc=defineRemote(key, val, val2, rem);
if(!parse_error && ((argc==1 && val2!=NULL) ||
(argc==2 && val2!=NULL && strtok(NULL," \t")!=NULL)))
{
logprintf(LOG_WARNING,"garbage after '%s'"
" token in line %d ignored",
key,line);
}
break;
case ID_codes:
add_void_array(&codes_list, defineCode(key, val, &name_code));
if(!parse_error && val2!=NULL)
{
logprintf(LOG_WARNING,"garbage after '%s'"
" code in line %d ignored",
key,line);
}
break;
case ID_raw_codes:
case ID_raw_name:
if(strcasecmp("name",key)==0){
LOGPRINTF(3,"Button: \"%s\"",val);
if(mode==ID_raw_name)
{
raw_code.signals=get_void_array(&signals);
raw_code.length=signals.nr_items;
if(raw_code.length%2==0)
{
logprintf(LOG_ERR,"error in configfile line %d:",line);
logprintf(LOG_ERR,"bad signal length",val);
parse_error=1;
}
if(!add_void_array(&raw_codes, &raw_code))
break;
}
if(!(raw_code.name=s_strdup(val))){
break;
}
raw_code.code++;
init_void_array(&signals,50,sizeof(lirc_t));
mode=ID_raw_name;
if(!parse_error && val2!=NULL)
{
logprintf(LOG_WARNING,"garbage after '%s'"
" token in line %d ignored",
key,line);
}
}else{
if(mode==ID_raw_codes)
{
logprintf(LOG_ERR,"no name for signal defined at line %d",line);
parse_error=1;
break;
}
if(!addSignal(&signals, key)) break;
if(!addSignal(&signals, val)) break;
if (val2){
if (!addSignal(&signals, val2)){
break;
}
}
while ((val=strtok(NULL," \t"))){
if (!addSignal(&signals, val)) break;
}
}
break;
}
}
}else if(mode==ID_raw_name){
if(!addSignal(&signals, key)){
break;
}
}else{
logprintf(LOG_ERR,"error in configfile line %d", line);
parse_error=1;
break;
}
if (parse_error){
break;
}
}
if(mode!=ID_none)
{
switch(mode)
{
case ID_raw_name:
if(raw_code.name!=NULL)
{
free(raw_code.name);
if(get_void_array(&signals)!=NULL)
free(get_void_array(&signals));
}
case ID_raw_codes:
rem->codes=get_void_array(&raw_codes);
break;
case ID_codes:
rem->codes=get_void_array(&codes_list);
break;
}
if(!parse_error)
{
logprintf(LOG_ERR,"unexpected end of file");
parse_error=1;
}
}
if (parse_error){
free_config(top_rem);
return((void *) -1);
}
/* kick reverse flag */
rem=top_rem;
while(rem!=NULL)
{
if((!is_raw(rem)) && rem->flags&REVERSE)
{
struct ir_ncode *codes;
if(has_pre(rem))
{
rem->pre_data=reverse(rem->pre_data,
rem->pre_data_bits);
}
if(has_post(rem))
{
rem->post_data=reverse(rem->post_data,
rem->post_data_bits);
}
codes=rem->codes;
while(codes->name!=NULL)
{
codes->code=reverse(codes->code,rem->bits);
codes++;
}
/* rem->flags=rem->flags&(~REVERSE); */
/* don't delete the flag because we still need
it to remain compatible with older versions
*/
}
rem=rem->next;
}
# if defined(DEBUG) && !defined(DAEMONIZE)
/*fprint_remotes(stderr, top_rem);*/
# endif
return (top_rem);
}
