reasissgn silverstripe classname

ApiReassignClassName.php

<?php

use SilverStripe\CMS\Model\SiteTree;
use SilverStripe\ORM\DB;
use SilverStripe\Versioned\Versioned;

class ApiReassignClassName {

    protected function setNewClassNameForPage(SiteTree $record, string $newValue, int $id, ?bool $forceInsert = false)
    {
        $isPublished = $record->isPublished();
        $isModifiedOnDraft = $record->isModifiedOnDraft();
        $doPublish = $isPublished && !$isModifiedOnDraft;
        $record = $record->newClassInstance($newValue);
        $record->writeToStage(Versioned::DRAFT);
        if ($doPublish) {
            $record->publishRecursive();
        }
        foreach (['', '_Live'] as $suffix) { // also '_Versions'???
            $idField = $suffix === '_Versions' ? 'RecordID' : 'ID';
            $tableName = 'SiteTree' . $suffix;
            if ($forceInsert) {
                $sql = '
                INSERT INTO "'.$tableName.'" ("'.$idField.'", "ClassName")
                VALUES ('.$id.', \''.addslashes($newValue).'\')
                ON DUPLICATE KEY UPDATE "ClassName" = \''.addslashes($newValue).'\'';
            } else {
                $sql = 'UPDATE "'.$tableName.'" SET "ClassName" = \''.addslashes($newValue).'\' WHERE "'.$idField.'" = '.$id;
            }
            DB::query($sql);
        }
    }
}