forked from tsai/mathnet-numerics
Christoph Ruegg
10 years ago
3 changed files with 409 additions and 345 deletions
@ -0,0 +1,342 @@ |
|||||
|
// __ __ _ _ _ _ ______ _______ |
||||
|
// | \/ | | | | | | \ | | ____|__ __| |
||||
|
// | \ / | __ _| |_| |__ | \| | |__ | | |
||||
|
// | |\/| |/ _` | __| '_ \ | . ` | __| | | |
||||
|
// | | | | (_| | |_| | | |_| |\ | |____ | | |
||||
|
// |_| |_|\__,_|\__|_| |_(_)_| \_|______| |_| |
||||
|
// |
||||
|
// Math.NET Numerics - https://numerics.mathdotnet.com |
||||
|
// Copyright (c) Math.NET - Open Source MIT/X11 License |
||||
|
// |
||||
|
// Build Framework using FAKE (http://fsharp.github.io/FAKE) |
||||
|
// |
||||
|
|
||||
|
module BuildFramework |
||||
|
|
||||
|
#I "../packages/build/FAKE/tools" |
||||
|
#r "../packages/build/FAKE/tools/FakeLib.dll" |
||||
|
|
||||
|
open Fake |
||||
|
open Fake.DocuHelper |
||||
|
open Fake.AssemblyInfoFile |
||||
|
open Fake.ReleaseNotesHelper |
||||
|
open Fake.StringHelper |
||||
|
open Fake.Testing.NUnit3 |
||||
|
open System |
||||
|
open System.IO |
||||
|
|
||||
|
Environment.CurrentDirectory <- Path.Combine (__SOURCE_DIRECTORY__ + "/../") |
||||
|
trace Environment.CurrentDirectory |
||||
|
|
||||
|
let header = ReadFile(__SOURCE_DIRECTORY__ </> __SOURCE_FILE__) |> Seq.take 10 |> Seq.map (fun s -> s.Substring(2)) |> toLines |
||||
|
trace header |
||||
|
|
||||
|
type BundleRelease = |
||||
|
{ ReleaseNotesFile: string |
||||
|
AssemblyVersion: string |
||||
|
PackageVersion: string |
||||
|
ReleaseNotes: string } |
||||
|
|
||||
|
type Package = |
||||
|
{ Id: string |
||||
|
Version: string |
||||
|
Title: string |
||||
|
Summary: string |
||||
|
Description: string |
||||
|
ReleaseNotes: string |
||||
|
Tags: string |
||||
|
FsLoader: bool |
||||
|
Authors: string list |
||||
|
Dependencies: NugetFrameworkDependencies list |
||||
|
Files: (string * string option * string option) list } |
||||
|
|
||||
|
type Bundle = |
||||
|
{ Id: string |
||||
|
Version: string |
||||
|
Title: string |
||||
|
ReleaseNotesFile: string |
||||
|
Packages: Package list } |
||||
|
|
||||
|
let release releaseNotesFile : BundleRelease = |
||||
|
let info = LoadReleaseNotes releaseNotesFile |
||||
|
let buildPart = "0" |
||||
|
let assemblyVersion = info.AssemblyVersion + "." + buildPart |
||||
|
let packageVersion = info.NugetVersion |
||||
|
let notes = info.Notes |> List.map (fun l -> l.Replace("*","").Replace("`","")) |> toLines |
||||
|
{ ReleaseNotesFile = releaseNotesFile |
||||
|
AssemblyVersion = assemblyVersion |
||||
|
PackageVersion = packageVersion |
||||
|
ReleaseNotes = notes } |
||||
|
|
||||
|
|
||||
|
// -------------------------------------------------------------------------------------- |
||||
|
// TARGET FRAMEWORKS |
||||
|
// -------------------------------------------------------------------------------------- |
||||
|
|
||||
|
let libnet35 = "lib/net35" |
||||
|
let libnet40 = "lib/net40" |
||||
|
let libnet45 = "lib/net45" |
||||
|
let libpcl7 = "lib/portable-net45+netcore45+MonoAndroid1+MonoTouch1" |
||||
|
let libpcl47 = "lib/portable-net45+sl5+netcore45+MonoAndroid1+MonoTouch1" |
||||
|
let libpcl78 = "lib/portable-net45+netcore45+wp8+MonoAndroid1+MonoTouch1" |
||||
|
let libpcl259 = "lib/portable-net45+netcore45+wpa81+wp8+MonoAndroid1+MonoTouch1" |
||||
|
let libpcl328 = "lib/portable-net4+sl5+netcore45+wpa81+wp8+MonoAndroid1+MonoTouch1" |
||||
|
|
||||
|
|
||||
|
// -------------------------------------------------------------------------------------- |
||||
|
// PREPARE |
||||
|
// -------------------------------------------------------------------------------------- |
||||
|
|
||||
|
let patchVersionInAssemblyInfo path (release:BundleRelease) = |
||||
|
BulkReplaceAssemblyInfoVersions path (fun f -> |
||||
|
{ f with |
||||
|
AssemblyVersion = release.AssemblyVersion |
||||
|
AssemblyFileVersion = release.AssemblyVersion |
||||
|
AssemblyInformationalVersion = release.PackageVersion }) |
||||
|
|
||||
|
let patchVersionInResource path (release:BundleRelease) = |
||||
|
ReplaceInFile |
||||
|
(regex_replace @"\d+\.\d+\.\d+\.\d+" release.AssemblyVersion |
||||
|
>> regex_replace @"\d+,\d+,\d+,\d+" (replace "." "," release.AssemblyVersion)) |
||||
|
path |
||||
|
|
||||
|
|
||||
|
// -------------------------------------------------------------------------------------- |
||||
|
// BUILD |
||||
|
// -------------------------------------------------------------------------------------- |
||||
|
|
||||
|
let buildConfig config subject = MSBuild "" (if hasBuildParam "incremental" then "Build" else "Rebuild") [ "Configuration", config ] subject |> ignore |
||||
|
let build subject = buildConfig "Release" subject |
||||
|
let buildSigned subject = buildConfig "Release-Signed" subject |
||||
|
let buildConfig32 config subject = MSBuild "" (if hasBuildParam "incremental" then "Build" else "Rebuild") [("Configuration", config); ("Platform","Win32")] subject |> ignore |
||||
|
let buildConfig64 config subject = MSBuild "" (if hasBuildParam "incremental" then "Build" else "Rebuild") [("Configuration", config); ("Platform","x64")] subject |> ignore |
||||
|
|
||||
|
|
||||
|
// -------------------------------------------------------------------------------------- |
||||
|
// TEST |
||||
|
// -------------------------------------------------------------------------------------- |
||||
|
|
||||
|
let test target = |
||||
|
let quick p = if hasBuildParam "quick" then { p with Where="cat!=LongRunning" } else p |
||||
|
NUnit3 (fun p -> |
||||
|
{ p with |
||||
|
ShadowCopy = false |
||||
|
Labels = LabelsLevel.Off |
||||
|
TimeOut = TimeSpan.FromMinutes 60. } |> quick) target |
||||
|
|
||||
|
let test32 target = |
||||
|
let quick p = if hasBuildParam "quick" then { p with Where="cat!=LongRunning" } else p |
||||
|
NUnit3 (fun p -> |
||||
|
{ p with |
||||
|
Force32bit = true |
||||
|
ShadowCopy = false |
||||
|
Labels = LabelsLevel.Off |
||||
|
TimeOut = TimeSpan.FromMinutes 60. } |> quick) target |
||||
|
|
||||
|
|
||||
|
// -------------------------------------------------------------------------------------- |
||||
|
// PACKAGES |
||||
|
// -------------------------------------------------------------------------------------- |
||||
|
|
||||
|
let provideLicense path = |
||||
|
ReadFileAsString "LICENSE.md" |
||||
|
|> ConvertTextToWindowsLineBreaks |
||||
|
|> ReplaceFile (path </> "license.txt") |
||||
|
|
||||
|
let provideReadme title releasenotes path = |
||||
|
String.concat Environment.NewLine [header; " " + title; ""; ReadFileAsString releasenotes] |
||||
|
|> ConvertTextToWindowsLineBreaks |
||||
|
|> ReplaceFile (path </> "readme.txt") |
||||
|
|
||||
|
let provideFsLoader includes path = |
||||
|
// inspired by FsLab/tpetricek |
||||
|
let fullScript = ReadFile "src/FSharp/MathNet.Numerics.fsx" |> Array.ofSeq |
||||
|
let startIndex = fullScript |> Seq.findIndex (fun s -> s.Contains "***MathNet.Numerics.fsx***") |
||||
|
let extraScript = fullScript .[startIndex + 1 ..] |> List.ofSeq |
||||
|
let assemblies = [ "MathNet.Numerics.dll"; "MathNet.Numerics.FSharp.dll" ] |
||||
|
let nowarn = ["#nowarn \"211\""] |
||||
|
let references = [ for assembly in assemblies -> sprintf "#r \"%s\"" assembly ] |
||||
|
ReplaceFile (path </> "MathNet.Numerics.fsx") (nowarn @ includes @ references @ extraScript |> toLines) |
||||
|
|
||||
|
let provideFsIfSharpLoader path = |
||||
|
let fullScript = ReadFile "src/FSharp/MathNet.Numerics.IfSharp.fsx" |> Array.ofSeq |
||||
|
let startIndex = fullScript |> Seq.findIndex (fun s -> s.Contains "***MathNet.Numerics.IfSharp.fsx***") |
||||
|
ReplaceFile (path </> "MathNet.Numerics.IfSharp.fsx") (fullScript .[startIndex + 1 ..] |> toLines) |
||||
|
|
||||
|
let provideZipExtraFiles path (bundle:Bundle) = |
||||
|
provideLicense path |
||||
|
provideReadme (sprintf "%s v%s" bundle.Title bundle.Version) bundle.ReleaseNotesFile path |
||||
|
if bundle.Packages |> List.exists (fun p -> p.FsLoader) then |
||||
|
let includes = [ for root in [ ""; "../"; "../../" ] -> sprintf "#I \"%sNet40\"" root ] |
||||
|
provideFsLoader includes path |
||||
|
provideFsIfSharpLoader path |
||||
|
|
||||
|
let provideNuGetExtraFiles path (bundle:Bundle) (pack:Package) = |
||||
|
provideLicense path |
||||
|
provideReadme (sprintf "%s v%s" pack.Title pack.Version) bundle.ReleaseNotesFile path |
||||
|
if pack.FsLoader then |
||||
|
let includes = [ for root in [ ""; "../"; "../../"; "../../../" ] do |
||||
|
for package in bundle.Packages do |
||||
|
yield sprintf "#I \"%spackages/%s/lib/net40/\"" root package.Id |
||||
|
yield sprintf "#I \"%spackages/%s.%s/lib/net40/\"" root package.Id package.Version ] |
||||
|
provideFsLoader includes path |
||||
|
provideFsIfSharpLoader path |
||||
|
|
||||
|
// ZIP |
||||
|
|
||||
|
let zip zipDir filesDir filesFilter (bundle:Bundle) = |
||||
|
CleanDir "obj/Zip" |
||||
|
let workPath = "obj/Zip/" + bundle.Id |
||||
|
CopyDir workPath filesDir filesFilter |
||||
|
provideZipExtraFiles workPath bundle |
||||
|
Zip "obj/Zip/" (zipDir </> sprintf "%s-%s.zip" bundle.Id bundle.Version) !! (workPath + "/**/*.*") |
||||
|
CleanDir "obj/Zip" |
||||
|
|
||||
|
// NUGET |
||||
|
|
||||
|
let updateNuspec (pack:Package) outPath symbols updateFiles spec = |
||||
|
{ spec with ToolPath = "packages/build/NuGet.CommandLine/tools/NuGet.exe" |
||||
|
OutputPath = outPath |
||||
|
WorkingDir = "obj/NuGet" |
||||
|
Version = pack.Version |
||||
|
ReleaseNotes = pack.ReleaseNotes |
||||
|
Project = pack.Id |
||||
|
Title = pack.Title |
||||
|
Summary = pack.Summary |
||||
|
Description = pack.Description |
||||
|
Tags = pack.Tags |
||||
|
Authors = pack.Authors |
||||
|
DependenciesByFramework = pack.Dependencies |
||||
|
SymbolPackage = symbols |
||||
|
Files = updateFiles pack.Files |
||||
|
Publish = false } |
||||
|
|
||||
|
let nugetPack bundle outPath = |
||||
|
CleanDir "obj/NuGet" |
||||
|
for pack in bundle.Packages do |
||||
|
provideNuGetExtraFiles "obj/NuGet" bundle pack |
||||
|
let withLicenseReadme f = [ "license.txt", None, None; "readme.txt", None, None; ] @ f |
||||
|
let withoutSymbolsSources f = |
||||
|
List.choose (function | (_, Some (target:string), _) when target.StartsWith("src") -> None |
||||
|
| (s, t, None) -> Some (s, t, Some ("**/*.pdb")) |
||||
|
| (s, t, Some e) -> Some (s, t, Some (e + ";**/*.pdb"))) f |
||||
|
// first pass - generates symbol + normal package. NuGet does drop the symbols from the normal package, but unfortunately not the sources. |
||||
|
NuGet (updateNuspec pack outPath NugetSymbolPackage.Nuspec withLicenseReadme) "build/MathNet.Numerics.nuspec" |
||||
|
// second pass - generate only normal package, again, but this time explicitly drop the sources (and the debug symbols) |
||||
|
NuGet (updateNuspec pack outPath NugetSymbolPackage.None (withLicenseReadme >> withoutSymbolsSources)) "build/MathNet.Numerics.nuspec" |
||||
|
CleanDir "obj/NuGet" |
||||
|
|
||||
|
let nugetPackExtension bundle outPath = |
||||
|
CleanDir "obj/NuGet" |
||||
|
for pack in bundle.Packages do |
||||
|
provideNuGetExtraFiles "obj/NuGet" bundle pack |
||||
|
let withLicenseReadme f = [ "license.txt", None, None; "readme.txt", None, None; ] @ f |
||||
|
NuGet (updateNuspec pack outPath NugetSymbolPackage.None withLicenseReadme) "build/MathNet.Numerics.Extension.nuspec" |
||||
|
CleanDir "obj/NuGet" |
||||
|
|
||||
|
|
||||
|
// -------------------------------------------------------------------------------------- |
||||
|
// Documentation |
||||
|
// -------------------------------------------------------------------------------------- |
||||
|
|
||||
|
let provideDocExtraFiles extraDocs releaseNotesDocs = |
||||
|
for (fileName, docName) in extraDocs do CopyFile ("docs/content" </> docName) fileName |
||||
|
for (fileName, docName, title) in releaseNotesDocs do |
||||
|
String.concat Environment.NewLine |
||||
|
[ "# " + title |
||||
|
"[Math.NET Numerics](ReleaseNotes.html) | [Data Extensions](ReleaseNotes-Data.html) | [MKL Native Provider](ReleaseNotes-MKL.html) | [OpenBLAS Native Provider](ReleaseNotes-OpenBLAS.html)" |
||||
|
"" |
||||
|
ReadFileAsString fileName ] |
||||
|
|> ReplaceFile ("docs/content" </> docName) |
||||
|
|
||||
|
let buildDocumentationTarget fsiargs target = |
||||
|
trace (sprintf "Building documentation (%s), this could take some time, please wait..." target) |
||||
|
let fakePath = "packages" </> "build" </> "FAKE" </> "tools" </> "FAKE.exe" |
||||
|
let fakeStartInfo script workingDirectory args fsiargs environmentVars = |
||||
|
(fun (info: System.Diagnostics.ProcessStartInfo) -> |
||||
|
info.FileName <- System.IO.Path.GetFullPath fakePath |
||||
|
info.Arguments <- sprintf "%s --fsiargs -d:FAKE %s \"%s\"" args fsiargs script |
||||
|
info.WorkingDirectory <- workingDirectory |
||||
|
let setVar k v = |
||||
|
info.EnvironmentVariables.[k] <- v |
||||
|
for (k, v) in environmentVars do |
||||
|
setVar k v |
||||
|
setVar "MSBuild" msBuildExe |
||||
|
setVar "GIT" Git.CommandHelper.gitPath |
||||
|
setVar "FSI" fsiPath) |
||||
|
let executeFAKEWithOutput workingDirectory script fsiargs envArgs = |
||||
|
let exitCode = |
||||
|
ExecProcessWithLambdas |
||||
|
(fakeStartInfo script workingDirectory "" fsiargs envArgs) |
||||
|
TimeSpan.MaxValue false ignore ignore |
||||
|
System.Threading.Thread.Sleep 1000 |
||||
|
exitCode |
||||
|
let exit = executeFAKEWithOutput "docs/tools" "build-docs.fsx" fsiargs ["target", target] |
||||
|
if exit <> 0 then |
||||
|
failwith "Generating documentation failed" |
||||
|
() |
||||
|
|
||||
|
let generateDocs fail local = |
||||
|
let args = if local then "" else "--define:RELEASE" |
||||
|
try |
||||
|
buildDocumentationTarget args "Default" |
||||
|
traceImportant "Documentation generated" |
||||
|
with |
||||
|
| e when not fail -> |
||||
|
failwith "Generating documentation failed" |
||||
|
|
||||
|
|
||||
|
// -------------------------------------------------------------------------------------- |
||||
|
// Publishing |
||||
|
// Requires permissions; intended only for maintainers |
||||
|
// -------------------------------------------------------------------------------------- |
||||
|
|
||||
|
let publishReleaseTag title prefix (release:BundleRelease) = |
||||
|
// inspired by Deedle/tpetricek |
||||
|
let tagName = prefix + "v" + release.PackageVersion |
||||
|
let tagMessage = String.concat Environment.NewLine [title + " v" + release.PackageVersion; ""; release.ReleaseNotes ] |
||||
|
let cmd = sprintf """tag -a %s -m "%s" """ tagName tagMessage |
||||
|
Git.CommandHelper.runSimpleGitCommand "." cmd |> printfn "%s" |
||||
|
let _, remotes, _ = Git.CommandHelper.runGitCommand "." "remote -v" |
||||
|
let main = remotes |> Seq.find (fun s -> s.Contains("(push)") && s.Contains("mathnet/mathnet-numerics")) |
||||
|
let remoteName = main.Split('\t').[0] |
||||
|
Git.Branches.pushTag "." remoteName tagName |
||||
|
|
||||
|
let publishNuGet packageFiles = |
||||
|
// TODO: Migrate to NuGet helper once it supports direct (non-integrated) operations |
||||
|
let rec impl trials file = |
||||
|
trace ("NuGet Push: " + System.IO.Path.GetFileName(file) + ".") |
||||
|
try |
||||
|
let args = sprintf "push \"%s\"" (FullName file) |
||||
|
let result = |
||||
|
ExecProcess (fun info -> |
||||
|
info.FileName <- "packages/build/NuGet.CommandLine/tools/NuGet.exe" |
||||
|
info.WorkingDirectory <- FullName "obj/NuGet" |
||||
|
info.Arguments <- args) (TimeSpan.FromMinutes 10.) |
||||
|
if result <> 0 then failwith "Error during NuGet push." |
||||
|
with exn -> |
||||
|
if trials > 0 then impl (trials-1) file |
||||
|
else () |
||||
|
Seq.iter (impl 3) packageFiles |
||||
|
|
||||
|
let publishMirrors () = |
||||
|
let repo = "../mirror-numerics" |
||||
|
Git.CommandHelper.runSimpleGitCommand repo "remote update" |> printfn "%s" |
||||
|
Git.CommandHelper.runSimpleGitCommand repo "push mirrors" |> printfn "%s" |
||||
|
|
||||
|
let publishDocs (release:BundleRelease) = |
||||
|
let repo = "../mathnet-websites" |
||||
|
Git.Branches.pull repo "origin" "master" |
||||
|
CopyRecursive "out/docs" "../mathnet-websites/numerics" true |> printfn "%A" |
||||
|
Git.Staging.StageAll repo |
||||
|
Git.Commit.Commit repo (sprintf "Numerics: %s docs update" release.PackageVersion) |
||||
|
Git.Branches.pushBranch repo "origin" "master" |
||||
|
|
||||
|
let publishApi (release:BundleRelease) = |
||||
|
let repo = "../mathnet-websites" |
||||
|
Git.Branches.pull repo "origin" "master" |
||||
|
CleanDir "../mathnet-websites/numerics/api" |
||||
|
CopyRecursive "out/api" "../mathnet-websites/numerics/api" true |> printfn "%A" |
||||
|
Git.Staging.StageAll repo |
||||
|
Git.Commit.Commit repo (sprintf "Numerics: %s api update" release.PackageVersion) |
||||
|
Git.Branches.pushBranch repo "origin" "master" |
||||
Loading…
Reference in new issue