c3c/lib/std/io/os/chdir.c3

module std::io::os;
import libc;


$switch

$case env::COMPILER_LIBC_AVAILABLE && env::os_is_posix():

macro void! native_chdir(Path p)
{
	if (posix::chdir(p.as_zstr()))
	{
		switch (libc::errno())
		{
			case errno::EACCES: return IoError.NO_PERMISSION?;
			case errno::ENAMETOOLONG: return IoError.NAME_TOO_LONG?;
			case errno::ENOTDIR: return IoError.FILE_NOT_DIR?;
			case errno::ENOENT: return IoError.FILE_NOT_FOUND?;
			case errno::ELOOP: return IoError.SYMLINK_FAILED?;
			default: return IoError.GENERAL_ERROR?;
		}
	}
}

$case env::COMPILER_LIBC_AVAILABLE && env::os_is_win32():

macro void! native_chdir(Path path)
{
	@pool()
	{
		// TODO improve with better error handling.
		if (win32::win32_SetCurrentDirectoryW(path.as_str().to_temp_utf16()!!)) return;
	};
	return IoError.GENERAL_ERROR?;
}

$default:

fn void! native_chdir(Path path)
{
	unreachable("'getcwd' not available");
}

$endswitch