nativelibc/posix-io/close.c

/*	A part of the Native C Library for Windows NT
	Copyright 2007-2015 PC GO Ld.
	Copyright 2015-2024 Rivoreo

	This program is free software; you can redistribute it and/or modify
	it under the terms of the GNU General Public License as published by
	the Free Software Foundation; either version 2 of the License, or (at
	your option) any later version.

	This program is distributed in the hope that it will be useful, but
	WITHOUT ANY WARRANTY; without even the implied warranty of
	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
	General Public License for more details.
*/

#include <windows.h>
#include <nt.h>
#include <errno.h>
#include <unistd.h>

int close(int fd) {
	if(fd == STDIN_FILENO) {
		void *keyboard_fh;
		int real_fd = _get_stdin_fd(&keyboard_fh);
		switch(real_fd) {
			case TTY_FD_INVALID:
				errno = EBADF;
				return -1;
			case TTY_FD_DEFAULT:
				_set_stdin_fd(TTY_FD_INVALID);
				return __set_errno_from_ntstatus(NtClose(keyboard_fh)) ? -1 : 0;
			default:
				fd = real_fd;
		}
	} else if(fd == STDOUT_FILENO) {
		int real_fd = _get_stdout_fd();
		switch(real_fd) {
			case TTY_FD_INVALID:
				errno = EBADF;
				return -1;
			case TTY_FD_DEFAULT:
				_set_stdout_fd(TTY_FD_INVALID);
				return 0;
			default:
				fd = real_fd;
		}
	} else if(fd == STDERR_FILENO) {
		int real_fd = _get_stderr_fd();
		switch(real_fd) {
			case TTY_FD_INVALID:
				errno = EBADF;
				return -1;
			case TTY_FD_DEFAULT:
				_set_stderr_fd(TTY_FD_INVALID);
				return 0;
			default:
				fd = real_fd;
		}
	}
	long int status = NtClose((void *)fd);
	if(status < 0) {
		__set_errno_from_ntstatus(status);
		return -1;
	}
	return 0;
}