Force Log[1] to be simplified to zero

Questions
1

If I try to simplify various Log[1] expressions, such as

FullSimplify[Log[Sqrt[3-2Sqrt[2]](1+Sqrt[2])]]

I get

ArcSinh[1] + 1/2 Log[3 - 2 Sqrt[2]]

etc. How can I force such expressions to be simplified to zero? Using Mathematica 12.1 (Windows).

2

FullSimplify understands how to reduce the root:

FullSimplify[Sqrt[3 - 2 Sqrt[2]] (1 + Sqrt[2])]
(* 1 *)

However, it apparently starts down a different path and never tries this. Reduce the root first, and then simplify:

FullSimplify[RootReduce[Log[Sqrt[3 - 2 Sqrt[2]] (1 + Sqrt[2])]]]
(* 0 *)