abapgit-agent 1.4.0 → 1.6.0

package/abap/zcl_abgagt_resource_pull.clas.abap

@@ -1,71 +0,0 @@
-*"*"use source
-*"*"Local Interface:
-*"**********************************************************************
-CLASS zcl_abgagt_resource_pull DEFINITION PUBLIC FINAL
-                             INHERITING FROM cl_rest_resource
-                             CREATE PUBLIC.
-
-  PUBLIC SECTION.
-    METHODS if_rest_resource~post REDEFINITION.
-
-ENDCLASS.
-
-CLASS zcl_abgagt_resource_pull IMPLEMENTATION.
-
-  METHOD if_rest_resource~post.
-    DATA lv_json TYPE string.
-    lv_json = mo_request->get_entity( )->get_string_data( ).
-
-    " Parse JSON using /ui2/cl_json
-    DATA: BEGIN OF ls_request,
-            url TYPE string,
-            branch TYPE string,
-            username TYPE string,
-            password TYPE string,
-            transport_request TYPE string,
-            files TYPE string_table,
-          END OF ls_request.
-
-    /ui2/cl_json=>deserialize(
-      EXPORTING
-        json = lv_json
-      CHANGING
-        data = ls_request ).
-
-    IF ls_request-branch IS INITIAL.
-      ls_request-branch = 'main'.
-    ENDIF.
-
-    DATA lv_json_resp TYPE string.
-    IF ls_request-url IS INITIAL.
-      lv_json_resp = '{"success":"","job_id":"","error":"URL is required"}'.
-      DATA(lo_entity) = mo_response->create_entity( ).
-      lo_entity->set_content_type( iv_media_type = if_rest_media_type=>gc_appl_json ).
-      lo_entity->set_string_data( lv_json_resp ).
-      mo_response->set_status( cl_rest_status_code=>gc_client_error_bad_request ).
-      RETURN.
-    ENDIF.
-
-    " Get command from factory
-    DATA(lo_factory) = zcl_abgagt_cmd_factory=>get_instance( ).
-    DATA(lo_command) = lo_factory->get_command( zif_abgagt_command=>gc_pull ).
-
-    IF lo_command IS NOT BOUND.
-      lv_json_resp = '{"success":"","error":"PULL command not found"}'.
-      lo_entity = mo_response->create_entity( ).
-      lo_entity->set_content_type( iv_media_type = if_rest_media_type=>gc_appl_json ).
-      lo_entity->set_string_data( lv_json_resp ).
-      mo_response->set_status( cl_rest_status_code=>gc_client_error_bad_request ).
-      RETURN.
-    ENDIF.
-
-    " Execute command with is_param
-    DATA(lv_result) = lo_command->execute( is_param = ls_request ).
-
-    lo_entity = mo_response->create_entity( ).
-    lo_entity->set_content_type( iv_media_type = if_rest_media_type=>gc_appl_json ).
-    lo_entity->set_string_data( lv_result ).
-    mo_response->set_status( cl_rest_status_code=>gc_success_ok ).
-  ENDMETHOD.
-
-ENDCLASS.

package/abap/zcl_abgagt_resource_pull.clas.xml

@@ -1,15 +0,0 @@
-<?xml version="1.0" encoding="utf-8"?>
-<abapGit version="v1.0.0" serializer="LCL_OBJECT_CLAS" serializer_version="v1.0.0">
- <asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
-  <asx:values>
-   <VSEOCLASS>
-    <CLSNAME>ZCL_ABGAGT_RESOURCE_PULL</CLSNAME>
-    <LANGU>E</LANGU>
-    <DESCRIPT>ABAP Git Agent - Pull Resource</DESCRIPT>
-    <EXPOSURE>2</EXPOSURE>
-    <STATE>1</STATE>
-    <UNICODE>X</UNICODE>
-   </VSEOCLASS>
-  </asx:values>
- </asx:abap>
-</abapGit>

package/abap/zcl_abgagt_resource_tree.clas.abap

@@ -1,70 +0,0 @@
-*"*"use source
-*"*"Local Interface:
-*"**********************************************************************
-CLASS zcl_abgagt_resource_tree DEFINITION PUBLIC FINAL
-                             INHERITING FROM cl_rest_resource
-                             CREATE PUBLIC.
-
-  PUBLIC SECTION.
-    METHODS if_rest_resource~post REDEFINITION.
-
-ENDCLASS.
-
-CLASS zcl_abgagt_resource_tree IMPLEMENTATION.
-
-  METHOD if_rest_resource~post.
-    DATA lv_json TYPE string.
-    lv_json = mo_request->get_entity( )->get_string_data( ).
-
-    " Parse JSON using /ui2/cl_json
-    DATA: BEGIN OF ls_request,
-            package TYPE string,
-            depth TYPE i,
-            include_objects TYPE abap_bool,
-          END OF ls_request.
-
-    /ui2/cl_json=>deserialize(
-      EXPORTING
-        json = lv_json
-      CHANGING
-        data = ls_request ).
-
-    DATA lv_json_resp TYPE string.
-
-    IF ls_request-package IS INITIAL.
-      lv_json_resp = '{"success":"","command":"TREE","error":"Package is required"}'.
-      DATA(lo_entity) = mo_response->create_entity( ).
-      lo_entity->set_content_type( iv_media_type = if_rest_media_type=>gc_appl_json ).
-      lo_entity->set_string_data( lv_json_resp ).
-      mo_response->set_status( cl_rest_status_code=>gc_client_error_bad_request ).
-      RETURN.
-    ENDIF.
-
-    " Get command from factory
-    DATA(lo_factory) = zcl_abgagt_cmd_factory=>get_instance( ).
-    DATA(lo_command) = lo_factory->get_command( zif_abgagt_command=>gc_tree ).
-
-    IF lo_command IS NOT BOUND.
-      lv_json_resp = '{"success":"","command":"TREE","error":"TREE command not found"}'.
-      lo_entity = mo_response->create_entity( ).
-      lo_entity->set_content_type( iv_media_type = if_rest_media_type=>gc_appl_json ).
-      lo_entity->set_string_data( lv_json_resp ).
-      mo_response->set_status( cl_rest_status_code=>gc_client_error_bad_request ).
-      RETURN.
-    ENDIF.
-
-    " Execute command with is_param
-    DATA ls_params TYPE zcl_abgagt_command_tree=>ty_tree_params.
-    ls_params-package = ls_request-package.
-    ls_params-depth = ls_request-depth.
-    ls_params-include_objects = ls_request-include_objects.
-
-    DATA(lv_result) = lo_command->execute( is_param = ls_params ).
-
-    lo_entity = mo_response->create_entity( ).
-    lo_entity->set_content_type( iv_media_type = if_rest_media_type=>gc_appl_json ).
-    lo_entity->set_string_data( lv_result ).
-    mo_response->set_status( cl_rest_status_code=>gc_success_ok ).
-  ENDMETHOD.
-
-ENDCLASS.

package/abap/zcl_abgagt_resource_tree.clas.xml

@@ -1,15 +0,0 @@
-<?xml version="1.0" encoding="utf-8"?>
-<abapGit version="v1.0.0" serializer="LCL_OBJECT_CLAS" serializer_version="v1.0.0">
- <asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
-  <asx:values>
-   <VSEOCLASS>
-    <CLSNAME>ZCL_ABGAGT_RESOURCE_TREE</CLSNAME>
-    <LANGU>E</LANGU>
-    <DESCRIPT>ABAP Git Agent - Tree Resource</DESCRIPT>
-    <EXPOSURE>2</EXPOSURE>
-    <STATE>1</STATE>
-    <UNICODE>X</UNICODE>
-   </VSEOCLASS>
-  </asx:values>
- </asx:abap>
-</abapGit>

package/abap/zcl_abgagt_resource_unit.clas.abap

@@ -1,64 +0,0 @@
-*"*"use source
-*"*"Local Interface:
-*"**********************************************************************
-CLASS zcl_abgagt_resource_unit DEFINITION PUBLIC FINAL
-                             INHERITING FROM cl_rest_resource
-                             CREATE PUBLIC.
-
-  PUBLIC SECTION.
-    METHODS if_rest_resource~post REDEFINITION.
-
-ENDCLASS.
-
-CLASS zcl_abgagt_resource_unit IMPLEMENTATION.
-
-  METHOD if_rest_resource~post.
-    DATA lv_json TYPE string.
-    lv_json = mo_request->get_entity( )->get_string_data( ).
-
-    " Parse JSON using /ui2/cl_json
-    DATA: BEGIN OF ls_request,
-            package TYPE string,
-            files TYPE string_table,
-          END OF ls_request.
-
-    /ui2/cl_json=>deserialize(
-      EXPORTING
-        json = lv_json
-      CHANGING
-        data = ls_request ).
-
-    DATA lv_json_resp TYPE string.
-
-    IF ls_request-package IS INITIAL AND ( ls_request-files IS INITIAL OR lines( ls_request-files ) = 0 ).
-      lv_json_resp = '{"success":"","message":"Package or files required"}'.
-      DATA(lo_entity) = mo_response->create_entity( ).
-      lo_entity->set_content_type( iv_media_type = if_rest_media_type=>gc_appl_json ).
-      lo_entity->set_string_data( lv_json_resp ).
-      mo_response->set_status( cl_rest_status_code=>gc_client_error_bad_request ).
-      RETURN.
-    ENDIF.
-
-    " Get command from factory
-    DATA(lo_factory) = zcl_abgagt_cmd_factory=>get_instance( ).
-    DATA(lo_command) = lo_factory->get_command( zif_abgagt_command=>gc_unit ).
-
-    IF lo_command IS NOT BOUND.
-      lv_json_resp = '{"success":"","error":"UNIT command not found"}'.
-      lo_entity = mo_response->create_entity( ).
-      lo_entity->set_content_type( iv_media_type = if_rest_media_type=>gc_appl_json ).
-      lo_entity->set_string_data( lv_json_resp ).
-      mo_response->set_status( cl_rest_status_code=>gc_client_error_bad_request ).
-      RETURN.
-    ENDIF.
-
-    " Execute command with is_param
-    DATA(lv_result) = lo_command->execute( is_param = ls_request ).
-
-    lo_entity = mo_response->create_entity( ).
-    lo_entity->set_content_type( iv_media_type = if_rest_media_type=>gc_appl_json ).
-    lo_entity->set_string_data( lv_result ).
-    mo_response->set_status( cl_rest_status_code=>gc_success_ok ).
-  ENDMETHOD.
-
-ENDCLASS.

package/abap/zcl_abgagt_resource_unit.clas.xml

@@ -1,15 +0,0 @@
-<?xml version="1.0" encoding="utf-8"?>
-<abapGit version="v1.0.0" serializer="LCL_OBJECT_CLAS" serializer_version="v1.0.0">
- <asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
-  <asx:values>
-   <VSEOCLASS>
-    <CLSNAME>ZCL_ABGAGT_RESOURCE_UNIT</CLSNAME>
-    <LANGU>E</LANGU>
-    <DESCRIPT>ABAP Git Agent - Unit Test Resource</DESCRIPT>
-    <EXPOSURE>2</EXPOSURE>
-    <STATE>1</STATE>
-    <UNICODE>X</UNICODE>
-   </VSEOCLASS>
-  </asx:values>
- </asx:abap>
-</abapGit>

package/abap/zcl_abgagt_resource_view.clas.abap

@@ -1,68 +0,0 @@
-*"*"use source
-*"*"Local Interface:
-*"**********************************************************************
-CLASS zcl_abgagt_resource_view DEFINITION PUBLIC FINAL
-                             INHERITING FROM cl_rest_resource
-                             CREATE PUBLIC.
-
-  PUBLIC SECTION.
-    METHODS if_rest_resource~post REDEFINITION.
-
-ENDCLASS.
-
-CLASS zcl_abgagt_resource_view IMPLEMENTATION.
-
-  METHOD if_rest_resource~post.
-    DATA lv_json TYPE string.
-    lv_json = mo_request->get_entity( )->get_string_data( ).
-
-    " Parse JSON using /ui2/cl_json
-    DATA: BEGIN OF ls_request,
-            objects TYPE string_table,
-            type TYPE string,
-          END OF ls_request.
-
-    /ui2/cl_json=>deserialize(
-      EXPORTING
-        json = lv_json
-      CHANGING
-        data = ls_request ).
-
-    DATA lv_json_resp TYPE string.
-
-    IF ls_request-objects IS INITIAL.
-      lv_json_resp = '{"success":false,"command":"VIEW","error":"Objects parameter is required"}'.
-      DATA(lo_entity) = mo_response->create_entity( ).
-      lo_entity->set_content_type( iv_media_type = if_rest_media_type=>gc_appl_json ).
-      lo_entity->set_string_data( lv_json_resp ).
-      mo_response->set_status( cl_rest_status_code=>gc_client_error_bad_request ).
-      RETURN.
-    ENDIF.
-
-    " Get command from factory
-    DATA(lo_factory) = zcl_abgagt_cmd_factory=>get_instance( ).
-    DATA(lo_command) = lo_factory->get_command( zif_abgagt_command=>gc_view ).
-
-    IF lo_command IS NOT BOUND.
-      lv_json_resp = '{"success":false,"command":"VIEW","error":"VIEW command not found"}'.
-      lo_entity = mo_response->create_entity( ).
-      lo_entity->set_content_type( iv_media_type = if_rest_media_type=>gc_appl_json ).
-      lo_entity->set_string_data( lv_json_resp ).
-      mo_response->set_status( cl_rest_status_code=>gc_client_error_bad_request ).
-      RETURN.
-    ENDIF.
-
-    " Execute command with is_param
-    DATA ls_params TYPE zcl_abgagt_command_view=>ty_view_params.
-    ls_params-objects = ls_request-objects.
-    ls_params-type = ls_request-type.
-
-    DATA(lv_result) = lo_command->execute( is_param = ls_params ).
-
-    lo_entity = mo_response->create_entity( ).
-    lo_entity->set_content_type( iv_media_type = if_rest_media_type=>gc_appl_json ).
-    lo_entity->set_string_data( lv_result ).
-    mo_response->set_status( cl_rest_status_code=>gc_success_ok ).
-  ENDMETHOD.
-
-ENDCLASS.

package/abap/zcl_abgagt_resource_view.clas.xml

@@ -1,15 +0,0 @@
-<?xml version="1.0" encoding="utf-8"?>
-<abapGit version="v1.0.0" serializer="LCL_OBJECT_CLAS" serializer_version="v1.0.0">
- <asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
-  <asx:values>
-   <VSEOCLASS>
-    <CLSNAME>ZCL_ABGAGT_RESOURCE_VIEW</CLSNAME>
-    <LANGU>E</LANGU>
-    <DESCRIPT>VIEW command REST resource handler</DESCRIPT>
-    <EXPOSURE>2</EXPOSURE>
-    <STATE>1</STATE>
-    <UNICODE>X</UNICODE>
-   </VSEOCLASS>
-  </asx:values>
- </asx:abap>
-</abapGit>

package/abap/zcl_abgagt_rest_handler.clas.abap

@@ -1,32 +0,0 @@
-*"*"use source
-*"* Local Interface:
-*"----------------------------------------------------------------------
-CLASS zcl_abgagt_rest_handler DEFINITION PUBLIC INHERITING FROM cl_rest_http_handler CREATE PUBLIC.
-
-  PUBLIC SECTION.
-    METHODS: if_rest_application~get_root_handler REDEFINITION.
-
-  PRIVATE SECTION.
-
-ENDCLASS.
-
-CLASS zcl_abgagt_rest_handler IMPLEMENTATION.
-
-  METHOD if_rest_application~get_root_handler.
-    DATA lo_router TYPE REF TO cl_rest_router.
-    CREATE OBJECT lo_router.
-
-    lo_router->attach( iv_template = '/pull' iv_handler_class = 'ZCL_ABGAGT_RESOURCE_PULL' ).
-    lo_router->attach( iv_template = '/health' iv_handler_class = 'ZCL_ABGAGT_RESOURCE_HEALTH' ).
-    lo_router->attach( iv_template = '/inspect' iv_handler_class = 'ZCL_ABGAGT_RESOURCE_INSPECT' ).
-    lo_router->attach( iv_template = '/unit' iv_handler_class = 'ZCL_ABGAGT_RESOURCE_UNIT' ).
-    lo_router->attach( iv_template = '/create' iv_handler_class = 'ZCL_ABGAGT_RESOURCE_CREATE' ).
-    lo_router->attach( iv_template = '/import' iv_handler_class = 'ZCL_ABGAGT_RESOURCE_IMPORT' ).
-    lo_router->attach( iv_template = '/tree' iv_handler_class = 'ZCL_ABGAGT_RESOURCE_TREE' ).
-    lo_router->attach( iv_template = '/view' iv_handler_class = 'ZCL_ABGAGT_RESOURCE_VIEW' ).
-    lo_router->attach( iv_template = '/preview' iv_handler_class = 'ZCL_ABGAGT_RESOURCE_PREVIEW' ).
-
-    ro_root_handler = lo_router.
-  ENDMETHOD.
-
-ENDCLASS.

package/abap/zcl_abgagt_rest_handler.clas.xml

@@ -1,15 +0,0 @@
-<?xml version="1.0" encoding="utf-8"?>
-<abapGit version="v1.0.0" serializer="LCL_OBJECT_CLAS" serializer_version="v1.0.0">
- <asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
-  <asx:values>
-   <VSEOCLASS>
-    <CLSNAME>ZCL_ABGAGT_REST_HANDLER</CLSNAME>
-    <LANGU>E</LANGU>
-    <DESCRIPT>ABAP Git Agent - REST Handler</DESCRIPT>
-    <EXPOSURE>2</EXPOSURE>
-    <STATE>1</STATE>
-    <UNICODE>X</UNICODE>
-   </VSEOCLASS>
-  </asx:values>
- </asx:abap>
-</abapGit>

package/abap/zcl_abgagt_util.clas.abap

@@ -1,93 +0,0 @@
-"* Use this source text module for the class definition
-CLASS zcl_abgagt_util DEFINITION PUBLIC FINAL CREATE PUBLIC.
-  PUBLIC SECTION.
-    INTERFACES zif_abgagt_util.
-    CLASS-METHODS get_instance
-      RETURNING VALUE(ro_util) TYPE REF TO zcl_abgagt_util.
-  PRIVATE SECTION.
-    DATA mv_log TYPE string.
-    DATA mv_has_error TYPE abap_bool.
-ENDCLASS.
-
-CLASS zcl_abgagt_util IMPLEMENTATION.
-  METHOD get_instance.
-    DATA lo_util TYPE REF TO zcl_abgagt_util.
-    CREATE OBJECT lo_util.
-    ro_util = lo_util.
-  ENDMETHOD.
-
-  METHOD zif_abgagt_util~parse_file_to_object.
-    " Parse file path to extract obj_type and obj_name
-    " Example: "zcl_my_class.clas.abap" -> CLAS, ZCL_MY_CLASS
-    " Example: "src/zcl_my_class.clas.abap" -> CLAS, ZCL_MY_CLASS
-
-    DATA lv_upper TYPE string.
-    lv_upper = iv_file.
-    TRANSLATE lv_upper TO UPPER CASE.
-
-    " Split filename by '.' to get parts
-    DATA lt_parts TYPE TABLE OF string.
-    SPLIT lv_upper AT '.' INTO TABLE lt_parts.
-    DATA lv_part_count TYPE i.
-    lv_part_count = lines( lt_parts ).
-
-    IF lv_part_count < 3.
-      RETURN.
-    ENDIF.
-
-    " Last part should be 'ABAP' or 'ASDDLS' for verification
-    READ TABLE lt_parts INDEX lv_part_count INTO DATA(lv_last).
-    IF lv_last <> 'ABAP' AND lv_last <> 'ASDDLS'.
-      RETURN.
-    ENDIF.
-
-    " First part is obj_name (may contain path), second part is obj_type
-    DATA lv_obj_name TYPE string.
-    DATA lv_obj_type_raw TYPE string.
-    READ TABLE lt_parts INDEX 1 INTO lv_obj_name.
-    READ TABLE lt_parts INDEX 2 INTO lv_obj_type_raw.
-
-    " Convert file extension to object type
-    CASE lv_obj_type_raw.
-      WHEN 'CLAS' OR 'CLASS'.
-        ev_obj_type = 'CLAS'.
-      WHEN 'INTF' OR 'INTERFACE'.
-        ev_obj_type = 'INTF'.
-      WHEN 'PROG' OR 'PROGRAM'.
-        ev_obj_type = 'PROG'.
-      WHEN 'FUGR' OR 'FUGROUP'.
-        ev_obj_type = 'FUGR'.
-      WHEN 'TABL' OR 'TABLE'.
-        ev_obj_type = 'TABL'.
-      WHEN 'DDLS'.
-        ev_obj_type = 'DDLS'.
-      WHEN OTHERS.
-        ev_obj_type = lv_obj_type_raw.
-    ENDCASE.
-
-    " Extract file name from obj_name (remove path prefix)
-    DATA lv_len TYPE i.
-    lv_len = strlen( lv_obj_name ).
-    DATA lv_offs TYPE i.
-    lv_offs = find( val = reverse( lv_obj_name ) sub = '/' ).
-    IF lv_offs > 0.
-      lv_offs = lv_len - lv_offs - 1.
-      lv_obj_name = lv_obj_name+lv_offs.
-    ENDIF.
-
-    " Remove leading '/' if present
-    IF lv_obj_name(1) = '/'.
-      lv_obj_name = lv_obj_name+1.
-    ENDIF.
-
-    ev_obj_name = lv_obj_name.
-  ENDMETHOD.
-
-  METHOD zif_abgagt_util~check_log_for_errors.
-    rv_has_error = mv_has_error.
-  ENDMETHOD.
-
-  METHOD zif_abgagt_util~get_log_detail.
-    rv_detail = mv_log.
-  ENDMETHOD.
-ENDCLASS.

package/abap/zcl_abgagt_util.clas.testclasses.abap

@@ -1,84 +0,0 @@
-*"* use this source file for your test class implementation
-*"* local test class
-CLASS ltcl_zcl_abgagt_util DEFINITION FOR TESTING DURATION SHORT RISK LEVEL HARMLESS.
-  PRIVATE SECTION.
-    DATA mo_util TYPE REF TO zcl_abgagt_util.
-
-    METHODS setup.
-    METHODS test_parse_clas FOR TESTING.
-    METHODS test_parse_intf FOR TESTING.
-    METHODS test_parse_with_path FOR TESTING.
-    METHODS test_parse_invalid FOR TESTING.
-ENDCLASS.
-
-CLASS ltcl_zcl_abgagt_util IMPLEMENTATION.
-
-  METHOD setup.
-    mo_util = zcl_abgagt_util=>get_instance( ).
-  ENDMETHOD.
-
-  METHOD test_parse_clas.
-    " Test parsing CLAS file
-    DATA lv_obj_type TYPE string.
-    DATA lv_obj_name TYPE string.
-
-    mo_util->zif_abgagt_util~parse_file_to_object(
-      EXPORTING iv_file = 'zcl_my_class.clas.abap'
-      IMPORTING ev_obj_type = lv_obj_type
-                ev_obj_name = lv_obj_name ).
-
-    cl_abap_unit_assert=>assert_equals(
-      act = lv_obj_type exp = 'CLAS' msg = 'Object type should be CLAS' ).
-    cl_abap_unit_assert=>assert_equals(
-      act = lv_obj_name exp = 'ZCL_MY_CLASS' msg = 'Object name mismatch' ).
-  ENDMETHOD.
-
-  METHOD test_parse_intf.
-    " Test parsing INTF file
-    DATA lv_obj_type TYPE string.
-    DATA lv_obj_name TYPE string.
-
-    mo_util->zif_abgagt_util~parse_file_to_object(
-      EXPORTING iv_file = 'zif_my_intf.intf.abap'
-      IMPORTING ev_obj_type = lv_obj_type
-                ev_obj_name = lv_obj_name ).
-
-    cl_abap_unit_assert=>assert_equals(
-      act = lv_obj_type exp = 'INTF' msg = 'Object type should be INTF' ).
-    cl_abap_unit_assert=>assert_equals(
-      act = lv_obj_name exp = 'ZIF_MY_INTF' msg = 'Object name mismatch' ).
-  ENDMETHOD.
-
-  METHOD test_parse_with_path.
-    " Test parsing file with path
-    DATA lv_obj_type TYPE string.
-    DATA lv_obj_name TYPE string.
-
-    mo_util->zif_abgagt_util~parse_file_to_object(
-      EXPORTING iv_file = 'src/zcl_my_class.clas.abap'
-      IMPORTING ev_obj_type = lv_obj_type
-                ev_obj_name = lv_obj_name ).
-
-    cl_abap_unit_assert=>assert_equals(
-      act = lv_obj_type exp = 'CLAS' msg = 'Object type should be CLAS' ).
-    cl_abap_unit_assert=>assert_equals(
-      act = lv_obj_name exp = 'ZCL_MY_CLASS' msg = 'Path should be stripped' ).
-  ENDMETHOD.
-
-  METHOD test_parse_invalid.
-    " Test parsing invalid file (should return empty)
-    DATA lv_obj_type TYPE string.
-    DATA lv_obj_name TYPE string.
-
-    mo_util->zif_abgagt_util~parse_file_to_object(
-      EXPORTING iv_file = 'invalid_file.txt'
-      IMPORTING ev_obj_type = lv_obj_type
-                ev_obj_name = lv_obj_name ).
-
-    cl_abap_unit_assert=>assert_initial(
-      act = lv_obj_type msg = 'Invalid file should return empty type' ).
-    cl_abap_unit_assert=>assert_initial(
-      act = lv_obj_name msg = 'Invalid file should return empty name' ).
-  ENDMETHOD.
-
-ENDCLASS.

package/abap/zcl_abgagt_util.clas.xml

@@ -1,16 +0,0 @@
-<?xml version="1.0" encoding="utf-8"?>
-<abapGit version="v1.0.0" serializer="LCL_OBJECT_CLAS" serializer_version="v1.0.0">
- <asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
-  <asx:values>
-   <VSEOCLASS>
-    <CLSNAME>ZCL_ABGAGT_UTIL</CLSNAME>
-    <LANGU>E</LANGU>
-    <DESCRIPT>Utility Class for ABAP Git Agent</DESCRIPT>
-    <EXPOSURE>2</EXPOSURE>
-    <STATE>1</STATE>
-    <UNICODE>X</UNICODE>
-    <WITH_UNIT_TESTS>X</WITH_UNIT_TESTS>
-   </VSEOCLASS>
-  </asx:values>
- </asx:abap>
-</abapGit>

package/abap/zcl_abgagt_viewer_clas.clas.abap

@@ -1,58 +0,0 @@
-*"*"use source
-*"*"Local Interface:
-*"**********************************************************************
-CLASS zcl_abgagt_viewer_clas DEFINITION PUBLIC FINAL CREATE PUBLIC.
-
-  PUBLIC SECTION.
-    INTERFACES zif_abgagt_viewer.
-
-ENDCLASS.
-
-CLASS zcl_abgagt_viewer_clas IMPLEMENTATION.
-
-  METHOD zif_abgagt_viewer~get_info.
-    DATA: lv_obj_name TYPE tadir-obj_name,
-          lv_devclass TYPE tadir-devclass,
-          lv_prog TYPE program,
-          lt_source TYPE TABLE OF string,
-          lv_line TYPE string.
-
-    SELECT SINGLE obj_name devclass FROM tadir
-      INTO (lv_obj_name, lv_devclass)
-      WHERE obj_name = iv_name
-        AND object = 'CLAS'.
-    IF sy-subrc = 0.
-      rs_info-name = iv_name.
-      rs_info-type = 'CLAS'.
-      rs_info-type_text = 'Class'.
-      rs_info-description = |Class { iv_name } in { lv_devclass }|.
-    ELSE.
-      rs_info-name = iv_name.
-      rs_info-type = 'CLAS'.
-      rs_info-type_text = 'Class'.
-      rs_info-not_found = abap_true.
-    ENDIF.
-
-    " Get class public section program name using CL_OO_CLASSNAME_SERVICE
-    DATA lv_clsname TYPE seoclsname.
-    lv_clsname = iv_name.
-    CALL METHOD cl_oo_classname_service=>get_pubsec_name
-      EXPORTING
-        clsname = lv_clsname
-      RECEIVING
-        result  = lv_prog.
-
-    " Read source from program
-    READ REPORT lv_prog INTO lt_source.
-    IF sy-subrc = 0.
-      LOOP AT lt_source INTO lv_line.
-        IF rs_info-source IS INITIAL.
-          rs_info-source = lv_line.
-        ELSE.
-          rs_info-source = rs_info-source && |\n| && lv_line.
-        ENDIF.
-      ENDLOOP.
-    ENDIF.
-  ENDMETHOD.
-
-ENDCLASS.

package/abap/zcl_abgagt_viewer_clas.clas.xml

@@ -1,15 +0,0 @@
-<?xml version="1.0" encoding="utf-8"?>
-<abapGit version="v1.0.0" serializer="LCL_OBJECT_CLAS" serializer_version="v1.0.0">
- <asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
-  <asx:values>
-   <VSEOCLASS>
-    <CLSNAME>ZCL_ABGAGT_VIEWER_CLAS</CLSNAME>
-    <LANGU>E</LANGU>
-    <DESCRIPT>Viewer for ABAP Classes</DESCRIPT>
-    <EXPOSURE>2</EXPOSURE>
-    <STATE>1</STATE>
-    <UNICODE>X</UNICODE>
-   </VSEOCLASS>
-  </asx:values>
- </asx:abap>
-</abapGit>