Ab initio calculation of second-harmonic-generation at the Si(100) surface