in src/zgoog_cl_content_repo_gcs.clas.abap [0:0]
METHOD verify_signature.
DATA lv_signed TYPE xstring.
CALL FUNCTION 'SCMS_BASE64_DECODE_STR'
EXPORTING
input = iv_seckey
unescape = 'X'
IMPORTING
output = lv_signed
EXCEPTIONS
failed = 1
OTHERS = 2.
IF sy-subrc <> 0.
gs_error-status_code = 400.
gs_error-status_text = 'seckey format error' ##NO_TEXT.
EXIT.
ENDIF.
CALL FUNCTION 'SCMS_RACL_VERIFY'
EXPORTING
uri_for_signature = iv_message
signature = lv_signed
contrep = iv_contrep
authid = iv_authid
EXCEPTIONS
OTHERS = 401.
IF sy-subrc <> 0.
gs_error-status_code = sy-subrc.
sys_error_set( ).
EXIT.
ENDIF.