_PARSE_ALLOWED_CHARS="_-"
_PARSE_SPLIT_CHARS="\.\ _-"

# Parse data and output simplified format.
# Usage: parse_simplify <STRING>
function parse_simplify() {
	echo "${*}" | sed \
		-e "s/[${_PARSE_SPLIT_CHARS}]/_/g" \
		-e "s/[^[:alnum:]${_PARSE_ALLOWED_CHARS}]//g" \
		-e "s/_\+/_/g" -e "s/-\+/-/g" \
		-e "s/_-/_/g" -e "s/-_/_/g" \
		-e "s/_\+/_/g" \
		-e "s/^_//" -e "s/_$//"
}

# Parse to PascalCase.
# Usage: parse_pascal <STRING>
function parse_pascal() {
	local parts=($(_get_parts $(parse_simplify "${*}")))
	local result

	for part in "${parts[@]}"; do
		local word="${part,,}"
		word="${word^}"
		result="${result}${word}"
	done

	echo "${result}"
}

# Parse to snake_case.
# Usage: parse_snake <STRING>
function parse_snake() {
	local parts=($(_get_parts $(parse_simplify "${*}")))
	local result

	for part in "${parts[@]}"; do
		local word="${part,,}"
		result="${result}_${word}"
	done

	echo "${result#_}"
}

# Parse to kebab-case.
# Usage: parse_kebab <STRING>
function parse_kebab() {
	local parts=($(_get_parts $(parse_simplify "${*}")))
	local result

	for part in "${parts[@]}"; do
		local word="${part,,}"
		result="${result}-${word}"
	done

	echo "${result#-}"
}

# Parse to camelCase.
# Usage: parse_camel <STRING>
function parse_camel() {
	local parts=($(_get_parts $(parse_simplify "${*}")))
	local result

	for part in "${parts[@]}"; do
		local word="${part,,}"
		word="${word^}"
		result="${result}${word}"
	done

	echo "${result,}"
}

# Parse to SNAKE_CASE_UPPERCASE. **NOT STABLE! Repeating results in different output.**
# Usage: parse_snake_uppercase <STRING>
function parse_snake_uppercase() {
	local parts=($(_get_parts $(parse_simplify "${*}")))
	local result

	for part in "${parts[@]}"; do
		local word="${part^^}"
		result="${result}_${word}"
	done

	echo "${result#_}"
}

# Parse data keeping only alphanumeric characters.
# Usage: parse_alnum <STRING>
function parse_alnum() {
	echo "${*}" | sed -e "s/[^[:alnum:]]//g"
}

# Parse integers from mixed string.
# Usage: parse_ints <STRING>
function parse_ints() {
	echo "${*}" | tr '\n' ' ' | sed -e 's/[^0-9]/ /g' -e 's/^ *//g' -e 's/ *$//g' | tr -s ' ' | sed 's/ /\n/g'
}

# Parse string to lowercase.
# Usage: parse_lowercase <STRING>
function parse_lowercase() {
	echo "${*,,}"
}

# Parse string to uppercase.
# Usage: parse_uppercase <STRING>
function parse_uppercase() {
	echo "${*^^}"
}

# Parse string to title case.
# Usage: parse_titlecase <STRING>
function parse_titlecase() {
	local IFS=$'\n'
	local parts=$(_parse_split ${*})
	local minors=("is" "at" "of" "to" "in" "for" "the" "a" "an" "and" "but" "or" "on" "was" "were" "been" "be" "do" "did" "does")
	local is_first=true

	for part in ${parts[@]}; do
		if ${is_first}; then
			echo -n "${part^}"
			is_first=false
			continue
		fi

		if [[ "${minors[@]}" =~ $(echo ${part} | sed -e "s/[${_PARSE_SPLIT_CHARS}]//g") ]]; then
			echo -n "${part}"
		else
			echo -n "${part^}"
		fi
	done

	echo
}

# Parse string to sentence case.
# Usage: parse_sentencecase <STRING>
function parse_sentencecase() {
	local lower="${*,,}"
	echo "${lower^}"
}

# Parse string to start case.
# Usage: parse_startcase <STRING>
function parse_startcase() {
	local IFS=$'\n'
	local parts=$(_parse_split ${*})

	for part in ${parts[@]}; do
		echo -n "${part^}"
	done
}

# Parse string to pretty Json.
# Usage: parse_json <STRING>
function parse_json() {
	echo "${*}" | jq
}

# Split string by separators.
# Usage: _parse_split <STRING>
function _parse_split() {
	echo "${*}" | sed -e "s/[A-Z]/\n&/g" -e "s/[0-9]\+/\n&\n/g" -e "s/[${_PARSE_SPLIT_CHARS}]/&\n/g" | sed -e "/^$/d"
}

# Get name parts.
# Usage: _get_parts <STRING>
function _get_parts() {
	_parse_split "${*}" | sed -e "s/[${_PARSE_SPLIT_CHARS}]//g" | sed -e "/^$/d"
}