send-gift: permitir pagar con PV (puntos de voto), más caro que PD

Solo en /send-gift se añade una 4ª forma de pago: PV (vote points, gratis por
votar). Cuesta más que PD para preservar su valor: coste_PV = coste_PD ×
VP_PRICE_FACTOR (=2, configurable en lib/pay-with-dpoints).

- lib/dpoints: getVPointsBalance, creditVPoints y spendVPoints (débito atómico
  del campo vp, con FOR UPDATE), espejo de las de PD.
- lib/pay-with-dpoints: VP_PRICE_FACTOR, vpointsCost() y payServiceWithVPoints()
  (descuenta PV, ejecuta el envío y reembolsa si falla).
- gift/checkout: rama provider='vp' (además de 'pd').
- service-success: la entrega inmediata cubre 'pd' y 'vp'.
- PaymentMethodSelect: opción VP opcional (solo si el form pasa vpBalance);
  muestra coste en PV, insuficiencia y el saldo VP.
- SendGiftForm + página: pasan el saldo VP.
- i18n Pay: vp, vpCost, insufficientVp, balanceVp, errors.insufficientVp (es/en).

Co-Authored-By: Claude Opus 4.8 (1M context) <noreply@anthropic.com>

web-next/lib/dpoints.ts

@@ -40,6 +40,73 @@ export async function getDPointsBalance(accountId: number): Promise<number> {
   }
 }
 
+/** Saldo de PV (vote points, ganados al votar) de una cuenta. 0 si no tiene fila. */
+export async function getVPointsBalance(accountId: number): Promise<number> {
+  if (!accountId) return 0
+  try {
+    const [rows] = await db(DB.default).query<RowDataPacket[]>(
+      'SELECT vp FROM home_api_points WHERE accountID = ?',
+      [accountId],
+    )
+    return rows[0] ? Number(rows[0].vp) : 0
+  } catch {
+    return 0
+  }
+}
+
+/** Acredita PV (vote points) a una cuenta (upsert). Se usa para reembolsos. */
+export async function creditVPoints(accountId: number, points: number): Promise<boolean> {
+  if (!accountId || !(points > 0)) return false
+  try {
+    await db(DB.default).query(
+      'INSERT INTO home_api_points (accountID, vp, dp) VALUES (?, ?, 0) ON DUPLICATE KEY UPDATE vp = vp + ?',
+      [accountId, points, points],
+    )
+    return true
+  } catch {
+    return false
+  }
+}
+
+/**
+ * Descuenta `points` PV del saldo de una cuenta de forma atómica (bloqueo de
+ * fila). Devuelve `insufficientFunds` si no hay saldo suficiente. Si la acción
+ * posterior falla, reembolsa con `creditVPoints`.
+ */
+export async function spendVPoints(
+  accountId: number,
+  points: number,
+): Promise<{ success: boolean; error?: string }> {
+  if (!accountId || !Number.isInteger(points) || points <= 0) {
+    return { success: false, error: 'invalidRequest' }
+  }
+  const conn = await db(DB.default).getConnection()
+  try {
+    await conn.beginTransaction()
+    const [src] = await conn.query<RowDataPacket[]>(
+      'SELECT vp FROM home_api_points WHERE accountID = ? FOR UPDATE',
+      [accountId],
+    )
+    const balance = src[0] ? Number(src[0].vp) : 0
+    if (balance < points) {
+      await conn.rollback()
+      return { success: false, error: 'insufficientFunds' }
+    }
+    await conn.query('UPDATE home_api_points SET vp = vp - ? WHERE accountID = ?', [points, accountId])
+    await conn.commit()
+    return { success: true }
+  } catch {
+    try {
+      await conn.rollback()
+    } catch {
+      /* ignore */
+    }
+    return { success: false, error: 'genericError' }
+  } finally {
+    conn.release()
+  }
+}
+
 /**
  * Transfiere `points` PD desde una cuenta de origen a una de destino de forma
  * atómica (transacción con bloqueo de fila del origen). Es irreversible.

web-next/lib/pay-with-dpoints.ts

@@ -1,10 +1,21 @@
-import { spendDPoints, creditDPoints, PD_PER_UNIT } from './dpoints'
+import { spendDPoints, creditDPoints, spendVPoints, creditVPoints, PD_PER_UNIT } from './dpoints'
+
+/**
+ * Los PV (vote points) son gratis (se ganan votando), así que pagar con PV es
+ * más caro que con PD: cuesta este factor por el coste en PD. Cambiar aquí.
+ */
+export const VP_PRICE_FACTOR = 2
 
 /** Coste en PD de un precio en euros (100 PD = 1 €). */
 export function dpointsCost(priceEur: number): number {
   return Math.round(priceEur * PD_PER_UNIT)
 }
 
+/** Coste en PV de un precio en euros (coste PD × VP_PRICE_FACTOR). */
+export function vpointsCost(priceEur: number): number {
+  return dpointsCost(priceEur) * VP_PRICE_FACTOR
+}
+
 /**
  * Paga un servicio con el saldo PD: descuenta el coste de forma atómica y
  * ejecuta la acción al momento (sin pasarela). Si la ejecución falla, reembolsa
@@ -33,3 +44,32 @@ export async function payServiceWithDPoints(
   }
   return { success: true }
 }
+
+/**
+ * Paga un servicio con el saldo PV: descuenta el coste (más caro que en PD) y
+ * ejecuta la acción al momento. Reembolsa si falla. Devuelve `insufficientVp`
+ * si no hay saldo suficiente.
+ */
+export async function payServiceWithVPoints(
+  accountId: number,
+  priceEur: number,
+  fulfill: () => Promise<boolean>,
+): Promise<{ success: boolean; error?: string }> {
+  const cost = vpointsCost(priceEur)
+  if (!(cost > 0)) return { success: false, error: 'invalidRequest' }
+  const spent = await spendVPoints(accountId, cost)
+  if (!spent.success) {
+    return { success: false, error: spent.error === 'insufficientFunds' ? 'insufficientVp' : 'genericError' }
+  }
+  let ok = false
+  try {
+    ok = await fulfill()
+  } catch {
+    ok = false
+  }
+  if (!ok) {
+    await creditVPoints(accountId, cost) // reembolso si no se pudo ejecutar
+    return { success: false, error: 'fulfillFailed' }
+  }
+  return { success: true }
+}