mirror of
https://git.huckle.dev/Huckles-Minecraft-Archive/jpexs-decompiler.git
synced 2026-07-07 00:09:13 +00:00
NSIS - remove associating extensions in hope it will fix AVs
This commit is contained in:
Jindra Petřík
259
installer.nsi
259
installer.nsi
@@ -362,229 +362,9 @@ var SMDir
|
||||
Exch $R2
|
||||
!macroend
|
||||
|
||||
!define un.StrRep "!insertmacro un.StrRep"
|
||||
!macro un.StrRep output string old new
|
||||
Push `${string}`
|
||||
Push `${old}`
|
||||
Push `${new}`
|
||||
Call un.StrRep
|
||||
|
||||
Pop ${output}
|
||||
!macroend
|
||||
|
||||
|
||||
!macro Func_StrRep un
|
||||
Function ${un}StrRep
|
||||
Exch $R2 ;new
|
||||
Exch 1
|
||||
Exch $R1 ;old
|
||||
Exch 2
|
||||
Exch $R0 ;string
|
||||
Push $R3
|
||||
Push $R4
|
||||
Push $R5
|
||||
Push $R6
|
||||
Push $R7
|
||||
Push $R8
|
||||
Push $R9
|
||||
|
||||
StrCpy $R3 0
|
||||
StrLen $R4 $R1
|
||||
StrLen $R6 $R0
|
||||
StrLen $R9 $R2
|
||||
loop:
|
||||
StrCpy $R5 $R0 $R4 $R3
|
||||
StrCmp $R5 $R1 found
|
||||
StrCmp $R3 $R6 done
|
||||
IntOp $R3 $R3 + 1 ;move offset by 1 to check the next character
|
||||
Goto loop
|
||||
found:
|
||||
StrCpy $R5 $R0 $R3
|
||||
IntOp $R8 $R3 + $R4
|
||||
StrCpy $R7 $R0 "" $R8
|
||||
StrCpy $R0 $R5$R2$R7
|
||||
StrLen $R6 $R0
|
||||
IntOp $R3 $R3 + $R9 ;move offset by length of the replacement string
|
||||
Goto loop
|
||||
done:
|
||||
|
||||
Pop $R9
|
||||
Pop $R8
|
||||
Pop $R7
|
||||
Pop $R6
|
||||
Pop $R5
|
||||
Pop $R4
|
||||
Pop $R3
|
||||
Push $R0
|
||||
Push $R1
|
||||
Pop $R0
|
||||
Pop $R1
|
||||
Pop $R0
|
||||
Pop $R2
|
||||
Exch $R1
|
||||
FunctionEnd
|
||||
!macroend
|
||||
;!insertmacro Func_StrRep ""
|
||||
!insertmacro Func_StrRep "un."
|
||||
|
||||
;var AddToContextMenu
|
||||
/*
|
||||
Function CUSTOM_PAGE_CONTEXTMENU
|
||||
StrCpy $AddToContextMenu 1
|
||||
nsDialogs::create /NOUNLOAD 1018
|
||||
pop $1
|
||||
!insertmacro MUI_HEADER_TEXT "Add to Context Menu" "Set up Context menu"
|
||||
${NSD_CreateLabel} 0 0 100% 50 "You can add FFDec to right click context menu in Windows Explorer."
|
||||
pop $1
|
||||
${NSD_CreateCheckbox} 0 50 100% 25 "Add FFDec to context menu of SWF and GFX files"
|
||||
pop $1
|
||||
${NSD_SetState} $1 ${BST_CHECKED}
|
||||
${NSD_OnClick} $1 AddContextClick
|
||||
nsDialogs::Show
|
||||
FunctionEnd
|
||||
|
||||
*/
|
||||
|
||||
/*
|
||||
Function AddContextClick
|
||||
pop $1
|
||||
${NSD_GetState} $1 $AddToContextMenu
|
||||
FunctionEnd
|
||||
*/
|
||||
|
||||
Function IndexOf
|
||||
Exch $R0
|
||||
Exch
|
||||
Exch $R1
|
||||
Push $R2
|
||||
Push $R3
|
||||
|
||||
StrCpy $R3 $R0
|
||||
StrCpy $R0 -1
|
||||
IntOp $R0 $R0 + 1
|
||||
StrCpy $R2 $R3 1 $R0
|
||||
StrCmp $R2 "" +2
|
||||
StrCmp $R2 $R1 +2 -3
|
||||
|
||||
StrCpy $R0 -1
|
||||
|
||||
Pop $R3
|
||||
Pop $R2
|
||||
Pop $R1
|
||||
Exch $R0
|
||||
FunctionEnd
|
||||
|
||||
!macro IndexOf Var Str Char
|
||||
Push "${Char}"
|
||||
Push "${Str}"
|
||||
Call IndexOf
|
||||
Pop "${Var}"
|
||||
!macroend
|
||||
!define IndexOf "!insertmacro IndexOf"
|
||||
|
||||
var clsname
|
||||
!define VERB "ffdec"
|
||||
!define VERBNAME "Open with FFDec"
|
||||
!define ALPHABET "abcdefghijklmnopqrstuvwxyz"
|
||||
var ext
|
||||
var MRUList
|
||||
var exists
|
||||
|
||||
|
||||
!define REG_CLASSES_HKEY HKLM
|
||||
|
||||
Function un.RemoveExtContextMenu
|
||||
pop $ext
|
||||
DeleteRegKey ${REG_CLASSES_HKEY} "Software\Classes\Applications\${APP_EXENAME}"
|
||||
ReadRegStr $clsname ${REG_CLASSES_HKEY} "Software\Classes\.$ext" ""
|
||||
IfErrors step2
|
||||
DeleteRegKey ${REG_CLASSES_HKEY} "Software\Classes\$clsname\shell\${VERB}"
|
||||
step2:
|
||||
ReadRegStr $MRUList HKCU "Software\Microsoft\Windows\CurrentVersion\Explorer\FileExts\$ext\OpenWithList" "MRUList"
|
||||
IfErrors step3
|
||||
StrLen $0 $MRUList
|
||||
${For} $R1 0 $0
|
||||
StrCpy $2 $MRUList 1 $R1 ;Copy one character
|
||||
ReadRegStr $3 HKCU "Software\Microsoft\Windows\CurrentVersion\Explorer\FileExts\$ext\OpenWithList" $2
|
||||
${If} $3 == ${APP_EXENAME}
|
||||
${un.StrRep} $MRUList $MRUList $2 ""
|
||||
WriteRegStr HKCU "Software\Microsoft\Windows\CurrentVersion\Explorer\FileExts\$ext\OpenWithList" "MRUList" $MRUList
|
||||
DeleteRegValue HKCU "Software\Microsoft\Windows\CurrentVersion\Explorer\FileExts\$ext\OpenWithList" $2
|
||||
${Break}
|
||||
${EndIf}
|
||||
${Next}
|
||||
step3:
|
||||
DeleteRegKey ${REG_CLASSES_HKEY} "Software\Classes\SystemFileAssociations\.$ext\Shell\${VERB}"
|
||||
FunctionEnd
|
||||
|
||||
|
||||
|
||||
|
||||
Function AddToExtContextMenu
|
||||
pop $ext
|
||||
|
||||
|
||||
WriteRegStr ${REG_CLASSES_HKEY} "Software\Classes\Applications\${APP_EXENAME}\shell\open" "" ${VERB}
|
||||
WriteRegStr ${REG_CLASSES_HKEY} "Software\Classes\Applications\${APP_EXENAME}\shell\open\command" "" '"$INSTDIR\${APP_EXENAME}" "%1"'
|
||||
|
||||
!insertmacro IfKeyExists ${REG_CLASSES_HKEY} "Software\Classes" ".$ext"
|
||||
Pop $R0
|
||||
${If} $R0 == 0
|
||||
WriteRegStr ${REG_CLASSES_HKEY} "Software\Classes\.$ext" "" "ShockwaveFlash.ShockwaveFlash"
|
||||
${EndIf}
|
||||
|
||||
ReadRegStr $clsname ${REG_CLASSES_HKEY} "Software\Classes\.$ext" ""
|
||||
!insertmacro IfKeyExists ${REG_CLASSES_HKEY} "Software\Classes" $clsname
|
||||
Pop $R0
|
||||
${If} $R0 == 0
|
||||
WriteRegStr ${REG_CLASSES_HKEY} "Software\Classes\$clsname" "" "Flash Movie"
|
||||
${EndIf}
|
||||
|
||||
WriteRegStr ${REG_CLASSES_HKEY} "Software\Classes\$clsname\shell\${VERB}" "" "${VERBNAME}"
|
||||
WriteRegStr ${REG_CLASSES_HKEY} "Software\Classes\$clsname\shell\${VERB}\command" "" '"$INSTDIR\${APP_EXENAME}" "%1"'
|
||||
|
||||
|
||||
|
||||
|
||||
ReadRegStr $MRUList HKCU "Software\Microsoft\Windows\CurrentVersion\Explorer\FileExts\$ext\OpenWithList" "MRUList"
|
||||
IfErrors not_mru
|
||||
StrLen $0 $MRUList
|
||||
StrCpy $exists 0
|
||||
${For} $R1 0 $0
|
||||
StrCpy $2 $MRUList 1 $R1 ;Copy one character
|
||||
ReadRegStr $2 HKCU "Software\Microsoft\Windows\CurrentVersion\Explorer\FileExts\$ext\OpenWithList" $2
|
||||
${If} $2 == ${APP_EXENAME}
|
||||
StrCpy $exists 1
|
||||
${Break}
|
||||
${EndIf}
|
||||
${Next}
|
||||
${If} $exists == 0
|
||||
StrLen $0 ${ALPHABET}
|
||||
${For} $R1 0 $0
|
||||
StrCpy $1 ${ALPHABET} 1 $R1
|
||||
${IndexOf} $R0 $MRUList $1
|
||||
${If} $R0 == -1
|
||||
WriteRegStr HKCU "Software\Microsoft\Windows\CurrentVersion\Explorer\FileExts\$ext\OpenWithList" $1 ${APP_EXENAME}
|
||||
StrCpy $MRUList "$MRUList$1"
|
||||
WriteRegStr HKCU "Software\Microsoft\Windows\CurrentVersion\Explorer\FileExts\$ext\OpenWithList" "MRUList" $MRUList
|
||||
${Break}
|
||||
${EndIf}
|
||||
${Next}
|
||||
${EndIf}
|
||||
not_mru:
|
||||
|
||||
!insertmacro IfKeyExists ${REG_CLASSES_HKEY} "Software\Classes" "SystemFileAssociations"
|
||||
Pop $R0
|
||||
${If} $R0 == 1
|
||||
!insertmacro IfKeyExists ${REG_CLASSES_HKEY} "Software\Classes\SystemFileAssociations\.$ext\Shell" ${VERB}
|
||||
Pop $R0
|
||||
${If} $R0 == 0
|
||||
WriteRegStr ${REG_CLASSES_HKEY} "Software\Classes\SystemFileAssociations\.$ext\Shell\${VERB}" "" "${VERBNAME}"
|
||||
WriteRegStr ${REG_CLASSES_HKEY} "Software\Classes\SystemFileAssociations\.$ext\Shell\${VERB}\Command" "" '"$INSTDIR\${APP_EXENAME}" "%1"'
|
||||
${EndIf}
|
||||
${EndIf}
|
||||
FunctionEnd
|
||||
|
||||
|
||||
Section "FFDec" SecDummy
|
||||
|
||||
@@ -663,32 +443,13 @@ Function .onInit
|
||||
SectionSetFlags ${SecDummy} $0
|
||||
FunctionEnd
|
||||
|
||||
Section "$(STRING_ADD_CONTEXT_MENU)" SecContextMenu
|
||||
SetRegView 64
|
||||
Push "swf"
|
||||
Call AddToExtContextMenu
|
||||
Push "spl"
|
||||
Call AddToExtContextMenu
|
||||
Push "gfx"
|
||||
Call AddToExtContextMenu
|
||||
|
||||
SetRegView 32
|
||||
Push "swf"
|
||||
Call AddToExtContextMenu
|
||||
Push "spl"
|
||||
Call AddToExtContextMenu
|
||||
Push "gfx"
|
||||
Call AddToExtContextMenu
|
||||
|
||||
SectionEnd
|
||||
|
||||
;--------------------------------
|
||||
;Descriptions
|
||||
|
||||
;Assign language strings to sections
|
||||
!insertmacro MUI_FUNCTION_DESCRIPTION_BEGIN
|
||||
!insertmacro MUI_DESCRIPTION_TEXT ${SecDummy} "$(STRING_SECTION_APP)"
|
||||
!insertmacro MUI_DESCRIPTION_TEXT ${SecContextMenu} "$(STRING_SECTION_CONTEXT_MENU)"
|
||||
; !insertmacro MUI_DESCRIPTION_TEXT ${SecContextMenu} "$(STRING_SECTION_CONTEXT_MENU)"
|
||||
!insertmacro MUI_DESCRIPTION_TEXT ${SecShortcut} "$(STRING_SECTION_SHORTCUT)"
|
||||
!insertmacro MUI_FUNCTION_DESCRIPTION_END
|
||||
|
||||
@@ -738,24 +499,6 @@ Section "Uninstall"
|
||||
RmDir "$SMPROGRAMS\$SMDir"
|
||||
|
||||
|
||||
|
||||
SetRegView 64
|
||||
Push "swf"
|
||||
Call un.RemoveExtContextMenu
|
||||
Push "spl"
|
||||
Call un.RemoveExtContextMenu
|
||||
Push "gfx"
|
||||
Call un.RemoveExtContextMenu
|
||||
|
||||
SetRegView 32
|
||||
Push "swf"
|
||||
Call un.RemoveExtContextMenu
|
||||
Push "spl"
|
||||
Call un.RemoveExtContextMenu
|
||||
Push "gfx"
|
||||
Call un.RemoveExtContextMenu
|
||||
|
||||
|
||||
StrCmp $uninstlocal 1 0 +5
|
||||
SetShellVarContext current
|
||||
RmDir /r "$APPDATA\JPEXS\FFDec\*.*"
|
||||
|
||||
Reference in New Issue
Block a user