Use the below API to set port media type to EthernetFiber.
set ethernetFiber [stc::create EthernetFiber \
-under $port1 ]