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

migrations: skip repos that cannot be fetched

Browse Source 
On systems where users do not allow everybody to fetch their repo, you need to
be able skip certain repos.

Currently, if you cannot authorize yourself to read a migrated repo, abapGit
exits.

With this patch applied, failed authorization attempts are notified to the user
and the repo is skipped.

Signed-off-by: Jakub Filak <jakub.filak@sap.com>
This commit is contained in:
Jakub Filak 2017-03-24 12:04:10 +01:00
parent 49904c906a
commit 35f3cce022
1 changed files with 19 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
src/zabapgit_migrations.prog.abap
View File

@ -35,7 +35,8 @@ CLASS lcl_migrations IMPLEMENTATION.
DATA: lt_repos TYPE lcl_repo_srv=>ty_repo_tt, DATA: lt_repos TYPE lcl_repo_srv=>ty_repo_tt,
lv_shown TYPE abap_bool, lv_shown TYPE abap_bool,
lo_dot_abapgit TYPE REF TO lcl_dot_abapgit. lo_dot_abapgit TYPE REF TO lcl_dot_abapgit,
lx_exception TYPE REF TO lcx_exception.
FIELD-SYMBOLS: <lo_repo> LIKE LINE OF lt_repos. FIELD-SYMBOLS: <lo_repo> LIKE LINE OF lt_repos.
@ -56,7 +57,23 @@ CLASS lcl_migrations IMPLEMENTATION.
txt2 = 'Login to remote repositories if needed'. txt2 = 'Login to remote repositories if needed'.
lv_shown = abap_true. lv_shown = abap_true.
ENDIF. ENDIF.
<lo_repo>->refresh( ).
" Skip repos that cannot be fetched.
" Particuarly useful on systems where users do not allow
" everybody to fetch their repos.
TRY.
<lo_repo>->refresh( ).
CATCH lcx_exception INTO lx_exception.
CALL FUNCTION 'POPUP_TO_INFORM'
EXPORTING
titel = 'Migration has failed'
txt1 = lx_exception->mv_text
txt2 = 'Please do not use the ''' && <lo_repo>->get_name( ) && ''' repository until migrated.'
txt3 = 'You will be prompted to migrate the repository every time you run abapGit.'
txt4 = 'You can safely remove the repository in its ''Advanced -> Remove'' menu.'.
CONTINUE.
ENDTRY.
lo_dot_abapgit = <lo_repo>->find_remote_dot_abapgit( ). lo_dot_abapgit = <lo_repo>->find_remote_dot_abapgit( ).
IF lo_dot_abapgit IS INITIAL. IF lo_dot_abapgit IS INITIAL.
* .abapgit.xml is not in the remote repo yet * .abapgit.xml is not in the remote repo yet