Changeset 2adaf1d for functions.c

Timestamp:

Oct 11, 2002, 3:44:22 PM (22 years ago)

Author:

James M. Kretchmar <kretch@mit.edu>

Branches:

master, barnowl_perlaim, debian, owl, release-1.10, release-1.4, release-1.5, release-1.6, release-1.7, release-1.8, release-1.9

Children:

b45293f

Parents:

88736cb

Message:

Added the dump command
removed old zlog functions

File:

• functions.c (modified) (2 diffs)

functions.c

@@ -6 +6 @@
 #include <com_err.h>
 #include <time.h>
+#include <sys/types.h>
+#include <sys/stat.h>
 #include "owl.h"
 
@@ -2461 +2463 @@
   owl_free(ourfile);
 }
+
+void owl_function_dump(char *filename) {
+  int i, j, count;
+  owl_message *m;
+  owl_view *v;
+  FILE *file;
+  /* struct stat sbuf; */
+
+  v=owl_global_get_current_view(&g);
+
+  /* in the future make it ask yes/no */
+  /*
+  ret=stat(filename, &sbuf);
+  if (!ret) {
+    ret=owl_function_askyesno("File exists, continue? [Y/n]");
+    if (!ret) return;
+  }
+  */
+
+  file=fopen(filename, "w");
+  if (!file) {
+    owl_function_makemsg("Error opening file");
+    return;
+  }
+
+  count=0;
+  j=owl_view_get_size(v);
+  for (i=0; i<j; i++) {
+    m=owl_view_get_element(v, i);
+    fputs(owl_message_get_text(m), file);
+  }
+  fclose(file);
+}