/*
 * Copyright 2008 Sun Microsystems, Inc.  All rights reserved.
 * Use is subject to license terms.
 */



#include "k5-int.h"
#include <sys/file.h>
#include <fcntl.h>

#ifndef O_BINARY
#define O_BINARY 0
#endif

krb5_error_code
krb5_create_secure_file(krb5_context context, const char *pathname)
{
	int 	fd;
	int 	open_flag;

	open_flag = O_CREAT|O_EXCL|O_TRUNC|O_RDWR;

	/*
	 * Make sure file name is reserved.
	 * The O_BINARY flag is not a supported flag in the Solaris
	 * open(2) system call, but it is included here to be consistent
	 * with other open calls in the Kerberos library code.
	 */

	fd = open(pathname, open_flag | O_BINARY, 0600);
	if (fd == -1) {
		return (errno);
	} else {
		close(fd);
		return (0);
	}
}

krb5_error_code
krb5_sync_disk_file(krb5_context context, FILE *fp)
{
	if (fp == NULL) {
		(void) fclose(fp);
		return (errno);
	}
	if ((fflush(fp) == EOF) || ferror(fp) || (fsync(fileno(fp)) == -1)) {
		return (errno);
	}
	return (0);
}