Take a look at Paul Falstad's amazing applets:
There is a wave guide applet that may do what you want to simulate.
I am also working on an FDTD solver for photonics, including optic fibers. I will keep you posted when I have something. It may take me a long time to get there because I do not have much time for doing it.