chg

#!/bin/sh

mkdir res 2>/dev/null

# Перетворити JSON-файл на звичайний текст
if [ $1 == 'json' ]; then
	shift #json
	for arg in "$@"
	do
		text=$(cat $arg | sed -E "s/^.*: \"//g;
					  s/^  \{//g;
					  s/^  },//g;
					  s/^  }//g;
					  s/^\[//g;
					  s/^]//g;
					  s/\"$//g")

		text=$(sed -E -z 's/\n+/\n/g' <<< "$text")

		echo "$text" > res/$arg.text.txt
	done
	exit 0
fi

# Оптимізувати кількість символів у файлах
if [ $1 == 'prep' ]; then
	shift #prep
	for arg in "$@"
	do
		text=$(cat $arg | sed -E "s/, /,/g;
					  s/\.$//;
					  s/, -/,-/g;
					  s/, —/,—/g;
					  s/\? /?/g;
					  s/! /!/g;
					  s/; /;/g")

		text=$(sed -E -z 's/\n+/\n/g' <<< "$text")

		echo "$text" > res/$arg.prep.txt
	done
	exit 0
fi


#Загальні регулярні вирази заміни тексту для всіх творів
#На https://regexr.com/ можна зручно їх проєктувати/перевіряти
patterns=(
		#зайві символи
		'\s{2,}/ '
		'\?\./?'
		',?” /, —'
		'- /— '
		'(^\.\.)\. -/, —'
		'^ —/—'
		'(^\.)" /» '
		'— —/—'
		' "/ «'
		'(”|″)/»'
		'’(\W)/»\1'
		'»$/'
		'\?,/?'
		'!,/!'

		#початок прямої мови
		'^"/— '
		'^-/—'
		'^“/— '
		'^«/— '
		' “/ — '

		#слова автора
		': —/, — '
		': «/, — '
		'\." /, — '
		
		#цитати
		'‘/«'
		'"/»'
		'([^,]) — ((\w+) ){1,6}—/\1 «\3»'
		#'(«(\w+ ){1,6})—/\1»' #Можливо викликає зникнення слів
		' »/»'
		'» (\.|,|\?|!)/»\1'

		'(\w) — (\w.+\w), —/\1 «\2»,'
		'(\w) — (\w.+)\., —/\1 «\2».'
		'\., —/». '

		#стилістика
		'і і /і й '
		'(а|я|о|у|ю|е|є|и|і|ї) і (а|я|о|у|ю|е|є|и|і|ї)/\1 й \2'
		' й (й|ї|є|я|ю)/ і \1'
		'(и|і|ї) і,/\1 й,'


		########Перед голосною вживаємо з: «з» Америки
		' (зі|із) (а|я|о|у|ю|е|и|і|ї)/ з \2' # Перед голосною вживаємо з: «з» учасників
		'із (с|ш)(б|д|з|ж|г|ґ|л|м|н|р|в|п|т|с|ц|ш|х|к|ф)/зі \1' #Перед сполученням приголосних із початковим свистячим або шиплячим пишемо: «зі»
		
		'в б /в би ' #Після приголосної пишемо «би»
		'(а|я|о|у|ю|е|є|и|і|ї) би /\1 б ' # Після голосної пишемо «б»

		' в (в|ф|(б|д|з|ж|г|ґ|л|м|н|р|в|й|п|т|с|ц|ш|х|к|ф){2})/ у \1' # Перед словами, що починаються на в, ф або збігом приголосних із в, ф пишемо у: «у» свій
		' у (о|а|О|А)/ в \1' # Перед нейотованими голосними варто писати в

		'(арт|віце|пост|прес|Прес|нуль|топ|поп|мега|міні|медіа|супер|псевдо|промо|відео|веб|флеш|демо)-(\w)/\1\2'

		'(\d) чоловік/\1 осіб'
		'(\d) (\d)/\1,\2'
		'(\w) на ім(\W)я/\1, на ім\2я'
		'(\w) на прізвище/\1, на прізвище'
		'( — (сказа|відпові))(в|ла)/,\1\3'
		' (\w+)(-Сіті|-сіті|-місто)/ місто \1'
		'(\w) чи /\1, чи '

		'азіатс/азійс'

		'Будучи/Бувши'
		'будучи /бувши '
		'бажаючих/охочих'
		'більш складним/складнішим'
		'більш складного/складнішого'
		'більш складні/складніші'
		'більш повний/повніший'
		'більш повним/повнішим'
		'більш повними/повнішими'
		'більш близькими/ближчими'
		'більш чітке/чіткіше'
		'більш широкий/ширший'
		'більш широке/ширше'
		'безцінною/неоціненною'
		'безцінних/неоціненних'
		'безцінними/неоціненними'
		'безкоштовного/безплатного'
		'безкоштовна/безплатна'
		'безкоштовну/безплатну'
		'безкоштовно/безплатно'
		'безкоштовні/безплатні'
		'безкоштовне/безплатне'
		'безкоштовний/безплатний'
		'безкоштовним/безплатним'
		'безкоштовних/безплатних'
		'будь-якою ціною/за будь-яку ціну'
		' були праві/ мали рацію'

		#'вирішити будь-яку проблему'
		#'вирішив проблему/розв'язав проблему'
		#'вирішити цю проблему/розв'язати цю проблему'
		'в достатній мірі/достатньою мірою'
		'вірогідності/ймовірності'
		'віруючих/вірян'
		'віруючими/вірянами'
		'віруючим/вірянам'
		'віруючі/віряни'
		'віруючий/вірянин'
		'віруючою/вірянкою'
		'віруючого/вірянина'
		'відноситься до категорії/належить до категорії'
		'в крайньому випадку/в крайньому разі'
		'в залежності від/залежно від'
		'в повній мірі/повною мірою'
		'в самий раз/як раз'

		'головним пріоритетом/пріоритетом'

		' Євро/ Евро'
		' євро/ евро'
		' Євра/ Евра'
		' євра/ евра'
		' ЄС / ЕС '

		'загіпноти/загіпно'
		'заживо/живцем'
		'зробив вигляд/удав'
		'зарубіжному/закордонному'
		'здаватиме вступний іспит/складатиме вступний іспит'
		'здає вступний іспит/складає вступний іспит'

		'Коротше кажучи/Коротко кажучи'

		'мейнстрім/мейнстрим'

		'(Н|н)емає необхідності/\1ема потреби'
		'Незважаючи на /Попри '
		'незважаючи на /попри '
		' не по собі/ ніяково'
		'не в силах/не маючи сил'
		'найвірогід/найімовір'
		'найбільш прямий/найпряміший'
		'найбільш прямим/прямішим'
		'не те, що /не те що '
		'не те, щоб /не те щоб ' #Коми не ставимо в конструкціях на зразок не інакше як, не те що, не те щоб, тільки й розмов що, тільки й того що і под.

		'(П|п)о мірі/в міру'
		' парковки/ стоянки'
		' парковка/ стоянка'
		' парковці/ стоянці'
		'помер раптовою смертю/раптово помер'
		'по телефону/телефоном'
		'папка/тека'
		'папку/теку'
		'переключи(в|ла)/перемикну\1'
		'проек/проєк' # чинний правопис
		'підніма/підійма'

		'руки і ноги/руки та ноги'

		'священик/священник'

		'У свою чергу/Своєю чергою'
		'у свою чергу/своєю чергою'
		'у крайньому випадку/у крайньому разі'

		' фойє / фоє '

		'холостяка/парубка'
		'холостяк/парубок'

		'щупальцями/мацаками'
		'щупальцях/мацаках'
		'щупальця/мацаки'
		'щупалець/мацаків'
		'щупальце/мацак'

		'Якщо б /Якби '
		'якщо б /якби '






		#сміття
		'(Э|э|Ы|ы|Ё|ё|Ъ|ъ)/@' # збій у перекладі, перевірте увесь рядок
		'(m|M)ainland China/China'
		
		#інше
		',,/,'
		'—(\w)/— \1'
		'\s{2,}/ ' # знову
		'^ \[/\t[' # слова перекладача
		'…/...'

		'((Розділ|Глава|Chapter) [0-9]+):/\1.'
		'((Розділ|Глава|Chapter).*)/\n\1\n'

		#для тестів
		#'(\w+ ?)+/word'
)

# Не використовувати загальні регулярні вирази
if [ $1 == '-c' ]; then
	shift
	patterns=()
fi


multi_line_patterns=(	
		'\n+/\n'
)

# Додаткові правила заміни окремого твору
# На кожному рядку регулярний вираз
cin_path=''

if [ -f 'cin.txt' ]; then
	cin_path='./cin.txt'
elif [ -f '../cin.txt' ]; then
	cin_path='../cin.txt'
fi

if [ -n "$cin_path" ]; then
	while IFS="" read -r exp
	do
		if [ -z "$exp" ]; then
			continue
		fi

		patterns+=("$exp")
	done < $cin_path
fi

text=""
log_used_patterns () {
	for exp in "${patterns[@]}"; do
		echo "use $exp"
		text=$(sed -E "s/$exp/g" <<< "$text")
	done
}

#для тестів
debug=0

chg_exp=''
# Збираємо правила перетворень в один вираз щоб прискорити виконання
if [ $debug -eq 0 ]; then
	for exp in "${patterns[@]}"; do
		chg_exp="${chg_exp}s/$exp/g;"
	done
fi


# Заміна тексту у файлах використовуючи регулярні вирази
for arg in "$@"
do
	text=$(cat $arg)
	
	for exp in "${multi_line_patterns[@]}"; do
                text=$(sed -E -z "s/$exp/g" <<< "$text")
        done

	if [ $debug -eq 0 ]; then
		text=$(sed -E "$chg_exp" <<< "$text")
	else
		log_used_patterns
	fi
		
        echo "$text" > res/$arg
done