effect-web-midi 0.1.0
This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.
- package/README.md +7 -0
- package/dist/index.js +2 -0
- package/dist/index.js.map +1 -0
- package/dist/src/EMIDIAccess.js +68 -0
- package/dist/src/EMIDIAccess.js.map +1 -0
- package/dist/src/EMIDIInput.js +226 -0
- package/dist/src/EMIDIInput.js.map +1 -0
- package/dist/src/EMIDIOutput.js +225 -0
- package/dist/src/EMIDIOutput.js.map +1 -0
- package/dist/src/EMIDIPort.js +213 -0
- package/dist/src/EMIDIPort.js.map +1 -0
- package/dist/src/MIDIErrors.js +4 -0
- package/dist/src/MIDIErrors.js.map +1 -0
- package/dist/src/Parsing.js +2 -0
- package/dist/src/Parsing.js.map +1 -0
- package/dist/src/StreamMaker.js +1 -0
- package/dist/src/StreamMaker.js.map +1 -0
- package/dist/src/Util.js +4 -0
- package/dist/src/Util.js.map +1 -0
- package/dist/src/index.js +9 -0
- package/dist/src/index.js.map +1 -0
- package/dist/src/internal/EMIDIAccess.js +409 -0
- package/dist/src/internal/EMIDIAccess.js.map +1 -0
- package/dist/src/internal/EMIDIInput.js +69 -0
- package/dist/src/internal/EMIDIInput.js.map +1 -0
- package/dist/src/internal/EMIDIOutput.js +120 -0
- package/dist/src/internal/EMIDIOutput.js.map +1 -0
- package/dist/src/internal/EMIDIPort.js +125 -0
- package/dist/src/internal/EMIDIPort.js.map +1 -0
- package/dist/src/internal/MIDIPortMethodCalls/acquireReleasePortConnection/acquireReleasePortConnectionByPort.js +27 -0
- package/dist/src/internal/MIDIPortMethodCalls/acquireReleasePortConnection/acquireReleasePortConnectionByPort.js.map +1 -0
- package/dist/src/internal/MIDIPortMethodCalls/acquireReleasePortConnection/acquireReleasePortConnectionByPortIdAndAccess.js +19 -0
- package/dist/src/internal/MIDIPortMethodCalls/acquireReleasePortConnection/acquireReleasePortConnectionByPortIdAndAccess.js.map +1 -0
- package/dist/src/internal/MIDIPortMethodCalls/acquireReleasePortConnection/acquireReleasePortConnectionByPortIdInContext.js +16 -0
- package/dist/src/internal/MIDIPortMethodCalls/acquireReleasePortConnection/acquireReleasePortConnectionByPortIdInContext.js.map +1 -0
- package/dist/src/internal/MIDIPortMethodCalls/actOnPort.js +18 -0
- package/dist/src/internal/MIDIPortMethodCalls/actOnPort.js.map +1 -0
- package/dist/src/internal/MIDIPortMethodCalls/closePortConnection/closePortConnectionByPort.js +27 -0
- package/dist/src/internal/MIDIPortMethodCalls/closePortConnection/closePortConnectionByPort.js.map +1 -0
- package/dist/src/internal/MIDIPortMethodCalls/closePortConnection/closePortConnectionByPortIdAndAccess.js +18 -0
- package/dist/src/internal/MIDIPortMethodCalls/closePortConnection/closePortConnectionByPortIdAndAccess.js.map +1 -0
- package/dist/src/internal/MIDIPortMethodCalls/closePortConnection/closePortConnectionByPortIdInContext.js +16 -0
- package/dist/src/internal/MIDIPortMethodCalls/closePortConnection/closePortConnectionByPortIdInContext.js.map +1 -0
- package/dist/src/internal/MIDIPortMethodCalls/makeMIDIPortMethodCallerFactory.js +21 -0
- package/dist/src/internal/MIDIPortMethodCalls/makeMIDIPortMethodCallerFactory.js.map +1 -0
- package/dist/src/internal/MIDIPortMethodCalls/openPortConnection/openPortConnectionByPort.js +30 -0
- package/dist/src/internal/MIDIPortMethodCalls/openPortConnection/openPortConnectionByPort.js.map +1 -0
- package/dist/src/internal/MIDIPortMethodCalls/openPortConnection/openPortConnectionByPortIdAndAccess.js +18 -0
- package/dist/src/internal/MIDIPortMethodCalls/openPortConnection/openPortConnectionByPortIdAndAccess.js.map +1 -0
- package/dist/src/internal/MIDIPortMethodCalls/openPortConnection/openPortConnectionByPortIdInContext.js +16 -0
- package/dist/src/internal/MIDIPortMethodCalls/openPortConnection/openPortConnectionByPortIdInContext.js.map +1 -0
- package/dist/src/internal/StreamMaker.js +101 -0
- package/dist/src/internal/StreamMaker.js.map +1 -0
- package/dist/src/internal/errors.js +161 -0
- package/dist/src/internal/errors.js.map +1 -0
- package/dist/src/internal/getPortByPortId/getPortByPortIdAndAccess.js +53 -0
- package/dist/src/internal/getPortByPortId/getPortByPortIdAndAccess.js.map +1 -0
- package/dist/src/internal/getPortByPortId/getPortByPortIdInContext.js +18 -0
- package/dist/src/internal/getPortByPortId/getPortByPortIdInContext.js.map +1 -0
- package/dist/src/internal/makePortStateChangesStream/makePortStateChangesStreamByPort.js +52 -0
- package/dist/src/internal/makePortStateChangesStream/makePortStateChangesStreamByPort.js.map +1 -0
- package/dist/src/internal/makePortStateChangesStream/makePortStateChangesStreamByPortIdAndAccess.js +13 -0
- package/dist/src/internal/makePortStateChangesStream/makePortStateChangesStreamByPortIdAndAccess.js.map +1 -0
- package/dist/src/internal/makePortStateChangesStream/makePortStateChangesStreamByPortIdInContext.js +18 -0
- package/dist/src/internal/makePortStateChangesStream/makePortStateChangesStreamByPortIdInContext.js.map +1 -0
- package/dist/src/internal/mutablePropertyTools/doesMutablePortPropertyHaveSpecificValue/doesMutablePortPropertyHaveSpecificValueByPort.js +66 -0
- package/dist/src/internal/mutablePropertyTools/doesMutablePortPropertyHaveSpecificValue/doesMutablePortPropertyHaveSpecificValueByPort.js.map +1 -0
- package/dist/src/internal/mutablePropertyTools/doesMutablePortPropertyHaveSpecificValue/doesMutablePortPropertyHaveSpecificValueByPortIdAndAccess.js +61 -0
- package/dist/src/internal/mutablePropertyTools/doesMutablePortPropertyHaveSpecificValue/doesMutablePortPropertyHaveSpecificValueByPortIdAndAccess.js.map +1 -0
- package/dist/src/internal/mutablePropertyTools/doesMutablePortPropertyHaveSpecificValue/doesMutablePortPropertyHaveSpecificValueByPortIdInContext.js +61 -0
- package/dist/src/internal/mutablePropertyTools/doesMutablePortPropertyHaveSpecificValue/doesMutablePortPropertyHaveSpecificValueByPortIdInContext.js.map +1 -0
- package/dist/src/internal/mutablePropertyTools/getMutablePortProperty/getMutablePortPropertyByPort.js +42 -0
- package/dist/src/internal/mutablePropertyTools/getMutablePortProperty/getMutablePortPropertyByPort.js.map +1 -0
- package/dist/src/internal/mutablePropertyTools/getMutablePortProperty/getMutablePortPropertyByPortIdAndAccess.js +42 -0
- package/dist/src/internal/mutablePropertyTools/getMutablePortProperty/getMutablePortPropertyByPortIdAndAccess.js.map +1 -0
- package/dist/src/internal/mutablePropertyTools/getMutablePortProperty/getMutablePortPropertyByPortIdInContext.js +29 -0
- package/dist/src/internal/mutablePropertyTools/getMutablePortProperty/getMutablePortPropertyByPortIdInContext.js.map +1 -0
- package/dist/src/internal/mutablePropertyTools/getValueInRawPortFieldUnsafe.js +6 -0
- package/dist/src/internal/mutablePropertyTools/getValueInRawPortFieldUnsafe.js.map +1 -0
- package/dist/src/internal/mutablePropertyTools/matchMutablePortProperty/matchMutablePortPropertyByPort.js +46 -0
- package/dist/src/internal/mutablePropertyTools/matchMutablePortProperty/matchMutablePortPropertyByPort.js.map +1 -0
- package/dist/src/internal/mutablePropertyTools/matchMutablePortProperty/matchMutablePortPropertyByPortIdAndAccess.js +25 -0
- package/dist/src/internal/mutablePropertyTools/matchMutablePortProperty/matchMutablePortPropertyByPortIdAndAccess.js.map +1 -0
- package/dist/src/internal/mutablePropertyTools/matchMutablePortProperty/matchMutablePortPropertyByPortIdInContext.js +31 -0
- package/dist/src/internal/mutablePropertyTools/matchMutablePortProperty/matchMutablePortPropertyByPortIdInContext.js.map +1 -0
- package/dist/src/internal/parsing.js +117 -0
- package/dist/src/internal/parsing.js.map +1 -0
- package/dist/src/internal/util.js +59 -0
- package/dist/src/internal/util.js.map +1 -0
- package/dist-types/index.d.ts +2 -0
- package/dist-types/index.d.ts.map +1 -0
- package/dist-types/src/EMIDIAccess.d.ts +27 -0
- package/dist-types/src/EMIDIAccess.d.ts.map +1 -0
- package/dist-types/src/EMIDIInput.d.ts +26 -0
- package/dist-types/src/EMIDIInput.d.ts.map +1 -0
- package/dist-types/src/EMIDIOutput.d.ts +26 -0
- package/dist-types/src/EMIDIOutput.d.ts.map +1 -0
- package/dist-types/src/EMIDIPort.d.ts +26 -0
- package/dist-types/src/EMIDIPort.d.ts.map +1 -0
- package/dist-types/src/MIDIErrors.d.ts +2 -0
- package/dist-types/src/MIDIErrors.d.ts.map +1 -0
- package/dist-types/src/Parsing.d.ts +2 -0
- package/dist-types/src/Parsing.d.ts.map +1 -0
- package/dist-types/src/StreamMaker.d.ts +2 -0
- package/dist-types/src/StreamMaker.d.ts.map +1 -0
- package/dist-types/src/Util.d.ts +2 -0
- package/dist-types/src/Util.d.ts.map +1 -0
- package/dist-types/src/index.d.ts +9 -0
- package/dist-types/src/index.d.ts.map +1 -0
- package/dist-types/src/internal/EMIDIAccess.d.ts +339 -0
- package/dist-types/src/internal/EMIDIAccess.d.ts.map +1 -0
- package/dist-types/src/internal/EMIDIInput.d.ts +48 -0
- package/dist-types/src/internal/EMIDIInput.d.ts.map +1 -0
- package/dist-types/src/internal/EMIDIOutput.d.ts +93 -0
- package/dist-types/src/internal/EMIDIOutput.d.ts.map +1 -0
- package/dist-types/src/internal/EMIDIPort.d.ts +87 -0
- package/dist-types/src/internal/EMIDIPort.d.ts.map +1 -0
- package/dist-types/src/internal/MIDIPortMethodCalls/acquireReleasePortConnection/acquireReleasePortConnectionByPort.d.ts +16 -0
- package/dist-types/src/internal/MIDIPortMethodCalls/acquireReleasePortConnection/acquireReleasePortConnectionByPort.d.ts.map +1 -0
- package/dist-types/src/internal/MIDIPortMethodCalls/acquireReleasePortConnection/acquireReleasePortConnectionByPortIdAndAccess.d.ts +15 -0
- package/dist-types/src/internal/MIDIPortMethodCalls/acquireReleasePortConnection/acquireReleasePortConnectionByPortIdAndAccess.d.ts.map +1 -0
- package/dist-types/src/internal/MIDIPortMethodCalls/acquireReleasePortConnection/acquireReleasePortConnectionByPortIdInContext.d.ts +13 -0
- package/dist-types/src/internal/MIDIPortMethodCalls/acquireReleasePortConnection/acquireReleasePortConnectionByPortIdInContext.d.ts.map +1 -0
- package/dist-types/src/internal/MIDIPortMethodCalls/actOnPort.d.ts +11 -0
- package/dist-types/src/internal/MIDIPortMethodCalls/actOnPort.d.ts.map +1 -0
- package/dist-types/src/internal/MIDIPortMethodCalls/closePortConnection/closePortConnectionByPort.d.ts +23 -0
- package/dist-types/src/internal/MIDIPortMethodCalls/closePortConnection/closePortConnectionByPort.d.ts.map +1 -0
- package/dist-types/src/internal/MIDIPortMethodCalls/closePortConnection/closePortConnectionByPortIdAndAccess.d.ts +15 -0
- package/dist-types/src/internal/MIDIPortMethodCalls/closePortConnection/closePortConnectionByPortIdAndAccess.d.ts.map +1 -0
- package/dist-types/src/internal/MIDIPortMethodCalls/closePortConnection/closePortConnectionByPortIdInContext.d.ts +13 -0
- package/dist-types/src/internal/MIDIPortMethodCalls/closePortConnection/closePortConnectionByPortIdInContext.d.ts.map +1 -0
- package/dist-types/src/internal/MIDIPortMethodCalls/makeMIDIPortMethodCallerFactory.d.ts +15 -0
- package/dist-types/src/internal/MIDIPortMethodCalls/makeMIDIPortMethodCallerFactory.d.ts.map +1 -0
- package/dist-types/src/internal/MIDIPortMethodCalls/openPortConnection/openPortConnectionByPort.d.ts +21 -0
- package/dist-types/src/internal/MIDIPortMethodCalls/openPortConnection/openPortConnectionByPort.d.ts.map +1 -0
- package/dist-types/src/internal/MIDIPortMethodCalls/openPortConnection/openPortConnectionByPortIdAndAccess.d.ts +15 -0
- package/dist-types/src/internal/MIDIPortMethodCalls/openPortConnection/openPortConnectionByPortIdAndAccess.d.ts.map +1 -0
- package/dist-types/src/internal/MIDIPortMethodCalls/openPortConnection/openPortConnectionByPortIdInContext.d.ts +13 -0
- package/dist-types/src/internal/MIDIPortMethodCalls/openPortConnection/openPortConnectionByPortIdInContext.d.ts.map +1 -0
- package/dist-types/src/internal/StreamMaker.d.ts +202 -0
- package/dist-types/src/internal/StreamMaker.d.ts.map +1 -0
- package/dist-types/src/internal/errors.d.ts +260 -0
- package/dist-types/src/internal/errors.d.ts.map +1 -0
- package/dist-types/src/internal/getPortByPortId/getPortByPortIdAndAccess.d.ts +27 -0
- package/dist-types/src/internal/getPortByPortId/getPortByPortIdAndAccess.d.ts.map +1 -0
- package/dist-types/src/internal/getPortByPortId/getPortByPortIdInContext.d.ts +20 -0
- package/dist-types/src/internal/getPortByPortId/getPortByPortIdInContext.d.ts.map +1 -0
- package/dist-types/src/internal/makePortStateChangesStream/makePortStateChangesStreamByPort.d.ts +71 -0
- package/dist-types/src/internal/makePortStateChangesStream/makePortStateChangesStreamByPort.d.ts.map +1 -0
- package/dist-types/src/internal/makePortStateChangesStream/makePortStateChangesStreamByPortIdAndAccess.d.ts +4 -0
- package/dist-types/src/internal/makePortStateChangesStream/makePortStateChangesStreamByPortIdAndAccess.d.ts.map +1 -0
- package/dist-types/src/internal/makePortStateChangesStream/makePortStateChangesStreamByPortIdInContext.d.ts +20 -0
- package/dist-types/src/internal/makePortStateChangesStream/makePortStateChangesStreamByPortIdInContext.d.ts.map +1 -0
- package/dist-types/src/internal/mutablePropertyTools/doesMutablePortPropertyHaveSpecificValue/doesMutablePortPropertyHaveSpecificValueByPort.d.ts +62 -0
- package/dist-types/src/internal/mutablePropertyTools/doesMutablePortPropertyHaveSpecificValue/doesMutablePortPropertyHaveSpecificValueByPort.d.ts.map +1 -0
- package/dist-types/src/internal/mutablePropertyTools/doesMutablePortPropertyHaveSpecificValue/doesMutablePortPropertyHaveSpecificValueByPortIdAndAccess.d.ts +16 -0
- package/dist-types/src/internal/mutablePropertyTools/doesMutablePortPropertyHaveSpecificValue/doesMutablePortPropertyHaveSpecificValueByPortIdAndAccess.d.ts.map +1 -0
- package/dist-types/src/internal/mutablePropertyTools/doesMutablePortPropertyHaveSpecificValue/doesMutablePortPropertyHaveSpecificValueByPortIdInContext.d.ts +16 -0
- package/dist-types/src/internal/mutablePropertyTools/doesMutablePortPropertyHaveSpecificValue/doesMutablePortPropertyHaveSpecificValueByPortIdInContext.d.ts.map +1 -0
- package/dist-types/src/internal/mutablePropertyTools/getMutablePortProperty/getMutablePortPropertyByPort.d.ts +36 -0
- package/dist-types/src/internal/mutablePropertyTools/getMutablePortProperty/getMutablePortPropertyByPort.d.ts.map +1 -0
- package/dist-types/src/internal/mutablePropertyTools/getMutablePortProperty/getMutablePortPropertyByPortIdAndAccess.d.ts +22 -0
- package/dist-types/src/internal/mutablePropertyTools/getMutablePortProperty/getMutablePortPropertyByPortIdAndAccess.d.ts.map +1 -0
- package/dist-types/src/internal/mutablePropertyTools/getMutablePortProperty/getMutablePortPropertyByPortIdInContext.d.ts +17 -0
- package/dist-types/src/internal/mutablePropertyTools/getMutablePortProperty/getMutablePortPropertyByPortIdInContext.d.ts.map +1 -0
- package/dist-types/src/internal/mutablePropertyTools/getValueInRawPortFieldUnsafe.d.ts +7 -0
- package/dist-types/src/internal/mutablePropertyTools/getValueInRawPortFieldUnsafe.d.ts.map +1 -0
- package/dist-types/src/internal/mutablePropertyTools/matchMutablePortProperty/matchMutablePortPropertyByPort.d.ts +71 -0
- package/dist-types/src/internal/mutablePropertyTools/matchMutablePortProperty/matchMutablePortPropertyByPort.d.ts.map +1 -0
- package/dist-types/src/internal/mutablePropertyTools/matchMutablePortProperty/matchMutablePortPropertyByPortIdAndAccess.d.ts +7 -0
- package/dist-types/src/internal/mutablePropertyTools/matchMutablePortProperty/matchMutablePortPropertyByPortIdAndAccess.d.ts.map +1 -0
- package/dist-types/src/internal/mutablePropertyTools/matchMutablePortProperty/matchMutablePortPropertyByPortIdInContext.d.ts +28 -0
- package/dist-types/src/internal/mutablePropertyTools/matchMutablePortProperty/matchMutablePortPropertyByPortIdInContext.d.ts.map +1 -0
- package/dist-types/src/internal/parsing.d.ts +72 -0
- package/dist-types/src/internal/parsing.d.ts.map +1 -0
- package/dist-types/src/internal/util.d.ts +33 -0
- package/dist-types/src/internal/util.d.ts.map +1 -0
- package/index.ts +1 -0
- package/package.json +83 -0
- package/src/EMIDIAccess.ts +271 -0
- package/src/EMIDIInput.ts +270 -0
- package/src/EMIDIOutput.ts +269 -0
- package/src/EMIDIPort.ts +267 -0
- package/src/MIDIErrors.ts +13 -0
- package/src/Parsing.ts +12 -0
- package/src/StreamMaker.ts +12 -0
- package/src/Util.ts +19 -0
- package/src/index.ts +8 -0
- package/src/internal/EMIDIAccess.ts +893 -0
- package/src/internal/EMIDIInput.ts +114 -0
- package/src/internal/EMIDIOutput.ts +228 -0
- package/src/internal/EMIDIPort.ts +233 -0
- package/src/internal/MIDIPortMethodCalls/acquireReleasePortConnection/acquireReleasePortConnectionByPort.ts +43 -0
- package/src/internal/MIDIPortMethodCalls/acquireReleasePortConnection/acquireReleasePortConnectionByPortIdAndAccess.ts +39 -0
- package/src/internal/MIDIPortMethodCalls/acquireReleasePortConnection/acquireReleasePortConnectionByPortIdInContext.ts +27 -0
- package/src/internal/MIDIPortMethodCalls/actOnPort.ts +66 -0
- package/src/internal/MIDIPortMethodCalls/closePortConnection/closePortConnectionByPort.ts +38 -0
- package/src/internal/MIDIPortMethodCalls/closePortConnection/closePortConnectionByPortIdAndAccess.ts +38 -0
- package/src/internal/MIDIPortMethodCalls/closePortConnection/closePortConnectionByPortIdInContext.ts +27 -0
- package/src/internal/MIDIPortMethodCalls/makeMIDIPortMethodCallerFactory.ts +73 -0
- package/src/internal/MIDIPortMethodCalls/openPortConnection/openPortConnectionByPort.ts +44 -0
- package/src/internal/MIDIPortMethodCalls/openPortConnection/openPortConnectionByPortIdAndAccess.ts +38 -0
- package/src/internal/MIDIPortMethodCalls/openPortConnection/openPortConnectionByPortIdInContext.ts +27 -0
- package/src/internal/StreamMaker.ts +414 -0
- package/src/internal/errors.ts +220 -0
- package/src/internal/getPortByPortId/getPortByPortIdAndAccess.ts +116 -0
- package/src/internal/getPortByPortId/getPortByPortIdInContext.ts +26 -0
- package/src/internal/makePortStateChangesStream/makePortStateChangesStreamByPort.ts +148 -0
- package/src/internal/makePortStateChangesStream/makePortStateChangesStreamByPortIdAndAccess.ts +14 -0
- package/src/internal/makePortStateChangesStream/makePortStateChangesStreamByPortIdInContext.ts +51 -0
- package/src/internal/mutablePropertyTools/doesMutablePortPropertyHaveSpecificValue/doesMutablePortPropertyHaveSpecificValueByPort.ts +127 -0
- package/src/internal/mutablePropertyTools/doesMutablePortPropertyHaveSpecificValue/doesMutablePortPropertyHaveSpecificValueByPortIdAndAccess.ts +74 -0
- package/src/internal/mutablePropertyTools/doesMutablePortPropertyHaveSpecificValue/doesMutablePortPropertyHaveSpecificValueByPortIdInContext.ts +74 -0
- package/src/internal/mutablePropertyTools/getMutablePortProperty/getMutablePortPropertyByPort.ts +63 -0
- package/src/internal/mutablePropertyTools/getMutablePortProperty/getMutablePortPropertyByPortIdAndAccess.ts +110 -0
- package/src/internal/mutablePropertyTools/getMutablePortProperty/getMutablePortPropertyByPortIdInContext.ts +37 -0
- package/src/internal/mutablePropertyTools/getValueInRawPortFieldUnsafe.ts +12 -0
- package/src/internal/mutablePropertyTools/matchMutablePortProperty/matchMutablePortPropertyByPort.ts +183 -0
- package/src/internal/mutablePropertyTools/matchMutablePortProperty/matchMutablePortPropertyByPortIdAndAccess.ts +29 -0
- package/src/internal/mutablePropertyTools/matchMutablePortProperty/matchMutablePortPropertyByPortIdInContext.ts +86 -0
- package/src/internal/parsing.ts +219 -0
- package/src/internal/util.ts +152 -0
|
@@ -0,0 +1,409 @@
|
|
|
1
|
+
/** biome-ignore-all lint/style/useShorthandFunctionType: It's a nice way to
|
|
2
|
+
* preserve JSDoc comments attached to the function signature */
|
|
3
|
+
import * as EArray from 'effect/Array';
|
|
4
|
+
import * as Context from 'effect/Context';
|
|
5
|
+
import * as Effect from 'effect/Effect';
|
|
6
|
+
import * as Equal from 'effect/Equal';
|
|
7
|
+
import * as EFunction from 'effect/Function';
|
|
8
|
+
import * as Hash from 'effect/Hash';
|
|
9
|
+
import * as Inspectable from 'effect/Inspectable';
|
|
10
|
+
import * as Iterable from 'effect/Iterable';
|
|
11
|
+
import * as Layer from 'effect/Layer';
|
|
12
|
+
import * as Option from 'effect/Option';
|
|
13
|
+
import * as Order from 'effect/Order';
|
|
14
|
+
import * as Pipeable from 'effect/Pipeable';
|
|
15
|
+
import * as Record from 'effect/Record';
|
|
16
|
+
import * as Ref from 'effect/Ref';
|
|
17
|
+
import * as SortedMap from 'effect/SortedMap';
|
|
18
|
+
import * as Unify from 'effect/Unify';
|
|
19
|
+
import * as EMIDIInput from "./EMIDIInput.js";
|
|
20
|
+
import * as EMIDIOutput from "./EMIDIOutput.js";
|
|
21
|
+
import * as Errors from "./errors.js";
|
|
22
|
+
import * as GetPort from "./getPortByPortId/getPortByPortIdInContext.js";
|
|
23
|
+
import { isOutputConnectionOpenByPort } from "./mutablePropertyTools/doesMutablePortPropertyHaveSpecificValue/doesMutablePortPropertyHaveSpecificValueByPort.js";
|
|
24
|
+
import { getOutputDeviceStateByPort } from "./mutablePropertyTools/getMutablePortProperty/getMutablePortPropertyByPort.js";
|
|
25
|
+
import * as StreamMaker from "./StreamMaker.js";
|
|
26
|
+
import * as Util from "./util.js";
|
|
27
|
+
// TODO: add stream of messages sent from this device to target midi device
|
|
28
|
+
// TODO: fat service APIs, where all the methods are attached to instance and
|
|
29
|
+
// where you don't have to constantly write the prefix
|
|
30
|
+
// TODO: implement scoping of midi access that will clean up all message queues
|
|
31
|
+
// and streams, and remove listeners
|
|
32
|
+
// TODO: implement scope inheritance
|
|
33
|
+
// TODO: make a Ref with a port map that would be automatically updated by
|
|
34
|
+
// listening to the stream of connection events?
|
|
35
|
+
// TODO: add a stream to listen for all messages of all currently
|
|
36
|
+
// connected inputs, all present inputs, specific input
|
|
37
|
+
// TODO: add sinks that will accept command streams to redirect midi commands
|
|
38
|
+
// from something into an actual API
|
|
39
|
+
// TODO: add effect to wait until connected by port ID
|
|
40
|
+
// TODO: reflect sysex and software flags in type-system
|
|
41
|
+
// TODO: make matchers that support returning effects from the callback instead of plain values
|
|
42
|
+
/**
|
|
43
|
+
* Unique symbol used for distinguishing {@linkcode EMIDIAccessInstance}
|
|
44
|
+
* instances from other objects at both runtime and type-level
|
|
45
|
+
* @internal
|
|
46
|
+
*/
|
|
47
|
+
const TypeId = Symbol.for('effect-web-midi/EMIDIAccessInstance');
|
|
48
|
+
/**
|
|
49
|
+
* A tag that allows to provide
|
|
50
|
+
* {@linkcode EMIDIAccessInstance|access instance} once with e.g.
|
|
51
|
+
* {@linkcode layer}, {@linkcode layerSystemExclusiveSupported}, etc. and reuse
|
|
52
|
+
* it anywhere, instead of repeatedly {@linkcode request}ing it.
|
|
53
|
+
*
|
|
54
|
+
* The downside of using DI might be that in different places of the app it
|
|
55
|
+
* would be harder to maintain tight MIDI permission scopes.
|
|
56
|
+
*
|
|
57
|
+
* @example
|
|
58
|
+
* ```ts
|
|
59
|
+
* import { EMIDIAccess } from 'effect-web-midi'
|
|
60
|
+
* import * as Effect from 'effect/Effect'
|
|
61
|
+
*
|
|
62
|
+
* const program = Effect.gen(function* () {
|
|
63
|
+
* // ^ Effect.Effect<
|
|
64
|
+
* // void,
|
|
65
|
+
* // | AbortError
|
|
66
|
+
* // | UnderlyingSystemError
|
|
67
|
+
* // | MIDIAccessNotAllowedError
|
|
68
|
+
* // | MIDIAccessNotSupportedError
|
|
69
|
+
* // never
|
|
70
|
+
* // >
|
|
71
|
+
*
|
|
72
|
+
* const access = yield* EMIDIAccess.EMIDIAccess
|
|
73
|
+
* // ^ EMIDIAccessInstance
|
|
74
|
+
*
|
|
75
|
+
* console.log(access.sysexEnabled)
|
|
76
|
+
* // ^ true
|
|
77
|
+
* }).pipe(Effect.provide(EMIDIAccess.layerSystemExclusiveSupported))
|
|
78
|
+
* ```
|
|
79
|
+
*
|
|
80
|
+
* @see `navigator.requestMIDIAccess` {@link https://www.w3.org/TR/webmidi/#dom-navigator-requestmidiaccess|Web MIDI spec}, {@link https://developer.mozilla.org/en-US/docs/Web/API/Navigator/requestMIDIAccess|MDN reference}
|
|
81
|
+
*/
|
|
82
|
+
export class EMIDIAccess extends Context.Tag('effect-web-midi/EMIDIAccess')() {
|
|
83
|
+
}
|
|
84
|
+
/**
|
|
85
|
+
* Prototype of all {@linkcode EMIDIAccessInstance} instances
|
|
86
|
+
* @internal
|
|
87
|
+
*/
|
|
88
|
+
const Proto = {
|
|
89
|
+
_tag: 'EMIDIAccess',
|
|
90
|
+
[TypeId]: TypeId,
|
|
91
|
+
[Hash.symbol]() {
|
|
92
|
+
return Hash.structure(this._config);
|
|
93
|
+
},
|
|
94
|
+
[Equal.symbol](that) {
|
|
95
|
+
return this === that;
|
|
96
|
+
},
|
|
97
|
+
pipe() {
|
|
98
|
+
// biome-ignore lint/complexity/noArguments: Effect's tradition
|
|
99
|
+
return Pipeable.pipeArguments(this, arguments);
|
|
100
|
+
},
|
|
101
|
+
toString() {
|
|
102
|
+
return Inspectable.format(this.toJSON());
|
|
103
|
+
},
|
|
104
|
+
toJSON() {
|
|
105
|
+
return { _id: 'EMIDIAccess', config: this._config };
|
|
106
|
+
},
|
|
107
|
+
[Inspectable.NodeInspectSymbol]() {
|
|
108
|
+
return this.toJSON();
|
|
109
|
+
},
|
|
110
|
+
get sysexEnabled() {
|
|
111
|
+
return assumeImpl(this)._access.sysexEnabled;
|
|
112
|
+
},
|
|
113
|
+
get softwareSynthEnabled() {
|
|
114
|
+
return !!assumeImpl(this)._config.software;
|
|
115
|
+
},
|
|
116
|
+
};
|
|
117
|
+
/**
|
|
118
|
+
*
|
|
119
|
+
*
|
|
120
|
+
* @internal
|
|
121
|
+
*/
|
|
122
|
+
const makeImpl = (rawAccess, config) => {
|
|
123
|
+
const instance = Object.create(Proto);
|
|
124
|
+
instance._access = rawAccess;
|
|
125
|
+
// TODO: set individual software and sysex flags instead
|
|
126
|
+
instance._config = config ?? {};
|
|
127
|
+
return instance;
|
|
128
|
+
};
|
|
129
|
+
/**
|
|
130
|
+
* Asserts an object to be valid `EMIDIAccess` and casts it to internal
|
|
131
|
+
* implementation type
|
|
132
|
+
*
|
|
133
|
+
* @internal
|
|
134
|
+
*/
|
|
135
|
+
const assertImpl = (access) => {
|
|
136
|
+
if (!isImpl(access))
|
|
137
|
+
throw new Error('Failed to cast to EMIDIAccess');
|
|
138
|
+
return access;
|
|
139
|
+
};
|
|
140
|
+
/**
|
|
141
|
+
* Asserts an object to be valid `EMIDIAccess`
|
|
142
|
+
*
|
|
143
|
+
* @internal
|
|
144
|
+
*/
|
|
145
|
+
export const assert = assertImpl;
|
|
146
|
+
/**
|
|
147
|
+
* @internal
|
|
148
|
+
*/
|
|
149
|
+
export const assumeImpl = (access) => access;
|
|
150
|
+
/**
|
|
151
|
+
*
|
|
152
|
+
*
|
|
153
|
+
* @internal
|
|
154
|
+
*/
|
|
155
|
+
const make = makeImpl;
|
|
156
|
+
/**
|
|
157
|
+
*
|
|
158
|
+
*
|
|
159
|
+
* @internal
|
|
160
|
+
*/
|
|
161
|
+
const isImpl = (access) => typeof access === 'object' &&
|
|
162
|
+
access !== null &&
|
|
163
|
+
Object.getPrototypeOf(access) === Proto &&
|
|
164
|
+
TypeId in access &&
|
|
165
|
+
'_access' in access &&
|
|
166
|
+
typeof access._access === 'object' &&
|
|
167
|
+
'_config' in access &&
|
|
168
|
+
typeof access._config === 'object' &&
|
|
169
|
+
access._config !== null &&
|
|
170
|
+
access._access instanceof MIDIAccess;
|
|
171
|
+
/**
|
|
172
|
+
*
|
|
173
|
+
*
|
|
174
|
+
*/
|
|
175
|
+
export const is = isImpl;
|
|
176
|
+
/**
|
|
177
|
+
*
|
|
178
|
+
* @internal
|
|
179
|
+
*/
|
|
180
|
+
export const resolve = (polymorphicAccess) => Util.fromPolymorphic(polymorphicAccess, is);
|
|
181
|
+
/**
|
|
182
|
+
*
|
|
183
|
+
* @internal
|
|
184
|
+
*/
|
|
185
|
+
const getPortEntriesFromRawAccess = (key, make) => (rawAccess) => Iterable.map(rawAccess[key], ([id, raw]) => [id, make(raw)]);
|
|
186
|
+
/**
|
|
187
|
+
*
|
|
188
|
+
* @internal
|
|
189
|
+
*/
|
|
190
|
+
const getInputEntriesFromRaw = getPortEntriesFromRawAccess('inputs', EMIDIInput.make);
|
|
191
|
+
/**
|
|
192
|
+
*
|
|
193
|
+
* @internal
|
|
194
|
+
*/
|
|
195
|
+
const getOutputEntriesFromRaw = getPortEntriesFromRawAccess('outputs', EMIDIOutput.make);
|
|
196
|
+
/**
|
|
197
|
+
*
|
|
198
|
+
* @internal
|
|
199
|
+
*/
|
|
200
|
+
const getAllPortsEntriesFromRaw = (rawAccess) => Iterable.appendAll(getInputEntriesFromRaw(rawAccess), getOutputEntriesFromRaw(rawAccess));
|
|
201
|
+
/**
|
|
202
|
+
*
|
|
203
|
+
* @param accessor
|
|
204
|
+
* @returns
|
|
205
|
+
* @internal
|
|
206
|
+
*/
|
|
207
|
+
const decorateToTakePolymorphicAccessAndReturnRecord = (accessor) => (polymorphicAccess) => Effect.map(resolve(polymorphicAccess), EFunction.flow(assumeImpl, e => e._access, accessor, Record.fromEntries));
|
|
208
|
+
/**
|
|
209
|
+
* Because `MIDIInputMap` can potentially be a mutable object, meaning new
|
|
210
|
+
* devices can be added or removed at runtime, it is effectful.
|
|
211
|
+
*
|
|
212
|
+
* The **`inputs`** read-only property of the MIDIAccess interface provides
|
|
213
|
+
* access to any available MIDI input ports.
|
|
214
|
+
*
|
|
215
|
+
* [MDN
|
|
216
|
+
* Reference](https://developer.mozilla.org/docs/Web/API/MIDIAccess/inputs)
|
|
217
|
+
*/
|
|
218
|
+
export const getInputsRecord = decorateToTakePolymorphicAccessAndReturnRecord(getInputEntriesFromRaw);
|
|
219
|
+
/**
|
|
220
|
+
* Because `MIDIOutputMap` can potentially be a mutable object, meaning new
|
|
221
|
+
* devices can be added or removed at runtime, it is effectful.
|
|
222
|
+
*
|
|
223
|
+
* The **`outputs`** read-only property of the MIDIAccess interface provides
|
|
224
|
+
* access to any available MIDI output ports.
|
|
225
|
+
*
|
|
226
|
+
* [MDN
|
|
227
|
+
* Reference](https://developer.mozilla.org/docs/Web/API/MIDIAccess/outputs)
|
|
228
|
+
*/
|
|
229
|
+
export const getOutputsRecord = decorateToTakePolymorphicAccessAndReturnRecord(getOutputEntriesFromRaw);
|
|
230
|
+
/**
|
|
231
|
+
*
|
|
232
|
+
*
|
|
233
|
+
*/
|
|
234
|
+
export const getAllPortsRecord = decorateToTakePolymorphicAccessAndReturnRecord(getAllPortsEntriesFromRaw);
|
|
235
|
+
/**
|
|
236
|
+
*
|
|
237
|
+
*
|
|
238
|
+
*/
|
|
239
|
+
export const InputsRecord = getInputsRecord(EMIDIAccess);
|
|
240
|
+
/**
|
|
241
|
+
*
|
|
242
|
+
*
|
|
243
|
+
*/
|
|
244
|
+
export const OutputsRecord = getOutputsRecord(EMIDIAccess);
|
|
245
|
+
/**
|
|
246
|
+
*
|
|
247
|
+
*
|
|
248
|
+
*/
|
|
249
|
+
export const AllPortsRecord = getAllPortsRecord(EMIDIAccess);
|
|
250
|
+
/**
|
|
251
|
+
* [MIDIConnectionEvent MDN
|
|
252
|
+
* Reference](https://developer.mozilla.org/docs/Web/API/MIDIConnectionEvent)
|
|
253
|
+
*/
|
|
254
|
+
export const makeAllPortsStateChangesStream = StreamMaker.createStreamMakerFrom()(is, access => ({
|
|
255
|
+
tag: 'MIDIPortStateChange',
|
|
256
|
+
eventListener: {
|
|
257
|
+
target: assumeImpl(access)._access,
|
|
258
|
+
type: 'statechange',
|
|
259
|
+
},
|
|
260
|
+
spanAttributes: {
|
|
261
|
+
spanTargetName: 'MIDI access handle',
|
|
262
|
+
requestedAccessConfig: assumeImpl(access)._config,
|
|
263
|
+
},
|
|
264
|
+
nullableFieldName: 'port',
|
|
265
|
+
}), rawPort => ({
|
|
266
|
+
newState: rawPort
|
|
267
|
+
? {
|
|
268
|
+
ofDevice: rawPort.state,
|
|
269
|
+
ofConnection: rawPort.connection,
|
|
270
|
+
}
|
|
271
|
+
: null,
|
|
272
|
+
port: rawPort instanceof globalThis.MIDIInput
|
|
273
|
+
? EMIDIInput.make(rawPort)
|
|
274
|
+
: rawPort instanceof globalThis.MIDIOutput
|
|
275
|
+
? EMIDIOutput.make(rawPort)
|
|
276
|
+
: null,
|
|
277
|
+
}));
|
|
278
|
+
/**
|
|
279
|
+
* beware that it's not possible to ensure the messages will either be all
|
|
280
|
+
* delivered, or all not delivered, as in ACID transactions. There's not even a
|
|
281
|
+
* mechanism to remove a specific message (not all) from the sending queue
|
|
282
|
+
*/
|
|
283
|
+
export const send = EFunction.dual(Util.polymorphicCheckInDual(is), Effect.fn('EMIDIAccess.send')(function* (polymorphicAccess, target, midiMessage, timestamp) {
|
|
284
|
+
const access = yield* resolve(polymorphicAccess);
|
|
285
|
+
const outputs = yield* getOutputsRecord(access);
|
|
286
|
+
if (target === 'all existing outputs at effect execution')
|
|
287
|
+
return yield* EFunction.pipe(Record.values(outputs), Effect.forEach(EMIDIOutput.send(midiMessage, timestamp)), Effect.as(access));
|
|
288
|
+
if (target === 'all open connections at effect execution')
|
|
289
|
+
return yield* EFunction.pipe(Record.values(outputs),
|
|
290
|
+
// TODO: maybe also do something about pending?
|
|
291
|
+
Effect.filter(isOutputConnectionOpenByPort), Effect.flatMap(Effect.forEach(EMIDIOutput.send(midiMessage, timestamp))), Effect.as(access));
|
|
292
|
+
// TODO: maybe since deviceState returns always connected devices we can
|
|
293
|
+
// simplify this check by applying intersections and comparing lengths
|
|
294
|
+
const portsIdsToSend = EArray.ensure(target);
|
|
295
|
+
const deviceStatusesEffect = portsIdsToSend.map(id => EFunction.pipe(Record.get(outputs, id), Option.match({
|
|
296
|
+
onNone: () => Effect.succeed('disconnected'),
|
|
297
|
+
onSome: EFunction.flow(getOutputDeviceStateByPort),
|
|
298
|
+
}), effect => Unify.unify(effect), Effect.map(state => ({ id, state }))));
|
|
299
|
+
const disconnectedDevice = EArray.findFirst(yield* Effect.all(deviceStatusesEffect), _ => _.state === 'disconnected');
|
|
300
|
+
if (Option.isSome(disconnectedDevice))
|
|
301
|
+
return yield* new Errors.DisconnectedPortError({
|
|
302
|
+
portId: disconnectedDevice.value.id,
|
|
303
|
+
cause: new DOMException(
|
|
304
|
+
// TODO: make an experiment and paste the error text here
|
|
305
|
+
'TODO: imitate there an error thats thrown when the port is disconnected', 'InvalidStateError'),
|
|
306
|
+
});
|
|
307
|
+
const sendToSome = (predicate) => Effect.all(Record.reduce(outputs, [],
|
|
308
|
+
// TODO: investigate what the fuck is going on, why the fuck can't I
|
|
309
|
+
// make it a simple expression without either nesting it in
|
|
310
|
+
// curly-braced function body or adding manual type-annotation
|
|
311
|
+
(acc, port, id) => predicate(id)
|
|
312
|
+
? [
|
|
313
|
+
...acc,
|
|
314
|
+
EMIDIOutput.send(port, midiMessage, timestamp),
|
|
315
|
+
]
|
|
316
|
+
: acc));
|
|
317
|
+
yield* sendToSome(id => portsIdsToSend.includes(id));
|
|
318
|
+
return access;
|
|
319
|
+
}));
|
|
320
|
+
/**
|
|
321
|
+
* @param options Passing a value of a `boolean` type is equivalent to setting
|
|
322
|
+
* `options.capture` property
|
|
323
|
+
*/
|
|
324
|
+
export const makeMessagesStreamByInputId = (id, options) => EMIDIInput.makeMessagesStreamByPort(GetPort.getInputByPortIdInContext(id), options);
|
|
325
|
+
// TODO: makeMessagesStreamByInputIdAndAccess
|
|
326
|
+
export const makeMessagesStreamByInputIdAndAccess = () => {
|
|
327
|
+
throw new Error('not implemented');
|
|
328
|
+
};
|
|
329
|
+
/**
|
|
330
|
+
*
|
|
331
|
+
*/
|
|
332
|
+
export const sendToPortById = (id, ...args) => Effect.asVoid(EMIDIOutput.send(GetPort.getOutputByPortIdInContext(id), ...args));
|
|
333
|
+
/**
|
|
334
|
+
*
|
|
335
|
+
*/
|
|
336
|
+
export const clearPortById = EFunction.flow(GetPort.getOutputByPortIdInContext, EMIDIOutput.clear, Effect.asVoid);
|
|
337
|
+
/**
|
|
338
|
+
* @param options Passing a value of a `boolean` type is equivalent to setting
|
|
339
|
+
* `options.capture` property
|
|
340
|
+
*/
|
|
341
|
+
export const makeAllPortsStateChangesStreamInContext = (options) => makeAllPortsStateChangesStream(EMIDIAccess, options);
|
|
342
|
+
/**
|
|
343
|
+
*
|
|
344
|
+
*
|
|
345
|
+
*/
|
|
346
|
+
export const sendInContext = (...args) => Effect.asVoid(send(EMIDIAccess, ...args));
|
|
347
|
+
/**
|
|
348
|
+
* @param options
|
|
349
|
+
*
|
|
350
|
+
* @returns An Effect representing a request for access to MIDI devices on a
|
|
351
|
+
* user's system. Available only in secure contexts.
|
|
352
|
+
*/
|
|
353
|
+
export const request = Effect.fn('EMIDIAccess.request')(function* (options) {
|
|
354
|
+
yield* Effect.annotateCurrentSpan({ options });
|
|
355
|
+
const rawAccess = yield* Effect.tryPromise({
|
|
356
|
+
try: () => navigator.requestMIDIAccess(options),
|
|
357
|
+
catch: Errors.remapErrorByName({
|
|
358
|
+
AbortError: Errors.AbortError,
|
|
359
|
+
InvalidStateError: Errors.UnderlyingSystemError,
|
|
360
|
+
NotAllowedError: Errors.MIDIAccessNotAllowedError,
|
|
361
|
+
// SecurityError is kept for compatibility reason
|
|
362
|
+
// (https://github.com/WebAudio/web-midi-api/pull/267):
|
|
363
|
+
SecurityError: Errors.MIDIAccessNotAllowedError,
|
|
364
|
+
NotSupportedError: Errors.MIDIAccessNotSupportedError,
|
|
365
|
+
// For case when navigator doesn't exist
|
|
366
|
+
ReferenceError: Errors.MIDIAccessNotSupportedError,
|
|
367
|
+
// For case when navigator.requestMIDIAccess is undefined
|
|
368
|
+
TypeError: Errors.MIDIAccessNotSupportedError,
|
|
369
|
+
}, 'EMIDIAccess.request error handling absurd', { whileAskingForPermissions: options ?? {} }),
|
|
370
|
+
});
|
|
371
|
+
// TODO: finish this
|
|
372
|
+
const ref = yield* Ref.make(SortedMap.empty(Order.string));
|
|
373
|
+
// return make(rawAccess, options, ref)
|
|
374
|
+
return make(rawAccess, options);
|
|
375
|
+
});
|
|
376
|
+
// TODO: clear all outputs
|
|
377
|
+
/**
|
|
378
|
+
*
|
|
379
|
+
* **Errors:**
|
|
380
|
+
*
|
|
381
|
+
* - {@linkcode Errors.AbortError} Argument x must be non-zero
|
|
382
|
+
* - {@linkcode Errors.UnderlyingSystemError} Argument x must be non-zero
|
|
383
|
+
* - {@linkcode Errors.MIDIAccessNotSupportedError} Argument x must be non-zero
|
|
384
|
+
* - {@linkcode Errors.MIDIAccessNotAllowedError} Argument x must be non-zero
|
|
385
|
+
*
|
|
386
|
+
* @param config
|
|
387
|
+
* @returns
|
|
388
|
+
*/
|
|
389
|
+
export const layer = (config) => Layer.effect(EMIDIAccess, request(config));
|
|
390
|
+
/**
|
|
391
|
+
*
|
|
392
|
+
*/
|
|
393
|
+
export const layerMostRestricted = layer();
|
|
394
|
+
/**
|
|
395
|
+
*
|
|
396
|
+
*/
|
|
397
|
+
export const layerSystemExclusiveSupported = layer({ sysex: true });
|
|
398
|
+
/**
|
|
399
|
+
*
|
|
400
|
+
*/
|
|
401
|
+
export const layerSoftwareSynthSupported = layer({ software: true });
|
|
402
|
+
/**
|
|
403
|
+
*
|
|
404
|
+
*/
|
|
405
|
+
export const layerSystemExclusiveAndSoftwareSynthSupported = layer({
|
|
406
|
+
software: true,
|
|
407
|
+
sysex: true,
|
|
408
|
+
});
|
|
409
|
+
//# sourceMappingURL=EMIDIAccess.js.map
|
|
@@ -0,0 +1 @@
|
|
|
1
|
+
{"version":3,"file":"EMIDIAccess.js","sourceRoot":"","sources":["../../../src/internal/EMIDIAccess.ts"],"names":[],"mappings":"AAAA;gEACgE;AAEhE,OAAO,KAAK,MAAM,MAAM,cAAc,CAAA;AACtC,OAAO,KAAK,OAAO,MAAM,gBAAgB,CAAA;AACzC,OAAO,KAAK,MAAM,MAAM,eAAe,CAAA;AACvC,OAAO,KAAK,KAAK,MAAM,cAAc,CAAA;AACrC,OAAO,KAAK,SAAS,MAAM,iBAAiB,CAAA;AAC5C,OAAO,KAAK,IAAI,MAAM,aAAa,CAAA;AACnC,OAAO,KAAK,WAAW,MAAM,oBAAoB,CAAA;AACjD,OAAO,KAAK,QAAQ,MAAM,iBAAiB,CAAA;AAC3C,OAAO,KAAK,KAAK,MAAM,cAAc,CAAA;AACrC,OAAO,KAAK,MAAM,MAAM,eAAe,CAAA;AACvC,OAAO,KAAK,KAAK,MAAM,cAAc,CAAA;AACrC,OAAO,KAAK,QAAQ,MAAM,iBAAiB,CAAA;AAC3C,OAAO,KAAK,MAAM,MAAM,eAAe,CAAA;AACvC,OAAO,KAAK,GAAG,MAAM,YAAY,CAAA;AACjC,OAAO,KAAK,SAAS,MAAM,kBAAkB,CAAA;AAE7C,OAAO,KAAK,KAAK,MAAM,cAAc,CAAA;AACrC,OAAO,KAAK,UAAU,MAAM,iBAAiB,CAAA;AAC7C,OAAO,KAAK,WAAW,MAAM,kBAAkB,CAAA;AAE/C,OAAO,KAAK,MAAM,MAAM,aAAa,CAAA;AACrC,OAAO,KAAK,OAAO,MAAM,+CAA+C,CAAA;AACxE,OAAO,EAAE,4BAA4B,EAAE,MAAM,mHAAmH,CAAA;AAChK,OAAO,EAAE,0BAA0B,EAAE,MAAM,+EAA+E,CAAA;AAC1H,OAAO,KAAK,WAAW,MAAM,kBAAkB,CAAA;AAC/C,OAAO,KAAK,IAAI,MAAM,WAAW,CAAA;AAEjC,2EAA2E;AAE3E,6EAA6E;AAC7E,sDAAsD;AAEtD,+EAA+E;AAC/E,oCAAoC;AAEpC,oCAAoC;AAEpC,0EAA0E;AAC1E,gDAAgD;AAEhD,iEAAiE;AACjE,uDAAuD;AAEvD,6EAA6E;AAC7E,oCAAoC;AAEpC,sDAAsD;AAEtD,wDAAwD;AAExD,+FAA+F;AAE/F;;;;GAIG;AACH,MAAM,MAAM,GAAkB,MAAM,CAAC,GAAG,CAAC,qCAAqC,CAAC,CAAA;AAQ/E;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;GAiCG;AACH,MAAM,OAAO,WAAY,SAAQ,OAAO,CAAC,GAAG,CAAC,6BAA6B,CAAC,EAGxE;CAAG;AA4CN;;;GAGG;AACH,MAAM,KAAK,GAAG;IACZ,IAAI,EAAE,aAAsB;IAC5B,CAAC,MAAM,CAAC,EAAE,MAAM;IAChB,CAAC,IAAI,CAAC,MAAM,CAAC;QACX,OAAO,IAAI,CAAC,SAAS,CAAC,IAAI,CAAC,OAAO,CAAC,CAAA;IACrC,CAAC;IACD,CAAC,KAAK,CAAC,MAAM,CAAC,CAAC,IAAiB;QAC9B,OAAO,IAAI,KAAK,IAAI,CAAA;IACtB,CAAC;IACD,IAAI;QACF,+DAA+D;QAC/D,OAAO,QAAQ,CAAC,aAAa,CAAC,IAAI,EAAE,SAAS,CAAC,CAAA;IAChD,CAAC;IACD,QAAQ;QACN,OAAO,WAAW,CAAC,MAAM,CAAC,IAAI,CAAC,MAAM,EAAE,CAAC,CAAA;IAC1C,CAAC;IACD,MAAM;QACJ,OAAO,EAAE,GAAG,EAAE,aAAa,EAAE,MAAM,EAAE,IAAI,CAAC,OAAO,EAAE,CAAA;IACrD,CAAC;IACD,CAAC,WAAW,CAAC,iBAAiB,CAAC;QAC7B,OAAO,IAAI,CAAC,MAAM,EAAE,CAAA;IACtB,CAAC;IAED,IAAI,YAAY;QACd,OAAO,UAAU,CAAC,IAAI,CAAC,CAAC,OAAO,CAAC,YAAY,CAAA;IAC9C,CAAC;IAED,IAAI,oBAAoB;QACtB,OAAO,CAAC,CAAC,UAAU,CAAC,IAAI,CAAC,CAAC,OAAO,CAAC,QAAQ,CAAA;IAC5C,CAAC;CAC4B,CAAA;AAmC/B;;;;GAIG;AACH,MAAM,QAAQ,GAAG,CACf,SAAqB,EACrB,MAA2C,EACR,EAAE;IACrC,MAAM,QAAQ,GAAG,MAAM,CAAC,MAAM,CAAC,KAAK,CAAC,CAAA;IACrC,QAAQ,CAAC,OAAO,GAAG,SAAS,CAAA;IAC5B,wDAAwD;IACxD,QAAQ,CAAC,OAAO,GAAG,MAAM,IAAI,EAAE,CAAA;IAC/B,OAAO,QAAQ,CAAA;AACjB,CAAC,CAAA;AAED;;;;;GAKG;AACH,MAAM,UAAU,GAAG,CAAC,MAAe,EAAE,EAAE;IACrC,IAAI,CAAC,MAAM,CAAC,MAAM,CAAC;QAAE,MAAM,IAAI,KAAK,CAAC,+BAA+B,CAAC,CAAA;IACrE,OAAO,MAAM,CAAA;AACf,CAAC,CAAA;AAED;;;;GAIG;AACH,MAAM,CAAC,MAAM,MAAM,GAA6C,UAAU,CAAA;AAE1E;;GAEG;AACH,MAAM,CAAC,MAAM,UAAU,GAAG,CAAC,MAA2B,EAAE,EAAE,CACxD,MAA2C,CAAA;AAE7C;;;;GAIG;AACH,MAAM,IAAI,GAGiB,QAAQ,CAAA;AAEnC;;;;GAIG;AACH,MAAM,MAAM,GAAG,CAAC,MAAe,EAA+C,EAAE,CAC9E,OAAO,MAAM,KAAK,QAAQ;IAC1B,MAAM,KAAK,IAAI;IACf,MAAM,CAAC,cAAc,CAAC,MAAM,CAAC,KAAK,KAAK;IACvC,MAAM,IAAI,MAAM;IAChB,SAAS,IAAI,MAAM;IACnB,OAAO,MAAM,CAAC,OAAO,KAAK,QAAQ;IAClC,SAAS,IAAI,MAAM;IACnB,OAAO,MAAM,CAAC,OAAO,KAAK,QAAQ;IAClC,MAAM,CAAC,OAAO,KAAK,IAAI;IACvB,MAAM,CAAC,OAAO,YAAY,UAAU,CAAA;AAEtC;;;GAGG;AACH,MAAM,CAAC,MAAM,EAAE,GAAuD,MAAM,CAAA;AAE5E;;;GAGG;AACH,MAAM,CAAC,MAAM,OAAO,GAAG,CACrB,iBAAkD,EAClD,EAAE,CAAC,IAAI,CAAC,eAAe,CAAC,iBAAiB,EAAE,EAAE,CAAC,CAAA;AA2BhD;;;GAGG;AACH,MAAM,2BAA2B,GAC/B,CAKE,GAAyB,EACzB,IAAgE,EAChE,EAAE,CACJ,CAAC,SAAqB,EAAE,EAAE,CACxB,QAAQ,CAAC,GAAG,CACV,SAAS,CAAC,GAAG,CAA2D,EACxE,CAAC,CAAC,EAAE,EAAE,GAAG,CAAC,EAAE,EAAE,CACZ,CAAC,EAAiC,EAAE,IAAI,CAAC,GAAG,CAAC,CAG5C,CACJ,CAAA;AAEL;;;GAGG;AACH,MAAM,sBAAsB,GAAG,2BAA2B,CACxD,QAAQ,EACR,UAAU,CAAC,IAAI,CAChB,CAAA;AAED;;;GAGG;AACH,MAAM,uBAAuB,GAAG,2BAA2B,CACzD,SAAS,EACT,WAAW,CAAC,IAAI,CACjB,CAAA;AAED;;;GAGG;AACH,MAAM,yBAAyB,GAAG,CAAC,SAAqB,EAAE,EAAE,CAC1D,QAAQ,CAAC,SAAS,CAChB,sBAAsB,CAAC,SAAS,CAAC,EACjC,uBAAuB,CAAC,SAAS,CAAC,CACnC,CAAA;AAEH;;;;;GAKG;AACH,MAAM,8CAA8C,GAClD,CACE,QAAgD,EAChD,EAAE,CACJ,CAAuB,iBAAkD,EAAE,EAAE,CAC3E,MAAM,CAAC,GAAG,CACR,OAAO,CAAC,iBAAiB,CAAC,EAC1B,SAAS,CAAC,IAAI,CAAC,UAAU,EAAE,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC,OAAO,EAAE,QAAQ,EAAE,MAAM,CAAC,WAAW,CAAC,CAKzE,CAAA;AAEL;;;;;;;;;GASG;AACH,MAAM,CAAC,MAAM,eAAe,GAAG,8CAA8C,CAC3E,sBAAsB,CACvB,CAAA;AAED;;;;;;;;;GASG;AACH,MAAM,CAAC,MAAM,gBAAgB,GAAG,8CAA8C,CAC5E,uBAAuB,CACxB,CAAA;AAED;;;GAGG;AACH,MAAM,CAAC,MAAM,iBAAiB,GAAG,8CAA8C,CAC7E,yBAAyB,CAC1B,CAAA;AAED;;;GAGG;AACH,MAAM,CAAC,MAAM,YAAY,GAAG,eAAe,CAAC,WAAW,CAAC,CAAA;AAExD;;;GAGG;AACH,MAAM,CAAC,MAAM,aAAa,GAAG,gBAAgB,CAAC,WAAW,CAAC,CAAA;AAE1D;;;GAGG;AACH,MAAM,CAAC,MAAM,cAAc,GAAG,iBAAiB,CAAC,WAAW,CAAC,CAAA;AAE5D;;;GAGG;AACH,MAAM,CAAC,MAAM,8BAA8B,GACzC,WAAW,CAAC,qBAAqB,EAAoB,CACnD,EAAE,EACF,MAAM,CAAC,EAAE,CAAC,CAAC;IACT,GAAG,EAAE,qBAAqB;IAC1B,aAAa,EAAE;QACb,MAAM,EAAE,UAAU,CAAC,MAAM,CAAC,CAAC,OAAO;QAClC,IAAI,EAAE,aAAa;KACpB;IACD,cAAc,EAAE;QACd,cAAc,EAAE,oBAAoB;QACpC,qBAAqB,EAAE,UAAU,CAAC,MAAM,CAAC,CAAC,OAAO;KAClD;IACD,iBAAiB,EAAE,MAAM;CAC1B,CAAC,EACF,OAAO,CAAC,EAAE,CACR,CAAC;IACC,QAAQ,EAAE,OAAO;QACf,CAAC,CAAE;YACC,QAAQ,EAAE,OAAO,CAAC,KAAK;YACvB,YAAY,EAAE,OAAO,CAAC,UAAU;SACvB;QACb,CAAC,CAAC,IAAI;IACR,IAAI,EACF,OAAO,YAAY,UAAU,CAAC,SAAS;QACrC,CAAC,CAAC,UAAU,CAAC,IAAI,CAAC,OAAO,CAAC;QAC1B,CAAC,CAAC,OAAO,YAAY,UAAU,CAAC,UAAU;YACxC,CAAC,CAAC,WAAW,CAAC,IAAI,CAAC,OAAO,CAAC;YAC3B,CAAC,CAAC,IAAI;CACb,CAAU,CACd,CAAA;AAEH;;;;GAIG;AACH,MAAM,CAAC,MAAM,IAAI,GAAkC,SAAS,CAAC,IAAI,CAI/D,IAAI,CAAC,sBAAsB,CAAC,EAAE,CAAC,EAC/B,MAAM,CAAC,EAAE,CAAC,kBAAkB,CAAC,CAC3B,QAAQ,CAAC,EAAE,iBAAiB,EAAE,MAAM,EAAE,WAAW,EAAE,SAAS;IAC1D,MAAM,MAAM,GAAG,KAAK,CAAC,CAAC,OAAO,CAAC,iBAAiB,CAAC,CAAA;IAEhD,MAAM,OAAO,GAAG,KAAK,CAAC,CAAC,gBAAgB,CAAC,MAAM,CAAC,CAAA;IAE/C,IAAI,MAAM,KAAK,0CAA0C;QACvD,OAAO,KAAK,CAAC,CAAC,SAAS,CAAC,IAAI,CAC1B,MAAM,CAAC,MAAM,CAAC,OAAO,CAAC,EACtB,MAAM,CAAC,OAAO,CAAC,WAAW,CAAC,IAAI,CAAC,WAAW,EAAE,SAAS,CAAC,CAAC,EACxD,MAAM,CAAC,EAAE,CAAC,MAAM,CAAC,CAClB,CAAA;IAEH,IAAI,MAAM,KAAK,0CAA0C;QACvD,OAAO,KAAK,CAAC,CAAC,SAAS,CAAC,IAAI,CAC1B,MAAM,CAAC,MAAM,CAAC,OAAO,CAAC;QACtB,+CAA+C;QAC/C,MAAM,CAAC,MAAM,CAAC,4BAA4B,CAAC,EAC3C,MAAM,CAAC,OAAO,CACZ,MAAM,CAAC,OAAO,CAAC,WAAW,CAAC,IAAI,CAAC,WAAW,EAAE,SAAS,CAAC,CAAC,CACzD,EACD,MAAM,CAAC,EAAE,CAAC,MAAM,CAAC,CAClB,CAAA;IAEH,wEAAwE;IACxE,sEAAsE;IAEtE,MAAM,cAAc,GAAqB,MAAM,CAAC,MAAM,CAAC,MAAM,CAAC,CAAA;IAE9D,MAAM,oBAAoB,GAAG,cAAc,CAAC,GAAG,CAAC,EAAE,CAAC,EAAE,CACnD,SAAS,CAAC,IAAI,CACZ,MAAM,CAAC,GAAG,CAAC,OAAO,EAAE,EAAE,CAAC,EACvB,MAAM,CAAC,KAAK,CAAC;QACX,MAAM,EAAE,GAAG,EAAE,CAAC,MAAM,CAAC,OAAO,CAAC,cAAuB,CAAC;QACrD,MAAM,EAAE,SAAS,CAAC,IAAI,CAAC,0BAA0B,CAAC;KACnD,CAAC,EACF,MAAM,CAAC,EAAE,CAAC,KAAK,CAAC,KAAK,CAAC,MAAM,CAAC,EAC7B,MAAM,CAAC,GAAG,CAAC,KAAK,CAAC,EAAE,CAAC,CAAC,EAAE,EAAE,EAAE,KAAK,EAAE,CAAC,CAAC,CACrC,CACF,CAAA;IAED,MAAM,kBAAkB,GAAG,MAAM,CAAC,SAAS,CACzC,KAAK,CAAC,CAAC,MAAM,CAAC,GAAG,CAAC,oBAAoB,CAAC,EACvC,CAAC,CAAC,EAAE,CAAC,CAAC,CAAC,KAAK,KAAK,cAAc,CAChC,CAAA;IAED,IAAI,MAAM,CAAC,MAAM,CAAC,kBAAkB,CAAC;QACnC,OAAO,KAAK,CAAC,CAAC,IAAI,MAAM,CAAC,qBAAqB,CAAC;YAC7C,MAAM,EAAE,kBAAkB,CAAC,KAAK,CAAC,EAAE;YACnC,KAAK,EAAE,IAAI,YAAY;YACrB,yDAAyD;YACzD,yEAAyE,EACzE,mBAAmB,CAC4B;SAClD,CAAC,CAAA;IAEJ,MAAM,UAAU,GAAG,CAAC,SAA0C,EAAE,EAAE,CAChE,MAAM,CAAC,GAAG,CACR,MAAM,CAAC,MAAM,CACX,OAAO,EACP,EAA2D;IAC3D,oEAAoE;IACpE,2DAA2D;IAC3D,8DAA8D;IAC9D,CAAC,GAAG,EAAE,IAAI,EAAE,EAAE,EAAE,EAAE,CAChB,SAAS,CAAC,EAAE,CAAC;QACX,CAAC,CAAC;YACE,GAAG,GAAG;YACN,WAAW,CAAC,IAAI,CACd,IAAI,EACJ,WAAW,EACX,SAAS,CAC+B;SAC3C;QACH,CAAC,CAAC,GAAG,CACV,CACF,CAAA;IAEH,KAAK,CAAC,CAAC,UAAU,CAAC,EAAE,CAAC,EAAE,CAAC,cAAc,CAAC,QAAQ,CAAC,EAAE,CAAC,CAAC,CAAA;IAEpD,OAAO,MAAM,CAAA;AACf,CAAC,CACF,CACF,CAAA;AAED;;;GAGG;AACH,MAAM,CAAC,MAAM,2BAA2B,GAAG,CAGzC,EAAiB,EACjB,OAAyD,EACzD,EAAE,CACF,UAAU,CAAC,wBAAwB,CACjC,OAAO,CAAC,yBAAyB,CAAC,EAAE,CAAC,EACrC,OAAO,CACR,CAAA;AAEH,6CAA6C;AAC7C,MAAM,CAAC,MAAM,oCAAoC,GAAG,GAAG,EAAE;IACvD,MAAM,IAAI,KAAK,CAAC,iBAAiB,CAAC,CAAA;AACpC,CAAC,CAAA;AAED;;GAEG;AACH,MAAM,CAAC,MAAM,cAAc,GAAG,CAC5B,EAAkB,EAClB,GAAG,IAAkC,EACrC,EAAE,CACF,MAAM,CAAC,MAAM,CACX,WAAW,CAAC,IAAI,CAAC,OAAO,CAAC,0BAA0B,CAAC,EAAE,CAAC,EAAE,GAAG,IAAI,CAAC,CAClE,CAAA;AAEH;;GAEG;AACH,MAAM,CAAC,MAAM,aAAa,GAAG,SAAS,CAAC,IAAI,CACzC,OAAO,CAAC,0BAA0B,EAClC,WAAW,CAAC,KAAK,EACjB,MAAM,CAAC,MAAM,CACd,CAAA;AAED;;;GAGG;AACH,MAAM,CAAC,MAAM,uCAAuC,GAAG,CAGrD,OAAyD,EACzD,EAAE,CAAC,8BAA8B,CAAC,WAAW,EAAE,OAAO,CAAC,CAAA;AAEzD;;;GAGG;AACH,MAAM,CAAC,MAAM,aAAa,GAAG,CAAC,GAAG,IAAwB,EAAE,EAAE,CAC3D,MAAM,CAAC,MAAM,CAAC,IAAI,CAAC,WAAW,EAAE,GAAG,IAAI,CAAC,CAAC,CAAA;AAE3C;;;;;GAKG;AACH,MAAM,CAAC,MAAM,OAAO,GAAG,MAAM,CAAC,EAAE,CAAC,qBAAqB,CAAC,CAAC,QAAQ,CAAC,EAC/D,OAAkC;IAElC,KAAK,CAAC,CAAC,MAAM,CAAC,mBAAmB,CAAC,EAAE,OAAO,EAAE,CAAC,CAAA;IAE9C,MAAM,SAAS,GAAG,KAAK,CAAC,CAAC,MAAM,CAAC,UAAU,CAAC;QACzC,GAAG,EAAE,GAAG,EAAE,CAAC,SAAS,CAAC,iBAAiB,CAAC,OAAO,CAAC;QAC/C,KAAK,EAAE,MAAM,CAAC,gBAAgB,CAC5B;YACE,UAAU,EAAE,MAAM,CAAC,UAAU;YAE7B,iBAAiB,EAAE,MAAM,CAAC,qBAAqB;YAE/C,eAAe,EAAE,MAAM,CAAC,yBAAyB;YACjD,iDAAiD;YACjD,uDAAuD;YACvD,aAAa,EAAE,MAAM,CAAC,yBAAyB;YAE/C,iBAAiB,EAAE,MAAM,CAAC,2BAA2B;YACrD,wCAAwC;YACxC,cAAc,EAAE,MAAM,CAAC,2BAA2B;YAClD,yDAAyD;YACzD,SAAS,EAAE,MAAM,CAAC,2BAA2B;SAC9C,EACD,2CAA2C,EAC3C,EAAE,yBAAyB,EAAE,OAAO,IAAI,EAAE,EAAE,CAC7C;KACF,CAAC,CAAA;IAEF,oBAAoB;IAEpB,MAAM,GAAG,GAAG,KAAK,CAAC,CAAC,GAAG,CAAC,IAAI,CACzB,SAAS,CAAC,KAAK,CAAiC,KAAK,CAAC,MAAM,CAAC,CAC9D,CAAA;IAED,uCAAuC;IACvC,OAAO,IAAI,CAAC,SAAS,EAAE,OAAO,CAAC,CAAA;AACjC,CAAC,CAAC,CAAA;AAEF,0BAA0B;AAE1B;;;;;;;;;;;GAWG;AACH,MAAM,CAAC,MAAM,KAAK,GAAG,CAAC,MAAiC,EAAE,EAAE,CACzD,KAAK,CAAC,MAAM,CAAC,WAAW,EAAE,OAAO,CAAC,MAAM,CAAC,CAAC,CAAA;AAE5C;;GAEG;AACH,MAAM,CAAC,MAAM,mBAAmB,GAAG,KAAK,EAAE,CAAA;AAE1C;;GAEG;AACH,MAAM,CAAC,MAAM,6BAA6B,GAAG,KAAK,CAAC,EAAE,KAAK,EAAE,IAAI,EAAE,CAAC,CAAA;AAEnE;;GAEG;AACH,MAAM,CAAC,MAAM,2BAA2B,GAAG,KAAK,CAAC,EAAE,QAAQ,EAAE,IAAI,EAAE,CAAC,CAAA;AAEpE;;GAEG;AACH,MAAM,CAAC,MAAM,6CAA6C,GAAG,KAAK,CAAC;IACjE,QAAQ,EAAE,IAAI;IACd,KAAK,EAAE,IAAI;CACZ,CAAC,CAAA"}
|
|
@@ -0,0 +1,69 @@
|
|
|
1
|
+
import * as Brand from 'effect/Brand';
|
|
2
|
+
import * as EMIDIPort from "./EMIDIPort.js";
|
|
3
|
+
import * as StreamMaker from "./StreamMaker.js";
|
|
4
|
+
import * as Util from "./util.js";
|
|
5
|
+
/**
|
|
6
|
+
* Validates the raw MIDI input port, and puts it into a field hidden from the
|
|
7
|
+
* client's code
|
|
8
|
+
*
|
|
9
|
+
* @internal
|
|
10
|
+
*/
|
|
11
|
+
const makeImpl = (rawInput) => EMIDIPort.makeImpl(rawInput, 'input', globalThis.MIDIInput);
|
|
12
|
+
/**
|
|
13
|
+
* Asserts an object to be valid EMIDIInput and casts it to internal
|
|
14
|
+
* implementation type
|
|
15
|
+
*
|
|
16
|
+
* @internal
|
|
17
|
+
*/
|
|
18
|
+
const assertImpl = (input) => {
|
|
19
|
+
if (!isImpl(input))
|
|
20
|
+
throw new Error('Failed to cast to EMIDIInputImpl');
|
|
21
|
+
return input;
|
|
22
|
+
};
|
|
23
|
+
/**
|
|
24
|
+
* Asserts an object to be valid EMIDIInput
|
|
25
|
+
*/
|
|
26
|
+
export const assert = assertImpl;
|
|
27
|
+
/**
|
|
28
|
+
* @internal
|
|
29
|
+
*/
|
|
30
|
+
const assumeImpl = (input) => input;
|
|
31
|
+
/**
|
|
32
|
+
*
|
|
33
|
+
*
|
|
34
|
+
* @internal
|
|
35
|
+
*/
|
|
36
|
+
export const make = makeImpl;
|
|
37
|
+
/**
|
|
38
|
+
*
|
|
39
|
+
*
|
|
40
|
+
* @internal
|
|
41
|
+
*/
|
|
42
|
+
const isImpl = EMIDIPort.isImplOfSpecificType('input', globalThis.MIDIInput);
|
|
43
|
+
/**
|
|
44
|
+
*
|
|
45
|
+
*
|
|
46
|
+
*/
|
|
47
|
+
export const is = isImpl;
|
|
48
|
+
/**
|
|
49
|
+
* [MIDIMessageEvent MDN
|
|
50
|
+
* Reference](https://developer.mozilla.org/docs/Web/API/MIDIMessageEvent)
|
|
51
|
+
*
|
|
52
|
+
* MIDI spec says that synthetically built `MIDIMessageEvent`s can have `data`
|
|
53
|
+
* field equal to `null`, but when coming from the browser, they won't. The
|
|
54
|
+
* default behavior is to defect on `null`.
|
|
55
|
+
*/
|
|
56
|
+
export const makeMessagesStreamByPort = StreamMaker.createStreamMakerFrom()(is, input => ({
|
|
57
|
+
tag: 'MIDIMessage',
|
|
58
|
+
eventListener: {
|
|
59
|
+
target: assumeImpl(input)._port,
|
|
60
|
+
type: 'midimessage',
|
|
61
|
+
},
|
|
62
|
+
spanAttributes: {
|
|
63
|
+
spanTargetName: 'MIDI port',
|
|
64
|
+
port: Util.getStaticMIDIPortInfo(input),
|
|
65
|
+
},
|
|
66
|
+
nullableFieldName: 'data',
|
|
67
|
+
}), midiMessage => ({ midiMessage }));
|
|
68
|
+
export const Id = Brand.nominal();
|
|
69
|
+
//# sourceMappingURL=EMIDIInput.js.map
|
|
@@ -0,0 +1 @@
|
|
|
1
|
+
{"version":3,"file":"EMIDIInput.js","sourceRoot":"","sources":["../../../src/internal/EMIDIInput.ts"],"names":[],"mappings":"AAAA,OAAO,KAAK,KAAK,MAAM,cAAc,CAAA;AACrC,OAAO,KAAK,SAAS,MAAM,gBAAgB,CAAA;AAC3C,OAAO,KAAK,WAAW,MAAM,kBAAkB,CAAA;AAC/C,OAAO,KAAK,IAAI,MAAM,WAAW,CAAA;AAoBjC;;;;;GAKG;AACH,MAAM,QAAQ,GAAG,CAAC,QAAmB,EAAkB,EAAE,CACvD,SAAS,CAAC,QAAQ,CAAC,QAAQ,EAAE,OAAO,EAAE,UAAU,CAAC,SAAS,CAAC,CAAA;AAE7D;;;;;GAKG;AACH,MAAM,UAAU,GAAG,CAAC,KAAc,EAAE,EAAE;IACpC,IAAI,CAAC,MAAM,CAAC,KAAK,CAAC;QAAE,MAAM,IAAI,KAAK,CAAC,kCAAkC,CAAC,CAAA;IACvE,OAAO,KAAK,CAAA;AACd,CAAC,CAAA;AAED;;GAEG;AACH,MAAM,CAAC,MAAM,MAAM,GAAmC,UAAU,CAAA;AAEhE;;GAEG;AACH,MAAM,UAAU,GAAG,CAAC,KAAiB,EAAE,EAAE,CAAC,KAAuB,CAAA;AAEjE;;;;GAIG;AACH,MAAM,CAAC,MAAM,IAAI,GAAwC,QAAQ,CAAA;AAEjE;;;;GAIG;AACH,MAAM,MAAM,GACV,SAAS,CAAC,oBAAoB,CAAC,OAAO,EAAE,UAAU,CAAC,SAAS,CAAC,CAAA;AAE/D;;;GAGG;AACH,MAAM,CAAC,MAAM,EAAE,GAA4C,MAAM,CAAA;AAEjE;;;;;;;GAOG;AACH,MAAM,CAAC,MAAM,wBAAwB,GACnC,WAAW,CAAC,qBAAqB,EAAqB,CACpD,EAAE,EACF,KAAK,CAAC,EAAE,CAAC,CAAC;IACR,GAAG,EAAE,aAAa;IAClB,aAAa,EAAE;QACb,MAAM,EAAE,UAAU,CAAC,KAAK,CAAC,CAAC,KAAK;QAC/B,IAAI,EAAE,aAAa;KACpB;IACD,cAAc,EAAE;QACd,cAAc,EAAE,WAAW;QAC3B,IAAI,EAAE,IAAI,CAAC,qBAAqB,CAAC,KAAK,CAAC;KACxC;IACD,iBAAiB,EAAE,MAAM;CAC1B,CAAC,EACF,WAAW,CAAC,EAAE,CAAC,CAAC,EAAE,WAAW,EAAE,CAAC,CACjC,CAAA;AAeH,MAAM,CAAC,MAAM,EAAE,GAAG,KAAK,CAAC,OAAO,EAAM,CAAA"}
|
|
@@ -0,0 +1,120 @@
|
|
|
1
|
+
/** biome-ignore-all lint/style/useShorthandFunctionType: It's a nice way to
|
|
2
|
+
* preserve JSDoc comments attached to the function signature */
|
|
3
|
+
import * as Brand from 'effect/Brand';
|
|
4
|
+
import * as Effect from 'effect/Effect';
|
|
5
|
+
import * as EFunction from 'effect/Function';
|
|
6
|
+
import * as EMIDIPort from "./EMIDIPort.js";
|
|
7
|
+
import * as Errors from "./errors.js";
|
|
8
|
+
import * as Util from "./util.js";
|
|
9
|
+
/**
|
|
10
|
+
* Validates the raw MIDI output port, and puts it into a field hidden from the
|
|
11
|
+
* client's code
|
|
12
|
+
*
|
|
13
|
+
* @internal
|
|
14
|
+
*/
|
|
15
|
+
const makeImpl = (rawOutput) => EMIDIPort.makeImpl(rawOutput, 'output', globalThis.MIDIOutput);
|
|
16
|
+
/**
|
|
17
|
+
* Asserts an object to be valid EMIDIOutput and casts it to
|
|
18
|
+
* internal implementation type
|
|
19
|
+
*
|
|
20
|
+
* @internal
|
|
21
|
+
*/
|
|
22
|
+
const assertImpl = (output) => {
|
|
23
|
+
if (!isImpl(output))
|
|
24
|
+
throw new Error('Assertion failed: Not a EMIDIOutputImpl');
|
|
25
|
+
return output;
|
|
26
|
+
};
|
|
27
|
+
/**
|
|
28
|
+
* Asserts an object to be valid EMIDIOutput
|
|
29
|
+
*/
|
|
30
|
+
export const assert = assertImpl;
|
|
31
|
+
/**
|
|
32
|
+
* Casts
|
|
33
|
+
* @internal
|
|
34
|
+
*/
|
|
35
|
+
const assumeImpl = (output) => output;
|
|
36
|
+
/**
|
|
37
|
+
*
|
|
38
|
+
* @internal
|
|
39
|
+
*/
|
|
40
|
+
export const make = makeImpl;
|
|
41
|
+
/**
|
|
42
|
+
*
|
|
43
|
+
* @internal
|
|
44
|
+
*/
|
|
45
|
+
const isImpl = EMIDIPort.isImplOfSpecificType('output', globalThis.MIDIOutput);
|
|
46
|
+
/**
|
|
47
|
+
*
|
|
48
|
+
*/
|
|
49
|
+
export const is = isImpl;
|
|
50
|
+
/**
|
|
51
|
+
*
|
|
52
|
+
*
|
|
53
|
+
* @internal
|
|
54
|
+
*/
|
|
55
|
+
const resolve = (polymorphicPort) => Util.fromPolymorphic(polymorphicPort, is);
|
|
56
|
+
/**
|
|
57
|
+
* If `midiMessage` is a System Exclusive message, and the `MIDIAccess` did not
|
|
58
|
+
* enable System Exclusive access, an `InvalidAccessError` exception will be
|
|
59
|
+
* thrown
|
|
60
|
+
*
|
|
61
|
+
* If the port is `"connected"` and the connection is `"closed"`, asynchronously
|
|
62
|
+
* tries to open the port. It's unclear in the spec if potential error of `open`
|
|
63
|
+
* call would result in an `InvalidAccessError` error coming from the `send`
|
|
64
|
+
* method itself.
|
|
65
|
+
*
|
|
66
|
+
* @returns An effect with the same port for easier chaining of operations
|
|
67
|
+
*/
|
|
68
|
+
export const send = EFunction.dual(Util.polymorphicCheckInDual(is), Effect.fn('EMIDIOutput.send')(function* (polymorphicOutput, midiMessage, timestamp) {
|
|
69
|
+
const output = yield* resolve(polymorphicOutput);
|
|
70
|
+
yield* Effect.annotateCurrentSpan({
|
|
71
|
+
midiMessage,
|
|
72
|
+
timestamp,
|
|
73
|
+
port: Util.getStaticMIDIPortInfo(output),
|
|
74
|
+
});
|
|
75
|
+
yield* Effect.try({
|
|
76
|
+
try: () => assumeImpl(output)._port.send(midiMessage, timestamp),
|
|
77
|
+
catch: Errors.remapErrorByName({
|
|
78
|
+
NotAllowedError: Errors.CantSendSysexMessagesError,
|
|
79
|
+
// InvalidAccessError is kept for compatibility reason
|
|
80
|
+
// (https://github.com/WebAudio/web-midi-api/pull/278):
|
|
81
|
+
InvalidAccessError: Errors.CantSendSysexMessagesError,
|
|
82
|
+
InvalidStateError: Errors.DisconnectedPortError,
|
|
83
|
+
TypeError: Errors.MalformedMidiMessageError,
|
|
84
|
+
}, 'EMIDIOutput.send error handling absurd', { portId: output.id, midiMessage: [...midiMessage] }),
|
|
85
|
+
});
|
|
86
|
+
return output;
|
|
87
|
+
}));
|
|
88
|
+
/**
|
|
89
|
+
* Clears any enqueued send data that has not yet been sent from the
|
|
90
|
+
* `MIDIOutput`'s queue. The browser will ensure the MIDI stream is left in a
|
|
91
|
+
* good state, and if the output port is in the middle of a sysex message, a
|
|
92
|
+
* sysex termination byte (`0xf7`) will be sent.
|
|
93
|
+
*
|
|
94
|
+
* @param polymorphicOutput An effectful output port
|
|
95
|
+
*
|
|
96
|
+
* @returns An effect with the same port for easier chaining of operations
|
|
97
|
+
* @experimental Supported only in Firefox. {@link https://caniuse.com/mdn-api_midioutput_clear|Can I use - MIDIOutput API: clear}
|
|
98
|
+
* @see {@link https://www.w3.org/TR/webmidi/#dom-midioutput-clear|Web MIDI spec}, {@link https://developer.mozilla.org/en-US/docs/Web/API/MIDIOutput/clear|MDN reference}
|
|
99
|
+
*/
|
|
100
|
+
export const clear = Effect.fn('EMIDIOutput.clear')(function* (polymorphicOutput) {
|
|
101
|
+
const output = yield* resolve(polymorphicOutput);
|
|
102
|
+
yield* Effect.annotateCurrentSpan({
|
|
103
|
+
port: Util.getStaticMIDIPortInfo(output),
|
|
104
|
+
});
|
|
105
|
+
yield* Effect.try({
|
|
106
|
+
// @ts-expect-error even though `.clear` is in spec, the API is not
|
|
107
|
+
// supported in at least 2 major browsers, hence doesn't meet the condition
|
|
108
|
+
// to be included into TS's DOM types
|
|
109
|
+
try: () => assumeImpl(output)._port.clear(),
|
|
110
|
+
catch: Errors.remapErrorByName({
|
|
111
|
+
// TODO: test this
|
|
112
|
+
// most likely it would be something like `TypeError: Undefined is not a function`
|
|
113
|
+
TypeError: Errors.ClearingSendingQueueIsNotSupportedError,
|
|
114
|
+
NotSupportedError: Errors.ClearingSendingQueueIsNotSupportedError,
|
|
115
|
+
}, 'EMIDIOutput.clear error handling absurd', { portId: output.id }),
|
|
116
|
+
});
|
|
117
|
+
return output;
|
|
118
|
+
});
|
|
119
|
+
export const Id = Brand.nominal();
|
|
120
|
+
//# sourceMappingURL=EMIDIOutput.js.map
|
|
@@ -0,0 +1 @@
|
|
|
1
|
+
{"version":3,"file":"EMIDIOutput.js","sourceRoot":"","sources":["../../../src/internal/EMIDIOutput.ts"],"names":[],"mappings":"AAAA;gEACgE;AAEhE,OAAO,KAAK,KAAK,MAAM,cAAc,CAAA;AACrC,OAAO,KAAK,MAAM,MAAM,eAAe,CAAA;AACvC,OAAO,KAAK,SAAS,MAAM,iBAAiB,CAAA;AAC5C,OAAO,KAAK,SAAS,MAAM,gBAAgB,CAAA;AAC3C,OAAO,KAAK,MAAM,MAAM,aAAa,CAAA;AACrC,OAAO,KAAK,IAAI,MAAM,WAAW,CAAA;AAgBjC;;;;;GAKG;AACH,MAAM,QAAQ,GAAG,CAAC,SAAqB,EAAmB,EAAE,CAC1D,SAAS,CAAC,QAAQ,CAAC,SAAS,EAAE,QAAQ,EAAE,UAAU,CAAC,UAAU,CAAC,CAAA;AAEhE;;;;;GAKG;AACH,MAAM,UAAU,GAAG,CAAC,MAAe,EAAE,EAAE;IACrC,IAAI,CAAC,MAAM,CAAC,MAAM,CAAC;QACjB,MAAM,IAAI,KAAK,CAAC,yCAAyC,CAAC,CAAA;IAC5D,OAAO,MAAM,CAAA;AACf,CAAC,CAAA;AAED;;GAEG;AACH,MAAM,CAAC,MAAM,MAAM,GAAqC,UAAU,CAAA;AAElE;;;GAGG;AACH,MAAM,UAAU,GAAG,CAAC,MAAmB,EAAE,EAAE,CAAC,MAAyB,CAAA;AAErE;;;GAGG;AACH,MAAM,CAAC,MAAM,IAAI,GAA2C,QAAQ,CAAA;AAEpE;;;GAGG;AACH,MAAM,MAAM,GAAG,SAAS,CAAC,oBAAoB,CAAC,QAAQ,EAAE,UAAU,CAAC,UAAU,CAAC,CAAA;AAE9E;;GAEG;AACH,MAAM,CAAC,MAAM,EAAE,GAA+C,MAAM,CAAA;AAEpE;;;;GAIG;AACH,MAAM,OAAO,GAAG,CACd,eAAwC,EACxC,EAAE,CAAC,IAAI,CAAC,eAAe,CAAC,eAAe,EAAE,EAAE,CAAC,CAAA;AAE9C;;;;;;;;;;;GAWG;AACH,MAAM,CAAC,MAAM,IAAI,GAAgC,SAAS,CAAC,IAAI,CAI7D,IAAI,CAAC,sBAAsB,CAAC,EAAE,CAAC,EAC/B,MAAM,CAAC,EAAE,CAAC,kBAAkB,CAAC,CAC3B,QAAQ,CAAC,EAAE,iBAAiB,EAAE,WAAW,EAAE,SAAS;IAClD,MAAM,MAAM,GAAG,KAAK,CAAC,CAAC,OAAO,CAAC,iBAAiB,CAAC,CAAA;IAEhD,KAAK,CAAC,CAAC,MAAM,CAAC,mBAAmB,CAAC;QAChC,WAAW;QACX,SAAS;QACT,IAAI,EAAE,IAAI,CAAC,qBAAqB,CAAC,MAAM,CAAC;KACzC,CAAC,CAAA;IAEF,KAAK,CAAC,CAAC,MAAM,CAAC,GAAG,CAAC;QAChB,GAAG,EAAE,GAAG,EAAE,CAAC,UAAU,CAAC,MAAM,CAAC,CAAC,KAAK,CAAC,IAAI,CAAC,WAAW,EAAE,SAAS,CAAC;QAChE,KAAK,EAAE,MAAM,CAAC,gBAAgB,CAC5B;YACE,eAAe,EAAE,MAAM,CAAC,0BAA0B;YAClD,sDAAsD;YACtD,uDAAuD;YACvD,kBAAkB,EAAE,MAAM,CAAC,0BAA0B;YAErD,iBAAiB,EAAE,MAAM,CAAC,qBAAqB;YAC/C,SAAS,EAAE,MAAM,CAAC,yBAAyB;SAC5C,EACD,wCAAwC,EACxC,EAAE,MAAM,EAAE,MAAM,CAAC,EAAE,EAAE,WAAW,EAAE,CAAC,GAAG,WAAW,CAAC,EAAE,CACrD;KACF,CAAC,CAAA;IAEF,OAAO,MAAqB,CAAA;AAC9B,CAAC,CACF,CACF,CAAA;AAED;;;;;;;;;;;GAWG;AACH,MAAM,CAAC,MAAM,KAAK,GAAG,MAAM,CAAC,EAAE,CAAC,mBAAmB,CAAC,CAAC,QAAQ,CAAC,EAG3D,iBAA0C;IAC1C,MAAM,MAAM,GAAG,KAAK,CAAC,CAAC,OAAO,CAAC,iBAAiB,CAAC,CAAA;IAEhD,KAAK,CAAC,CAAC,MAAM,CAAC,mBAAmB,CAAC;QAChC,IAAI,EAAE,IAAI,CAAC,qBAAqB,CAAC,MAAM,CAAC;KACzC,CAAC,CAAA;IAEF,KAAK,CAAC,CAAC,MAAM,CAAC,GAAG,CAAC;QAChB,mEAAmE;QACnE,2EAA2E;QAC3E,qCAAqC;QACrC,GAAG,EAAE,GAAG,EAAE,CAAC,UAAU,CAAC,MAAM,CAAC,CAAC,KAAK,CAAC,KAAK,EAAE;QAC3C,KAAK,EAAE,MAAM,CAAC,gBAAgB,CAC5B;YACE,kBAAkB;YAClB,kFAAkF;YAClF,SAAS,EAAE,MAAM,CAAC,uCAAuC;YACzD,iBAAiB,EAAE,MAAM,CAAC,uCAAuC;SAClE,EACD,yCAAyC,EACzC,EAAE,MAAM,EAAE,MAAM,CAAC,EAAE,EAAE,CACtB;KACF,CAAC,CAAA;IAEF,OAAO,MAAM,CAAA;AACf,CAAC,CAAC,CAAA;AAwDF,MAAM,CAAC,MAAM,EAAE,GAAG,KAAK,CAAC,OAAO,EAAM,CAAA"}
|