1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
|
#include "config.h"
#define _GNU_SOURCE
#include <stdio.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <fcntl.h>
#include <time.h>
#include <string.h>
#include <stdlib.h>
#include <errno.h>
#include "error.h"
#include "compat.h"
#include "ttyrec.h"
#include "gettext.h"
#include "common.h"
#if (defined HAVE_LIBBZ2) || (defined SHIPPED_LIBBZ2)
#define comp_ext ".bz2"
#else
# if (defined HAVE_LIBZ) || (defined SHIPPED_LIBZ)
#define comp_ext ".gz"
# else
#define comp_ext ""
# endif
#endif
// Generate the next name in the sequence: "", a, b, ... z, aa, ab, ...
static void nameinc(char *add)
{
char *ae,*ai;
ae=add;
while (*ae)
ae++;
ai=ae; // start at the end of the string
while (1)
{
if (--ai<add)
{
*ae++='a'; // if all combinations are exhausted,
*ae=0; // append a new letter
return;
}
if (*ai!='z')
{
(*ai)++; // increase the first non-'z'
return;
}
*ai='a'; // ... replacing 'z's by 'a'
}
}
int open_out(char **file_name, const char *format_ext, int append)
{
int fd;
char add[10],date[24];
time_t t;
const char *error;
if (!*file_name)
{
*add=0;
time(&t);
strftime(date, sizeof(date), "%Y-%m-%d.%H-%M-%S", localtime(&t));
while (1)
{
if (asprintf(file_name, "%s%s%s%s", date, add, format_ext, append?"":comp_ext) == -1)
abort();
fd=open(*file_name, (append?O_APPEND:O_CREAT|O_EXCL)|O_WRONLY|O_BINARY, 0666);
// We do some autoconf magic to exclude O_BINARY when inappropriate.
if (fd!=-1)
goto finish;
if (errno!=EEXIST)
break;
free(*file_name);
*file_name=0;
nameinc(add);
}
die(_("Can't create a valid file in the current directory: %s\n"), strerror(errno));
return -1;
}
if (!strcmp(*file_name, "-"))
{
fd=-1;
goto finish;
}
if (!(fd=open(*file_name, (append?O_APPEND:O_CREAT|O_TRUNC)|O_WRONLY|O_BINARY, 0666)))
die(_("Can't write to the record file (%s): %s\n"), *file_name, strerror(errno));
finish:
if ((fd=open_stream(fd, *file_name, append?SM_APPEND:SM_WRITE, &error))==-1)
die("%s", error);
return fd;
}
|
