1 /* file_appender - a dumb log appender which simply prints to a file */
3 /* Copyright (c) 2007-2020. The SimGrid Team.
4 * All rights reserved. */
6 /* This program is free software; you can redistribute it and/or modify it
7 * under the terms of the license (GNU LGPL) which comes with this package. */
9 #include "src/internal_config.h"
10 #include "src/xbt/log_private.hpp"
11 #include "xbt/sysdep.h"
16 static void append_file(const s_xbt_log_appender_t* this_, const char* str)
18 fputs(str, (FILE *) this_->data);
21 static void free_(const s_xbt_log_appender_t* this_)
23 fclose(static_cast<FILE*>(this_->data));
26 xbt_log_appender_t xbt_log_appender_stream(FILE* f)
28 xbt_log_appender_t res = xbt_new0(s_xbt_log_appender_t, 1);
29 res->do_append = &append_file;
31 res->data = static_cast<void*>(f);
35 xbt_log_appender_t xbt_log_appender_file_new(const char* arg)
38 return xbt_log_appender_stream(stderr);
39 xbt_log_appender_t res = xbt_new0(s_xbt_log_appender_t, 1);
40 res->do_append = &append_file;
42 res->data = static_cast<void*>(fopen(arg, "w"));
43 if (res->data == nullptr)
44 xbt_die("Cannot open file: %s: %s", arg, strerror(errno));
48 struct xbt_log_append2_file_s {
51 int count; //negative for roll
54 using xbt_log_append2_file_t = xbt_log_append2_file_s*;
56 static constexpr const char* APPEND2_END_TOKEN = "\n[End of log]\n";
57 static constexpr const char* APPEND2_END_TOKEN_CLEAR = "\n ";
59 static void open_append2_file(xbt_log_append2_file_t data){
63 data->file= fopen(data->filename, "w");
64 if (data->file == nullptr)
65 xbt_die("Cannot open file: %s: %s", data->filename, strerror(errno));
67 fputs(APPEND2_END_TOKEN_CLEAR,data->file);
68 fseek(data->file,0,SEEK_SET);
74 char* pre=xbt_strdup(data->filename);
75 char* sep=strchr(pre,'%');
78 const char* post = sep + 1;
80 std::string newname = pre + std::to_string(data->count) + post;
82 data->file = fopen(newname.c_str(), "w");
83 if (data->file == nullptr)
84 xbt_die("Cannot open file: %s: %s", newname.c_str(), strerror(errno));
89 static void append2_file(const s_xbt_log_appender_t* this_, const char* str)
91 auto* d = static_cast<xbt_log_append2_file_t>(this_->data);
93 if (ftell(d->file) >= d->limit) {
98 fputs(APPEND2_END_TOKEN, d->file);
99 fseek(d->file, -((signed long)strlen(APPEND2_END_TOKEN)), SEEK_CUR);
103 static void free_append2_(const s_xbt_log_appender_t* this_)
105 auto* data = static_cast<xbt_log_append2_file_t>(this_->data);
108 xbt_free(data->filename);
113 //syntax is <maxsize>:<filename>
114 //If roll is 0, use split files, otherwise, use roll file
115 //For split, replace % in the file by the current count
116 xbt_log_appender_t xbt_log_appender2_file_new(const char* arg, int roll)
118 xbt_log_appender_t res = xbt_new0(s_xbt_log_appender_t, 1);
119 res->do_append = &append2_file;
120 res->free_ = &free_append2_;
121 xbt_log_append2_file_t data = xbt_new0(struct xbt_log_append2_file_s, 1);
123 char* buf=xbt_strdup(arg);
124 char* sep=strchr(buf,':');
125 xbt_assert(sep != nullptr);
126 data->filename=xbt_strdup(sep+1);
129 data->limit=strtol(buf,&endptr,10);
130 xbt_assert(endptr[0]=='\0', "Invalid buffer size: %s", buf);
136 open_append2_file(data);