From 48368beec1df198ac3bb65cd763ae4b50a8dd4fc Mon Sep 17 00:00:00 2001
From: "Rodrigo Rodriguez(pragmatismo.io)" <rodriguez@pragmatismo.io>
Date: Sat, 20 Nov 2021 13:44:18 -0300
Subject: [PATCH] new(basic.gblib): New HTTP keywords for improved GET.

---
 packages/basic.gblib/services/GBVMService.ts | 12 +++++++++++-
 1 file changed, 11 insertions(+), 1 deletion(-)

diff --git a/packages/basic.gblib/services/GBVMService.ts b/packages/basic.gblib/services/GBVMService.ts
index 5cfcda1e..418ab054 100644
--- a/packages/basic.gblib/services/GBVMService.ts
+++ b/packages/basic.gblib/services/GBVMService.ts
@@ -186,6 +186,8 @@ export class GBVMService extends GBService {
     hour = this.getHourFromDate.bind(this);
     tolist = this.getToLst;
     headers = {};
+    httpUsername = "";
+    httpPassword = "";
 
     ${process.env.ENABLE_AUTH? `hear gbLogin as login`:``}
 
@@ -288,7 +290,7 @@ export class GBVMService extends GBService {
 
     code = code.replace(/(\w+)\s*\=\s*get\s(.*)/gi, ($0, $1, $2) => {
       if ($2.indexOf('http') !== -1) {
-        return `let ${$1} = sys().getByHttp (${$2})`;
+        return `let ${$1} = sys().getByHttp (${$2}, headers, httpUsername, httpPassword)`;
       } else {
         return `let ${$1} = sys().get (${$2})`;
       }
@@ -302,6 +304,14 @@ export class GBVMService extends GBService {
       return `setLanguage (step, ${$3})\n`;
     });
 
+    code = code.replace(/set http username\=\s*(.*)/gi, ($0, $1) => {
+      return `httpUsername = ${$1}`;
+    });
+
+    code = code.replace(/set http password\=\s*(.*)/gi, ($0, $1) => {
+      return `httpUsername = ${$1}`;
+    });
+
     code = code.replace(/(datediff)(\s*)(.*)/gi, ($0, $1, $2, $3) => {
       return `dateDiff (step, ${$3})\n`;
     });