Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
Delete obsolete hack.
[simgrid.git] / src / xbt / xbt_log_appender_file.c
index 3c72683..2e938d1 100644 (file)
-/* $Id$ */
+/* file_appender - a dumb log appender which simply prints to a file        */
 
-/* file_appender - a dumb log appender which simply prints to stdout        */
-
-/* Copyright (c) 2003, 2004 Martin Quinson. All rights reserved.            */
+/* Copyright (c) 2007-2014. The SimGrid Team.
+ * All rights reserved.                                                     */
 
 /* This program is free software; you can redistribute it and/or modify it
  * under the terms of the license (GNU LGPL) which comes with this package. */
 
+#include "src/internal_config.h"
 #include "xbt/sysdep.h"
-#include "xbt/log_private.h"
+#include "src/xbt/log_private.h"
 #include <stdio.h>
 
-/**
- * The root category's default logging function.
- */
+static void append_file(xbt_log_appender_t this_, char *str) {
+  fputs(str, (FILE *) this_->data);
+}
+
+static void free_(xbt_log_appender_t this_) {
+  if (this_->data != stderr)
+    fclose(this_->data);
+}
 
-extern const char *xbt_log_priority_names[7];
+xbt_log_appender_t xbt_log_appender_file_new(char *arg) {
+
+  xbt_log_appender_t res = xbt_new0(s_xbt_log_appender_t, 1);
+  res->do_append         = &append_file;
+  res->free_             = &free_;
+  if (arg)
+    res->data = (void *) fopen(arg, "w");
+  else
+    res->data = (void *) stderr;
+  return res;
+}
 
+struct xbt_log_append2_file_s {
+  FILE* file;
+  char* filename;
+  int count; //negative for roll
+  long  int limit;
+};
+typedef struct xbt_log_append2_file_s* xbt_log_append2_file_t;
 
-static void append_file(xbt_log_appender_t this_appender,
-                        char *str) {
+#define APPEND2_END_TOKEN             "\n[End of log]\n"
+#define APPEND2_END_TOKEN_CLEAR "\n                   "
 
-  fprintf((FILE*)(this_appender->data), "%s", str);
+static void open_append2_file(xbt_log_append2_file_t data){
+  if(data->count<0) {
+    //Roll
+    if(!data->file)
+      data->file= fopen(data->filename, "w");
+    else{
+      fputs(APPEND2_END_TOKEN_CLEAR,data->file);
+      fseek(data->file,0,SEEK_SET);
+    }
+  } else{
+    //printf("Splitting\n");
+    //Split
+    if(data->file)
+      fclose(data->file);
+    char newname[512];
+    char* pre=xbt_strdup(data->filename);
+    char* sep=strchr(pre,'%');
+    if(!sep)
+      sep=pre+strlen(pre);
+    char* post=sep+1;
+    *sep='\0';
+    snprintf(newname,511,"%s%i%s",pre,data->count,post);
+    data->count++;
+    data->file= fopen(newname, "w");
+    xbt_assert(data->file);
+  }
 }
 
-xbt_log_appender_t xbt_log_appender_file_new(char *arg){
-  xbt_log_appender_t res = xbt_new0(s_xbt_log_appender_t,1);
-  res->do_append = append_file;
-  res->free_ = NULL;
-  res->data = (void*)stderr;
+static void append2_file(xbt_log_appender_t this_, char *str) {
+   xbt_log_append2_file_t d=(xbt_log_append2_file_t) this_->data;
+   xbt_assert(d->file);
+   if(ftell(d->file)>=d->limit) {
+     open_append2_file(d);
+   }
+   fputs(str, d->file);
+   if(d->count<0){
+     fputs(APPEND2_END_TOKEN,d->file);
+     fseek(d->file,-((signed long)strlen(APPEND2_END_TOKEN)),SEEK_CUR);
+   }
+}
+
+static void free_append2_(xbt_log_appender_t this_) {
+  FILE* f=((xbt_log_append2_file_t)(this_->data))->file;
+  if (f)
+    fclose(f);
+}
+
+
+//syntax is  <maxsize>:<filename>
+//If roll is 0, use split files, otherwise, use roll file
+//For split, replace %  in the file by the current count
+xbt_log_appender_t xbt_log_appender2_file_new(char *arg,int roll) {
+
+  xbt_log_appender_t res      = xbt_new0(s_xbt_log_appender_t, 1);
+  res->do_append              = &append2_file;
+  res->free_                  = &free_append2_;
+  xbt_log_append2_file_t data = xbt_new0(struct xbt_log_append2_file_s, 1);
+  xbt_assert(arg);
+  char* buf=xbt_strdup(arg);
+  char* sep=strchr(buf,':');
+  xbt_assert(sep>0);
+  data->filename=xbt_strdup(sep+1);
+  *sep='\0';
+  char *endptr;
+  data->limit=strtol(buf,&endptr,10);
+  xbt_assert(endptr[0]=='\0', "Invalid buffer size: %s", buf);
+  xbt_free(buf);
+  if(roll)
+    data->count=-1;
+  else
+    data->count=0;
+  open_append2_file(data);
+  res->data = data;
   return res;
 }