diff --git a/.gitignore b/.gitignore new file mode 100644 index 0000000..1f0f1f0 --- /dev/null +++ b/.gitignore @@ -0,0 +1,458 @@ +## Ignore Visual Studio temporary files, build results, and +## files generated by popular Visual Studio add-ons. +## +## Get latest from https://github.com/github/gitignore/blob/master/VisualStudio.gitignore + +# User-specific files +*.rsuser +*.suo +*.user +*.userosscache +*.sln.docstates + +# User-specific files (MonoDevelop/Xamarin Studio) +*.userprefs + +# Mono auto generated files +mono_crash.* + +# Build results +[Dd]ebug/ +[Dd]ebugPublic/ +[Rr]elease/ +[Rr]eleases/ +x64/ +x86/ +[Ww][Ii][Nn]32/ +[Aa][Rr][Mm]/ +[Aa][Rr][Mm]64/ +bld/ +[Bb]in/ +[Oo]bj/ +[Ll]og/ +[Ll]ogs/ + +# Visual Studio 2015/2017 cache/options directory +.vs/ +# Uncomment if you have tasks that create the project's static files in wwwroot +#wwwroot/ + +# Visual Studio 2017 auto generated files +Generated\ Files/ + +# MSTest test Results +[Tt]est[Rr]esult*/ +[Bb]uild[Ll]og.* + +# NUnit +*.VisualState.xml +TestResult.xml +nunit-*.xml + +# Build Results of an ATL Project +[Dd]ebugPS/ +[Rr]eleasePS/ +dlldata.c + +# Benchmark Results +BenchmarkDotNet.Artifacts/ + +# .NET Core +project.lock.json +project.fragment.lock.json +artifacts/ + +# Tye +.tye/ + +# ASP.NET Scaffolding +ScaffoldingReadMe.txt + +# StyleCop +StyleCopReport.xml + +# Files built by Visual Studio +*_i.c +*_p.c +*_h.h +*.ilk +*.meta +*.obj +*.iobj +*.pch +*.pdb +*.ipdb +*.pgc +*.pgd +*.rsp +*.sbr +*.tlb +*.tli +*.tlh +*.tmp +*.tmp_proj +*_wpftmp.csproj +*.log +*.vspscc +*.vssscc +.builds +*.pidb +*.svclog +*.scc + +# Chutzpah Test files +_Chutzpah* + +# Visual C++ cache files +ipch/ +*.aps +*.ncb +*.opendb +*.opensdf +*.sdf +*.cachefile +*.VC.db +*.VC.VC.opendb + +# Visual Studio profiler +*.psess +*.vsp +*.vspx +*.sap + +# Visual Studio Trace Files +*.e2e + +# TFS 2012 Local Workspace +$tf/ + +# Guidance Automation Toolkit +*.gpState + +# ReSharper is a .NET coding add-in +_ReSharper*/ +*.[Rr]e[Ss]harper +*.DotSettings.user + +# TeamCity is a build add-in +_TeamCity* + +# DotCover is a Code Coverage Tool +*.dotCover + +# AxoCover is a Code Coverage Tool +.axoCover/* +!.axoCover/settings.json + +# Coverlet is a free, cross platform Code Coverage Tool +coverage*.json +coverage*.xml +coverage*.info + +# Visual Studio code coverage results +*.coverage +*.coveragexml + +# NCrunch +_NCrunch_* +.*crunch*.local.xml +nCrunchTemp_* + +# MightyMoose +*.mm.* +AutoTest.Net/ + +# Web workbench (sass) +.sass-cache/ + +# Installshield output folder +[Ee]xpress/ + +# DocProject is a documentation generator add-in +DocProject/buildhelp/ +DocProject/Help/*.HxT +DocProject/Help/*.HxC +DocProject/Help/*.hhc +DocProject/Help/*.hhk +DocProject/Help/*.hhp +DocProject/Help/Html2 +DocProject/Help/html + +# Click-Once directory +publish/ + +# Publish Web Output +*.[Pp]ublish.xml +*.azurePubxml +# Note: Comment the next line if you want to checkin your web deploy settings, +# but database connection strings (with potential passwords) will be unencrypted +*.pubxml +*.publishproj + +# Microsoft Azure Web App publish settings. Comment the next line if you want to +# checkin your Azure Web App publish settings, but sensitive information contained +# in these scripts will be unencrypted +PublishScripts/ + +# NuGet Packages +*.nupkg +# NuGet Symbol Packages +*.snupkg +# The packages folder can be ignored because of Package Restore +**/[Pp]ackages/* +# except build/, which is used as an MSBuild target. +!**/[Pp]ackages/build/ +# Uncomment if necessary however generally it will be regenerated when needed +#!**/[Pp]ackages/repositories.config +# NuGet v3's project.json files produces more ignorable files +*.nuget.props +*.nuget.targets + +# Microsoft Azure Build Output +csx/ +*.build.csdef + +# Microsoft Azure Emulator +ecf/ +rcf/ + +# Windows Store app package directories and files +AppPackages/ +BundleArtifacts/ +Package.StoreAssociation.xml +_pkginfo.txt +*.appx +*.appxbundle +*.appxupload + +# Visual Studio cache files +# files ending in .cache can be ignored +*.[Cc]ache +# but keep track of directories ending in .cache +!?*.[Cc]ache/ + +# Others +ClientBin/ +~$* +*~ +*.dbmdl +*.dbproj.schemaview +*.jfm +*.pfx +*.publishsettings +orleans.codegen.cs + +# Including strong name files can present a security risk +# (https://github.com/github/gitignore/pull/2483#issue-259490424) +#*.snk + +# Since there are multiple workflows, uncomment next line to ignore bower_components +# (https://github.com/github/gitignore/pull/1529#issuecomment-104372622) +#bower_components/ + +# RIA/Silverlight projects +Generated_Code/ + +# Backup & report files from converting an old project file +# to a newer Visual Studio version. Backup files are not needed, +# because we have git ;-) +_UpgradeReport_Files/ +Backup*/ +UpgradeLog*.XML +UpgradeLog*.htm +ServiceFabricBackup/ +*.rptproj.bak + +# SQL Server files +*.mdf +*.ldf +*.ndf + +# Business Intelligence projects +*.rdl.data +*.bim.layout +*.bim_*.settings +*.rptproj.rsuser +*- [Bb]ackup.rdl +*- [Bb]ackup ([0-9]).rdl +*- [Bb]ackup ([0-9][0-9]).rdl + +# Microsoft Fakes +FakesAssemblies/ + +# GhostDoc plugin setting file +*.GhostDoc.xml + +# Node.js Tools for Visual Studio +.ntvs_analysis.dat +node_modules/ + +# Visual Studio 6 build log +*.plg + +# Visual Studio 6 workspace options file +*.opt + +# Visual Studio 6 auto-generated workspace file (contains which files were open etc.) +*.vbw + +# Visual Studio LightSwitch build output +**/*.HTMLClient/GeneratedArtifacts +**/*.DesktopClient/GeneratedArtifacts +**/*.DesktopClient/ModelManifest.xml +**/*.Server/GeneratedArtifacts +**/*.Server/ModelManifest.xml +_Pvt_Extensions + +# Paket dependency manager +.paket/paket.exe +paket-files/ + +# FAKE - F# Make +.fake/ + +# CodeRush personal settings +.cr/personal + +# Python Tools for Visual Studio (PTVS) +__pycache__/ +*.pyc + +# Cake - Uncomment if you are using it +# tools/** +# !tools/packages.config + +# Tabs Studio +*.tss + +# Telerik's JustMock configuration file +*.jmconfig + +# BizTalk build output +*.btp.cs +*.btm.cs +*.odx.cs +*.xsd.cs + +# OpenCover UI analysis results +OpenCover/ + +# Azure Stream Analytics local run output +ASALocalRun/ + +# MSBuild Binary and Structured Log +*.binlog + +# NVidia Nsight GPU debugger configuration file +*.nvuser + +# MFractors (Xamarin productivity tool) working folder +.mfractor/ + +# Local History for Visual Studio +.localhistory/ + +# BeatPulse healthcheck temp database +healthchecksdb + +# Backup folder for Package Reference Convert tool in Visual Studio 2017 +MigrationBackup/ + +# Ionide (cross platform F# VS Code tools) working folder +.ionide/ + +# Fody - auto-generated XML schema +FodyWeavers.xsd + +## +## Visual studio for Mac +## + + +# globs +Makefile.in +*.userprefs +*.usertasks +config.make +config.status +aclocal.m4 +install-sh +autom4te.cache/ +*.tar.gz +tarballs/ +test-results/ + +# Mac bundle stuff +*.dmg +*.app + +# content below from: https://github.com/github/gitignore/blob/master/Global/macOS.gitignore +# General +.DS_Store +.AppleDouble +.LSOverride + +# Icon must end with two \r +Icon + + +# Thumbnails +._* + +# Files that might appear in the root of a volume +.DocumentRevisions-V100 +.fseventsd +.Spotlight-V100 +.TemporaryItems +.Trashes +.VolumeIcon.icns +.com.apple.timemachine.donotpresent + +# Directories potentially created on remote AFP share +.AppleDB +.AppleDesktop +Network Trash Folder +Temporary Items +.apdisk + +# content below from: https://github.com/github/gitignore/blob/master/Global/Windows.gitignore +# Windows thumbnail cache files +Thumbs.db +ehthumbs.db +ehthumbs_vista.db + +# Dump file +*.stackdump + +# Folder config file +[Dd]esktop.ini + +# Recycle Bin used on file shares +$RECYCLE.BIN/ + +# Windows Installer files +*.cab +*.msi +*.msix +*.msm +*.msp + +# Windows shortcuts +*.lnk + +# JetBrains Rider +.idea/ +*.sln.iml + +## +## Visual Studio Code +## +.vscode/* +!.vscode/settings.json +!.vscode/tasks.json +!.vscode/launch.json +!.vscode/extensions.json + +nuget.config +.store/ + diff --git a/Base.Tests/Base.Tests.csproj b/Base.Tests/Base.Tests.csproj new file mode 100644 index 0000000..83e7b12 --- /dev/null +++ b/Base.Tests/Base.Tests.csproj @@ -0,0 +1,21 @@ + + + + net6.0 + enable + + false + + + + + + + + + + + + + + diff --git a/Base.Tests/Extensions/FSharpExtensionTests.cs b/Base.Tests/Extensions/FSharpExtensionTests.cs new file mode 100644 index 0000000..f83b1c3 --- /dev/null +++ b/Base.Tests/Extensions/FSharpExtensionTests.cs @@ -0,0 +1,17 @@ +using CommonCore.Base.Extensions; +using CommonCore.Base.Structures; +using Microsoft.FSharp.Core; +using NUnit.Framework; + +namespace Base.Tests.Extensions; + +public class FSharpExtensionTests +{ + [Test] + public void TestNoneIntToMaybe() => + Assert.AreEqual(Maybe.Empty(), FSharpOption.None.ToMaybe()); + + [Test] + public void TestSomeIntToMaybe() => + Assert.AreEqual(Maybe.Create(25), FSharpOption.Some(25).ToMaybe()); +} \ No newline at end of file diff --git a/Base.Tests/Extensions/MaybeExtensionTests.cs b/Base.Tests/Extensions/MaybeExtensionTests.cs new file mode 100644 index 0000000..de5213c --- /dev/null +++ b/Base.Tests/Extensions/MaybeExtensionTests.cs @@ -0,0 +1,31 @@ +using System; +using CommonCore.Base.Extensions; +using CommonCore.Base.Structures; +using NUnit.Framework; + +namespace Base.Tests.Extensions; + +public class MaybeExtensionTests +{ + [Test] + public void EnumerableFirstOrEmptyTests() + { + Assert.AreEqual(Maybe.Empty(), Array.Empty().FirstOrEmpty()); + Assert.AreEqual(Maybe.Create("banana"), new[] { "banana" }.FirstOrEmpty()); + } + + [Test] + public void TestToMaybe() + { + Assert.AreEqual(Maybe.Empty(), Maybe.Empty()); + Assert.AreEqual(Maybe.Create("banana"), "banana".ToMaybe()); + Assert.AreNotEqual(Maybe.Create(293921), Maybe.Create(2)); + } + + [Test] + public void MaybeNullableTests() + { + Assert.IsNull(Maybe.Empty().ToNullable()); + Assert.IsNull(Maybe.Create(0, _ => false).ToNullable()); + } +} \ No newline at end of file diff --git a/Base.Tests/Extensions/NullableExtensionTests.cs b/Base.Tests/Extensions/NullableExtensionTests.cs new file mode 100644 index 0000000..c8e45fe --- /dev/null +++ b/Base.Tests/Extensions/NullableExtensionTests.cs @@ -0,0 +1,24 @@ +using CommonCore.Base.Extensions; +using CommonCore.Base.Structures; +using NUnit.Framework; + +namespace Base.Tests.Extensions; + +public class NullableExtensionTests +{ + [Test] + public void TestNullableStructOfNullToMaybe() => + Assert.AreEqual(Maybe.Empty(), ((int?)null).ToMaybe()); + + [Test] + public void TestNullableStructOfValueToMaybe() => + Assert.AreEqual(Maybe.Create(25), ((int?)25).ToMaybe()); + + [Test] + public void TestNullableRefOfNullToMaybe() => + Assert.AreEqual(Maybe.Empty(), ((object?)null).ToMaybe()); + + [Test] + public void TestNullableRefOfValueToMaybe() => + Assert.AreEqual(Maybe.Create(new {}), ((object?)new {}).ToMaybe()); +} \ No newline at end of file diff --git a/Base.Tests/Extensions/StringExtensionTests.cs b/Base.Tests/Extensions/StringExtensionTests.cs new file mode 100644 index 0000000..d80b4e9 --- /dev/null +++ b/Base.Tests/Extensions/StringExtensionTests.cs @@ -0,0 +1,37 @@ +using CommonCore.Base.Extensions; +using CommonCore.Base.Structures; +using NUnit.Framework; + +namespace Base.Tests.Extensions; + +public class StringExtensionTests +{ + [Test] + [TestCase("banana", "banana", ExpectedResult = true)] + [TestCase("banana", "baNAnA", ExpectedResult = true)] + [TestCase("tuckerIsMyDog", "tuckerisMYdog", ExpectedResult = true)] + [TestCase("if I were a dog, I'd go insane", "how do dogs not get bored", ExpectedResult = false)] + public bool EqualsIgnoreCaseTests(string inputOne, string inputTwo) => + inputOne.EqualsIgnoreCase(inputTwo); + + [Test] + [TestCase("bananas have potassium", "banana", ExpectedResult = true)] + [TestCase("you can't spell trucker without ucker", "UCKER", ExpectedResult = true)] + public bool ContainsIgnoreCaseTests(string haystack, string needle) => + haystack.ContainsIgnoreCase(needle); + + [Test] + public void StringToCouldBeTests() + { +#pragma warning disable CS8604 + Assert.AreEqual(Maybe.Empty(), (null as string).ToMaybe()); +#pragma warning restore CS8604 + Assert.AreEqual(Maybe.Create("banana"), "banana".ToMaybe()); + } + + [Test] + [TestCase("banana", 1, ExpectedResult = "b")] + [TestCase("This is a longer sentence. I would like it capped at 30 characters.", 30, ExpectedResult = "This is a longer sentence. I w")] + public string StringTruncateTests(string str, int maxLength) => + str.Truncate(maxLength); +} \ No newline at end of file diff --git a/Base/Base.csproj b/Base/Base.csproj new file mode 100644 index 0000000..6d44db5 --- /dev/null +++ b/Base/Base.csproj @@ -0,0 +1,21 @@ + + + + net6.0 + enable + enable + CommonCore.Base + true + CommonCore.Base + Kyle Ratti + + CommonCore.Base + https://github.com/kyleratti/CommonCore + 1.0.6 + + + + + + + diff --git a/Base/Extensions/FSharpExtensions.cs b/Base/Extensions/FSharpExtensions.cs new file mode 100644 index 0000000..2808a0a --- /dev/null +++ b/Base/Extensions/FSharpExtensions.cs @@ -0,0 +1,12 @@ +using CommonCore.Base.Structures; +using Microsoft.FSharp.Core; + +namespace CommonCore.Base.Extensions; + +public static class FSharpExtensions +{ + public static Maybe ToMaybe(this FSharpOption option) => + FSharpOption.get_IsSome(option) + ? Maybe.Create(option.Value) + : Maybe.Empty(); +} \ No newline at end of file diff --git a/Base/Extensions/NullableExtensions.cs b/Base/Extensions/NullableExtensions.cs new file mode 100644 index 0000000..8670d09 --- /dev/null +++ b/Base/Extensions/NullableExtensions.cs @@ -0,0 +1,12 @@ +using CommonCore.Base.Structures; + +namespace CommonCore.Base.Extensions; + +public static class NullableExtensions +{ + public static Maybe ToMaybe(this T? item) where T : struct => + item ?? Maybe.Empty(); + + public static Maybe ToMaybe(this T? item) where T : class => + item ?? Maybe.Empty(); +} \ No newline at end of file diff --git a/Base/Extensions/StringExtensions.cs b/Base/Extensions/StringExtensions.cs new file mode 100644 index 0000000..07a1356 --- /dev/null +++ b/Base/Extensions/StringExtensions.cs @@ -0,0 +1,18 @@ +namespace CommonCore.Base.Extensions; + +public static class StringExtensions +{ + public static bool EqualsIgnoreCase(this string str, string otherString) => + str.Equals(otherString, StringComparison.OrdinalIgnoreCase); + + public static bool ContainsIgnoreCase(this string str, string otherString) => + str.IndexOf(otherString, StringComparison.OrdinalIgnoreCase) != -1; + + /// + /// Truncate a string to exactly characters. + /// + /// + /// The maximum number of characters. If has fewer characters, it will be truncated to the length of . + public static string Truncate(this string str, int maxLength) => + str[..Math.Min(str.Length, maxLength)]; +} \ No newline at end of file diff --git a/Base/Structures/Maybe.cs b/Base/Structures/Maybe.cs new file mode 100644 index 0000000..fcb8ac4 --- /dev/null +++ b/Base/Structures/Maybe.cs @@ -0,0 +1,68 @@ +// Normally we wouldn't want to disable Nullable references, but in this case we want to. +// We're assuming that if you're following Maybe conventions, you won't be hitting null ref exceptions. +#pragma warning disable CS8601 +namespace CommonCore.Base.Structures; + +[Serializable] +public struct Maybe +{ + private readonly T _value; + public readonly bool HasValue; + + private Maybe(T val = default!, bool hasValue = true) + { + _value = val; + HasValue = hasValue; + } + + public T Value + { + get + { + if (!HasValue) + throw new InvalidOperationException($"{nameof(Maybe)} value is empty"); + + return _value; + } + } + + public T OrValue(T orVal) => + HasValue ? Value : orVal; + + public bool Try(out T val) + { + val = HasValue ? Value : default; + + return HasValue; + } + + public T OrThrow(string msg) => + HasValue ? Value : throw new Exception(msg); + + public Maybe Map(Func transformer) => + HasValue + ? Maybe.Create(transformer(Value)) + : Maybe.Empty(); + + public object ToDbValue() => + HasValue && Value is not null + ? Value + : DBNull.Value; + + public static Maybe Create(T val, bool hasValue = true) => new(val, hasValue); + + public static Maybe Create(T val, Func hasValue) => new(val, hasValue(val)); + + public static Maybe Empty() => new(default!, hasValue: false); + + public static implicit operator Maybe(T val) => Create(val); + + public static explicit operator T(Maybe val) => val.Value; + + public override string ToString() + { + return (Try(out var val) + ? val?.ToString() + : base.ToString())!; + } +} diff --git a/Base/Structures/MaybeExtensions.cs b/Base/Structures/MaybeExtensions.cs new file mode 100644 index 0000000..fd45412 --- /dev/null +++ b/Base/Structures/MaybeExtensions.cs @@ -0,0 +1,17 @@ +using Microsoft.FSharp.Core; + +namespace CommonCore.Base.Structures; + +public static class MaybeExtensions +{ + public static Maybe FirstOrEmpty(this IEnumerable col) => + col.FirstOrDefault() ?? Maybe.Empty(); + + public static T? ToNullable(this Maybe item) where T : struct => + item.HasValue ? item.Value : null; + + public static FSharpOption ToFSharpOption(this Maybe cb) => + cb.HasValue + ? FSharpOption.Some(cb.Value) + : FSharpOption.None; +} \ No newline at end of file diff --git a/Base/version.json b/Base/version.json new file mode 100644 index 0000000..25a7ebd --- /dev/null +++ b/Base/version.json @@ -0,0 +1,4 @@ +{ + "version": "1.0-prerelease", + "inherit": true +} diff --git a/CommonCore.sln b/CommonCore.sln new file mode 100644 index 0000000..fd25afc --- /dev/null +++ b/CommonCore.sln @@ -0,0 +1,28 @@ + +Microsoft Visual Studio Solution File, Format Version 12.00 +Project("{FAE04EC0-301F-11D3-BF4B-00C04F79EFBC}") = "Base", "Base\Base.csproj", "{DF6E18E1-1065-44E4-BF02-DB1CE247D0E4}" +EndProject +Project("{FAE04EC0-301F-11D3-BF4B-00C04F79EFBC}") = "Base.Tests", "Base.Tests\Base.Tests.csproj", "{50A75644-A1C3-4495-9DEB-DBB12D9334B5}" +EndProject +Project("{F2A71F9B-5D33-465A-A702-920D77279786}") = "Db", "Db\Db.fsproj", "{500FBEA7-C8FB-44EC-AAFD-B21FAFF08E93}" +EndProject +Global + GlobalSection(SolutionConfigurationPlatforms) = preSolution + Debug|Any CPU = Debug|Any CPU + Release|Any CPU = Release|Any CPU + EndGlobalSection + GlobalSection(ProjectConfigurationPlatforms) = postSolution + {DF6E18E1-1065-44E4-BF02-DB1CE247D0E4}.Debug|Any CPU.ActiveCfg = Debug|Any CPU + {DF6E18E1-1065-44E4-BF02-DB1CE247D0E4}.Debug|Any CPU.Build.0 = Debug|Any CPU + {DF6E18E1-1065-44E4-BF02-DB1CE247D0E4}.Release|Any CPU.ActiveCfg = Release|Any CPU + {DF6E18E1-1065-44E4-BF02-DB1CE247D0E4}.Release|Any CPU.Build.0 = Release|Any CPU + {50A75644-A1C3-4495-9DEB-DBB12D9334B5}.Debug|Any CPU.ActiveCfg = Debug|Any CPU + {50A75644-A1C3-4495-9DEB-DBB12D9334B5}.Debug|Any CPU.Build.0 = Debug|Any CPU + {50A75644-A1C3-4495-9DEB-DBB12D9334B5}.Release|Any CPU.ActiveCfg = Release|Any CPU + {50A75644-A1C3-4495-9DEB-DBB12D9334B5}.Release|Any CPU.Build.0 = Release|Any CPU + {500FBEA7-C8FB-44EC-AAFD-B21FAFF08E93}.Debug|Any CPU.ActiveCfg = Debug|Any CPU + {500FBEA7-C8FB-44EC-AAFD-B21FAFF08E93}.Debug|Any CPU.Build.0 = Debug|Any CPU + {500FBEA7-C8FB-44EC-AAFD-B21FAFF08E93}.Release|Any CPU.ActiveCfg = Release|Any CPU + {500FBEA7-C8FB-44EC-AAFD-B21FAFF08E93}.Release|Any CPU.Build.0 = Release|Any CPU + EndGlobalSection +EndGlobal diff --git a/CommonCore.sln.DotSettings b/CommonCore.sln.DotSettings new file mode 100644 index 0000000..21340f4 --- /dev/null +++ b/CommonCore.sln.DotSettings @@ -0,0 +1,2 @@ + + True \ No newline at end of file diff --git a/Db/Db.fs b/Db/Db.fs new file mode 100644 index 0000000..610267a --- /dev/null +++ b/Db/Db.fs @@ -0,0 +1,66 @@ +namespace CommonCore.Db + +open System +open System.Data + +module Db = + // Data Readers + let toNullable (value : 'a option) = + match value with + | None -> DBNull.Value :> obj + | Some x -> x :> obj + + let tryGetBool (ord : int32) (record : IDataRecord) = + if ord |> record.IsDBNull then + None + else + ord |> record.GetBoolean |> Some + + let getBool (ord : int32) (record : IDataRecord) = + match record |> tryGetBool ord with + | Some x -> x + | None -> (raise (InvalidOperationException $"Ordinal {ord} is null")) + + let tryGetString (ord : int32) (record : IDataRecord) = + if ord |> record.IsDBNull then + None + else + ord |> record.GetString |> Some + + let getString (ord : int32) (record : IDataRecord) = + match record |> tryGetString ord with + | Some x -> x + | None -> (raise (InvalidOperationException $"Ordinal {ord} is null")) + + let tryGetInt32 (ord : int32) (record : IDataRecord) = + if ord |> record.IsDBNull then + None + else + ord |> record.GetInt32 |> Some + + let getInt32 (ord : int32) (record : IDataRecord) = + match record |> tryGetInt32 ord with + | Some x -> x + | None -> (raise (InvalidOperationException $"Ordinal {ord} is null")) + + let tryGetInt64 (ord : int32) (record : IDataRecord) = + if ord |> record.IsDBNull then + None + else + ord |> record.GetInt64 |> Some + + let getInt64 (ord : int32) (record : IDataRecord) = + match record |> tryGetInt64 ord with + | Some x -> x + | None -> (raise (InvalidOperationException $"Ordinal {ord} is null")) + + let tryGetDateTime (ord : int32) (record : IDataRecord) = + if ord |> record.IsDBNull then + None + else + ord |> record.GetDateTime |> Some + + let getDateTime (ord : int32) (record : IDataRecord) = + match record |> tryGetDateTime ord with + | Some x -> x + | None -> (raise (InvalidOperationException $"Ordinal {ord} is null")) diff --git a/Db/Db.fsproj b/Db/Db.fsproj new file mode 100644 index 0000000..ca385d0 --- /dev/null +++ b/Db/Db.fsproj @@ -0,0 +1,21 @@ + + + + net6.0 + true + CommonCore.Db + 6.0 + true + CommonCore.Db + Kyle Ratti + + CommonCore.Db + https://github.com/kyleratti/CommonCore + 1.0.4 + + + + + + + diff --git a/nuget.example.config b/nuget.example.config new file mode 100644 index 0000000..9ac8e46 --- /dev/null +++ b/nuget.example.config @@ -0,0 +1,15 @@ + + + + + + + + + + + + + + + diff --git a/publish.sh b/publish.sh new file mode 100644 index 0000000..fb40be4 --- /dev/null +++ b/publish.sh @@ -0,0 +1,5 @@ +#!/bin/bash +set -e + +dotnet.exe build --configuration Release +dotnet.exe pack --configuration Release diff --git a/version.json b/version.json new file mode 100644 index 0000000..e2b0594 --- /dev/null +++ b/version.json @@ -0,0 +1,19 @@ +{ + "publicReleaseRefSpec": ["^refs/heads/main$", "^refs/tags/v\\d+\\.\\d+"], + "cloudBuild": { + "setVersionVariables": true, + "buildNumber": { + "enabled": false, + "includeCommitId": { + "when": "nonPublicReleaseOnly", + "where": "buildMetadata" + } + } + }, + "release": { + "branchName": "v{version}", + "versionIncrement": "minor", + "firstUnstableTag": "alpha" + }, + "inherit": false +}