Add WlClipboard implementation

src/vm/output.ts

@@ -1,5 +1,8 @@
 import {StrRVal} from "./commands/command.js";
 import {Awaitable} from "../util/types.js";
+import childProcess from "node:child_process";
+import fs from "node:fs";
+import crypto from "node:crypto";
 
 export const getSubjectDisplay = (sub: StrRVal): string => {
     if ( sub.term === 'string' ) {
@@ -44,6 +47,28 @@ export class FakeClipboard {
     }
 }
 
+const tempFile = () => `/tmp/str-${crypto.randomBytes(4).readUInt32LE(0)}.txt`
+export class WlClipboard {
+    async read(): Promise<string> {
+        const tmp = tempFile()
+        fs.writeFileSync(tmp, '')
+        const proc = childProcess.spawn('sh', ['-c', `wl-paste > "${tmp}"`])
+        await new Promise<void>(res => {
+            proc.on('close', () => res())
+        })
+        return fs.readFileSync(tmp).toString('utf-8')
+    }
+
+    async overwrite(sub: string): Promise<void> {
+        const tmp = tempFile()
+        fs.writeFileSync(tmp, sub)
+        const proc = childProcess.spawn('sh', ['-c', `wl-copy < "${tmp}"`], { stdio: 'inherit' })
+        await new Promise<void>(res => {
+            proc.on('close', () => res())
+        })
+    }
+}
+
 export type OutputManager = {
     display: Display,
     clipboard: Clipboard,