fix(rooms): a fleet room is found by the name clients show, and a box is named by its pinned card

POST /box matched the fleet's model by exact string, but GET /location lists
the same models to clients and nesktop shows them without the vendor
("Radeon RX 9060 XT"), so every fleet room it asked for was refused as none
free. Models now match with or without the vendor, in placement and in the
checkout's GPU too.

A listed box's gpu was its host's first card, so a second room on a
multi-GPU host was named after the first. It is the card the box is pinned
to.

packages/core/src/billing/checkout-room.ts

@@ -32,7 +32,7 @@ export namespace CheckoutRoom {
 
 	/** Refuse a model the fleet does not have. */
 	export async function assertKnown(model: string): Promise<void> {
-		if (!(await knownModels()).includes(model)) {
+		if (!(await knownModels()).some((m) => Rooms.sameModel(m, model))) {
 			throw new VisibleError(
 				'validation',
 				ErrorCodes.Validation.INVALID_PARAMETER,
@@ -54,9 +54,10 @@ export namespace CheckoutRoom {
 		cards: readonly Placement.Card[]
 	): { model: string; substituted: boolean } | null {
 		const free = cards.filter((c) => c.free);
-		if (free.some((c) => c.model === requested)) return { model: requested, substituted: false };
+		const exact = free.find((c) => Rooms.sameModel(c.model, requested));
+		if (exact) return { model: exact.model, substituted: false };
 		if (free.length === 0) return null;
-		const wanted = cards.find((c) => c.model === requested);
+		const wanted = cards.find((c) => Rooms.sameModel(c.model, requested));
 		const wantedVendor = wanted ? vendor(wanted.pciId) : '';
 		const wantedVram = wanted?.vramMib ?? 0;
 		const rank = (c: Placement.Card) => [

packages/core/src/billing/rooms.ts

@@ -32,6 +32,24 @@ export namespace Rooms {
 		return entryModels().some((m) => name.includes(m.toLowerCase()));
 	}
 
+	/**
+	 * A card's name without the vendor: clients show `RTX 3060` and
+	 * `Radeon RX 9060 XT`, hosts report `NVIDIA GeForce RTX 3060` and
+	 * `AMD Radeon RX 9060 XT`.
+	 */
+	export function bareModel(model: string): string {
+		let m = model.trim();
+		for (const prefix of ['NVIDIA ', 'GeForce ', 'AMD ', 'Intel(R) ', 'Intel ']) {
+			if (m.toLowerCase().startsWith(prefix.toLowerCase())) m = m.slice(prefix.length);
+		}
+		return m.toLowerCase();
+	}
+
+	/** Whether two names are one card, with or without the vendor. */
+	export function sameModel(a: string, b: string): boolean {
+		return bareModel(a) === bareModel(b);
+	}
+
 	export function isPro(plan: string | null | undefined): boolean {
 		return plan === 'paid';
 	}

packages/core/src/box/index.ts

@@ -177,7 +177,7 @@ export namespace Box {
 				.orderBy(BoxTable.timeCreated)
 				.then((rows) =>
 					rows.map((r) =>
-						serialize(r.box, Machine.gpuName(r.gpus), {
+						serialize(r.box, Machine.pinnedName(r.gpus, r.box), {
 							host: r.host,
 							fleet: r.organisationId !== null
 						})

packages/core/src/box/placement.ts

@@ -338,7 +338,9 @@ export namespace Placement {
 	export const onFleetModel =
 		(model: string): Placer =>
 		async () => {
-			const free = (await lockedFreeCards(fleetOrganisation())).filter((c) => c.model === model);
+			const free = (await lockedFreeCards(fleetOrganisation())).filter((c) =>
+				Rooms.sameModel(c.model, model)
+			);
 			if (free.length === 0) {
 				throw new VisibleError(
 					'rate_limit',

packages/core/src/machine/index.ts

@@ -85,6 +85,20 @@ export namespace Machine {
 		return gpus?.[0]?.model ?? null;
 	}
 
+	/**
+	 * The card a box is pinned to, by its slot, else its PCI id; the host's
+	 * first card for a box that names none.
+	 */
+	export function pinnedName(
+		gpus: readonly { model: string; pciId: string; slot?: string }[] | null | undefined,
+		pin: { gpuPciId?: string | null; gpuSlot?: string | null }
+	): string | null {
+		const card =
+			(pin.gpuSlot ? gpus?.find((g) => g.slot === pin.gpuSlot) : undefined) ??
+			(pin.gpuPciId ? gpus?.find((g) => g.pciId === pin.gpuPciId) : undefined);
+		return card?.model ?? gpuName(gpus);
+	}
+
 	export const Info = z
 		.object({
 			id: z.string().meta({