Petrogenesis of Granites and Pegmatites