windows - GHC::在 Windows 上再次链接 sqlite3 失败

Question

我创建了一个简单的应用程序，它使用 sqlite3 作为它的数据存储后端。我在 Linux 上构建和运行它时没有遇到任何问题，但是在我尝试在 Windows 上构建它之后，我看到了奇怪的链接错误:

Linking dist\build\hnotes\hnotes.exe ...
C:\Documents and Settings\Admin\Application Data\cabal\sqlite-0.5.2.2\ghc-7.0.4/libHSsqlite-0.5.2.2.
a(sqlite3-local.o):sqlite3-local.c:(.text+0x21): undefined reference to `sqlite3_temp_directory'
C:\Documents and Settings\Admin\Application Data\cabal\sqlite-0.5.2.2\ghc-7.0.4/libHSsqlite-0.5.2.2.
a(sqlite3-local.o):sqlite3-local.c:(.text+0x40): undefined reference to `sqlite3_temp_directory'
collect2: v ld     1
cabal.EXE: Error: some packages failed to install:
hnotes-0.1 failed during the building phase. The exception was:
ExitFailure 1

那里可能出了什么问题？我怀疑必须将 qalite3.dll 添加到链接阶段，但不知道该怎么做。添加 --extra-lib-dirs=path-to-sqlite-dll 也无济于事(也许是因为我需要以某种方式更新我的 cabal 文件以支持它？)。

Answer 1

不确定是否是错误，但错误来自 sqlite 包的 sqlite3.h include。

查看文件可以看出这一点

/*
** CAPI3REF: Name Of The Folder Holding Temporary Files {H10310} <S20000>
**
** If this global variable is made to point to a string which is
** the name of a folder (a.k.a. directory), then all temporary files
** created by SQLite will be placed in that directory.  If this variable
** is a NULL pointer, then SQLite performs a search for an appropriate
** temporary file directory.
**
** It is not safe to modify this variable once a [database connection]
** has been opened.  It is intended that this variable be set once
** as part of process initialization and before any SQLite interface
** routines have been call and remain unchanged thereafter.
*/
SQLITE_EXTERN char *sqlite3_temp_directory;

所以它被声明为外部。如此简单的测试:

module Main where

import Database.SQLite

main 
 = do hwd <- openConnection "test"
      closeConnection hwd
      putStrLn "done"

如预期的那样，链接过程中会出现上述错误。所以我创建了一个小的 C 测试文件 foo.c

#include "sqlite-0.5.2.2\\include\\sqlite3-local.h"

char* sqlite3_temp_directory = "C:\\test2";

所以我定义了一个 temp_directory，然后在编译 haskell 源代码的过程中传递了 c 文件

$ ghc test.hs foo.c
[1 of 1] Compiling Main             ( test.hs, test.o )
Linking test.exe ...

然后运行它也会返回预期的结果

$ ./test
done

所以看起来您只需要为 sqlite3_temp_directory 提供一个值，如果您将其设置为 NULL 指针，将使用 SQLLITE 手册中定义的 TMP/TEMP 等变量。

编辑，跟进为什么它在 Linux 上有效但在 Windows 上无效

在sqlite包中，sqlite3.6文件夹下有一个sqlite3.c文件。这为 sqlite 包提供了一堆默认值。

当在 linux 上定义 OS_UNIX 时，在 linux 上它使用 OS_WIN 下的定义。我们感兴趣的函数是设置临时目录的函数。对于 unix，这将是 unixGetTempname，对于 windows winGetTempname。

如果您查看这两个函数的实现，对于 unix 函数，它具有将尝试的目录列表

  static const char *azDirs[] = {
     0,
     "/var/tmp",
     "/usr/tmp",
     "/tmp",
     ".",
  };

它尝试按顺序访问它们，并且它可以写入的那个用来在其中生成一个临时文件夹。

但是对于 Windows，第一行之一是:

  if( sqlite3_temp_directory ){
    sqlite3_snprintf(MAX_PATH-30, zTempPath, "%s", sqlite3_temp_directory);
  }else if( isNT() ){

所以对于windows sqlite3_temp_directory 是实际使用的。这就是如果它找不到它就不会编译的原因。