commit fd0dd2b18eacdbf0877bf7d5210acc8ab4c786f1 Author: caleb Date: Sun Jul 6 22:51:45 2025 +0900 init diff --git a/.gitignore b/.gitignore new file mode 100644 index 0000000..c9e68b5 --- /dev/null +++ b/.gitignore @@ -0,0 +1,485 @@ +## Ignore Visual Studio temporary files, build results, and +## files generated by popular Visual Studio add-ons. +## +## Get latest from `dotnet new gitignore` + +# dotenv files +.env + +# 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 +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 +*.tlog +*.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 6 auto-generated project file (contains which files were open etc.) +*.vbp + +# Visual Studio 6 workspace and project file (working project files containing files to include in project) +*.dsw +*.dsp + +# Visual Studio 6 technical files +*.ncb +*.aps + +# 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/ + +# Visual Studio History (VSHistory) files +.vshistory/ + +# 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 + +# VS Code files for those working on multiple tools +.vscode/* +!.vscode/settings.json +!.vscode/tasks.json +!.vscode/launch.json +!.vscode/extensions.json +*.code-workspace + +# Local History for Visual Studio Code +.history/ + +# Windows Installer files from build outputs +*.cab +*.msi +*.msix +*.msm +*.msp + +# JetBrains Rider +*.sln.iml +.idea/ + +## +## 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/main/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/main/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 + +# Vim temporary swap files +*.swp +/wwwroot/Scripts/ diff --git a/Client.fs b/Client.fs new file mode 100644 index 0000000..32483c4 --- /dev/null +++ b/Client.fs @@ -0,0 +1,38 @@ +namespace web_api_cookbook + +open WebSharper +open WebSharper.JavaScript +open WebSharper.UI +open WebSharper.UI.Client +open WebSharper.UI.Templating + +[] +module Client = + // The templates are loaded from the DOM, so you just can edit index.html + // and refresh your browser, no need to recompile unless you add or remove holes. + type IndexTemplate = Template<"wwwroot/index.html", ClientLoad.FromDocument> + + let People = + ListModel.FromSeq [ + "John" + "Paul" + ] + + + [] + let Main () = + let newName = Var.Create "" + + IndexTemplate.Main() + .ListContainer( + People.View.DocSeqCached(fun (name: string) -> + IndexTemplate.ListItem().Name(name).Doc() + ) + ) + .Name(newName) + .Add(fun _ -> + People.Add(newName.Value) + newName.Value <- "" + ) + .Doc() + |> Doc.RunById "main" diff --git a/Directory.Packages.props b/Directory.Packages.props new file mode 100644 index 0000000..700ebe4 --- /dev/null +++ b/Directory.Packages.props @@ -0,0 +1,12 @@ + + + + true + + + + + + + + diff --git a/Startup.fs b/Startup.fs new file mode 100644 index 0000000..9088832 --- /dev/null +++ b/Startup.fs @@ -0,0 +1,40 @@ +open System +open Microsoft.AspNetCore.Builder +open Microsoft.Extensions.Hosting +open Microsoft.AspNetCore.Http +open Microsoft.Extensions.DependencyInjection +open WebSharper.AspNetCore +open web_api_cookbook + +[] +let main args = + let builder = WebApplication.CreateBuilder(args) + + // Add services to the container. + builder.Services.AddWebSharper() + .AddAuthentication("WebSharper") + .AddCookie("WebSharper", fun options -> ()) + |> ignore + + let app = builder.Build() + + // Configure the HTTP request pipeline. + if not (app.Environment.IsDevelopment()) then + app.UseExceptionHandler("/Error") + // The default HSTS value is 30 days. You may want to change this for production scenarios, see https://aka.ms/aspnetcore-hsts. + .UseHsts() + |> ignore + + app.UseHttpsRedirection() +#if DEBUG + .UseWebSharperScriptRedirect(startVite = true) +#endif + .UseDefaultFiles() + .UseStaticFiles() + //Enable if you want to make RPC calls to server + //.UseWebSharperRemoting() + |> ignore + + app.Run() + + 0 // Exit code diff --git a/appsettings.json b/appsettings.json new file mode 100644 index 0000000..6c2d447 --- /dev/null +++ b/appsettings.json @@ -0,0 +1,6 @@ +{ + "websharper": { + "UseDownloadedResources": false, + "DebugScriptRedirectUrl": "http://localhost:56440" + } +} \ No newline at end of file diff --git a/esbuild.config.mjs b/esbuild.config.mjs new file mode 100644 index 0000000..756fed6 --- /dev/null +++ b/esbuild.config.mjs @@ -0,0 +1,21 @@ +import { existsSync, cpSync, readdirSync } from 'fs' +import { build } from 'esbuild' + +const files = readdirSync('./build/'); + +files.forEach(file => { + if (file.endsWith('.js')) { + var options = + { + entryPoints: ['./build/' + file], + bundle: true, + minify: true, + format: 'iife', + outfile: 'wwwroot/Scripts/' + file, + globalName: 'wsbundle' + }; + + console.log("Bundling:", file); + build(options); + } +}); diff --git a/global.json b/global.json new file mode 100644 index 0000000..5bd2c6c --- /dev/null +++ b/global.json @@ -0,0 +1,6 @@ +{ + "sdk": { + "rollForward": "disable", + "version": "latest" + } +} \ No newline at end of file diff --git a/package.json b/package.json new file mode 100644 index 0000000..9442b92 --- /dev/null +++ b/package.json @@ -0,0 +1,7 @@ +{ + "name": "web_api_cookbook", + "version": "1.0.0", + "devDependencies": { + "esbuild": "^0.19.9" + } +} diff --git a/vite.config.js b/vite.config.js new file mode 100644 index 0000000..16ec8a0 --- /dev/null +++ b/vite.config.js @@ -0,0 +1,10 @@ +module.exports = { + root: "wwwroot", + build: { + rollupOptions: { + input: [ + "./Scripts/web_api_cookbook.min.js" + ] + } + } +} \ No newline at end of file diff --git a/web_api_cookbook.fsproj b/web_api_cookbook.fsproj new file mode 100644 index 0000000..0fa2430 --- /dev/null +++ b/web_api_cookbook.fsproj @@ -0,0 +1,29 @@ + + + + net9.0 + + + + + + + + + + + + + + + + + + + + + + + + + diff --git a/wsconfig.json b/wsconfig.json new file mode 100644 index 0000000..b2cdf6a --- /dev/null +++ b/wsconfig.json @@ -0,0 +1,8 @@ +{ + "$schema": "https://websharper.com/wsconfig.schema.json", + "project": "spa", + "outputDir": "wwwroot/Scripts", + "release": { + "outputDir": "build" + } +} diff --git a/wwwroot/favicon.png b/wwwroot/favicon.png new file mode 100644 index 0000000..001df18 Binary files /dev/null and b/wwwroot/favicon.png differ diff --git a/wwwroot/index.html b/wwwroot/index.html new file mode 100644 index 0000000..a3f483c --- /dev/null +++ b/wwwroot/index.html @@ -0,0 +1,28 @@ + + + + web_api_cookbook + + + + + + + +

My list of unique people

+
+
    +
  • ${Name}
    • +
+
+ + +
You are about to add: ${Name}
+
+
+ + +