В основном церковью и моралью. Устоями (того) общества и быта в котором, мы с вами проживаем. Те правила и законы, которые поставлены на определённое действие, в силу своих полномочий, диктуют и выстраивают канву всей жизни человеческой. И на современном этапе, меняющие и добавляющие поправками. И если взять весь прошлый век, то осуждение во всей Европе, как и в Америке было намного больше. Но сейчас, таки да, существующие реалии подводят другие взгляды. И я не удивлюсь, если через пять лет начнут законы менять. Сегодняшняя жизнь диктует свои законы.

(P.S. Ещё одна точка зрения - не обессудьте).