Public
Edited
Nov 28, 2022
Importers
hello = `:put "hello world"`
// this function (defined at bottom of notebook) tell webcode.run to serve the contents of the `hello` cell via the URL in green above
Hello = exportRsc('hello', hello)
Hello2 = exportRsc("hello2", `:put "${inputHello2}"`)
rscOWC = `
:global ${owcCommandName}
:set ${owcCommandName} do={
:if ([:typeof $1]="nothing") do={
# take note that in both RSC a plain needs to be escaped: "\$", on the RouterOS side
:error "\$${owcCommandName}: name of exported code to load is required - \$${owcCommandName} <name_to_import>"
}
:local rsc [/tool fetch url="https://webcode.run/observablehq.com${(new URL(document.baseURI)).pathname};$1" as-value output="user"]
:return [[:parse "$($rsc->"data")"]]
}
`
OWC = exportRsc(owcCommandName, rscOWC)
oneLineBootstrap = rscOneLineLoader(OWC)
viewof elvStartVlanId = Inputs.number([1,4094], {label: "Starting VLAN ID", value: 1001})
viewof elvEndVlanId = Inputs.number([1,4094], {label: "Ending VLAN ID", value: 1002})
elvIpRange = (vlanid) => [172, (vlanid >> 8) + 16, vlanid & 0xFF]
elvComment = `#${owcCommandName}-exvlan`
function rscSingleVlanCreate(vlanid) {
return `
# VLAN id=${vlanid} interface=${elvVlanListenOn} name="vlan${vlanid}"
{
:local ipoctet [:toarray "${elvIpRange(vlanid)}"]
:local name "vlan${vlanid}"
/interface vlan
add interface=${elvVlanListenOn} name=$name vlan-id=${vlanid} comment="${elvComment}"
/ip address
add address="$($ipoctet->0).$($ipoctet->1).$($ipoctet->2).1/24" interface=$name comment="${elvComment}"
/
}
`}
rscSingleVlanCreate(101)
function rscManyVlans() {
let rsc = "{"
for (let vid = elvStartVlanId; vid <= elvEndVlanId; vid++ ) {
rsc += rscSingleVlanCreate(vid)
}
rsc += "}"
return rsc
}
function rscRemoveVlans() {
return `{
/interface vlan remove [find comment~"${elvComment}"]
/ip address remove [find comment~"${elvComment}"]
}`
}
rscElvCallableArray = `
:global ELV
:set ELV [:toarray ""]
:set ($ELV->"make") do=${rscManyVlans()}
:set ($ELV->"kill") do=${rscRemoveVlans()}
:set ($ELV->"show") do={
/ip address print where comment~"${elvComment}"
/interface vlan print where comment~"${elvComment}"
}
# and to use them at the Mikrotik terminal:
#[admin@Mikrotik]> $${owcCommandName} ELV
#[admin@Mikrotik]> ($ELV->"make")
#[admin@Mikrotik]> ($ELV->"show")
#[admin@Mikrotik]> ($ELV->"kill")
`
// "ELV" == "Everyone Loves VLANs"
exportRsc(elvName, rscElvCallableArray)
// load the webcode.run runtime need to server the cells as plain text
import {endpoint, getContext} from '@endpointservices/webcode'
function exportRsc(name, code) {
return endpoint(name, async (request, response) => {
response.send(`${code}`);
})
}
rscOneLineLoader = (webcodeEndpoint) => `[:parse "$([/tool/fetch url="${webcodeEndpoint.value.href}" as-value output="user"]->"data")"]`
mename = `${(new URL(document.baseURI)).pathname.substr(1)}`
Purpose-built for displays of data
Observable is your go-to platform for exploring data and creating expressive data visualizations. Use reactive JavaScript notebooks for prototyping and a collaborative canvas for visual data exploration and dashboard creation.
