const express = require('express')
const acorn = require('acorn')
const fs = require('fs')
-// const fs = require('node:fs/promises');
const visitor = require('./visitor.js')
+
+// P A R S E
+
const dir = '../wiki-client/lib'
const mods = []
fs.readdir(dir, async (err, files) => {
// P A G E S
-const style = '<style> a {text-decoration: none} .hi {background-color:pink} </style>'
+const style = (title,here='') => `
+ <style>
+ body {font-family:sans-serif;}
+ a {text-decoration:none;}
+ td:first-child {text-align:right;}
+ .hi {background-color:pink;}
+ section {letter-spacing:.2rem; font-size:1.2rem;}
+ </style>
+ <section>${title} <span style="background-color:#ddd;"> ${escape(here)} </span></section>`
const app = express()
-app.get('/index', async (req,res,next) => {
- console.log(new Date().toLocaleTimeString(), 'index')
+app.get('/index', async (req,res) => {
const reductions = counter()
- const doit = branch => {reductions.count(branch.type)}
- visitor.wander(mods,doit)
+ visitor.walk(mods,branch =>
+ reductions.count(branch.type))
const result = `
<p>${reductions.size()} non-terminals
<br>${reductions.total()} reductions
- <p>${reductions.tally()
- .map(([k,v]) => `${v} ${link(k)}`)
- .join("<br>")}`
- res.send(style+result);
- next()
- })
-
-function link(key) {
- if(key.match(/^Ident/)) return `<a href="/terminal?type=${key}&field=name">${key}</a>`
- if(key.match(/^(As|B|L|U).*Ex/)) return `<a href="/terminal?type=${key}&field=operator">${key}</a>`
- if(key.match(/^Lit/)) return `<a href="/terminal?type=${key}&field=value">${key}</a>`
- return key
-}
-
+ <p><table>${reductions.tally()
+ .map(([k,v]) => `<tr><td>${v}<td>${link(k)}`)
+ .join("\n")}</table>`
+ res.send(style('index')+result);
+
+ function link(key) {
+ if(key.match(/^Ident/)) return `<a href="/terminal?type=${key}&field=name">${key}</a>`
+ if(key.match(/^(As|B|L|U).*Ex/)) return `<a href="/terminal?type=${key}&field=operator">${key}</a>`
+ if(key.match(/^Lit/)) return `<a href="/terminal?type=${key}&field=value">${key}</a>`
+ return key
+ }
+})
app.get('/terminal', (req,res) => {
const {type,field} = req.query
- const lits = counter()
- const doit = branch => {if(branch.type==type) lits.count(branch[field])}
- visitor.wander(mods,doit)
- const result = `
- <p>${lits.size()} uniques
- <br>${lits.total()} total
- <p>${lits.tally()
- .map(([k,v]) => `${v} <a href="/usage?type=${type}&field=${field}&key=${encodeURIComponent(k)}">${escape(k)}</a>`)
- .join("<br>")}`
- res.send(style+result)
+ const terms = counter()
+ visitor.walk(mods,branch => {
+ if(branch.type==type)
+ terms.count(branch[field])})
+ const result = style('terminal',type)+`
+ <p>${terms.size()} uniques
+ <br>${terms.total()} total
+ <p><table>${terms.tally()
+ .map(([k,v]) => `<tr><td>${v}<td><a href="/usage?type=${type}&field=${field}&key=${encodeURIComponent(k)}&width=2&depth=3">${escape(k)}</a>`)
+ .join("\n")}</table>`
+ res.send(result)
})
app.get('/usage', (req,res) => {
- const {type,field,key} = req.query
+ const {type,field,key,width,depth} = req.query
const list = []
- const doit = (branch,stack) => {
+ const files = counter()
+ visitor.walk(mods,(branch,stack) => {
if(branch.type==type && branch[field]==key)list.push(`
- <a href="/nesting/?file=${stack.at(-1)}&type=${type}&start=${branch.start}&end=${branch.end}">
+ <tr><td><a href="/nesting/?file=${files.count(stack.at(-1))}&type=${type}&key=${key}&start=${branch.start}&end=${branch.end}">
${stack.at(-1)}</a>
- ${sxpr(stack[2],3)}`)
- }
- visitor.wander(mods,doit)
- res.send(style+`<pre>${JSON.stringify(req.query,null,2)}</pre>${list.join("<br>")}`)
+ <td>${sxpr(stack[width ?? 2], depth ?? 3)}`)})
+ list.sort((a,b) => vis(a)>vis(b) ? 1 : -1)
+ const q = (id,delta) => Object.entries(req.query)
+ .map(([k,v]) => k == id ? `${k}=${+v+delta}` : `${k}=${v}`)
+ .join('&')
+ const p = id => `<a href=/usage?${q(id,+1)} style="background-color:#ddd;"> + </a>`
+ const m = id => `<a href=/usage?${q(id,-1)} style="background-color:#ddd;"> − </a>`
+ const d = id => `<span title=${req.query[id]}>${id} ${p(id)} ${m(id)}</span>`
+ res.send(style('usage',key)+`
+ <p><details><summary>${files.total()} uses in ${files.size()} files</summary>
+ <table>${files.tally().map(([k,v]) => `<tr><td>${v}<td>${k}`).join("\n")}</table></details>
+ <p><section>${d('width')} ${d('depth')}</section>
+ <p><table>${list.join("\n")}</table>`)
})
app.get('/nesting', (req,res) => {
- const {file,type,start,end} = req.query
+ const {file,type,key,start,end} = req.query
const result = []
- const doit = (branch,stack) => {
+ visitor.walk(mods,(branch,stack) => {
if(stack.at(-1)==file && branch.type==type && branch.start==start && branch.end==end) {
- const file = stack.at(-1)
const path = stack.slice(0,-1).map((n,i) => `
- <tr><td style="text-align:right;">
- <a title=${file} href=/similar?pos=${`${file}-${start}-${end}`}&depth=${i}>${n.type}</a>:
+ <tr>
+ <td><a title=${file} href=/similar?${query(req.query)}&nest=${i}>${n.type}</a>:
<td>${sxpr(n,3,null,stack[i-1])}`).reverse()
const hit = stack[1]
result.push(`
- <table>${path.join("")}</table><br><br>\n
- <pre>${escape(JSON.stringify(hit,omit,2))}</pre>`)
+ <p><table>${path.join("")}</table><br>
+ <p><pre>${escape(JSON.stringify(hit,omit,2))}</pre>`)
}
- }
- visitor.wander(mods,doit)
- res.send(style+`<pre>${JSON.stringify(req.query,null,2)}</pre>${result.join("<br>")}`)
+ })
+ res.send(style('nesting',key)+`${result.join("<hr>")}`)
+})
+
+app.get('/similar', (req,res) => {
+ const {file,type,key,start,end,nest} = req.query
+ let nested
+ visitor.walk(mods,(branch,stack) => {
+ if(stack.at(-1)==file && branch.type==type && branch.start==start && branch.end==end)
+ nested = stack[nest]})
+ const norm = node => vis(`\n\n\n${sxpr(node,3,null)}`)
+ const source = (file,node) => mods.find(mod => mod.file == file).text.substring(+node.start,+node.end)
+ const want = norm(nested)
+ const result = []
+ visitor.walk(mods,(branch,stack) => {
+ if(norm(branch) == want)
+ result.push(`<pre>${escape(source(stack.at(-1),branch))}</pre><hr>`)})
+ res.send(style('similar',key)+
+ `<p>${want}<hr>` +
+ result.join("\n")
+ )
})
counts.set(item, counts.get(item)+1)
else
counts.set(item,1)
+ return item
},
size() {
return counts.size
return `(<span title="${bytes} bytes">${dots}</span>)`
}
+function vis(row) {
+ return row.split(/\n/)[3].trim()
+ .replaceAll(/<.*?>/g,'')
+ .replaceAll(/\.\.+/g,'..')
+}
+
+function query(obj,adj={}) {
+ return Object.entries(obj)
+ .map(([k,v]) => k in adj ? `${k}=${adj[k](v)}` : `${k}=${v}`)
+ .join('&')
+}
+
app.listen(1954)
\ No newline at end of file