window.
esac
# Win32 can't to rename or unlink on an open file
-case $host_os in win32*|mingw*)
-LIBOBJS="$LIBOBJS dirmod.$ac_objext" ;;
+case $host_os in mingw*)
+LIBOBJS="$LIBOBJS dirmod.$ac_objext"
+LIBOBJS="$LIBOBJS copydir.$ac_objext" ;;
esac
if test "$with_readline" = yes; then
dnl Process this file with autoconf to produce a configure script.
-dnl $Header: /cvsroot/pgsql/configure.in,v 1.250 2003/05/15 16:35:27 momjian Exp $
+dnl $Header: /cvsroot/pgsql/configure.in,v 1.251 2003/05/15 17:59:17 momjian Exp $
dnl
dnl Developers, please strive to achieve this order:
dnl
esac
# Win32 can't to rename or unlink on an open file
-case $host_os in win32*|mingw*)
-AC_LIBOBJ(dirmod) ;;
+case $host_os in mingw*)
+AC_LIBOBJ(dirmod)
+AC_LIBOBJ(copydir) ;;
esac
if test "$with_readline" = yes; then
*
*
* IDENTIFICATION
- * $Header: /cvsroot/pgsql/src/backend/commands/dbcommands.c,v 1.114 2003/05/07 03:47:08 momjian Exp $
+ * $Header: /cvsroot/pgsql/src/backend/commands/dbcommands.c,v 1.115 2003/05/15 17:59:17 momjian Exp $
*
*-------------------------------------------------------------------------
*/
/* Copy the template database to the new location */
#ifndef WIN32
snprintf(buf, sizeof(buf), "cp -r '%s' '%s'", src_loc, target_dir);
+ if (system(buf) != 0)
#else
- snprintf(buf, sizeof(buf), "xcopy /e /i /q '%s' '%s'", src_loc, target_dir);
+ if (copydir(src_loc, target_dir) != 0)
#endif
-
- if (system(buf) != 0)
{
if (remove_dbdirs(nominal_loc, alt_loc))
elog(ERROR, "CREATE DATABASE: could not initialize database directory");
--- /dev/null
+/*
+ * While "xcopy /e /i /q" works fine for copying directories, on Windows XP
+ * it requires an Window handle which prevents it from working when invoked
+ * as a service.
+ */
+
+#include "postgres.h"
+
+int
+copydir(char *fromdir,char *todir)
+{
+ DIR *xldir;
+ struct dirent *xlde;
+ char fromfl[MAXPGPATH];
+ char tofl[MAXPGPATH];
+
+ if (mkdir(todir) != 0)
+ {
+ elog(ERROR, "could not make directory '%s'",todir);
+ return 1;
+ }
+ xldir = opendir(fromdir);
+ if (xldir == NULL)
+ {
+ closedir(xldir);
+ elog(ERROR, "could not open directory '%s'",fromdir);
+ return 1;
+ }
+
+ while ((xlde = readdir(xldir)) != NULL)
+ {
+ snprintf(fromfl, MAXPGPATH, "%s/%s", fromdir, xlde->d_name);
+ snprintf(tofl, MAXPGPATH, "%s/%s", todir, xlde->d_name);
+ if (CopyFile(fromfl,tofl,TRUE) < 0)
+ {
+ closedir(xldir);
+ elog(ERROR,"could not create file %s\n",todir);
+ return 1;
+ }
+ }
+
+ closedir(xldir);
+ return 0;
+}