/********************** select random *********************/

static void curve_select_random(ListBase *editnurb, float randfac, int seed, bool select)
{
  LISTBASE_FOREACH (Nurb *, nu, editnurb) {
    if (nu->type == CU_BEZIER) {
      int tot = nu->pntsu;
      int elem_map_len = 0;
      BezTriple **elem_map = MEM_mallocN(sizeof(*elem_map) * tot, __func__);
      BezTriple *bezt = nu->bezt;

      while (tot--) {
        if (!bezt->hide) {
          elem_map[elem_map_len++] = bezt;
        }
        bezt++;
      }

      BLI_array_randomize(elem_map, sizeof(*elem_map), elem_map_len, seed);
      const int count_select = elem_map_len * randfac;
      for (int i = 0; i < count_select; i++) {
        select_beztriple(elem_map[i], select, SELECT, VISIBLE);
      }
      MEM_freeN(elem_map);
    }
    else {
      int tot = nu->pntsu * nu->pntsv;
      int elem_map_len = 0;
      BPoint **elem_map = MEM_mallocN(sizeof(*elem_map) * tot, __func__);
      BPoint *bp = nu->bp;

      while (tot--) {
        if (!bp->hide) {
          elem_map[elem_map_len++] = bp;
        }
        bp++;
      }

      BLI_array_randomize(elem_map, sizeof(*elem_map), elem_map_len, seed);
      const int count_select = elem_map_len * randfac;
      for (int i = 0; i < count_select; i++) {
        select_bpoint(elem_map[i], select, SELECT, VISIBLE);
      }
      MEM_freeN(elem_map);
    }
  }
}

static int curve_select_random_exec(bContext *C, wmOperator *op)
{
  const bool select = (RNA_enum_get(op->ptr, "action") == SEL_SELECT);
  const float randfac = RNA_float_get(op->ptr, "ratio");
  const int seed = WM_operator_properties_select_random_seed_increment_get(op);

  ViewLayer *view_layer = CTX_data_view_layer(C);
  uint objects_len = 0;
  Object **objects = BKE_view_layer_array_from_objects_in_edit_mode_unique_data(
      view_layer, CTX_wm_view3d(C), &objects_len);

  for (uint ob_index = 0; ob_index < objects_len; ob_index++) {
    Object *obedit = objects[ob_index];
    ListBase *editnurb = object_editcurve_get(obedit);
    int seed_iter = seed;

    /* This gives a consistent result regardless of object order. */
    if (ob_index) {
      seed_iter += BLI_ghashutil_strhash_p(obedit->id.name);
    }

    curve_select_random(editnurb, randfac, seed_iter, select);
    BKE_curve_nurb_vert_active_validate(obedit->data);
    DEG_id_tag_update(obedit->data, ID_RECALC_SELECT);
    WM_event_add_notifier(C, NC_GEOM | ND_SELECT, obedit->data);
  }