lyx_mirror/development/Win32/pdfview/pdfview.nsi
Eugene Chornyi daa32db3bc Fix bug 9961
remove the error message for not finding a pdf viewer (apparently empty string is returned by FindExecutable if the executable is a Windows Store app). If there is really no pdf viewer, let the Windows itself decide what to do (produce error or not and which one).
2021-01-04 10:29:44 +01:00

128 lines
3.3 KiB
Plaintext

/*
Windows PDF view helper
Author: Uwe Stöhr and Joost Verburg
This will be installed as pdfview.exe.
The application will launch the default PDF viewer to display the PDF file,
but works around the file locking problems of Adobe Reader and Acrobat.
*/
Unicode true
!include LogicLib.nsh
!include FileFunc.nsh
#--------------------------------
# Settings
Caption "PDF Viewer"
OutFile pdfview.exe
Icon "..\packaging\icons\lyx.ico"
SilentInstall silent
#--------------------------------
# Windows Vista (and later) settings
RequestExecutionLevel user
#--------------------------------
# Variables
Var Character
Var OriginalFile
Var OriginalFileName
Var PDFFile
Var ViewerFileName
Var Viewer
Var ViewerHandle
Var ViewerVersion
#--------------------------------
# PDF viewing
Section "View PDF file"
InitPluginsDir # Temporary directory for PDF file
# Command line parameters
${GetParameters} $OriginalFileName
# Trim quotes
StrCpy $Character $OriginalFileName 1
${If} $Character == '"'
StrCpy $OriginalFileName $OriginalFileName "" 1
${EndIf}
StrCpy $Character $OriginalFileName 1 -1
${If} $Character == '"'
StrCpy $OriginalFileName $OriginalFileName -1
${EndIf}
GetFullPathName $OriginalFile $OriginalFileName
SetOutPath $TEMP # The LyX tmpbuf should not be locked
StrCpy $PDFFile $PLUGINSDIR\$OriginalFileName
# Check whether the file will be opened with Adobe Reader or Adobe Acrobat
FileOpen $R0 "$PLUGINSDIR\a.pdf" "w" #create a temp pdf file with a simple name
FileClose $R0
#find stadard executable for "a.pdf", writes result in $0 (".r0" below)
System::Call "shell32::FindExecutable(t '$PLUGINSDIR\a.pdf', t '', t .r0)"
StrCpy $ViewerFileName $0
${GetFileName} $ViewerFileName $Viewer
${if} $Viewer == "AcroRd32.exe"
${orif} $Viewer == "AcroRd64.exe"
${orif} $Viewer == "Acrobat.exe"
# get the version of Acrobat - currenly not necessary
GetDLLVersion $ViewerFileName $R0 $R1
IntOp $R2 $R0 >> 16
IntOp $R2 $R2 & 0x0000FFFF ; $R2 now contains major version
#IntOp $R3 $R0 & 0x0000FFFF ; $R3 now contains minor version
#IntOp $R4 $R1 >> 16
#IntOp $R4 $R4 & 0x0000FFFF ; $R4 now contains release
#IntOp $R5 $R1 & 0x0000FFFF ; $R5 now contains build
StrCpy $ViewerVersion $R2
# check if there is a windows open containing the PDF
${if} $Viewer == "AcroRd32.exe"
${orif} $Viewer == "AcroRd64.exe"
${if} $ViewerVersion > 14
FindWindow $ViewerHandle "" "$OriginalFileName - Adobe Acrobat Reader DC"
${else}
FindWindow $ViewerHandle "" "$OriginalFileName - Adobe Reader"
${endif}
${elseif} $Viewer == "Acrobat.exe"
FindWindow $ViewerHandle "" "$OriginalFileName - Adobe Acrobat"
${if} $ViewerHandle == "0"
FindWindow $ViewerHandle "" "$OriginalFileName - Adobe Acrobat Pro"
${endif}
${endif}
${if} $ViewerHandle <> "0" # close the window
SendMessage $ViewerHandle 16 0 0
${endif}
# Copy PDF to temporary file to allow LyX to overwrite the original
CopyFiles /SILENT $OriginalFile $PDFFile
# Open a new view
ExecWait '"$ViewerFileName" "$PDFFile"'
${Else}
# Another PDF viewer like GSView is used
# No need for special actions, just forward to ShellExecute
ExecShell open $OriginalFile
${EndIf}
SectionEnd