summaryrefslogtreecommitdiff
path: root/src/libs6/ftrig1_make.c
blob: 6a6ff119d0fc8786c19981b42c4a5c3c64523dc3 (plain)
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
/* ISC license. */

#include <string.h>
#include <stdio.h>

#include <skalibs/posixplz.h>
#include <skalibs/tai.h>
#include <skalibs/stralloc.h>
#include <skalibs/djbunix.h>

#include "ftrig1.h"

int ftrig1_make (ftrig1_t *f, char const *path)
{
  ftrig1_t ff = FTRIG1_ZERO ;
  size_t pathlen = strlen(path) ;
  char tmp[pathlen + FTRIG1_PREFIXLEN + 36] ;
  
  memcpy(tmp, path, pathlen) ;
  tmp[pathlen] = '/' ; tmp[pathlen+1] = '.' ;
  memcpy(tmp + pathlen + 2, FTRIG1_PREFIX, FTRIG1_PREFIXLEN) ;
  tmp[pathlen + 2 + FTRIG1_PREFIXLEN] = ':' ;
  if (!timestamp(tmp + pathlen + 3 + FTRIG1_PREFIXLEN)) return 0 ;
  memcpy(tmp + pathlen + FTRIG1_PREFIXLEN + 28, ":XXXXXX", 8) ;
  ff.fd = mkptemp(tmp) ;
  if (ff.fd == -1) return 0 ;
  if (ndelay_on(ff.fd) == -1) goto err1 ;
  ff.fdw = open_write(tmp) ;
  if (ff.fdw == -1) goto err1 ;
  if (!stralloc_ready(&ff.name, pathlen + FTRIG1_PREFIXLEN + 36)) goto err2 ;
  stralloc_copyb(&ff.name, tmp, pathlen + 1) ;
  stralloc_catb(&ff.name, tmp + pathlen + 2, FTRIG1_PREFIXLEN + 34) ;
  if (rename(tmp, ff.name.s) == -1) goto err3 ;
  *f = ff ;
  return 1 ;

 err3:
  stralloc_free(&ff.name) ;
 err2:
  fd_close(ff.fdw) ;
 err1:
  fd_close(ff.fd) ;
  unlink_void(tmp) ;
  return 0 ;
}