A direct likelihood approach to principal stratification analysis. Mimeo