ГОСТ Р ИСО/МЭК 16022 — 2008
/* allocate, then generate the generator polynomial coefficients: V 11
c = malloc{sizeof(int) * (nc+1)):
for (i=1; i<=nc; i++) c(i] =0; c(0] = 1;
for (i=1:i<=nc: i++){
forj>=1: j—){
c[)] = cU-1] лprod(c[j],alog[i].log.alog,gf);
}
cJO] = prod(c(0].alog[i].log.alog.gf):
}
Г clear, then generate enc» checkwords in the array wd[ ]: 4 21
for (i=nd; i<=(nd+nc): i++) wd[i] = 0;
for (i=0; i<nd; i++) {
k = wd[r>d]лwd[i];
for (j=0: j<nc; j++) {
wd[nd+j] = wd[nd+j+l] Aprod(k.c(nc-j-1].log. alog.gf):
}
}
free(c);
free(atog):
free(log);
50
Выделяют память, затем генерируют коэффициенты порождающего полинома.
2>Очищают память, затем генерируют «пс» кодовых слов в массиве wd[].