Adopt linking of module requests with vm module

Record imports by relative scope
Flatten fragment/document composition stacks
Assimilate socket and worker delegation
Draft inspector routes

Author: blik

.gitignore

@@ -18,6 +18,7 @@
 !Blik_2024_static.js
 !Blik_2020_svg.json
 !Blik_2024_svg.js
+!Blik_2025_inspector.js
 
 !isaacs_2011_node-tar.js
 !tyrealhu_2023_acorn_typescript.js

Blik_2023_fragment.js

@@ -255,8 +255,7 @@
 };
 
  export async function broadcast(server,actions)
-{let {default:{WebSocketServer}}=await import("./einaros_2011_ws.js");
- let connection=buffer(function connection(host,peer,request)
+{let connection=buffer(function connection(host,peer,request)
 {Object.assign(peer
 ,{author:anonymous[Math.floor(Math.random()*anonymous.length)]
  ,connected:true
@@ -277,6 +276,7 @@
 ),host)
  });
 },note.bind(1));
+ let {default:{WebSocketServer}}=await import("./einaros_2011_ws.js");
  return compose([{server}],Reflect.construct,{rooms:{}},Object.assign
 ,{connection},tether(observe))(WebSocketServer);
 };

Blik_2023_host.js

@@ -468,12 +468,11 @@
  register=true;
  //let propagate=register>1;
  let binary=
- {hover:['mouseover','mouseout']
+ {focus:['focusin','focusout']
  ,mouse:['mouseover','mouseout']
- ,focus:['focusin','focusout']
- ,touch:['pointerover','pointerout']
- ,pinch:['touchstart',"touchmove",'touchend']
- ,draw:['pointerdown','pointerup']
+ ,touch:['touchstart','touchend']
+ ,point:['pointerdown','pointerup']
+ ,hover:['pointerover','pointerout']
  };
  let entries=[action].flat().flatMap(action=>
  simple(action)?Object.entries(action):[[action?.name,action]]).flatMap(([name,action])=>
@@ -554,9 +553,9 @@
  // observe an abort signal, optionally composing it with a context for explicit abortion. 
  return revert((resolve,reject,controller,...context)=>
  context.reduce((signal,term,index,context)=>
- compose(buffer(term),slip(controller),"abort")({signal},...context.splice(1))
+ compose(buffer(term),collect,slip(controller),"abort")({signal},...context.splice(1))
 ,observe.call(controller.signal,{abort({target:{reason}})
-{(reason instanceof Error?reject:resolve)(reason);
+{(is(Error)(reason[0])?reject:resolve)(provide(reason));
 }},{once:true})))(...arguments);
 };
 

Blik_2023_inference.js

@@ -574,23 +574,24 @@
 [[target,node]
 ,[source,sources.find(source=>label(source).name===label(node).name&&twin(source,node))]
 ,label(node)
-]).filter(({1:{1:term}})=>term).map(([[target,node],[source,term],{name}],index)=>
+]).filter(({1:{1:term}})=>term).map(([[target,node],[source,term],{name}])=>
  // https://tc39.es/ecma426/#sec-names-for-generated-javascript-code
- [label,mirror].flat().map((part,index,{length})=>
+ // clip function declaration for method counterparts. 
+ [node.method!==term.method?whether(not(infer("method")),mirror):[],label,mirror].flat().map((part,index,{length})=>
 [[[source,term],[target,node]].map(([source,node])=>
- coordinates(source,part(node)[index?"end":"start"]))
- //length===3&&index<2?index?label:node.method?infer():mirror:mirror
+ coordinates(source,part(node)[length-index-1?"start":"end"]))
 ,name
-].flat())).flatMap(([start,end],index,locations)=>
+].flat())).flatMap(([start,...end],index,locations)=>
  // cut source between segments with reference to previous segment end. 
-[[locations[index-1]?.[1]||[[0,0]],start].reduce(([source],[cut,target,name])=>
+[[locations[index-1]?.at(-1)||[[0,0]],start].reduce(([source],[cut,target,name])=>
  [source,target,name])
-,start
-,...Array(end[1][0]-start[1][0]).fill(0).map((line,index)=>
+,start,...end.slice(0,-1)
+,...Array(end.at(-1)[1][0]-start[1][0]).fill(0).flatMap((line,index)=>
  // map identical lines of procedure. 
+ Array(index?1:2).fill(index+1).map((line,index)=>
  prune.call(start,([field,offset])=>
- numeric(offset)?[offset+index+1,0][field]:offset))
-,end
+ numeric(offset)?[offset+line,index][field]:offset)))
+,end.at(-1)
 ]);
  locations.push([coordinates(source,source.length),locations.at(-1)[1]]);
  let quantifiers=
@@ -779,13 +780,13 @@
  let noncondition=either(
  not(defined),simple,is([array,infer("some",({condition})=>condition)]));
  let fails=await [tests].reduce(function test(module,tests,depth,path)
-{let {tether,scope,context=[],route=[],terms=[],condition}=tests;
+{let {scope,context=[],route=[],terms=[],condition}=tests;
  return noncondition(condition)
 ?compose(Object.entries,infer("reduce",record(([term,tests])=>
  test(module[term]??module,tests,depth+1,[depth?path:[],term].flat())),[]),"flat")(tests)
 :buffer(compose
 (...[route].flat()
-,buffer(module.bind(scope||tether))
+,buffer(scope?tether(module):module)
 ,...[terms].flat(),assert[condition]||condition,swap({})
 ),({stack})=>({[path.join("/")]:stack}))(...context);
 },namespace);

Blik_2023_interface.js

@@ -917,5 +917,10 @@
   "Shiranuit_2021_segfault.node":{
     "https://github.com/Shiranuit/node-segfault-handler":{"v1.4.2":["binding.gyp",{"syntax":"gyp","edit":{"'nan'":"'../1/include_dirs.js'"}}]},
     "https://github.com/nodejs/nan":{"v2.23.0":[]}
-  }
+  },
+  "Cardaci_2013_devtools_interface.js":{"https://github.com/cyrus-and/chrome-remote-interface":{"v0.33.3":["lib/chrome.js",{
+    "syntax":"commonjs",
+    "alias":{"ws":"./Cardaci_2013_devtools_interface/0/lib/websocket-wrapper.js"},
+    "detach":["http","https","dns"]
+  }]}}
 }

Blik_2023_meta.js

@@ -1,12 +1,12 @@
- import {merge,prune,unfold,record} from "./Blik_2023_search.js";
+ import {merge,prune,unfold,record,extract} from "./Blik_2023_search.js";
  import {aphorize,serialize} from "./Blik_2023_meta.js";
  import {infer,compose,buffer,whether,wait,string,note,basic,defined,drop,modular,observe} from "./Blik_2023_inference.js";
  import {window,fetch,digest,path,agent} from "./Blik_2023_interface.js";
  import {document,css,capture,metamarkup,destroy,keyboard} from "./Blik_2023_fragment.js";
  import {EditorState,Compartment} from './haverbeke_2022_codemirror_state.js';
  import {EditorView,keymap,lineNumbers,drawSelection} from './haverbeke_2022_codemirror_view.js';
  import {history,defaultKeymap,historyKeymap} from './haverbeke_2022_codemirror_commands.js';
- import {foldGutter,foldKeymap,codeFolding,syntaxHighlighting,defaultHighlightStyle,HighlightStyle,syntaxTree,ensureSyntaxTree,foldable,foldEffect,unfoldAll,foldAll} from './haverbeke_2022_codemirror_language.js';
+ import {foldGutter,foldKeymap,codeFolding,syntaxHighlighting,defaultHighlightStyle,HighlightStyle,syntaxTree,syntaxTreeAvailable,ensureSyntaxTree,forceParsing,foldable,foldEffect,unfoldAll,foldAll} from './haverbeke_2022_codemirror_language.js';
  import {javascript} from './haverbeke_2022_codemirror_js.js';
  import {StyleModule} from './haverbeke_2022_stylemod.js';
  import {parser as lezer} from "./haverbeke_2022_lezer_js.js"
@@ -35,59 +35,78 @@
  {"/Blik_2023_search.js":["","merge","record"]
  ,"/Blik_2023_interface.js":["","resolve","fetch"]
  ,"/Blik_2023_inference.js":["","note","slip","compose","collect","combine"]
- ,"/Blik_2023_fragment.js":["","metamarkup as dataset"]
+ ,"/Blik_2023_fragment.js":["","metamarkup as dataset","destroy","size"]
  ,[file]:["script","fold","resize"]
  }
  ,exports:{default:
  {".codemirror":
  {contextrestored(event)
 {let lines=Array.from(this.querySelectorAll(".cm-line")).map(({textContent:line})=>line);
  let meta=[dataset(this),{parent:this}].reduce(merge,{});
- this.childNodes.forEach(destroy);
+ Array.from(this.childNodes).forEach(destroy);
  script(lines.join("\n"),meta);
-},keydown({keyCode,ctrlKey,altKey})
+},keydown({keyCode,ctrlKey:ctrl,altKey:alt})
 {let {s,w,f}=keyboard(keyCode);
- if(ctrlKey&&altKey&&f)
- return fold.call(this);
- if(w&&altKey)
- return compose(combine(infer(),({whiteSpace})=>whiteSpace==="pre-wrap"
+ if(alt&&f)
+ return arguments[0].preventDefault(),fold.call(this);
+ if(alt&&w)
+ return compose(stash(({whiteSpace})=>whiteSpace==="pre-wrap"
 ?{maxWidth:"",whiteSpace:"",wordBreak:""}
-:{maxWidth:"calc(100% - 2.5em)",whiteSpace:"pre-wrap",wordBreak:"break-all"}),note,Object.assign)(this.querySelector(".cm-content").style);
- if(!s||!ctrlKey)return;
+:{maxWidth:"calc(100% - 2.5em)",whiteSpace:"pre-wrap",wordBreak:"break-all"}),Object.assign)(this.querySelector(".cm-content").style);
+ if(!s||!ctrl)return;
  arguments[0].preventDefault();
  let source=this.querySelector(".cm-content").cmView.view.viewState.state.doc.toString();
  let bytes=new Array(source.length);
  for(let index in source)
  bytes[index]=source.charCodeAt(index);
  var blob=new Blob([new Uint8Array(bytes)],{type:'text/plain'});
  let target=this.dataset.source+"?override=true";
- let buffer=Object.assign(new FileReader(),{onload:compose
+ let buffer=Object.assign(new FileReader()
+,{onload:compose
 ((file,event)=>fetch(target,{method:"put",body:btoa(event.target.result)})
-,compose("text",["message"],record,{action:"broadcast",room:this.dataset.source},merge
+,note,"text",combine
+(body=>fetch("/inspect?module="+this.dataset.source,{method:"put",body})
+,compose(["message"],record,{action:"broadcast",room:this.dataset.source},merge
 ,["data"],record,{bubbles:true},merge,slip("message"),collect,slip(MessageEvent)
 ,Reflect.construct,slip(this),"dispatchEvent")
+)
 )})
  buffer.readAsBinaryString(blob);
-},...observe({pinch(event)
-{if(event.touches.length!==2)
+},...observe({touch(event)
+{let {type,touches,isTrusted:start}=event;
+ if(!start)
+ return this.control?.abort();
+ if(touches.length!==2)
  return;
+ let width=({touches})=>Array.from(touches).map(({pageX:x,pageY:y})=>[x,y]).reduce(([x1,y1],[x2,y2])=>Math.hypot(x1-x2,y1-y2));
+ let unit=width(event);
+ let font=size(this.querySelector(".cm-content"));
+ merge(this,{control:new AbortController()});
+ observe.call(this
+,{touchmove(event)
+{event.preventDefault();
+ resize.call(this,Math.max(1,Math.round(width(event)/unit*font)));
+}},{signal:this.control.signal});
+}})
+ ,wheel(event)
+{if(!event.ctrlKey)return;
  event.preventDefault();
- let {type,touches,isTrusted:start}=event;
- let [[x1,y1],[x2,y2]]=Array.from(touches).map(({pageX:x,pageY:y})=>[x,y]);
- let width=Math.hypot(x1-x2,y1-y2);
- if(start)
- return this.start=width;
- let scale=2**(Math.floor(width-this.start)/50);
- resize.call(this,scale);
-}})}
+ let past=size(this.querySelector(".cm-content"));
+ let dy=event.deltaY/4;
+ let scale=1-Math.sign(dy)*Math.min(24,Math.abs(dy))
+ resize.call(this,Math.max(1,Math.round(past*scale)));
+}}
  }}};
  let parent=settings.parent||document({div:{class:"codemirror",...metamarkup(settings)}});
  //let language=(new Compartment).of(js());
  let indentation=new Compartment().of(EditorState.tabSize.of(1));
  let doc=string(source)?settings.source?source:await compose(fetch,digest,infer(serialize,"json"),buffer(compose(JSON.parse,aphorize),drop(1)))(source):JSON.stringify(source);
+ let author=cookie("author");
+ let {font}=author?await compose(fetch,digest)("/author/"+author):{};
+ let size=font?font.size+"px":"1em";
  let theme=new Compartment().of(EditorView.theme(
- {".cm-content":{"text-align":"left","font-family":settings.font,"font-size":"1em"}
- ,".cm-gutters":{background:"transparent"}
+ {".cm-content":{"text-align":"left","font-family":settings.font,"font-size":size}
+ ,".cm-gutters":{background:"transparent","font-size":size}
  // gutter heights are calculated dynamically on client-side. 
  ,".cm-gutterElement":{height:"4px !important",color:"var(--note)"}
  ,".cm-gutterElement:not(:first-of-type)":{height:"1.4em !important",transform:"translate(0,-4px)"}
@@ -101,44 +120,50 @@
  },{dark:true}));
  let state=EditorState.create({doc,extensions:[basetheme,foldtheme,theme,extensions].flat()});
  let view=new EditorView({parent,state},window);
- if(defined(settings.fold))
- settings.fold<1?foldAll(view):fold.call(parent,settings.fold);
- let style=parent.ownerDocument.querySelector("head").querySelector("style").textContent;
+ if(settings.fold!==false&&globalThis.window)
+ fold.call(parent,settings.fold||0);
  //let style=view.styleModules.flatMap(({rules})=>rules).reverse().join("\n");
- parent.prepend(document({style:{"#text":style}}));
+ let style=parent.ownerDocument.querySelector("head").querySelector("style");
  if(!globalThis.window)
- parent.querySelector(".cm-content").cmView.view.viewState.state.doc.toString().split("\n").forEach((line,index)=>
+ parent.prepend(document({style:{"#text":style.textContent}})),style.remove()
+,parent=parent.cloneNode(true),doc.split("\n").forEach((line,index)=>
  [".cm-line",".cm-lineNumbers>.cm-gutterElement"].map(name=>
  Array.from(parent.querySelectorAll(name))).forEach((lines,gutter)=>
- lines[index+gutter]||lines.at(-1).after(Object.assign(lines[gutter].cloneNode(true)
+ lines[index+gutter]||lines.at(-1).after(Object.assign(lines.at(-1).cloneNode(true)
 ,{textContent:gutter?index+1:line}))));
- return capture.call(parent,file+"/module/default/module");
+ return settings.parent?parent:capture.call(parent,file+"/module/default/module");
 };
 
- export function resize(scale)
+ export function resize(next)
 {let text=this.querySelector(".cm-content");
- let {view}=text.cmView;
- let {fontSize}=window.getComputedStyle(text);
+ let past=size(text);
+ if(next===past)return;
+ let {cmView:{view}}=text;
  let theme=view.viewState.state.config.base[2];
- let size=Number(fontSize.replace(/[a-z]/g,"")||1)*scale;
- view.dispatch({effects:theme.compartment.reconfigure([theme.inner,EditorView.theme(
- {".cm-content":{"font-size":size+"em"}
- ,".cm-gutters":{"font-size":size+"em"}
- })])});
+ view.dispatch({effects:theme.compartment.reconfigure([EditorView.theme(
+ {".cm-content":{"font-size":next+"px"}
+ ,".cm-gutters":{"font-size":next+"px"}
+ }),theme.inner])});
+ let author=cookie("author");
+ if(!author)return;
+ buffer(compose
+(wait(10000),size,when(is(next)),drop()
+,"/author/"+author,{method:"put",body:JSON.stringify({font:{size:next}})},fetch,digest,note
+),note)(text);
 };
 
  export function fold(depth=0)
 {let {view}=this.querySelector(".cm-content").cmView;
  let {state}=view.viewState;
  let effects=[];
- ensureSyntaxTree(state,state.doc.length,5000).iterate(
+ ensureSyntaxTree(state,state.doc.length,10000).iterate(
  {enter({stack:{length},from,to})
 {let effect=depth<=length?foldable(state,from,to):undefined;
  if(effect)effects.push(foldEffect.of(effect));
 },from:0,to:state.doc.length
  });
  view.dispatch({effects});
- };
+};
 
  export function highlight(source)
 {let span=[];
@@ -183,7 +208,7 @@
  },Object.entries,infer("map",([field,value])=>[".cm-"+field,value]),Object.fromEntries
 ));
 
-const foldtheme = EditorView.baseTheme(
+ var foldtheme=EditorView.baseTheme(
 {".cm-foldPlaceholder":{backgroundColor: "#eee",border: "1px solid #ddd",color: "#888",borderRadius: ".2em",margin: "0 1px",padding: "0 1px",cursor: "pointer"}
 ,".cm-foldGutter span": {padding: "0 1px",cursor: "pointer"}
 });

Blik_2023_sources.json

@@ -1,5 +1,5 @@
  import {note,compose,buffer,when,collect,infer,combine,wait,drop,slip,differ,crop,each,swap,pass,not,compound,functor,native,exit,tether,either,whether,describe,string,pattern,major,match,has,is,are,ascend,defined,flip,heritage} from "./Blik_2023_inference.js";
- import {access,persist,purge,resolve,list,modularise,cookies,cookie,query,fetch,path,loader,delegate,location,window} from "./Blik_2023_interface.js";
+ import {access,persist,purge,resolve,list,modularise,cookies,cookie,query,fetch,path,loader,delegate,location,window,listen,infrastructure} from "./Blik_2023_interface.js";
  import {document,hypertext,css,throttle,error,capture,defer} from "./Blik_2023_fragment.js";
  import {serialize,mime,proceduralize,sourcemap} from "./Blik_2023_meta.js";
  import {search,merge,prune,random,extract,record,remember} from "./Blik_2023_search.js";
@@ -54,13 +54,13 @@
 ,combine
 (compose(path,slip("path","resolve","./"),resolve.bind(import.meta.url),pass(permit,classified))
 ,compose(drop(1),buffer(JSON.parse,compose(drop(1,2),"base64",Buffer.from,"toString")))
-,compose("url",query,buffer(differ("override"),swap(undefined)),is("true"))
-),note
+,compose("url",query,buffer(differ("override"),swap(undefined)),is(true))
+)
 ,combine
 (crop(1)
 ,compose(combine(buffer(compose(crop(1),infer(access,true),buffer(JSON.parse,drop(1))),swap({})),drop(1)),merge)
 )
-,true,note,access,true,combine
+,true,access,true,combine
 (compose(access,buffer(JSON.parse,drop(1)))
 ,compose(crop(1),slip("path","relative","./"),resolve.bind(import.meta.url),"/","split")
 ),record
@@ -93,14 +93,15 @@
 (simple(this)?serialize:"toString",term?compose
 (origin+"/"+file,buffer(modularise
 ,compose(drop(2),origin,location,"replace",resolve.bind(import.meta.url))),either("namespace",crop(1))
-):compose(["body"],record
+):compose("//# sourceMappingURL=./sourcemap",collect,"\n","join",["body"],record
 ,{type:mime("js"),headers:["X-",""].map(field=>(
  {[field+"SourceMap"]:"./sourcemap"})).reduce(merge)
  },merge)
 )(this);
 },sourcemap
- ,scope(){return delegate.call(loader,"infrastructure");}
- };
+ ,sources(){return infrastructure();}
+ ,infrastructure(){return delegate.call(loader,"infrastructure");}
+};
 
  export function persistence(resource)
 {classify(resource);
@@ -145,7 +146,7 @@
 }});
 };
 
- async function authorize({headers:{cookie}},authority)
+ export async function authorize({headers:{cookie}},authority)
 {when(defined)(authority);
  let {author:name}=cookies(cookie||"");
  if(!name)exit(Error("unauthorized"));