amiga-libnix2/libnix/sources/nix/extra/mktemp.c

#include <proto/exec.h>
#include <unistd.h>
#include <fcntl.h>

char *mktemp(char *buf)
{ long pid = (long)FindTask(0L);
  char *c = buf;

  while(*c++); --c;

  while(*--c == 'X') {
    *c = pid % 10 + '0';
    pid /= 10;
  }

  if (++c,*c) {
    for(*c='A'; *c <= 'Z'; (*c)++) {
      if (access(buf,0)) {
        return buf;
      }
    }
    *c = 0;
  }

  return buf;
}

int mkstemp(char *template) {
  char *buf = mktemp(template);
  return open(buf, O_CREAT | O_TRUNC | O_EXCL);
}