Add a function to get inner-most optimizer

[odow]

Something we see frequently is people doing

model = Model(Clp.Optimizer)
glpk = backend(model).optimizer.model.optimizer

This touches internal fields, and prevents us from changing the layers between model and glpk (#2513).

We should add a function

function backend_optimizer(model::Model)

that retrieves the inner optimizer.