/* Dump COMPLETE frames: 28B header + full data read, byte-exact. */
#include <stdio.h>
#include <stdint.h>
#include <string.h>
#include <windows.h>
#include <libusb.h>

static libusb_context *g_ctx;
static libusb_device_handle *g_h;

static int sendcmd(unsigned magic, unsigned param, int len) {
    unsigned char cmd[8] = {0};
    cmd[0] = (unsigned char)(magic);
    cmd[1] = (unsigned char)(magic >> 8);
    cmd[2] = (unsigned char)(magic >> 16);
    cmd[3] = (unsigned char)(magic >> 24);
    if (len >= 8) {
        cmd[4] = (unsigned char)(param);
        cmd[5] = (unsigned char)(param >> 8);
        cmd[6] = (unsigned char)(param >> 16);
        cmd[7] = (unsigned char)(param >> 24);
    }
    int xfer = 0;
    if (libusb_bulk_transfer(g_h, 0x03, cmd, len, &xfer, 2000)) return -1;
    unsigned char resp[0x1000];
    if (libusb_bulk_transfer(g_h, 0x82, resp, sizeof(resp), &xfer, 2000)) return -1;
    return 0;
}

int main(int argc, char **argv) {
    int nframes = argc > 1 ? atoi(argv[1]) : 10;
    const char *dir = argc > 2 ? argv[2] : ".";
    if (libusb_init(&g_ctx)) return 1;
    libusb_device **list = NULL;
    ssize_t cnt = libusb_get_device_list(g_ctx, &list);
    for (ssize_t i = 0; i < cnt && !g_h; ++i) {
        struct libusb_device_descriptor d;
        libusb_get_device_descriptor(list[i], &d);
        if (d.idVendor == 0x833c) libusb_open(list[i], &g_h);
    }
    libusb_free_device_list(list, 1);
    if (!g_h) { printf("no device\n"); return 1; }
    libusb_set_configuration(g_h, 2);
    libusb_set_configuration(g_h, 1);
    libusb_claim_interface(g_h, 0);
    sendcmd(0x6bb6b66b, 0, 4);
    sendcmd(0x6bb6b66c, 0, 4);
    sendcmd(0x6bb6b66f, 0, 4);
    sendcmd(0x6bb6b672, 0, 8);
    Sleep(100);
    sendcmd(0x6bb6b672, 0, 8);
    Sleep(300);
    sendcmd(0x6bb6b673, 0, 4);
    Sleep(700);

    unsigned char hdr[64];
    unsigned char buf[40000];
    unsigned prev = 0xffffffff;
    int frames = 0, ffc_done = 0;

    while (frames < nframes) {
        int xfer = 0;
        if (libusb_bulk_transfer(g_h, 0x81, hdr, sizeof(hdr), &xfer, 500) || xfer < 28) { Sleep(10); continue; }
        unsigned c = (unsigned)hdr[4] | ((unsigned)hdr[5] << 8) |
                     ((unsigned)hdr[6] << 16) | ((unsigned)hdr[7] << 24);
        if (c == prev) continue;
        prev = c;
        xfer = 0;
        if (libusb_bulk_transfer(g_h, 0x81, buf, sizeof(buf), &xfer, 500) || xfer < 38400) { Sleep(10); continue; }
        frames++;
        if (!ffc_done && frames == 3) { sendcmd(0x6bb6b672, 1, 8); ffc_done = 1; Sleep(200); }
        /* save full frame: header (28) + data (xfer) */
        char path[512];
        snprintf(path, sizeof(path), "%s/raw%03d.bin", dir, frames);
        FILE *f = fopen(path, "wb");
        if (f) {
            fwrite(hdr, 1, 28, f);
            fwrite(buf, 1, xfer, f);
            fclose(f);
        }
    }
    printf("saved %d full frames to %s\n", frames, dir);
    Sleep(300);
    libusb_clear_halt(g_h, 0x03);
    libusb_clear_halt(g_h, 0x82);
    sendcmd(0x6bb6b674, 0, 4);
    libusb_close(g_h);
    libusb_exit(g_ctx);
    return 0;
}