From d8ca1ceb9d9f91b34312ca7f6645c97560907949 Mon Sep 17 00:00:00 2001
From: lassulus <git@lassul.us>
Date: Mon, 17 Apr 2023 14:30:48 +0200
Subject: reaktor2: add !bing command

---
 krebs/2configs/reaktor2.nix | 22 ++++++++++++++++++++++
 1 file changed, 22 insertions(+)

(limited to 'krebs/2configs/reaktor2.nix')

diff --git a/krebs/2configs/reaktor2.nix b/krebs/2configs/reaktor2.nix
index 39039cc11..032932013 100644
--- a/krebs/2configs/reaktor2.nix
+++ b/krebs/2configs/reaktor2.nix
@@ -51,6 +51,27 @@ let
     };
   };
 
+  bing = {
+    pattern = "!bing (.*)$";
+    activate = "match";
+    arguments = [1];
+    timeoutSec = 42;
+    command = {
+      filename = pkgs.writeDash "bing" ''
+        set -efu
+        export PATH=${makeBinPath [
+          pkgs.coreutils
+          pkgs.curl
+          pkgs.jq
+        ]}
+        printf '%s' "$*" |
+          curl -SsG http://bing-gpt.r/api/chat --data-urlencode 'prompt@-' |
+          jq -r '.item.messages[1].text' |
+          echo "$_from: $(cat)"
+      '';
+    };
+  };
+
   confuse = {
     pattern = "!confuse (.*)$";
     activate = "match";
@@ -526,6 +547,7 @@ in {
         (systemPlugin {
           extra_privmsg_hooks = [
             confuse
+            bing
           ];
         })
       ];
-- 
cgit v1.2.3


From 01c1fffe0ac51ad7a0ade29c4c4f6fed4394dd44 Mon Sep 17 00:00:00 2001
From: lassulus <git@lassul.us>
Date: Mon, 17 Apr 2023 15:59:58 +0200
Subject: reaktor2 bing: more timeout, footnotes

---
 krebs/2configs/reaktor2.nix | 21 ++++++++++++++++-----
 1 file changed, 16 insertions(+), 5 deletions(-)

(limited to 'krebs/2configs/reaktor2.nix')

diff --git a/krebs/2configs/reaktor2.nix b/krebs/2configs/reaktor2.nix
index 032932013..8e2e5d9b8 100644
--- a/krebs/2configs/reaktor2.nix
+++ b/krebs/2configs/reaktor2.nix
@@ -55,7 +55,7 @@ let
     pattern = "!bing (.*)$";
     activate = "match";
     arguments = [1];
-    timeoutSec = 42;
+    timeoutSec = 1337;
     command = {
       filename = pkgs.writeDash "bing" ''
         set -efu
@@ -64,10 +64,21 @@ let
           pkgs.curl
           pkgs.jq
         ]}
-        printf '%s' "$*" |
-          curl -SsG http://bing-gpt.r/api/chat --data-urlencode 'prompt@-' |
-          jq -r '.item.messages[1].text' |
-          echo "$_from: $(cat)"
+        response=$(printf '%s' "$*" |
+          curl -SsG http://bing-gpt.r/api/chat --data-urlencode 'prompt@-'
+        )
+        if [ "$?" -ne 0 ]; then
+          printf '%s' "$response" |
+            curl -Ss http://p.r --data-binary @- |
+            tail -1
+        else
+          printf '%s' "$response" |
+            jq -r '.item.messages[1].text' |
+            echo "$_from: $(cat)"
+
+          printf '%s' "$response" |
+            jq -r '[.item.messages[1].sourceAttributions[].seeMoreUrl] | to_entries[] | "[\(.key)]: \(.value)"'
+        fi
       '';
     };
   };
-- 
cgit v1.2.3


From fef664e785cf7ae234abd540406fb894c784322b Mon Sep 17 00:00:00 2001
From: lassulus <git@lassul.us>
Date: Mon, 17 Apr 2023 16:06:58 +0200
Subject: reaktor2 bing: start counting at 1

---
 krebs/2configs/reaktor2.nix | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'krebs/2configs/reaktor2.nix')

diff --git a/krebs/2configs/reaktor2.nix b/krebs/2configs/reaktor2.nix
index 8e2e5d9b8..114c08713 100644
--- a/krebs/2configs/reaktor2.nix
+++ b/krebs/2configs/reaktor2.nix
@@ -77,7 +77,7 @@ let
             echo "$_from: $(cat)"
 
           printf '%s' "$response" |
-            jq -r '[.item.messages[1].sourceAttributions[].seeMoreUrl] | to_entries[] | "[\(.key)]: \(.value)"'
+            jq -r '[.item.messages[1].sourceAttributions[].seeMoreUrl] | to_entries[] | "[\(.key + 1)]: \(.value)"'
         fi
       '';
     };
-- 
cgit v1.2.3


From 4ca30a227ba7728a0190b0d5ea0fa4d424142ee5 Mon Sep 17 00:00:00 2001
From: lassulus <git@lassul.us>
Date: Mon, 17 Apr 2023 16:07:14 +0200
Subject: reaktor2: use bing plugin on all bots

---
 krebs/2configs/reaktor2.nix | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'krebs/2configs/reaktor2.nix')

diff --git a/krebs/2configs/reaktor2.nix b/krebs/2configs/reaktor2.nix
index 114c08713..502dd4a9f 100644
--- a/krebs/2configs/reaktor2.nix
+++ b/krebs/2configs/reaktor2.nix
@@ -354,6 +354,7 @@ let
         }
         bedger-add
         bedger-balance
+        bing
         hooks.sed
         interrogate
         say
@@ -558,7 +559,6 @@ in {
         (systemPlugin {
           extra_privmsg_hooks = [
             confuse
-            bing
           ];
         })
       ];
-- 
cgit v1.2.3


From ac5e8cc3f4905d4e0e3beedb2ea67e749fccb80a Mon Sep 17 00:00:00 2001
From: lassulus <git@lassul.us>
Date: Mon, 17 Apr 2023 16:43:31 +0200
Subject: reaktor2 bing: add error reporting

---
 krebs/2configs/reaktor2.nix | 19 +++++++++++++------
 1 file changed, 13 insertions(+), 6 deletions(-)

(limited to 'krebs/2configs/reaktor2.nix')

diff --git a/krebs/2configs/reaktor2.nix b/krebs/2configs/reaktor2.nix
index 502dd4a9f..0a5031415 100644
--- a/krebs/2configs/reaktor2.nix
+++ b/krebs/2configs/reaktor2.nix
@@ -59,6 +59,13 @@ let
     command = {
       filename = pkgs.writeDash "bing" ''
         set -efu
+        report_error() {
+          printf '%s' "$*" |
+            curl -Ss http://p.r --data-binary @- |
+            tail -1 |
+            echo "error $(cat)"
+          exit 0
+        }
         export PATH=${makeBinPath [
           pkgs.coreutils
           pkgs.curl
@@ -68,13 +75,13 @@ let
           curl -SsG http://bing-gpt.r/api/chat --data-urlencode 'prompt@-'
         )
         if [ "$?" -ne 0 ]; then
-          printf '%s' "$response" |
-            curl -Ss http://p.r --data-binary @- |
-            tail -1
+          report_error "$response"
         else
-          printf '%s' "$response" |
-            jq -r '.item.messages[1].text' |
-            echo "$_from: $(cat)"
+          if ! text=$(printf '%s' "$response" | jq -er '.item.messages[1].text'); then
+            echo "$_from: $(report_error "$response")"
+            exit 0
+          fi
+          printf '%s' "$text" | echo "$_from: $(cat)"
 
           printf '%s' "$response" |
             jq -r '[.item.messages[1].sourceAttributions[].seeMoreUrl] | to_entries[] | "[\(.key + 1)]: \(.value)"'
-- 
cgit v1.2.3