From fd0dd2b18eacdbf0877bf7d5210acc8ab4c786f1 Mon Sep 17 00:00:00 2001 From: caleb Date: Sun, 6 Jul 2025 22:51:45 +0900 Subject: [PATCH] init --- .gitignore | 485 +++++++++++++++++++++++++++++++++++++++ Client.fs | 38 +++ Directory.Packages.props | 12 + Startup.fs | 40 ++++ appsettings.json | 6 + esbuild.config.mjs | 21 ++ global.json | 6 + package.json | 7 + vite.config.js | 10 + web_api_cookbook.fsproj | 29 +++ wsconfig.json | 8 + wwwroot/favicon.png | Bin 0 -> 3215 bytes wwwroot/index.html | 28 +++ 13 files changed, 690 insertions(+) create mode 100644 .gitignore create mode 100644 Client.fs create mode 100644 Directory.Packages.props create mode 100644 Startup.fs create mode 100644 appsettings.json create mode 100644 esbuild.config.mjs create mode 100644 global.json create mode 100644 package.json create mode 100644 vite.config.js create mode 100644 web_api_cookbook.fsproj create mode 100644 wsconfig.json create mode 100644 wwwroot/favicon.png create mode 100644 wwwroot/index.html 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 0000000000000000000000000000000000000000..001df18cd99bd85f918fc5503a5cbec174f0bf73 GIT binary patch literal 3215 zcmV;A3~=*_P)EX>4Tx07%E3mUmQC*A|D*y?1({%`gH|hTglt0MdJtUPWP;8DJ;_4l^{dA)*2i zMMRn+NKnLp(NH8-M6nPQRImpm2q-ZaMN}+rM%Ih2ti1Q~^84egZ|$@9x%=$B&srA% zlBX}1mj+7#kjfMAgFKw+5s^`J>;QlP9$S?PR%=$HTzo3l9?ED;xoI3-JvF1F8#m>QQXW*8-Az9>Nv%ZWK* zkqtikEV84R*{M9Xh{ZXlvs2k(?iKO2Od&_ah_8qXGr62B5#JKAMv5?%E8;ie*i;TP z0{|3BY!`4?i6S-;F^L}%f`(o2L0Dz>ZZyndax(`h}FNp#{ zx{a}MR#uh~m%}m=7xWMPPlvyuufAs_KJJh5&|Nw4Oks+EF0LCZEhSCJr)Q)ySsc3I zpNIG#2mW;)20@&74xhslMTCi_jLS<9wVTK03b<)JI+ypKn)naH{-njZ7KzgM5l~}{ zfYfy=Kz{89C<+lE(fh?+|D$id_%I-TdEqLPi*x_)H~nY9rQ#)noA5c#B`Ac>67n+_ z_r%Wu$9dISw03U@r;Pdb`_%=KWKZEBGfDjQHqKX(I48#TT zN1~8;gpaI8ijWGV0cl0Lkv`-mGK$O~Z&4T&1w}_0qHIx~s8AFOwFb2wRf4KU9Y%Ga zdQmq~W2jlwM>H9&h}K8jpuNx$=mc~Yx)5D~ZbG-CFQRXwC(y4k7z_=gjj_UbVj?j~ zn6;P^%sxyT<{V}aGme?VVzKgAeXJeUAIroFu!Yzv>{0Al>=1SW`vynEso>0T?zku% z50{Utz#YMz!42UiaSM1Uye8fT?~iBWbMU43MtnE^I(`DbK#(SA6YK~fge1ZyLM5S< zaFOtU@RCR*su8V;fkZBGBe9ZrjCh$iMtn<>A?cA^NYNxAX$R>L=^W`U=_Q#=)*?HS zqsRjC4stX30{Id7jRZx)NWx2kEwMqOMxsMvNaDF9UQ$!iNpiJhu4IMe3CZh{Gg5dd zEh!f%rqp_=8mW^~BT{qH6lqgwf9X`|66qt-SEQ$8urgXQZZd3{0-1v{7i7jM2t}RZ zLSa!hQyM83DHBu-Rh#NXO`;Z4zoQONXJut%m&u07X3N&do|YY@Av7(T7cGTWN;^&) zroCIDw8Uu%XUX;@txJZM%*!p6bCl!A70I>9-IjYNPnUO-PnO>$-zoo40i~d)5U7x) zuwUV#!pu_YQro4hrA14RFTJM-E9xl*DXvvKsMxPKr=+app_HyvrF21QMwzDUsGOu+ zu6#y$T7{xwufkO+S2?TllrBqmqNmU+>Amz>RYg@#RiSFV>VWEknzmY~TE1GF+Cz1M zIzv5Pys-#cBCZ~;MXm#GGH#)6 z)ozd6)!Y-@Tijj2>R4y()XvmDLKXQ&yjjk&I!+oQOrohQ}U>eb4k~HZbSnyy9x(W?3$*y{uH6t~>7#3G*6dj`%lF|oWk4CLGP(p*(a%)BP)E2$IF@Oj zS(EuDD=h0owsbZxyFW)SXM4_Mu6ypcYf)=iYkTrk^ETy;t#evezaCm2x4vhC`i6oH z6B|7?9^ORQl)UMue3SgL{8yX9H+L5(6>KaR-{P^QrBI@fUpTVWc5B@>)Hd$6f$iqo ztG0hEVi#R4HYu(seqX{Wx%!RiH@;dd*9H0 z$NjB!N_E9`?+$Pe+^P4d?`Y6!s5po@n0fF?V_0L~w~TL_n-rRgn?4-k9U46xbhx+K zs=4`y;*ru8xJB49eKh*$jqhB)>uNP@t#6~X6(0k~gvXwKAN&3Aai8NoCm1JMf6)A) zww=;m)B$zmbj)@pc8+#Mb`75NKH1Z4+ui=7(T|5tsh+AiEql834Bs>djZ*&hXA3QVUFm(Q=>&;8Iyl!2)z2f%ZaOm)zk?4`pJM24C zcT?`ZxR-fv;r_-4=m$j)r5;v1Qhe0#v+mDrqn4wm$6Uwy9|u3aKh7F|_DjYu?mT-%DP~ zzdZD6*{hzpfVoGnQ(rI47rl{xbNDUeZQr}_casZQ@3HSIKj?nw{^;}Z!Kc(upZ)~{ znDhLU8A*Kr000SaNLh0L04^f{04^f|c%?sf00007bV*G`2i^z)3@#{Jgrn&I00Hw! zL_t(2&y7+`ZxUe?J>SgtO~)|P2eiZ6$g60Awvn_8abZl<#FdY=JAaVTbZg??MZ>1r z=*q;TsX)`JDGd}#k@A><@+yyEzy;bwV=8BLbMHO(+}wM}>y1RY(ZOU;WRaE|oxFC2 zNkO=a>$8#okXeZdJQ-*HLkRnjjWwbHDy&wl&W{gH4uH5L> znr#5LLw3dsA9oG`ggg!aSKUg;V|lTj*h-$fiY8ip{rj=T36%emDgs#cIsoh(swY}~ zyx3ZF`^|@Bt=<1oZQbxFTBGZ>NE{)EA5_i{l`Xe-GiraJ#|{d6xl^7a0KR54#*a4R zN40j30!S6>x-nop-OrVD!+0OdzWtmQD989;U#hlxTB}C@SrjOMDMr_#@m!^K);Ac> z=|hN&|Jy^q0}6l;q>D`e=OZrwRi-aZY*i@o)K7qNzV#;`;D`VK002ovPDHLkV1lR@ B8dCrO literal 0 HcmV?d00001 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}
+
+
+ + +