// File: kernel.cpp
#include "loop_102.h"
#include <stdint.h>
#include <arm_sve.h>
#define restrict __restrict
#define SC_SVE_ATTR
#define FOR_COND(P, S, I, N) svptest_first(svptrue_b##S(), P = svwhilelt_b##S(I, N))
#define FOR_LOOP(T, I, M, N, P, S, W) for (T I = M; FOR_COND(P, S, I, N); I += svcnt##W())
#define FOR_LOOP_8(T, I, M, N, P)  FOR_LOOP(T, I, M, N, P, 8, b)
#define FOR_LOOP_16(T, I, M, N, P) FOR_LOOP(T, I, M, N, P, 16, h)
#define FOR_LOOP_32(T, I, M, N, P) FOR_LOOP(T, I, M, N, P, 32, w)
#define FOR_LOOP_64(T, I, M, N, P) FOR_LOOP(T, I, M, N, P, 64, d)
static inline uint32_t get_sve_vl(void) {
  uint64_t vl = 0; asm volatile("incb %[vl], all, mul #8" : [vl] "+r"(vl) : :);
  return (uint32_t)vl;
}
static inline uint32_t get_vl(void) { return get_sve_vl(); }

void NOINLINE update(uint32_t *histogram, uint32_t *records,
                            int64_t num_records) {
  svbool_t p;
  FOR_LOOP_32(int64_t, i, 0, num_records, p) {
    svuint32_t recs = svld1(p, records + i);
    svuint32_t hist = svld1_gather_index(p, histogram, recs);
    svuint32_t cnts = svhistcnt_z(p, recs, recs);
    hist = svadd_x(p, hist, cnts);
    svst1_scatter_index(p, histogram, recs, hist);
  }
}