loki converter and connector added (#86)

* loki converter and connector added

* readme update of components status

Co-authored-by: Max Stenke <[email protected]>

Author: JohannesKonings

README.md

@@ -16,15 +16,13 @@
 
 | component       | variant        | status  |
 | ----------------|----------------|---------|
-| reader          | BAL            | [WIP](https://github.com/abap-observability-tools/abap-log-exporter/issues?q=is%3Aopen+is%3Aissue+label%3ABAL)     |
+| reader          | BAL            | :heavy_check_mark:     |
 |                 | SMICM          | open    |
 |                 | SM21           | [#41](https://github.com/abap-observability-tools/abap-log-exporter/issues/41)     |
-| converter       | GELF           | WIP     |
-|                 | Loki           | open    |
-|                 | Tempo          | open    |
+| converter       | GELF           | :heavy_check_mark:     |
+|                 | Loki           | :heavy_check_mark:     |
 | connector       | GELF           | :heavy_check_mark:     |
-|                 | Loki           | open    |
-|                 | Tempo          | open    |
+|                 | Loki           | :heavy_check_mark:     |
 
 
 ## customizing

src/zale_connector/package.devc.xml

@@ -0,0 +1,10 @@
+<?xml version="1.0" encoding="utf-8"?>
+<abapGit version="v1.0.0" serializer="LCL_OBJECT_DEVC" serializer_version="v1.0.0">
+ <asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
+  <asx:values>
+   <DEVC>
+    <CTEXT>ale connector</CTEXT>
+   </DEVC>
+  </asx:values>
+ </asx:abap>
+</abapGit>

src/zcl_ale_log_connector_gelf.clas.abap renamed to src/zale_connector/zcl_ale_log_connector_gelf.clas.abap

@@ -0,0 +1,74 @@
+CLASS zcl_ale_log_connector_loki DEFINITION
+  PUBLIC
+  FINAL
+  CREATE PUBLIC .
+
+  PUBLIC SECTION.
+
+    INTERFACES zif_ale_log_connector.
+
+  PROTECTED SECTION.
+  PRIVATE SECTION.
+ENDCLASS.
+
+
+
+CLASS zcl_ale_log_connector_loki IMPLEMENTATION.
+  METHOD zif_ale_log_connector~connect.
+
+    DATA(loki_url) = customizing->get_connector_url( ).
+
+    LOOP AT converted_logs ASSIGNING FIELD-SYMBOL(<converted_log>).
+
+      cl_http_client=>create_by_url(
+            EXPORTING
+              url                = CONV #( loki_url )
+            IMPORTING
+              client             = DATA(client)
+            EXCEPTIONS
+              argument_not_found = 1
+              plugin_not_active  = 2
+              internal_error     = 3
+              OTHERS             = 4 ).
+      IF sy-subrc <> 0.
+        ASSERT 1 = 2.
+      ENDIF.
+
+      client->request->set_method( 'POST' ).
+      client->request->set_content_type( 'application/json' ).
+
+      TRY.
+          DATA(xjson) = cl_binary_convert=>string_to_xstring_utf8( iv_string = <converted_log>-json ).
+        CATCH cx_sy_conversion_error.
+          ASSERT 1 = 2.
+      ENDTRY.
+
+      client->request->set_data( xjson ).
+
+      client->send(
+        EXCEPTIONS
+          http_communication_failure = 1
+          http_invalid_state         = 2
+          http_processing_failed     = 3
+          http_invalid_timeout       = 4
+          OTHERS                     = 5 ).
+      IF sy-subrc <> 0.
+        ASSERT 1 = 2.
+      ENDIF.
+
+      client->receive(
+        EXCEPTIONS
+          http_communication_failure = 1
+          http_invalid_state         = 2
+          http_processing_failed     = 3
+          OTHERS                     = 4 ).
+      IF sy-subrc <> 0.
+        client->response->get_status( IMPORTING
+                                          code   = DATA(http_code)
+                                          reason = DATA(reason) ).
+        ASSERT 1 = 2.
+      ENDIF.
+    ENDLOOP.
+  ENDMETHOD.
+
+ENDCLASS.

src/zcl_ale_log_connector_gelf.clas.xml renamed to src/zale_connector/zcl_ale_log_connector_gelf.clas.xml

@@ -0,0 +1,10 @@
+<?xml version="1.0" encoding="utf-8"?>
+<abapGit version="v1.0.0" serializer="LCL_OBJECT_DEVC" serializer_version="v1.0.0">
+ <asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
+  <asx:values>
+   <DEVC>
+    <CTEXT>converting logs</CTEXT>
+   </DEVC>
+  </asx:values>
+ </asx:abap>
+</abapGit>