Bonding in the diruthenium molecule by ab initio calculations