12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355135613571358135913601361136213631364136513661367136813691370137113721373137413751376137713781379138013811382138313841385138613871388138913901391139213931394139513961397139813991400140114021403140414051406140714081409141014111412141314141415141614171418141914201421142214231424142514261427142814291430143114321433143414351436143714381439144014411442144314441445144614471448144914501451145214531454145514561457145814591460146114621463146414651466146714681469147014711472147314741475147614771478147914801481148214831484148514861487148814891490149114921493149414951496149714981499150015011502150315041505150615071508150915101511151215131514151515161517151815191520152115221523152415251526152715281529153015311532153315341535153615371538153915401541154215431544154515461547154815491550155115521553155415551556155715581559156015611562156315641565156615671568156915701571157215731574157515761577157815791580158115821583158415851586158715881589159015911592159315941595159615971598159916001601160216031604160516061607160816091610161116121613161416151616161716181619162016211622162316241625162616271628162916301631163216331634163516361637163816391640164116421643164416451646164716481649165016511652165316541655165616571658165916601661166216631664166516661667166816691670167116721673167416751676167716781679168016811682168316841685168616871688168916901691169216931694169516961697169816991700170117021703170417051706170717081709171017111712171317141715171617171718171917201721172217231724172517261727172817291730173117321733173417351736173717381739174017411742174317441745174617471748174917501751175217531754175517561757175817591760176117621763176417651766176717681769177017711772177317741775177617771778177917801781178217831784178517861787178817891790179117921793179417951796179717981799180018011802180318041805180618071808180918101811181218131814181518161817181818191820182118221823182418251826182718281829183018311832183318341835183618371838183918401841184218431844184518461847184818491850185118521853185418551856185718581859186018611862186318641865186618671868186918701871187218731874187518761877187818791880188118821883188418851886188718881889189018911892189318941895189618971898189919001901190219031904190519061907190819091910191119121913191419151916191719181919192019211922192319241925192619271928192919301931193219331934193519361937193819391940194119421943194419451946194719481949195019511952195319541955195619571958195919601961196219631964196519661967196819691970197119721973197419751976197719781979198019811982198319841985198619871988198919901991199219931994199519961997199819992000200120022003200420052006200720082009201020112012201320142015201620172018201920202021202220232024202520262027202820292030203120322033203420352036203720382039204020412042204320442045204620472048204920502051205220532054205520562057205820592060206120622063206420652066206720682069207020712072207320742075207620772078207920802081208220832084208520862087208820892090209120922093209420952096209720982099210021012102210321042105210621072108210921102111211221132114211521162117211821192120212121222123212421252126212721282129213021312132213321342135213621372138213921402141214221432144214521462147214821492150215121522153215421552156215721582159216021612162216321642165216621672168216921702171217221732174217521762177217821792180218121822183218421852186218721882189219021912192219321942195219621972198219922002201220222032204220522062207220822092210221122122213221422152216221722182219222022212222222322242225222622272228222922302231223222332234223522362237223822392240224122422243224422452246224722482249225022512252225322542255225622572258225922602261226222632264226522662267226822692270227122722273227422752276227722782279228022812282228322842285228622872288228922902291229222932294229522962297229822992300230123022303230423052306230723082309231023112312231323142315231623172318231923202321232223232324232523262327232823292330233123322333233423352336233723382339234023412342234323442345234623472348234923502351235223532354235523562357235823592360236123622363236423652366236723682369237023712372237323742375237623772378237923802381238223832384238523862387238823892390239123922393239423952396239723982399240024012402240324042405240624072408240924102411241224132414241524162417241824192420242124222423242424252426242724282429243024312432243324342435243624372438243924402441244224432444244524462447244824492450245124522453245424552456245724582459246024612462246324642465246624672468246924702471247224732474247524762477247824792480248124822483248424852486248724882489249024912492249324942495249624972498249925002501250225032504250525062507250825092510251125122513251425152516251725182519252025212522252325242525252625272528252925302531253225332534253525362537253825392540254125422543254425452546254725482549255025512552255325542555255625572558255925602561256225632564256525662567256825692570257125722573257425752576257725782579258025812582258325842585258625872588258925902591259225932594259525962597259825992600260126022603260426052606260726082609261026112612261326142615261626172618261926202621262226232624262526262627262826292630263126322633263426352636263726382639264026412642264326442645264626472648264926502651265226532654265526562657265826592660266126622663266426652666266726682669267026712672267326742675267626772678267926802681268226832684268526862687268826892690269126922693269426952696269726982699270027012702270327042705270627072708270927102711271227132714271527162717271827192720272127222723272427252726272727282729273027312732273327342735273627372738273927402741274227432744274527462747274827492750275127522753275427552756275727582759276027612762276327642765276627672768276927702771277227732774277527762777277827792780278127822783278427852786278727882789279027912792279327942795279627972798279928002801280228032804280528062807280828092810281128122813281428152816281728182819282028212822282328242825282628272828282928302831283228332834283528362837283828392840284128422843284428452846284728482849285028512852285328542855285628572858285928602861286228632864286528662867286828692870287128722873287428752876287728782879288028812882288328842885288628872888288928902891289228932894289528962897289828992900290129022903290429052906290729082909291029112912291329142915291629172918291929202921292229232924292529262927292829292930293129322933293429352936293729382939294029412942294329442945294629472948294929502951295229532954295529562957295829592960296129622963296429652966296729682969297029712972297329742975297629772978297929802981298229832984298529862987298829892990299129922993299429952996299729982999300030013002300330043005300630073008300930103011301230133014301530163017301830193020302130223023302430253026302730283029303030313032303330343035303630373038303930403041304230433044304530463047304830493050305130523053305430553056305730583059306030613062306330643065306630673068306930703071307230733074307530763077307830793080308130823083308430853086308730883089309030913092309330943095309630973098309931003101310231033104310531063107310831093110311131123113311431153116311731183119312031213122312331243125312631273128312931303131313231333134313531363137313831393140314131423143314431453146314731483149315031513152315331543155315631573158315931603161316231633164316531663167316831693170317131723173317431753176317731783179318031813182318331843185318631873188318931903191319231933194319531963197319831993200320132023203320432053206320732083209321032113212321332143215321632173218321932203221322232233224322532263227322832293230323132323233323432353236323732383239324032413242324332443245324632473248324932503251325232533254325532563257325832593260326132623263326432653266326732683269327032713272327332743275327632773278327932803281328232833284328532863287328832893290329132923293329432953296329732983299330033013302330333043305330633073308330933103311331233133314331533163317331833193320332133223323332433253326332733283329333033313332333333343335333633373338333933403341334233433344334533463347334833493350335133523353335433553356335733583359336033613362336333643365336633673368336933703371337233733374337533763377337833793380338133823383338433853386338733883389339033913392339333943395339633973398339934003401340234033404340534063407340834093410341134123413341434153416341734183419342034213422342334243425342634273428342934303431343234333434343534363437343834393440344134423443344434453446344734483449345034513452345334543455345634573458345934603461346234633464346534663467346834693470347134723473347434753476347734783479348034813482348334843485348634873488348934903491349234933494349534963497349834993500350135023503350435053506350735083509351035113512351335143515351635173518351935203521352235233524352535263527352835293530353135323533353435353536353735383539354035413542354335443545354635473548354935503551355235533554355535563557355835593560356135623563356435653566356735683569357035713572357335743575357635773578357935803581358235833584358535863587358835893590359135923593359435953596359735983599360036013602360336043605360636073608360936103611361236133614361536163617361836193620362136223623362436253626362736283629363036313632363336343635363636373638363936403641364236433644364536463647364836493650365136523653365436553656365736583659366036613662366336643665366636673668366936703671367236733674367536763677367836793680368136823683368436853686368736883689369036913692369336943695369636973698369937003701370237033704370537063707370837093710371137123713371437153716371737183719372037213722372337243725372637273728372937303731373237333734373537363737373837393740374137423743374437453746374737483749375037513752375337543755375637573758375937603761376237633764376537663767376837693770377137723773377437753776377737783779378037813782378337843785378637873788378937903791379237933794379537963797379837993800380138023803380438053806380738083809381038113812381338143815381638173818381938203821382238233824382538263827382838293830383138323833383438353836383738383839384038413842384338443845384638473848384938503851385238533854385538563857385838593860386138623863386438653866386738683869387038713872387338743875387638773878387938803881388238833884388538863887388838893890389138923893389438953896389738983899390039013902390339043905390639073908390939103911391239133914391539163917391839193920392139223923392439253926392739283929393039313932393339343935393639373938393939403941394239433944394539463947394839493950395139523953395439553956395739583959396039613962396339643965396639673968396939703971397239733974397539763977397839793980398139823983398439853986398739883989399039913992399339943995399639973998399940004001400240034004400540064007400840094010401140124013401440154016401740184019402040214022402340244025402640274028402940304031403240334034403540364037403840394040404140424043404440454046404740484049405040514052405340544055405640574058405940604061406240634064406540664067406840694070407140724073407440754076407740784079408040814082408340844085408640874088408940904091409240934094409540964097409840994100410141024103410441054106410741084109411041114112411341144115411641174118411941204121412241234124412541264127412841294130413141324133413441354136413741384139414041414142414341444145414641474148414941504151415241534154415541564157415841594160416141624163416441654166416741684169417041714172417341744175417641774178417941804181418241834184418541864187418841894190419141924193419441954196419741984199420042014202420342044205420642074208420942104211421242134214421542164217421842194220422142224223422442254226422742284229423042314232423342344235423642374238423942404241424242434244424542464247424842494250425142524253425442554256425742584259426042614262426342644265426642674268426942704271427242734274427542764277427842794280428142824283428442854286428742884289429042914292429342944295429642974298429943004301430243034304430543064307430843094310431143124313431443154316431743184319432043214322432343244325432643274328432943304331433243334334433543364337433843394340434143424343434443454346434743484349435043514352435343544355435643574358435943604361436243634364436543664367436843694370437143724373437443754376437743784379438043814382438343844385438643874388438943904391439243934394439543964397439843994400440144024403440444054406440744084409441044114412441344144415441644174418441944204421442244234424442544264427442844294430443144324433443444354436443744384439444044414442444344444445444644474448444944504451445244534454445544564457445844594460446144624463446444654466446744684469447044714472447344744475447644774478447944804481448244834484448544864487448844894490449144924493449444954496449744984499450045014502450345044505450645074508450945104511451245134514451545164517451845194520452145224523452445254526452745284529453045314532453345344535453645374538453945404541454245434544454545464547454845494550455145524553455445554556455745584559456045614562456345644565456645674568456945704571457245734574457545764577457845794580458145824583458445854586458745884589459045914592459345944595459645974598459946004601460246034604460546064607460846094610461146124613461446154616461746184619462046214622462346244625462646274628 |
- /*-----------------------------------------------------------------------------------------------------
- NSIS Installer script for OpenCPN (Windows)
- NSIS version 2.46
- Written by Gunther Pilz (Netsurfer) netsurfer@opencpn.de
- -------------------------------------------------------------------------------------------------------
- CMake variables
- CPACK_PACKAGE_NAME "OpenCPN"
- CPACK_NSIS_PACKAGE_NAME_LC "opencpn"
- CPACK_PACKAGE_VENDOR "opencpn.org"
- CPACK_PACKAGE_VERSION_MAJOR ${VERSION_MAJOR}
- CPACK_PACKAGE_VERSION_MINOR ${VERSION_MINOR}
- CPACK_PACKAGE_VERSION_PATCH ${VERSION_PATCH}
- CPACK_PACKAGE_VERSION ${PACKAGE_VERSION}
- CPACK_NSIS_INSTALLED_ICON_NAME "opencpn.exe"
- CPACK_PACKAGE_ICON "${CMAKE_SOURCE_DIR}/resources/bitmaps\\\\opencpn.ico"
- CPACK_NSIS_EXTRA_INSTALL_COMMANDS ${CPACK_NSIS_EXTRA_INSTALL_COMMANDS}
- CPACK_RESOURCE_FILE_LICENSE "${CMAKE_CURRENT_SOURCE_DIR}/data/license.txt"
- CPACK_BUILDWIN_DIR "${CMAKE_SOURCE_DIR}/buildwin"
- CPACK_NSIS_DIR "${CMAKE_SOURCE_DIR}/buildwin/NSIS_Unicode")
- #CPACK_INSTALL_CMAKE_PROJECTS "${CMAKE_CURRENT_BINARY_DIR};${PACKAGE_NAME};ALL;/"
- #CPACK_PACKAGE_EXECUTABLES ${PACKAGE_NAME} "OpenCPN"
- #CPACK_PACKAGE_INSTALL_DIRECTORY ${PACKAGE_NAME} "OpenCPN"
- #CPACK_PACKAGE_DESCRIPTION_SUMMARY "OpenCPN ${PACKAGE_VERSION}"
- #CPACK_NSIS_LINK_NAME "${CPACK_PACKAGE_NAME} ${PACKAGE_VERSION}"
- #CPACK_NSIS_DISPLAY_NAME "${CPACK_PACKAGE_NAME} Version ${PACKAGE_VERSION}"
- #CPACK_NSIS_HELP_LINK "http:\\\\\\\\www.opencpn.org"
- #CPACK_NSIS_URL_INFO_ABOUT "http:\\\\\\\\www.opencpn.org"
- #CPACK_NSIS_CONTACT "http:\\\\\\\\www.opencpn.org"
- #CPACK_PACKAGE_FILE_NAME "${PACKAGE_NAME}_${VERSION_MAJOR}.${VERSION_MINOR}.${VERSION_PATCH}_setup"
- ----------------------------------------------------------------------------------------------------------*/
- ; Enabled on MINGW builds:
- ;!define NSIS_PACKEDVERSION true
-
- ;# Set compression
- SetCompressor /FINAL lzma
- !ifdef NSIS_PACKEDVERSION
- Unicode true
- !endif
- ;--------------------------------
- ;# You must define these values
- !define OCPN_INSTALLER_VERSION "1.0.0"
- /*
- !define CPACK_NSIS_INSTALLED_ICON_NAME "opencpn.exe"
- !define CPACK_NSIS_PACKAGE_NAME_LC "opencpn"
- !define CPACK_NSIS_DISPLAY_NAME "${CPACK_PACKAGE_NAME} ${PACKAGE_VERSION}"
- !define CPACK_PACKAGE_ICON "${CMAKE_SOURCE_DIR}/resources/bitmaps/opencpn.ico"
- !define CPACK_BUILDWIN_DIR "${CMAKE_SOURCE_DIR}/buildwin"
- !define CPACK_NSIS_DIR "${CMAKE_SOURCE_DIR}/buildwin/NSIS_Unicode"
- */
- !define /date YEAR "%Y"
- !define OUTPUT_FILE_NAME "@CPACK_NSIS_PACKAGE_NAME_LC@_@CPACK_PACKAGE_VERSION@_setup.exe"
- !define INST_DIR "@CPACK_TEMPORARY_DIRECTORY@"
- !define REG_ROOT_KEY "Software"
- !define REG_KEY "Software\OpenCPN"
- !define REG_ROOT_KEY_UN "Software\Microsoft\Windows\CurrentVersion\Uninstall"
- !define REG_KEY_UN "Software\Microsoft\Windows\CurrentVersion\Uninstall\OpenCPN @CPACK_PACKAGE_VERSION@"
- !define CSIDL_LOCAL_APPDATA "0x1C"
- !define Explode "!insertmacro Explode"
- !define unExplode "!insertmacro unExplode"
- ;--------------------------------
- ;# Variables
- Var INST_USER_SID
- Var CONFIG_EXISTS
- Var CONFIG_EMPTY
- Var INI_EXISTS
- Var CHARTDB_EXISTS
- Var SENC_EXISTS
- Var CM93_EXISTS
- Var NAVOBJ_EXISTS
- Var LOG_EXISTS
- Var REG_LANG
- Var Count_SecGrpResetConfig
- Var SecGrpEndSetConfig_Text
- Var RESET_CONFIG
- Var STARTMENU_FOLDER
- Var OLD_INSTALLS
- Var Prev_Install_RegKey
- Var MULTIPLE_INSTALLS
- Var VERSION_EXISTS
- Var VERSION_NEWER
- Var VERSION_OLDER
- Var CANCEL_INSTALLER
- Var VERSION_DATE
- Var LANG_NAME
- Var Status_SecGrpSetConfig
- Var MAJOR_D
- Var MINOR_D
- Var PATCH_D
- Var PATCH_ND
- Var LM_VERSION
- Var LM_VERSION_INST
- Var LM_VERSION_UNINST
- Var latest_version
- Var latest_pathexe
- Var BU_X
- Var BU_Y
- Var UAT
- Var OUAT
- Var USERS_APPDATA
- Var ADMIN_APPDATA
- Var USERS_NAME
- Var counter_tmp
- Var CurrentDirVar
- Var CurrentFileVar
- Var CONTEXT
- Var REG_CHARTDIRS
- Var USERNAME
- Var IS_ADMIN
- Var Compare_Version_Result
- Var Inst_Or_Uninst
- Var Marquee_Handle
- Var Banner_Text_Blink
- Var error_tmp
- # onSelChange
- Var ConfigSetLang
- Var ConfigSetChartDir
- Var SetConfig
- # Installer Pages
- Var Skip_Page_CleanUp
- Var Skip_Page_TypeInst
- Var Skip_Page_SetConfig
- Var Skip_Page_Directory
- Var Skip_Page_Startmenu
- Var Skip_Page_Confirm
- # Page_TypeInst
- Var Label_TypeInst_Reinstall
- Var RB_Reinstall
- Var Label_TypeInst_Upgrade
- Var RB_Upgrade
- Var Label_TypeInst_Downgrade
- Var RB_Downgrade
- Var Label_TypeInst_Parallel
- Var GroupBox_TypeInst
- Var RB_Parallel
- Var TI_REINSTALL
- Var TI_UPGRADE
- Var TI_DOWNGRADE
- Var TI_PARALLEL
- Var GroupBox_Size
- Var INSTALL_TYPE
- # Page_SetConfig
- Var Label_SetConfig
- Var GroupBox_Language_SetConfig
- Var CheckBox_Language_SetConfig
- Var GroupBox_ChartDir_SetConfig
- Var DirRequest_SetConfig
- Var Button_Delete_SetConfig
- Var Button_DeleteAll_SetConfig
- Var Button_Add_SetConfig
- Var ListBox_SetConfig
- ;# Page_SetConfig_Leave
- Var CHART_DIR_TMP_FILE
- Var CHART_DIR_EMPTY
- Var CONFIG_SET_LANG
- # Uninstaller Pages
- Var Skip_UnPage_Components
- ;--------------------------------
- ;# Execution Level
- RequestExecutionLevel highest
- ;--------------------------------
- ;# Includes
- !addincludedir "@CPACK_NSIS_DIR@/Include"
- !addplugindir "@CPACK_NSIS_DIR@/Plugins"
- !include MUI2.nsh
- !include LogicLib.nsh
- !include nsDialogs.nsh
- !include Sections.nsh
- !include StrFunc.nsh
- !include WordFunc.nsh
- !include TextFunc.nsh
- !include FileFunc.nsh
- !include WinVer.nsh
- !include UAC.nsh
- !define MUI_UI "@CPACK_NSIS_DIR@/UI/opencpn_ui.exe"
- ;--------------------------------
- ;# General
- ;# Name and file
- Name "@CPACK_NSIS_PACKAGE_NAME@"
- OutFile "@CPACK_TOPLEVEL_DIRECTORY@/${OUTPUT_FILE_NAME}"
- ;# Default installation folder
- InstallDir "$PROGRAMFILES\OpenCPN"
- BrandingText /TRIMLEFT "OpenCPN $(Installer) v${OCPN_INSTALLER_VERSION}"
- ;--------------------------------
- ;# Interface Settings
- !define MUI_CUSTOMFUNCTION_GUIINIT myGuiInit
- !define MUI_CUSTOMFUNCTION_UNGUIINIT un.myGuiInit
- !define MUI_ABORTWARNING
- ;# MUI Settings / Header
- !define MUI_ICON "@CPACK_PACKAGE_ICON@"
- !define MUI_HEADERIMAGE
- !define MUI_HEADERIMAGE_LEFT
- !define MUI_HEADERIMAGE_BITMAP "@CPACK_NSIS_DIR@\Bitmaps\header-install.bmp"
- !define MUI_HEADERIMAGE_UNBITMAP "@CPACK_NSIS_DIR@\Bitmaps\header-uninstall.bmp"
- ;# MUI Settings / Wizard
- !define MUI_WELCOMEFINISHPAGE_BITMAP "@CPACK_NSIS_DIR@\Bitmaps\wizard-install.bmp"
- !define MUI_UNWELCOMEFINISHPAGE_BITMAP "@CPACK_NSIS_DIR@\Bitmaps\wizard-uninstall.bmp"
- ;# Set Multi-Language settings
- ;# Language Selection Dialog Settings
- ;# Show all languages, despite user's codepage
- !define MUI_LANGDLL_ALLLANGUAGES
- /*
- ;# Remember the installer language
- !define MUI_LANGDLL_REGISTRY_ROOT "HKLM"
- !define MUI_LANGDLL_REGISTRY_KEY "${REG_KEY_UN}"
- !define MUI_LANGDLL_REGISTRY_VALUENAME "SetupLanguage"
- !define MUI_LANGDLL_WINDOWTITLE "$(LangDialog_Title)"
- !define MUI_LANGDLL_INFO "$(LangDialog_Text)"
- */
- ;--------------------------------
- ;# Calls for making respective functions available
- ${StrLoc}
- ;--------------------------------
- ;##################################################################################################
- ;# Macros #
- ;##################################################################################################
- !ifndef ___EnumHKU___
- !define ___EnumHKU___
- !include LogicLib.nsh
- !include WordFunc.nsh
- !define TOKEN_QUERY 0x0008
- !define TOKEN_ADJUST_PRIVILEGES 0x0020
- !define SE_RESTORE_NAME SeRestorePrivilege
- !define SE_PRIVILEGE_ENABLED 0x00000002
- !define HKEY_USERS 0x80000003
- Var key
- Var logged
- Var EnumHKU_counter
- Var SID
- Var USERPROFILE
- !macro _EnumHKU_AdjustTokens
- StrCpy $R1 0
- System::Call "kernel32::GetCurrentProcess() i .R0"
- System::Call "advapi32::OpenProcessToken(i R0, i ${TOKEN_QUERY}|${TOKEN_ADJUST_PRIVILEGES}, *i R1R1) i .R0"
- ${If} $R0 != 0
- System::Call "advapi32::LookupPrivilegeValue(t n, t '${SE_RESTORE_NAME}', *l .R2) i .R0"
- ${If} $R0 != 0
- System::Call "*(i 1, l R2, i ${SE_PRIVILEGE_ENABLED}) i .R0"
- System::Call "advapi32::AdjustTokenPrivileges(i R1, i 0, i R0, i 0, i 0, i 0)"
- System::Free $R0
- ${EndIf}
- System::Call "kernel32::CloseHandle(i R1)"
- ${EndIf}
- !macroend
- !macro _EnumHKU_InvokeCallback CALLBACK SUBKEY
- Push $0
- Push $1
- Push $R0
- Push $R1
- Push $R2
- Push $R3
- Push $R4
- Push $R5
- Push $R6
- Push "${SUBKEY}"
- Call "${CALLBACK}"
- Pop $R6
- Pop $R5
- Pop $R4
- Pop $R3
- Pop $R2
- Pop $R1
- Pop $R0
- Pop $1
- Pop $0
- !macroend
- !macro _EnumHKU_Load FILE CALLBACK SUBKEY
- GetFullPathName /SHORT $R2 ${FILE}
- System::Call "advapi32::RegLoadKeyW(i ${HKEY_USERS}, t '${SUBKEY}', t R2) i .R3"
- ${If} $R3 == 0
- !insertmacro _EnumHKU_InvokeCallback ${CALLBACK} "${SUBKEY}"
- ;System::Call "advapi32::RegUnLoadKeyW(i ${HKEY_USERS}, t '${SUBKEY}')"
- IntOp $EnumHKU_counter $EnumHKU_counter + 1
- ${EndIf}
- !macroend
- !macro EnumHKU UN CALLBACK SUBKEY
- Push $0
- Push $1
- StrCpy $EnumHKU_counter 0
- GetFunctionAddress $0 "${CALLBACK}"
- StrCpy $1 "${SUBKEY}_$EnumHKU_counter"
- StrCpy $key ${SUBKEY}
- Call ${UN}_EnumHKU
- Pop $1
- Pop $0
- !macroend
- !define EnumHKU '!insertmacro EnumHKU ""'
- !define un.EnumHKU '!insertmacro EnumHKU "un."'
- !macro _EnumHKU UN
- Function ${UN}_EnumHKU
- Push $R0
- Push $R1
- Push $R2
- Push $R3
- Push $R4
- Push $R5
- Push $R6
- # enumerate logged on users
- StrCpy $R0 0
- ${Do}
- EnumRegKey $R1 HKU "" $R0
- ${If} $R1 != ""
- StrLen $R4 $R1
- ${If} $R4 > 8
- StrCpy $R6 0
- ${WordFind} "$R1" "_Classes" "E*" $R6
- IfErrors 0 cont
- ReadRegStr $R5 HKU "$R1\Volatile Environment" USERPROFILE
- ExpandEnvStrings $R5 $R5
- StrCpy $USERPROFILE $R5
- StrCpy $logged "on"
- !insertmacro _EnumHKU_InvokeCallback $0 $R1
- StrCpy $USERPROFILE ""
- StrCpy $logged ""
- ${EndIf}
- cont:
- IntOp $R0 $R0 + 1
- ${EndIf}
- ${LoopUntil} $R1 == ""
- # enumerate logged off users
- System::Call "kernel32::GetVersion() i .R0"
- IntOp $R0 $R0 & 0x80000000
- ${If} $R0 == 0
- # nt
- !insertmacro _EnumHKU_AdjustTokens
- StrCpy $R0 0
- ${Do}
- EnumRegKey $R1 HKLM "SOFTWARE\Microsoft\Windows NT\CurrentVersion\ProfileList" $R0
- ${If} $R1 != ""
- StrLen $R4 $R1
- ${If} $R4 > 8
- ClearErrors
- ReadRegStr $R5 HKU "$R1\Volatile Environment" HOMEPATH
- IfErrors 0 cont1
- ReadRegStr $R5 HKLM "SOFTWARE\Microsoft\Windows NT\CurrentVersion\ProfileList\$R1" ProfileImagePath
- ExpandEnvStrings $R5 $R5
- StrCpy $USERPROFILE $R5
- StrCpy $logged "off"
- !insertmacro _EnumHKU_Load "$R5\NTUSER.DAT" $0 $1
- StrCpy $1 "$key_$EnumHKU_counter"
- StrCpy $USERPROFILE ""
- StrCpy $logged ""
- ${EndIf}
- cont1:
- IntOp $R0 $R0 + 1
- ${EndIf}
- ${LoopUntil} $R1 == ""
- ${Else}
- # 9x
- ClearErrors
- FindFirst $R1 $R2 "$WINDIR\Profiles\*.*"
- ${Unless} ${Errors}
- ${Do}
- ${If} $R2 != "."
- ${AndIf} $R2 != ".."
- ${If} ${FileExists} "$WINDIR\Profiles\$R2\USER.DAT"
- !insertmacro _EnumHKU_Load "$WINDIR\Profiles\$R2\USER.DAT" $0 $1
- ${EndIf}
- ${EndIf}
- ClearErrors
- FindNext $R1 $R2
- ${LoopUntil} ${Errors}
- FindClose $R1
- ${EndUnless}
- ${Endif}
- Pop $R6
- Pop $R5
- Pop $R4
- Pop $R3
- Pop $R2
- Pop $R1
- Pop $R0
- FunctionEnd
- !macroend
- !insertmacro _EnumHKU ""
- !insertmacro _EnumHKU "un."
- !endif
- !macro IndexOf Var Str Char
- Push "${Char}"
- Push "${Str}"
- Call IndexOf
- Pop "${Var}"
- !macroend
- !define IndexOf "!insertmacro IndexOf"
- !macro RIndexOf Var Str Char
- Push "${Char}"
- Push "${Str}"
- Call RIndexOf
- Pop "${Var}"
- !macroend
- !define RIndexOf "!insertmacro RIndexOf"
- !macro Explode Length Separator String
- Push `${Separator}`
- Push `${String}`
- Call Explode
- Pop `${Length}`
- !macroend
- !macro unExplode Length Separator String
- Push `${Separator}`
- Push `${String}`
- Call un.Explode
- Pop `${Length}`
- !macroend
- !ifndef _RecFind_Included
- !define _RecFind_Included
- Var _RecFindVar1
- Var _RecFindVar2
- !macro _RecFindOpen Dir CurrentDirVar CurrentFileVar
- !define _Local `${__LINE__}`
- !define _Dir `${Dir}`
- !define _CurrentDirVar `${CurrentDirVar}`
- !define _CurrentFileVar `${CurrentFileVar}`
- !define _RecFindOpenSet
- StrCpy $_RecFindVar2 1
- Push ``
- `nextDir${_Local}:`
- Pop `${_CurrentDirVar}`
- IntOp $_RecFindVar2 $_RecFindVar2 - 1
- !macroend
- !define RecFindOpen `!insertmacro _RecFindOpen`
- !macro _RecFindFirst
- !ifndef _RecFindOpenSet
- !error `Incorrect use of RecFind commands!`
- !else
- !define _RecFindFirstSet
- !endif
- ClearErrors
- FindFirst $_RecFindVar1 `${_CurrentFileVar}` `${_Dir}${_CurrentDirVar}\*.*`
- IfErrors `Done${_Local}`
- `checkFile${_Local}:`
- StrCmp ${_CurrentFileVar} . `nextFile${_Local}`
- StrCmp ${_CurrentFileVar} .. `nextFile${_Local}`
- IfFileExists `${_Dir}${_CurrentDirVar}\${_CurrentFileVar}\*.*` 0 +4
- Push `${_CurrentDirVar}\${_CurrentFileVar}`
- IntOp $_RecFindVar2 $_RecFindVar2 + 1
- Goto `nextFile${_Local}`
- !macroend
- !define RecFindFirst `!insertmacro _RecFindFirst`
- !macro _RecFindNext
- !ifndef _RecFindOpenSet | _RecFindFirstSet
- !error `Incorrect use of RecFind commands!`
- !else
- !define _RecFindNextSet
- !endif
- `nextFile${_Local}:`
- ClearErrors
- FindNext $_RecFindVar1 `${_CurrentFileVar}`
- IfErrors 0 `checkFile${_Local}`
- StrCmp $_RecFindVar2 0 +3
- FindClose $_RecFindVar1
- Goto `nextDir${_Local}`
- !macroend
- !define RecFindNext `!insertmacro _RecFindNext`
- !macro _RecFindClose
- !ifndef _RecFindOpenSet | _RecFindFirstSet | _RecFindNextSet
- !error `Incorrect use of RecFind commands!`
- !else
- !undef _RecFindOpenSet
- !undef _RecFindFirstSet
- !undef _RecFindNextSet
- !endif
- `Done${_Local}:`
- FindClose $_RecFindVar1
- StrCmp $_RecFindVar2 0 +4
- Pop $_RecFindVar1
- IntOp $_RecFindVar2 $_RecFindVar2 - 1
- Goto -3
- !undef _CurrentFileVar
- !undef _CurrentDirVar
- !undef _Dir
- !undef _Local
- !macroend
- !define RecFindClose `!insertmacro _RecFindClose`
- !endif
- ;--------------------------------------------------------------------------------------------------
- ;##################################################################################################
- ;# PAGES #
- ;##################################################################################################
- ;# Installer Pages #
- ;##################################################################################################
- /* Var Skip_Page_CleanUp
- Var Skip_Page_TypeInst
- Var Skip_Page_SetConfig
- Var Skip_Page_Directory
- Var Skip_Page_Startmenu
- Var Skip_Page_Confirm
- */
- ;# Welcome page
- !define MUI_WELCOMEPAGE_TITLE_3LINES
- !insertmacro MUI_PAGE_WELCOME
- ;# License page
- !define MUI_PAGE_CUSTOMFUNCTION_LEAVE Page_License_Leave
- ;!insertmacro MUI_PAGE_LICENSE "@CPACK_RESOURCE_FILE_LICENSE@"
- !define MUI_LICENSEPAGE_BUTTON "$(^NextBtn)"
- !define MUI_LICENSEPAGE_TEXT_BOTTOM $(License_Message)
- !insertmacro MUI_PAGE_LICENSE $(license)
- ;# Clean up page - only shown if previous installation(s) <= 2.2.823 were found - checked in .onInit function
- Page custom Page_CleanUp Page_CleanUp_Leave
- ;# Install type page - only shown if previous installation(s) > 2.2.823 were found - checked in .onInit function
- Page custom Page_TypeInst Page_TypeInst_Leave
- ;# Components page
- !define MUI_COMPONENTSPAGE_SMALLDESC
- !define MUI_PAGE_HEADER_TEXT $(CP_HEADER_TEXT)
- !define MUI_PAGE_HEADER_SUBTEXT $(CP_HEADER_SUBTEXT)
- !define MUI_COMPONENTSPAGE_TEXT_TOP $(CP_TOP)
- !define MUI_COMPONENTSPAGE_TEXT_COMPLIST $(CP_COMPLIST)
- !define MUI_COMPONENTSPAGE_TEXT_INSTTYPE "" ;#CHANGE $(CP_INSTTYPE)
- ;!define MUI_COMPONENTSPAGE_TEXT_DESCRIPTION_TITLE $(CP_DESCRIPTION_TITLE) ;# for this we can use the default text
- ;!define MUI_COMPONENTSPAGE_TEXT_DESCRIPTION_INFO $(CP_DESCRIPTION_INFO) ;# for this we can use the default text
- !define MUI_PAGE_CUSTOMFUNCTION_PRE Page_Components_Pre
- !define MUI_PAGE_CUSTOMFUNCTION_SHOW Page_Components_Show
- !define MUI_PAGE_CUSTOMFUNCTION_LEAVE Page_Components_Leave
- !insertmacro MUI_PAGE_COMPONENTS
- ;# Directory page - allows for changing/ selecting the install directory
- !define MUI_DIRECTORYPAGE_VERIFYONLEAVE
- !define MUI_PAGE_CUSTOMFUNCTION_PRE Page_Directory_Pre
- !define MUI_PAGE_CUSTOMFUNCTION_LEAVE Page_Directory_Leave
- !insertmacro MUI_PAGE_DIRECTORY
- ;# Start Menu Folder page - allows for changing/ selecting the Start Menu Folder (if Shortcuts get installed is configured on the Components page)
- !define MUI_STARTMENUPAGE_NODISABLE
- !define MUI_STARTMENUPAGE_REGISTRY_ROOT "SHCTX"
- !define MUI_STARTMENUPAGE_REGISTRY_KEY "${REG_KEY_UN}"
- !define MUI_STARTMENUPAGE_REGISTRY_VALUENAME "StartMenuFolder"
- !define MUI_STARTMENUPAGE_DEFAULTFOLDER "OpenCPN"
- !define MUI_PAGE_CUSTOMFUNCTION_PRE Page_Startmenu_Pre
- !insertmacro MUI_PAGE_STARTMENU "Application" $STARTMENU_FOLDER
- ;# Set Config page - selecting chart director[y|ies] and setting the language in opencpn.ini - only available if opencpn.ini does not exist (or is being deleted)
- Page custom Page_SetConfig Page_SetConfig_Leave
- ;# Confirm page - shows all settings for the installation (is mainly needed to always have the 'Install' button on the right page, ie. if Start Menu page is skipped)
- Page custom Page_Confirm
- ;# Install page
- !define MUI_PAGE_CUSTOMFUNCTION_SHOW Page_Instfiles_Show
- !insertmacro MUI_PAGE_INSTFILES
- ;# Finish page
- #!define MUI_FINISHPAGE_RUN opencpn.exe
- !define MUI_FINISHPAGE_RUN
- !define MUI_FINISHPAGE_RUN_FUNCTION ExecAppFile
- !define MUI_FINISHPAGE_SHOWREADME install.log
- !define MUI_FINISHPAGE_SHOWREADME_TEXT $(Show_Readme_Text)
- !define MUI_FINISHPAGE_SHOWREADME_NOTCHECKED
- !define MUI_FINISHPAGE_LINK $(Finish_Link_Text)
- !define MUI_FINISHPAGE_LINK_LOCATION $(Finish_Link_URL)
- !define MUI_FINISHPAGE_LINK_COLOR 000080
- !define MUI_FINISHPAGE_NOREBOOTSUPPORT
- !define MUI_FINISHPAGE_TITLE_3LINES
- !insertmacro MUI_PAGE_FINISH
- ;--------------------------------
- ;##################################################################################################
- ;# Uninstaller Pages #
- ;##################################################################################################
- ;# Welcome page
- !define MUI_WELCOMEPAGE_TITLE_3LINES
- !insertmacro MUI_UNPAGE_WELCOME
- ;# Components page
- !define MUI_PAGE_CUSTOMFUNCTION_PRE un.Page_Components_Pre
- !insertmacro MUI_UNPAGE_COMPONENTS
- ;# Confirm page
- !insertmacro MUI_UNPAGE_CONFIRM
- ;# Uninstall page
- !insertmacro MUI_UNPAGE_INSTFILES
- ;# Finish page
- !define MUI_FINISHPAGE_TITLE_3LINES
- !insertmacro MUI_UNPAGE_FINISH
- ;--------------------------------------------------------------------------------------------------
- ;##################################################################################################
- ;# Languages #
- ;##################################################################################################
- ;# Languages
- !insertmacro MUI_LANGUAGE "English" ;# first language is the default language
- !insertmacro MUI_LANGUAGE "German"
- !include /NONFATAL "Langstrings_GERMAN.nsh"
- !insertmacro MUI_LANGUAGE "French"
- !include /NONFATAL "Langstrings_FRENCH.nsh"
- !insertmacro MUI_LANGUAGE "Czech"
- !include /NONFATAL "Langstrings_CZECH.nsh"
- !insertmacro MUI_LANGUAGE "Danish"
- !include /NONFATAL "Langstrings_DANISH.nsh"
- !insertmacro MUI_LANGUAGE "Spanish"
- !include /NONFATAL "Langstrings_SPANISH.nsh"
- !insertmacro MUI_LANGUAGE "Italian"
- !include /NONFATAL "Langstrings_ITALIAN.nsh"
- !insertmacro MUI_LANGUAGE "Dutch"
- !include /NONFATAL "Langstrings_DUTCH.nsh"
- !insertmacro MUI_LANGUAGE "Polish"
- !include /NONFATAL "Langstrings_POLISH.nsh"
- !insertmacro MUI_LANGUAGE "PortugueseBR"
- !include /NONFATAL "Langstrings_PORTUGUESEBR.nsh"
- !insertmacro MUI_LANGUAGE "Portuguese"
- !include /NONFATAL "Langstrings_PORTUGUESE.nsh"
- !insertmacro MUI_LANGUAGE "Russian"
- !include /NONFATAL "Langstrings_RUSSIAN.nsh"
- !insertmacro MUI_LANGUAGE "Swedish"
- !include /NONFATAL "Langstrings_SWEDISH.nsh"
- !insertmacro MUI_LANGUAGE "Finnish"
- !include /NONFATAL "Langstrings_FINNISH.nsh"
- !insertmacro MUI_LANGUAGE "Norwegian"
- !include /NONFATAL "Langstrings_NORWEGIAN.nsh"
- !insertmacro MUI_LANGUAGE "TradChinese"
- !include /NONFATAL "Langstrings_CHINESETW.nsh"
- !insertmacro MUI_LANGUAGE "Turkish"
- !include /NONFATAL "Langstrings_TURKISH.nsh"
- ;!insertmacro MUI_LANGUAGE "Hungarian"
- ;!include /NONFATAL "Langstrings_HUNGARIAN.nsh"
- ;--------------------------------
- ;# Reserve Files
- ;# If you are using solid compression, files that are required before
- ;# the actual installation should be stored first in the data block,
- ;# because this will make your installer start faster.
- !insertmacro MUI_RESERVEFILE_LANGDLL
- ;# Remember the installer language
- !define MUI_LANGDLL_REGISTRY_ROOT "HKLM"
- !define MUI_LANGDLL_REGISTRY_KEY "${REG_KEY_UN}"
- !define MUI_LANGDLL_REGISTRY_VALUENAME "SetupLanguage"
- !define MUI_LANGDLL_WINDOWTITLE $(LangDialog_Title)
- !define MUI_LANGDLL_INFO $(LangDialog_Text)
- ;--------------------------------------------------------------------------------------------------
- ;##################################################################################################
- ;# S E C T I O N S #
- ;##################################################################################################
- ;# Installer Sections #
- ;##################################################################################################
- Section "-Topmost Section" SecTopmost ;# this needs to be always the first section to be executed!
- SetShellVarContext all
- SetOutPath $INSTDIR
- ;!ifndef NSIS_PACKEDVERSION
- ; LogSet on
- ;!endif
- ${If} $INSTALL_TYPE == 1
- ${OrIf} $INSTALL_TYPE == 2
- ${OrIf} $INSTALL_TYPE == 3
- ReadRegStr $0 HKLM "$Prev_Install_RegKey" "UninstallString"
- ${StrFilter} "$0" "" "" "$\"" $0
- ClearErrors
- ExecWait '"$0" /S /type=1 _?=$INSTDIR'
- IfErrors 0 +2
- DetailPrint "Error on uninstalling"
- Sleep 100
- Delete $0
- ${EndIf}
- SectionEnd
- ;# Reset/ Delete Config Section
- SectionGroup "!Reset Config Section Group" SecGrpResetConfig
- Section /o "Delete Config File Section" SecDeleteConfigFile
- ;# Delete config file (opencpn.ini)
- SetShellVarContext all
- ${If} ${FileExists} "$APPDATA\@CPACK_NSIS_PACKAGE_NAME_LC@\opencpn.ini"
- Delete "$APPDATA\@CPACK_NSIS_PACKAGE_NAME_LC@\opencpn.ini"
- ClearErrors
- ${EndIf}
- SectionEnd
- Section /o "Delete ChartDB Section" SecDeleteChartDB
- ;# Delete chart DB (CHRTLIST.DAT)
- SetShellVarContext all
- ${If} ${FileExists} "$APPDATA\@CPACK_NSIS_PACKAGE_NAME_LC@\CHRTLIST.DAT"
- Delete "$APPDATA\@CPACK_NSIS_PACKAGE_NAME_LC@\CHRTLIST.DAT"
- ClearErrors
- ${EndIf}
- SectionEnd
- Section /o "Delete SENC Section" SecDeleteSENC
- ;# Delete SENC directory
- SetShellVarContext all
- ${If} ${FileExists} "$APPDATA\@CPACK_NSIS_PACKAGE_NAME_LC@\SENC\*.*"
- RMDir /r "$APPDATA\@CPACK_NSIS_PACKAGE_NAME_LC@\SENC"
- ClearErrors
- ${EndIf}
- SectionEnd
- Section /o "Delete SENC Section" SecDeleteCM93
- ;# Delete SENC directory
- SetShellVarContext all
- ${If} ${FileExists} "$APPDATA\@CPACK_NSIS_PACKAGE_NAME_LC@\cm93\*.*"
- RMDir /r "$APPDATA\@CPACK_NSIS_PACKAGE_NAME_LC@\cm93"
- ClearErrors
- ${EndIf}
- SectionEnd
- Section /o "Delete Navobject Section" SecDeleteNavobjFile
- ;# Delete navobject file (navobj.xml)
- SetShellVarContext all
- ${If} ${FileExists} "$APPDATA\@CPACK_NSIS_PACKAGE_NAME_LC@\navobj.xml"
- Delete "$APPDATA\@CPACK_NSIS_PACKAGE_NAME_LC@\navobj.xml"
- ClearErrors
- ${EndIf}
- SectionEnd
- Section /o "Delete Log File Section" SecDeleteLogFile
- ;# Delete log file (opencpn.log)
- SetShellVarContext all
- ${If} ${FileExists} "$APPDATA\@CPACK_NSIS_PACKAGE_NAME_LC@\opencpn.log"
- Delete "$APPDATA\@CPACK_NSIS_PACKAGE_NAME_LC@\opencpn.log"
- ClearErrors
- ${EndIf}
- SectionEnd
- SectionGroupEnd
- ;# Shortcut Section
- SectionGroup /e "!Shortcuts Section Group" SecGrpShortcuts
- Section "Startmenu Shortcut Section" SecShortcutStartmenu
- ;# Start Menu
- SetShellVarContext all
- SetOutPath $INSTDIR
- !insertmacro MUI_STARTMENU_WRITE_BEGIN Application
- ;# Create shortcuts
- CreateDirectory "$SMPROGRAMS\$STARTMENU_FOLDER"
- CreateShortCut "$SMPROGRAMS\$STARTMENU_FOLDER\OpenCPN @CPACK_PACKAGE_VERSION@.lnk" "$INSTDIR\opencpn.exe"
- CreateShortCut "$SMPROGRAMS\$STARTMENU_FOLDER\OpenCPN @CPACK_PACKAGE_VERSION@ - No OpenGL.lnk" "$INSTDIR\opencpn.exe" "/no_opengl"
- CreateDirectory "$SMPROGRAMS\$STARTMENU_FOLDER\$(Uninstall_Folder_Name)"
- CreateShortCut "$SMPROGRAMS\$STARTMENU_FOLDER\$(Uninstall_Folder_Name)\$(Uninstall_Link).lnk" "$INSTDIR\Uninstall @CPACK_PACKAGE_VERSION@.exe"
- !insertmacro MUI_STARTMENU_WRITE_END
- SectionEnd
- Section "Desktop Shortcut Section" SecShortcutDesktop
- SetShellVarContext all
- CreateShortCut "$DESKTOP\OpenCPN @CPACK_PACKAGE_VERSION@.lnk" "$INSTDIR\opencpn.exe"
- SectionEnd
- SectionGroupEnd
- ;# Write Config Section
- Section "!Set Config Section" SecSetConfig
- ;# Write settings for config file (opencpn.ini) to HKLM Software\OpenCPN
- ${If} $CONFIG_SET_LANG == 1
- ;Call Write_Reg_Lang
- WriteRegStr HKLM "Software\OpenCPN" "InstallerLanguage" $REG_LANG
- ${EndIf}
- ${If} $CHART_DIR_TMP_FILE == 1
- Call Write_Reg_ChartDirs
- ${EndIf}
- SectionEnd
- ;# Install Section /hidden
- Section "-Install Section" SecInstall
- ;#File "@CPACK_BINDIR@\_CPack_Packages\win32\NSIS\opencpn_@CPACK_PACKAGE_VERSION@_setup\bin\opencpn-cmd.exe"
- ;#File "@CPACK_BINDIR@\_CPack_Packages\win32\NSIS\opencpn_@CPACK_PACKAGE_VERSION@_setup\bin\opencpn-glutil.exe"
- @CPACK_NSIS_FULL_INSTALL@
- @CPACK_NSIS_EXTRA_INSTALL_COMMANDS@
- ;# Create uninstaller
- WriteUninstaller "$INSTDIR\Uninstall @CPACK_PACKAGE_VERSION@.exe"
- ;# Registry Entries
- SetShellVarContext all ;# make sure that we write to HKLM
- ;# HKLM Software\Microsoft\Windows\CurrentVersion\Uninstall\OpenCPN <DisplayVersion>
- WriteRegStr SHCTX "${REG_KEY_UN}" "DisplayName" "@CPACK_PACKAGE_NAME@ @CPACK_PACKAGE_VERSION@"
- WriteRegStr SHCTX "${REG_KEY_UN}" "DisplayVersion" "@CPACK_PACKAGE_VERSION@"
- WriteRegStr SHCTX "${REG_KEY_UN}" "CompareVersion" "$VERSION_DATE"
- WriteRegStr SHCTX "${REG_KEY_UN}" "StartMenuPath" "$SMPROGRAMS\$STARTMENU_FOLDER"
- WriteRegStr SHCTX "${REG_KEY_UN}" "InstallLocation" "$INSTDIR"
- WriteRegStr SHCTX "${REG_KEY_UN}" "UninstallString" "$\"$INSTDIR\Uninstall @CPACK_PACKAGE_VERSION@.exe$\""
- WriteRegStr SHCTX "${REG_KEY_UN}" "QuietUninstallString" "$\"$INSTDIR\Uninstall @CPACK_PACKAGE_VERSION@.exe /S$\""
- WriteRegStr SHCTX "${REG_KEY_UN}" "ConfigLocation" "$APPDATA\@CPACK_NSIS_PACKAGE_NAME_LC@"
- WriteRegStr SHCTX "${REG_KEY_UN}" "DisplayIcon" "$INSTDIR\@CPACK_NSIS_INSTALLED_ICON_NAME@"
- WriteRegStr SHCTX "${REG_KEY_UN}" "Publisher" "@CPACK_PACKAGE_VENDOR@"
- WriteRegDWORD SHCTX "${REG_KEY_UN}" "VersionMajor" $MAJOR_D
- WriteRegDWORD SHCTX "${REG_KEY_UN}" "VersionMinor" $MINOR_D
- WriteRegDWORD SHCTX "${REG_KEY_UN}" "VersionPatch" $PATCH_D
- WriteRegDWORD SHCTX "${REG_KEY_UN}" "NoModify" 1
- WriteRegDWORD SHCTX "${REG_KEY_UN}" "NoRepair" 1
- WriteRegStr SHCTX "${REG_KEY_UN}" "HelpLink" "http://opencpn.org/"
- WriteRegStr SHCTX "${REG_KEY_UN}" "URLInfoAbout" "http://opencpn.org/"
- WriteRegStr SHCTX "${REG_KEY_UN}" "Contact" "http://opencpn.org/"
- WriteRegStr SHCTX "${REG_KEY_UN}" "InstallUser" "$USERS_NAME"
- ${If} ${UAC_IsInnerInstance}
- WriteRegStr SHCTX "${REG_KEY_UN}" "InstallAdminUser" "$USERNAME"
- ${EndIf}
- ;# Create the config folder if it does not exist and set full access rights to it
- ${IfNot} ${FileExists} "$APPDATA\@CPACK_NSIS_PACKAGE_NAME_LC@\*.*"
- CreateDirectory "$APPDATA\@CPACK_NSIS_PACKAGE_NAME_LC@"
- Sleep 250
- ${EndIf}
- AccessControl::GrantOnFile "$APPDATA\@CPACK_NSIS_PACKAGE_NAME_LC@" "(BU)" "GenericRead + GenericExecute + GenericWrite + Delete + FullAccess"
- ;# Save the log file
- StrCpy $0 "$INSTDIR\install.log"
- Push $0
- IfSilent +2 0
- Call DumpLog
- SectionEnd
- ;--------------------------------
- ;##################################################################################################
- ;# Uninstaller Sections #
- ;##################################################################################################
- Section "-un.Delete Config RegKey" UnSecDeleteConfigRegKey
- DeleteRegKey HKLM "${REG_KEY}"
- SectionEnd
- Section /o "-un.Backup Config to RegKey" UnSecBackupConfigToRegKey
- SetShellVarContext all
- ${If} ${FileExists} "$APPDATA\@CPACK_NSIS_PACKAGE_NAME_LC@\opencpn.ini"
- ClearErrors
- StrCpy $0 ""
- StrCpy $2 0
- loop:
- IntOp $2 $2 + 1
- ReadINIStr $1 "$APPDATA\@CPACK_NSIS_PACKAGE_NAME_LC@\opencpn.ini" "ChartDirectories" "ChartDir$2"
- StrCmp $1 "" cont
- ${WordReplace} "$1" "\\" "\" "+" $3
- ${unExplode} $4 "^" "$3"
- Pop $5
- StrCmp $5 "" cont
- StrCmp $0 "" 0 +2
- StrCpy $0 $5
- StrCpy $0 "$0;$5"
- Goto loop
- cont:
- WriteRegStr HKLM "${REG_KEY}" "ChartDirs" "$0"
- ReadINIStr $0 "$APPDATA\@CPACK_NSIS_PACKAGE_NAME_LC@\opencpn.ini" "Settings" "Locale"
- StrCmp $0 "" +2 0
- WriteRegStr HKLM "${REG_KEY}" "InstallerLanguage" "$0"
- ${EndIf}
- SectionEnd
- Section "un.Delete Config Folder" UnSecDeleteConfigFolder
- SetShellVarContext all
- ${If} ${FileExists} "$APPDATA\@CPACK_NSIS_PACKAGE_NAME_LC@\*.*"
- RMDir /r "$APPDATA\@CPACK_NSIS_PACKAGE_NAME_LC@"
- ClearErrors
- ${EndIf}
- SectionEnd
- Section "-un.Uninstall" UnSecUninstall
- ;# Delete all Shortcuts
- Push $INSTDIR
- Call un.Delete_Desktop_Shortcuts
- Push $INSTDIR
- Call un.Delete_Start_Menu_Shortcuts
- ;# Delete subdirs and files in INSTDIR
- ;# Remove the uninstaller itself
- ReadRegStr $0 HKLM "${REG_KEY_UN}" "UninstallString"
- ${StrFilter} "$0" "" "" "$\"" $0
- Delete $0
- ;#Delete $INSTDIR\opencpn-cmd.exe
- ;#Delete $INSTDIR\opencpn-glutil.exe
- ;# Remove the installation log file
- Delete "$INSTDIR\install.log"
- @CPACK_NSIS_DELETE_FILES@
- @CPACK_NSIS_DELETE_DIRECTORIES@
- ;# Remove the installation directory INSTDIR if it is empty
- ClearErrors
- RMDir "$INSTDIR"
- IfErrors 0 cont
- IfSilent cont
- MessageBox MB_OK|MB_ICONEXCLAMATION "$(Msg_Error_Remove_InstDir)"
- cont:
- ;# Remove RegKey
- DeleteRegKey HKLM "${REG_KEY_UN}"
- SectionEnd
- ;--------------------------------------------------------------------------------------------------
- ;##################################################################################################
- ;# F U N C T I O N S #
- ;##################################################################################################
- ;# Installer Functions #
- ;##################################################################################################
- ;# .onInit Function
- Function .onInit
- ;# Check if Windows version is at least XP (not Win 98, Win 2000 or older)
- ${IfNot} ${AtLeastWinXP}
- MessageBox MB_OK|MB_ICONEXCLAMATION "$(Installer_Unsupported_Windows_Version)"
- Abort
- ${Else}
- ${If} ${IsWinXP}
- ${AndIf} ${AtMostServicePack} 2
- MessageBox MB_OK|MB_ICONEXCLAMATION "$(Installer_Unsupported_XP_SP_Version)"
- Abort
- ${EndIf}
- ${EndIf}
- ;Prevent multiple instances of the installer
- ${IfNot} ${UAC_IsInnerInstance}
- System::Call 'kernel32::CreateMutexW(i 0, i 0, t "ocpn_inst_@CPACK_PACKAGE_VERSION@") i .r1 ?e'
- Pop $R0
- StrCmp $R0 0 +3
- MessageBox MB_OK|MB_ICONEXCLAMATION "$(Installer_Running)"
- Abort
- ${EndIf}
- Call GetUserInfo
- StrCpy $USERS_NAME $USERNAME
- ;# Macros to be inserted
- ${If} $IS_ADMIN == 1
- !insertmacro MUI_LANGDLL_DISPLAY
- ${EndIf}
- SetShellVarContext current
- StrCpy $USERS_APPDATA $APPDATA
- StrCpy $ADMIN_APPDATA $APPDATA
- ;# UAC check if user has Admin privileges and prompt for elevation if not
- uac_tryagain:
- !insertmacro UAC_RunElevated
- StrCpy $Inst_Or_Uninst "$(Installer)"
- ${Switch} $0
- ${Case} 0
- ${IfThen} $1 = 1 ${|} Quit ${|} ;# we are the outer process, the inner process has done its work, we are done
- ${IfThen} $3 <> 0 ${|} ${Break} ${|} ;# we are admin, let the show go on
- ${If} $1 = 3 ;# RunAs completed successfully, but with a non-admin user
- MessageBox mb_IconExclamation|mb_TopMost|mb_SetForeground "$(Msg_UAC_Admin_Retry)" /SD IDNO IDOK uac_tryagain IDNO 0
- ${EndIf}
- ;# fall-through and die
- ${Case} 1223
- MessageBox mb_IconStop|mb_TopMost|mb_SetForeground "$(Msg_UAC_Admin_Abort)"
- Quit
- ${Case} 1062
- MessageBox mb_IconStop|mb_TopMost|mb_SetForeground "$(Msg_UAC_Logon_Abort)"
- Quit
- ${Default}
- MessageBox mb_IconStop|mb_TopMost|mb_SetForeground "$(Msg_UAC_No_Elevation)"
- Quit
- ${EndSwitch}
- ########## from here we can be sure to run with admin privileges ##########
- ;# Delete all temporary files created during the installation
- Delete "$TEMP\opencpn_*.tmp"
- ;DeleteRegKey HKCU "Software\OpenCPN" ;# remove RegKey possibly exists - was used by versions 2.2.808 to 2.2.823
- ;# Check for unloaded Registry hive from previous installation attempt e.g. when installer crashed
- StrCpy $0 0
- !insertmacro _EnumHKU_AdjustTokens
- ${Do}
- EnumRegKey $1 HKU "" $0
- StrCmp $1 "" done
- IntOp $0 $0 + 1
- ClearErrors
- ${WordFind} "$1" "opencpn-inst-tmp-sid" "E*" $2
- IfErrors +2 0
- System::Call "advapi32::RegUnLoadKeyW(i ${HKEY_USERS}, t '$1') i .r3"
- ${Loop}
- done:
- ${If} ${UAC_IsInnerInstance}
- !insertmacro UAC_AsUser_GetGlobalVar $USERS_APPDATA
- !insertmacro UAC_AsUser_GetGlobalVar $USERS_NAME
- ${EndIf}
- ClearErrors
- Var /GLOBAL INST_PARAMS
- Var /GLOBAL FORCE_SCAN
- ${GetParameters} $INST_PARAMS
- ${GetOptions} "$INST_PARAMS" "/scan" $FORCE_SCAN
- IfErrors +2
- # Get the user's SID from the username
- ReadRegStr $0 HKCU "Volatile Environment" "USERNAME"
- System::Call /NOUNLOAD '*(&w${NSIS_MAX_STRLEN})i.R9'
- System::Call /NOUNLOAD 'advapi32::LookupAccountNameW(,t "$0",i R9,*i ${NSIS_MAX_STRLEN},w .R8,*i ${NSIS_MAX_STRLEN},*i .r4)i.r5'
- System::Call /NOUNLOAD 'advapi32::ConvertSidToStringSidW(i R9,*t .R8)i.r5'
- StrCpy $INST_USER_SID $R8
- Call VersionDate
- ;# check for previous installed versions conforming to this installer
- Call Check_Prev_Installs
- ;# check for old installed versions prior to the ones that uses this installer
- StrCpy $OLD_INSTALLS 0
- Call Reg_Scan_Old_Versions_HKLM
- Call EnumProfileList
- Call Get_Users_Values
- ${If} $OLD_INSTALLS == 0
- StrCpy $Skip_Page_CleanUp 1
- ${EndIf}
- ;# make sure that the DWORD values for the Registry only contain digits
- ${StrFilter} "@CPACK_PACKAGE_VERSION_MAJOR@" "1" "" "" $MAJOR_D
- ${StrFilter} "@CPACK_PACKAGE_VERSION_MINOR@" "1" "" "" $MINOR_D
- ${StrFilter} "@CPACK_PACKAGE_VERSION_PATCH@" "1" "" "" $PATCH_D
- ;Call GetAllUsers
- FunctionEnd
- ;--------------------------------
- ;# myGuiInit Function
- /*
- Var CONFIG_EMPTY
- Var INI_EXISTS
- Var CHARTDB_EXISTS
- Var SENC_EXISTS
- Var CM93_EXISTS
- Var NAVOBJ_EXISTS
- Var LOG_EXISTS
- Var REG_LANG
- Var Count_SecGrpResetConfig
- Var SecGrpEndSetConfig_Text
- */
- Function myGuiInit
- ;Get chosen installer language
- ${Switch} $LANGUAGE
- ${Case} ${LANG_CZECH}
- StrCpy $LANG_NAME "Čeština"
- StrCpy $REG_LANG "cs_CZ"
- ${Break}
- ${Case} ${LANG_DANISH}
- StrCpy $LANG_NAME "Dansk"
- StrCpy $REG_LANG "da_DK"
- ${Break}
- ${Case} ${LANG_GERMAN}
- StrCpy $LANG_NAME "Deutsch"
- StrCpy $REG_LANG "de_DE"
- ${Break}
- ${Case} ${LANG_ENGLISH}
- StrCpy $LANG_NAME "English"
- StrCpy $REG_LANG "en_US"
- ${Break}
- ${Case} ${LANG_SPANISH}
- StrCpy $LANG_NAME "Español"
- StrCpy $REG_LANG "es_ES"
- ${Break}
- ${Case} ${LANG_FRENCH}
- StrCpy $LANG_NAME "Français"
- StrCpy $REG_LANG "fr_FR"
- ${Break}
- ${Case} ${LANG_ITALIAN}
- StrCpy $LANG_NAME "Italiano"
- StrCpy $REG_LANG "it_IT"
- ${Break}
- ${Case} ${LANG_DUTCH}
- StrCpy $LANG_NAME "Nederlandse"
- StrCpy $REG_LANG "nl_NL"
- ${Break}
- ${Case} ${LANG_POLISH}
- StrCpy $LANG_NAME "Polski"
- StrCpy $REG_LANG "pl_PL"
- ${Break}
- ${Case} ${LANG_PORTUGUESE}
- StrCpy $LANG_NAME "Português"
- StrCpy $REG_LANG "pt_PT"
- ${Break}
- ${Case} ${LANG_PORTUGUESEBR}
- StrCpy $LANG_NAME "Português Brasileiro"
- StrCpy $REG_LANG "pt_BR"
- ${Break}
- ${Case} ${LANG_SWEDISH}
- StrCpy $LANG_NAME "Svenska"
- StrCpy $REG_LANG "sv_SE"
- ${Break}
- ${Case} ${LANG_RUSSIAN}
- StrCpy $LANG_NAME "Русский"
- StrCpy $REG_LANG "ru_RU"
- ${Break}
- ${Case} ${LANG_NORWEGIAN}
- StrCpy $LANG_NAME "Norsk"
- StrCpy $REG_LANG "nb_NO"
- ${Break}
- ${Case} ${LANG_FINNISH}
- StrCpy $LANG_NAME "Suomalainen"
- StrCpy $REG_LANG "fi_FI"
- ${Break}
- ${Case} ${LANG_TRADCHINESE}
- StrCpy $LANG_NAME "正體中文"
- StrCpy $REG_LANG "zh_TW"
- ${Break}
- ${Case} ${LANG_Turkish}
- StrCpy $LANG_NAME "Türkçe"
- StrCpy $REG_LANG "tr_TR"
- ${Break}
- ${Default}
- ${Break}
- ${EndSwitch}
- ;# Set Sections Text
- SectionSetText ${SecGrpShortcuts} $(SecGrpShortcuts_Text)
- SectionSetText ${SecShortcutStartmenu} $(SecShortcutStartmenu_Text)
- SectionSetText ${SecShortcutDesktop} $(SecShortcutDesktop_Text)
- SectionSetText ${SecSetConfig} $(SecSetConfig_Text)
- ;# Look for config dir ("%APPDATA%\opencpn) and the several config files
- Call Check_Config_Exists
- ${If} $CONFIG_EXISTS != 1
- ${OrIf} $CONFIG_EMPTY == 1
- Call Hide_SecGrpResetConfig
- IntOp $0 ${SF_SELECTED} | ${SF_BOLD}
- SectionSetFlags ${SecSetConfig} $0
- StrCpy $SetConfig 1
- ${EndIf}
- SetShellVarContext all ;# switch SetShellVarContext back to ALL
- FunctionEnd
- ;--------------------------------
- ;# onSelChange
- ;Var ConfigSetLang
- ;Var ConfigSetChartDir
- ;Var SetConfig
- Function .onSelChange
- ;# Check if all available Sections in SecGrpResetConfig are selected => set SecGrpResetConfig to selected instead of partially selected
- Push $0
- Push $1
- Push $2
- Push $3
- Push $R0
- Push $R1
- StrCpy $0 ${SecGrpResetConfig}
- StrCpy $1 0
- StrCpy $2 0
- ${Do}
- IntOp $0 $0 + 1
- ${If} ${SectionIsSectionGroupEnd} $0
- Goto end
- ${EndIf}
- SectionGetText $0 $R0
- ${If} $R0 != ""
- ${AndIf} ${SectionIsSelected} $0
- Goto found_selected
- ${ElseIf} $R0 != ""
- ${AndIfNot} ${SectionIsSelected} $0
- Goto found_unselected
- ${EndIf}
- ${Loop}
- found_selected:
- StrCpy $0 ${SecGrpResetConfig}
- ${Do}
- IntOp $0 $0 + 1
- ${If} ${SectionIsSectionGroupEnd} $0
- Goto end
- ${EndIf}
- SectionGetText $0 $R0
- ${If} $R0 == ""
- ${AndIfNot} ${SectionIsSelected} $0
- SectionSetFlags $0 ${SF_SELECTED}
- ${EndIf}
- ${Loop}
- found_unselected:
- StrCpy $0 ${SecGrpResetConfig}
- ${Do}
- IntOp $0 $0 + 1
- ${If} ${SectionIsSectionGroupEnd} $0
- Goto end
- ${EndIf}
- SectionGetText $0 $R0
- ${If} $R0 == ""
- ${AndIf} ${SectionIsSelected} $0
- !insertmacro ClearSectionFlag $0 ${SF_SELECTED}
- ${EndIf}
- ${Loop}
- end:
- SectionGetText ${SecDeleteConfigFile} $R1
- ${If} $R1 != ""
- ${IfNot} ${SectionIsReadOnly} ${SecSetConfig}
- ${AndIfNot} ${SectionIsSelected} ${SecSetConfig}
- ${AndIf} $SetConfig == 1
- StrCpy $SetConfig 0
- ${EndIf}
- ${IfNot} ${SectionIsSelected} ${SecDeleteConfigFile}
- ${AndIf} ${SectionIsSelected} ${SecSetConfig}
- !insertmacro ClearSectionFlag ${SecSetConfig} ${SF_SELECTED}
- IntOp $0 ${SF_RO} | ${SF_BOLD}
- SectionSetFlags ${SecSetConfig} $0
- ;SectionSetFlags ${SecSetConfig} ${SF_RO}
- StrCpy $SetConfig 1
- ${ElseIfNot} ${SectionIsSelected} ${SecDeleteConfigFile}
- ${AndIfNot} ${SectionIsSelected} ${SecSetConfig}
- IntOp $0 ${SF_RO} | ${SF_BOLD}
- SectionSetFlags ${SecSetConfig} $0
- ;SectionSetFlags ${SecSetConfig} ${SF_RO}
- StrCpy $SetConfig 0
- ${ElseIf} ${SectionIsSelected} ${SecDeleteConfigFile}
- ${AndIfNot} ${SectionIsSelected} ${SecSetConfig}
- ${AndIf} $SetConfig == 1
- !insertmacro ClearSectionFlag ${SecSetConfig} ${SF_RO}
- IntOp $0 ${SF_SELECTED} | ${SF_BOLD}
- SectionSetFlags ${SecSetConfig} $0
- ;SectionSetFlags ${SecSetConfig} ${SF_SELECTED}
- ${ElseIf} ${SectionIsSelected} ${SecDeleteConfigFile}
- ${AndIf} $SetConfig == 0
- !insertmacro ClearSectionFlag ${SecSetConfig} ${SF_RO}
- StrCpy $SetConfig 0
- ${EndIf}
- ${EndIf}
- Pop $R1
- Pop $R0
- Pop $3
- Pop $2
- Pop $1
- Pop $0
- FunctionEnd
- Function .OnInstFailed
- Call InstallerEnd
- FunctionEnd
- Function .OnInstSuccess
- Call InstallerEnd
- FunctionEnd
- Function .onGUIEnd
- Call InstallerEnd
- FunctionEnd
- Function InstallerEnd
- ;# Delete all temporary files created during the installation
- Delete "$TEMP\opencpn_*.tmp"
- ${If} $EnumHKU_counter > 0
- ${ForEach} $1 $EnumHKU_counter 0 - 1
- System::Call "advapi32::RegUnLoadKeyW(i ${HKEY_USERS}, t '$key_$1')"
- ${Next}
- ${Endif}
- FunctionEnd
- ;--------------------------------
- ;##################################################################################################
- ;# Installer Page Functions #
- ;##################################################################################################
- ;# Page_License_Leave
- Function Page_License_Leave
- FindWindow $mui.ComponentsPage "#32770" "" $HWNDPARENT
- System::Call "*(i 0, i 0, i 4, i 8) i .r1"
- System::Call "User32::MapDialogRect(i $mui.ComponentsPage, i r1) i .r2"
- System::Call "*$1(i .r2, i.r3, i.r4, i.r5)"
- System::Free $1
- StrCpy $BU_X $4
- StrCpy $BU_Y $5
- FunctionEnd
- ;--------------------------------
- ;# Page_CleanUp
- Var Label_CleanUp
- Var Label_FullScan_CleanUp
- Var GroupBox_CleanUp
- Var ListBox_CleanUp
- Var Button_FullScan_CleanUp
- Var Button_UnselectAll_CleanUp
- Var Button_SelectAll_CleanUp
- Var Button_Uninstall_Selected_CleanUp
- Var Banner_Handle
- Var MSG_Box_Uninstall_Shown
- Function Page_CleanUp
- ${If} $Skip_Page_CleanUp == 1
- Abort
- ${EndIf}
- !ifndef PBS_MARQUEE
- !define PBS_MARQUEE 0x08
- !endif
- !ifndef PBM_SETMARQUEE
- !define PBM_SETMARQUEE 0x040A
- !endif
- !ifndef GWL_STYLE
- !define GWL_STYLE -16
- !endif
- ${IfNot} $MSG_Box_Uninstall_Shown == 1
- MessageBox MB_YESNO|MB_ICONQUESTION "$(Msg_Uninstall_Old_Versions)" IDYES cont IDNO skip
- ${Else}
- Goto cont
- ${EndIf}
- skip:
- Abort
- cont:
- StrCpy $MSG_Box_Uninstall_Shown 1
- !insertmacro MUI_HEADER_TEXT "$(Page_CleanUp_Title)" "$(Page_CleanUp_Subtitle)"
- nsDialogs::Create /NOUNLOAD 1018
- Pop $0
- ${If} $0 == error
- Abort
- ${EndIf}
- ${NSD_CreateLabel} 0 0 200u 16u "$(LAB_FullScan_CleanUp)"
- Pop $Label_FullScan_CleanUp
- ${NSD_CreateButton} 220u 0 70u 15u "$(BT_FullScan_CleanUp)"
- Pop $Button_FullScan_CleanUp
- GetFunctionAddress $0 Button_FullScan_CleanUp_Click
- nsDialogs::OnClick /NOUNLOAD $Button_FullScan_CleanUp $0
- ${NSD_CreateLabel} 0 22u 100% 24u "$(Label_CleanUp_Text)"
- Pop $Label_CleanUp
- ${NSD_CreateGroupBox} 0 55u 100% 85u "$(Install_Location_Default)"
- Pop $GroupBox_CleanUp
- !define __NSD_ListBoxMultiselect_CLASS LISTBOX
- !define __NSD_ListBoxMultiselect_STYLE ${DEFAULT_STYLES}|${WS_TABSTOP}|${WS_VSCROLL}|${LBS_DISABLENOSCROLL}|${LBS_HASSTRINGS}|${LBS_NOINTEGRALHEIGHT}|${LBS_NOTIFY}|${LBS_MULTIPLESEL}
- !define __NSD_ListBoxMultiselect_EXSTYLE ${WS_EX_WINDOWEDGE}|${WS_EX_CLIENTEDGE}
- !insertmacro __NSD_DefineControl ListBoxMultiselect
- ${NSD_CreateListboxMultiselect} 10u 70u 200u 65u "$(LB_CleanUp)"
- Pop $ListBox_CleanUp
- GetFunctionAddress $0 ListBox_CleanUp_Change
- nsDialogs::OnChange /NOUNLOAD $ListBox_CleanUp $0
- ${NSD_CreateButton} 220u 70u 70u 15u "$(BT_UnselectAll_CleanUp)"
- Pop $Button_UnselectAll_CleanUp
- GetFunctionAddress $0 Button_UnselectAll_CleanUp_Click
- nsDialogs::OnClick /NOUNLOAD $Button_UnselectAll_CleanUp $0
- ${NSD_CreateButton} 220u 100u 70u 15u "$(BT_SelectAll_CleanUp)"
- Pop $Button_SelectAll_CleanUp
- GetFunctionAddress $0 Button_SelectAll_CleanUp_Click
- nsDialogs::OnClick /NOUNLOAD $Button_SelectAll_CleanUp $0
- ${NSD_CreateButton} 220u 120u 70u 15u "$(BT_Uninstall_Selected_CleanUp)"
- Pop $Button_Uninstall_Selected_CleanUp
- GetFunctionAddress $0 Button_Uninstall_Selected_CleanUp_Click
- nsDialogs::OnClick /NOUNLOAD $Button_Uninstall_Selected_CleanUp $0
- ;# First check if HDD scan was already done
- ${If} ${FileExists} "$TEMP\opencpn_hdd_full_scan.tmp"
- EnableWindow $Button_FullScan_CleanUp 0
- EnableWindow $Label_FullScan_CleanUp 0
- SendMessage $GroupBox_CleanUp ${WM_SETTEXT} 0 "STR:$(Install_Location_HDD_Scan)"
- ClearErrors
- FileOpen $R0 "$TEMP\opencpn_hdd_full_scan.tmp" r
- IfErrors done1
- ${Do}
- FileReadUTF16LE $R0 $R1
- ${If} $R1 == ""
- Goto done1
- ${Else}
- ${TrimNewLines} $R1 $R1
- SendMessage $ListBox_CleanUp ${LB_ADDSTRING} 0 "STR:$R1"
- ${EndIf}
- ${Loop}
- done1:
- FileClose $R0
- ;# if not get values from LM_VERSION and opencpn_old_installs.tmp file
- ${Else}
- ${IfNot} ${FileExists} "$TEMP\opencpn_hdd_quick_scan.tmp"
- ;# Scan the default locations for program installations on a per-user and all-users basis
- Banner::show /NOUNLOAD /set 76 "$(Search_old_installations)"
- Banner::getWindow /NOUNLOAD
- Pop $Banner_Handle
- ShowWindow $Banner_Handle ${SW_HIDE}
- ${NSD_AddExStyle} $Banner_Handle ${WS_EX_APPWINDOW}
- ShowWindow $Banner_Handle ${SW_SHOW}
- GetDlgItem $2 $Banner_Handle 1030
- SendMessage $2 ${WM_SETTEXT} 0 "STR:$(text_please_wait_1)"
- ; Get progress bar handle.
- GetDlgItem $Marquee_Handle $Banner_Handle 1004
- ; Set PBS_MARQUEE style for the progress bar control.
- System::Call "user32::GetWindowLong(i $Marquee_Handle, i ${GWL_STYLE}) i .r1"
- System::Call "user32::SetWindowLong(i $Marquee_Handle, i ${GWL_STYLE}, i $1|${PBS_MARQUEE})"
- ; Send PBM_SETMARQUEE message to start the marquee.
- ; lParam is time in milliseconds between marquee animation updates.
- SendMessage $Marquee_Handle ${PBM_SETMARQUEE} 1 50
- System::Call "User32::SetWindowPos(i $Banner_Handle, i -1, i 0, i 0, i 0, i 0, i 83)"
- HideWindow
- Call Quick_Scan_Old_Versions
- ShowWindow $HWNDPARENT ${SW_SHOW}
- BringToFront
- SendMessage $Marquee_Handle ${PBM_SETMARQUEE} 0 0
- System::Call "user32::SetWindowLong(i $Marquee_Handle, i ${GWL_STYLE}, i $1)"
- Banner::destroy
- ${EndIf}
- ClearErrors
- FileOpen $R0 "$TEMP\opencpn_hdd_quick_scan.tmp" r
- IfErrors done2
- ${Do}
- FileReadUTF16LE $R0 $R1
- ${If} $R1 == ""
- Goto done2
- ${Else}
- ${TrimNewLines} $R1 $R1
- SendMessage $ListBox_CleanUp ${LB_ADDSTRING} 0 "STR:$R1"
- ${EndIf}
- ${Loop}
- done2:
- FileClose $R0
- ${EndIf}
- /*
- ;# Pre-select all listbox-items
- ${NSD_LB_GetCount} $ListBox_CleanUp $1
- IntOp $1 $1 - 1
- SendMessage $ListBox_CleanUp ${LB_SELITEMRANGEEX} 0 $1
- */
- Call ListBox_CleanUp_Change
- nsDialogs::Show
- FunctionEnd
- Function Button_FullScan_CleanUp_Click
- SendMessage $ListBox_CleanUp ${LB_RESETCONTENT} 0 0
- Banner::show /NOUNLOAD /set 76 "$(Scanning_HDD)"
- Banner::getWindow /NOUNLOAD
- Pop $Banner_Handle
- ShowWindow $Banner_Handle ${SW_HIDE}
- SendMessage $Banner_Handle ${WM_SETTEXT} 0 "STR:$(OCPN_Scanning_HDD)"
- ${NSD_AddExStyle} $Banner_Handle ${WS_EX_APPWINDOW}
- ShowWindow $Banner_Handle ${SW_SHOW}
- GetDlgItem $2 $Banner_Handle 1030
- SendMessage $2 ${WM_SETTEXT} 0 "STR:$(text_please_wait_1)"
- ; Get progress bar handle.
- GetDlgItem $Marquee_Handle $Banner_Handle 1004
- ; Set PBS_MARQUEE style for the progress bar control.
- System::Call "user32::GetWindowLong(i $Marquee_Handle, i ${GWL_STYLE}) i .r1"
- System::Call "user32::SetWindowLong(i $Marquee_Handle, i ${GWL_STYLE}, i $1|${PBS_MARQUEE})"
- ; Send PBM_SETMARQUEE message to start the marquee.
- ; lParam is time in milliseconds between marquee animation updates.
- SendMessage $Marquee_Handle ${PBM_SETMARQUEE} 1 50
- System::Call "User32::SetWindowPos(i $Banner_Handle, i -1, i 0, i 0, i 0, i 0, i 83)"
- HideWindow
- Call Full_Scan_Old_Versions
- ${If} ${FileExists} "$TEMP\opencpn_hdd_full_scan.tmp"
- Delete "$TEMP\opencpn_hdd_quick_scan.tmp"
- ${EndIf}
- ;# If install locations were found compare with Registry keys
- ${If} $counter_tmp > 0
- ${If} $LM_VERSION_INST != ""
- ClearErrors
- FileOpen $R0 "$TEMP\opencpn_hdd_full_scan.tmp" r
- IfErrors done1
- ${Do}
- FileReadUTF16LE $R0 $R1
- ${If} $R1 == ""
- Goto done1
- ${Else}
- ${TrimNewLines} $R1 $R1
- StrCmp $R1 $R2 done1
- ${EndIf}
- ${Loop}
- ;# Path from Registry key wasn't found => delete RegKey
- DeleteRegKey HKLM "Software\Microsoft\Windows\CurrentVersion\Uninstall\OpenCPN_is1"
- StrCpy $LM_VERSION_INST ""
- done1:
- FileClose $R0
- ${EndIf}
- ${If} ${FileExists} "$TEMP\opencpn_old_installs.tmp"
- ;# Clear the stack
- ClearErrors
- ${Do}
- Pop $0
- IfErrors empty
- ${Loop}
- empty:
- ClearErrors
- FileOpen $R0 "$TEMP\opencpn_old_installs.tmp" r
- IfErrors done3
- ${Do}
- FileReadUTF16LE $R0 $R3
- FileReadUTF16LE $R0 $R2
- ${If} $R3 == ""
- Goto done3
- ${Else}
- ${TrimNewLines} $R3 $R3
- ${TrimNewLines} $R2 $R2
- FileReadUTF16LE $R0 $R1
- ${TrimNewLines} $R1 $R1
- ClearErrors
- FileOpen $0 "$TEMP\opencpn_hdd_full_scan.tmp" r
- IfErrors next
- ${Do}
- FileReadUTF16LE $0 $1
- ${If} $1 == ""
- Goto next
- ${Else}
- ${TrimNewLines} $1 $1
- StrCmp $1 $R1 done2
- ${EndIf}
- ${Loop}
- ;# Path from Registry key wasn't found => delete RegKey
- DeleteRegKey HKU $R3
- Goto next
- done2:
- Push $R1
- Push $R2
- Push $R3
- next:
- FileClose $0
- ${EndIf}
- ${Loop}
- done3:
- FileClose $R0
- ClearErrors
- FileOpen $R0 "$TEMP\opencpn_old_installs.tmp" w
- IfErrors done4
- ${Do}
- Pop $R1
- IfErrors done4
- FileWriteUTF16LE $R0 $R1
- FileWriteUTF16LE $R0 "$\r$\n"
- ${Loop}
- done4:
- FileClose $R0
- ${EndIf}
- ${EndIf}
- EnableWindow $Button_FullScan_CleanUp 0 ;# Disable the Scan HDD button after scan was done
- EnableWindow $Label_FullScan_CleanUp 0 ;# Disable the Scan HDD label after scan was done
- SendMessage $GroupBox_CleanUp ${WM_SETTEXT} 0 "STR:$(Install_Location_HDD_Scan)"
- ShowWindow $HWNDPARENT ${SW_SHOW}
- BringToFront
- ; Stop the marquee and set the old styles back for the progress bar control.
- SendMessage $Marquee_Handle ${PBM_SETMARQUEE} 0 0
- System::Call "user32::SetWindowLong(i $Marquee_Handle, i ${GWL_STYLE}, i $1)"
- Banner::destroy
- FunctionEnd
- Function Button_UnselectAll_CleanUp_Click
- SendMessage $ListBox_CleanUp ${LB_SETSEL} FALSE -1
- Call ListBox_CleanUp_Change
- FunctionEnd
- Function Button_SelectAll_CleanUp_Click
- ${NSD_LB_GetCount} $ListBox_CleanUp $1
- IntOp $1 $1 - 1
- ${If} $1 == 0
- IntOp $1 $1 + 1
- ${EndIf}
- SendMessage $ListBox_CleanUp ${LB_SELITEMRANGEEX} 0 $1
- Call ListBox_CleanUp_Change
- FunctionEnd
- Function ListBox_CleanUp_Change
- SendMessage $ListBox_CleanUp ${LB_GETSELCOUNT} 0 0 $1
- ${NSD_LB_GetCount} $ListBox_CleanUp $2
- ${If} $2 > 0
- ${If} $1 == 0
- EnableWindow $Button_Uninstall_Selected_CleanUp 0
- EnableWindow $Button_UnselectAll_CleanUp 0
- EnableWindow $Button_SelectAll_CleanUp 1
- ${ElseIf} $1 > 0
- ${AndIf} $1 == $2
- EnableWindow $Button_Uninstall_Selected_CleanUp 1
- EnableWindow $Button_UnselectAll_CleanUp 1
- EnableWindow $Button_SelectAll_CleanUp 0
- ${Else}
- EnableWindow $Button_Uninstall_Selected_CleanUp 1
- EnableWindow $Button_UnselectAll_CleanUp 1
- EnableWindow $Button_SelectAll_CleanUp 1
- ${EndIf}
- ${Else}
- EnableWindow $Button_Uninstall_Selected_CleanUp 0
- EnableWindow $Button_UnselectAll_CleanUp 0
- EnableWindow $Button_SelectAll_CleanUp 0
- ${EndIf}
- FunctionEnd
- Var Uninstall_Path_Tmp
- Function Button_Uninstall_Selected_CleanUp_Click
- EnableWindow $Button_Uninstall_Selected_CleanUp 0
- SendMessage $ListBox_CleanUp ${LB_GETSELCOUNT} 0 0 $1
- ${NSD_LB_GetCount} $ListBox_CleanUp $2
- ClearErrors
- FileOpen $R0 "$TEMP\opencpn_uninstall.tmp" w
- IfErrors done
- IntOp $2 $2 - 1
- ${ForEach} $3 $2 0 - 1
- SendMessage $ListBox_CleanUp ${LB_GETSEL} $3 0 $4
- ${If} $4 > 0
- System::Call "User32::SendMessage(i $ListBox_CleanUp, i ${LB_GETTEXT}, i $3, t .r5)"
- FileWriteUTF16LE $R0 "$5"
- FileWriteUTF16LE $R0 "$\r$\n"
- SendMessage $ListBox_CleanUp ${LB_DELETESTRING} $3 0
- ${EndIf}
- ${Next}
- done:
- FileClose $R0
- Call ListBox_CleanUp_Change
- StrCpy $R8 ""
- StrCpy $R7 ""
- StrCpy $R6 ""
- StrCpy $R5 ""
- ${If} ${FileExists} "$TEMP\opencpn_uninstall.tmp"
- ${If} ${FileExists} "$TEMP\opencpn_hdd_full_scan.tmp"
- StrCpy $R8 "opencpn_hdd_full_scan.tmp"
- ${ElseIf} ${FileExists} "$TEMP\opencpn_hdd_quick_scan.tmp"
- StrCpy $R8 "opencpn_hdd_quick_scan.tmp"
- ${EndIf}
- ${If} ${FileExists} "$TEMP\opencpn_old_installs.tmp"
- StrCpy $R7 1
- ${EndIf}
- ${If} ${FileExists} "$TEMP\opencpn_old_uninstall_regkeys.tmp"
- StrCpy $R6 1
- ${EndIf}
- ${If} ${FileExists} "$TEMP\opencpn_appdata.tmp"
- StrCpy $R5 1
- ${EndIf}
- ClearErrors
- FileOpen $R4 "$TEMP\opencpn_uninstall.tmp" r
- IfErrors end
- loop:
- ClearErrors
- FileReadUTF16LE $R4 $0
- IfErrors end
- StrCmp $0 "" loop
- StrCmp $0 "$\r$\n" loop
- ${TrimNewLines} $0 $0
- StrCpy $Uninstall_Path_Tmp $0
- ;# Delete installation directory
- ClearErrors
- Call Delete_Installation_Dir
- IfErrors 0 +2
- MessageBox MB_OK|MB_ICONEXCLAMATION "Error RMDir: $0" ;#ON ERROR
- ;# If deleted installation was the one in the HKLM ...\OpenCPN_is1 subkey => delete RegKey
- ${If} $LM_VERSION_INST != ""
- StrCmp $0 $LM_VERSION_INST 0 cont
- ClearErrors
- DeleteRegKey HKLM "Software\Microsoft\Windows\CurrentVersion\Uninstall\OpenCPN_is1"
- IfErrors 0 +2
- MessageBox MB_OK|MB_ICONEXCLAMATION "Error DeleteRegKey HKLM Software\Microsoft\Windows\CurrentVersion\Uninstall\OpenCPN_is1" ;#ON ERROR
- StrCpy $LM_VERSION ""
- StrCpy $LM_VERSION_INST ""
- StrCpy $LM_VERSION_UNINST ""
- ${EndIf}
- cont:
- ;# Delete Start Menu shortcuts
- Push $Uninstall_Path_Tmp
- Call Delete_Start_Menu_Shortcuts
- ;# Delete Desktop shortcuts
- Push $Uninstall_Path_Tmp
- Call Delete_Desktop_Shortcuts
- ;# Delete RegKeys in HKU Software\opencpn.org\...
- ${If} $R7 == 1
- Call Update_Old_Installs
- ${EndIf}
- ;# Delete RegKeys in HKU Software\...\Uninstall\OpenCPN
- ${If} $R6 == 1
- Call Update_Old_Uninstalls
- ${EndIf}
- ;# Delete %APPDATA\opencpn folder
- ${If} $R5 == 1
- Call Update_Appdata
- ${EndIf}
- ${IfNot} $R8 == ""
- Call Update_HDD_Scan
- ${EndIf}
- Goto loop
- end:
- FileClose $R4
- Delete "$TEMP\opencpn_uninstall.tmp"
- StrCpy $Uninstall_Path_Tmp ""
- ${EndIf}
- ${NSD_LB_GetCount} $ListBox_CleanUp $2
- ${If} $2 == 0 ;# listbox is empty - all were uninstalled
- StrCpy $Skip_Page_CleanUp 1
- GetDlgItem $0 $HWNDPARENT 1
- SendMessage $0 ${BM_CLICK} 0 0
- ${EndIf}
- FunctionEnd
- Function Update_HDD_Scan
- Push $0
- Push $1
- Push $2
- Push $3
- Push $4
- Push $R0
- Push $R8
- ClearErrors
- FileOpen $0 "$TEMP\$R8" r ;# open target file for reading
- GetTempFileName $R0 ;# get new temp file name
- FileOpen $1 $R0 w ;# open temp file for writing
- IfErrors end
- loop:
- FileReadUTF16LE $0 $2 ;# read line from target file
- IfErrors done ;# check if end of file reached
- ${TrimNewLines} $2 $2
- StrCmp $2 "$Uninstall_Path_Tmp" +2 ;# compare line with search string with CR/LF
- FileWriteUTF16LE $1 "$2$\r$\n" ;# write line to temp file
- Goto loop
- done:
- FileClose $0 ;# close target file
- FileClose $1 ;# close temp file
- Delete "$TEMP\$R8" ;# delete target file
- CopyFiles /SILENT $R0 "$TEMP\$R8" ;# copy temp file to target file
- Delete $R0 ;# delete temp file
- end:
- Pop $R8
- Pop $R0
- Pop $4
- Pop $3
- Pop $2
- Pop $1
- Pop $0
- FunctionEnd
- Function Update_Old_Installs
- Push $0
- Push $1
- Push $2
- Push $3
- Push $4
- Push $R0
- Push $R1
- ClearErrors
- FileOpen $0 "$TEMP\opencpn_old_installs.tmp" r ;# open target file for reading
- GetTempFileName $R0 ;# get new temp file name
- FileOpen $1 $R0 w ;# open temp file for writing
- IfErrors end
- loop:
- FileReadUTF16LE $0 $4 ;# read line from target file
- FileReadUTF16LE $0 $3 ;# read line from target file
- FileReadUTF16LE $0 $2 ;# read line from target file
- IfErrors done ;# check if end of file reached
- ${TrimNewLines} $2 $2
- StrCmp $2 "$Uninstall_Path_Tmp" +5 ;# compare line with search string with CR/LF
- FileWriteUTF16LE $1 $4 ;# write line to temp file
- FileWriteUTF16LE $1 $3 ;# write line to temp file
- FileWriteUTF16LE $1 "$2$\r$\n" ;# write line to temp file
- Goto loop
- ${TrimNewLines} $4 $4
- DeleteRegKey HKU "$4"
- ${WordFind} "$4" "\" "-2{*" $4
- DeleteRegKey /ifempty HKU "$4"
- ClearErrors
- Goto loop
- done:
- FileClose $0 ;# close target file
- FileClose $1 ;# close temp file
- Delete "$TEMP\opencpn_old_installs.tmp" ;# delete target file
- CopyFiles /SILENT $R0 "$TEMP\opencpn_old_installs.tmp" ;# copy temp file to target file
- Delete $R0 ;# delete temp file
- end:
- Pop $R1
- Pop $R0
- Pop $4
- Pop $3
- Pop $2
- Pop $1
- Pop $0
- FunctionEnd
- Function Update_Old_Uninstalls
- Push $0
- Push $1
- Push $2
- Push $3
- Push $4
- Push $R0
- Push $R1
- ClearErrors
- FileOpen $0 "$TEMP\opencpn_old_uninstall_regkeys.tmp" r ;# open target file for reading
- GetTempFileName $R0 ;# get new temp file name
- FileOpen $1 $R0 w ;# open temp file for writing
- IfErrors end
- loop:
- FileReadUTF16LE $0 $4 ;# read line from target file
- FileReadUTF16LE $0 $3 ;# read line from target file
- FileReadUTF16LE $0 $2 ;# read line from target file
- IfErrors done ;# check if end of file reached
- ${TrimNewLines} $2 $2
- StrCmp $2 "$Uninstall_Path_Tmp" +5 ;# compare line with search string with CR/LF
- FileWriteUTF16LE $1 $4 ;# write line to temp file
- FileWriteUTF16LE $1 $3 ;# write line to temp file
- FileWriteUTF16LE $1 "$2$\r$\n" ;# write line to temp file
- Goto loop
- ${TrimNewLines} $3 $3
- DeleteRegKey HKU "$3"
- ClearErrors
- Goto loop
- done:
- FileClose $0 ;# close target file
- FileClose $1 ;# close temp file
- Delete "$TEMP\opencpn_old_uninstall_regkeys.tmp" ;# delete target file
- CopyFiles /SILENT $R0 "$TEMP\opencpn_old_uninstall_regkeys.tmp" ;# copy temp file to target file
- Delete $R0 ;# delete temp file
- end:
- Pop $R1
- Pop $R0
- Pop $4
- Pop $3
- Pop $2
- Pop $1
- Pop $0
- FunctionEnd
- Function Update_Appdata
- Push $0
- Push $1
- Push $2
- Push $3
- Push $4
- Push $R0
- Push $R1
- ClearErrors
- FileOpen $0 "$TEMP\opencpn_appdata.tmp" r ;# open target file for reading
- GetTempFileName $R0 ;# get new temp file name
- FileOpen $1 $R0 w ;# open temp file for writing
- IfErrors end
- loop:
- FileReadUTF16LE $0 $4 ;# read line from target file
- FileReadUTF16LE $0 $3 ;# read line from target file
- FileReadUTF16LE $0 $2 ;# read line from target file
- IfErrors done ;# check if end of file reached
- ${TrimNewLines} $2 $2
- StrCmp $2 "$Uninstall_Path_Tmp" +5 ;# compare line with search string with CR/LF
- FileWriteUTF16LE $1 $4 ;# write line to temp file
- FileWriteUTF16LE $1 $3 ;# write line to temp file
- FileWriteUTF16LE $1 "$2$\r$\n" ;# write line to temp file
- Goto loop
- ${TrimNewLines} $3 $3
- RMDir /r "$3\opencpn"
- ClearErrors
- Goto loop
- done:
- FileClose $0 ;# close target file
- FileClose $1 ;# close temp file
- Delete "$TEMP\opencpn_appdata.tmp" ;# delete target file
- CopyFiles /SILENT $R0 "$TEMP\opencpn_appdata.tmp" ;# copy temp file to target file
- Delete $R0 ;# delete temp file
- end:
- Pop $R1
- Pop $R0
- Pop $4
- Pop $3
- Pop $2
- Pop $1
- Pop $0
- FunctionEnd
- ;--------------------------------
- ;# Page_CleanUp_Leave
- Function Page_CleanUp_Leave
- ${NSD_LB_GetCount} $ListBox_CleanUp $2
- ${If} $2 > 0 ;# listbox is not empty - not all old versions were uninstalled
- MessageBox MB_YESNO|MB_ICONQUESTION "$(Msg_Not_All_Old_Uninstalled)" IDYES leaving
- Abort
- ${EndIf}
- leaving:
- SendMessage $ListBox_CleanUp ${LB_RESETCONTENT} 0 0
- FunctionEnd
- ;--------------------------------
- ;# Page_TypeInst
- /* Var Label_TypeInst_Reinstall
- Var RB_Reinstall
- Var Label_TypeInst_Upgrade
- Var RB_Upgrade
- Var Label_TypeInst_Downgrade
- Var RB_Downgrade
- Var Label_TypeInst_Parallel
- Var GroupBox_TypeInst
- Var RB_Parallel
- Var TI_REINSTALL
- Var TI_UPGRADE
- Var TI_DOWNGRADE
- Var TI_PARALLEL
- Var GroupBox_Size
- Var INSTALL_TYPE
- */
- Function Page_TypeInst
- ${If} $Skip_Page_TypeInst == 1
- Abort
- ${EndIf}
- ${If} $VERSION_EXISTS == 1
- !insertmacro MUI_HEADER_TEXT $(Page_TypeInst_Title_Exists) $(Page_TypeInst_Subtitle_Exists)
- ${ElseIf} $MULTIPLE_INSTALLS == 1
- !insertmacro MUI_HEADER_TEXT $(Page_TypeInst_Title_1) $(Page_TypeInst_Subtitle_1)
- ${ElseIf} $MULTIPLE_INSTALLS > 1
- !insertmacro MUI_HEADER_TEXT $(Page_TypeInst_Title) $(Page_TypeInst_Subtitle)
- ${EndIf}
- nsDialogs::Create /NOUNLOAD 1018
- Pop $0
- ${If} $0 == error
- Abort
- ${EndIf}
- ;Case 1: same version already installed => Option 1: Reinstall
- ${If} $VERSION_EXISTS == 1
- ${NSD_CreateLabel} 0 0 100% 40u "$(Label_TypeInst_Reinstall_Text)"
- Pop $Label_TypeInst_Reinstall
- ${NSD_CreateRadioButton} 10u 65u 100% 10u "$(RB_Reinstall_TypeInst_Text)"
- Pop $RB_Reinstall
- ${NSD_AddStyle} $RB_Reinstall ${WS_GROUP}
- ${NSD_SetState} $RB_Reinstall ${BST_CHECKED}
- StrCpy $GroupBox_Size 1
- ;Case 2: one older previous installation => Option 1: Upgrade Option 2: Parallel Installation
- ${ElseIf} $MULTIPLE_INSTALLS == 1
- ${AndIf} $VERSION_NEWER == 1
- ${NSD_CreateLabel} 0 0 100% 32u "$(Label_TypeInst_Upgrade_Text)"
- Pop $Label_TypeInst_Upgrade
- ${NSD_CreateRadioButton} 10u 65u 100% 10u "$(RB_Upgrade_TypeInst_Text)"
- Pop $RB_Upgrade
- ${NSD_AddStyle} $RB_Upgrade ${WS_GROUP}
- ${If} $TI_UPGRADE != ""
- ${NSD_SetState} $RB_Upgrade $TI_UPGRADE
- ${ElseIf} $TI_UPGRADE == ""
- ${AndIf} $TI_PARALLEL == ""
- ${NSD_SetState} $RB_Upgrade ${BST_CHECKED}
- ${EndIf}
- ${NSD_CreateRadioButton} 10u 85u 100% 10u "$(RB_Parallel_TypeInst_Text)"
- Pop $RB_Parallel
- ${If} $TI_PARALLEL != ""
- ${NSD_SetState} $RB_Parallel $TI_PARALLEL
- ${EndIf}
- StrCpy $GroupBox_Size 2
- ;Case 3: one newer previous installation => Option 1: Downgrade Option 2: Parallel Installation
- ${ElseIf} $MULTIPLE_INSTALLS == 1
- ${AndIf} $VERSION_OLDER == 1
- ${NSD_CreateLabel} 0 0 100% 32u "$(Label_TypeInst_Downgrade_Text)"
- Pop $Label_TypeInst_Downgrade
- ${NSD_CreateRadioButton} 10u 65u 100% 10u "$(RB_Downgrade_TypeInst_Text)"
- Pop $RB_Downgrade
- ${NSD_AddStyle} $RB_Downgrade ${WS_GROUP}
- ${If} $TI_DOWNGRADE != ""
- ${NSD_SetState} $RB_Upgrade $TI_DOWNGRADE
- ${ElseIf} $TI_DOWNGRADE == ""
- ${AndIf} $TI_PARALLEL == ""
- ${NSD_SetState} $RB_Downgrade ${BST_CHECKED}
- ${EndIf}
- ${NSD_CreateRadioButton} 10u 85u 100% 10u "$(RB_Parallel_TypeInst_Text)"
- Pop $RB_Parallel
- ${If} $TI_PARALLEL != ""
- ${NSD_SetState} $RB_Parallel $TI_PARALLEL
- ${EndIf}
- StrCpy $GroupBox_Size 2
- ;Case 4: more than one previous installation => Option 1: Parallel Installation
- ${ElseIf} $MULTIPLE_INSTALLS > 1
- ${NSD_CreateLabel} 0 0 100% 32u "$(Label_TypeInst_Parallel_Text)"
- Pop $Label_TypeInst_Parallel
- ${NSD_CreateRadioButton} 10u 65u 100% 10u "$(RB_Parallel_TypeInst_Text)"
- Pop $RB_Parallel
- ${NSD_AddStyle} $RB_Parallel ${WS_GROUP}
- ${NSD_SetState} $RB_Parallel ${BST_CHECKED}
- StrCpy $GroupBox_Size 1
- ${EndIf}
- ${If} $GroupBox_Size == 1
- ${NSD_CreateGroupBox} 0 50u 100% 35u "Install Type"
- Pop $GroupBox_TypeInst
- ${ElseIf} $GroupBox_Size == 2
- ${NSD_CreateGroupBox} 0 50u 100% 55u "Install Type"
- Pop $GroupBox_TypeInst
- ${EndIf}
- nsDialogs::Show
- FunctionEnd
- ;--------------------------------
- ;# Page_TypeInst_Leave
- Function Page_TypeInst_Leave
- ${If} $RB_Reinstall != ""
- ${NSD_GetState} $RB_Reinstall $TI_REINSTALL
- ${EndIf}
- ${If} $RB_Upgrade != ""
- ${NSD_GetState} $RB_Upgrade $TI_UPGRADE
- ${EndIf}
- ${If} $RB_Downgrade != ""
- ${NSD_GetState} $RB_Downgrade $TI_DOWNGRADE
- ${EndIf}
- ${If} $RB_Parallel != ""
- ${NSD_GetState} $RB_Parallel $TI_PARALLEL
- ${EndIf}
- StrCpy $Skip_Page_Directory ""
- ${If} $TI_REINSTALL == 1
- StrCpy $INSTALL_TYPE 1
- ${ElseIf} $TI_UPGRADE == 1
- StrCpy $INSTALL_TYPE 2
- ${ElseIf} $TI_DOWNGRADE == 1
- StrCpy $INSTALL_TYPE 3
- ${ElseIf} $TI_PARALLEL == 1
- StrCpy $INSTALL_TYPE 4
- ${EndIf}
- ${If} $INSTALL_TYPE == 1
- ${OrIf} $INSTALL_TYPE == 2
- ${OrIf} $INSTALL_TYPE == 3
- StrCpy $Skip_Page_Directory 1
- ReadRegStr $0 HKLM "$Prev_Install_RegKey" "InstallLocation"
- StrCpy $INSTDIR $0
- ${EndIf}
- ; On Upgrade or Downgrade, tentatively trim any Package Version trailer from install location
- ${If} $INSTALL_TYPE == 2
- ${OrIf} $INSTALL_TYPE == 3
- StrCpy $R1 0
- Push $INSTDIR
- Push "OpenCPN"
- Push ">"
- Call StrLoc
- Pop $0
- StrCpy $R1 $INSTDIR $0
- StrCpy $R1 "$R1OpenCPN"
- StrLen $R2 $INSTDIR
- StrLen $R3 $R1
- ; If Previous install dir was a parallel, make the upgrade also parallel.
- ${If} $R2 > $R3
- StrCpy $INSTDIR "$R1 @CPACK_PACKAGE_VERSION@"
- ${Else}
- StrCpy $INSTDIR $R1
- ${Endif}
- ${Endif}
- ${If} $INSTALL_TYPE == 4
- StrCpy $INSTDIR "$PROGRAMFILES\OpenCPN @CPACK_PACKAGE_VERSION@"
- ${EndIf}
- FunctionEnd
- ;--------------------------------
- ;# Page_Components_Pre
- Function Page_Components_Pre
- FunctionEnd
- ;--------------------------------
- ;# Page_Components_Show
- Function Page_Components_Show
- ;# change controls size and position on the Components Page
- Push $0
- Push $1
- Push $2
- Push $3
- Push $4
- Push $5
- Push $6
- Push $7
- FindWindow $mui.ComponentsPage "#32770" "" $HWNDPARENT
- ;GetDlgItem $mui.ComponentsPage.Text $mui.ComponentsPage 1006
- GetDlgItem $mui.ComponentsPage.InstTypesText $mui.ComponentsPage 1021
- ShowWindow $mui.ComponentsPage.InstTypesText ${SW_HIDE}
- GetDlgItem $mui.ComponentsPage.ComponentsText $mui.ComponentsPage 1022
- GetDlgItem $mui.ComponentsPage.InstTypes $mui.ComponentsPage 1017
- ShowWindow $mui.ComponentsPage.InstTypes ${SW_HIDE}
- GetDlgItem $mui.ComponentsPage.Components $mui.ComponentsPage 1032
- GetDlgItem $mui.ComponentsPage.DescriptionTitle $mui.ComponentsPage 1042
- GetDlgItem $mui.ComponentsPage.DescriptionText $mui.ComponentsPage 1043
- GetDlgItem $mui.ComponentsPage.SpaceRequired $mui.ComponentsPage 1023
- ShowWindow $mui.ComponentsPage.SpaceRequired ${SW_HIDE}
- Push "198"
- Push "40"
- Push "100"
- Push "100"
- Call DU2Pix
- System::Call "User32::SetWindowPos(i $mui.ComponentsPage.DescriptionTitle, i 0, i $1, i $2, i $3, i $4, i 64)" ;# 1042
- Push "203"
- Push "50"
- Push "90"
- Push "85"
- Call DU2Pix
- System::Call "User32::SetWindowPos(i $mui.ComponentsPage.DescriptionText, i 0, i $1, i $2, i $3, i $4, i 64)" ;# 1043
- Push "0"
- Push "25"
- Push "300"
- Push "15"
- Call DU2Pix
- System::Call "User32::SetWindowPos(i $mui.ComponentsPage.ComponentsText, i 0, i $1, i $2, i $3, i $4, i 64)" ;# 1022
- Push "0"
- Push "40"
- Push "195"
- Push "100"
- Call DU2Pix
- System::Call "User32::SetWindowPos(i $mui.ComponentsPage.Components, i 0, i $1, i $2, i $3, i $4, i 64)" ;# 1032
- Pop $7
- Pop $6
- Pop $5
- Pop $4
- Pop $3
- Pop $2
- Pop $1
- Pop $0
- FunctionEnd
- ;--------------------------------
- ;# Page_Components_Leave
- Function Page_Components_Leave
- ${IfNot} ${SectionIsSelected} ${SecSetConfig}
- StrCpy $Skip_Page_SetConfig 1
- ${Else}
- StrCpy $Skip_Page_SetConfig 0
- ${EndIf}
- ${IfNot} ${SectionIsSelected} ${SecShortcutStartmenu}
- StrCpy $Skip_Page_Startmenu 1
- ${Else}
- StrCpy $Skip_Page_Startmenu 0
- ${EndIf}
- FunctionEnd
- ;--------------------------------
- ;# Page_Directory_Pre
- Function Page_Directory_Pre
- ${If} $Skip_Page_Directory == 1
- Abort
- ${EndIf}
- FunctionEnd
- ;--------------------------------
- ;# Page_Directory_Leave
- Function Page_Directory_Leave
- GetInstDirError $R0
- ${If} $R0 > 0 ;# Invalid path entered
- MessageBox MB_OK|MB_ICONSTOP "$(Msg_Path_Invalid)"
- Abort
- ${EndIf}
- ${If} $INSTALL_TYPE == 4
- ${AndIf} ${FileExists} "$INSTDIR\opencpn.exe"
- MessageBox MB_OK|MB_ICONSTOP "$(Msg_Path_Installation_Exists)"
- Abort
- ${EndIf}
- FunctionEnd
- ;--------------------------------
- ;# Page_Startmenu_Pre
- Function Page_Startmenu_Pre
- ${If} $Skip_Page_Startmenu == 1
- Abort
- ${EndIf}
- ${If} $INSTALL_TYPE == 1
- ${OrIf} $INSTALL_TYPE == 2
- ${OrIf} $INSTALL_TYPE == 3
- ReadRegStr $0 HKLM "$Prev_Install_RegKey" "StartMenuFolder"
- StrCpy $STARTMENU_FOLDER $0
- ${EndIf}
- FunctionEnd
- ;--------------------------------
- /*# Page_SetConfig
- Var Label_SetConfig
- Var GroupBox_Language_SetConfig
- Var CheckBox_Language_SetConfig
- Var GroupBox_ChartDir_SetConfig
- Var DirRequest_SetConfig
- Var Button_Delete_SetConfig
- Var Button_DeleteAll_SetConfig
- Var Button_Add_SetConfig
- Var ListBox_SetConfig
- */
- Function Page_SetConfig
- ${If} $Skip_Page_SetConfig == 1
- Abort
- ${EndIf}
- !insertmacro MUI_HEADER_TEXT $(Page_SetConfig_Title) $(Page_SetConfig_Subtitle)
- nsDialogs::Create /NOUNLOAD 1018
- Pop $0
- ${If} $0 == error
- Abort
- ${EndIf}
- ${NSD_CreateLabel} 0 0 100% 16u "$(Label_SetConfig_Text)"
- Pop $Label_SetConfig
- ${NSD_CreateGroupBox} 0 20u 100% 30u "$(GB_Language_SetConfig_Text)"
- Pop $GroupBox_Language_SetConfig
- ${NSD_CreateCheckBox} 10u 35u 100% 10u "$(CB_Language_SetConfig_Text)"
- Pop $CheckBox_Language_SetConfig
- ;StrCmp $CONFIG_SET_LANG "" cont
- ${If} $CONFIG_SET_LANG == ""
- ${NSD_SetState} $CheckBox_Language_SetConfig ${BST_CHECKED}
- Goto cont
- ${EndIf}
- StrCmp $CONFIG_SET_LANG 0 0 +2
- ${NSD_SetState} $CheckBox_Language_SetConfig ${BST_UNCHECKED}
- StrCmp $CONFIG_SET_LANG 1 0 +2
- ${NSD_SetState} $CheckBox_Language_SetConfig ${BST_CHECKED}
- cont:
- ${NSD_CreateGroupBox} 0 55u 100% 85u "$(GB_ChartDir_SetConfig_Text)"
- Pop $GroupBox_ChartDir_SetConfig
- ${NSD_CreateButton} 220u 70u 60u 15u "$(BT_Delete_SetConfig_Text)"
- Pop $Button_Delete_SetConfig
- GetFunctionAddress $0 Button_Delete_SetConfig_Click
- nsDialogs::OnClick /NOUNLOAD $Button_Delete_SetConfig $0
- ${NSD_CreateButton} 220u 88u 60u 15u "$(BT_DeleteAll_SetConfig_Text)"
- Pop $Button_DeleteAll_SetConfig
- GetFunctionAddress $0 Button_DeleteAll_SetConfig_Click
- nsDialogs::OnClick /NOUNLOAD $Button_DeleteAll_SetConfig $0
- ${NSD_CreateButton} 220u 115u 60u 15u "$(BT_Browse_SetConfig_Text)"
- Pop $Button_Add_SetConfig
- GetFunctionAddress $0 Button_Add_SetConfig_Click
- nsDialogs::OnClick /NOUNLOAD $Button_Add_SetConfig $0
- ${NSD_CreateListBox} 10u 70u 200u 60u $(LB_SetConfig)
- Pop $ListBox_SetConfig
- GetFunctionAddress $0 ListBox_SetConfig_Change
- nsDialogs::OnChange /NOUNLOAD $ListBox_SetConfig $0
- ${IfNot} $CHART_DIR_EMPTY == 1
- SetShellVarContext all
- ${If} ${FileExists} "$TEMP\opencpn_chart_dirs.tmp"
- ClearErrors
- FileOpen $R0 "$TEMP\opencpn_chart_dirs.tmp" r
- IfErrors end
- loop:
- ClearErrors
- FileReadUTF16LE $R0 $1
- IfErrors end
- ${TrimNewLines} $1 $1
- SendMessage $ListBox_SetConfig ${LB_ADDSTRING} 0 "STR:$1"
- Goto loop
- end:
- FileClose $R0
- ${ElseIf} $INI_EXISTS == 1
- StrCpy $R2 0
- loop2:
- IntOp $R2 $R2 + 1
- ReadINIStr $R1 "$APPDATA\@CPACK_NSIS_PACKAGE_NAME_LC@\opencpn.ini" "ChartDirectories" "ChartDir$R2"
- StrCmp $R1 "" cont2
- ${WordReplace} "$R1" "\\" "\" "+" $R3
- ${Explode} $R4 "^" "$R3"
- Pop $R5
- StrCmp $R5 "" cont2
- SendMessage $ListBox_SetConfig ${LB_ADDSTRING} 0 "STR:$R5"
- Goto loop2
- ${Else}
- ReadRegStr $0 HKLM "Software\OpenCPN" "ChartDirs"
- StrCmp $0 "" cont2
- ${Explode} $3 ";" "$0"
- ${For} $1 1 $3
- Pop $2
- ${TrimNewLines} $2 $2
- SendMessage $ListBox_SetConfig ${LB_ADDSTRING} 0 "STR:$2"
- ${Next}
- ${EndIf}
- ${EndIf}
- cont2:
- Call ListBox_SetConfig_Change
- nsDialogs::Show
- FunctionEnd
- Function Button_Delete_SetConfig_Click
- SendMessage $ListBox_SetConfig ${LB_GETCURSEL} 0 0 $0
- SendMessage $ListBox_SetConfig ${LB_DELETESTRING} $0 0
- Call ListBox_SetConfig_Change
- FunctionEnd
- Function Button_DeleteAll_SetConfig_Click
- SendMessage $ListBox_SetConfig ${LB_RESETCONTENT} 0 0
- Call ListBox_SetConfig_Change
- FunctionEnd
- Function Button_Add_SetConfig_Click
- Var /GLOBAL Initial_Dir
- StrCmp $Initial_Dir "" 0 +3
- SetShellVarContext all
- StrCpy $Initial_Dir "$DOCUMENTS"
- nsDialogs::SelectFolderDialog /NOUNLOAD "$(Select_Chart_Directory)" "$Initial_Dir"
- Pop $0
- ${If} $0 == error
- Abort
- ${EndIf}
- StrCpy $Initial_Dir $0
- ${NSD_LB_GetCount} $ListBox_SetConfig $2
- ${If} $2 > 0
- SendMessage $ListBox_SetConfig ${LB_FINDSTRINGEXACT} -1 "STR:$0" $6
- ${IfNot} $6 < 0
- Goto end
- ${EndIf}
- ${EndIf}
- SendMessage $ListBox_SetConfig ${LB_ADDSTRING} 0 "STR:$0"
- end:
- Call ListBox_SetConfig_Change
- FunctionEnd
- Function ListBox_SetConfig_Change
- ${NSD_LB_GetCount} $ListBox_SetConfig $0
- ${If} $0 > 0
- StrCpy $CHART_DIR_EMPTY 0
- ${NSD_LB_GetSelection} $ListBox_SetConfig $1
- ${If} $1 != ""
- EnableWindow $Button_Delete_SetConfig 1
- ${Else}
- EnableWindow $Button_Delete_SetConfig 0
- ${EndIf}
- EnableWindow $Button_DeleteAll_SetConfig 1
- ${Else}
- EnableWindow $Button_Delete_SetConfig 0
- EnableWindow $Button_DeleteAll_SetConfig 0
- StrCpy $CHART_DIR_EMPTY 1
- ${EndIf}
- FunctionEnd
- ;--------------------------------
- /*# Page_SetConfig_Leave
- Var CHART_DIR_TMP_FILE
- */
- Function Page_SetConfig_Leave
- ${NSD_LB_GetCount} $ListBox_SetConfig $0
- ${If} $0 > 0
- ClearErrors
- FileOpen $R0 "$TEMP\opencpn_chart_dirs.tmp" w
- IfErrors done
- IntOp $0 $0 - 1
- ${For} $1 0 $0
- SendMessage $ListBox_SetConfig ${LB_SETCURSEL} $1 0
- System::Call "User32::SendMessage(i $ListBox_SetConfig, i ${LB_GETTEXT}, i $1, t .r2)"
- FileWriteUTF16LE $R0 $2
- FileWriteUTF16LE $R0 "$\r$\n"
- ${Next}
- FileClose $R0
- StrCpy $CHART_DIR_TMP_FILE 1
- ${Else}
- StrCpy $CHART_DIR_EMPTY 1
- ${EndIf}
- done:
- ${NSD_GetState} $CheckBox_Language_SetConfig $0
- ${If} $0 == ${BST_CHECKED}
- StrCpy $CONFIG_SET_LANG 1
- ${Else}
- StrCpy $CONFIG_SET_LANG 0
- ${EndIf}
- FunctionEnd
- ;--------------------------------
- ;# Page_Confirm
- Var Install_Options
- Var TEXT_INSTALL_OPTIONS
- Function Page_Confirm
- !insertmacro MUI_HEADER_TEXT $(Page_Confirm_Title) $(Page_Confirm_Subtitle)
- ;# gather all installation settings and prepare (string) variable '$Install_Options' to display
- ;# add the installation type to '$Install_Options'
- StrCpy $Install_Options "$(Installation_Type):$\r$\n"
- ${If} $Skip_Page_TypeInst != 1
- ${Switch} $INSTALL_TYPE
- ${Case} 1
- StrCpy $Install_Options "$Install_Options$\t$(Type_Reinstall)"
- ${Break}
- ${Case} 2
- StrCpy $Install_Options "$Install_Options$\t$(Type_Upgrade)"
- ${Break}
- ${Case} 3
- StrCpy $Install_Options "$Install_Options$\t$(Type_Downgrade)"
- ${Break}
- ${Case} 4
- StrCpy $Install_Options "$Install_Options$\t$(Type_Parallel_Installation)"
- ${Break}
- ${Default}
- ${Break}
- ${EndSwitch}
- ${Else}
- StrCpy $Install_Options "$Install_Options$\t$(Type_Fresh_Installation)"
- ${EndIf}
- ;# add the installation directory to '$Install_Options'
- StrCpy $Install_Options "$Install_Options$\r$\n$\r$\n$(Installation_Directory):$\r$\n$\t$INSTDIR"
- ;# add the delete config settings to '$Install_Options'
- ${If} $CONFIG_EXISTS == 1
- ${AndIf} $CONFIG_EMPTY != 1
- StrCpy $Install_Options "$Install_Options$\r$\n$\r$\n$(Installation_Delete_Config):"
- SectionGetFlags ${SecGrpResetConfig} $0
- SectionGetFlags ${SecGrpResetConfig} $1
- IntOp $0 $0 & ${SF_SELECTED}
- IntOp $1 $1 & ${SF_PSELECTED}
- StrCmp $0 0 +3 0
- StrCpy $Install_Options "$Install_Options$\r$\n$\t$(SecGrpResetConfig_Text)"
- Goto cont
- StrCmp $1 0 none_selected 0
- SectionGetFlags ${SecDeleteConfigFile} $0
- IntOp $0 $0 & ${SF_SELECTED}
- StrCmp $0 0 +2 0
- StrCpy $Install_Options "$Install_Options$\r$\n$\t$(SecDeleteConfigFile_Text)"
- SectionGetFlags ${SecDeleteChartDB} $0
- IntOp $0 $0 & ${SF_SELECTED}
- StrCmp $0 0 +2 0
- StrCpy $Install_Options "$Install_Options$\r$\n$\t$(SecDeleteChartDB_Text)"
- SectionGetFlags ${SecDeleteSENC} $0
- IntOp $0 $0 & ${SF_SELECTED}
- StrCmp $0 0 +2 0
- StrCpy $Install_Options "$Install_Options$\r$\n$\t$(SecDeleteSENC_Text)"
- SectionGetFlags ${SecDeleteCM93} $0
- IntOp $0 $0 & ${SF_SELECTED}
- StrCmp $0 0 +2 0
- StrCpy $Install_Options "$Install_Options$\r$\n$\t$(SecDeleteCM93_Text)"
- SectionGetFlags ${SecDeleteNavobjFile} $0
- IntOp $0 $0 & ${SF_SELECTED}
- StrCmp $0 0 +2 0
- StrCpy $Install_Options "$Install_Options$\r$\n$\t$(SecDeleteNavobjFile_Text)"
- SectionGetFlags ${SecDeleteLogFile} $0
- IntOp $0 $0 & ${SF_SELECTED}
- StrCmp $0 0 +2 0
- StrCpy $Install_Options "$Install_Options$\r$\n$\t$(SecDeleteLogFile_Text)"
- Goto cont
- none_selected:
- StrCpy $Install_Options "$Install_Options$\r$\n$\t$(text_none)"
- cont:
- ${EndIf}
- ;# add the shortcut settings to '$Install_Options'
- StrCpy $Install_Options "$Install_Options$\r$\n$\r$\n$(Create_Shortcuts):"
- SectionGetFlags ${SecShortcutStartmenu} $0
- IntOp $0 $0 & ${SF_SELECTED}
- ${If} $0 != 0
- StrCpy $Install_Options "$Install_Options$\r$\n$\t$(Create_Shortcut_Start_Menu): $STARTMENU_FOLDER"
- StrCpy $2 1
- ${Else}
- StrCpy $2 0
- ${EndIf}
- SectionGetFlags ${SecShortcutDesktop} $0
- IntOp $0 $0 & ${SF_SELECTED}
- ${If} $0 != 0
- StrCpy $Install_Options "$Install_Options$\r$\n$\t$(Create_Shortcut_Desktop): $DESKTOP"
- ${Else}
- StrCmp $2 0 0 +2
- StrCpy $Install_Options "$Install_Options$\r$\n$\t$(text_none)"
- ${EndIf}
- ;# add the pre-config settings to '$Install_Options'
- ${IfNot} ${SectionIsReadOnly} ${SecSetConfig}
- ${AndIf} ${SectionIsSelected} ${SecSetConfig}
- StrCpy $Install_Options "$Install_Options$\r$\n$\r$\n$(SecSetConfig_Text):"
- StrCmp $CONFIG_SET_LANG 1 0 +2
- StrCpy $Install_Options "$Install_Options$\r$\n$\t$(CB_Language_SetConfig_Text)"
- StrCmp $CHART_DIR_TMP_FILE 1 0 end
- IfFileExists "$TEMP\opencpn_chart_dirs.tmp" 0 end
- StrCpy $Install_Options "$Install_Options$\r$\n$\t$(GB_ChartDir_SetConfig_Text)"
- ClearErrors
- FileOpen $0 "$TEMP\opencpn_chart_dirs.tmp" r
- IfErrors end
- ${Do}
- FileReadUTF16LE $0 $1
- IfErrors done
- ${TrimNewLines} $1 $1
- StrCmp $1 "" +2
- StrCpy $Install_Options "$Install_Options$\r$\n$\t - $1"
- ${Loop}
- done:
- FileClose $0
- end:
- ${EndIf}
- ;# end '$Install_Options'
- nsDialogs::Create /NOUNLOAD 1018
- Pop $0
- ${If} $0 == error
- Abort
- ${EndIf}
- nsDialogs::CreateControl EDIT "${__NSD_Text_STYLE}|${WS_VSCROLL}|${WS_HSCROLL}|${ES_MULTILINE}|${ES_WANTRETURN}|${ES_READONLY}" "${__NSD_Text_EXSTYLE}" 0 0 100% 100% "$Install_Options"
- Pop $TEXT_INSTALL_OPTIONS
- nsDialogs::Show
- FunctionEnd
- ;# Page_Instfiles_Show
- Function Page_Instfiles_Show
- w7tbp::Start
- FunctionEnd
- ;--------------------------------
- ;##################################################################################################
- ;# General Installer Functions #
- ;##################################################################################################
- Function GetAllUsers
- ReadRegStr $0 HKLM "System\CurrentControlSet\Control\ComputerName\ActiveComputerName" "ComputerName"
- System::Call 'netapi32::NetUserEnum(w "\\$0",i 0,i 2,*i .R0,i ${NSIS_MAX_STRLEN}, *i .R1,*i .R2,*i .r1)i .r2'
- StrCpy $R8 $R0
- IntOp $R2 $R2 - 1
- ${ForEach} $9 0 $R2 + 1
- System::Call "*$R0(w.R9)"
- MessageBox MB_OK "[$R9]"
- IntOp $R0 $R0 + 4
- ${Next}
- System::Call 'netapi32.dll::NetApiBufferFree(i R8)i .R1'
- FunctionEnd
- Function Hide_SecGrpResetConfig
- Push $0
- !insertmacro ClearSectionFlag ${SecDeleteConfigFile} ${SF_SELECTED}
- SectionSetText ${SecDeleteConfigFile} ""
- !insertmacro ClearSectionFlag ${SecDeleteChartDB} ${SF_SELECTED}
- SectionSetText ${SecDeleteChartDB} ""
- !insertmacro ClearSectionFlag ${SecDeleteSENC} ${SF_SELECTED}
- SectionSetText ${SecDeleteSENC} ""
- !insertmacro ClearSectionFlag ${SecDeleteCM93} ${SF_SELECTED}
- SectionSetText ${SecDeleteCM93} ""
- !insertmacro ClearSectionFlag ${SecDeleteNavobjFile} ${SF_SELECTED}
- SectionSetText ${SecDeleteNavobjFile} ""
- !insertmacro ClearSectionFlag ${SecDeleteLogFile} ${SF_SELECTED}
- SectionSetText ${SecDeleteLogFile} ""
- !insertmacro ClearSectionFlag ${SecGrpResetConfig} ${SF_SECGRP}
- !insertmacro ClearSectionFlag ${SecGrpResetConfig} ${SF_SELECTED}
- SectionSetFlags ${SecGrpResetConfig} 0
- SectionSetText ${SecGrpResetConfig} ""
- IntOp $0 ${SecDeleteLogFile} + 1
- !insertmacro ClearSectionFlag $0 ${SF_SECGRPEND}
- SectionSetText $0 ""
- Pop $0
- FunctionEnd
- Function Check_Config_Exists
- ;# Look for config dir ("%APPDATA%\opencpn) and the several config files
- SetShellVarContext all
- ${IfNot} ${FileExists} "$APPDATA\@CPACK_NSIS_PACKAGE_NAME_LC@\*.*"
- ${If} ${FileExists} "$USERS_APPDATA\@CPACK_NSIS_PACKAGE_NAME_LC@\*.*"
- CreateDirectory "$APPDATA\@CPACK_NSIS_PACKAGE_NAME_LC@"
- Sleep 250
- AccessControl::GrantOnFile "$APPDATA\@CPACK_NSIS_PACKAGE_NAME_LC@" "(BU)" "GenericRead + GenericExecute + GenericWrite + Delete + FullAccess"
- CopyFiles /SILENT "$USERS_APPDATA\@CPACK_NSIS_PACKAGE_NAME_LC@\*.*" "$APPDATA\@CPACK_NSIS_PACKAGE_NAME_LC@"
- ${ElseIf} ${FileExists} "$ADMIN_APPDATA\@CPACK_NSIS_PACKAGE_NAME_LC@\*.*"
- CreateDirectory "$APPDATA\@CPACK_NSIS_PACKAGE_NAME_LC@"
- Sleep 250
- AccessControl::GrantOnFile "$APPDATA\@CPACK_NSIS_PACKAGE_NAME_LC@" "(BU)" "GenericRead + GenericExecute + GenericWrite + Delete + FullAccess"
- CopyFiles /SILENT "$ADMIN_APPDATA\@CPACK_NSIS_PACKAGE_NAME_LC@\*.*" "$APPDATA\@CPACK_NSIS_PACKAGE_NAME_LC@"
- ${EndIf}
- ${If} ${FileExists} "$APPDATA\@CPACK_NSIS_PACKAGE_NAME_LC@\opencpn.ini"
- DeleteINISec "$APPDATA\@CPACK_NSIS_PACKAGE_NAME_LC@\opencpn.ini" Directories
- ${EndIf}
- ${EndIf}
- ${If} ${FileExists} "$APPDATA\@CPACK_NSIS_PACKAGE_NAME_LC@\*.*"
- StrCpy $CONFIG_EXISTS 1
- SectionSetText ${SecGrpResetConfig} $(SecGrpResetConfig_Text)
- ${EndIf}
- StrCpy $Count_SecGrpResetConfig 0
- ${If} $CONFIG_EXISTS == 1
- ${If} ${FileExists} "$APPDATA\@CPACK_NSIS_PACKAGE_NAME_LC@\opencpn.ini"
- StrCpy $INI_EXISTS 1
- IntOp $Count_SecGrpResetConfig $Count_SecGrpResetConfig + 1
- SectionSetText ${SecDeleteConfigFile} $(SecDeleteConfigFile_Text)
- ${Else}
- !insertmacro ClearSectionFlag ${SecDeleteConfigFile} ${SF_SELECTED}
- SectionSetText ${SecDeleteConfigFile} ""
- ${EndIf}
- ${If} ${FileExists} "$APPDATA\@CPACK_NSIS_PACKAGE_NAME_LC@\CHRTLIST.DAT"
- StrCpy $CHARTDB_EXISTS 1
- IntOp $Count_SecGrpResetConfig $Count_SecGrpResetConfig + 1
- SectionSetText ${SecDeleteChartDB} $(SecDeleteChartDB_Text)
- ${Else}
- !insertmacro ClearSectionFlag ${SecDeleteChartDB} ${SF_SELECTED}
- SectionSetText ${SecDeleteChartDB} ""
- ${EndIf}
- ${If} ${FileExists} "$APPDATA\@CPACK_NSIS_PACKAGE_NAME_LC@\SENC\*.*"
- StrCpy $SENC_EXISTS 1
- IntOp $Count_SecGrpResetConfig $Count_SecGrpResetConfig + 1
- SectionSetText ${SecDeleteSENC} $(SecDeleteSENC_Text)
- ${Else}
- !insertmacro ClearSectionFlag ${SecDeleteSENC} ${SF_SELECTED}
- SectionSetText ${SecDeleteSENC} ""
- ${EndIf}
- ${If} ${FileExists} "$APPDATA\@CPACK_NSIS_PACKAGE_NAME_LC@\cm93\*.*"
- StrCpy $CM93_EXISTS 1
- IntOp $Count_SecGrpResetConfig $Count_SecGrpResetConfig + 1
- SectionSetText ${SecDeleteCM93} $(SecDeleteCM93_Text)
- ${Else}
- !insertmacro ClearSectionFlag ${SecDeleteCM93} ${SF_SELECTED}
- SectionSetText ${SecDeleteCM93} ""
- ${EndIf}
- ${If} ${FileExists} "$APPDATA\@CPACK_NSIS_PACKAGE_NAME_LC@\navobj.xml"
- StrCpy $NAVOBJ_EXISTS 1
- IntOp $Count_SecGrpResetConfig $Count_SecGrpResetConfig + 1
- SectionSetText ${SecDeleteNavobjFile} $(SecDeleteNavobjFile_Text)
- ${Else}
- !insertmacro ClearSectionFlag ${SecDeleteNavobjFile} ${SF_SELECTED}
- SectionSetText ${SecDeleteNavobjFile} ""
- ${EndIf}
- ${If} ${FileExists} "$APPDATA\@CPACK_NSIS_PACKAGE_NAME_LC@\opencpn.log"
- StrCpy $LOG_EXISTS 1
- IntOp $Count_SecGrpResetConfig $Count_SecGrpResetConfig + 1
- SectionSetText ${SecDeleteLogFile} $(SecDeleteLogFile_Text)
- ${Else}
- !insertmacro ClearSectionFlag ${SecDeleteLogFile} ${SF_SELECTED}
- SectionSetText ${SecDeleteLogFile} ""
- ${EndIf}
- ${If} $Count_SecGrpResetConfig == 0
- StrCpy $CONFIG_EMPTY 1
- ${EndIf}
- !insertmacro ClearSectionFlag ${SecSetConfig} ${SF_SELECTED}
- IntOp $0 ${SF_RO} | ${SF_BOLD}
- SectionSetFlags ${SecSetConfig} $0
- ;SectionSetFlags ${SecSetConfig} ${SF_RO}
- StrCpy $SetConfig 0
- ${EndIf}
- FunctionEnd
- Function Reg_Scan_Old_Versions_HKLM
- ;# Registry look-up
- ;# Versions prior to 2.2.727 write RegKey "OpenCPN_is1" to "HKLM\Software\Microsoft\Windows\CurrentVersion\Uninstall"
- ReadRegStr $0 HKLM Software\Microsoft\Windows\CurrentVersion\Uninstall\OpenCPN_is1 "DisplayName"
- ${If} $0 != ""
- ${StrFilter} "$0" "31" "." " " $1
- StrCpy $LM_VERSION "$1"
- ReadRegStr $0 HKLM Software\Microsoft\Windows\CurrentVersion\Uninstall\OpenCPN_is1 "UninstallString"
- ${StrFilter} "$0" "" "" "$\"" $2
- ${If} ${FileExists} "$2"
- ReadRegStr $0 HKLM Software\Microsoft\Windows\CurrentVersion\Uninstall\OpenCPN_is1 "QuietUninstallString"
- ${StrFilter} "$0" "" "" "$\"" $3
- StrCpy $LM_VERSION_UNINST $3
- ReadRegStr $4 HKLM Software\Microsoft\Windows\CurrentVersion\Uninstall\OpenCPN_is1 "InstallLocation"
- ${TrimNewLines} $4 $4
- ${If} ${FileExists} "$4opencpn.exe"
- ${AndIf} ${FileExists} "$4unins*.exe"
- ;# check if last character of $4 is a "\" and if so remove it
- ${RIndexOf} $6 "$4" "\"
- ${If} $6 == 1
- ${WordReplace} "$4" "\" "" "-1" $4
- ${EndIf}
- StrCpy $LM_VERSION_INST $4
- IntOp $OLD_INSTALLS $OLD_INSTALLS + 1
- ;StrCpy $VERSION_NEWER 1
- ${Else}
- DeleteRegKey HKLM "Software\Microsoft\Windows\CurrentVersion\Uninstall\OpenCPN_is1"
- StrCpy $LM_VERSION ""
- StrCpy $LM_VERSION_UNINST ""
- ${EndIf}
- ${EndIf}
- ${EndIf}
- FunctionEnd
- Function EnumProfileList
- ${EnumHKU} Callback_EnumProfileList opencpn-inst-tmp-sid
- FunctionEnd
- Function Callback_EnumProfileList
- ;# Get the SID or tmpkey from the stack
- Pop $SID
- ClearErrors
- ${If} ${FileExists} "$TEMP\opencpn_users_sid.tmp"
- FileOpen $R0 "$TEMP\opencpn_users_sid.tmp" a
- FileSeek $R0 0 END
- ${Else}
- FileOpen $R0 "$TEMP\opencpn_users_sid.tmp" w
- ${EndIf}
- IfErrors done
- FileWriteUTF16LE $R0 "$SID"
- FileWriteUTF16LE $R0 "$\r$\n"
- FileWriteUTF16LE $R0 "$USERPROFILE"
- FileWriteUTF16LE $R0 "$\r$\n"
- FileClose $R0
- done:
- FunctionEnd
- Function Get_Users_Values
- Var /GLOBAL tmp_file_handle
- StrCpy $SID ""
- ClearErrors
- ${If} ${FileExists} "$TEMP\opencpn_users_sid.tmp"
- FileOpen $tmp_file_handle "$TEMP\opencpn_users_sid.tmp" r
- IfErrors end
- ${Do}
- FileReadUTF16LE $tmp_file_handle $SID
- FileReadUTF16LE $tmp_file_handle $USERPROFILE
- StrCmp $SID "" done
- ${TrimNewLines} $SID $SID
- ${TrimNewLines} $USERPROFILE $USERPROFILE
- ;# List of functions to call
- Call Users_Appdata_Paths
- Call Users_StartMenu_Paths
- Call Users_Desktop_Paths
- Call Users_Personal_Paths
- Call Reg_Scan_Old_Versions_HKCU
- ${Loop}
- done:
- FileClose $tmp_file_handle
- StrCpy $SID ""
- StrCpy $USERPROFILE ""
- ${EndIf}
- end:
- FunctionEnd
- Function Users_Appdata_Paths
- ReadRegStr $1 HKU "$SID\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders" AppData
- ${WordReplace} "$1" "%USERPROFILE%" "$USERPROFILE" "+" $2
- ExpandEnvStrings $2 $2
- StrCmp $2 "" done
- StrCpy $5 "none"
- ;# check if an OpenCPN config folder exists in the given path
- ${If} ${FileExists} "$2\@CPACK_NSIS_PACKAGE_NAME_LC@\opencpn.ini"
- ReadINIStr $3 "$2\@CPACK_NSIS_PACKAGE_NAME_LC@\opencpn.ini" Directories S57DataLocation
- ${WordReplace} "$3" "\\" "\" "+" $4
- ${WordFind} "$4" "\" "-2{*" $5
- StrCmp $5 "" 0 +2
- StrCpy $5 "none"
- ${EndIf}
- ClearErrors
- ${If} ${FileExists} "$TEMP\opencpn_appdata.tmp"
- FileOpen $R0 "$TEMP\opencpn_appdata.tmp" a
- FileSeek $R0 0 END
- ${Else}
- FileOpen $R0 "$TEMP\opencpn_appdata.tmp" w
- ${EndIf}
- IfErrors done
- FileWriteUTF16LE $R0 "$SID"
- FileWriteUTF16LE $R0 "$\r$\n"
- FileWriteUTF16LE $R0 "$2"
- FileWriteUTF16LE $R0 "$\r$\n"
- FileWriteUTF16LE $R0 "$5"
- FileWriteUTF16LE $R0 "$\r$\n"
- FileClose $R0
- done:
- FunctionEnd
- Function Users_Personal_Paths
- ReadRegStr $1 HKU "$SID\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders" Personal
- ${WordReplace} "$1" "%USERPROFILE%" "$USERPROFILE" "+" $2
- ExpandEnvStrings $2 $2
- ClearErrors
- ${If} ${FileExists} "$TEMP\opencpn_personal.tmp"
- FileOpen $R0 "$TEMP\opencpn_personal.tmp" a
- IfErrors done
- FileSeek $R0 0 END
- ${Else}
- FileOpen $R0 "$TEMP\opencpn_personal.tmp" w
- IfErrors done
- ${EndIf}
- FileWriteUTF16LE $R0 "$SID"
- FileWriteUTF16LE $R0 "$\r$\n"
- FileWriteUTF16LE $R0 "$2"
- FileWriteUTF16LE $R0 "$\r$\n"
- FileClose $R0
- done:
- FunctionEnd
- Function Users_StartMenu_Paths
- ReadRegStr $1 HKU "$SID\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders" "Start Menu"
- ${WordReplace} "$1" "%USERPROFILE%" "$USERPROFILE" "+" $2
- ExpandEnvStrings $2 $2
- ClearErrors
- ${If} ${FileExists} "$TEMP\opencpn_startmenu.tmp"
- FileOpen $R0 "$TEMP\opencpn_startmenu.tmp" a
- FileSeek $R0 0 END
- ${Else}
- FileOpen $R0 "$TEMP\opencpn_startmenu.tmp" w
- ${EndIf}
- IfErrors done
- FileWriteUTF16LE $R0 "$SID"
- FileWriteUTF16LE $R0 "$\r$\n"
- FileWriteUTF16LE $R0 "$2"
- FileWriteUTF16LE $R0 "$\r$\n"
- FileClose $R0
- done:
- FunctionEnd
- Function Users_Desktop_Paths
- ReadRegStr $1 HKU "$SID\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders" Desktop
- ${WordReplace} "$1" "%USERPROFILE%" "$USERPROFILE" "+" $2
- ExpandEnvStrings $2 $2
- ClearErrors
- ${If} ${FileExists} "$TEMP\opencpn_desktop.tmp"
- FileOpen $R0 "$TEMP\opencpn_desktop.tmp" a
- FileSeek $R0 0 END
- ${Else}
- FileOpen $R0 "$TEMP\opencpn_desktop.tmp" w
- ${EndIf}
- IfErrors done
- FileWriteUTF16LE $R0 "$SID"
- FileWriteUTF16LE $R0 "$\r$\n"
- FileWriteUTF16LE $R0 "$2"
- FileWriteUTF16LE $R0 "$\r$\n"
- FileClose $R0
- done:
- FunctionEnd
- ;Var latest_version
- ;Var latest_pathexe
- Function Reg_Scan_Old_Versions_HKCU
- ;# Versions from 2.2.727 up to 2.2.xxxx write RegKey "OpenCPN" to "HKCU\Software\Microsoft\Windows\CurrentVersion\Uninstall\"
- ;# and also RegKey "OpenCPN <version>" to "HKCU\Software\opencpn.org\"
- ;# Find latest installed version => it's the one found in "HKCU\Software\Microsoft\Windows\CurrentVersion\Uninstall\OpenCPN"
- ReadRegStr $0 HKU "$SID\Software\Microsoft\Windows\CurrentVersion\Uninstall\OpenCPN" "DisplayVersion"
- ${If} $0 != ""
- StrCpy $latest_version $0
- ReadRegStr $0 HKU "$SID\Software\Microsoft\Windows\CurrentVersion\Uninstall\OpenCPN" "DisplayIcon"
- StrCpy $latest_pathexe $0
- ReadRegStr $0 HKU "$SID\Software\Microsoft\Windows\CurrentVersion\Uninstall\OpenCPN" "UninstallString"
- ;StrCpy $CU_VERSION_UNINST $0
- ${WordFind} "$0" "\" "-2{*" $1
- ${If} ${FileExists} "$1\opencpn.exe"
- ${AndIf} ${FileExists} "$1\unins*.exe"
- ClearErrors
- ${If} ${FileExists} "$TEMP\opencpn_old_uninstall_regkeys.tmp"
- FileOpen $R0 "$TEMP\opencpn_old_uninstall_regkeys.tmp" a
- FileSeek $R0 0 END
- ${Else}
- FileOpen $R0 "$TEMP\opencpn_old_uninstall_regkeys.tmp" w
- ${EndIf}
- IfErrors done
- FileWriteUTF16LE $R0 "$SID$\r$\n"
- FileWriteUTF16LE $R0 "$SID\Software\Microsoft\Windows\CurrentVersion\Uninstall\OpenCPN$\r$\n"
- FileWriteUTF16LE $R0 "$1$\r$\n"
- FileClose $R0
- ${Else}
- DeleteRegKey HKU "$SID\Software\Microsoft\Windows\CurrentVersion\Uninstall\OpenCPN"
- ${EndIf}
- ${EndIf}
- done:
- ClearErrors
- ${Do}
- Pop $0
- IfErrors empty
- ${Loop}
- empty:
- StrCpy $0 0
- StrCpy $1 ""
- ${Do}
- EnumRegKey $1 HKU "$SID\Software\opencpn.org" $0
- StrCmp $1 "" done1
- IntOp $0 $0 + 1
- Push $1
- ${Loop}
- done1:
- ${If} $0 > 0
- ClearErrors
- ${If} ${FileExists} "$TEMP\opencpn_old_installs.tmp"
- FileOpen $R0 "$TEMP\opencpn_old_installs.tmp" a
- FileSeek $R0 0 END
- ${Else}
- FileOpen $R0 "$TEMP\opencpn_old_installs.tmp" w
- ${EndIf}
- IfErrors done2
- ${Do}
- Pop $R1
- IfErrors finished
- ${StrFilter} "$R1" "31" "." " " $R2 ;# R2 = version
- ;StrCpy $CU_VERSION $R2
- ReadRegStr $R3 HKU "$SID\Software\opencpn.org\$R1" "" ;# R3 = install path
- ReadRegStr $R4 HKU "$SID\Software\opencpn.org\$R1" "Start Menu Folder" ;# R4 = Start Menu Folder
- ReadRegStr $R5 HKU "$SID\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders" "Start Menu" ;# R5 = Start Menu Path
- ${WordReplace} "$R5" "%USERPROFILE%" "$USERPROFILE" "+" $R5
- ExpandEnvStrings $R5 $R5
- ;StrCpy $CU_VERSION_INST "$R3\"
- ${If} "$R3\opencpn.exe" == $latest_pathexe
- ${AndIf} $R2 != $latest_version
- DeleteRegKey HKU "$SID\Software\opencpn.org\$R1"
- ${ElseIf} ${FileExists} "$R3\opencpn.exe"
- ${AndIf} ${FileExists} "$R3\unins*.exe"
- FileWriteUTF16LE $R0 "$SID\Software\opencpn.org\$R1"
- FileWriteUTF16LE $R0 "$\r$\n"
- FileWriteUTF16LE $R0 "$R5\$R4"
- FileWriteUTF16LE $R0 "$\r$\n"
- FileWriteUTF16LE $R0 "$R3"
- FileWriteUTF16LE $R0 "$\r$\n"
- IntOp $OLD_INSTALLS $OLD_INSTALLS + 1
- ;StrCpy $VERSION_NEWER 1
- ${Else}
- DeleteRegKey HKU "$SID\Software\opencpn.org\$R1"
- DeleteRegKey /ifempty HKU "$SID\Software\opencpn.org"
- ${EndIf}
- ${Loop}
- finished:
- FileClose $R0
- ${Else}
- DeleteRegKey HKU "$SID\Software\opencpn.org"
- ${EndIf}
- done2:
- StrCpy $latest_version ""
- StrCpy $latest_pathexe ""
- FunctionEnd
- Function Quick_Scan_Old_Versions
- ;# Scan the given Drive for file "opencpn.exe"
- ${If} ${FileExists} "$TEMP\opencpn_personal.tmp"
- ClearErrors
- FileOpen $R0 "$TEMP\opencpn_personal.tmp" r
- IfErrors end
- ${Do}
- FileReadUTF16LE $R0 $R1
- FileReadUTF16LE $R0 $R2
- IfErrors done
- StrCmp $R2 "" done
- ${TrimNewLines} $R2 $R2
- ${Locate} "$R2" "/L=F /M=opencpn.exe" "Found_OpenCPN_Installation"
- ${Loop}
- done:
- FileClose $R0
- ${EndIf}
- end:
- ${Locate} "$PROGRAMFILES" "/L=F /M=opencpn.exe" "Found_OpenCPN_Installation"
- FunctionEnd
- Function Found_OpenCPN_Installation
- Push $R0
- Push $R1
- ${If} ${FileExists} "$R8\unins*.exe"
- ${If} ${FileExists} "$TEMP\opencpn_prev_installs.tmp"
- ClearErrors
- FileOpen $R1 "$TEMP\opencpn_prev_installs.tmp" r
- IfErrors cont
- ${Do}
- FileReadUTF16LE $R1 $R2
- FileReadUTF16LE $R1 $R3
- StrCmp $R2 "" done
- ${TrimNewLines} $R2 $R2
- ${TrimNewLines} $R3 $R3
- StrCmp $R3 $R8 found
- ${LoopUntil} $R2 == ""
- done:
- FileClose $R1
- Goto cont
- found:
- FileClose $R1
- Goto end
- ${EndIf}
- cont:
- IntOp $counter_tmp $counter_tmp + 1
- ClearErrors
- ${IfNot} ${FileExists} "$TEMP\opencpn_hdd_quick_scan.tmp"
- FileOpen $R0 "$TEMP\opencpn_hdd_quick_scan.tmp" w
- IfErrors end
- ${Else}
- FileOpen $R0 "$TEMP\opencpn_hdd_quick_scan.tmp" a
- IfErrors end
- FileSeek $R0 0 END
- ${EndIf}
- FileWriteUTF16LE $R0 "$R8"
- FileWriteUTF16LE $R0 "$\r$\n"
- FileClose $R0
- ${EndIf}
- end:
- Pop $R1
- Pop $R0
- Push $0
- FunctionEnd
- ;Var counter_tmp
- Function Full_Scan_Old_Versions
- ;# Get all HDD Drive Letters on the system
- StrCpy $counter_tmp 0
- ${GetDrives} "HDD" "Scan_Drive"
- FunctionEnd
- Function Scan_Drive
- ;# Scan the given Drive for file "opencpn.exe"
- /*;#DEBUG - scan only crtain drives
- ${IfNot} $9 == "D:\"
- ;${AndIfNot} $9 == "F:\"
- Goto end
- ${EndIf}
- ;#DEBUG End */
- StrCpy $3 "$(Banner_Scan_Drive)"
- GetDlgItem $2 $Banner_Handle 76
- SendMessage $2 ${WM_SETTEXT} 0 "STR:$3"
- ${Locate} "$9" "/L=F /M=opencpn.exe" "Found_OCPN_Exe"
- end:
- Push $0
- FunctionEnd
- Function Found_OCPN_Exe
- Push $1
- ClearErrors
- StrCpy $1 0
- StrCpy $2 0
- ${WordFind} "$R8" "\RECYCLER\" "E*" $1
- ${WordFind} "$R8" "\$$Recycle.Bin" "E*" $2
- IfErrors 0 cont1
- ${If} $1 == 1
- ${AndIf} $2 == 1
- Goto cont2
- ${EndIf}
- cont1:
- ${If} $1 > 0
- ${OrIf} $2 > 0
- Goto end
- ${EndIf}
- cont2:
- ${If} ${FileExists} "$R8\unins*.exe"
- ${If} ${FileExists} "$TEMP\opencpn_prev_installs.tmp"
- ClearErrors
- FileOpen $R1 "$TEMP\opencpn_prev_installs.tmp" r
- IfErrors cont3
- ${Do}
- FileReadUTF16LE $R1 $R2
- FileReadUTF16LE $R1 $R3
- StrCmp $R2 "" done
- ${TrimNewLines} $R2 $R2
- ${TrimNewLines} $R3 $R3
- StrCmp $R3 $R8 found
- ${LoopUntil} $R2 == ""
- done:
- FileClose $R1
- Goto cont3
- found:
- FileClose $R1
- Goto end
- ${EndIf}
- cont3:
- IntOp $counter_tmp $counter_tmp + 1
- GetDlgItem $2 $Banner_Handle 1030
- StrCmp $counter_tmp 1 0 +3
- StrCpy $R4 "$(Banner_Installation_Found_Singular)"
- Goto +2
- StrCpy $R4 "$(Banner_Installation_Found_Plural)"
- SendMessage $2 ${WM_SETTEXT} 0 "STR:$R4"
- SendMessage $ListBox_CleanUp ${LB_ADDSTRING} 0 "STR:$R8"
- ClearErrors
- ${IfNot} ${FileExists} "$TEMP\opencpn_hdd_full_scan.tmp"
- FileOpen $R0 "$TEMP\opencpn_hdd_full_scan.tmp" w
- IfErrors end
- ${Else}
- FileOpen $R0 "$TEMP\opencpn_hdd_full_scan.tmp" a
- IfErrors end
- FileSeek $R0 0 END
- ${EndIf}
- FileWriteUTF16LE $R0 "$R8"
- FileWriteUTF16LE $R0 "$\r$\n"
- FileClose $R0
- end:
- ${EndIf}
- Pop $1
- Push $0
- FunctionEnd
- Function Delete_Installation_Dir
- StrCmp $Uninstall_Path_Tmp "" end
- ;# Check subdirs and remove them recursive ...
- ${If} ${FileExists} "$Uninstall_Path_Tmp\doc\*.*"
- RMDir /r "$Uninstall_Path_Tmp\doc"
- ${EndIf}
- ${If} ${FileExists} "$Uninstall_Path_Tmp\lang\*.*"
- RMDir /r "$Uninstall_Path_Tmp\lang"
- ${EndIf}
- ${If} ${FileExists} "$Uninstall_Path_Tmp\Microsoft.VC80.CRT\*.*"
- RMDir /r "$Uninstall_Path_Tmp\Microsoft.VC80.CRT"
- ${EndIf}
- ${If} ${FileExists} "$Uninstall_Path_Tmp\s57data\*.*"
- RMDir /r "$Uninstall_Path_Tmp\s57data"
- ${EndIf}
- ${If} ${FileExists} "$Uninstall_Path_Tmp\sounds\*.*"
- RMDir /r "$Uninstall_Path_Tmp\sounds"
- ${EndIf}
- ${If} ${FileExists} "$Uninstall_Path_Tmp\TCDATA\*.*"
- RMDir /r "$Uninstall_Path_Tmp\TCDATA"
- ${EndIf}
- ${If} ${FileExists} "$Uninstall_Path_Tmp\gshhs\*.*"
- RMDir /r "$Uninstall_Path_Tmp\gshhs"
- ${EndIf}
- ${If} ${FileExists} "$Uninstall_Path_Tmp\plugins\*.*"
- RMDir /r "$Uninstall_Path_Tmp\plugins"
- ${EndIf}
- ${If} ${FileExists} "$Uninstall_Path_Tmp\share\*.*"
- RMDir /r "$Uninstall_Path_Tmp\share"
- ${EndIf}
- ;# Check files and delete them ...
- ${If} ${FileExists} "$Uninstall_Path_Tmp\opencpn.exe"
- Delete "$Uninstall_Path_Tmp\opencpn.exe"
- ${EndIf}
- ${If} ${FileExists} "$Uninstall_Path_Tmp\license.txt"
- Delete "$Uninstall_Path_Tmp\license.txt"
- ${EndIf}
- ${If} ${FileExists} "$Uninstall_Path_Tmp\unins000.dat"
- Delete "$Uninstall_Path_Tmp\unins000.dat"
- ${EndIf}
- ${If} ${FileExists} "$Uninstall_Path_Tmp\unins000.exe"
- Delete "$Uninstall_Path_Tmp\unins000.exe"
- ${EndIf}
- ${If} ${FileExists} "$Uninstall_Path_Tmp\install.log"
- Delete "$Uninstall_Path_Tmp\install.log"
- ${EndIf}
- ${If} ${FileExists} "$Uninstall_Path_Tmp\install.log"
- Delete "$Uninstall_Path_Tmp\install.log"
- ${EndIf}
- Push $0
- Push $1
- Push $2
- Push $R9
- Push $R8
- Push $R7
- Push $R6
- ;# Find the Uninstall file
- ${Locate} "$Uninstall_Path_Tmp" "/L=F /M=Uninstall*.exe /G=0" "Delete_Located_File_Single"
- ;# Find the wx.. DLLs
- ${Locate} "$Uninstall_Path_Tmp" "/L=F /M=wx*.dll /G=0" "Delete_Located_File_Multi"
- ;# Dummy call of Locate as it does not properly close its handle and so the dir cannot be deleted though it might be empty
- ${Locate} "C:\" "/L=DE /M=*.* /G=0" "Dummy_Function"
- ;# Remove the installation dir ($Uninstall_Path_Tmp) if empty
- RMDir "$Uninstall_Path_Tmp"
- ${If} ${FileExists} "$Uninstall_Path_Tmp\*.*"
- Sleep 250
- RMDir "$Uninstall_Path_Tmp"
- ${EndIf}
- Pop $R6
- Pop $R7
- Pop $R8
- Pop $R9
- Pop $2
- Pop $1
- Pop $0
- end:
- FunctionEnd
- ;# Helper-Functions for Delete_Installation_Dir
- Function Delete_Located_File_Single
- Delete "$R9"
- StrCpy $0 StopLocate
- Push $0
- FunctionEnd
- Function Delete_Located_File_Multi
- Delete "$R9"
- Push $0
- FunctionEnd
- Function Dummy_Function
- StrCpy $0 StopLocate
- Push $0
- FunctionEnd
- ;# End Helper-Functions
- Function ExecAppFile
- !insertmacro UAC_AsUser_ExecShell 'open' '$INSTDIR\opencpn.exe' '' '$INSTDIR' ''
- loop:
- System::Call user32::GetForegroundWindow()i.r0
- Sleep 200
- IntCmpU $0 $hwndparent loop
- FunctionEnd
- Function DU2Pix
- Pop $4
- Pop $3
- Pop $2
- Pop $1
- IntOp $1 $1 * $BU_X
- IntOp $1 $1 / 4
- IntOp $2 $2 * $BU_Y
- IntOp $2 $2 / 8
- IntOp $3 $3 * $BU_X
- IntOp $3 $3 / 4
- IntOp $4 $4 * $BU_Y
- IntOp $4 $4 / 8
- FunctionEnd
- ;!define LVM_GETITEMCOUNT 0x1004 ;# ANSI
- ;!define LVM_GETITEMTEXT 0x102D ;# ANSI
- !ifndef LVM_GETITEMCOUNT
- !define LVM_GETITEMCOUNT 0x1004
- !define LVM_GETITEMTEXT 0x1073
- !endif
- Function DumpLog
- Exch $5
- Push $0
- Push $1
- Push $2
- Push $3
- Push $4
- Push $6
- FindWindow $0 "#32770" "" $HWNDPARENT
- GetDlgItem $0 $0 1016
- StrCmp $0 0 error
- FileOpen $5 $5 "w"
- FileWriteWord $5 0xfeff ; Write the BOM
- StrCmp $5 0 error
- SendMessage $0 ${LVM_GETITEMCOUNT} 0 0 $6
- System::StrAlloc ${NSIS_MAX_STRLEN}
- Pop $3
- StrCpy $2 0
- System::Call "*(i, i, i, i, i, i, i, i, i) i \
- (0, 0, 0, 0, 0, r3, ${NSIS_MAX_STRLEN}) .r1"
- loop: StrCmp $2 $6 done
- System::Call "User32::SendMessageW(i, i, i, i) i \
- ($0, ${LVM_GETITEMTEXT}, $2, r1)"
- System::Call "*$3(&t${NSIS_MAX_STRLEN} .r4)"
- FileWriteUTF16LE $5 "$4$\r$\n"
- IntOp $2 $2 + 1
- Goto loop
- done:
- FileClose $5
- System::Free $1
- System::Free $3
- Goto exit
- error:
- MessageBox MB_OK error
- exit:
- Pop $6
- Pop $4
- Pop $3
- Pop $2
- Pop $1
- Pop $0
- Exch $5
- FunctionEnd
- Function Write_Reg_ChartDirs
- ClearErrors
- FileOpen $R0 "$TEMP\opencpn_chart_dirs.tmp" r
- IfErrors end
- loop:
- FileReadUTF16LE $R0 $R1
- IfErrors done
- ${TrimNewLines} $R1 $R1
- ${If} $REG_CHARTDIRS == ""
- StrCpy $REG_CHARTDIRS "$R1"
- ${Else}
- StrCpy $REG_CHARTDIRS "$REG_CHARTDIRS;$R1"
- ${EndIf}
- Goto loop
- done:
- FileClose $R0
- WriteRegStr HKLM "Software\OpenCPN" "ChartDirs" $REG_CHARTDIRS
- end:
- 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
- Function RIndexOf
- Exch $R0
- Exch
- Exch $R1
- Push $R2
- Push $R3
- StrCpy $R3 $R0
- StrCpy $R0 0
- 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
- ;##################################################################################################
- ;# Uninstaller Functions #
- ;##################################################################################################
- ;# un.onInit Function
- Function un.onInit
- ;Prevent multiple instances of the uninstaller
- ${IfNot} ${UAC_IsInnerInstance}
- System::Call 'kernel32::CreateMutexW(i 0, i 0, t "ocpn_uninst_@CPACK_PACKAGE_VERSION@") i .r1 ?e'
- Pop $R0
- StrCmp $R0 0 +3
- MessageBox MB_OK|MB_ICONEXCLAMATION "$(Uninstaller_Running)"
- Abort
- ${EndIf}
- Call un.GetUserInfo
- StrCpy $USERS_NAME $USERNAME
- ;# Macros to be inserted
- ${If} $IS_ADMIN == 1
- !insertmacro MUI_UNGETLANGUAGE
- ${EndIf}
- StrCpy $USERS_APPDATA $APPDATA
- ;# UAC check if user has Admin privileges and prompt for elevation if not
- uac_tryagain:
- !insertmacro UAC_RunElevated
- StrCpy $Inst_Or_Uninst "$(Uninstaller)"
- ${Switch} $0
- ${Case} 0
- ${IfThen} $1 = 1 ${|} Quit ${|} ;# we are the outer process, the inner process has done its work, we are done
- ${IfThen} $3 <> 0 ${|} ${Break} ${|} ;# we are admin, let the show go on
- ${If} $1 = 3 ;# RunAs completed successfully, but with a non-admin user
- MessageBox mb_IconExclamation|mb_TopMost|mb_SetForeground "$(Msg_UAC_Admin_Retry)" /SD IDNO IDOK uac_tryagain IDNO 0
- ${EndIf}
- ;# fall-through and die
- ${Case} 1223
- MessageBox mb_IconStop|mb_TopMost|mb_SetForeground "$(Msg_UAC_Admin_Abort)"
- Quit
- ${Case} 1062
- MessageBox mb_IconStop|mb_TopMost|mb_SetForeground "$(Msg_UAC_Logon_Abort)"
- Quit
- ${Default}
- MessageBox mb_IconStop|mb_TopMost|mb_SetForeground "$(Msg_UAC_No_Elevation)"
- Quit
- ${EndSwitch}
- ########## from here we can be sure to run with admin privileges ##########
- SectionSetText ${UnSecDeleteConfigFolder} $(UnSecDeleteConfigFolder_Text)
- ClearErrors
- Var /GLOBAL UN_INST_PARAMS
- Var /GLOBAL UN_INST_HELP
- Var /GLOBAL UN_INST_TYPE
- StrCpy $UN_INST_TYPE ""
- ${GetParameters} $UN_INST_PARAMS
- StrCmp $UN_INST_PARAMS "" no_params
- ${GetOptions} "$UN_INST_PARAMS" "/?" $UN_INST_HELP
- IfErrors +3
- StrCpy $UN_INST_HELP "help"
- Goto end
- ClearErrors
- ${GetOptions} "$UN_INST_PARAMS" "/type" $UN_INST_TYPE
- IfErrors no_type_param
- ${Switch} $UN_INST_TYPE
- ${Case} "=1" ;# 1 = Program Files only (Remove/ Delete: Program Files)
- StrCpy $UN_INST_TYPE 1
- !insertmacro ClearSectionFlag ${UnSecDeleteConfigFolder} ${SF_SELECTED}
- !insertmacro ClearSectionFlag ${UnSecDeleteConfigRegKey} ${SF_SELECTED}
- ${Break}
- ${Case} "=2" ;# 2 = Preserve Config folder (Remove/ Delete: Program Files + RegKey)
- StrCpy $UN_INST_TYPE 2
- !insertmacro ClearSectionFlag ${UnSecDeleteConfigFolder} ${SF_SELECTED}
- ${Break}
- ${Case} "=3" ;# 3 = Preserve RegKey (Remove/ Delete: Program Files + Config folder)
- StrCpy $UN_INST_TYPE 3
- !insertmacro ClearSectionFlag ${UnSecDeleteConfigRegKey} ${SF_SELECTED}
- SectionSetFlags ${UnSecBackupConfigToRegKey} ${SF_SELECTED}
- ${Break}
- ${Case} "=4" ;# 4 = Delete Config folder (Remove/ Delete: Config folder)
- StrCpy $UN_INST_TYPE 4
- !insertmacro ClearSectionFlag ${UnSecUninstall} ${SF_SELECTED}
- !insertmacro ClearSectionFlag ${UnSecDeleteConfigRegKey} ${SF_SELECTED}
- SectionSetFlags ${UnSecBackupConfigToRegKey} ${SF_SELECTED}
- ${Break}
- ${Case} "=5" ;# 5 = Delete RegKey (Remove/ Delete: RegKey)
- StrCpy $UN_INST_TYPE 5
- !insertmacro ClearSectionFlag ${UnSecUninstall} ${SF_SELECTED}
- !insertmacro ClearSectionFlag ${UnSecDeleteConfigFolder} ${SF_SELECTED}
- ${Break}
- ${Default}
- StrCpy $9 $UN_INST_TYPE
- StrCpy $UN_INST_TYPE "error_type" ;# unknown value given for the type parameter => MsgBox => Quit
- ${Break}
- ${EndSwitch}
- StrCmp $UN_INST_TYPE "error_type" 0 cont
- MessageBox MB_OK|MB_ICONEXCLAMATION "$(Msg_Unknown_Type_Param)"
- Quit
- no_type_param:
- ;# If no parameter 'type' is given assume full uninstall
- StrCpy $UN_INST_TYPE 0 ;# 0 = Full Uninstall (Remove/ Delete: Program Files + Config folder + RegKey)
- Goto cont
- no_params:
- ;# If no parameters are given assume full uninstall
- StrCpy $UN_INST_TYPE 0 ;# 0 = Full Uninstall (Remove/ Delete: Program Files + Config folder + RegKey)
- cont:
- ;# Delete all temporary files created during the installation
- Delete "$TEMP\opencpn_*.tmp"
- Call un.VersionDate
- Call un.Check_Prev_Installs
- ;# If there are other installations of OCPN do not remove the config folder!
- ${If} $UN_INST_TYPE == 0
- ${AndIf} $VERSION_EXISTS == 1
- ${AndIf} $MULTIPLE_INSTALLS > 1
- StrCpy $Skip_UnPage_Components 1
- !insertmacro ClearSectionFlag ${UnSecDeleteConfigFolder} ${SF_SELECTED}
- ${EndIf}
- ReadRegStr $0 HKLM "${REG_KEY_UN}" "CompareVersion"
- end:
- FunctionEnd
- Function un.myGuiInit
- ${If} $UN_INST_HELP == "help"
- MessageBox MB_OK|MB_ICONINFORMATION "$(Msg_Uninstaller_Param_Help)"
- Quit
- ${EndIf}
- FunctionEnd
- ;--------------------------------
- ;##################################################################################################
- ;# Uninstaller Page Functions #
- ;##################################################################################################
- ;# UnPage_Components_Pre
- Function un.Page_Components_Pre
- ${If} $Skip_UnPage_Components == 1
- Abort
- ${EndIf}
- FunctionEnd
- ;--------------------------------
- ;##################################################################################################
- ;# General Uninstaller Functions #
- ;##################################################################################################
- ;--------------------------------
- ;##################################################################################################
- ;# Shared Functions #
- ;##################################################################################################
- !macro GetUserInfo_Macro un
- Function ${un}GetUserInfo
- ClearErrors
- UserInfo::GetName
- ${If} ${Errors}
- StrCpy $IS_ADMIN 1
- Return
- ${EndIf}
- Pop $USERNAME
- UserInfo::GetAccountType
- Pop $R0
- StrCpy $UAT $R0
- ${If} ${IsNT}
- ${AndIf} ${IsWinNT4}
- ${If} $R0 == "Admin"
- StrCpy $IS_ADMIN 1
- ${Else}
- StrCpy $IS_ADMIN 0
- ${EndIf}
- Goto end
- ${EndIf}
- ${Switch} $R0
- ${Case} "Admin"
- ${Case} "Power"
- StrCpy $IS_ADMIN 1
- ${Break}
- ${Default}
- StrCpy $IS_ADMIN 0
- ${Break}
- ${EndSwitch}
- UserInfo::GetOriginalAccountType
- Pop $OUAT
- end:
- FunctionEnd
- !macroend
- !insertmacro GetUserInfo_Macro ""
- !insertmacro GetUserInfo_Macro "un."
- !macro Check_Prev_Installs_Macro un
- Function ${un}Check_Prev_Installs
- StrCpy $R0 0
- StrCpy $R1 ""
- StrCpy $R5 0
- StrCpy $VERSION_EXISTS 0
- SetShellVarContext all
- ${Do}
- EnumRegKey $R1 SHCTX "${REG_ROOT_KEY_UN}" $R0
- ${If} $R1 != ""
- StrLen $R2 $R1
- ${WordFind} "$R1" " " "+1" $R3
- IntOp $R0 $R0 + 1
- ${If} $R3 == "OpenCPN"
- ${AndIf} $R2 > 7
- ReadRegStr $R4 SHCTX "${REG_ROOT_KEY_UN}\$R1" "CompareVersion"
- ReadRegStr $R6 SHCTX "${REG_ROOT_KEY_UN}\$R1" "InstallLocation"
- ${If} $R4 != ""
- ${VersionCompare} $VERSION_DATE $R4 $Compare_Version_Result
- ${Switch} $Compare_Version_Result
- ${Case} 0 ;equal
- StrCpy $VERSION_EXISTS 1
- ${Break}
- ${Case} 1 ;version to install is newer
- StrCpy $VERSION_NEWER 1
- ${Break}
- ${Case} 2 ;version to install is older
- StrCpy $VERSION_OLDER 1
- ${Break}
- ${Default}
- ${Break}
- ${EndSwitch}
- IntOp $R5 $R5 + 1
- StrCpy $Prev_Install_RegKey "${REG_ROOT_KEY_UN}\$R1"
- ${EndIf}
- StrCmp ${un} "" 0 uninst ;# only execute when it is the Installer function
- ${If} $R6 != ""
- ClearErrors
- ${If} ${FileExists} "$TEMP\opencpn_prev_installs.tmp"
- FileOpen $0 "$TEMP\opencpn_prev_installs.tmp" a
- FileSeek $0 0 END
- ${Else}
- FileOpen $0 "$TEMP\opencpn_prev_installs.tmp" w
- ${EndIf}
- IfErrors done
- FileWriteUTF16LE $0 "$R1$\r$\n"
- FileWriteUTF16LE $0 "$R6$\r$\n"
- FileClose $0
- done:
- ${EndIf}
- ${If} $VERSION_EXISTS == 1
- ${Break}
- ${EndIf}
- uninst:
- ${EndIf}
- ${Else}
- Goto done2
- ${EndIf}
- ${Loop}
- done2:
- ${If} $R5 > 0
- StrCpy $MULTIPLE_INSTALLS $R5
- ${Else}
- StrCpy $MULTIPLE_INSTALLS 0
- ${EndIf}
- ${If} $MULTIPLE_INSTALLS == 0
- StrCpy $Skip_Page_TypeInst 1
- ${Else}
- StrCpy $Skip_Page_TypeInst 0
- ${EndIf}
- FunctionEnd
- !macroend
- !insertmacro Check_Prev_Installs_Macro ""
- !insertmacro Check_Prev_Installs_Macro "un."
- /* VersionDate
- normalizes the CPACK_PACKAGE_VERSION_PATCH to a comparable format 'yyyy.[02|19].mmdd.00'
- 02 = Beta version
- 19 = Stable release
- IN: CPACK_PACKAGE_VERSION_PATCH
- OUT: $VERSION_DATE
- */
- Var Patch_Version
- Var Version_Digits_Only
- Var Version_Unified
- Var Patch_Date
- !macro VersionDate_Macro un
- Function ${un}VersionDate
- StrCpy $Patch_Version "@CPACK_PACKAGE_VERSION_PATCH@"
- ${If} $Patch_Version == ""
- StrCpy $Patch_Version "0000"
- ${EndIf}
- StrLen $0 "$Patch_Version"
- ${StrFilter} "$Patch_Version" "1" "" "" $Version_Digits_Only
- StrLen $1 $Version_Digits_Only
- ;# Patch version contains non-digit characters
- ${If} $0 != $1
- ${StrFilter} "$Patch_Version" "-2" "" "" $PATCH_ND
- ${If} $1 == 3
- StrCpy $Version_Unified "b${YEAR}0$Patch_Version"
- ${ElseIf} $1 == 2
- StrCpy $Version_Unified "s${YEAR}00$Patch_Version"
- ${ElseIf} $1 == 1
- StrCpy $Version_Unified "s${YEAR}000$Patch_Version"
- ${Else}
- StrCpy $Version_Unified "b${YEAR}$Patch_Version"
- ${EndIf}
- ${VersionConvert} $Version_Unified "" $Patch_Date
- StrCpy $VERSION_DATE "@CPACK_PACKAGE_VERSION_MAJOR@.@CPACK_PACKAGE_VERSION_MINOR@.$Patch_Date"
- ;# Patch version contains only digits
- ${Else}
- ${If} $0 == 3
- StrCpy $Version_Unified "b${YEAR}0$Patch_Version"
- ${ElseIf} $0 == 2
- StrCpy $Version_Unified "s${YEAR}00$Patch_Version"
- ${ElseIf} $0 == 1
- StrCpy $Version_Unified "s${YEAR}000$Patch_Version"
- ${Else}
- StrCpy $Version_Unified "b${YEAR}$Patch_Version"
- ${EndIf}
- ${VersionConvert} $Version_Unified "" $Patch_Date
- StrCpy $VERSION_DATE "@CPACK_PACKAGE_VERSION_MAJOR@.@CPACK_PACKAGE_VERSION_MINOR@.$Patch_Date.00"
- ${EndIf}
- FunctionEnd
- !macroend
- !insertmacro VersionDate_Macro ""
- !insertmacro VersionDate_Macro "un."
- !macro Delete_Start_Menu_Shortcuts_Macro un
- Function ${un}Delete_Start_Menu_Shortcuts
- Pop $9
- Push $R0
- Push $R1
- Push $R2
- Push $R3
- Push $R4
- ${TrimNewLines} $9 $9
- SetShellVarContext all
- ${RecFindOpen} "$STARTMENU" $CurrentDirVar $CurrentFileVar
- ${RecFindFirst}
- ClearErrors
- ${WordFind} "$CurrentFileVar" ".lnk" "E*" $8
- IfErrors next
- IntCmp $8 1 0 next 0
- ShellLink::GetShortCutWorkingDirectory "$STARTMENU$CurrentDirVar\$CurrentFileVar"
- Pop $0
- StrCmp "$0" "" +2
- StrCmp "$0" "$9" 0 next
- ShellLink::GetShortCutTarget "$STARTMENU$CurrentDirVar\$CurrentFileVar"
- Pop $1
- ${WordFind2X} "$1" "\" ".exe" "-1" $7
- ClearErrors
- ${WordFind} "$7" "uninstall" "E*" $6
- IfErrors 0 +2
- StrCpy $6 0
- ;#NON-DEBUG
- ${If} $7 == "opencpn"
- ${OrIf} $7 == "Uninstall"
- ${OrIf} $7 == "unins000"
- ${OrIf} $6 == 1
- Delete "$STARTMENU$CurrentDirVar\$CurrentFileVar"
- StrCmp $CurrentDirVar "" next
- ClearErrors
- RMDir "$STARTMENU$CurrentDirVar"
- Sleep 250
- IfErrors 0 check_parent
- ${If} ${FileExists} "$STARTMENU$CurrentDirVar\*.*"
- ClearErrors
- RMDir "$STARTMENU$CurrentDirVar"
- Sleep 250
- IfErrors next check_parent
- ${EndIf}
- Goto next
- check_parent:
- StrCpy $R3 "$STARTMENU$CurrentDirVar"
- Push $R3
- Call ${un}Parent_Dirs_Check
- ${EndIf}
- next:
- ${RecFindNext}
- ${RecFindClose}
- ${If} ${FileExists} "$TEMP\opencpn_startmenu.tmp"
- FileOpen $R0 "$TEMP\opencpn_startmenu.tmp" r
- IfErrors end
- ${Do}
- FileReadUTF16LE $R0 $R1
- FileReadUTF16LE $R0 $R2
- ${TrimNewLines} $R1 $R1
- ${TrimNewLines} $R2 $R2
- StrCmp $R2 "" 0 +2
- ${Break}
- ${RecFindOpen} "$R2" $CurrentDirVar $CurrentFileVar
- ${RecFindFirst}
- ClearErrors
- ${WordFind} "$CurrentFileVar" ".lnk" "E*" $8
- IfErrors next1
- IntCmp $8 1 0 next1 0
- ShellLink::GetShortCutWorkingDirectory "$R2$CurrentDirVar\$CurrentFileVar"
- Pop $0
- StrCmp "$0" "$9" 0 next1
- ShellLink::GetShortCutTarget "$R2$CurrentDirVar\$CurrentFileVar"
- Pop $1
- ${WordFind2X} "$1" "\" ".exe" "-1" $7
- ;#NON-DEBUG
- ${If} $7 == "opencpn"
- ${OrIf} $7 == "Uninstall"
- ${OrIf} $7 == "unins000"
- Delete "$R2$CurrentDirVar\$CurrentFileVar"
- StrCmp $CurrentDirVar "" next1
- ClearErrors
- RMDir "$R2$CurrentDirVar"
- Sleep 250
- IfErrors 0 check_parent1
- ${If} ${FileExists} "$R2$CurrentDirVar\*.*"
- ClearErrors
- RMDir "$R2$CurrentDirVar"
- Sleep 250
- IfErrors next1 check_parent1
- ${EndIf}
- Goto next1
- check_parent1:
- StrCpy $R3 "$STARTMENU$CurrentDirVar"
- Push $R3
- Call ${un}Parent_Dirs_Check
- ${EndIf}
- next1:
- ${RecFindNext}
- ${RecFindClose}
- ${LoopUntil} $R2 == ""
- FileClose $R0
- ${EndIf}
- end:
- Call ${un}Delete_Empty_Parents
- Pop $R4
- Pop $R3
- Pop $R2
- Pop $R1
- Pop $R0
- FunctionEnd
- !macroend
- !insertmacro Delete_Start_Menu_Shortcuts_Macro ""
- !insertmacro Delete_Start_Menu_Shortcuts_Macro "un."
- !macro Delete_Desktop_Shortcuts_Macro un
- Function ${un}Delete_Desktop_Shortcuts
- Pop $9
- Push $R0
- Push $R1
- Push $R2
- Push $R3
- ${TrimNewLines} $9 $9
- SetShellVarContext all
- ${RecFindOpen} "$DESKTOP" $CurrentDirVar $CurrentFileVar
- ${RecFindFirst}
- ClearErrors
- ${WordFind} "$CurrentFileVar" ".lnk" "E*" $8
- IfErrors next
- IntCmp $8 1 0 next 0
- ShellLink::GetShortCutWorkingDirectory "$DESKTOP$CurrentDirVar\$CurrentFileVar"
- Pop $0
- StrCmp "$0" "" +2
- StrCmp "$0" "$9" 0 next
- ShellLink::GetShortCutTarget "$DESKTOP$CurrentDirVar\$CurrentFileVar"
- Pop $1
- ${WordFind2X} "$1" "\" ".exe" "-1" $7
- ClearErrors
- ${WordFind} "$7" "uninstall" "E*" $6
- IfErrors 0 +2
- StrCpy $6 0
- ;#NON-DEBUG
- ${If} $7 == "opencpn"
- ${OrIf} $7 == "Uninstall"
- ${OrIf} $7 == "unins000"
- ${OrIf} $6 == 1
- Delete "$DESKTOP$CurrentDirVar\$CurrentFileVar"
- StrCmp $CurrentDirVar "" next
- RMDir "$DESKTOP$CurrentDirVar"
- Sleep 250
- IfErrors 0 check_parent
- ${If} ${FileExists} "$DESKTOP$CurrentDirVar\*.*"
- ClearErrors
- RMDir "$DESKTOP$CurrentDirVar"
- Sleep 250
- IfErrors next check_parent
- ${EndIf}
- Goto next
- check_parent:
- StrCpy $R3 "$DESKTOP$CurrentDirVar"
- Push $R3
- Call ${un}Parent_Dirs_Check
- ${EndIf}
- next:
- ${RecFindNext}
- ${RecFindClose}
- ${If} ${FileExists} "$TEMP\opencpn_desktop.tmp"
- FileOpen $R0 "$TEMP\opencpn_desktop.tmp" r
- IfErrors end
- ${Do}
- FileReadUTF16LE $R0 $R1
- FileReadUTF16LE $R0 $R2
- ${TrimNewLines} $R1 $R1
- ${TrimNewLines} $R2 $R2
- StrCmp $R2 "" 0 +2
- ${Break}
- ${RecFindOpen} "$R2" $CurrentDirVar $CurrentFileVar
- ${RecFindFirst}
- ClearErrors
- ${WordFind} "$CurrentFileVar" ".lnk" "E*" $8
- IfErrors next1
- IntCmp $8 1 0 next1 0
- ShellLink::GetShortCutWorkingDirectory "$R2$CurrentDirVar\$CurrentFileVar"
- Pop $0
- StrCmp "$0" "$9" 0 next1
- ShellLink::GetShortCutTarget "$R2$CurrentDirVar\$CurrentFileVar"
- Pop $1
- ${WordFind2X} "$1" "\" ".exe" "-1" $7
- ;#NON-DEBUG
- ${If} $7 == "opencpn"
- ${OrIf} $7 == "Uninstall"
- ${OrIf} $7 == "unins000"
- Delete "$R2$CurrentDirVar\$CurrentFileVar"
- StrCmp $CurrentDirVar "" next1
- RMDir "$R2$CurrentDirVar"
- Sleep 250
- IfErrors 0 check_parent1
- ${If} ${FileExists} "$R2$CurrentDirVar\*.*"
- ClearErrors
- RMDir "$R2$CurrentDirVar"
- Sleep 250
- IfErrors next1 check_parent1
- ${EndIf}
- Goto next1
- check_parent1:
- StrCpy $R3 "$STARTMENU$CurrentDirVar"
- Push $R3
- Call ${un}Parent_Dirs_Check
- ${EndIf}
- next1:
- ${RecFindNext}
- ${RecFindClose}
- ${LoopUntil} $R2 == ""
- FileClose $R0
- ${EndIf}
- end:
- Call ${un}Delete_Empty_Parents
- Pop $R3
- Pop $R2
- Pop $R1
- Pop $R0
- FunctionEnd
- !macroend
- !insertmacro Delete_Desktop_Shortcuts_Macro ""
- !insertmacro Delete_Desktop_Shortcuts_Macro "un."
- !macro Parent_Dirs_Check_Macro un
- Function ${un}Parent_Dirs_Check
- Pop $R3
- Push $R4
- ClearErrors
- ${If} ${FileExists} "$TEMP\opencpn_check_parent.tmp"
- FileOpen $R4 "$TEMP\opencpn_check_parent.tmp" a
- IfErrors end
- ${Else}
- FileOpen $R4 "$TEMP\opencpn_check_parent.tmp" w
- IfErrors end
- ${EndIf}
- ${WordFind} "$R3" "\" "E-2{*" $R3
- IfErrors close
- FileWriteUTF16LE $R4 "$R3$\r$\n"
- close:
- FileClose $R4
- end:
- Pop $R4
- FunctionEnd
- !macroend
- !insertmacro Parent_Dirs_Check_Macro ""
- !insertmacro Parent_Dirs_Check_Macro "un."
- !macro Delete_Empty_Parents_Macro un
- Function ${un}Delete_Empty_Parents
- Push $R3
- Push $R4
- Push $R5
- ClearErrors
- ${If} ${FileExists} "$TEMP\opencpn_check_parent.tmp"
- FileOpen $R4 "$TEMP\opencpn_check_parent.tmp" r
- IfErrors end
- ${Do}
- FileReadUTF16LE $R4 $R3
- IfErrors close
- ${TrimNewLines} "$R3" $R3
- ${DirState} $R3 $R5
- StrCmp $R5 0 0 next
- ClearErrors
- RMDir "$R3"
- Sleep 250
- IfErrors next
- loop:
- ${WordFind} "$R3" "\" "E-2{*" $R3
- IfErrors next
- StrCpy $error_tmp 0
- Push $R3
- Call ${un}Delete_Empty_Dir
- StrCmp $error_tmp 1 loop
- next:
- ${Loop}
- close:
- FileClose $R4
- Delete "$TEMP\opencpn_check_parent.tmp"
- ${EndIf}
- end:
- Pop $R5
- Pop $R4
- Pop $R3
- FunctionEnd
- !macroend
- !insertmacro Delete_Empty_Parents_Macro ""
- !insertmacro Delete_Empty_Parents_Macro "un."
- !macro Delete_Empty_Dir_Macro un
- Function ${un}Delete_Empty_Dir
- Push $R3
- Exch
- Pop $R3
- Push $R4
- ${DirState} $R3 $R4
- StrCmp $R4 0 0 end
- RMDir "$R3"
- Sleep 100
- StrCpy $error_tmp 1
- end:
- Pop $R4
- Pop $R3
- FunctionEnd
- !macroend
- !insertmacro Delete_Empty_Dir_Macro ""
- !insertmacro Delete_Empty_Dir_Macro "un."
- ; Initialize variables
- Var explString
- Var explSeparator
- Var explStrLen
- Var explSepLen
- Var explOffset
- Var explTmp
- Var explTmp2
- Var explTmp3
- Var explArrCount
- !macro Explodes_Macro un
- Function ${un}Explode
- /*; Initialize variables
- Var /GLOBAL explString
- Var /GLOBAL explSeparator
- Var /GLOBAL explStrLen
- Var /GLOBAL explSepLen
- Var /GLOBAL explOffset
- Var /GLOBAL explTmp
- Var /GLOBAL explTmp2
- Var /GLOBAL explTmp3
- Var /GLOBAL explArrCount
- */
- ; Get input from user
- Pop $explString
- Pop $explSeparator
- ; Calculates initial values
- StrLen $explStrLen $explString
- StrLen $explSepLen $explSeparator
- StrCpy $explArrCount 1
- ${If} $explStrLen <= 1 ; If we got a single character
- ${OrIf} $explSepLen > $explStrLen ; or separator is larger than the string,
- Push $explString ; then we return initial string with no change
- Push 1 ; and set array's length to 1
- Return
- ${EndIf}
- ; Set offset to the last symbol of the string
- StrCpy $explOffset $explStrLen
- IntOp $explOffset $explOffset - 1
- ; Clear temp string to exclude the possibility of appearance of occasional data
- StrCpy $explTmp ""
- StrCpy $explTmp2 ""
- StrCpy $explTmp3 ""
- ; Loop until the offset becomes negative
- ${Do}
- ; If offset becomes negative, it is time to leave the function
- ${IfThen} $explOffset == -1 ${|} ${ExitDo} ${|}
- ; Remove everything before and after the searched part ("TempStr")
- StrCpy $explTmp $explString $explSepLen $explOffset
- ${If} $explTmp == $explSeparator
- ; Calculating offset to start copy from
- IntOp $explTmp2 $explOffset + $explSepLen ; Offset equals to the current offset plus length of separator
- StrCpy $explTmp3 $explString "" $explTmp2
- Push $explTmp3 ; Throwing array item to the stack
- IntOp $explArrCount $explArrCount + 1 ; Increasing array's counter
- StrCpy $explString $explString $explOffset 0 ; Cutting all characters beginning with the separator entry
- StrLen $explStrLen $explString
- ${EndIf}
- ${If} $explOffset = 0 ; If the beginning of the line met and there is no separator,
- ; copying the rest of the string
- ${If} $explSeparator == "" ; Fix for the empty separator
- IntOp $explArrCount $explArrCount - 1
- ${Else}
- Push $explString
- ${EndIf}
- ${EndIf}
- IntOp $explOffset $explOffset - 1
- ${Loop}
- Push $explArrCount
- FunctionEnd
- !macroend
- !insertmacro Explodes_Macro ""
- !insertmacro Explodes_Macro "un."
- !macro isEmptyDir_Macro un
- Function ${un}isEmptyDir
- # Stack -> # Stack: <directory>
- Exch $0 # Stack: $0
- Push $1 # Stack: $1, $0
- FindFirst $0 $1 "$0\*.*"
- StrCmp $1 "." 0 _notempty
- FindNext $0 $1
- StrCmp $1 ".." 0 _notempty
- ClearErrors
- FindNext $0 $1
- IfErrors 0 _notempty
- FindClose $0
- Pop $1 # Stack: $0
- StrCpy $0 1
- Exch $0 # Stack: 1 (true)
- Goto _end
- _notempty:
- FindClose $0
- Pop $1 # Stack: $0
- StrCpy $0 0
- Exch $0 # Stack: 0 (false)
- _end:
- FunctionEnd
- !macroend
- !insertmacro isEmptyDir_Macro ""
- !insertmacro isEmptyDir_Macro "un."
- ;--------------------------------------------------------------------------------------------------
- ;##################################################################################################
- ;# D E S C R I P T I O N S #
- ;##################################################################################################
- ;# Installer Descriptions #
- ;##################################################################################################
- ;# License page
- LicenseLangString license ${LANG_ENGLISH} "@CPACK_RESOURCE_FILE_LICENSE@"
- LicenseLangString license ${LANG_GERMAN} "@CPACK_RESOURCE_FILE_LICENSE@"
- LicenseLangString license ${LANG_FRENCH} "@CPACK_RESOURCE_FILE_LICENSE@"
- LicenseLangString license ${LANG_CZECH} "@CPACK_RESOURCE_FILE_LICENSE@"
- LicenseLangString license ${LANG_DANISH} "@CPACK_RESOURCE_FILE_LICENSE@"
- LicenseLangString license ${LANG_SPANISH} "@CPACK_RESOURCE_FILE_LICENSE@"
- LicenseLangString license ${LANG_ITALIAN} "@CPACK_RESOURCE_FILE_LICENSE@"
- LicenseLangString license ${LANG_DUTCH} "@CPACK_RESOURCE_FILE_LICENSE@"
- LicenseLangString license ${LANG_POLISH} "@CPACK_RESOURCE_FILE_LICENSE@"
- LicenseLangString license ${LANG_PORTUGUESE} "@CPACK_RESOURCE_FILE_LICENSE@"
- LicenseLangString license ${LANG_PORTUGUESEBR} "@CPACK_RESOURCE_FILE_LICENSE@"
- LicenseLangString license ${LANG_RUSSIAN} "@CPACK_RESOURCE_FILE_LICENSE@"
- LicenseLangString license ${LANG_SWEDISH} "@CPACK_RESOURCE_FILE_LICENSE@"
- LicenseLangString license ${LANG_FINNISH} "@CPACK_RESOURCE_FILE_LICENSE@"
- LicenseLangString license ${LANG_NORWEGIAN} "@CPACK_RESOURCE_FILE_LICENSE@"
- LicenseLangString license ${LANG_TRADCHINESE} "@CPACK_RESOURCE_FILE_LICENSE@"
- LicenseLangString license ${LANG_TURKISH} "@CPACK_RESOURCE_FILE_LICENSE@"
- ;LicenseLangString license ${LANG_HUNGARIAN} "@CPACK_RESOURCE_FILE_LICENSE@"
- !insertmacro MUI_FUNCTION_DESCRIPTION_BEGIN
- !insertmacro MUI_DESCRIPTION_TEXT ${SecGrpResetConfig} $(SecGrpResetConfig_Desc)
- !insertmacro MUI_DESCRIPTION_TEXT ${SecDeleteConfigFile} $(SecDeleteConfigFile_Desc)
- !insertmacro MUI_DESCRIPTION_TEXT ${SecDeleteChartDB} $(SecDeleteChartDB_Desc)
- !insertmacro MUI_DESCRIPTION_TEXT ${SecDeleteSENC} $(SecDeleteSENC_Desc)
- !insertmacro MUI_DESCRIPTION_TEXT ${SecDeleteCM93} $(SecDeleteCM93_Desc)
- !insertmacro MUI_DESCRIPTION_TEXT ${SecDeleteNavobjFile} $(SecDeleteNavobjFile_Desc)
- !insertmacro MUI_DESCRIPTION_TEXT ${SecDeleteLogFile} $(SecDeleteLogFile_Desc)
- !insertmacro MUI_DESCRIPTION_TEXT ${SecGrpShortcuts} $(SecGrpShortcuts_Desc)
- !insertmacro MUI_DESCRIPTION_TEXT ${SecShortcutStartmenu} $(SecShortcutStartmenu_Desc)
- !insertmacro MUI_DESCRIPTION_TEXT ${SecShortcutDesktop} $(SecShortcutDesktop_Desc)
- !insertmacro MUI_DESCRIPTION_TEXT ${SecSetConfig} $(SecSetConfig_Desc)
- !insertmacro MUI_FUNCTION_DESCRIPTION_END
- ;--------------------------------
- ;##################################################################################################
- ;# Uninstaller Descriptions #
- ;##################################################################################################
- !insertmacro MUI_UNFUNCTION_DESCRIPTION_BEGIN
- !insertmacro MUI_DESCRIPTION_TEXT ${UnSecDeleteConfigFolder} $(UnSecDeleteConfigFolder_Desc)
- !insertmacro MUI_UNFUNCTION_DESCRIPTION_END
- ;--------------------------------------------------------------------------------------------------
- ;##################################################################################################
- ;# Language Strings #
- ;##################################################################################################
- ;#DO NOT EDIT THE NEXT LINE!!! It is needed for the online generating of the translation files!
- ;#Language Strings Start as of: 2010-10-10
- ;#IMPORTANT: Do not end a multi-line with $\"
- LangString Installer ${LANG_ENGLISH} "installer"
- LangString Uninstaller ${LANG_ENGLISH} "uninstaller"
- ;Installer running on unsupported version of Windows
- LangString Installer_Unsupported_Windows_Version ${LANG_ENGLISH} "Your Windows version is not supported (it's too old)!$\r$\nYou need at least Windows XP SP3."
- ;Installer running on Windows XP without SP3
- LangString Installer_Unsupported_XP_SP_Version ${LANG_ENGLISH} "Your Windows XP Service Pack version is not supported (it's too old)!$\r$\nYou need at least Windows XP SP3."
- ;Installer already running
- LangString Installer_Running ${LANG_ENGLISH} "The installer is already running."
- ;Uninstaller already running
- LangString Uninstaller_Running ${LANG_ENGLISH} "The uninstaller is already running."
- ;Language Dialog
- LangString LangDialog_Title ${LANG_ENGLISH} "@CPACK_PACKAGE_NAME@ @CPACK_PACKAGE_VERSION@ Installation"
- LangString LangDialog_Text ${LANG_ENGLISH} "Please select a language:"
- ;License dialog
- LangString License_Message ${LANG_ENGLISH} "OpenCPN is software libre. You are encouraged and legally \
- entitled to copy, reinstall, modify, and redistribute this program \
- for yourself and your friends under the terms of the GPL. $\r$\nSmooth sailing!"
- ;Clean up page
- LangString text_please_wait_1 ${LANG_ENGLISH} "... please wait!"
- LangString Scanning_HDD ${LANG_ENGLISH} "Scanning HDD ..."
- LangString OCPN_Scanning_HDD ${LANG_ENGLISH} "OpenCPN: Scan HDD ..., please wait!"
- LangString Search_old_installations ${LANG_ENGLISH} "Searching for old installations"
- LangString Install_Location_Default ${LANG_ENGLISH} "Install Locations by default paths (may not find all)"
- LangString Install_Location_HDD_Scan ${LANG_ENGLISH} "Install Location by full HDD scan (most reliable)"
- LangString Label_CleanUp_Text ${LANG_ENGLISH} "Click on a list-item to select/ unselect it or Select ALL (recommended) and then Uninstall selected."
- LangString BT_Uninstall_Selected_CleanUp ${LANG_ENGLISH} "Uninstall Selected"
- LangString BT_SelectAll_CleanUp ${LANG_ENGLISH} "Select ALL"
- LangString BT_UnselectAll_CleanUp ${LANG_ENGLISH} "Unselect ALL"
- LangString LB_CleanUp ${LANG_ENGLISH} "Listbox Text"
- LangString BT_FullScan_CleanUp ${LANG_ENGLISH} "Scan HDD ..."
- LangString LAB_FullScan_CleanUp ${LANG_ENGLISH} "Scan the HDD for the most reliable detection.$\r$\nATTENTION: may last several minutes!"
- LangString Page_CleanUp_Title ${LANG_ENGLISH} "Uninstall older Version"
- LangString Page_CleanUp_Subtitle ${LANG_ENGLISH} "Incompatible version detected"
- ;Components Page
- ;Header
- LangString CP_HEADER_TEXT ${LANG_ENGLISH} "Installation Settings"
- ;Subheader
- LangString CP_HEADER_SUBTEXT ${LANG_ENGLISH} "Choose the settings for the installation"
- ;Top
- LangString CP_TOP ${LANG_ENGLISH} "Check or uncheck the options for the installation.$\r$\nClick 'Next' to continue."
- ;Installation type
- LangString CP_INSTTYPE ${LANG_ENGLISH} "Installation type:"
- ;Components list
- LangString CP_COMPLIST ${LANG_ENGLISH} "Adjust the settings individually:"
- ;Directory page
- ;Set Config page
- LangString Page_SetConfig_Title ${LANG_ENGLISH} "Default configuration settings"
- LangString Page_SetConfig_Subtitle ${LANG_ENGLISH} "Preconfigure settings for OpenCPN"
- LangString Select_Chart_Directory ${LANG_ENGLISH} "Please select a chart directory to add to OpenCPN"
- LangString BT_Browse_SetConfig_Text ${LANG_ENGLISH} "Browse..."
- LangString BT_DeleteAll_SetConfig_Text ${LANG_ENGLISH} "Delete ALL"
- LangString BT_Delete_SetConfig_Text ${LANG_ENGLISH} "Delete"
- LangString GB_ChartDir_SetConfig_Text ${LANG_ENGLISH} "Add Chart Directory"
- LangString CB_Language_SetConfig_Text ${LANG_ENGLISH} "Set OpenCPN program language to $LANG_NAME"
- LangString GB_Language_SetConfig_Text ${LANG_ENGLISH} "Set OpenCPN program language"
- LangString Label_SetConfig_Text ${LANG_ENGLISH} "Configure preconfig settings for the OpenCPN program.$\r$\nThese settings are saved in the file opencpn.ini."
- ;Confirm page
- LangString Page_Confirm_Title ${LANG_ENGLISH} "Ready to Install"
- LangString Page_Confirm_Subtitle ${LANG_ENGLISH} "Check the installation options"
- LangString Installation_Type ${LANG_ENGLISH} "Setup type"
- LangString Installation_Directory ${LANG_ENGLISH} "Destination location"
- LangString Create_Shortcuts ${LANG_ENGLISH} "Create shortcuts"
- LangString Type_Reinstall ${LANG_ENGLISH} "Reinstallation"
- LangString Type_Upgrade ${LANG_ENGLISH} "Upgrade"
- LangString Type_Downgrade ${LANG_ENGLISH} "Downgrade"
- LangString Type_Parallel_Installation ${LANG_ENGLISH} "Parallel installation"
- LangString Type_Fresh_Installation ${LANG_ENGLISH} "New installation"
- LangString Shortcuts ${LANG_ENGLISH} "Shortcuts"
- LangString Create_Shortcut_Start_Menu ${LANG_ENGLISH} "in the Start Menu folder"
- LangString Create_Shortcut_Desktop ${LANG_ENGLISH} "on the Desktop"
- LangString not_selected ${LANG_ENGLISH} "not selected"
- LangString text_none ${LANG_ENGLISH} "none"
- ;Installer Sections
- ;Reset config
- LangString SecGrpResetConfig_Text ${LANG_ENGLISH} "Reset ALL OpenCPN configuration files"
- ;Delete Config file (opencpn.ini)
- LangString SecDeleteConfigFile_Text ${LANG_ENGLISH} "Delete config file (opencpn.ini)"
- ;Delete Chart DB (CHRTLIST.DAT)
- LangString SecDeleteChartDB_Text ${LANG_ENGLISH} "Delete Chart Database file (CHRTLIST.DAT)"
- ;Delete SENC directory
- LangString SecDeleteSENC_Text ${LANG_ENGLISH} "Delete SENC directory"
- ;Delete CM93 directory
- LangString SecDeleteCM93_Text ${LANG_ENGLISH} "Delete CM93 Directory"
- ;Delete Log file (opencpn.log)
- LangString SecDeleteLogFile_Text ${LANG_ENGLISH} "Delete Log file (opencpn.log)"
- ;Delete navobj.xml
- LangString SecDeleteNavobjFile_Text ${LANG_ENGLISH} "Delete Navobject file (navobj.xml)"
- ;Set config
- LangString SecSetConfig_Text ${LANG_ENGLISH} "OpenCPN Configuration Settings"
- ;Set language
- LangString SecSetConfigLang_Text ${LANG_ENGLISH} "Set language to $LANG_NAME"
- ;Set chart dir(s)
- LangString SecSetConfigChartDir_Text ${LANG_ENGLISH} "Select Chart Directories"
- ;Uninstaller Sections
- ;Reset config
- LangString UnSecDeleteConfigFolder_Text ${LANG_ENGLISH} "Delete Config folder"
- ;Installer Descriptions
- LangString SecGrpResetConfig_Desc ${LANG_ENGLISH} "Deletes ALL files and subdirectories in the configuration folder."
- LangString SecDeleteConfigFile_Desc ${LANG_ENGLISH} "Deletes the configuration file. This file helds also Routes and Waypoints."
- LangString SecDeleteChartDB_Desc ${LANG_ENGLISH} "Deletes the Chart DB file."
- LangString SecDeleteSENC_Desc ${LANG_ENGLISH} "Deletes the SENC subfolder which helds the Bitmaps and S57 chart cache files."
- LangString SecDeleteCM93_Desc ${LANG_ENGLISH} "Deletes the cm93 subfolder which helds the cached cm93 chart outlines."
- LangString SecDeleteNavobjFile_Desc ${LANG_ENGLISH} "Deletes the file 'navobj.xml' in the config folder. This file contains the Tracks."
- LangString SecDeleteLogFile_Desc ${LANG_ENGLISH} "Deletes the OpenCPN log file 'opencpn.log'."
- LangString SecGrpShortcuts_Desc ${LANG_ENGLISH} "Creates shortcuts in both, the Start Menu and on the Desktop."
- LangString SecShortcutStartmenu_Desc ${LANG_ENGLISH} "Creates shortcuts for OpenCPN and the Uninstaller in the Start Menu - configurable on the next page."
- LangString SecShortcutDesktop_Desc ${LANG_ENGLISH} "Creates a shortcut for OpenCPN on the Desktop."
- LangString SecSetConfig_Desc ${LANG_ENGLISH} "Preconfigure the language setting and the chart dir(s) for OpenCPN. When selected a separate page is shown for configuration."
- ;Uninstaller Descriptions
- LangString UnSecDeleteConfigFolder_Desc ${LANG_ENGLISH} "Deletes the config folder and all its files and subdirectories."
- ;Un-install Link
- LangString Uninstall_Link ${LANG_ENGLISH} "Uninstall @CPACK_PACKAGE_NAME@ @CPACK_PACKAGE_VERSION@"
- ;Multiple Install > 1
- ;Title
- LangString Page_TypeInst_Title ${LANG_ENGLISH} "Previous Installations"
- ;Subtitle
- LangString Page_TypeInst_Subtitle ${LANG_ENGLISH} "$MULTIPLE_INSTALLS installations of OpenCPN found.$\r$\nChoose how you want to install OpenCPN."
- ;Multiple Install = 1
- ;Title
- LangString Page_TypeInst_Title_1 ${LANG_ENGLISH} "Already Installed"
- ;Subtitle
- LangString Page_TypeInst_Subtitle_1 ${LANG_ENGLISH} "Found installed version of OpenCPN.$\r$\nChoose how you want to install OpenCPN."
- ;Version exists
- ;Title
- LangString Page_TypeInst_Title_Exists ${LANG_ENGLISH} "Version Already Installed"
- ;Subtitle
- LangString Page_TypeInst_Subtitle_Exists ${LANG_ENGLISH} "OpenCPN @CPACK_PACKAGE_VERSION@ is already installed.$\r$\nChoose how you want to install OpenCPN."
- ;Label
- LangString Label_TypeInst_Reinstall_Text ${LANG_ENGLISH} "OpenCPN @CPACK_PACKAGE_VERSION@ is already installed on your system. You can reinstall the version now using the previous settings. If you wish to install the program with different settings, cancel installation and un-install the existing version first. Click Next to continue."
- ;Radio button 'Reinstall'
- LangString RB_Reinstall_TypeInst_Text ${LANG_ENGLISH} "Reinstall using previous settings"
- ;Version newer
- ;Label
- LangString Label_TypeInst_Upgrade_Text ${LANG_ENGLISH} "An older version of OpenCPN is installed on your system. Select the installation type you want to perform and click Next to continue."
- ;Radio button 'Upgrade'
- LangString RB_Upgrade_TypeInst_Text ${LANG_ENGLISH} "Upgrade OpenCPN using previous settings (recommended)"
- ;Version older
- ;Label
- LangString Label_TypeInst_Downgrade_Text ${LANG_ENGLISH} "A newer version of OpenCPN is installed on your system. It is not recommended to downgrade to an older version. Select the installation type you want to perform and click Next to continue."
- ;Radio button 'Downgrade'
- LangString RB_Downgrade_TypeInst_Text ${LANG_ENGLISH} "Downgrade OpenCPN using previous settings (recommended)"
- ;Multiple versions
- ;Label
- LangString Label_TypeInst_Parallel_Text ${LANG_ENGLISH} "Setup has detected several installed versions of OpenCPN on your system. It is recommended to have only one version of OpenCPN installed at a time. Select the operation you want to perform and click Next to continue."
- ;Radio button 'Parallel Installation'
- LangString RB_Parallel_TypeInst_Text ${LANG_ENGLISH} "Parallel Installation (advanced users)"
- ;Empty string - needed for Components page
- LangString EmptyString ${LANG_ENGLISH} ""
- ;Finish page
- LangString Show_Readme_Text ${LANG_ENGLISH} "Show Install Log file"
- LangString Finish_Link_Text ${LANG_ENGLISH} "OpenCPN website (Internet connection required)"
- LangString Finish_Link_URL ${LANG_ENGLISH} "http://opencpn.info/?ref=installer&user=$USERS_NAME&lang=$REG_LANG&version=@CPACK_PACKAGE_VERSION@"
- ;Message Boxes
- LangString Msg_UAC_Admin_Retry ${LANG_ENGLISH} "This $Inst_Or_Uninst requires admin access!$\r$\nPlease log on as an Administrator and try again."
- LangString Msg_UAC_Admin_Abort ${LANG_ENGLISH} "This $Inst_Or_Uninst requires admin privileges, aborting!"
- LangString Msg_UAC_Logon_Abort ${LANG_ENGLISH} "Logon service not running, aborting!"
- LangString Msg_UAC_No_Elevation ${LANG_ENGLISH} "Unable to elevate , error $0"
- LangString Msg_Error_Remove_InstDir ${LANG_ENGLISH} "The installation directory$\r$\n'$INSTDIR'$\r$\ncould not be removed because it is not empty."
- LangString Msg_Path_Invalid ${LANG_ENGLISH} "The entered path is invalid!$\r$\n$\r$\nPlease check your input."
- LangString Msg_Path_Installation_Exists ${LANG_ENGLISH} "There already exists an installation of OpenCPN in the given path.$\r$\nIf you wish to use this path, first uninstall the version. Or select another path for this installation."
- LangString Msg_Uninstall_Old_Versions ${LANG_ENGLISH} "Setup has detected at least one older version of OpenCPN which is not compatible with the new version control.$\r$\n\
- It is recommended to first uninstall all of these installations (this does not affect your Config files) and clean-up the Registry.$\r$\n\
- If you click Yes on the next page a listbox with all installation locations will be shown and you will have the possibility to select the installations you wish to uninstall.$\r$\n\
- If you are unsure about possible other previous installations than those shown in the listbox, you can also perform a scan of the entire \
- Harddisk (ATTENTION: This may take several minutes) to find all install locations (recommended).$\r$\n$\r$\n\
- Do you want to uninstall the old version(s)?"
- LangString Msg_Not_All_Old_Uninstalled ${LANG_ENGLISH} "You have not uninstalled all previous installations.$\r$\n$\r$\nDo you want to continue anyway?"
- LangString Msg_Uninstaller_Param_Help ${LANG_ENGLISH} "Uninstaller Help$\r$\n$\r$\nUse the command line or a shortcut to run the uninstaller:$\r$\n$INSTDIR\Uninstall @CPACK_PACKAGE_VERSION@.exe [/?] | [/S], [/type=X]$\r$\n$\r$\nParameters:$\r$\n/?$\tshows this help message box$\r$\n/S$\truns the uninstaller in silent mode$\r$\n$\twill do a full uninstall if called without any type parameter$\r$\n/type=X$\tX must be a digit between 1 and 5$\r$\n$\t1 = Removes only the program files$\r$\n$\t2 = Removes only the program files + preconfig RegKey$\r$\n$\t3 = Removes the program files + config folder$\r$\n$\tpreserves the preconfig RegKey$\r$\n$\t4 = Deletes only the config folder$\r$\n$\t5 = Deletes only the preconfig RegKey$\r$\n$\r$\nEntering any other number or value will quit the uninstaller with a message box without removing or deleting anything."
- LangString Msg_Unknown_Type_Param ${LANG_ENGLISH} "The entered value '$9' for the type parameter is not valid!$\r$\nUse $INSTDIR\Uninstall @CPACK_PACKAGE_VERSION@.exe /?$\r$\nto see a list of valid values."
- ;added on 2010-10-16
- LangString SecGrpShortcuts_Text ${LANG_ENGLISH} "Create Shortcuts"
- LangString SecShortcutStartmenu_Text ${LANG_ENGLISH} "Add Shortcuts to the Start Menu"
- LangString SecShortcutDesktop_Text ${LANG_ENGLISH} "Create Shortcut on the Desktop"
- LangString Installation_Delete_Config ${LANG_ENGLISH} "Delete (existing) Config Subdirectories/ Files"
- ;added on 2010-10-17
- LangString Banner_Scan_Drive ${LANG_ENGLISH} "Scanning Drive $9"
- LangString Banner_Installation_Found_Singular ${LANG_ENGLISH} "Found $counter_tmp installation"
- LangString Banner_Installation_Found_Plural ${LANG_ENGLISH} "Found $counter_tmp installations"
- ;added on 2010-10-21
- LangString Uninstall_Folder_Name ${LANG_ENGLISH} "Uninstall"
- ;added on 2011-06-13
- LangString ^NameDA ${LANG_ENGLISH} "@CPACK_PACKAGE_NAME@ Version @CPACK_PACKAGE_VERSION@"
- LangString Installer ${LANG_ENGLISH} "Installer"
- ;#EOF
|