[FIR] Use isSubtypeOfClass with platform types mapping instead of isSubtypeOf during checking CAST_NEVER_SUCCEEDS

Refactor and generalize code

^KT-62783 Fixed

compiler/testData/diagnostics/tests/cast/neverSucceeds/NullableExprToItsNonNullableGenericBaseClass.fir.kt

@@ -0,0 +1,19 @@
+// ISSUE: KT-62783
+
+abstract class Foo<T>
+
+class FooBar : Foo<Any>()
+
+fun test1(value: FooBar) {
+    value as Foo<*>
+    value as? Foo<*>
+    value as Foo<*>?
+    value as? Foo<*>?
+}
+
+fun test2(value: FooBar?) {
+    value as Foo<*>
+    value as? Foo<*>
+    value as Foo<*>?
+    value as? Foo<*>?
+}

compiler/testData/diagnostics/tests/cast/neverSucceeds/NullableExprToItsNonNullableGenericBaseClass.kt

@@ -0,0 +1,19 @@
+// ISSUE: KT-62783
+
+abstract class Foo<T>
+
+class FooBar : Foo<Any>()
+
+fun test1(value: FooBar) {
+    value <!USELESS_CAST!>as Foo<*><!>
+    value <!USELESS_CAST!>as? Foo<*><!>
+    value <!USELESS_CAST!>as Foo<*>?<!>
+    value <!USELESS_CAST!>as? Foo<*>?<!>
+}
+
+fun test2(value: FooBar?) {
+    value as Foo<*>
+    value <!USELESS_CAST!>as? Foo<*><!>
+    value <!USELESS_CAST!>as Foo<*>?<!>
+    value <!USELESS_CAST!>as? Foo<*>?<!>
+}