view sbr/m_scratch.c @ 17:76d91e545ea8 default tip

addrsbr and dtimep fix
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Mon, 24 Nov 2014 14:49:25 +0900
parents 441a2190cfae
children
line wrap: on
line source

/* m_scratch.c - construct a scratch file */

#include "../h/mh.h"
#include <stdio.h>


char   *m_scratch (file, template)
register char  *file,
               *template;
{
    register char  *cp;
    static char buffer[BUFSIZ],
		tmpfil[BUFSIZ];

    (void) sprintf (tmpfil, "%sXXXXXX", template);
    (void) mktemp (tmpfil);
    if ((cp = r1bindex (file, '/')) == file)
	(void) strcpy (buffer, tmpfil);
    else
	(void) sprintf (buffer, "%.*s%s", (int)(cp - file), file, tmpfil);
    (void) unlink (buffer);

    return buffer;
}