Fitting models in R with time restriction on coefficients

How should I define a model formula in "R", when one (or more) exact linear restrictions binding the coefficients is available.

Equation: y = b1*x1 + b2*x1

where y = b1*x1 for t < t1 and y = b2*x1 for t > t1

Thank You..!