#include <stdio.h>
#include <stdlib.h>
#include <math.h>
#include <portaudio.h>
#include <time.h>
 
#define SAMPLE_RATE 44100     // Fréquence d'échantillonnage (Hz)
#define NUM_CHANNELS 2       // Stéréo
#define AMPLITUDE 0.7         // Amplitude (0.0 à 1.0)
#define BASE_FREQ_1 30000.0   // Fréquence 1 (30 kHz)
#define BASE_FREQ_2 40000.0   // Fréquence 2 (40 kHz)
#define BASE_FREQ_3 50000.0   // Fréquence 3 (50 kHz)
#define SWEEP_DURATION 1.0    // Durée d'un balayage (secondes)
#define MIN_PAUSE 0.1         // Pause minimale entre balayages
#define MAX_PAUSE 0.5         // Pause maximale entre balayages
 
// Structure pour stocker l'état
typedef struct {
    double time;            // Temps global (en secondes)
    double pauseEndTime;    // Temps de fin de la pause actuelle
    int isPaused;           // 1 si en pause, 0 sinon
} UserData;
 
// Callback pour PortAudio
static int audioCallback(const void *inputBuffer, void *outputBuffer,
                         unsigned long framesPerBuffer,
                         const PaStreamCallbackTimeInfo *timeInfo,
                         PaStreamCallbackFlags statusFlags,
                         void *userData) {
    float *out = (float *)outputBuffer;
    UserData *data = (UserData *)userData;
 
    for (unsigned long i = 0; i < framesPerBuffer; i++) {
        // Si on est en pause, on génère du silence
        if (data->isPaused) {
            if (data->time >= data->pauseEndTime) {
                data->isPaused = 0; // Fin de la pause
            } else {
                *out++ = 0.0f;
                *out++ = 0.0f;
                data->time += 1.0 / SAMPLE_RATE;
                continue;
            }
        }
 
        // Temps local dans le balayage actuel (0.0 à SWEEP_DURATION)
        double localTime = fmod(data->time, SWEEP_DURATION);
        double progress = localTime / SWEEP_DURATION;
 
        // Balayage exponentiel pour les 3 fréquences
        double freq1 = BASE_FREQ_1 * pow(BASE_FREQ_3 / BASE_FREQ_1, progress);
        double freq2 = BASE_FREQ_2 * pow(BASE_FREQ_3 / BASE_FREQ_2, progress);
        double freq3 = BASE_FREQ_3; // 50 kHz constant (ou balayage exponentiel si souhaité)
 
        // Génération des ondes sinusoïdales avec temps local
        double sample = AMPLITUDE * (
            0.4 * sin(2 * M_PI * freq1 * localTime) +
            0.5 * sin(2 * M_PI * freq2 * localTime) +
            0.3 * sin(2 * M_PI * freq3 * localTime)
        );
 
        // Écriture dans les deux canaux (stéréo)
        *out++ = (float)sample;
        *out++ = (float)sample;
 
        // Mise à jour du temps global
        data->time += 1.0 / SAMPLE_RATE;
 
        // Si le balayage est terminé, déclencher une pause aléatoire
        if (fmod(data->time, SWEEP_DURATION) == 0 && data->time != 0) {
            data->isPaused = 1;
            data->pauseEndTime = data->time + MIN_PAUSE + (rand() / (RAND_MAX / (MAX_PAUSE - MIN_PAUSE)));
        }
    }
 
    return paContinue;
}
 
int main() {
    PaStream *stream;
    UserData userData = {0.0, 0.0, 0};
    srand(time(NULL)); // Initialisation du générateur aléatoire
 
    // Initialisation de PortAudio
    Pa_Initialize();
 
    // Ouverture du flux audio
    PaError err = Pa_OpenDefaultStream(
        &stream,
        0,              // Pas d'entrée
        NUM_CHANNELS,   // Sortie stéréo
        paFloat32,       // Format 32 bits float
        SAMPLE_RATE,     // Fréquence d'échantillonnage
        256,            // Taille du buffer (latence)
        audioCallback,   // Callback
        &userData        // Données utilisateur
    );
 
    if (err != paNoError) {
        fprintf(stderr, "Erreur PortAudio: %s\n", Pa_GetErrorText(err));
        return 1;
    }
 
    // Démarrage du flux
    err = Pa_StartStream(stream);
    if (err != paNoError) {
        fprintf(stderr, "Erreur PortAudio: %s\n", Pa_GetErrorText(err));
        Pa_Terminate();
        return 1;
    }
 
    printf("Diffusion du répulsif à mouches (30-50 kHz, balayage exponentiel, pauses aléatoires).\n");
    printf("Appuyez sur Entrée pour arrêter...\n");
    getchar(); // Attend l'appui sur Entrée
 
    // Arrêt et nettoyage
    Pa_StopStream(stream);
    Pa_Terminate();
 
    return 0;
}