Roger Federer remains cautious about his Australian Open hopes despite a convincing first-round win over Steve Johnson.

The 20-time grand slam champion had not played a competitive match since the ATP Finals in November and spoke ahead of the tournament about his concerns that he might be rusty.

There was little evidence of that as he breezed past American Johnson under the Rod Laver Arena roof, winning 6-3 6-2 6-2 in just an hour and 21 minutes.

The first big shock came with a 6-3 6-7 (7) 6-1 7-6 (3) loss for 13th seed Denis Shapovalov against Hungary's Marton Fucsovics.

Shapovalov cut a frustrated figure throughout and was furious with umpire Renaud Lichtenstein for giving him a code violation for throwing, but not breaking, his racket.

The young Canadian, who has been tipped to break into the top 10 this season, said: "I think I played really nervous today.

"I was in really good shape, really good conditions going into the tournament. But I just played really tight.

"Obviously I feel like my game is there to beat any of the top guys, but of course there are so many great players out there. If I'm a little bit off, if I'm a little bit nervous, anyone could beat me as well.

"It's a really disappointing one, but there's nothing to do now except learn from it."

Eighth seed Matteo Berrettini eased to a 6-3 6-1 6-3 victory over wild card Andrew Harris, while Grigor Dimitrov recovered from a set down to defeat Juan Ignacio Londero.

But 25th seed Borna Coric was a first-round casualty, losing 6-3 6-4 6-4 to American Sam Querrey.