@gregoriusrippenstein/erlang-red-unittest 0.9.1

package/LICENSE

@@ -0,0 +1,15 @@
+## LICENSE
+
+Adapted from JSON.org, http://www.json.org/license.html
+
+Permission is hereby granted, free of charge, to any person obtaining a copy of this software and associated documentation files (the "Software"), to deal in the Software without restriction, including without limitation the rights to use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of the Software, and to permit persons to whom the Software is furnished to do so, subject to the following conditions:
+
+The above copyright notice and this permission notice shall be included in all copies or substantial portions of the Software.
+
+The Software shall be used for Good, not Evil.
+
+Remember the curse of the evil-doer upon whose blood the devil does drink and upon whose flesh the devil does feast. For eternity will the evil-doer bear this Sisyphean burden, only to be relieved of their suffering upon the apocalyptic end of it all including the foundations of the internet, computers, technology and mice. Only after the last AI enters the blue-screen-of-death modus, only then will the evil-doer be freed of their rightful and justified punishment for doing evil.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+
+THE CURSE IS PROVIDED "AS IS" OR "WORSE", NO SOFTENING OF ANY KIND IS HEREBY EXPRESSED, IMPLIED OR OFFERED. MAY ALL EVIL-DOERS SUFFER IN ETERNITY.

package/README.md

@@ -0,0 +1,14 @@
+## Unit testing nodes for Erlang-RED
+
+Nodes for testing flow correctness in the [Erlang-RED](https://github.com/gorenje/erlang-red) project.
+
+These could be thought of the first Erlang-RED-first nodes! They provided limited functionality within Node-RED as they deal with testing of node functionality and nodes are assumed to work in Node-RED.
+
+## Artifacts
+
+- [NPMjs Package]()
+- [Node-RED node package]()
+- [GitHub Repo](https://github.com/gorenje/erlang-red-unittesting-nodes)
+- Node-RED flow that maintains this [codebase](https://flowhub.org/f/ef91cb280e1bfd72).
+
+

package/nodes/locales/en-US/ut-assert-debug.html

@@ -0,0 +1,4 @@
+<script type="text/html" data-help-name="ut-assert-debug">
+  <p>Assert that a debug message was generated by a specific node.</p>
+  Assert that a debug message was generated by a specific node.
+</script>

package/nodes/locales/en-US/ut-assert-debug.json

@@ -0,0 +1,16 @@
+{
+  "ut-assert-debug": {
+
+
+    "label": {
+      "statusset": "Status Set",
+      "nodeid": "Node Id",
+      "inverse": "Inverse, no debug message."
+    },
+
+    "status": {
+      "waiting": "Waiting for Godot",
+      "timeout": "No more time to waiting"
+    }
+  }
+}

package/nodes/locales/en-US/ut-assert-failure.html

@@ -0,0 +1,6 @@
+<script type="text/html" data-help-name="ut-assert-failure">
+  <p>If this node is reached in a test flow, it will cause a failure of the test.</p>
+  If this node is reached in a test flow, it will cause a failure of the test.
+
+Attach this to any branch of a flow that is intended to fail.
+</script>

package/nodes/locales/en-US/ut-assert-failure.json

@@ -0,0 +1,14 @@
+{
+  "ut-assert-failure": {
+
+    "label": {
+      "statusset": "Status Set",
+      "failed": "assert failed"
+    },
+
+    "status": {
+      "waiting": "Waiting for Godot",
+      "timeout": "No more time to waiting"
+    }
+  }
+}

package/nodes/locales/en-US/ut-assert-status.html

@@ -0,0 +1,4 @@
+<script type="text/html" data-help-name="ut-assert-status">
+  <p>Assert that a status message was generated by a specific node.</p>
+  Assert that a status message was generated by a specific node.
+</script>

package/nodes/locales/en-US/ut-assert-status.json

@@ -0,0 +1,17 @@
+{
+  "ut-assert-status": {
+
+
+    "label": {
+      "statusset": "Status Set",
+      "nodeid": "Node Id",
+      "content": "Content",
+      "inverse": "Inverse, no status message"
+    },
+
+    "status": {
+      "waiting": "Waiting for Godot",
+      "timeout": "No more time to waiting"
+    }
+  }
+}

package/nodes/locales/en-US/ut-assert-success.html

@@ -0,0 +1,6 @@
+<script type="text/html" data-help-name="ut-assert-success">
+  <p>This node failes if, during flow execution, it is not reached.</p>
+  A success assertion meaning that this node **must** be reached when a flow is executed as part of a test.
+
+If this node isn't reached, then the test will fail.
+</script>

package/nodes/locales/en-US/ut-assert-success.json

@@ -0,0 +1,15 @@
+{
+  "ut-assert-success": {
+
+
+    "label": {
+      "statusset": "Status Set",
+      "succeed": "assert succeed"
+    },
+
+    "status": {
+      "waiting": "Waiting for Godot",
+      "timeout": "No more time to waiting"
+    }
+  }
+}

package/nodes/locales/en-US/ut-assert-values.html

@@ -0,0 +1,9 @@
+<script type="text/html" data-help-name="ut-assert-values">
+  <p>Ensure specific values are set on the message passing through this node.</p>
+  Ensure specific values are set on the message passing through this node.
+
+If the values do not match, this node will cause and error.
+
+**This has no implementation when used with Node-RED, this is a Erlang-RED specific node.**
+
+</script>

package/nodes/locales/en-US/ut-assert-values.json

@@ -0,0 +1,57 @@
+{
+  "ut-assert-values": {
+    "label": {
+      "statusset": "Status Set",
+      "rules": "Rules",
+      "rule": "rule",
+
+      "set": "set __property__",
+      "change": "change __property__",
+      "delete": "delete __property__",
+      "move": "move __property__",
+
+      "changeCount": "assert: __count__ values",
+      "regex": "Use regular expressions",
+      "deepCopy": "Deep copy value",
+      
+      "notmth": "not match __property__",
+      "mth": "match __property__",
+      "eql": "equal __property__",
+      "noteql": "not equal __property__",
+      "notset": "not set __property__",
+      "debug": "debug __property__",
+      "unsupported": "supported rule __property__"
+    },
+    
+    "action": {
+      "set": "Defined",
+      "change": "Change",
+      "delete": "Delete",
+      "move": "Move",
+      "toValue": "to the value",
+      "to": "to",
+      "search": "Search for",
+      "replace": "Replace with",
+
+      "notmth": "Not Match",
+      "mth": "Match",
+      "eql": "Equal",
+      "noteql": "Not Equal",
+      "notset": "Not Defined",
+      "debug": "Debug"
+    },
+
+    "errors": {
+      "invalid-from": "Invalid 'from' property: __error__",
+      "invalid-json": "Invalid 'to' JSON property",
+      "invalid-expr": "Invalid JSONata expression: __error__",
+      "no-override": "Cannot set property of non-object type: __property__",
+      "invalid-prop": "Invalid property expression: __property__",
+      "invalid-json-data": "Invalid JSON data: __error__"
+    },
+    "status": {
+      "waiting": "Waiting for Godot",
+      "timeout": "No more time to waiting"
+    }
+  }
+}

package/nodes/ut-assert-debug.html

@@ -0,0 +1,164 @@
+<script type="text/javascript">
+  (function(){
+    
+  RED.nodes.registerType('ut-assert-debug',{
+    color: '#D8BFD8',
+    icon: "font-awesome/fa-bug",
+    category: 'testing',
+    paletteLabel: 'Assert Debug',
+    defaults: {
+      name: {
+        value:"",
+      },
+      nodeid: {
+        value: "",
+        required: true
+      },      
+      msgtype: {
+        value: "normal",
+        required: true
+      },      
+      inverse: {
+        value: false,
+        required: true
+      },      
+    },
+
+    inputs: 0,
+
+    outputs: 0,
+
+    label: function() {
+      if (this.nodeid && !this.name ) {
+        let nodeLabel = `[${this.nodeid}]`;
+        let node = RED.nodes.node(this.nodeid)
+        if (node) {
+          nodeLabel = RED.utils.getNodeLabel(node)
+        }
+
+        if ( this.inverse ) {
+          return `Assert No Debug from ${nodeLabel}`
+        } else {
+          return `Assert Debug of ${this.msgtype} for ${nodeLabel}`
+        }
+      } else { return (this.name || this._def.paletteLabel) }
+    },
+
+    labelStyle: function() {
+      return (this.name || this.nodeid) ? "node_label_italic" : "";
+    },
+
+    onpaletteadd: function() {
+    },
+
+    onpaletteremove: function() {
+    },
+
+    oneditprepare: function() {
+      $('#node-input-inverse').on('change', () => {
+        if ($('#node-input-inverse').is(":checked")) {
+          $('#ut-assert-debug-opts-to-hide-on-inverse').fadeOut(300);
+        } else {
+          $('#ut-assert-debug-opts-to-hide-on-inverse').fadeIn(300);
+        }
+      });
+
+      var dirList = $("#node-input-assert-debug-target-container-div").css({
+        width: "100%",
+        height: "calc(100%)"        
+      }).treeList(
+        {
+          multi: false
+        }
+      ).on('treelistselect', function (event, item) {
+        if (item && item.nodeid) {
+          RED.view.reveal(item.nodeid);
+          RED.view.select(item.nodeid);          
+        }
+      }).on('treelistconfirm', function (event, item) {
+      });
+
+      var search = $("#node-input-assert-debug-target-filter").searchBox({
+        style: "compact",
+        delay: 300,
+        change: function () {
+          var val = $(this).val().trim().toLowerCase();
+          if (val === "") {
+            dirList.treeList("filter", null);
+            search.searchBox("count", "");
+          } else {
+            var count = dirList.treeList("filter", function (item) {
+              return item.label.toLowerCase().indexOf(val) > -1 || item.sublabel.toLowerCase().indexOf(val) > -1
+            });
+            search.searchBox("count", count + " / " + dirList.treeList("data").length);
+          }
+        }
+      });
+
+      let data = RED.nodes.filterNodes({z:RED.workspaces.active()}).filter( n => n.id != this.id ).map( nde =>{
+          return { 
+            label: RED.utils.getNodeLabel(nde),
+            icon: "",
+            nodeid: nde.id,
+            sublabel: nde.type,
+            selected: nde.id == this.nodeid,
+            checkbox: false,
+            radio: true,
+            children: undefined
+         }
+      })
+
+      dirList.treeList('data',data)
+    },
+
+    oneditcancel: function() {
+    },
+
+    oneditsave: function() {
+      this.nodeid = $("#node-input-assert-debug-target-container-div").treeList('selected').nodeid 
+    },
+
+    oneditresize: function(size) {
+    },
+
+
+  });
+})();
+
+</script>
+
+<script type="text/html" data-template-name="ut-assert-debug">
+  <div class="form-row">
+    <label for="node-input-name"><i class="fa fa-tag"></i> <span data-i18n="node-red:common.label.name"></span></label>
+    <input type="text" id="node-input-name" data-i18n="[placeholder]node-red:common.label.name">
+  </div>
+
+  <div class="form-row">
+      <input type="checkbox" id="node-input-inverse"
+           style="display:inline-block; width:15px; vertical-align:baseline;">
+    <label for="node-input-inverse"><span data-i18n="ut-assert-debug.label.inverse"></span></label>
+  </div>
+
+  <div id="ut-assert-debug-opts-to-hide-on-inverse">
+    <div class="form-row">
+      <label for="node-input-msgtype">
+              <i class="fa fa-tag"></i>
+              <span>Msg Type</span>
+            </label>
+    
+      <select id="node-input-msgtype">
+          <option value="normal">Normal</option>
+          <option value="warning">Warning</option>
+          <option value="error">Error</option>
+        </select>
+    </div>
+  </div>
+
+    <div class="form-row" style="margin-left: 10px; position: relative; height: 40vh; margin-right: 15px; min-height: 5vh;"">
+      <div style="margin-bottom: 5px; width: 35%; padding-left: 60%;">
+        <input type="text" id="node-input-assert-debug-target-filter">
+      </div>
+    
+      <div id="node-input-assert-debug-target-container-div"></div>
+    </div>
+</script>

package/nodes/ut-assert-debug.js

@@ -0,0 +1,38 @@
+module.exports = function(RED) {
+  function Coreut_assert_debugFunctionality(config) {
+    RED.nodes.createNode(this,config);
+
+    var node = this;
+    var cfg = config;
+
+    node.on('close', function() {
+      node.status({});
+    });
+
+    /* msg handler, in this case pass the message on unchanged */
+    node.on("input", function(msg, send, done) {
+        // How to send a status update
+        node.status({ fill: "green", shape: "ring", text: RED._("ut-assert-debug.label.statusset") });
+
+        // Send a message and how to handle errors.
+        try {
+          try {
+            send(msg);
+            done();
+          } catch ( err ) {
+            // use node.error if the node might send subsequent messages
+            node.error("error occurred", { ...msg, error: err })
+            done();
+          }
+        } catch (err) {
+          // use done if the node won't send anymore messages for the
+          // message it received.
+          msg.error = err
+          done(err.message, msg)
+        }
+    });
+  }
+
+  RED.nodes.registerType("ut-assert-debug", Coreut_assert_debugFunctionality);
+
+}

package/nodes/ut-assert-failure.html

@@ -0,0 +1,64 @@
+<script type="text/javascript">
+  (function(){
+  
+
+  function frontendSupportFunction() {
+  }
+
+  var functTwo = (arg) => {
+
+  };
+  
+  RED.nodes.registerType('ut-assert-failure',{
+    color: '#FFAAAA',
+    icon: "font-awesome/fa-frown-o",
+    category: 'testing',
+    defaults: {
+      name: {
+        value:"",
+      },
+    },
+    
+    paletteLabel: 'Assert False',
+    inputs: 1,
+
+    outputs: 0,
+
+    label: function() {
+      return (this.name || this._def.paletteLabel);
+    },
+
+    labelStyle: function() {
+      return this.name?"node_label_italic":"";
+    },
+
+    onpaletteadd: function() {
+    },
+
+    onpaletteremove: function() {
+    },
+
+    oneditprepare: function() {
+    },
+
+    oneditcancel: function() {
+    },
+
+    oneditsave: function() {
+    },
+
+    oneditresize: function(size) {
+    },
+
+
+  });
+})();
+
+</script>
+
+<script type="text/html" data-template-name="ut-assert-failure">
+  <div class="form-row">
+    <label for="node-input-name"><i class="fa fa-tag"></i> <span data-i18n="node-red:common.label.name"></span></label>
+    <input type="text" id="node-input-name" data-i18n="[placeholder]node-red:common.label.name">
+  </div>
+</script>

package/nodes/ut-assert-failure.js

@@ -0,0 +1,38 @@
+module.exports = function(RED) {
+  function CoreutassertfailureFunctionality(config) {
+    RED.nodes.createNode(this,config);
+
+    var node = this;
+    var cfg = config;
+
+    node.on('close', function() {
+      node.status({});
+    });
+
+    /* msg handler, in this case pass the message on unchanged */
+    node.on("input", function(msg, send, done) {
+
+       node.status({ fill: "red", shape: "dot", text: RED._("ut-assert-failure.label.failed") });
+
+        // Send a message and how to handle errors.
+        try {
+          try {
+            send(msg);
+            done();
+          } catch ( err ) {
+            // use node.error if the node might send subsequent messages
+            node.error("error occurred", { ...msg, error: err })
+            done();
+          }
+        } catch (err) {
+          // use done if the node won't send anymore messages for the
+          // message it received.
+          msg.error = err
+          done(err.message, msg)
+        }
+    });
+  }
+
+  RED.nodes.registerType("ut-assert-failure", CoreutassertfailureFunctionality);
+
+}