cgen: complete Windows CRT stream declarations (#27948)

Author: GGRei

vlib/v/gen/c/cheaders.v

@@ -667,8 +667,14 @@ V_CRT_LINKAGE char * V_CRT_CALL strstr(const char *haystack, const char *needle)
 V_CRT_LINKAGE int V_CRT_CALL fseek(FILE *stream, long offset, int whence);
 V_CRT_LINKAGE isize V_CRT_CALL getline(char **lineptr, size_t *n, FILE *stream);
 #if defined(_WIN32) || defined(_WIN64)
+V_CRT_LINKAGE int V_CRT_CALL _fseeki64(FILE *stream, i64 offset, int whence);
+V_CRT_LINKAGE int V_CRT_CALL fgetpos(FILE *stream, i64 *pos);
 V_CRT_LINKAGE int V_CRT_CALL _fileno(FILE *stream);
 V_CRT_LINKAGE FILE * V_CRT_CALL _wfopen(const unsigned short *filename, const unsigned short *mode);
+V_CRT_LINKAGE int V_CRT_CALL freopen_s(FILE **new_stream, const char *filename, const char *mode, FILE *stream);
+V_CRT_LINKAGE FILE * V_CRT_CALL _wfreopen(const unsigned short *filename, const unsigned short *mode, FILE *stream);
+V_CRT_LINKAGE FILE * V_CRT_CALL _wpopen(const unsigned short *command, const unsigned short *mode);
+V_CRT_LINKAGE int V_CRT_CALL _pclose(FILE *stream);
 V_CRT_LINKAGE int V_CRT_CALL _wremove(const unsigned short *path);
 V_CRT_LINKAGE void * V_CRT_CALL _aligned_malloc(size_t size, size_t alignment);
 V_CRT_LINKAGE void * V_CRT_CALL _aligned_realloc(void *memory, size_t size, size_t alignment);

vlib/v/gen/c/cheaders_manual_stdlib_decls_test.v

@@ -22,7 +22,7 @@ fn test_default_c_prelude_uses_manual_stdio_stdlib_string_and_stdarg_decls() {
 	assert generated_c.contains('V_CRT_LINKAGE int V_CRT_CALL vfprintf(FILE *stream, const char *format, va_list ap);'), generated_c
 
 	assert generated_c.contains('V_CRT_LINKAGE int V_CRT_CALL vsnprintf(char *str, size_t size, const char *format, va_list ap);'), generated_c
-	assert generated_c.contains('#if defined(_WIN32) || defined(_WIN64)\nV_CRT_LINKAGE int V_CRT_CALL _fileno(FILE *stream);\nV_CRT_LINKAGE FILE * V_CRT_CALL _wfopen(const unsigned short *filename, const unsigned short *mode);\nV_CRT_LINKAGE int V_CRT_CALL _wremove(const unsigned short *path);\nV_CRT_LINKAGE void * V_CRT_CALL _aligned_malloc(size_t size, size_t alignment);\nV_CRT_LINKAGE void * V_CRT_CALL _aligned_realloc(void *memory, size_t size, size_t alignment);\nV_CRT_LINKAGE void V_CRT_CALL _aligned_free(void *memory);\nV_CRT_LINKAGE unsigned short * V_CRT_CALL _wgetenv(const unsigned short *varname);\nV_CRT_LINKAGE int V_CRT_CALL _wputenv(const unsigned short *envstring);\n#endif'), generated_c
+	assert generated_c.contains('#if defined(_WIN32) || defined(_WIN64)\nV_CRT_LINKAGE int V_CRT_CALL _fseeki64(FILE *stream, i64 offset, int whence);\nV_CRT_LINKAGE int V_CRT_CALL fgetpos(FILE *stream, i64 *pos);\nV_CRT_LINKAGE int V_CRT_CALL _fileno(FILE *stream);\nV_CRT_LINKAGE FILE * V_CRT_CALL _wfopen(const unsigned short *filename, const unsigned short *mode);\nV_CRT_LINKAGE int V_CRT_CALL freopen_s(FILE **new_stream, const char *filename, const char *mode, FILE *stream);\nV_CRT_LINKAGE FILE * V_CRT_CALL _wfreopen(const unsigned short *filename, const unsigned short *mode, FILE *stream);\nV_CRT_LINKAGE FILE * V_CRT_CALL _wpopen(const unsigned short *command, const unsigned short *mode);\nV_CRT_LINKAGE int V_CRT_CALL _pclose(FILE *stream);\nV_CRT_LINKAGE int V_CRT_CALL _wremove(const unsigned short *path);\nV_CRT_LINKAGE void * V_CRT_CALL _aligned_malloc(size_t size, size_t alignment);\nV_CRT_LINKAGE void * V_CRT_CALL _aligned_realloc(void *memory, size_t size, size_t alignment);\nV_CRT_LINKAGE void V_CRT_CALL _aligned_free(void *memory);\nV_CRT_LINKAGE unsigned short * V_CRT_CALL _wgetenv(const unsigned short *varname);\nV_CRT_LINKAGE int V_CRT_CALL _wputenv(const unsigned short *envstring);\n#endif'), generated_c
 
 	assert generated_c.contains('V_CRT_LINKAGE void V_CRT_CALL perror(const char *str);'), generated_c
 	assert generated_c.contains('V_CRT_LINKAGE int V_CRT_CALL mkstemp(char *stemplate);'), generated_c

vlib/v/gen/c/windows_tcc_file_reopen_test.v

@@ -0,0 +1,44 @@
+// vtest build: windows && tinyc
+// vtest vflags: -cc tcc -no-retry-compilation
+import os
+
+fn test_windows_tcc_file_reopen() {
+	$if windows {
+		$if !tinyc {
+			$compile_error('this regression must be compiled with TinyCC')
+		}
+		assert @CCOMPILER == 'tinyc'
+		tmp_dir := os.join_path(os.vtmp_dir(), 'windows_tcc_file_reopen_${os.getpid()}')
+		os.mkdir_all(tmp_dir)!
+		defer {
+			os.rmdir_all(tmp_dir) or {}
+		}
+		original_path := os.join_path(tmp_dir, 'original.txt')
+		reopened_path := os.join_path(tmp_dir, 'reopened.txt')
+		os.write_file(original_path, 'before')!
+		os.write_file(reopened_path, 'after')!
+
+		mut file := os.open(original_path)!
+		assert file.read_bytes(6).bytestr() == 'before'
+		file.reopen(reopened_path, 'rb')!
+		assert file.read_bytes(5).bytestr() == 'after'
+		file.close()
+	}
+}
+
+fn test_windows_tcc_command_pipe_lifecycle() {
+	$if windows {
+		$if !tinyc {
+			$compile_error('this regression must be compiled with TinyCC')
+		}
+		assert @CCOMPILER == 'tinyc'
+		mut command := os.start_new_command('echo windows-tcc-command-pipe')!
+		mut output := ''
+		for !command.eof {
+			output += command.read_line()
+		}
+		command.close()!
+		assert output.trim_space() == 'windows-tcc-command-pipe', output
+		assert command.exit_code == 0
+	}
+}

vlib/v/gen/c/windows_tcc_freopen_s_test.v

@@ -0,0 +1,6 @@
+// vtest build: windows && tinyc
+// vtest vflags: -cc tcc -no-retry-compilation -subsystem windows
+
+fn test_windows_tcc_gui_stdio_setup_compiles() {
+	assert true
+}