A man was critically injured when he was attacked by a shark while spear fishing on Australia's Great Barrier Reef, an official said.