generate ultrametric trees

[Juan]

Does anyone knows if there is a program that generate random
ultrametric trees using the a constrained topology? In other words, is
there a way to randomize branch lengths in a topology?

Thanks