modules/version.lisp

   1
   2 (cl:in-package w32apimod)
   3
   4 (define-w32api-module version :version)
   5
   6 (cl:in-package cl-w32api.module.version)
   7
   8
   9 (defconstant-exported VS_VERSION_INFO 1)
  10
  11 (defconstant-exported VS_USER_DEFINED 100)
  12
  13 (defconstant-exported VS_FFI_SIGNATURE #xFEEF04BD)
  14
  15 (defconstant-exported VS_FFI_STRUCVERSION #x10000)
  16
  17 (defconstant-exported VS_FFI_FILEFLAGSMASK #x3F)
  18
  19 (defconstant-exported VS_FF_DEBUG 1)
  20
  21 (defconstant-exported VS_FF_PRERELEASE 2)
  22
  23 (defconstant-exported VS_FF_PATCHED 4)
  24
  25 (defconstant-exported VS_FF_PRIVATEBUILD 8)
  26
  27 (defconstant-exported VS_FF_INFOINFERRED 16)
  28
  29 (defconstant-exported VS_FF_SPECIALBUILD 32)
  30
  31 (defconstant-exported VOS_UNKNOWN 0)
  32
  33 (defconstant-exported VOS_DOS #x10000)
  34
  35 (defconstant-exported VOS_OS216 #x20000)
  36
  37 (defconstant-exported VOS_OS232 #x30000)
  38
  39 (defconstant-exported VOS_NT #x40000)
  40
  41 (defconstant-exported VOS__BASE 0)
  42
  43 (defconstant-exported VOS__WINDOWS16 1)
  44
  45 (defconstant-exported VOS__PM16 2)
  46
  47 (defconstant-exported VOS__PM32 3)
  48
  49 (defconstant-exported VOS__WINDOWS32 4)
  50
  51 (defconstant-exported VOS_DOS_WINDOWS16 #x10001)
  52
  53 (defconstant-exported VOS_DOS_WINDOWS32 #x10004)
  54
  55 (defconstant-exported VOS_OS216_PM16 #x20002)
  56
  57 (defconstant-exported VOS_OS232_PM32 #x30003)
  58
  59 (defconstant-exported VOS_NT_WINDOWS32 #x40004)
  60
  61 (defconstant-exported VFT_UNKNOWN 0)
  62
  63 (defconstant-exported VFT_APP 1)
  64
  65 (defconstant-exported VFT_DLL 2)
  66
  67 (defconstant-exported VFT_DRV 3)
  68
  69 (defconstant-exported VFT_FONT 4)
  70
  71 (defconstant-exported VFT_VXD 5)
  72
  73 (defconstant-exported VFT_STATIC_LIB 7)
  74
  75 (defconstant-exported VFT2_UNKNOWN 0)
  76
  77 (defconstant-exported VFT2_DRV_PRINTER 1)
  78
  79 (defconstant-exported VFT2_DRV_KEYBOARD 2)
  80
  81 (defconstant-exported VFT2_DRV_LANGUAGE 3)
  82
  83 (defconstant-exported VFT2_DRV_DISPLAY 4)
  84
  85 (defconstant-exported VFT2_DRV_MOUSE 5)
  86
  87 (defconstant-exported VFT2_DRV_NETWORK 6)
  88
  89 (defconstant-exported VFT2_DRV_SYSTEM 7)
  90
  91 (defconstant-exported VFT2_DRV_INSTALLABLE 8)
  92
  93 (defconstant-exported VFT2_DRV_SOUND 9)
  94
  95 (defconstant-exported VFT2_DRV_COMM 10)
  96
  97 (defconstant-exported VFT2_DRV_INPUTMETHOD 11)
  98
  99 (defconstant-exported VFT2_FONT_RASTER 1)
 100
 101 (defconstant-exported VFT2_FONT_VECTOR 2)
 102
 103 (defconstant-exported VFT2_FONT_TRUETYPE 3)
 104
 105 (defconstant-exported VFFF_ISSHAREDFILE 1)
 106
 107 (defconstant-exported VFF_CURNEDEST 1)
 108
 109 (defconstant-exported VFF_FILEINUSE 2)
 110
 111 (defconstant-exported VFF_BUFFTOOSMALL 4)
 112
 113 (defconstant-exported VIFF_FORCEINSTALL 1)
 114
 115 (defconstant-exported VIFF_DONTDELETEOLD 2)
 116
 117 (defconstant-exported VIF_TEMPFILE 1)
 118
 119 (defconstant-exported VIF_MISMATCH 2)
 120
 121 (defconstant-exported VIF_SRCOLD 4)
 122
 123 (defconstant-exported VIF_DIFFLANG 8)
 124
 125 (defconstant-exported VIF_DIFFCODEPG 16)
 126
 127 (defconstant-exported VIF_DIFFTYPE 32)
 128
 129 (defconstant-exported VIF_WRITEPROT 64)
 130
 131 (defconstant-exported VIF_FILEINUSE 128)
 132
 133 (defconstant-exported VIF_OUTOFSPACE 256)
 134
 135 (defconstant-exported VIF_ACCESSVIOLATION 512)
 136
 137 (defconstant-exported VIF_SHARINGVIOLATION 1024)
 138
 139 (defconstant-exported VIF_CANNOTCREATE 2048)
 140
 141 (defconstant-exported VIF_CANNOTDELETE 4096)
 142
 143 (defconstant-exported VIF_CANNOTRENAME 8192)
 144
 145 (defconstant-exported VIF_CANNOTDELETECUR 16384)
 146
 147 (defconstant-exported VIF_OUTOFMEMORY 32768)
 148
 149 (defconstant-exported VIF_CANNOTREADSRC 65536)
 150
 151 (defconstant-exported VIF_CANNOTREADDST #x20000)
 152
 153 (defconstant-exported VIF_BUFFTOOSMALL #x40000)
 154
 155 (defcstructex-exported VS_FIXEDFILEINFO
 156         (dwSignature :unsigned-long)
 157         (dwStrucVersion :unsigned-long)
 158         (dwFileVersionMS :unsigned-long)
 159         (dwFileVersionLS :unsigned-long)
 160         (dwProductVersionMS :unsigned-long)
 161         (dwProductVersionLS :unsigned-long)
 162         (dwFileFlagsMask :unsigned-long)
 163         (dwFileFlags :unsigned-long)
 164         (dwFileOS :unsigned-long)
 165         (dwFileType :unsigned-long)
 166         (dwFileSubtype :unsigned-long)
 167         (dwFileDateMS :unsigned-long)
 168         (dwFileDateLS :unsigned-long))
 169
 170
 171
 172 (defcfunex-exported ("VerFindFileA" VerFindFileA :convention :stdcall) :unsigned-long
 173   (arg0 :unsigned-long)
 174   (arg1 :string)
 175   (arg2 :string)
 176   (arg3 :string)
 177   (arg4 :string)
 178   (arg5 :pointer)
 179   (arg6 :string)
 180   (arg7 :pointer))
 181
 182 (defcfunex-exported ("VerFindFileW" VerFindFileW :convention :stdcall) :unsigned-long
 183   (arg0 :unsigned-long)
 184   (arg1 :pointer)
 185   (arg2 :pointer)
 186   (arg3 :pointer)
 187   (arg4 :pointer)
 188   (arg5 :pointer)
 189   (arg6 :pointer)
 190   (arg7 :pointer))
 191
 192 (defcfunex-exported ("VerInstallFileA" VerInstallFileA :convention :stdcall) :unsigned-long
 193   (arg0 :unsigned-long)
 194   (arg1 :string)
 195   (arg2 :string)
 196   (arg3 :string)
 197   (arg4 :string)
 198   (arg5 :string)
 199   (arg6 :string)
 200   (arg7 :pointer))
 201
 202 (defcfunex-exported ("VerInstallFileW" VerInstallFileW :convention :stdcall) :unsigned-long
 203   (arg0 :unsigned-long)
 204   (arg1 :pointer)
 205   (arg2 :pointer)
 206   (arg3 :pointer)
 207   (arg4 :pointer)
 208   (arg5 :pointer)
 209   (arg6 :pointer)
 210   (arg7 :pointer))
 211
 212 (defcfunex-exported ("GetFileVersionInfoSizeA" GetFileVersionInfoSizeA :convention :stdcall) :unsigned-long
 213   (arg0 :string)
 214   (arg1 :pointer))
 215
 216 (defcfunex-exported ("GetFileVersionInfoSizeW" GetFileVersionInfoSizeW :convention :stdcall) :unsigned-long
 217   (arg0 :pointer)
 218   (arg1 :pointer))
 219
 220 (defcfunex-exported ("GetFileVersionInfoA" GetFileVersionInfoA :convention :stdcall) :int
 221   (arg0 :string)
 222   (arg1 :unsigned-long)
 223   (arg2 :unsigned-long)
 224   (arg3 :pointer))
 225
 226 (defcfunex-exported ("GetFileVersionInfoW" GetFileVersionInfoW :convention :stdcall) :int
 227   (arg0 :pointer)
 228   (arg1 :unsigned-long)
 229   (arg2 :unsigned-long)
 230   (arg3 :pointer))
 231
 232 (defcfunex-exported ("VerLanguageNameA" VerLanguageNameA :convention :stdcall) :unsigned-long
 233   (arg0 :unsigned-long)
 234   (arg1 :string)
 235   (arg2 :unsigned-long))
 236
 237 (defcfunex-exported ("VerLanguageNameW" VerLanguageNameW :convention :stdcall) :unsigned-long
 238   (arg0 :unsigned-long)
 239   (arg1 :pointer)
 240   (arg2 :unsigned-long))
 241
 242 (defcfunex-exported ("VerQueryValueA" VerQueryValueA :convention :stdcall) :int
 243   (arg0 :pointer)
 244   (arg1 :string)
 245   (arg2 :pointer)
 246   (arg3 :pointer))
 247
 248 (defcfunex-exported ("VerQueryValueW" VerQueryValueW :convention :stdcall) :int
 249   (arg0 :pointer)
 250   (arg1 :pointer)
 251   (arg2 :pointer)
 252   (arg3 :pointer))