static void
log_flush(struct log *this_)
{
long pos;
if (this_->lazy && !this_->f) {
if (!this_->data.len)
return;
log_open(this_);
}
if (! this_->f)
return;
if (this_->empty) {
if (this_->header.len)
fwrite(this_->header.data, 1, this_->header.len, this_->f);
if (this_->header.len || this_->data.len)
this_->empty=0;
}
fwrite(this_->data.data, 1, this_->data.len, this_->f);
if (this_->trailer.len) {
pos=ftell(this_->f);
if (pos > 0) {
fwrite(this_->trailer.data, 1, this_->trailer.len, this_->f);
fseek(this_->f, pos, SEEK_SET);
}
}
fflush(this_->f);
g_free(this_->data.data);
this_->data.data=NULL;
this_->data.max_len=this_->data.len=0;
log_set_last_flush(this_);
}
struct log *
log_new(struct attr * parent,struct attr **attrs)
{
struct log *ret=g_new0(struct log, 1);
struct attr *data,*overwrite,*lazy,*mkdir,*flush_size,*flush_time;
struct file_wordexp *wexp;
char *filename, **wexp_data;
dbg(1,"enter\n");
ret->func=&log_func;
navit_object_ref((struct navit_object *)ret);
data=attr_search(attrs, NULL, attr_data);
if (! data)
return NULL;
filename=data->u.str;
wexp=file_wordexp_new(filename);
if (wexp && file_wordexp_get_count(wexp) > 0) {
wexp_data=file_wordexp_get_array(wexp);
filename=wexp_data[0];
}
if (filename)
ret->filename=g_strdup(filename);
if (wexp)
file_wordexp_destroy(wexp);
overwrite=attr_search(attrs, NULL, attr_overwrite);
if (overwrite)
ret->overwrite=overwrite->u.num;
lazy=attr_search(attrs, NULL, attr_lazy);
if (lazy)
ret->lazy=lazy->u.num;
mkdir=attr_search(attrs, NULL, attr_mkdir);
if (mkdir)
ret->mkdir=mkdir->u.num;
flush_size=attr_search(attrs, NULL, attr_flush_size);
if (flush_size)
ret->flush_size=flush_size->u.num;
flush_time=attr_search(attrs, NULL, attr_flush_time);
if (flush_time)
ret->flush_time=flush_time->u.num;
if (ret->flush_time) {
dbg(1,"interval %d\n", ret->flush_time*1000);
ret->timer_callback=callback_new_1(callback_cast(log_timer), ret);
ret->timer=event_add_timeout(ret->flush_time*1000, 1, ret->timer_callback);
}
expand_filenames(ret);
if (ret->lazy)
log_set_last_flush(ret);
else
log_open(ret);
ret->attrs=attr_list_dup(attrs);
return ret;
}
static void
log_open(struct log *this_)
{
char *mode;
if (this_->overwrite)
mode="w";
else
mode="r+";
if (this_->mkdir)
file_mkdir(this_->filename_ex2, 2);
this_->f=fopen(this_->filename_ex2, mode);
if (! this_->f)
this_->f=fopen(this_->filename_ex2, "w");
if (! this_->f)
return;
if (!this_->overwrite)
fseek(this_->f, 0, SEEK_END);
this_->empty = !ftell(this_->f);
log_set_last_flush(this_);
}
static void
log_flush(struct log *this_, enum log_flags flags)
{
long pos;
if (this_->lazy && !this_->f) {
if (!this_->data.len)
return;
log_open(this_);
}
if (! this_->f)
return;
if (this_->empty) {
if (this_->header.len)
fwrite(this_->header.data, 1, this_->header.len, this_->f);
if (this_->header.len || this_->data.len)
this_->empty=0;
}
fwrite(this_->data.data, 1, this_->data.len, this_->f);
#ifndef HAVE_API_WIN32_BASE
if (flags & log_flag_truncate) {
pos=ftell(this_->f);
ftruncate(fileno(this_->f), pos);
}
#endif
if (this_->trailer.len) {
pos=ftell(this_->f);
if (pos > 0) {
fwrite(this_->trailer.data, 1, this_->trailer.len, this_->f);
fseek(this_->f, pos, SEEK_SET);
}
}
if (flags & log_flag_keep_pointer)
fseek(this_->f, -this_->data.len, SEEK_CUR);
fflush(this_->f);
if (!(flags & log_flag_keep_buffer)) {
g_free(this_->data.data);
this_->data.data=NULL;
this_->data.max_len=this_->data.len=0;
}
log_set_last_flush(this_);
}
