mirror of
https://github.com/abapGit/abapGit.git
synced 2025-05-01 12:20:51 +08:00
d79887c0a2
Co-authored-by: Marc Bernard <59966492+mbtools@users.noreply.github.com> Co-authored-by: Lars Hvam <larshp@hotmail.com>
345 lines
6.6 KiB
ABAP
345 lines
6.6 KiB
ABAP
CLASS ltcl_normalize_program_name DEFINITION FINAL FOR TESTING
|
|
DURATION SHORT
|
|
RISK LEVEL HARMLESS.
|
|
|
|
PRIVATE SECTION.
|
|
DATA:
|
|
mo_chunk_lib TYPE REF TO zcl_abapgit_gui_chunk_lib.
|
|
|
|
METHODS:
|
|
setup,
|
|
class FOR TESTING RAISING cx_static_check,
|
|
program FOR TESTING RAISING cx_static_check.
|
|
|
|
ENDCLASS.
|
|
|
|
|
|
CLASS ltd_repo DEFINITION FINAL FOR TESTING
|
|
DURATION SHORT
|
|
RISK LEVEL HARMLESS.
|
|
|
|
PUBLIC SECTION.
|
|
INTERFACES zif_abapgit_repo.
|
|
|
|
DATA ms_data TYPE zif_abapgit_persistence=>ty_repo READ-ONLY.
|
|
|
|
METHODS set_display_name
|
|
IMPORTING !iv_display_name TYPE csequence.
|
|
ENDCLASS.
|
|
|
|
|
|
CLASS ltd_repo_srv DEFINITION FINAL FOR TESTING
|
|
DURATION SHORT
|
|
RISK LEVEL HARMLESS.
|
|
|
|
PUBLIC SECTION.
|
|
INTERFACES zif_abapgit_repo_srv.
|
|
|
|
METHODS add_repository
|
|
IMPORTING !iv_display_name TYPE csequence.
|
|
|
|
PRIVATE SECTION.
|
|
DATA mt_repositories TYPE STANDARD TABLE OF REF TO ltd_repo.
|
|
ENDCLASS.
|
|
|
|
|
|
CLASS ltcl_render_repo DEFINITION FINAL FOR TESTING
|
|
DURATION SHORT
|
|
RISK LEVEL HARMLESS.
|
|
|
|
PRIVATE SECTION.
|
|
DATA:
|
|
mo_chunk_lib TYPE REF TO zcl_abapgit_gui_chunk_lib.
|
|
DATA mo_repo_srv TYPE REF TO ltd_repo_srv.
|
|
|
|
METHODS:
|
|
setup,
|
|
render_repo_palette_display_nm FOR TESTING RAISING cx_static_check.
|
|
|
|
ENDCLASS.
|
|
|
|
CLASS zcl_abapgit_gui_chunk_lib DEFINITION
|
|
LOCAL FRIENDS ltcl_normalize_program_name
|
|
ltcl_render_repo.
|
|
|
|
|
|
CLASS ltcl_normalize_program_name IMPLEMENTATION.
|
|
|
|
METHOD setup.
|
|
|
|
CREATE OBJECT mo_chunk_lib.
|
|
|
|
ENDMETHOD.
|
|
|
|
|
|
METHOD class.
|
|
|
|
cl_abap_unit_assert=>assert_equals(
|
|
act = mo_chunk_lib->normalize_program_name( 'ZCL_ABAPGIT_FRONTEND_SERVICES=CP' )
|
|
exp = `ZCL_ABAPGIT_FRONTEND_SERVICES` ).
|
|
|
|
ENDMETHOD.
|
|
|
|
|
|
METHOD program.
|
|
|
|
cl_abap_unit_assert=>assert_equals(
|
|
act = mo_chunk_lib->normalize_program_name( 'ZABAPGIT_FULL' )
|
|
exp = `ZABAPGIT_FULL` ).
|
|
|
|
cl_abap_unit_assert=>assert_equals(
|
|
act = mo_chunk_lib->normalize_program_name( 'ZSOME_PROG_ENDING_WITH_CP' )
|
|
exp = `ZSOME_PROG_ENDING_WITH_CP` ).
|
|
|
|
ENDMETHOD.
|
|
|
|
ENDCLASS.
|
|
|
|
|
|
CLASS ltd_repo_srv IMPLEMENTATION.
|
|
|
|
METHOD add_repository.
|
|
DATA lo_new_repo TYPE REF TO ltd_repo.
|
|
|
|
CREATE OBJECT lo_new_repo.
|
|
lo_new_repo->set_display_name( iv_display_name ).
|
|
|
|
APPEND lo_new_repo TO mt_repositories.
|
|
ENDMETHOD.
|
|
|
|
METHOD zif_abapgit_repo_srv~list.
|
|
DATA lo_test_double_repo TYPE REF TO ltd_repo.
|
|
DATA lo_abapgit_repo TYPE REF TO zif_abapgit_repo.
|
|
|
|
LOOP AT mt_repositories INTO lo_test_double_repo.
|
|
lo_abapgit_repo = lo_test_double_repo.
|
|
APPEND lo_test_double_repo TO rt_list.
|
|
ENDLOOP.
|
|
ENDMETHOD.
|
|
|
|
METHOD zif_abapgit_repo_srv~delete.
|
|
|
|
ENDMETHOD.
|
|
|
|
METHOD zif_abapgit_repo_srv~get.
|
|
|
|
ENDMETHOD.
|
|
|
|
METHOD zif_abapgit_repo_srv~get_label_list.
|
|
|
|
ENDMETHOD.
|
|
|
|
METHOD zif_abapgit_repo_srv~get_repo_from_package.
|
|
|
|
ENDMETHOD.
|
|
|
|
METHOD zif_abapgit_repo_srv~get_repo_from_url.
|
|
|
|
ENDMETHOD.
|
|
|
|
METHOD zif_abapgit_repo_srv~init.
|
|
|
|
ENDMETHOD.
|
|
|
|
METHOD zif_abapgit_repo_srv~is_repo_installed.
|
|
|
|
ENDMETHOD.
|
|
|
|
METHOD zif_abapgit_repo_srv~list_favorites.
|
|
|
|
ENDMETHOD.
|
|
|
|
METHOD zif_abapgit_repo_srv~new_offline.
|
|
|
|
ENDMETHOD.
|
|
|
|
METHOD zif_abapgit_repo_srv~new_online.
|
|
|
|
ENDMETHOD.
|
|
|
|
METHOD zif_abapgit_repo_srv~purge.
|
|
|
|
ENDMETHOD.
|
|
|
|
METHOD zif_abapgit_repo_srv~validate_package.
|
|
|
|
ENDMETHOD.
|
|
|
|
METHOD zif_abapgit_repo_srv~validate_url.
|
|
|
|
ENDMETHOD.
|
|
|
|
ENDCLASS.
|
|
|
|
|
|
CLASS ltd_repo IMPLEMENTATION.
|
|
|
|
METHOD set_display_name.
|
|
ms_data-local_settings-display_name = iv_display_name.
|
|
ENDMETHOD.
|
|
|
|
METHOD zif_abapgit_repo~get_name.
|
|
rv_name = ms_data-local_settings-display_name.
|
|
ENDMETHOD.
|
|
|
|
METHOD zif_abapgit_repo~get_files_local_filtered.
|
|
ENDMETHOD.
|
|
|
|
METHOD zif_abapgit_repo~checksums.
|
|
|
|
ENDMETHOD.
|
|
|
|
METHOD zif_abapgit_repo~deserialize.
|
|
|
|
ENDMETHOD.
|
|
|
|
METHOD zif_abapgit_repo~deserialize_checks.
|
|
|
|
ENDMETHOD.
|
|
|
|
METHOD zif_abapgit_repo~get_dot_abapgit.
|
|
|
|
ENDMETHOD.
|
|
|
|
METHOD zif_abapgit_repo~get_files_local.
|
|
|
|
ENDMETHOD.
|
|
|
|
METHOD zif_abapgit_repo~get_files_remote.
|
|
|
|
ENDMETHOD.
|
|
|
|
METHOD zif_abapgit_repo~get_key.
|
|
|
|
ENDMETHOD.
|
|
|
|
METHOD zif_abapgit_repo~get_local_settings.
|
|
|
|
ENDMETHOD.
|
|
|
|
METHOD zif_abapgit_repo~get_tadir_objects.
|
|
|
|
ENDMETHOD.
|
|
|
|
METHOD zif_abapgit_repo~get_package.
|
|
|
|
ENDMETHOD.
|
|
|
|
METHOD zif_abapgit_repo~has_remote_source.
|
|
|
|
ENDMETHOD.
|
|
|
|
METHOD zif_abapgit_repo~is_offline.
|
|
|
|
ENDMETHOD.
|
|
|
|
METHOD zif_abapgit_repo~refresh.
|
|
|
|
ENDMETHOD.
|
|
|
|
METHOD zif_abapgit_repo~set_dot_abapgit.
|
|
|
|
ENDMETHOD.
|
|
|
|
METHOD zif_abapgit_repo~find_remote_dot_abapgit.
|
|
ENDMETHOD.
|
|
|
|
METHOD zif_abapgit_repo~create_new_log.
|
|
|
|
ENDMETHOD.
|
|
|
|
METHOD zif_abapgit_repo~delete_checks.
|
|
|
|
ENDMETHOD.
|
|
|
|
METHOD zif_abapgit_repo~get_dot_apack.
|
|
|
|
ENDMETHOD.
|
|
|
|
METHOD zif_abapgit_repo~get_log.
|
|
|
|
ENDMETHOD.
|
|
|
|
METHOD zif_abapgit_repo~get_data_config.
|
|
|
|
ENDMETHOD.
|
|
|
|
METHOD zif_abapgit_repo~get_unsupported_objects_local.
|
|
|
|
ENDMETHOD.
|
|
|
|
METHOD zif_abapgit_repo~refresh_local_object.
|
|
|
|
ENDMETHOD.
|
|
|
|
METHOD zif_abapgit_repo~refresh_local_objects.
|
|
|
|
ENDMETHOD.
|
|
|
|
METHOD zif_abapgit_repo~set_files_remote.
|
|
|
|
ENDMETHOD.
|
|
|
|
METHOD zif_abapgit_repo~set_local_settings.
|
|
|
|
ENDMETHOD.
|
|
|
|
METHOD zif_abapgit_repo~switch_repo_type.
|
|
|
|
ENDMETHOD.
|
|
|
|
METHOD zif_abapgit_repo~bind_listener.
|
|
|
|
ENDMETHOD.
|
|
|
|
METHOD zif_abapgit_repo~remove_ignored_files.
|
|
|
|
ENDMETHOD.
|
|
|
|
ENDCLASS.
|
|
|
|
|
|
CLASS ltcl_render_repo IMPLEMENTATION.
|
|
|
|
METHOD setup.
|
|
CREATE OBJECT mo_repo_srv.
|
|
zcl_abapgit_repo_srv=>inject_instance( mo_repo_srv ).
|
|
|
|
CREATE OBJECT mo_chunk_lib.
|
|
ENDMETHOD.
|
|
|
|
|
|
METHOD render_repo_palette_display_nm.
|
|
DATA lx_abapgit TYPE REF TO zcx_abapgit_exception.
|
|
DATA lo_html TYPE REF TO zif_abapgit_html.
|
|
DATA lv_html_as_string TYPE string.
|
|
|
|
mo_repo_srv->add_repository( |Simple test| ).
|
|
mo_repo_srv->add_repository( |'Single' quotation marks| ).
|
|
mo_repo_srv->add_repository( |"Double quotation marks"| ).
|
|
|
|
TRY.
|
|
lo_html = mo_chunk_lib->render_repo_palette( zif_abapgit_definitions=>c_action-go_repo ).
|
|
lv_html_as_string = lo_html->render( ).
|
|
|
|
cl_abap_unit_assert=>assert_char_cp(
|
|
act = lv_html_as_string
|
|
exp = |*displayName: "Simple test"*| ).
|
|
|
|
cl_abap_unit_assert=>assert_char_cp(
|
|
act = lv_html_as_string
|
|
exp = |*displayName: "\\'Single\\' quotation marks"*| ).
|
|
|
|
cl_abap_unit_assert=>assert_char_cp(
|
|
act = lv_html_as_string
|
|
exp = |*displayName: "\\"Double quotation marks\\""*| ).
|
|
|
|
CATCH zcx_abapgit_exception INTO lx_abapgit.
|
|
cl_abap_unit_assert=>fail(
|
|
msg = 'abapGit exception'
|
|
detail = lx_abapgit->get_text( ) ).
|
|
ENDTRY.
|
|
ENDMETHOD.
|
|
|
|
ENDCLASS.
|