diff options
| author | Patrick McDermott <patrick.mcdermott@libiquity.com> | 2019-01-05 16:28:26 (EST) |
|---|---|---|
| committer | Patrick McDermott <patrick.mcdermott@libiquity.com> | 2019-01-05 16:28:26 (EST) |
| commit | d80290a2f8c9f069261da78afd2f275e84923d0f (patch) | |
| tree | 9be8571a6915b1bc4094621ba68fbe7b75558308 | |
| parent | 31a6f6452e6de2bcf27b5a141613b183ee29ce63 (diff) | |
ob_parse_control(): Run parse error callback
| -rw-r--r-- | lib/control.sh | 41 |
1 files changed, 6 insertions, 35 deletions
diff --git a/lib/control.sh b/lib/control.sh index 30c6b9c..c5ed645 100644 --- a/lib/control.sh +++ b/lib/control.sh @@ -19,35 +19,6 @@ _OB_SUBSTVARS_MAX_DEPTH=50 -_ob_parse_control_error() -{ - local file= - local line_nr= - local msg_id= - local file_info= - local orig_text_domain= - - file="${1}" - line_nr="${2}" - msg_id="${3}" - shift 3 - - if [ ${line_nr} -eq 0 ]; then - file_info="$(printf '%20s:' "${file}")" - else - file_info="$(printf '%20s(l%d):' "${file}" "${line_nr}")" - fi - - orig_text_domain="$(ob_get_text_domain)" - ob_set_text_domain "${_OB_INTERNAL_TEXT_DOMAIN}" - - ob_warn "${file_info} $(ob_get_msg "${msg_id}")" "${@}" - - ob_set_text_domain "${orig_text_domain}" - - return 0 -} - ## @brief Parse a control file ## @details \fBob_parse_control\fP parses a control file of field names and ## values formatted like RFC 822 (or RFC 2822 or RFC 5322) headers. @@ -113,7 +84,7 @@ ob_parse_control() line_nr=$(($line_nr + 1)) case "${line}" in '') - _ob_parse_control_error "${file}" "${line_nr}" \ + _ob_run_parse_error_cb "${file}" "${line_nr}" \ 'control_empty_line' ;; '#'*) # Comment. @@ -129,7 +100,7 @@ ob_parse_control() EOF if [ -z "${name}" ]; then # Badly formatted control field. - _ob_parse_control_error "${file}" "${line_nr}" \ + _ob_run_parse_error_cb "${file}" "${line_nr}" \ 'control_bad_nv' continue fi @@ -137,7 +108,7 @@ ob_parse_control() if [ "${all_fields% ${name} *}" = \ "${all_fields}" ]; then # Unknown field. - _ob_parse_control_error \ + _ob_run_parse_error_cb \ "${file}" "${line_nr}" \ 'control_unknown_field' "${name}" else @@ -149,7 +120,7 @@ ob_parse_control() if [ "${got_fields% ${name} *}" != \ "${got_fields}" ]; then # Duplicate field. - _ob_parse_control_error "${file}" "${line_nr}" \ + _ob_run_parse_error_cb "${file}" "${line_nr}" \ 'control_duplicate_field' "${name}" else got_fields="${got_fields}${name} " @@ -158,7 +129,7 @@ ob_parse_control() ' '*) # Continuation line. if [ -z "${name}" ]; then # Expecting a "Name: Value" line. - _ob_parse_control_error "${file}" "${line_nr}" \ + _ob_run_parse_error_cb "${file}" "${line_nr}" \ 'control_found_continuation' continue fi @@ -182,7 +153,7 @@ ob_parse_control() # Missing required control fields. req_fields="$(echo "${req_fields}" | sed 's/ / /g' | \ sed "s/ /$(ob_get_msg 'list_item_separator')/g")" - _ob_parse_control_error "${file}" '0' \ + _ob_run_parse_error_cb "${file}" '0' \ 'control_missing_fields' "${req_fields}" fi fi |