summaryrefslogtreecommitdiffstats
path: root/main.c
blob: 473e556089cf666f13f70ead475a5a7c547c2b2d (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
// main.c - Moving average calculator using ts library
// Computes a simple moving average over configurable period and displays results.

#include <errno.h>
#include <inttypes.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>

#define TS_IMPLEMENTATION
#include "ts.h"

#define BUFFER_SIZE 100
#define DISPLAY_N 20

static void usage(const char *prog)
{
    fprintf(stderr, "Usage: %s [period]\n", prog);
    fprintf(stderr, "  period: moving average window (1-%d, default: 10)\n", BUFFER_SIZE);
}

int main(int argc, char *argv[]) {
    uint_t period = 10;
    if (argc > 1 && (strcmp(argv[1], "-h") == 0 || strcmp(argv[1], "--help") == 0)) {
        usage(argv[0]);
        return 0;
    }
    if (argc > 1) {
        char *endptr = NULL;
        errno = 0;
        long val = strtol(argv[1], &endptr, 10);
        if (endptr == argv[1] || *endptr != '\0' || errno == ERANGE) {
            fprintf(stderr, "Error: invalid period '%s'\n", argv[1]);
            usage(argv[0]);
            return 1;
        }
        if (val < 1 || val > BUFFER_SIZE) {
            fprintf(stderr, "Error: period must be between 1 and %d\n", BUFFER_SIZE);
            usage(argv[0]);
            return 1;
        }
        period = (uint_t)val;
    }
    fp_t input[BUFFER_SIZE];
    fp_t output[BUFFER_SIZE];

    if (!ts_fill(input, BUFFER_SIZE, 0, (fp_t)BUFFER_SIZE)) {
        fprintf(stderr, "ts_fill failed\n");
        return 1;
    }

    fp_t * const y[1] = { output };
    fp_t const * const x[1] = { input };

    ts_constant_t c;
    memset(&c, 0, sizeof(c));
    memcpy(c.data, &period, sizeof(period));
    int ret = ts_average(y, 1, x, 1, BUFFER_SIZE, &c);
    if (ret == -1) {
        fprintf(stderr, "ts_average failed\n");
        return 1;
    }

    /* First valid SMA value is at index period-1 */
    uint_t offset = period - 1;

    /* Clamp display range to valid output */
    uint_t display_end = DISPLAY_N < BUFFER_SIZE ? DISPLAY_N : BUFFER_SIZE;
    if (offset >= display_end) {
        fprintf(stderr, "warning: period (%" TS_PRIuint ") >= display count (%" TS_PRIuint "), showing available data\n", period, display_end);
        display_end = BUFFER_SIZE;
    }

    for (uint_t i = offset; i < display_end; i++) {
        printf("input[%" TS_PRIuint "] = %" TS_PRIfp "  SMA[%" TS_PRIuint "] = %" TS_PRIfp "\n", i, input[i], i, output[i]);
    }

    return 0;
}