Get the MSVC build running too.

Files under tectonic/msvc/ directory are taken and adopted from postgresql source code.

Author: crlf0710

Cargo.lock

@@ -37,6 +37,9 @@ pkg-config = "^0.3"
 regex = "^1.0"
 sha2 = "^0.7"
 
+[target.'cfg(target_env = "msvc")'.build-dependencies]
+vcpkg = "0.2"
+
 [dependencies]
 aho-corasick = "^0.6"
 app_dirs = "^1.1"

Cargo.toml

@@ -5,6 +5,8 @@
 // TODO: this surely needs to become much smarter and more flexible.
 
 extern crate cc;
+#[cfg(target_env = "msvc")]
+extern crate vcpkg;
 extern crate pkg_config;
 extern crate regex;
 extern crate sha2;
@@ -36,21 +38,75 @@ fn cpp_platform_specifics(cfg: &mut cc::Build) {
     cfg.file("tectonic/XeTeXFontMgr_Mac.mm");
 }
 
+// Windows platform specifics:
+#[cfg(target_os = "windows")]
+const LIBS: &'static str = "fontconfig harfbuzz >= 1.4 harfbuzz-icu icu-uc freetype2 graphite2 libpng zlib";
+#[cfg(target_os = "windows")]
+#[allow(dead_code)]
+const VCPKG_LIBS: &[&[&'static str]] = &[
+    &["fontconfig"], &["harfbuzz"], &["icu"], &["freetype"], &["graphite2"], &["libpng"], &["zlib"]];
+//FIXME: it should actually be harfbuzz[icu], but currently vcpkg-rs doesn't support features.
+
+#[cfg(target_os = "windows")]
+fn c_platform_specifics(cfg: &mut cc::Build) {
+    let target = env::var("TARGET").unwrap();
+    if target.contains("msvc") {
+        cfg
+            .file("tectonic/msvc/dirent.c")
+            .file("tectonic/msvc/getopt.c")
+            .file("tectonic/msvc/win32error.c")
+            .include("tectonic/msvc/");
+    }
+}
+
+#[cfg(target_os = "windows")]
+fn cpp_platform_specifics(cfg: &mut cc::Build) {
+    let target = env::var("TARGET").unwrap();
+    if target.contains("msvc") {
+        cfg
+            .include("tectonic/msvc/");
+    }
+    cfg.file("tectonic/XeTeXFontMgr_FC.cpp");
+}
+
 
-// Not-MacOS:
+// Not-MacOS or Windows:
 
-#[cfg(not(target_os = "macos"))]
+#[cfg(not(any(target_os = "macos", target_os = "windows")))]
 const LIBS: &'static str = "fontconfig harfbuzz >= 1.4 harfbuzz-icu icu-uc freetype2 graphite2 libpng zlib";
 
-#[cfg(not(target_os = "macos"))]
+#[cfg(not(any(target_os = "macos", target_os = "windows")))]
 fn c_platform_specifics(_: &mut cc::Build) {
 }
 
-#[cfg(not(target_os = "macos"))]
+#[cfg(not(any(target_os = "macos", target_os = "windows")))]
 fn cpp_platform_specifics(cfg: &mut cc::Build) {
     cfg.file("tectonic/XeTeXFontMgr_FC.cpp");
 }
 
+#[cfg(target_env = "msvc")]
+fn load_vcpkg_deps() {
+    for dep in VCPKG_LIBS {
+        if dep.len() <= 1 {
+            vcpkg::find_package(dep[0]).expect("failed to load package from vcpkg");
+        } else {
+            let mut config = vcpkg::Config::new();
+            for lib in &dep[1..] {
+                config.lib_name(lib);
+            }
+            config.find_package(dep[0]).expect("failed to load package from vcpkg");
+        }
+    }
+}
+
+#[cfg(not(target_env = "msvc"))]
+fn load_vcpkg_deps() {
+    panic!()
+}
+
+fn load_pkg_config_deps() {
+    pkg_config::Config::new().cargo_metadata(true).probe(LIBS).unwrap();
+}
 
 fn main() {
     // We (have to) rerun the search again below to emit the metadata at the right time.
@@ -272,11 +328,21 @@ fn main() {
     // Now that we've emitted the info for our own libraries, we can emit the
     // info for their dependents.
 
-    pkg_config::Config::new().cargo_metadata(true).probe(LIBS).unwrap();
+    if cfg!(target_env = "msvc") {
+        load_vcpkg_deps();
+    } else {
+        load_pkg_config_deps();
+    }
 
     // Tell cargo to rerun build.rs only if files in the tectonic/ directory have changed.
     for file in PathBuf::from("tectonic").read_dir().unwrap() {
         let file = file.unwrap();
         println!("cargo:rerun-if-changed={}", file.path().display());
     }
+
+    #[cfg(target_env = "msvc")]
+    for file in PathBuf::from("tectonic/msvc").read_dir().unwrap() {
+        let file = file.unwrap();
+        println!("cargo:rerun-if-changed={}", file.path().display());
+    }
 }

build.rs

@@ -59,6 +59,10 @@ authorization from the copyright holders.
 
 #include "xetexd.h"
 
+#ifdef _MSC_VER
+#define strcasecmp _stricmp
+#endif
+
 
 /* OT-related constants we need */
 #define kGSUB HB_TAG('G','S','U','B')

tectonic/XeTeX_ext.c

@@ -11,6 +11,10 @@
 #include <stddef.h> /* size_t */
 #include <sys/types.h> /* ssize_t */
 
+#if defined(_MSC_VER)
+#include <BaseTsd.h>
+typedef SSIZE_T ssize_t;
+#endif
 
 /* The weird enum values are historical and could be rationalized. But it is
  * good to write them explicitly since they must be kept in sync with

tectonic/core-bridge.h

@@ -314,10 +314,28 @@ dpx_create_temp_file (void)
         int  _fd = -1;
         _tmpd = dpx_get_tmpdir();
         tmp = NEW(strlen(_tmpd) + strlen(TEMPLATE) + 1, char);
+#ifdef _MSC_VER
+        _fd == -1;
+        for(int retry = 0; retry < 10; retry ++) {
+            strcpy(tmp, _tmpd);
+            strcat(tmp, TEMPLATE);
+            mktemp(tmp);
+            if (strlen(tmp) == 0) {
+                errno = EEXIST;
+                break;
+            }
+            _fd = open(tmp, O_RDWR | O_CREAT | O_EXCL, _S_IREAD | _S_IWRITE);
+            if (_fd != -1 || errno != EEXIST) {
+                break;
+            }
+        }
+        free(_tmpd);
+#else
         strcpy(tmp, _tmpd);
         free(_tmpd);
         strcat(tmp, TEMPLATE);
         _fd  = mkstemp(tmp);
+#endif
         if (_fd != -1) {
             close(_fd);
         } else {

tectonic/dpx-dpxfile.c

@@ -48,6 +48,12 @@
 #include "dpx-specials.h"
 #include "internals.h"
 
+#ifdef _MSC_VER
+#define popen _popen
+#define pclose _pclose
+#endif
+
+
 static int    block_pending = 0;
 static double pending_x     = 0.0;
 static double pending_y     = 0.0;

tectonic/dpx-spc_dvips.c

@@ -35,6 +35,9 @@
 #include "dpx-specials.h"
 #include "internals.h"
 
+#ifdef _MSC_VER
+#define strcasecmp _stricmp
+#endif
 
 #ifndef ISBLANK
 #define ISBLANK(c) ((c) == ' ' || (c) == '\t')

tectonic/dpx-spc_util.c

@@ -0,0 +1,118 @@
+/*-------------------------------------------------------------------------
+ *
+ * dirent.c
+ *	  opendir/readdir/closedir for win32/msvc
+ *
+ * Portions Copyright (c) 1996-2018, PostgreSQL Global Development Group
+ * Portions Copyright (c) 1994, Regents of the University of California
+ *
+ *
+ * IDENTIFICATION
+ *	  src/port/dirent.c
+ *
+ *-------------------------------------------------------------------------
+ */
+ 
+#include <windows.h>
+#include <dirent.h>
+
+extern void _dosmaperr(unsigned long);
+
+
+struct DIR
+{
+	char	   *dirname;
+	struct dirent ret;			/* Used to return to caller */
+	HANDLE		handle;
+};
+
+DIR *
+opendir(const char *dirname)
+{
+	DWORD		attr;
+	DIR		   *d;
+
+	/* Make sure it is a directory */
+	attr = GetFileAttributes(dirname);
+	if (attr == INVALID_FILE_ATTRIBUTES)
+	{
+		errno = ENOENT;
+		return NULL;
+	}
+	if ((attr & FILE_ATTRIBUTE_DIRECTORY) != FILE_ATTRIBUTE_DIRECTORY)
+	{
+		errno = ENOTDIR;
+		return NULL;
+	}
+
+	d = malloc(sizeof(DIR));
+	if (!d)
+	{
+		errno = ENOMEM;
+		return NULL;
+	}
+	d->dirname = malloc(strlen(dirname) + 4);
+	if (!d->dirname)
+	{
+		errno = ENOMEM;
+		free(d);
+		return NULL;
+	}
+	strcpy(d->dirname, dirname);
+	if (d->dirname[strlen(d->dirname) - 1] != '/' &&
+		d->dirname[strlen(d->dirname) - 1] != '\\')
+		strcat(d->dirname, "\\");	/* Append backslash if not already there */
+	strcat(d->dirname, "*");	/* Search for entries named anything */
+	d->handle = INVALID_HANDLE_VALUE;
+	d->ret.d_ino = 0;			/* no inodes on win32 */
+	d->ret.d_reclen = 0;		/* not used on win32 */
+
+	return d;
+}
+
+struct dirent *
+readdir(DIR *d)
+{
+	WIN32_FIND_DATA fd;
+
+	if (d->handle == INVALID_HANDLE_VALUE)
+	{
+		d->handle = FindFirstFile(d->dirname, &fd);
+		if (d->handle == INVALID_HANDLE_VALUE)
+		{
+			errno = ENOENT;
+			return NULL;
+		}
+	}
+	else
+	{
+		if (!FindNextFile(d->handle, &fd))
+		{
+			if (GetLastError() == ERROR_NO_MORE_FILES)
+			{
+				/* No more files, force errno=0 (unlike mingw) */
+				errno = 0;
+				return NULL;
+			}
+			_dosmaperr(GetLastError());
+			return NULL;
+		}
+	}
+	strcpy(d->ret.d_name, fd.cFileName);	/* Both strings are MAX_PATH long */
+	d->ret.d_namlen = strlen(d->ret.d_name);
+
+	return &d->ret;
+}
+
+int
+closedir(DIR *d)
+{
+	int			ret = 0;
+
+	if (d->handle != INVALID_HANDLE_VALUE)
+		ret = !FindClose(d->handle);
+	free(d->dirname);
+	free(d);
+
+	return ret;
+}

tectonic/msvc/dirent.c

@@ -0,0 +1,29 @@
+/*
+ * Headers for port/dirent.c, win32 native implementation of dirent functions
+ *
+ * src/include/port/win32_msvc/dirent.h
+ */
+
+#ifndef _WIN32VC_DIRENT_H
+#define _WIN32VC_DIRENT_H
+
+#ifndef MAX_PATH
+//tectonic hack: avoid including whole windows.h here.
+#define MAX_PATH 260
+#endif
+
+struct dirent
+{
+	long		d_ino;
+	unsigned short d_reclen;
+	unsigned short d_namlen;
+	char		d_name[MAX_PATH];
+};
+
+typedef struct DIR DIR;
+
+DIR		   *opendir(const char *);
+struct dirent *readdir(DIR *);
+int			closedir(DIR *);
+
+#endif