Detect IPv6 clusters and apply correct policy

Dual stack load balancers in Kubernetes _must_ specify an IP family
policy, or else it will be set to `SingleStack`. On AWS, IPv6 single
stack is not supported, so update the test to reflect the new setting.

Signed-off-by: Nolan Brubaker <nolan@nbrubaker.com>
Assisted-By: Claude Sonnet 4.6
Signed-off-by: Nolan Brubaker <nolan@nbrubaker.com>

Author: nrb

test/extended/cloud_controller_manager/ccm.go

@@ -99,12 +99,36 @@ var _ = g.Describe("[sig-cloud-provider][Feature:OpenShiftCloudControllerManager
 			g.Skip("Skipped: There is no public subnet on AWS C2S/SC2S disconnected clusters!")
 		}
 
+		infra, err := oc.AdminConfigClient().ConfigV1().Infrastructures().Get(context.Background(), "cluster", metav1.GetOptions{})
+		o.Expect(err).NotTo(o.HaveOccurred())
+
+		isIPv6Primary := infra.Status.PlatformStatus.AWS != nil &&
+			infra.Status.PlatformStatus.AWS.IPFamily == configv1.DualStackIPv6Primary
+
 		g.By("Create a cluster scope load balancer")
 		svcName := "test-lb"
-		defer oc.WithoutNamespace().AsAdmin().Run("delete").Args("-n", oc.Namespace(), "service", "loadbalancer", svcName, "--ignore-not-found").Execute()
-		out, err := oc.AsAdmin().WithoutNamespace().Run("create").Args("-n", oc.Namespace(), "service", "loadbalancer", svcName, "--tcp=80:8080").Output()
-		o.Expect(err).NotTo(o.HaveOccurred(), "failed to create lb service")
-		o.Expect(out).To(o.ContainSubstring("service/" + svcName + " created"))
+		defer oc.WithoutNamespace().AsAdmin().Run("delete").Args("service", fmt.Sprintf("%s/%s", oc.Namespace(), svcName), "--ignore-not-found").Execute()
+		if isIPv6Primary {
+			svcYAML := fmt.Sprintf(`apiVersion: v1
+kind: Service
+metadata:
+  name: %s
+  namespace: %s
+spec:
+  type: LoadBalancer
+  ipFamilyPolicy: PreferDualStack
+  ports:
+  - port: 80
+    targetPort: 8080
+    protocol: TCP
+`, svcName, oc.Namespace())
+			err = oc.AsAdmin().WithoutNamespace().Run("create").Args("-f", "-").InputString(svcYAML).Execute()
+			o.Expect(err).NotTo(o.HaveOccurred(), "failed to create lb service")
+		} else {
+			out, err := oc.AsAdmin().WithoutNamespace().Run("create").Args("-n", oc.Namespace(), "service", "loadbalancer", svcName, "--tcp=80:8080").Output()
+			o.Expect(err).NotTo(o.HaveOccurred(), "failed to create lb service")
+			o.Expect(out).To(o.ContainSubstring("service/" + svcName + " created"))
+		}
 
 		g.By("Check External-IP assigned")
 		svcExternalIP := getLoadBalancerExternalIP(oc, oc.Namespace(), svcName)