268 lines
9.2 KiB
C++
268 lines
9.2 KiB
C++
#include "common.h"
|
|
#include "llama.h"
|
|
#include "ggml.h"
|
|
|
|
#ifdef GGML_USE_CUDA
|
|
#include "ggml-cuda.h"
|
|
#endif
|
|
|
|
#ifdef GGML_USE_METAL
|
|
#include "ggml-metal.h"
|
|
#endif
|
|
|
|
#include <cstdio>
|
|
#include <string>
|
|
#include <tuple>
|
|
#include <vector>
|
|
#include <algorithm>
|
|
#include <iostream>
|
|
#include <fstream>
|
|
|
|
#define DEBUG_POS 5
|
|
|
|
static void print_debug_tensor(struct ggml_tensor * t) {
|
|
printf("%s: %s (%s): [%ld, %ld]\n", __func__, t->name, ggml_type_name(t->type), t->ne[0], t->ne[1]);
|
|
printf("%s: %s[0] = [", __func__, t->name);
|
|
for (size_t i = 0; i <= DEBUG_POS; i++) {
|
|
printf(" %f,", ggml_get_f32_nd(t, i, 0, 0, 0));
|
|
}
|
|
printf(" ... ]\n");
|
|
}
|
|
|
|
|
|
|
|
struct pca_model {
|
|
struct ggml_tensor * v_diff_original;
|
|
struct ggml_tensor * square;
|
|
struct ggml_tensor * square_transpose;
|
|
struct ggml_tensor * eigenvector;
|
|
|
|
ggml_backend_t backend = NULL;
|
|
ggml_backend_buffer_t buffer;
|
|
struct ggml_context * ctx;
|
|
};
|
|
|
|
void load_pca_model(pca_model & model, struct ggml_tensor * v_diff_original) {
|
|
#ifdef GGML_USE_CUDA
|
|
fprintf(stderr, "%s: using CUDA backend\n", __func__);
|
|
model.backend = ggml_backend_cuda_init(0); // init device 0
|
|
if (!model.backend) {
|
|
fprintf(stderr, "%s: ggml_backend_cuda_init() failed\n", __func__);
|
|
}
|
|
#endif
|
|
|
|
#ifdef GGML_USE_METAL
|
|
fprintf(stderr, "%s: using Metal backend\n", __func__);
|
|
ggml_backend_metal_log_set_callback(ggml_log_callback_default, nullptr);
|
|
model.backend = ggml_backend_metal_init();
|
|
if (!model.backend) {
|
|
fprintf(stderr, "%s: ggml_backend_metal_init() failed\n", __func__);
|
|
}
|
|
#endif
|
|
|
|
// if there aren't GPU Backends fallback to CPU backend
|
|
if (!model.backend) {
|
|
model.backend = ggml_backend_cpu_init();
|
|
}
|
|
|
|
//printf("v_diff_original[0][%d]: %f\n", DEBUG_POS, ggml_get_f32_nd(v_diff_original, 0, DEBUG_POS, 0, 0));
|
|
|
|
const int num_tensors = 4;
|
|
|
|
struct ggml_init_params params {
|
|
/*.mem_size =*/ ggml_tensor_overhead() * num_tensors,
|
|
/*.mem_buffer =*/ NULL,
|
|
/*.no_alloc =*/ true,
|
|
};
|
|
|
|
model.ctx = ggml_init(params);
|
|
|
|
model.v_diff_original = ggml_new_tensor_2d(model.ctx, GGML_TYPE_F32, v_diff_original->ne[0], v_diff_original->ne[1]);
|
|
model.square = ggml_new_tensor_2d(model.ctx, GGML_TYPE_F32, v_diff_original->ne[1], v_diff_original->ne[1]);
|
|
model.square_transpose = ggml_new_tensor_2d(model.ctx, GGML_TYPE_F32, v_diff_original->ne[1], v_diff_original->ne[1]);
|
|
model.eigenvector = ggml_new_tensor_1d(model.ctx, GGML_TYPE_F32, v_diff_original->ne[1]);
|
|
|
|
model.buffer = ggml_backend_alloc_ctx_tensors(model.ctx, model.backend);
|
|
|
|
ggml_backend_tensor_set(model.v_diff_original, v_diff_original->data, 0, ggml_nbytes(v_diff_original));
|
|
|
|
// no need to load anything into square or square_transpose yet
|
|
|
|
// initialize model.eigenvector to random vector
|
|
std::vector<float> random_vec;
|
|
std::default_random_engine generator(static_cast<unsigned int>(std::time(0)));
|
|
std::uniform_real_distribution<float> distribution(0.0, 1.0);
|
|
for (int i = 0; i < v_diff_original->ne[1]; ++i) {
|
|
random_vec.push_back(distribution(generator));
|
|
}
|
|
|
|
// we don't normalize it at first but that shouldn't be a problem
|
|
ggml_backend_tensor_set(model.eigenvector, random_vec.data(), 0, ggml_nbytes(model.eigenvector));
|
|
}
|
|
|
|
struct ggml_cgraph * square_diff_graph(const pca_model & model) {
|
|
static size_t buf_size = ggml_tensor_overhead() * GGML_DEFAULT_GRAPH_SIZE + ggml_graph_overhead();
|
|
static std::vector<uint8_t> buf(buf_size);
|
|
|
|
struct ggml_init_params params0 = {
|
|
/*.mem_size =*/ buf_size,
|
|
/*.mem_buffer =*/ buf.data(),
|
|
/*.no_alloc =*/ true, // the tensors will be allocated later by ggml_allocr_alloc_graph()
|
|
};
|
|
struct ggml_context * ctx0 = ggml_init(params0);
|
|
struct ggml_cgraph * gf = ggml_new_graph(ctx0);
|
|
|
|
struct ggml_tensor * square = ggml_mul_mat(ctx0, model.v_diff_original, model.v_diff_original);
|
|
//struct ggml_tensor * square_transpose = ggml_transpose(ctx0, square);
|
|
|
|
ggml_build_forward_expand(gf, square);
|
|
|
|
ggml_free(ctx0);
|
|
return gf;
|
|
}
|
|
|
|
struct ggml_tensor * compute_square(const pca_model & model, ggml_gallocr_t allocr, int n_threads) {
|
|
struct ggml_cgraph * gf = square_diff_graph(model);
|
|
|
|
ggml_gallocr_alloc_graph(allocr, gf);
|
|
|
|
if (ggml_backend_is_cpu(model.backend)) {
|
|
ggml_backend_cpu_set_n_threads(model.backend, n_threads);
|
|
}
|
|
|
|
#ifdef GGML_USE_METAL
|
|
if (ggml_backend_is_metal(model.backend)) {
|
|
ggml_backend_metal_set_n_cb(model.backend, n_threads);
|
|
}
|
|
#endif
|
|
|
|
ggml_backend_graph_compute(model.backend, gf);
|
|
|
|
return gf->nodes[gf->n_nodes - 1];
|
|
}
|
|
|
|
struct ggml_cgraph * power_iteration_graph(const pca_model & model, float tolerance) {
|
|
static size_t buf_size = ggml_tensor_overhead() * GGML_DEFAULT_GRAPH_SIZE + ggml_graph_overhead();
|
|
static std::vector<uint8_t> buf(buf_size);
|
|
|
|
struct ggml_init_params params0 = {
|
|
/*.mem_size =*/ buf_size,
|
|
/*.mem_buffer =*/ buf.data(),
|
|
/*.no_alloc =*/ true, // the tensors will be allocated later by ggml_allocr_alloc_graph()
|
|
};
|
|
struct ggml_context * ctx0 = ggml_init(params0);
|
|
struct ggml_cgraph * gf = ggml_new_graph(ctx0);
|
|
|
|
struct ggml_tensor * b_tensor = ggml_mul_mat(ctx0, model.square, model.eigenvector);
|
|
// TODO difference between ggml_norm and ggml_norm_inplace?
|
|
// also is this the right way to do multi-step graphs?
|
|
b_tensor = ggml_norm_inplace(ctx0, b_tensor, tolerance);
|
|
|
|
ggml_build_forward_expand(gf, b_tensor);
|
|
|
|
ggml_free(ctx0);
|
|
return gf;
|
|
}
|
|
|
|
struct ggml_tensor * compute_piter(const pca_model & model, ggml_gallocr_t allocr, int n_threads, float tolerance) {
|
|
struct ggml_cgraph * gf = power_iteration_graph(model, tolerance);
|
|
|
|
ggml_gallocr_alloc_graph(allocr, gf);
|
|
|
|
if (ggml_backend_is_cpu(model.backend)) {
|
|
ggml_backend_cpu_set_n_threads(model.backend, n_threads);
|
|
}
|
|
|
|
#ifdef GGML_USE_METAL
|
|
if (ggml_backend_is_metal(model.backend)) {
|
|
ggml_backend_metal_set_n_cb(model.backend, n_threads);
|
|
}
|
|
#endif
|
|
|
|
ggml_backend_graph_compute(model.backend, gf);
|
|
|
|
return gf->nodes[gf->n_nodes - 1];
|
|
}
|
|
|
|
static void power_iteration(struct ggml_tensor * input, struct ggml_tensor * output, int n_threads, int maxIterations = 1000, float tolerance = 1e-7) {
|
|
printf("in power iteration\n");
|
|
int n_embd = input->ne[0];// shape of input: [n_embd, m]
|
|
|
|
pca_model model;
|
|
load_pca_model(model, input);
|
|
|
|
ggml_gallocr_t allocr = ggml_gallocr_new(ggml_backend_get_default_buffer_type(model.backend));
|
|
|
|
struct ggml_tensor * square = compute_square(model, allocr, n_threads);
|
|
ggml_backend_tensor_set(model.square, square->data, 0, ggml_nbytes(model.square));
|
|
|
|
ggml_gallocr_free(allocr);
|
|
|
|
struct ggml_init_params host_params = {
|
|
/*.mem_size =*/ (n_embd * sizeof(float) + ggml_tensor_overhead()) * 2u,
|
|
/*.mem_buffer =*/ NULL,
|
|
/*.no_alloc =*/ false,
|
|
};
|
|
struct ggml_context * host_ctx = ggml_init(host_params);
|
|
|
|
struct ggml_tensor * host_old_eigenvector = ggml_new_tensor_1d(host_ctx, GGML_TYPE_F32, n_embd);
|
|
struct ggml_tensor * host_new_eigenvector = ggml_new_tensor_1d(host_ctx, GGML_TYPE_F32, n_embd);
|
|
|
|
for (int iter = 0; iter < maxIterations; ++iter) {
|
|
|
|
// TODO do I need to reset it like this every time?
|
|
allocr = ggml_gallocr_new(ggml_backend_get_default_buffer_type(model.backend));
|
|
|
|
struct ggml_tensor * b_tensor = compute_piter(model, allocr, n_threads, tolerance);
|
|
|
|
ggml_backend_tensor_get(b_tensor, host_new_eigenvector->data, 0, ggml_nbytes(b_tensor));
|
|
ggml_backend_tensor_get(model.eigenvector, host_old_eigenvector->data, 0, ggml_nbytes(model.eigenvector));
|
|
|
|
// convergence check
|
|
float diff = 0.0;
|
|
for (int i = 0; i < n_embd; ++i) {
|
|
diff += std::pow((ggml_get_f32_1d(host_new_eigenvector, i) - ggml_get_f32_1d(host_old_eigenvector, i)), 2);
|
|
}
|
|
|
|
// update eigenvector
|
|
ggml_backend_tensor_set(model.eigenvector, host_new_eigenvector->data, 0, ggml_nbytes(model.eigenvector));
|
|
|
|
try {
|
|
if (std::sqrt(diff) < tolerance) {
|
|
break;
|
|
}
|
|
}
|
|
catch (std::exception & e) {
|
|
// catch division by zero I guess
|
|
break;
|
|
}
|
|
}
|
|
|
|
ggml_backend_tensor_get(model.eigenvector, output->data, 0, ggml_nbytes(model.eigenvector));
|
|
|
|
ggml_gallocr_free(allocr);
|
|
ggml_free(host_ctx);
|
|
ggml_free(model.ctx);
|
|
ggml_backend_buffer_free(model.buffer);
|
|
ggml_backend_free(model.backend);
|
|
}
|
|
|
|
static void pca(
|
|
const std::vector<struct ggml_tensor *> & v_input,
|
|
const std::vector<struct ggml_tensor *> & v_output) {
|
|
printf("Running PCA...\n");
|
|
int n_embd = v_input[0]->ne[0]; // shape of v_input[0]: [n_embd, m]
|
|
int n_threads = 8; // TODO: change me
|
|
for (size_t il = 0; il < v_input.size(); ++il) {
|
|
// prepare output vector
|
|
struct ggml_tensor * ctrl_out = v_output[il];
|
|
auto name = std::string("direction.") + std::to_string(il + 1);
|
|
ggml_set_name(ctrl_out, name.c_str());
|
|
// run power_iteration
|
|
power_iteration(v_input[il], ctrl_out, n_threads);
|
|
printf("Done with layer %d\n", il);
|
|
print_debug_tensor(ctrl_out);
|
|
}
|
|
printf("Done with PCA.\n");
|
|
}
|