perl 最新源码 windows下编译

源码目录:

1. 使用SDK的头文件，DDK中的cl、link等工具，好处，保证运行库是msvcrt.dll

2. 当然也可以用vs2010不加修改的完成编译，可是用的是MSVCR100。

如果使用gcc编译，可以直接用strawberry即可，遗憾的是activeperl最新三方提供的也是gcc编译，与strawberry基本无异。

==================================================

下面使用方式一进行编译:

比如源码:

http://www.cpan.org/src/5.0/perl-5.18.2.tar.gz

使用方式一的修改点:

（op.c 、toke.c和pad.c有宽字符，用txt另存为ansi编码即可）

win32.c

注释掉:
1.

//~ #if _MSC_VER >= 1400 && defined(_WRITE_ABORT_MSG)
//~ #  define SET_INVALID_PARAMETER_HANDLER
//~ #endif

2.

//~ #if !defined __MINGW32__      /* compiler intolerance */
    //~ extern int sys_nerr;
//~ #endif

makefile修改

1. setargv 使用一致的宏

$(GLOBEXE) : perlglob$(o)
	$(LINK32) $(LINK_FLAGS) $(LIBFILES) -out:$@ -subsystem:$(SUBSYS) 

	    perlglob$(o) setargv$(o)

改成:

$(GLOBEXE) : perlglob$(o)
	$(LINK32) $(LINK_FLAGS) $(LIBFILES) -out:$@ -subsystem:$(SUBSYS) 

	    perlglob$(o) $(SETARGV_OBJ)

2. 运行库的扩展支持

LIBC	= msvcrt.lib

增量一些自定义扩展的

LIBC	= msvcrt.lib msvcrtex.lib commonCRT.lib

3. /GS 去掉

!IF "$(WIN64)" == "define" && "$(CCTYPE)" == "SDK2003SP1"
LIBBASEFILES    = $(LIBBASEFILES) bufferoverflowU.lib
!ENDIF

替换为:

LIBBASEFILES    = $(LIBBASEFILES) bufferoverflow.lib

4.

EXTRACFLAGS	= -nologo -GF -W3 -GS-

比如标准msvcrt.dll中没有localtime_s函数，可以写一个commonCRT.lib包含这个函数即可，如下：

#include <stdio.h>

errno_t localtime_s(struct tm* _tm,const time_t *time )
{
    _tm=(struct tm *)localtime(time);
    return 0;
}

由于ddk中提供的msvcrt.lib不完全包含msvcrt.dll中导出的函数，我们可以自已做一个msvcrtex.lib包含这个函数(使用dumpbin lib工具)。

C:UsersG-Spider>perl -V
Summary of my perl5 (revision 5 version 18 subversion 2) configuration:

  Platform:
    osname=MSWin32,osvers=4.0,archname=MSWin32-x86-multi-thread
    uname=''
    config_args='undef'
    hint=recommended,useposix=true,d_sigaction=undef
    useithreads=define,usemultiplicity=define
    useperlio=define,d_sfio=undef,uselargefiles=define,usesocks=undef
    use64bitint=undef,use64bitall=undef,uselongdouble=undef
    usemymalloc=n,bincompat5005=undef
  Compiler:
    cc='cl',ccflags ='-nologo -GF -W3 -GS- -O1 -MD -DWIN32 -D_CONSOLE -DNO_STRI
CT  -DPERL_TEXTMODE_SCRIPTS -DPERL_IMPLICIT_CONTEXT -DPERL_IMPLICIT_SYS -DUSE_PE
RLIO',optimize='-O1 -MD',cppflags='-DWIN32'
    ccversion='15.00.30729.207',gccversion='',gccosandvers=''
    intsize=4,longsize=4,ptrsize=4,doublesize=8,byteorder=1234
    d_longlong=undef,longlongsize=8,d_longdbl=define,longdblsize=8
    ivtype='long',ivsize=4,nvtype='double',nvsize=8,Off_t='__int64',lseeksi
ze=8
    alignbytes=8,prototype=define
  Linker and Libraries:
    ld='link',ldflags ='-nologo -nodefaultlib   -libpath:"c:perllibCORE"  -m
achine:x86'
    libpth=lib
    libs=oldnames.lib kernel32.lib user32.lib gdi32.lib winspool.lib  comdlg32.l
ib advapi32.lib shell32.lib ole32.lib oleaut32.lib  netapi32.lib uuid.lib ws2_32
.lib mpr.lib winmm.lib  version.lib odbc32.lib odbccp32.lib comctl32.lib buffero
verflow.lib msvcrt.lib  commonCRT.lib ntdll.lib
    perllibs=oldnames.lib kernel32.lib user32.lib gdi32.lib winspool.lib  comdlg
32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib  netapi32.lib uuid.lib ws
2_32.lib mpr.lib winmm.lib  version.lib odbc32.lib odbccp32.lib comctl32.lib buf
feroverflow.lib msvcrt.lib  commonCRT.lib ntdll.lib
    libc=msvcrt.lib  commonCRT.lib ntdll.lib,so=dll,useshrplib=true,libperl=p
erl518.lib
    gnulibc_version=''
  Dynamic Linking:
    dlsrc=dl_win32.xs,dlext=dll,d_dlsymun=undef,ccdlflags=' '
    cccdlflags=' ',lddlflags='-dll -nologo -nodefaultlib   -libpath:"c:perlli
bCORE"  -machine:x86'


Characteristics of this binary (from libperl):
  Compile-time options: HAS_TIMES HAVE_INTERP_INTERN MULTIPLICITY
                        PERLIO_LAYERS PERL_DONT_CREATE_GVSV
                        PERL_HASH_FUNC_ONE_AT_A_TIME_HARD
                        PERL_IMPLICIT_CONTEXT PERL_IMPLICIT_SYS
                        PERL_MALLOC_WRAP PERL_PRESERVE_IVUV PERL_SAWAMPERSAND
                        USE_ITHREADS USE_LARGE_FILES USE_LOCALE
                        USE_LOCALE_COLLATE USE_LOCALE_CTYPE
                        USE_LOCALE_NUMERIC USE_PERLIO USE_PERL_ATOF
  Built under MSWin32
  Compiled at May  3 2014 16:02:42
  @INC:
    C:/perl/site/lib
    C:/perl/lib
    .

安装模块:

C:UsersG-Spider.cpanbuildDBD-SQLite-1.42-T5V6Gi>nmake install

Microsoft (R) Program Maintenance Utility Version 9.00.30729.207
Copyright (C) Microsoft Corporation.  All rights reserved.

Files found in blibarch: installing files in bliblib into architecture depende
nt library tree
Installing C:perlsitelibautoDBDSQLiteSQLite.bs
Installing C:perlsitelibautoDBDSQLiteSQLite.dll
Installing C:perlsitelibautoDBDSQLiteSQLite.exp
Installing C:perlsitelibautoDBDSQLiteSQLite.lib
Installing C:perlsitelibautosharedistDBD-SQLitesqlite3.c
Installing C:perlsitelibautosharedistDBD-SQLitesqlite3.h
Installing C:perlsitelibautosharedistDBD-SQLitesqlite3ext.h
Installing C:perlsitelibDBDSQLite.pm
Installing C:perlsitelibDBDSQLiteCookbook.pod
Appending installation info to c:perllib/perllocal.pod

?

文件名： C:perlbinperl.exe
------------------------------------------------
导入表所处的节：.rdata

------------------------------------------------
导入库： MSVCRT.dll
------------------------------------------------
OriginalFirstThunk 00002088
TimeDateStamp      00000000
ForwarderChain     00000000
FirstThunk         00002000
------------------------------------------------
导入序号  导入函数名称
------------------------------------------------
     211  _exit
      72  _XcptFilter
     585  exit
     100  __p___initenv
      88  __getmainargs
     271  _initterm
     131  __setusermatherr
     157  _adjust_fdiv
     106  __p__commode
     111  __p__fmode
     129  __set_app_type
     202  _except_handler3
     183  _controlfp

------------------------------------------------
导入库： perl518.dll
------------------------------------------------
OriginalFirstThunk 000020C0
TimeDateStamp      00000000
ForwarderChain     00000000
FirstThunk         00002038
------------------------------------------------
导入序号  导入函数名称
------------------------------------------------
    1073  RunPerl

?

文件名： C:perlbinperl518.dll
------------------------------------------------
导入表所处的节：.rdata

------------------------------------------------
导入库： KERNEL32.dll
------------------------------------------------
OriginalFirstThunk 000D998C
TimeDateStamp      00000000
ForwarderChain     00000000
FirstThunk         000C101C
------------------------------------------------
导入序号  导入函数名称
------------------------------------------------
     278  GetFullPathNameA
     279  GetFullPathNameW
     675  TlsFree
      93  DisableThreadLibraryCalls
     605  SetCurrentDirectoryA
     484  MultiByteToWideChar
     606  SetCurrentDirectoryW
     250  GetCurrentThreadId
      85  DeleteCriticalSection
     269  GetFileAttributesA
     429  InterlockedDecrement
     179  FreeEnvironmentStringsW
     264  GetEnvironmentStringsW
     287  GetLogicalDriveStringsW
     178  FreeEnvironmentStringsA
     262  GetEnvironmentStrings
     286  GetLogicalDriveStringsA
     373  GetVersionExA
     288  GetLogicalDrives
     292  GetModuleFileNameA
     293  GetModuleFileNameW
      74  CreateThread
     722  WideCharToMultiByte
     151  FindFirstFileW
     144  FindClose
     158  FindNextFileW
     355  GetTempFileNameA
      27  CloseHandle
     716  WaitForMultipleObjects
     184  GenerateConsoleCtrlEvent
     670  TerminateProcess
     510  Process32Next
     508  Process32First
      76  CreateToolhelp32Snapshot
     495  OpenProcess
     375  GetVolumeInformationA
     273  GetFileInformationByHandle
      52  CreateFileA
     148  FindFirstFileA
     265  GetEnvironmentVariableA
     324  GetProcessTimes
     247  GetCurrentProcess
     432  InterlockedIncrement
     667  SystemTimeToFileTime
     616  SetFileAttributesA
     620  SetFileTime
     276  GetFileTime
     351  GetSystemTimeAsFileTime
     347  GetSystemInfo
     206  GetComputerNameA
     267  GetExitCodeProcess
     268  GetExitCodeThread
     468  LockFileEx
     687  UnlockFileEx
     175  FormatMessageA
     460  LocalFree
     456  LocalAlloc
      57  CreateHardLinkW
     478  MoveFileExA
     235  GetConsoleMode
     610  SetEnvironmentVariableA
     245  GetCurrentDirectoryA
      68  CreateProcessA
     451  LoadLibraryExA
     318  GetProcAddress
     338  GetStdHandle
     577  SetConsoleCtrlHandler
     662  Sleep
     671  TerminateThread
     335  GetShortPathNameW
     357  GetTempPathA
     636  SetStdHandle
     609  SetEndOfFile
     266  GetEnvironmentVariableW
     294  GetModuleHandleA
     677  TlsSetValue
     676  TlsGetValue
     536  ReadFile
     735  WriteFile
     618  SetFilePointer
      99  DuplicateHandle
     180  FreeLibrary
     523  RaiseException
     430  InterlockedExchange
     450  LoadLibraryA
     426  InitializeCriticalSection
     674  TlsAlloc
     282  GetLastError
     625  SetLastError
     102  EnterCriticalSection
     458  LocalFileTimeToFileTime
     449  LeaveCriticalSection

------------------------------------------------
导入库： USER32.dll
------------------------------------------------
OriginalFirstThunk 000D9D68
TimeDateStamp      00000000
ForwarderChain     00000000
FirstThunk         000C13F8
------------------------------------------------
导入序号  导入函数名称
------------------------------------------------
     480  PostQuitMessage
     149  DispatchMessageA
     642  TranslateMessage
      19  CallMsgFilterA
     476  PeekMessageA
     458  MsgWaitForMultipleObjects
     405  KillTimer
     142  DestroyWindow
     594  SetTimer
      89  CreateWindowExA
     498  RegisterClassA
     132  DefWindowProcA
     478  PostMessageA
      47  CharUpperA
     481  PostThreadMessageA

------------------------------------------------
导入库： ADVAPI32.dll
------------------------------------------------
OriginalFirstThunk 000D9970
TimeDateStamp      00000000
ForwarderChain     00000000
FirstThunk         000C1000
------------------------------------------------
导入序号  导入函数名称
------------------------------------------------
     347  RegCloseKey
     370  RegOpenKeyExA
     215  GetUserNameA
     379  RegQueryValueExA

------------------------------------------------
导入库： COMCTL32.dll
------------------------------------------------
OriginalFirstThunk 000D9984
TimeDateStamp      00000000
ForwarderChain     00000000
FirstThunk         000C1014
------------------------------------------------
导入序号  导入函数名称
------------------------------------------------
      17  (按序号导入)

------------------------------------------------
导入库： MSVCRT.dll
------------------------------------------------
OriginalFirstThunk 000D9B00
TimeDateStamp      00000000
ForwarderChain     00000000
FirstThunk         000C1190
------------------------------------------------
导入序号  导入函数名称
------------------------------------------------
     606  free
     157  _adjust_fdiv
     271  _initterm
      14  ??1type_info@@UAE@XZ
     179  _close
     404  _putenv
     215  _fdopen
     213  _fcloseall
     230  _flushall
     209  _execvp
     664  memmove
     695  strchr
     573  atoi
     200  _errno
     665  memset
     696  strcmp
     663  memcpy
     704  strncmp
     702  strlen
     662  memcmp
     652  localeconv
     685  setlocale
     724  toupper
     630  islower
     723  tolower
     634  isupper
     714  strxfrm
     198  _environ
     661  memchr
     585  exit
     710  strtod
     709  strstr
     437  _spawnv
     424  _setjmp3
     676  qsort
     656  longjmp
     720  time
     669  pow
     598  fmod
     597  floor
     570  atan2
     580  cos
     586  exp
     654  log
     691  sqrt
     688  sin
     678  rand
     692  srand
     577  ceil
     633  isspace
     667  modf
     653  localtime
     625  isalpha
     699  strcspn
     690  sprintf
     648  isxdigit
     632  ispunct
     631  isprint
     628  isgraph
     627  isdigit
     626  iscntrl
     624  isalnum
     608  frexp
     712  strtol
     481  _vsnprintf
     701  strftime
     584  div
     694  strcat
     698  strcpy
     705  strncpy
     735  wcscat
     739  wcscpy
     745  wcsncpy
     742  wcslen
     611  fsetpos
     593  fgetpos
     722  tmpnam
     211  _exit
      16  ??3@YAXPAX@Z
     575  bsearch
     564  abort
     657  malloc
     707  strrchr
     679  realloc
      15  ??2@YAPAXI@Z
     588  fclose
     275  _iob
     592  fgetc
     727  ungetc
     160  _assert
     257  _getpid
     443  _stati64
     579  clock
     245  _get_osfhandle
     590  ferror
     589  feof
     700  strerror
     462  _sys_nerr
     729  vfprintf
     731  vprintf
     605  fread
     614  fwrite
     607  freopen
     602  fputs
     601  fputc
     616  getc
     578  clearerr
     591  fflush
     464  _telli64
     610  fseek
     682  rewind
     239  _fstati64
     400  _pipe
     325  _lseeki64
     668  perror
     684  setbuf
     686  setvbuf
     594  fgets
     619  gets
     671  putc
     673  puts
     617  getchar
     672  putchar
     576  calloc
     392  _open_osfhandle
     687  signal
     599  fopen
     231  _fmode
     736  wcschr
     182  _control87
     753  wcstombs
     459  _strupr
     142  _access
     249  _getcwd
     387  _mktemp
     475  _umask
     203  _execl
     222  _fileno
     477  _unlink
     480  _utime
     449  _stricmp
     427  _setmode
     391  _open
     199  _eof
     193  _dup
     194  _dup2
     408  _read
     535  _write
     386  _mkdir
     409  _rmdir
     172  _chdir
     176  _chmod
     207  _execv