Помогите пожалуйста написать функцию substr_replace не используя встроенные функции

Я смог написать ее только использую встр. функции. Но она работает не точь в точь как в мануале и после выяснилось, что нельзя использовать встр. функции.
function sub ($i, $slovo, $ot, $do = null) {
$y= [];
$r = count ($i);
if ($r == 1){
if ($do === null) {
$do = strlen($i);
$b = str_split ($i);
array_splice ($b, $ot, $do, $slovo);
$t = implode ($b);
} else {
$b = str_split ($i);
array_splice ($b, $ot, $do, $slovo);
$t = implode ($b);
}
return $t;
} else {
foreach ($i as $value){
if ($do === null) {
$do = strlen($value);
$b = str_split ($value);
array_splice ($b, $ot, $do, $slovo);
$t = implode ($b);
$y [] = $t;
} else {
$b = str_split ($value);
$t = array_splice ($b, $ot, $do, $slovo);
$t = implode ($b);
$y [] = $t;
}
return $y;
}
}
}