include stdio include stdlib include pthread include math struct data

  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
 80
 81
 82
 83
 84
 85
 86
 87
 88
 89
 90
 91
 92
 93
 94
 95
 96
 97
 98
 99
100
101
102
103
104
#include <stdio.h>
#include <stdlib.h>
#include <pthread.h>
#include <math.h>
struct data{
double a;
double b;
double n;
int p;
int i;
};
double f(double x)
{
return x;// == 0 ? 1 : sin(x)/(x);
}
double integrate(double a, double b, int n)
{
double res;
double h;
int i;
h = (b - a) / n;
res = 0.5 * (f(a) + f(b)) * h;
for (i = 1; i < n; i++)
{
res += f(a + i * h) * h;
}
return res;
}
static double total = 0.;
// обьекты типа mutex для синхронизации доступа к total
static pthread_mutex_t total_mutex = PTHREAD_MUTEX_INITIALIZER;
static void * process_function(void *lpParam)
{
struct data dat = *((struct data *)lpParam);
int my_rank = dat.i;
double a = dat.a;
double b = dat.b;
double p = dat.p;
double n = dat.n;
// длина отрезка интегрирования для текущего процеса
double len = (b - a) / p;
// число точек разбиения для текущего процесса
int local_n = n / p;
// левый конец интервала для текущего процесса
double local_a = a + my_rank * len;
// правый конец интервала для текущего процесса
double local_b = local_a + len;double integral;
integral = integrate(local_a, local_b, local_n);
pthread_mutex_lock(&total_mutex);
total += integral;
pthread_mutex_unlock(&total_mutex);
return 0;
}
int main()
{
pthread_t * threads;
int i;
const double a = 0.;
const double b = 1.;
const int n = 100000;
int p;
p = (int) strtol ((char*)"6", 0, 10);
if(!(threads = (pthread_t*) malloc(p * sizeof(pthread_t))))
{
fprintf(stderr,"Not enough memory!\n");
return 1;
}
data some_inf;
some_inf.a = a;
some_inf.b = b;
some_inf.n = n;
some_inf.p = p;
for(i = 0; i < p; i++)
{
// функция pthread_create позволяет создать новую задачу и начать ее выполнение с указанной функции.
// thread - возвращаемое значение - идентификатор созданной задачи
// attr - указатель на структуру с атрибутами создаваемой задачи (0 - испоьзовать значение по умолчанию)
// start_routine - указатель на функцию с которой надо начать выполнение задачи;
// arg - аргумент этой функции
some_inf.i = i;
if(pthread_create (threads + i,0 ,process_function, &some_inf))
{
fprintf(stderr,"cannot create thread #%ld!\n",i);
return 2;
}
}
for(i = 0; i < p; i ++)
{
if(pthread_join(threads[i], 0))
{
fprintf(stderr, "cannot wait thread #%ld!\n",i);
}
}
free(threads);
printf("Integral from %lf to %lf = %.11lf\n", a, b, total);
return 0;
}