Memory leak в самописном к оде

["Alexey N. Kovyrin" <alexey@xxxxxxxxxxx>]

Добрый день,

Вероятнее всего, вопрос этот адресую Игорю... но задать решил здесь, 
чтобы для будущих поколений сохранилось :-)
Итак: написал я модуль для генерации и вставки баннеров в страницы 
юзеров фрихостинга - очень доволен производительностью! (апачу ооочень 
далеко до такой)
Вот только где-то у меня утекает память... при посещаемости около 
600-700 тыс уников в сутки утекает примерно 100-150 мб в сутки.
В баннерном модуле память выделяется только в двух местах:

1) топ-баннер (код генерируется динамически функцией generate_top_banner 
и складывается в память, полученную через ngx_palloc):
/******* Top banner *******/
   b = ngx_calloc_buf(r->pool);
   if (b == NULL) {
       return NGX_ERROR;
   }

   if (generate_top_banner(r, in, &top_banner, &top_banner_len) < 0) {
       return NGX_ERROR;
   }

   b->memory = 0;
   b->temporary = 1;
   b->last_buf = 0;
   b->pos = top_banner;
   b->last = top_banner + top_banner_len - 1;

   head.buf = b;
   head.next = in;

   /* Find last node */
   cur = in;
   while (cur->next) cur = cur->next;

2) боттом-баннер (код лежит в статическом char[] массиве внутри модуля):

/******* Bottom banner *******/
   b = ngx_calloc_buf(r->pool);
   if (b == NULL) {
       return NGX_ERROR;
   }

   b->memory = 1;
   b->last_buf = 1;
   b->pos = bottom_banner;
   b->last = bottom_banner + sizeof(bottom_banner) - 1;

   tail.buf = b;
   tail.next = NULL;
   cur->next = &tail;
   cur->buf->last_buf = 0;
   cur->buf->sync = 1;


Работу с буфферами я разбирал только на примерах других модулей... 
потому сомневаюсь в правильности использования API для работы с памятью...
Игорь, помогите, пожалуйста.


P.S. пока писал, вспомнил, что ngx_palloc есть еще в одном модуле... 
модуле статистики... но там, вроде бы, не должно быть ошибки:
   xml_packet = ngx_palloc(r->pool, xml_packet_len);
   if (!xml_packet) {
       return NGX_ERROR;
   }

   xml_packet_len = snprintf(xml_packet, xml_packet_len, xml_message, 
host.data, content_type.data, user_ip.data, file_size);
   if (xml_packet_len < 1) {
       ngx_pfree(r->pool, xml_packet);
       return NGX_ERROR;
   }

   ngx_log_debug1(NGX_LOG_DEBUG_HTTP, r->connection->log, 0, 
"STATS_PACKET: '%s'", xml_packet);
   // Send stats packet
   if (sendto(udp_sock, xml_packet, xml_packet_len, 0, &udp_sock_addr, 
udp_sock_addr_len) < 0) {

       ngx_pfree(r->pool, xml_packet);
       return NGX_ERROR;
   }

   ngx_pfree(r->pool, xml_packet);
   return NGX_OK;



Заранее благодарю за помощь.

--
/Scoundrel    [http://kovyrin.info]