forked from aRTy42/POE-ItemInfo
-
Notifications
You must be signed in to change notification settings - Fork 188
Commit
This commit does not belong to any branch on this repository, and may belong to a fork outside of the repository.
* added fallback (error msg + exit app) for failed league parsing * changed error msg box options (league parsing) * changed default hotkey for "show item age" * Added a separate low/high mod range modifier * Fixed elemental dps not being displayed on advanced search GUI * Changed min width of advacned search window * updated version/notes * fixed typo
- Loading branch information
Showing
9 changed files
with
286 additions
and
42 deletions.
There are no files selected for viewing
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Original file line number | Diff line number | Diff line change |
|---|---|---|
| @@ -0,0 +1,84 @@ | ||
| HashFile(filePath,hashType=2) ; By Deo, http://www.autohotkey.com/forum/viewtopic.php?t=71133 | ||
| { | ||
| PROV_RSA_AES := 24 | ||
| CRYPT_VERIFYCONTEXT := 0xF0000000 | ||
| BUFF_SIZE := 1024 * 1024 ; 1 MB | ||
| HP_HASHVAL := 0x0002 | ||
| HP_HASHSIZE := 0x0004 | ||
|
|
||
| HASH_ALG := (hashType = 1 OR hashType = "MD2") ? (CALG_MD2 := 32769) : HASH_ALG | ||
| HASH_ALG := (hashType = 2 OR hashType = "MD5") ? (CALG_MD5 := 32771) : HASH_ALG | ||
| HASH_ALG := (hashType = 3 OR hashType = "SHA") ? (CALG_SHA := 32772) : HASH_ALG | ||
| HASH_ALG := (hashType = 4 OR hashType = "SHA256") ? (CALG_SHA_256 := 32780) : HASH_ALG ;Vista+ only | ||
| HASH_ALG := (hashType = 5 OR hashType = "SHA384") ? (CALG_SHA_384 := 32781) : HASH_ALG ;Vista+ only | ||
| HASH_ALG := (hashType = 6 OR hashType = "SHA512") ? (CALG_SHA_512 := 32782) : HASH_ALG ;Vista+ only | ||
|
|
||
| f := FileOpen(filePath,"r","CP0") | ||
| if !IsObject(f) | ||
| return 0 | ||
| if !hModule := DllCall( "GetModuleHandleW", "str", "Advapi32.dll", "Ptr" ) | ||
| hModule := DllCall( "LoadLibraryW", "str", "Advapi32.dll", "Ptr" ) | ||
| if !dllCall("Advapi32\CryptAcquireContextW" | ||
| ,"Ptr*",hCryptProv | ||
| ,"Uint",0 | ||
| ,"Uint",0 | ||
| ,"Uint",PROV_RSA_AES | ||
| ,"UInt",CRYPT_VERIFYCONTEXT ) | ||
| Gosub,HashTypeFreeHandles | ||
|
|
||
| if !dllCall("Advapi32\CryptCreateHash" | ||
| ,"Ptr",hCryptProv | ||
| ,"Uint",HASH_ALG | ||
| ,"Uint",0 | ||
| ,"Uint",0 | ||
| ,"Ptr*",hHash ) | ||
| Gosub, HashTypeFreeHandles | ||
|
|
||
| VarSetCapacity(read_buf,BUFF_SIZE,0) | ||
|
|
||
| hCryptHashData := DllCall("GetProcAddress", "Ptr", hModule, "AStr", "CryptHashData", "Ptr") | ||
| While (cbCount := f.RawRead(read_buf, BUFF_SIZE)) | ||
| { | ||
| if (cbCount = 0) | ||
| break | ||
|
|
||
| if !dllCall(hCryptHashData | ||
| ,"Ptr",hHash | ||
| ,"Ptr",&read_buf | ||
| ,"Uint",cbCount | ||
| ,"Uint",0 ) | ||
| Gosub, HashTypeFreeHandles | ||
| } | ||
|
|
||
| if !dllCall("Advapi32\CryptGetHashParam" | ||
| ,"Ptr",hHash | ||
| ,"Uint",HP_HASHSIZE | ||
| ,"Uint*",HashLen | ||
| ,"Uint*",HashLenSize := 4 | ||
| ,"UInt",0 ) | ||
| Gosub, HashTypeFreeHandles | ||
|
|
||
| VarSetCapacity(pbHash,HashLen,0) | ||
| if !dllCall("Advapi32\CryptGetHashParam" | ||
| ,"Ptr",hHash | ||
| ,"Uint",HP_HASHVAL | ||
| ,"Ptr",&pbHash | ||
| ,"Uint*",HashLen | ||
| ,"UInt",0 ) | ||
| Gosub, HashTypeFreeHandles | ||
|
|
||
| SetFormat,integer,Hex | ||
| loop,%HashLen% | ||
| { | ||
| num := numget(pbHash,A_index-1,"UChar") | ||
| hashval .= substr((num >> 4),0) . substr((num & 0xf),0) | ||
| } | ||
| SetFormat,integer,D | ||
|
|
||
| HashTypeFreeHandles: | ||
| f.Close() | ||
| DllCall("FreeLibrary", "Ptr", hModule) | ||
| dllCall("Advapi32\CryptDestroyHash","Ptr",hHash) | ||
| dllCall("Advapi32\CryptReleaseContext","Ptr",hCryptProv,"UInt",0) | ||
| return hashval | ||
| } |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Original file line number | Diff line number | Diff line change |
|---|---|---|
| @@ -0,0 +1,105 @@ | ||
| #Include CalcChecksum.ahk | ||
|
|
||
| PoEScripts_UserSettings(ProjectName, External, FilesToCopy, Dir = "") { | ||
| If (!StrLen(Dir)) { | ||
| Dir := A_MyDocuments . "\" . ProjectName | ||
| } | ||
|
|
||
| ; External is set if the user settings folder is handled by another script | ||
| If (External) { | ||
| ; copy files after checking if it's neccessary (files do not exist, files were changed in latest update) | ||
| ; copy .ini files and additionalMacros.txt to A_MyDocuments/ProjectName | ||
| PoEScripts_CopyFiles(FilesToCopy, Dir) | ||
| } | ||
| Else { | ||
| If (!InStr(FileExist(Dir), "D")) { | ||
| ;FileCreateDir, %Dir% | ||
| } | ||
|
|
||
| ; copy files after checking if it's neccessary (files do not exist, files were changed in latest update) | ||
| ; this handles the external scripts files | ||
| ;PoEScripts_CopyFiles(FilesToCopy, Dir) | ||
| } | ||
|
|
||
| } | ||
|
|
||
| PoEScripts_CopyFiles(Files, Dir) { | ||
| For key, file in Files { | ||
| If (FileExist(file)) { | ||
| If(PoEScripts_CopyNeeded(file, Dir)) { | ||
| FileCopy, %file%, %Dir% | ||
| SplitPath, file, name | ||
| ; hash copied file | ||
| targetHash := HashFile(Dir . "\" . name, "SHA") | ||
|
|
||
| ; write hash to a text file | ||
| If (!FileExist(Dir . "\FileHashes.txt")) { | ||
| FileAppend, %name%:%targetHash%`n, %Dir%\FileHashes.txt | ||
| } | ||
| Else { | ||
| hashes := {} | ||
| ; parse file line by line and write names/hashes to array/object | ||
| FileRead, fileData, %Dir%\FileHashes.txt | ||
| MsgBox % "data: " fileData | ||
| Loop, Parse, fileData, `n, `r | ||
| { | ||
| RegExMatch(A_LoopField, "(.*):(.*)", match) | ||
| hashes[Trim(match1)] := Trim(match2) | ||
| } | ||
|
|
||
| ; delete file and write it new with array/object contents | ||
| FileDelete, %Dir%\FileHashes.txt | ||
| For key, hash in hashes { | ||
| MsgBox % key ", " hash | ||
| If (key == name) { | ||
| hashes[key] := targetHash | ||
| } | ||
| FileAppend, %key%:%hash%`n, %Dir%\FileHashes.txt | ||
| } | ||
| } | ||
| } | ||
| } | ||
| } | ||
| } | ||
|
|
||
| PoEScripts_CopyNeeded(file, targetDir) { | ||
| SplitPath, file, name, dir, ext, name_no_ext, drive | ||
|
|
||
| If (FileExist(targetDir . "\" . name)) { | ||
| MsgBox file exists already in target folder | ||
| If (PoEScripts_CompareFileHashes(file, targetDir . "\" . name, targetDir)) { | ||
| MsgBox file hashes are different = file was changed | ||
| return 1 | ||
| } | ||
| Else { | ||
| return 0 | ||
| } | ||
| } | ||
| Else { | ||
| MsgBox file doesn't exist in target folder | ||
| return 1 | ||
| } | ||
| } | ||
|
|
||
| PoEScripts_CompareFileHashes(sourceFile, targetFile, targetDir) { | ||
| sourceHash := HashFile(sourceFile, "SHA") | ||
|
|
||
| hashes := {} | ||
| ; parse file line by line and write names/hashes to array/object | ||
| FileRead, fileData, %targetDir%\FileHashes.txt | ||
| Loop, Parse, fileData, `n, `r | ||
| { | ||
| RegExMatch(A_LoopField, "(.*):(.*)", match) | ||
| hashes[Trim(match1)] := Trim(match2) | ||
| } | ||
|
|
||
| For key, hash in hashes { | ||
| If (key == name) { | ||
| If (sourceHash != hash) { | ||
| return 1 | ||
| } | ||
| } | ||
| } | ||
|
|
||
| return 0 | ||
| } |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Oops, something went wrong.