SAP/abapGit
1
0
Fork 0
mirror of https://github.com/abapGit/abapGit.git synced 2025-04-30 20:03:20 +08:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

Accept remote without HEAD (#4706)

Browse Source 
* Accept remote without HEAD

* Update src/git/zcl_abapgit_git_branch_list.clas.testclasses.abap

Co-authored-by: Lars Hvam <larshp@hotmail.com>

Co-authored-by: Lars Hvam <larshp@hotmail.com>
This commit is contained in:
Mike Pokraka 2021-04-18 10:18:33 +01:00 committed by GitHub
parent 41b301cc11
commit dd6becccbe
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
2 changed files with 27 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
src/git/zcl_abapgit_git_branch_list.clas.abap
View File

@ -92,7 +92,7 @@ ENDCLASS.
CLASS ZCL_ABAPGIT_GIT_BRANCH_LIST IMPLEMENTATION.
CLASS zcl_abapgit_git_branch_list IMPLEMENTATION.
METHOD complete_heads_branch_name.
@ -273,6 +273,9 @@ CLASS ZCL_ABAPGIT_GIT_BRANCH_LIST IMPLEMENTATION.
SPLIT lv_name AT lv_char INTO lv_name lv_head_params.
ev_head_symref = parse_head_params( lv_head_params ).
IF ev_head_symref IS INITIAL AND lv_name CS 'refs/heads/'.
ev_head_symref = lv_name.
ENDIF.
ELSEIF sy-tabix > 1 AND strlen( lv_data ) > 45.
lv_hash = lv_data+4.
lv_name = lv_data+45.

31
src/git/zcl_abapgit_git_branch_list.clas.testclasses.abap
View File

@ -8,13 +8,16 @@ CLASS ltcl_parse DEFINITION FOR TESTING
PRIVATE SECTION.
METHODS:
parse
IMPORTING
iv_expected_lines TYPE i DEFAULT 2
RAISING
zcx_abapgit_exception.
METHODS:
test01 FOR TESTING RAISING zcx_abapgit_exception,
test02 FOR TESTING RAISING zcx_abapgit_exception,
test03 FOR TESTING RAISING zcx_abapgit_exception.
parse_ok_without_first_lf FOR TESTING RAISING zcx_abapgit_exception,
parse_works FOR TESTING RAISING zcx_abapgit_exception,
captcha_response_is_caught FOR TESTING RAISING zcx_abapgit_exception,
use_refs_if_head_is_missing FOR TESTING RAISING cx_static_check.
DATA: mt_data TYPE STANDARD TABLE OF string WITH DEFAULT KEY.
@ -28,7 +31,6 @@ CLASS ltcl_parse IMPLEMENTATION.
DATA: lv_data TYPE string,
lt_list TYPE zif_abapgit_definitions=>ty_git_branch_list_tt.
CONCATENATE LINES OF mt_data INTO lv_data SEPARATED BY zif_abapgit_definitions=>c_newline.
zcl_abapgit_git_branch_list=>parse_branch_list(
@ -41,14 +43,14 @@ CLASS ltcl_parse IMPLEMENTATION.
cl_abap_unit_assert=>assert_equals(
act = lines( lt_list )
exp = 2 ).
exp = iv_expected_lines ).
READ TABLE lt_list WITH KEY name = zif_abapgit_definitions=>c_git_branch-master TRANSPORTING NO FIELDS.
cl_abap_unit_assert=>assert_subrc( ).
ENDMETHOD.
METHOD test01.
METHOD parse_ok_without_first_lf.
* without linefeed after first pkt-line
*
@ -65,7 +67,7 @@ CLASS ltcl_parse IMPLEMENTATION.
ENDMETHOD.
METHOD test02.
METHOD parse_works.
APPEND '001e# service=git-upload-pack' TO mt_data.
APPEND '000001080e6fe6b311f789ccbac6c5122702d4f48a4f6bda HEAD#asdf' TO mt_data.
@ -75,7 +77,7 @@ CLASS ltcl_parse IMPLEMENTATION.
ENDMETHOD.
METHOD test03.
METHOD captcha_response_is_caught.
* https://github.com/abapGit/abapGit/issues/4523
@ -96,4 +98,17 @@ CLASS ltcl_parse IMPLEMENTATION.
ENDMETHOD.
METHOD use_refs_if_head_is_missing.
" https://github.com/abapGit/abapGit/issues/4703
" In case HEAD is missing, it should use refs/heads/xxxxx as the default branch
APPEND '001e# service=git-upload-pack' TO mt_data.
APPEND '000000f7e6e5b066fb4177bf0780bf343ab2de06368dd973 refs/heads/master' TO mt_data.
APPEND '0000' TO mt_data.
parse( iv_expected_lines = 1 ).
ENDMETHOD.
ENDCLASS.