|
Packit Service |
3880ab |
/*
|
|
Packit Service |
3880ab |
* tc_core.c TC core library.
|
|
Packit Service |
3880ab |
*
|
|
Packit Service |
3880ab |
* This program is free software; you can redistribute it and/or
|
|
Packit Service |
3880ab |
* modify it under the terms of the GNU General Public License
|
|
Packit Service |
3880ab |
* as published by the Free Software Foundation; either version
|
|
Packit Service |
3880ab |
* 2 of the License, or (at your option) any later version.
|
|
Packit Service |
3880ab |
*
|
|
Packit Service |
3880ab |
* Authors: Alexey Kuznetsov, <kuznet@ms2.inr.ac.ru>
|
|
Packit Service |
3880ab |
*
|
|
Packit Service |
3880ab |
*/
|
|
Packit Service |
3880ab |
|
|
Packit Service |
3880ab |
#include <stdio.h>
|
|
Packit Service |
3880ab |
#include <stdlib.h>
|
|
Packit Service |
3880ab |
#include <unistd.h>
|
|
Packit Service |
3880ab |
#include <fcntl.h>
|
|
Packit Service |
3880ab |
#include <math.h>
|
|
Packit Service |
3880ab |
#include <sys/socket.h>
|
|
Packit Service |
3880ab |
#include <netinet/in.h>
|
|
Packit Service |
3880ab |
#include <arpa/inet.h>
|
|
Packit Service |
3880ab |
#include <string.h>
|
|
Packit Service |
3880ab |
|
|
Packit Service |
3880ab |
#include "utils.h"
|
|
Packit Service |
3880ab |
#include "tc_core.h"
|
|
Packit Service |
3880ab |
|
|
Packit Service |
3880ab |
int tc_setup_estimator(unsigned int A, unsigned int time_const, struct tc_estimator *est)
|
|
Packit Service |
3880ab |
{
|
|
Packit Service |
3880ab |
for (est->interval = 0; est->interval <= 5; est->interval++) {
|
|
Packit Service |
3880ab |
if (A <= (1<<est->interval)*(TIME_UNITS_PER_SEC/4))
|
|
Packit Service |
3880ab |
break;
|
|
Packit Service |
3880ab |
}
|
|
Packit Service |
3880ab |
if (est->interval > 5)
|
|
Packit Service |
3880ab |
return -1;
|
|
Packit Service |
3880ab |
est->interval -= 2;
|
|
Packit Service |
3880ab |
for (est->ewma_log = 1; est->ewma_log < 32; est->ewma_log++) {
|
|
Packit Service |
3880ab |
double w = 1.0 - 1.0/(1<<est->ewma_log);
|
|
Packit Service |
3880ab |
|
|
Packit Service |
3880ab |
if (A/(-log(w)) > time_const)
|
|
Packit Service |
3880ab |
break;
|
|
Packit Service |
3880ab |
}
|
|
Packit Service |
3880ab |
est->ewma_log--;
|
|
Packit Service |
3880ab |
if (est->ewma_log == 0 || est->ewma_log >= 31)
|
|
Packit Service |
3880ab |
return -1;
|
|
Packit Service |
3880ab |
return 0;
|
|
Packit Service |
3880ab |
}
|