Density-functional simulations of lithium intercalation in rutile