All files / src/git_platform zcl_abapgit_pr_enumerator.clas.abap

83.85% Statements 135/161
50% Branches 2/4
66.66% Functions 2/3
83.85% Lines 135/161

Press n or j to go to the next uncovered block, b, p or k for the previous block.

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 1621x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x                   1x 1x 1x 1x 1x 1x           1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x                         1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x 1x  
CLASS zcl_abapgit_pr_enumerator DEFINITION
  PUBLIC
  FINAL
  CREATE PUBLIC .
 
  PUBLIC SECTION.
 
    METHODS constructor
      IMPORTING
        iv_url TYPE string
      RAISING
        zcx_abapgit_exception.
 
    METHODS get_pulls
      RETURNING
        VALUE(rt_pulls) TYPE zif_abapgit_pr_enum_provider=>ty_pull_requests
      RAISING
        zcx_abapgit_exception.
 
    METHODS create_repository
      IMPORTING
        iv_description TYPE string OPTIONAL
        iv_is_org      TYPE abap_bool DEFAULT abap_true
        iv_private     TYPE abap_bool DEFAULT abap_true
        iv_auto_init   TYPE abap_bool DEFAULT abap_true
      RAISING
        zcx_abapgit_exception.
 
    METHODS create_initial_branch
      IMPORTING
        iv_readme             TYPE string OPTIONAL
        iv_branch_name        TYPE string DEFAULT 'main'
      RETURNING
        VALUE(rv_branch_name) TYPE string
      RAISING
        zcx_abapgit_exception.
 
    CLASS-METHODS new
      IMPORTING
        iv_url             TYPE string
      RETURNING
        VALUE(ro_instance) TYPE REF TO zcl_abapgit_pr_enumerator
      RAISING
        zcx_abapgit_exception.
 
  PROTECTED SECTION.
  PRIVATE SECTION.
    DATA mv_repo_url TYPE string.
    DATA mi_enum_provider TYPE REF TO zif_abapgit_pr_enum_provider.
 
    CLASS-METHODS create_provider
      IMPORTING
        iv_repo_url        TYPE string
      RETURNING
        VALUE(ri_provider) TYPE REF TO zif_abapgit_pr_enum_provider
      RAISING
        zcx_abapgit_exception.
 
ENDCLASS.
 
 
 
CLASS zcl_abapgit_pr_enumerator IMPLEMENTATION.
 
 
  METHOD constructor.
 
    mv_repo_url = iv_url.
    TRY.
        mi_enum_provider = create_provider( mv_repo_url ).
      CATCH zcx_abapgit_exception ##NO_HANDLER.
    ENDTRY.
 
  ENDMETHOD.
 
 
  METHOD create_initial_branch.
 
    IF mi_enum_provider IS NOT BOUND.
      RETURN.
    ENDIF.
 
    rv_branch_name = mi_enum_provider->create_initial_branch(
      iv_readme      = iv_readme
      iv_branch_name = iv_branch_name ).
 
  ENDMETHOD.
 
 
  METHOD create_provider.
 
    DATA li_agent TYPE REF TO zif_abapgit_http_agent.
    DATA lv_user TYPE string.
    DATA lv_repo TYPE string.
 
    li_agent = zcl_abapgit_http_agent=>create( ).
 
    FIND ALL OCCURRENCES OF REGEX 'github\.com\/([^\/]+)\/([^\/]+)'
      IN iv_repo_url
      SUBMATCHES lv_user lv_repo ##REGEX_POSIX.
    IF sy-subrc = 0.
      lv_repo = replace(
        val = lv_repo
        regex = '\.git$'
        with = '' ) ##REGEX_POSIX.
      CREATE OBJECT ri_provider TYPE zcl_abapgit_pr_enum_github
        EXPORTING
          iv_user_and_repo = |{ lv_user }/{ lv_repo }|
          ii_http_agent    = li_agent.
    ENDIF.
 
* used in integration testing, see /test/ folder
    FIND ALL OCCURRENCES OF REGEX 'localhost:3050\/([^\/]+)\/([^\/]+)'
      IN iv_repo_url
      SUBMATCHES lv_user lv_repo ##REGEX_POSIX.
    IF sy-subrc = 0.
      CREATE OBJECT ri_provider TYPE zcl_abapgit_pr_enum_gitea
        EXPORTING
          iv_user_and_repo = |{ lv_user }/{ lv_repo }|
          ii_http_agent    = li_agent.
    ENDIF.
 
    " TODO somewhen more providers
 
    IF ri_provider IS NOT BOUND.
      zcx_abapgit_exception=>raise( |PR enumeration is not supported for { iv_repo_url }| ).
    ENDIF.
 
  ENDMETHOD.
 
 
  METHOD create_repository.

    IF mi_enum_provider IS NOT BOUND.
      RETURN.
    ENDIF.

    mi_enum_provider->create_repository(
      iv_description = iv_description
      iv_is_org      = iv_is_org
      iv_private     = iv_private
      iv_auto_init   = iv_auto_init ).

  ENDMETHOD.
 
 
  METHOD get_pulls.
 
    IF mi_enum_provider IS NOT BOUND.
      RETURN.
    ENDIF.
 
    rt_pulls = mi_enum_provider->list_pull_requests( ).
 
  ENDMETHOD.
 
 
  METHOD new.
    CREATE OBJECT ro_instance EXPORTING iv_url = iv_url.
  ENDMETHOD.
ENDCLASS.