Fake.Deploy Running custom Windows Service locks deployment files and thus updates - f#

Question

I'd like to deploy some Windows Services using FAKE.
After deploying the package using a FAKE build script I install the services using the after deployment build script (*.fsx).
This is all working great except that as soon as the service is started, the files become locked. This prohibits any further (update) deployments.
Is it somehow possible to stop the service before FAKE.Deploy tries to overwrite the files?

Answer 1

Just do not install your service from directory where FAKE unzip it.
Do it like this:
Check that target directory is exist. Create it if it is not
Check if service is installed and uninstall in this case
Clean target directory (to be sure that everything is removed)
Copy files of new version
Install new version of service in target directory
Deployment script from my project:
#r #"c:\Project\FAKE.Deploy\bin\FAKE\tools\FakeLib.dll"
open Fake
open System
open System.IO
let targetDirectory = #"c:\Project\Service"
let runScript file =
if File.Exists file then
let result, messages =
ExecProcessRedirected
(fun info ->
info.FileName <- file
info.WorkingDirectory <- targetDirectory)
(TimeSpan.FromMinutes 10.0)
for msg in messages do
(if msg.IsError then traceError else traceImportant) msg.Message
if not result then
failwithf "MyProc.exe returned with a non-zero exit code"
else
traceImportant <| sprintf "File %s is not found" file
// *** Define Targets ***
Target "EnsureDirectory" (fun () ->
trace <| sprintf " --- Ensure that directory '%s' is exist --- " targetDirectory
CreateDir targetDirectory
)
Target "UninstallService" (fun () ->
trace " --- Uninstall service --- "
targetDirectory ## "uninstall.bat"
|> runScript
)
Target "CleanDirectory" (fun () ->
trace " --- Clean target directory --- "
CleanDir targetDirectory
)
Target "CopyFiles" (fun () ->
trace " --- Copy new files --- "
XCopy (__SOURCE_DIRECTORY__ ## "content") targetDirectory
)
Target "InstallService" (fun () ->
trace " --- Install service --- "
targetDirectory ## "install.bat"
|> runScript
)
Target "Deploy" DoNothing
// *** Define Dependencies ***
"EnsureDirectory"
==> "UninstallService"
==> "CleanDirectory"
==> "CopyFiles"
==> "InstallService"
==> "Deploy"
// *** Start Build ***
RunParameterTargetOrDefault "target" "Deploy"