search_binary

in src/zgoog_cl_content_repo_gcs.clas.abap [0:0]

• 19 lines of code
• 4 McCabe index (conditional complexity)

  METHOD search_binary.
    DATA lv_l TYPE i.
    DATA lv_n TYPE i.
    DATA lv_p TYPE i.

    lv_l = xstrlen( iv_pattern ).
    lv_n = xstrlen( iv_buffer ) - xstrlen( iv_pattern ).
    cv_pos = -1.

    IF iv_pattern IS INITIAL.
      cv_pos = 0.
      EXIT.
    ENDIF.

    lv_p = 0.
    WHILE lv_p <= lv_n.
      IF iv_buffer+lv_p(lv_l) = iv_pattern.
        cv_pos = lv_p.
        EXIT.
      ENDIF.
      lv_p = lv_p + 1.
    ENDWHILE.