Update to 2.0.0 tree from current Fremantle build
[opencv] / cv / src / cvpyrsegmentation.cpp
diff --git a/cv/src/cvpyrsegmentation.cpp b/cv/src/cvpyrsegmentation.cpp
deleted file mode 100644 (file)
index 4759d40..0000000
+++ /dev/null
@@ -1,1883 +0,0 @@
-/*M///////////////////////////////////////////////////////////////////////////////////////
-//
-//  IMPORTANT: READ BEFORE DOWNLOADING, COPYING, INSTALLING OR USING.
-//
-//  By downloading, copying, installing or using the software you agree to this license.
-//  If you do not agree to this license, do not download, install,
-//  copy or use the software.
-//
-//
-//                        Intel License Agreement
-//                For Open Source Computer Vision Library
-//
-// Copyright (C) 2000, Intel Corporation, all rights reserved.
-// Third party copyrights are property of their respective owners.
-//
-// Redistribution and use in source and binary forms, with or without modification,
-// are permitted provided that the following conditions are met:
-//
-//   * Redistribution's of source code must retain the above copyright notice,
-//     this list of conditions and the following disclaimer.
-//
-//   * Redistribution's in binary form must reproduce the above copyright notice,
-//     this list of conditions and the following disclaimer in the documentation
-//     and/or other materials provided with the distribution.
-//
-//   * The name of Intel Corporation may not be used to endorse or promote products
-//     derived from this software without specific prior written permission.
-//
-// This software is provided by the copyright holders and contributors "as is" and
-// any express or implied warranties, including, but not limited to, the implied
-// warranties of merchantability and fitness for a particular purpose are disclaimed.
-// In no event shall the Intel Corporation or contributors be liable for any direct,
-// indirect, incidental, special, exemplary, or consequential damages
-// (including, but not limited to, procurement of substitute goods or services;
-// loss of use, data, or profits; or business interruption) however caused
-// and on any theory of liability, whether in contract, strict liability,
-// or tort (including negligence or otherwise) arising in any way out of
-// the use of this software, even if advised of the possibility of such damage.
-//
-//M*/
-#include "_cv.h"
-
-typedef struct _CvRGBf
-{   float blue;
-    float green;
-    float red;
-}
-_CvRGBf;
-
-typedef struct _CvRect16u
-{
-    ushort x1, y1, x2, y2;
-}
-_CvRect16u;
-
-typedef struct _CvPyramid
-{
-    float c;
-    struct _CvPyramid *p;
-    int a;
-    _CvRect16u rect;      /*  ROI for the connected component    */
-} _CvPyramid;
-
-/* element of base layer */
-typedef struct _CvPyramidBase
-{
-    float c;
-    struct _CvPyramid *p;
-}
-_CvPyramidBase;
-
-typedef struct _CvPyramidC3
-{
-    _CvRGBf c;
-    struct _CvPyramidC3 *p;
-    int a;
-    _CvRect16u rect;      /*  ROI for the connected component    */
-} _CvPyramidC3;
-
-/* element of base layer */
-typedef struct _CvPyramidBaseC3
-{
-    _CvRGBf c;
-    struct _CvPyramidC3 *p;
-}
-_CvPyramidBaseC3;
-
-typedef struct _CvListNode
-{
-    struct _CvListNode* next;
-    void* data;
-}
-_CvListNode;
-
-
-static CvStatus  icvSegmentClusterC1( CvSeq* cmp_seq, CvSeq* res_seq,
-                                 double threshold,
-                                 _CvPyramid* first_level_end,
-                                 CvSize first_level_size );
-
-static CvStatus  icvSegmentClusterC3( CvSeq* cmp_seq, CvSeq* res_seq,
-                                 double threshold,
-                                 _CvPyramidC3* first_level_end,
-                                 CvSize first_level_size );
-
-static CvStatus icvUpdatePyrLinks_8u_C1
-    (int layer, void *layer_data, CvSize size, void *parent_layer,
-     void *_writer, float threshold, int is_last_iter, void *_stub, CvWriteNodeFunction /*func*/);
-
-static CvStatus icvUpdatePyrLinks_8u_C3
-    (int layer, void *layer_data, CvSize size, void *parent_layer,
-     void *_writer, float threshold, int is_last_iter, void *_stub, CvWriteNodeFunction /*func*/);
-
-static void icvMaxRoi( _CvRect16u *max_rect, _CvRect16u* cur_rect );
-static void icvMaxRoi1( _CvRect16u *max_rect, int x, int y );
-
-
-#define _CV_CHECK( icvFun )                                             \
-  {                                                                     \
-    if( icvFun != CV_OK )                                               \
-     goto M_END;                                                        \
-  }
-
-
-#define _CV_MAX3( a, b, c) ((a)>(b) ? ((a)>(c) ? (a) : (c)) : ((b)>(c) ? (b) : (c)))
-
-/*#define _CV_RGB_DIST(a, b)  _CV_MAX3((float)fabs((a).red - (b).red),      \
-                                       (float)fabs((a).green - (b).green),  \
-                                       (float)fabs((a).blue - (b).blue))*/
-
-#define _CV_NEXT_BASE_C1(p,n) (_CvPyramid*)((char*)(p) + (n)*sizeof(_CvPyramidBase))
-#define _CV_NEXT_BASE_C3(p,n) (_CvPyramidC3*)((char*)(p) + (n)*sizeof(_CvPyramidBaseC3))
-
-
-CV_INLINE float icvRGBDist_Max( const _CvRGBf& a, const _CvRGBf& b )
-{
-    float tr = (float)fabs(a.red - b.red);
-    float tg = (float)fabs(a.green - b.green);
-    float tb = (float)fabs(a.blue - b.blue);
-
-    return _CV_MAX3( tr, tg, tb );
-}
-
-CV_INLINE float icvRGBDist_Sum( const _CvRGBf& a, const _CvRGBf& b )
-{
-    float tr = (float)fabs(a.red - b.red);
-    float tg = (float)fabs(a.green - b.green);
-    float tb = (float)fabs(a.blue - b.blue);
-    
-    return (tr + tg + tb);
-}
-
-#if 1
-#define _CV_RGB_DIST  icvRGBDist_Max
-#define _CV_RGB_THRESH_SCALE   1
-#else
-#define _CV_RGB_DIST  icvRGBDist_Sum
-#define _CV_RGB_THRESH_SCALE   3
-#endif
-
-#define _CV_INV_TAB_SIZE   32
-
-static const float icvInvTab[ /*_CV_INV_TAB_SIZE*/ ] =
-{
-    1.00000000f, 0.50000000f, 0.33333333f, 0.25000000f, 0.20000000f, 0.16666667f,
-    0.14285714f, 0.12500000f, 0.11111111f, 0.10000000f, 0.09090909f, 0.08333333f,
-    0.07692308f, 0.07142857f, 0.06666667f, 0.06250000f, 0.05882353f, 0.05555556f,
-    0.05263158f, 0.05000000f, 0.04761905f, 0.04545455f, 0.04347826f, 0.04166667f,
-    0.04000000f, 0.03846154f, 0.03703704f, 0.03571429f, 0.03448276f, 0.03333333f,
-    0.03225806f, 0.03125000f
-};
-
-static void
-icvWritePyrNode( void *elem, void *writer )
-{
-    CV_WRITE_SEQ_ELEM( *(_CvListNode *) elem, *(CvSeqWriter *) writer );
-}
-
-
-static CvStatus
-icvPyrSegmentation8uC1R( uchar * src_image, int src_step,
-                         uchar * dst_image, int dst_step,
-                         CvSize roi, CvFilter filter,
-                         CvSeq ** dst_comp, CvMemStorage * storage,
-                         int level, int threshold1, int threshold2 )
-{
-    int i, j, l;
-    int step;
-    const int max_iter = 3;     /* maximum number of iterations */
-    int cur_iter = 0;           /* current iteration */
-
-    _CvPyramid *pyram[16];      /* pointers to the pyramid down up to level */
-
-    float *pyramida = 0;
-    _CvPyramid stub;
-
-    _CvPyramid *p_cur;
-    _CvPyramidBase *p_base;
-    _CvListNode cmp_node;
-
-    CvSeq *cmp_seq = 0;
-    CvSeq *res_seq = 0;
-    CvMemStorage *temp_storage = 0;
-    CvSize size;
-    CvStatus status;
-    CvSeqWriter writer;
-
-    int buffer_size;
-    char *buffer = 0;
-
-    status = CV_OK;
-
-    /* clear pointer to resultant sequence */
-    if( dst_comp )
-        *dst_comp = 0;
-
-    /* check args */
-    if( !src_image || !dst_image || !storage || !dst_comp )
-        return CV_NULLPTR_ERR;
-    if( roi.width <= 0 || roi.height <= 0 || src_step < roi.width || dst_step < roi.width )
-        return CV_BADSIZE_ERR;
-    if( filter != CV_GAUSSIAN_5x5 )
-        return CV_BADRANGE_ERR;
-    if( threshold1 < 0 || threshold2 < 0 )
-        return CV_BADRANGE_ERR;
-    if( level <= 0 )
-        return CV_BADRANGE_ERR;
-
-    if( ((roi.width | roi.height) & ((1 << level) - 1)) != 0 )
-        return CV_BADCOEF_ERR;
-
-    temp_storage = cvCreateChildMemStorage( storage );
-
-    /* sequence for temporary components */
-    cmp_seq = cvCreateSeq( 0, sizeof( CvSeq ), sizeof( _CvListNode ), temp_storage );
-    assert( cmp_seq != 0 );
-
-    res_seq = cvCreateSeq( CV_SEQ_CONNECTED_COMP, sizeof( CvSeq ),
-                           sizeof( CvConnectedComp ), storage );
-    assert( res_seq != 0 );
-
-    /* calculate buffer size */
-    buffer_size = roi.width * roi.height * (sizeof( float ) + sizeof( _CvPyramidBase ));
-
-    for( l = 1; l <= level; l++ )
-        buffer_size += ((roi.width >> l) + 1) * ((roi.height >> l) + 1) * sizeof(_CvPyramid);
-
-    /* allocate buffer */
-    buffer = (char *) cvAlloc( buffer_size );
-    if( !buffer )
-    {
-        status = CV_OUTOFMEM_ERR;
-        goto M_END;
-    }
-
-    pyramida = (float *) buffer;
-
-    /* initialization pyramid-linking properties down up to level */
-    step = roi.width * sizeof( float );
-
-    {
-        CvMat _src;
-        CvMat _pyramida;
-        cvInitMatHeader( &_src, roi.height, roi.width, CV_8UC1, src_image, src_step );
-        cvInitMatHeader( &_pyramida, roi.height, roi.width, CV_32FC1, pyramida, step );
-        cvConvert( &_src, &_pyramida );
-        /*_CV_CHECK( icvCvtTo_32f_C1R( src_image, src_step, pyramida, step, roi, CV_8UC1 ));*/
-    }
-    p_base = (_CvPyramidBase *) (buffer + step * roi.height);
-    pyram[0] = (_CvPyramid *) p_base;
-
-    /* fill base level of pyramid */
-    for( i = 0; i < roi.height; i++ )
-    {
-        for( j = 0; j < roi.width; j++, p_base++ )
-        {
-            p_base->c = pyramida[i * roi.width + j];
-            p_base->p = &stub;
-        }
-    }
-
-    p_cur = (_CvPyramid *) p_base;
-    size = roi;
-
-    /* calculate initial pyramid */
-    for( l = 1; l <= level; l++ )
-    {
-        CvSize dst_size = { size.width/2+1, size.height/2+1 };
-        CvMat prev_level = cvMat( size.height, size.width, CV_32FC1 );
-        CvMat next_level = cvMat( dst_size.height, dst_size.width, CV_32FC1 );
-
-        cvSetData( &prev_level, pyramida, step );
-        cvSetData( &next_level, pyramida, step );
-        cvPyrDown( &prev_level, &next_level );
-        
-        //_CV_CHECK( icvPyrDown_Gauss5x5_32f_C1R( pyramida, step, pyramida, step, size, buff ));
-        //_CV_CHECK( icvPyrDownBorder_32f_CnR( pyramida, step, size, pyramida, step, dst_size, 1 ));
-        pyram[l] = p_cur;
-
-        size.width = dst_size.width - 1;
-        size.height = dst_size.height - 1;
-
-        /* fill layer #l */
-        for( i = 0; i <= size.height; i++ )
-        {
-            for( j = 0; j <= size.width; j++, p_cur++ )
-            {
-                p_cur->c = pyramida[i * roi.width + j];
-                p_cur->p = &stub;
-                p_cur->a = 0;
-                p_cur->rect.x2 = 0;
-            }
-        }
-    }
-
-    cvStartAppendToSeq( cmp_seq, &writer );
-
-    /* do several iterations to determine son-father links */
-    for( cur_iter = 0; cur_iter < max_iter; cur_iter++ )
-    {
-        int is_last_iter = cur_iter == max_iter - 1;
-
-        size = roi;
-
-        /* build son-father links down up to level */
-        for( l = 0; l < level; l++ )
-        {
-            icvUpdatePyrLinks_8u_C1( l, pyram[l], size, pyram[l + 1], &writer,
-                                      (float) threshold1, is_last_iter, &stub,
-                                      icvWritePyrNode );
-
-            /* clear last border row */
-            if( l > 0 )
-            {
-                p_cur = pyram[l] + (size.width + 1) * size.height;
-                for( j = 0; j <= size.width; j++ )
-                    p_cur[j].c = 0;
-            }
-
-            size.width >>= 1;
-            size.height >>= 1;
-        }
-
-/*  clear the old c value for the last level     */
-        p_cur = pyram[level];
-        for( i = 0; i <= size.height; i++, p_cur += size.width + 1 )
-            for( j = 0; j <= size.width; j++ )
-                p_cur[j].c = 0;
-
-        size = roi;
-        step = roi.width;
-
-/* calculate average c value for the 0 < l <=level   */
-        for( l = 0; l < level; l++, step = (step >> 1) + 1 )
-        {
-            _CvPyramid *p_prev, *p_row_prev;
-
-            stub.c = 0;
-
-            /* calculate average c value for the next level   */
-            if( l == 0 )
-            {
-                p_base = (_CvPyramidBase *) pyram[0];
-                for( i = 0; i < roi.height; i++, p_base += size.width )
-                {
-                    for( j = 0; j < size.width; j += 2 )
-                    {
-                        _CvPyramid *p1 = p_base[j].p;
-                        _CvPyramid *p2 = p_base[j + 1].p;
-
-                        p1->c += p_base[j].c;
-                        p2->c += p_base[j + 1].c;
-                    }
-                }
-            }
-            else
-            {
-                p_cur = pyram[l];
-                for( i = 0; i < size.height; i++, p_cur += size.width + 1 )
-                {
-                    for( j = 0; j < size.width; j += 2 )
-                    {
-                        _CvPyramid *p1 = p_cur[j].p;
-                        _CvPyramid *p2 = p_cur[j + 1].p;
-
-                        float t0 = (float) p_cur[j].a * p_cur[j].c;
-                        float t1 = (float) p_cur[j + 1].a * p_cur[j + 1].c;
-
-                        p1->c += t0;
-                        p2->c += t1;
-
-                        if( !is_last_iter )
-                            p_cur[j].a = p_cur[j + 1].a = 0;
-                    }
-                    if( !is_last_iter )
-                        p_cur[size.width].a = 0;
-                }
-                if( !is_last_iter )
-                {
-                    for( j = 0; j <= size.width; j++ )
-                    {
-                        p_cur[j].a = 0;
-                    }
-                }
-            }
-
-            /* assign random values of the next level null c   */
-            p_cur = pyram[l + 1];
-            p_row_prev = p_prev = pyram[l];
-
-            size.width >>= 1;
-            size.height >>= 1;
-
-            for( i = 0; i <= size.height; i++, p_cur += size.width + 1 )
-            {
-                if( i < size.height || !is_last_iter )
-                {
-                    for( j = 0; j < size.width; j++ )
-                    {
-                        int a = p_cur[j].a;
-
-                        if( a != 0 )
-                        {
-                            if( a <= _CV_INV_TAB_SIZE )
-                            {
-                                p_cur[j].c *= icvInvTab[a - 1];
-                            }
-                            else
-                            {
-                                p_cur[j].c /= a;
-                            }
-                        }
-                        else
-                        {
-                            p_cur[j].c = p_prev->c;
-                        }
-                        
-                        if( l == 0 )
-                            p_prev = _CV_NEXT_BASE_C1(p_prev,2);
-                        else
-                            p_prev += 2;
-                    }
-
-                    if( p_cur[size.width].a == 0 )
-                    {
-                        p_cur[size.width].c = p_prev[(l != 0) - 1].c;
-                    }
-                    else
-                    {
-                        p_cur[size.width].c /= p_cur[size.width].a;
-                        if( is_last_iter )
-                        {
-                            cmp_node.data = p_cur + size.width;
-                            CV_WRITE_SEQ_ELEM( cmp_node, writer );
-                        }
-                    }
-                }
-                else
-                {
-                    for( j = 0; j <= size.width; j++ )
-                    {
-                        int a = p_cur[j].a;
-
-                        if( a != 0 )
-                        {
-                            if( a <= _CV_INV_TAB_SIZE )
-                            {
-                                p_cur[j].c *= icvInvTab[a - 1];
-                            }
-                            else
-                            {
-                                p_cur[j].c /= a;
-                            }
-
-                            cmp_node.data = p_cur + j;
-                            CV_WRITE_SEQ_ELEM( cmp_node, writer );
-                        }
-                        else
-                        {
-                            p_cur[j].c = p_prev->c;
-                        }
-
-                        if( l == 0 )
-                        {
-                            p_prev = _CV_NEXT_BASE_C1(p_prev, (j * 2 < step - 2 ? 2 : 1));
-                        }
-                        else
-                        {
-                            p_prev++;
-                        }
-                    }
-                }
-
-                if( l + 1 == level && !is_last_iter )
-                    for( j = 0; j <= size.width; j++ )
-                        p_cur[j].a = 0;
-
-                if( !(i & 1) )
-                {
-                    p_prev = p_row_prev;
-                }
-                else
-                {
-                    p_prev = (_CvPyramid*)((char*)p_row_prev + step *
-                        (l == 0 ? sizeof(_CvPyramidBase) : sizeof(_CvPyramid)));
-                }
-            }
-        }
-    }                           /*  end of the iteration process  */
-
-    /* construct a connected  components   */
-    size.width = roi.width >> level;
-    size.height = roi.height >> level;
-
-    p_cur = pyram[level];
-
-    for( i = 0; i < size.height; i++, p_cur += size.width + 1 )
-    {
-        for( j = 0; j < size.width; j++ )
-        {
-            if( p_cur[j].a != 0 )
-            {
-                cmp_node.data = p_cur + j;
-                CV_WRITE_SEQ_ELEM( cmp_node, writer );
-            }
-        }
-    }
-
-    cvEndWriteSeq( &writer );
-
-/* clusterization segmented components and construction 
-   output connected components                            */
-    icvSegmentClusterC1( cmp_seq, res_seq, threshold2, pyram[1], roi );
-
-/* convert (inplace) resultant segment values to int (top level) */
-
-/* propagate segment values top down */
-    for( l = level - 1; l >= 0; l-- )
-    {
-        p_cur = pyram[l];
-
-        size.width <<= 1;
-        size.height <<= 1;
-
-        if( l == 0 )
-        {
-            size.width--;
-            size.height--;
-        }
-
-        for( i = 0; i <= size.height; i++ )
-        {
-            for( j = 0; j <= size.width; j++ )
-            {
-                _CvPyramid *p = p_cur->p;
-
-                assert( p != 0 );
-                if( p != &stub )
-                    p_cur->c = p->c;
-
-                if( l == 0 )
-                {
-                    Cv32suf _c;
-                    /* copy the segmented values to destination image */
-                    _c.f = p_cur->c; dst_image[j] = (uchar)_c.i;
-                    p_cur = _CV_NEXT_BASE_C1(p_cur, 1);
-                }
-                else
-                {
-                    p_cur++;
-                }
-            }
-            if( l == 0 )
-                dst_image += dst_step;
-        }
-    }
-  M_END:
-
-    cvFree( &buffer );
-    cvReleaseMemStorage( &temp_storage );
-
-    if( status == CV_OK )
-        *dst_comp = res_seq;
-
-    return status;
-}
-
-
-
-/****************************************************************************************\
-    color!!!  image segmentation by pyramid-linking   
-\****************************************************************************************/
-static CvStatus
-icvPyrSegmentation8uC3R( uchar * src_image, int src_step,
-                         uchar * dst_image, int dst_step,
-                         CvSize roi, CvFilter filter,
-                         CvSeq ** dst_comp, CvMemStorage * storage,
-                         int level, int threshold1, int threshold2 )
-{
-    int i, j, l;
-
-    int step;
-    const int max_iter = 3;     /* maximum number of iterations */
-    int cur_iter = 0;           /* current iteration */
-
-    _CvPyramidC3 *pyram[16];    /* pointers to the pyramid down up to level */
-
-    float *pyramida = 0;
-    _CvPyramidC3 stub;
-
-    _CvPyramidC3 *p_cur;
-    _CvPyramidBaseC3 *p_base;
-    _CvListNode cmp_node;
-
-    CvSeq *cmp_seq = 0;
-    CvSeq *res_seq = 0;
-    CvMemStorage *temp_storage = 0;
-    CvSize size;
-    CvStatus status;
-    CvSeqWriter writer;
-
-    int buffer_size;
-    char *buffer = 0;
-
-    status = CV_OK;
-
-    threshold1 *= _CV_RGB_THRESH_SCALE;
-    threshold2 *= _CV_RGB_THRESH_SCALE;
-
-    /* clear pointer to resultant sequence */
-    if( dst_comp )
-        *dst_comp = 0;
-
-    /* check args */
-    if( !src_image || !dst_image || !storage || !dst_comp )
-        return CV_NULLPTR_ERR;
-    if( roi.width <= 0 || roi.height <= 0 ||
-        src_step < roi.width * 3 || dst_step < roi.width * 3 ) return CV_BADSIZE_ERR;
-    if( filter != CV_GAUSSIAN_5x5 )
-        return CV_BADRANGE_ERR;
-    if( threshold1 < 0 || threshold2 < 0 )
-        return CV_BADRANGE_ERR;
-    if( level <= 0 )
-        return CV_BADRANGE_ERR;
-
-    if( ((roi.width | roi.height) & ((1 << level) - 1)) != 0 )
-        return CV_BADCOEF_ERR;
-
-    temp_storage = cvCreateChildMemStorage( storage );
-
-    /* sequence for temporary components */
-    cmp_seq = cvCreateSeq( 0, sizeof( CvSeq ), sizeof( _CvListNode ), temp_storage );
-    assert( cmp_seq != 0 );
-
-    res_seq = cvCreateSeq( CV_SEQ_CONNECTED_COMP, sizeof( CvSeq ),
-                           sizeof( CvConnectedComp ), storage );
-    assert( res_seq != 0 );
-
-    /* calculate buffer size */
-    buffer_size = roi.width * roi.height * (sizeof( _CvRGBf ) + sizeof( _CvPyramidBaseC3 ));
-
-    for( l = 1; l <= level; l++ )
-        buffer_size += ((roi.width >> l) + 1) * ((roi.height >> l) + 1) * sizeof(_CvPyramidC3);
-
-    /* allocate buffer */
-    buffer = (char *) cvAlloc( buffer_size );
-    if( !buffer )
-    {
-        status = CV_OUTOFMEM_ERR;
-        goto M_END;
-    }
-
-    pyramida = (float *) buffer;
-
-    /* initialization pyramid-linking properties down up to level */
-    step = roi.width * sizeof( _CvRGBf );
-
-    {
-        CvMat _src;
-        CvMat _pyramida;
-        cvInitMatHeader( &_src, roi.height, roi.width, CV_8UC3, src_image, src_step );
-        cvInitMatHeader( &_pyramida, roi.height, roi.width, CV_32FC3, pyramida, step );
-        cvConvert( &_src, &_pyramida );
-        /*_CV_CHECK( icvCvtTo_32f_C1R( src_image, src_step, pyramida, step,
-                                 cvSize( roi.width * 3, roi.height ), CV_8UC1 ));*/
-    }
-
-    p_base = (_CvPyramidBaseC3 *) (buffer + step * roi.height);
-    pyram[0] = (_CvPyramidC3 *) p_base;
-
-    /* fill base level of pyramid */
-    for( i = 0; i < roi.height; i++ )
-    {
-        for( j = 0; j < roi.width; j++, p_base++ )
-        {
-            p_base->c = ((_CvRGBf *) pyramida)[i * roi.width + j];
-            p_base->p = &stub;
-        }
-    }
-
-    p_cur = (_CvPyramidC3 *) p_base;
-    size = roi;
-
-    /* calculate initial pyramid */
-    for( l = 1; l <= level; l++ )
-    {
-        CvSize dst_size = { size.width/2 + 1, size.height/2 + 1 };
-        CvMat prev_level = cvMat( size.height, size.width, CV_32FC3 );
-        CvMat next_level = cvMat( dst_size.height, dst_size.width, CV_32FC3 );
-
-        cvSetData( &prev_level, pyramida, step );
-        cvSetData( &next_level, pyramida, step );
-        cvPyrDown( &prev_level, &next_level );
-
-        //_CV_CHECK( icvPyrDown_Gauss5x5_32f_C3R( pyramida, step, pyramida, step, size, buff ));
-        //_CV_CHECK( icvPyrDownBorder_32f_CnR( pyramida, step, size, pyramida, step, dst_size, 3 ));
-        pyram[l] = p_cur;
-
-        size.width = dst_size.width - 1;
-        size.height = dst_size.height - 1;
-
-        /* fill layer #l */
-        for( i = 0; i <= size.height; i++ )
-        {
-            assert( (char*)p_cur - buffer < buffer_size );
-            for( j = 0; j <= size.width; j++, p_cur++ )
-            {
-                p_cur->c = ((_CvRGBf *) pyramida)[i * roi.width + j];
-                p_cur->p = &stub;
-                p_cur->a = 0;
-                p_cur->rect.x2 = 0;
-            }
-        }
-    }
-
-    cvStartAppendToSeq( cmp_seq, &writer );
-
-    /* do several iterations to determine son-father links */
-    for( cur_iter = 0; cur_iter < max_iter; cur_iter++ )
-    {
-        int is_last_iter = cur_iter == max_iter - 1;
-
-        size = roi;
-
-        /* build son-father links down up to level */
-        for( l = 0; l < level; l++ )
-        {
-            icvUpdatePyrLinks_8u_C3( l, pyram[l], size, pyram[l + 1], &writer,
-                                      (float) threshold1, is_last_iter, &stub,
-                                      icvWritePyrNode );
-
-            /* clear last border row */
-            if( l > 0 )
-            {
-                p_cur = pyram[l] + (size.width + 1) * size.height;
-                for( j = 0; j <= size.width; j++ )
-                    p_cur[j].c.blue = p_cur[j].c.green = p_cur[j].c.red = 0;
-            }
-
-            size.width >>= 1;
-            size.height >>= 1;
-        }
-
-/*  clear the old c value for the last level     */
-        p_cur = pyram[level];
-        for( i = 0; i <= size.height; i++, p_cur += size.width + 1 )
-            for( j = 0; j <= size.width; j++ )
-                p_cur[j].c.blue = p_cur[j].c.green = p_cur[j].c.red = 0;
-
-        size = roi;
-        step = roi.width;
-
-/* calculate average c value for the 0 < l <=level   */
-        for( l = 0; l < level; l++, step = (step >> 1) + 1 )
-        {
-            _CvPyramidC3 *p_prev, *p_row_prev;
-
-            stub.c.blue = stub.c.green = stub.c.red = 0;
-
-            /* calculate average c value for the next level   */
-            if( l == 0 )
-            {
-                p_base = (_CvPyramidBaseC3 *) pyram[0];
-                for( i = 0; i < roi.height; i++, p_base += size.width )
-                {
-                    for( j = 0; j < size.width; j++ )
-                    {
-                        _CvPyramidC3 *p = p_base[j].p;
-
-                        p->c.blue += p_base[j].c.blue;
-                        p->c.green += p_base[j].c.green;
-                        p->c.red += p_base[j].c.red;
-                    }
-                }
-            }
-            else
-            {
-                p_cur = pyram[l];
-                for( i = 0; i < size.height; i++, p_cur += size.width + 1 )
-                {
-                    for( j = 0; j < size.width; j++ )
-                    {
-                        _CvPyramidC3 *p = p_cur[j].p;
-                        float a = (float) p_cur[j].a;
-
-                        p->c.blue += a * p_cur[j].c.blue;
-                        p->c.green += a * p_cur[j].c.green;
-                        p->c.red += a * p_cur[j].c.red;
-
-                        if( !is_last_iter )
-                            p_cur[j].a = 0;
-                    }
-                    if( !is_last_iter )
-                        p_cur[size.width].a = 0;
-                }
-                if( !is_last_iter )
-                {
-                    for( j = 0; j <= size.width; j++ )
-                    {
-                        p_cur[j].a = 0;
-                    }
-                }
-            }
-
-            /* assign random values of the next level null c   */
-            p_cur = pyram[l + 1];
-            p_row_prev = p_prev = pyram[l];
-
-            size.width >>= 1;
-            size.height >>= 1;
-
-            for( i = 0; i <= size.height; i++, p_cur += size.width + 1 )
-            {
-                if( i < size.height || !is_last_iter )
-                {
-                    for( j = 0; j < size.width; j++ )
-                    {
-                        int a = p_cur[j].a;
-
-                        if( a != 0 )
-                        {
-                            float inv_a;
-
-                            if( a <= _CV_INV_TAB_SIZE )
-                            {
-                                inv_a = icvInvTab[a - 1];
-                            }
-                            else
-                            {
-                                inv_a = 1.f / a;
-                            }
-                            p_cur[j].c.blue *= inv_a;
-                            p_cur[j].c.green *= inv_a;
-                            p_cur[j].c.red *= inv_a;
-                        }
-                        else
-                        {
-                            p_cur[j].c = p_prev->c;
-                        }
-                        
-                        if( l == 0 )
-                            p_prev = _CV_NEXT_BASE_C3( p_prev, 2 );
-                        else
-                            p_prev += 2;
-                    }
-
-                    if( p_cur[size.width].a == 0 )
-                    {
-                        p_cur[size.width].c = p_prev[(l != 0) - 1].c;
-                    }
-                    else
-                    {
-                        p_cur[size.width].c.blue /= p_cur[size.width].a;
-                        p_cur[size.width].c.green /= p_cur[size.width].a;
-                        p_cur[size.width].c.red /= p_cur[size.width].a;
-                        if( is_last_iter )
-                        {
-                            cmp_node.data = p_cur + size.width;
-                            CV_WRITE_SEQ_ELEM( cmp_node, writer );
-                        }
-                    }
-                }
-                else
-                {
-                    for( j = 0; j <= size.width; j++ )
-                    {
-                        int a = p_cur[j].a;
-
-                        if( a != 0 )
-                        {
-                            float inv_a;
-
-                            if( a <= _CV_INV_TAB_SIZE )
-                            {
-                                inv_a = icvInvTab[a - 1];
-                            }
-                            else
-                            {
-                                inv_a = 1.f / a;
-                            }
-                            p_cur[j].c.blue *= inv_a;
-                            p_cur[j].c.green *= inv_a;
-                            p_cur[j].c.red *= inv_a;
-
-                            cmp_node.data = p_cur + j;
-                            CV_WRITE_SEQ_ELEM( cmp_node, writer );
-                        }
-                        else
-                        {
-                            p_cur[j].c = p_prev->c;
-                        }
-
-                        if( l == 0 )
-                        {
-                            p_prev = _CV_NEXT_BASE_C3( p_prev, (j * 2 < step - 2 ? 2 : 1));
-                        }
-                        else
-                        {
-                            p_prev++;
-                        }
-                    }
-                }
-
-                if( l + 1 == level && !is_last_iter )
-                    for( j = 0; j <= size.width; j++ )
-                        p_cur[j].a = 0;
-
-                if( !(i & 1) )
-                {
-                    p_prev = p_row_prev;
-                }
-                else
-                {
-                    p_prev = (_CvPyramidC3*)((char*)p_row_prev + step *
-                        (l == 0 ? sizeof( _CvPyramidBaseC3 ) : sizeof( _CvPyramidC3 )));
-                }
-            }
-        }
-    }                           /*  end of the iteration process  */
-
-    /* construct a connected  components   */
-    size.width = roi.width >> level;
-    size.height = roi.height >> level;
-
-    p_cur = pyram[level];
-
-    for( i = 0; i < size.height; i++, p_cur += size.width + 1 )
-    {
-        for( j = 0; j < size.width; j++ )
-        {
-            if( p_cur[j].a != 0 )
-            {
-                cmp_node.data = p_cur + j;
-                CV_WRITE_SEQ_ELEM( cmp_node, writer );
-            }
-        }
-    }
-
-    cvEndWriteSeq( &writer );
-
-/* clusterization segmented components and construction 
-   output connected components                            */
-    icvSegmentClusterC3( cmp_seq, res_seq, threshold2, pyram[1], roi );
-
-/* convert (inplace) resultant segment values to int (top level) */
-
-/* propagate segment values top down */
-    for( l = level - 1; l >= 0; l-- )
-    {
-        p_cur = pyram[l];
-
-        size.width <<= 1;
-        size.height <<= 1;
-
-        if( l == 0 )
-        {
-            size.width--;
-            size.height--;
-        }
-
-        for( i = 0; i <= size.height; i++ )
-        {
-            for( j = 0; j <= size.width; j++ )
-            {
-                _CvPyramidC3 *p = p_cur->p;
-
-                assert( p != 0 );
-                if( p != &stub )
-                {
-                    p_cur->c = p->c;
-                }
-
-                if( l == 0 )
-                {
-                    Cv32suf _c;
-                    /* copy the segmented values to destination image */
-                    _c.f = p_cur->c.blue; dst_image[j*3] = (uchar)_c.i;
-                    _c.f = p_cur->c.green; dst_image[j*3+1] = (uchar)_c.i;
-                    _c.f = p_cur->c.red; dst_image[j*3+2] = (uchar)_c.i;
-                    p_cur = _CV_NEXT_BASE_C3(p_cur,1);
-                }
-                else
-                {
-                    p_cur++;
-                }
-            }
-            if( l == 0 )
-                dst_image += dst_step;
-        }
-    }
-
-  M_END:
-
-    cvFree( &buffer );
-    cvReleaseMemStorage( &temp_storage );
-
-    if( status == CV_OK )
-        *dst_comp = res_seq;
-
-    return status;
-}
-
-
-static CvStatus icvUpdatePyrLinks_8u_C1
-    (int layer, void *layer_data, CvSize size, void *parent_layer,
-     void *_writer, float threshold, int is_last_iter, void *_stub, CvWriteNodeFunction /*func*/)
-{
-    int i, j;
-    _CvListNode cmp_node;
-
-    _CvPyramid *stub = (_CvPyramid *) _stub;
-    _CvPyramid *p_cur = (_CvPyramid *) layer_data;
-    _CvPyramid *p_next1 = (_CvPyramid *) parent_layer;
-    _CvPyramid *p_next3 = p_next1 + (size.width >> 1) + 1;
-
-    CvSeqWriter & writer = *(CvSeqWriter *) _writer;
-
-    for( i = 0; i < size.height; i++ )
-    {
-        for( j = 0; j < size.width; j += 2 )
-        {
-            float c0, c1, c2, c3, c4;
-            _CvPyramid *p;
-
-/* son-father threshold linking for the current node establish */
-            c0 = p_cur->c;
-
-/* find pointer for the first pixel */
-            c1 = (float) fabs( c0 - p_next1[0].c );
-            c2 = (float) fabs( c0 - p_next1[1].c );
-            c3 = (float) fabs( c0 - p_next3[0].c );
-            c4 = (float) fabs( c0 - p_next3[1].c );
-
-            p = p_next1;
-
-            if( c1 > c2 )
-            {
-                p = p_next1 + 1;
-                c1 = c2;
-            }
-            if( c1 > c3 )
-            {
-                p = p_next3;
-                c1 = c3;
-            }
-            if( c1 > c4 )
-            {
-                p = p_next3 + 1;
-                c1 = c4;
-            }
-
-            if( c1 <= threshold )
-            {
-                p_cur->p = p;
-
-                if( layer == 0 )
-                {
-                    p->a++;
-                    p_cur = (_CvPyramid*)((char*)p_cur + sizeof(_CvPyramidBase));
-                    if( is_last_iter )
-                        icvMaxRoi1( &(p->rect), j, i );
-                }
-                else
-                {
-                    int a = p_cur->a;
-
-                    p->a += a;
-                    p_cur->c = 0;
-                    p_cur++;
-                    if( is_last_iter && a != 0 )
-                        icvMaxRoi( &(p->rect), &(p_cur[-1].rect) );
-                }
-            }
-            else
-            {
-                p_cur->p = stub;
-                if( is_last_iter )
-                {
-                    cmp_node.data = p_cur;
-                    CV_WRITE_SEQ_ELEM( cmp_node, writer );
-                }
-                if( layer == 0 )
-                {
-                    p_cur = _CV_NEXT_BASE_C1(p_cur,1);
-                }
-                else
-                {
-                    p_cur->c = 0;
-                    p_cur++;
-                }
-            }
-
-            /* find pointer for the second pixel */
-            c0 = p_cur->c;
-
-            c1 = (float) fabs( c0 - p_next1[0].c );
-            c2 = (float) fabs( c0 - p_next1[1].c );
-            c3 = (float) fabs( c0 - p_next3[0].c );
-            c4 = (float) fabs( c0 - p_next3[1].c );
-
-            p = p_next1;
-            p_next1++;
-
-            if( c1 > c2 )
-            {
-                p = p_next1;
-                c1 = c2;
-            }
-            if( c1 > c3 )
-            {
-                p = p_next3;
-                c1 = c3;
-            }
-
-            p_next3++;
-            if( c1 > c4 )
-            {
-                p = p_next3;
-                c1 = c4;
-            }
-
-            if( c1 <= threshold )
-            {
-                p_cur->p = p;
-
-                if( layer == 0 )
-                {
-                    p->a++;
-                    p_cur = _CV_NEXT_BASE_C1(p_cur,1);
-                    if( is_last_iter )
-                        icvMaxRoi1( &(p->rect), j + 1, i );
-                }
-                else
-                {
-                    int a = p_cur->a;
-
-                    p->a += a;
-                    p_cur->c = 0;
-                    p_cur++;
-                    if( is_last_iter && a != 0 )
-                        icvMaxRoi( &(p->rect), &(p_cur[-1].rect) );
-                }
-            }
-            else
-            {
-                p_cur->p = stub;
-                if( is_last_iter )
-                {
-                    cmp_node.data = p_cur;
-                    CV_WRITE_SEQ_ELEM( cmp_node, writer );
-                }
-                if( layer == 0 )
-                {
-                    p_cur = _CV_NEXT_BASE_C1(p_cur,1);
-                }
-                else
-                {
-                    p_cur->c = 0;
-                    p_cur++;
-                }
-            }
-        }
-
-        /* clear c's */
-        if( layer > 0 )
-        {
-            p_cur->c = 0;
-            p_cur++;
-        }
-
-        if( !(i & 1) )
-        {
-            p_next1 -= size.width >> 1;
-            p_next3 -= size.width >> 1;
-        }
-        else
-        {
-            p_next1++;
-            p_next3++;
-        }
-    }
-
-    return CV_OK;
-}
-
-
-static CvStatus icvUpdatePyrLinks_8u_C3
-    (int layer, void *layer_data, CvSize size, void *parent_layer,
-     void *_writer, float threshold, int is_last_iter, void *_stub, CvWriteNodeFunction /*func*/)
-{
-    int i, j;
-    _CvListNode cmp_node;
-
-    _CvPyramidC3 *stub = (_CvPyramidC3 *) _stub;
-    _CvPyramidC3 *p_cur = (_CvPyramidC3 *) layer_data;
-    _CvPyramidC3 *p_next1 = (_CvPyramidC3 *) parent_layer;
-    _CvPyramidC3 *p_next3 = p_next1 + (size.width >> 1) + 1;
-
-    CvSeqWriter & writer = *(CvSeqWriter *) _writer;
-
-    for( i = 0; i < size.height; i++ )
-    {
-        for( j = 0; j < size.width; j += 2 )
-        {
-            float c1, c2, c3, c4;
-            _CvPyramidC3 *p;
-
-/* find pointer for the first pixel */
-            c1 = _CV_RGB_DIST( p_cur->c, p_next1[0].c );
-            c2 = _CV_RGB_DIST( p_cur->c, p_next1[1].c );
-            c3 = _CV_RGB_DIST( p_cur->c, p_next3[0].c );
-            c4 = _CV_RGB_DIST( p_cur->c, p_next3[1].c );
-
-            p = p_next1;
-
-            if( c1 > c2 )
-            {
-                p = p_next1 + 1;
-                c1 = c2;
-            }
-            if( c1 > c3 )
-            {
-                p = p_next3;
-                c1 = c3;
-            }
-            if( c1 > c4 )
-            {
-                p = p_next3 + 1;
-                c1 = c4;
-            }
-
-            if( c1 < threshold )
-            {
-                p_cur->p = p;
-
-                if( layer == 0 )
-                {
-                    p->a++;
-                    p_cur = _CV_NEXT_BASE_C3(p_cur,1);
-                    if( is_last_iter )
-                        icvMaxRoi1( &(p->rect), j, i );
-                }
-                else
-                {
-                    int a = p_cur->a;
-
-                    p->a += a;
-                    p_cur->c.blue = p_cur->c.green = p_cur->c.red = 0;
-                    p_cur++;
-                    if( is_last_iter && a != 0 )
-                        icvMaxRoi( &(p->rect), &(p_cur[-1].rect) );
-                }
-            }
-            else
-            {
-                p_cur->p = stub;
-                if( is_last_iter /* && ( == 0 || p_cur->a != 0) */  )
-                {
-                    cmp_node.data = p_cur;
-                    CV_WRITE_SEQ_ELEM( cmp_node, writer );
-                }
-
-                if( layer == 0 )
-                {
-                    p_cur = _CV_NEXT_BASE_C3(p_cur,1);
-                }
-                else
-                {
-                    p_cur->c.blue = p_cur->c.green = p_cur->c.red = 0;
-                    p_cur++;
-                }
-            }
-
-            /* find pointer for the second pixel */
-            c1 = _CV_RGB_DIST( p_cur->c, p_next1[0].c );
-            c2 = _CV_RGB_DIST( p_cur->c, p_next1[1].c );
-            c3 = _CV_RGB_DIST( p_cur->c, p_next3[0].c );
-            c4 = _CV_RGB_DIST( p_cur->c, p_next3[1].c );
-
-            p = p_next1;
-            p_next1++;
-
-            if( c1 > c2 )
-            {
-                p = p_next1;
-                c1 = c2;
-            }
-            if( c1 > c3 )
-            {
-                p = p_next3;
-                c1 = c3;
-            }
-
-            p_next3++;
-            if( c1 > c4 )
-            {
-                p = p_next3;
-                c1 = c4;
-            }
-
-            if( c1 < threshold )
-            {
-                p_cur->p = p;
-
-                if( layer == 0 )
-                {
-                    p->a++;
-                    p_cur = _CV_NEXT_BASE_C3(p_cur,1);
-                    if( is_last_iter )
-                        icvMaxRoi1( &(p->rect), j + 1, i );
-                }
-                else
-                {
-                    int a = p_cur->a;
-
-                    p->a += a;
-                    p_cur->c.blue = p_cur->c.green = p_cur->c.red = 0;
-                    p_cur++;
-                    if( is_last_iter && a != 0 )
-                        icvMaxRoi( &(p->rect), &(p_cur[-1].rect) );
-                }
-            }
-            else
-            {
-                p_cur->p = stub;
-                if( is_last_iter /* && ( == 0 || p_cur->a != 0) */  )
-                {
-                    cmp_node.data = p_cur;
-                    CV_WRITE_SEQ_ELEM( cmp_node, writer );
-                }
-                if( layer == 0 )
-                {
-                    p_cur = _CV_NEXT_BASE_C3(p_cur,1);
-                }
-                else
-                {
-                    p_cur->c.blue = p_cur->c.green = p_cur->c.red = 0;
-                    p_cur++;
-                }
-            }
-        }
-
-        /* clear c's */
-        if( layer > 0 )
-        {
-            p_cur->c.blue = p_cur->c.green = p_cur->c.red = 0;
-            p_cur++;
-        }
-
-        if( !(i & 1) )
-        {
-            p_next1 -= size.width >> 1;
-            p_next3 -= size.width >> 1;
-        }
-        else
-        {
-            p_next1++;
-            p_next3++;
-        }
-    }
-
-    return CV_OK;
-}
-
-
-
-/****************************************************************************************\
-
-    clusterization segmented components    
-
-\****************************************************************************************/
-static void
-icvExpandBaseLevelC1( _CvPyramid * base_p, _CvPyramid * p, _CvPyramidBase * start, int width )
-{
-    int x = (int)((_CvPyramidBase *) base_p - start);
-    int y = x / width;
-
-    x -= y * width;
-    p->a = 1;
-    p->rect.x1 = (ushort) x;
-    p->rect.y1 = (ushort) y;
-    p->rect.x2 = (ushort) (x + 1);
-    p->rect.y2 = (ushort) (y + 1);
-    p->c = base_p->c;
-}
-
-CvStatus
-icvSegmentClusterC1( CvSeq * cmp_seq, CvSeq * res_seq,
-                     double threshold, _CvPyramid * first_level_end, CvSize first_level_size )
-{
-    const double eps = 1.;
-    CvSeqWriter writer;
-    CvSeqReader reader;
-    _CvPyramid temp_cmp;
-    _CvPyramidBase *first_level_start = (_CvPyramidBase *) first_level_end -
-        first_level_size.width * first_level_size.height;
-    int c, i, count = cmp_seq->total;
-
-    cvStartReadSeq( cmp_seq, &reader, 0 );
-    cvStartAppendToSeq( res_seq, &writer );
-
-    if( threshold < eps )
-    {
-        /* if threshold is too small then simply copy all
-           the components to the output sequence */
-        for( i = 0; i < count; i++ )
-        {
-            CvConnectedComp comp;
-            _CvPyramid *cmp = (_CvPyramid *) (((_CvListNode *) reader.ptr)->data);
-            Cv32suf _c;
-
-            if( cmp < first_level_end )
-            {
-                icvExpandBaseLevelC1( cmp, &temp_cmp, first_level_start,
-                                      first_level_size.width );
-                cmp = &temp_cmp;
-            }
-
-            _c.i = cvRound( cmp->c );
-            cmp->c = _c.f;
-            comp.value = cvRealScalar(_c.i);
-            comp.area = cmp->a;
-            comp.rect.x = cmp->rect.x1;
-            comp.rect.y = cmp->rect.y1;
-            comp.rect.width = cmp->rect.x2 - cmp->rect.x1;
-            comp.rect.height = cmp->rect.y2 - cmp->rect.y1;
-            comp.contour = 0;
-
-            CV_WRITE_SEQ_ELEM( comp, writer );
-            CV_NEXT_SEQ_ELEM( sizeof( _CvListNode ), reader );
-        }
-    }
-    else
-    {
-        _CvListNode stub_node;
-        _CvListNode *prev = &stub_node;
-
-        stub_node.next = 0;
-
-        for( i = 0; i < count; i++ )
-        {
-            _CvListNode *node = (_CvListNode *) reader.ptr;
-
-            prev->next = node;
-            prev = node;
-            CV_NEXT_SEQ_ELEM( sizeof( _CvListNode ), reader );
-        }
-        prev->next = 0;
-        prev = stub_node.next;
-
-        while( prev )
-        {
-            _CvListNode *node = prev->next;
-            _CvListNode *acc = prev;
-            _CvPyramid *cmp = (_CvPyramid *) (acc->data);
-            CvConnectedComp comp;
-            float c0 = cmp->c;
-
-            if( cmp < first_level_end )
-            {
-                icvExpandBaseLevelC1( cmp, &temp_cmp, first_level_start,
-                                      first_level_size.width );
-            }
-            else
-            {
-                temp_cmp = *cmp;
-                temp_cmp.c *= temp_cmp.a;
-            }
-
-            acc->next = 0;
-            stub_node.next = 0;
-            prev = &stub_node;
-
-            while( node )
-            {
-                cmp = (_CvPyramid *) (node->data);
-                if( fabs( c0 - cmp->c ) < threshold )
-                {
-                    _CvPyramid temp;
-
-                    /* exclude from global list and add to list of joint component */
-                    prev->next = node->next;
-                    node->next = acc;
-                    acc = node;
-
-                    if( cmp < first_level_end )
-                    {
-                        icvExpandBaseLevelC1( cmp, &temp, first_level_start,
-                                              first_level_size.width );
-                        cmp = &temp;
-                    }
-
-                    temp_cmp.a += cmp->a;
-                    temp_cmp.c += cmp->c * cmp->a;
-                    icvMaxRoi( &(temp_cmp.rect), &(cmp->rect) );
-                }
-                else
-                {
-                    if( prev == &stub_node )
-                    {
-                        stub_node.next = node;
-                    }
-                    prev = node;
-                }
-                node = prev->next;
-            }
-
-            if( temp_cmp.a != 0 )
-            {
-                c = cvRound( temp_cmp.c / temp_cmp.a );
-            }
-            else
-            {
-                c = cvRound( c0 );
-            }
-            node = acc;
-
-            while( node )
-            {
-                Cv32suf _c;
-                cmp = (_CvPyramid *) (node->data);
-                _c.i = c; cmp->c = _c.f;
-                node = node->next;
-            }
-
-            comp.value = cvRealScalar(c);
-            comp.area = temp_cmp.a;
-            comp.rect.x = temp_cmp.rect.x1;
-            comp.rect.y = temp_cmp.rect.y1;
-            comp.rect.width = temp_cmp.rect.x2 - temp_cmp.rect.x1;
-            comp.rect.height = temp_cmp.rect.y2 - temp_cmp.rect.y1;
-            comp.contour = 0;
-
-            CV_WRITE_SEQ_ELEM( comp, writer );
-            prev = stub_node.next;
-        }
-    }
-
-    cvEndWriteSeq( &writer );
-    return CV_OK;
-}
-
-/****************************************************************************************\
-
-    clusterization segmented components    
-
-\****************************************************************************************/
-static void
-icvExpandBaseLevelC3( _CvPyramidC3 * base_p, _CvPyramidC3 * p,
-                      _CvPyramidBaseC3 * start, int width )
-{
-    int x = (int)((_CvPyramidBaseC3 *) base_p - start);
-    int y = x / width;
-
-    x -= y * width;
-    p->a = 1;
-    p->rect.x1 = (ushort) x;
-    p->rect.y1 = (ushort) y;
-    p->rect.x2 = (ushort) (x + 1);
-    p->rect.y2 = (ushort) (y + 1);
-    p->c = base_p->c;
-}
-
-CvStatus
-icvSegmentClusterC3( CvSeq * cmp_seq, CvSeq * res_seq,
-                     double threshold,
-                     _CvPyramidC3 * first_level_end, CvSize first_level_size )
-{
-    const double eps = 1.;
-    CvSeqWriter writer;
-    CvSeqReader reader;
-    _CvPyramidC3 temp_cmp;
-    _CvPyramidBaseC3 *first_level_start = (_CvPyramidBaseC3 *) first_level_end -
-        first_level_size.width * first_level_size.height;
-    int i, count = cmp_seq->total;
-    int c_blue, c_green, c_red;
-
-    cvStartReadSeq( cmp_seq, &reader, 0 );
-    cvStartAppendToSeq( res_seq, &writer );
-
-    if( threshold < eps )
-    {
-        /* if threshold is too small then simply copy all
-           the components to the output sequence */
-        for( i = 0; i < count; i++ )
-        {
-            CvConnectedComp comp;
-            _CvPyramidC3 *cmp = (_CvPyramidC3 *) (((_CvListNode *) reader.ptr)->data);
-            Cv32suf _c;
-
-            if( cmp < first_level_end )
-            {
-                icvExpandBaseLevelC3( cmp, &temp_cmp, first_level_start,
-                                      first_level_size.width );
-                cmp = &temp_cmp;
-            }
-
-            c_blue = cvRound( cmp->c.blue );
-            c_green = cvRound( cmp->c.green );
-            c_red = cvRound( cmp->c.red );
-            _c.i = c_blue; cmp->c.blue = _c.f;
-            _c.i = c_green; cmp->c.green = _c.f;
-            _c.i = c_red; cmp->c.red = _c.f;
-            comp.value = cvScalar( c_blue, c_green, c_red );
-            comp.area = cmp->a;
-            comp.rect.x = cmp->rect.x1;
-            comp.rect.y = cmp->rect.y1;
-            comp.rect.width = cmp->rect.x2 - cmp->rect.x1;
-            comp.rect.height = cmp->rect.y2 - cmp->rect.y1;
-            comp.contour = 0;
-
-            CV_WRITE_SEQ_ELEM( comp, writer );
-            CV_NEXT_SEQ_ELEM( sizeof( _CvListNode ), reader );
-        }
-    }
-    else
-    {
-        _CvListNode stub_node;
-        _CvListNode *prev = &stub_node;
-
-        stub_node.next = 0;
-
-        for( i = 0; i < count; i++ )
-        {
-            _CvListNode *node = (_CvListNode *) reader.ptr;
-
-            prev->next = node;
-            prev = node;
-            CV_NEXT_SEQ_ELEM( sizeof( _CvListNode ), reader );
-        }
-        prev->next = 0;
-        prev = stub_node.next;
-
-        while( prev )
-        {
-            _CvListNode *node = prev->next;
-            _CvListNode *acc = prev;
-            _CvPyramidC3 *cmp = (_CvPyramidC3 *) (acc->data);
-            CvConnectedComp comp;
-            _CvRGBf c0 = cmp->c;
-
-            if( cmp < first_level_end )
-            {
-                icvExpandBaseLevelC3( cmp, &temp_cmp, first_level_start,
-                                      first_level_size.width );
-            }
-            else
-            {
-                temp_cmp = *cmp;
-                temp_cmp.c.blue *= temp_cmp.a;
-                temp_cmp.c.green *= temp_cmp.a;
-                temp_cmp.c.red *= temp_cmp.a;
-            }
-
-            acc->next = 0;
-            stub_node.next = 0;
-            prev = &stub_node;
-
-            while( node )
-            {
-                cmp = (_CvPyramidC3 *) (node->data);
-                if( _CV_RGB_DIST( c0, cmp->c ) < threshold )
-                {
-                    _CvPyramidC3 temp;
-
-                    /* exclude from global list and add to list of joint component */
-                    prev->next = node->next;
-                    node->next = acc;
-                    acc = node;
-
-                    if( cmp < first_level_end )
-                    {
-                        icvExpandBaseLevelC3( cmp, &temp, first_level_start,
-                                              first_level_size.width );
-                        cmp = &temp;
-                    }
-
-                    temp_cmp.a += cmp->a;
-                    temp_cmp.c.blue += cmp->c.blue * cmp->a;
-                    temp_cmp.c.green += cmp->c.green * cmp->a;
-                    temp_cmp.c.red += cmp->c.red * cmp->a;
-                    icvMaxRoi( &(temp_cmp.rect), &(cmp->rect) );
-                }
-                else
-                {
-                    if( prev == &stub_node )
-                    {
-                        stub_node.next = node;
-                    }
-                    prev = node;
-                }
-                node = prev->next;
-            }
-
-            if( temp_cmp.a != 0 )
-            {
-                c_blue = cvRound( temp_cmp.c.blue / temp_cmp.a );
-                c_green = cvRound( temp_cmp.c.green / temp_cmp.a );
-                c_red = cvRound( temp_cmp.c.red / temp_cmp.a );
-            }
-            else
-            {
-                c_blue = cvRound( c0.blue );
-                c_green = cvRound( c0.green );
-                c_red = cvRound( c0.red );
-            }
-            node = acc;
-
-            while( node )
-            {
-                Cv32suf _c;
-                cmp = (_CvPyramidC3 *) (node->data);
-                _c.i = c_blue; cmp->c.blue = _c.f;
-                _c.i = c_green; cmp->c.green = _c.f;
-                _c.i = c_red; cmp->c.red = _c.f;
-                node = node->next;
-            }
-
-            comp.value = cvScalar( c_blue, c_green, c_red );
-            comp.area = temp_cmp.a;
-            comp.rect.x = temp_cmp.rect.x1;
-            comp.rect.y = temp_cmp.rect.y1;
-            comp.rect.width = temp_cmp.rect.x2 - temp_cmp.rect.x1;
-            comp.rect.height = temp_cmp.rect.y2 - temp_cmp.rect.y1;
-            comp.contour = 0;
-
-            CV_WRITE_SEQ_ELEM( comp, writer );
-            prev = stub_node.next;
-        }
-    }
-
-    cvEndWriteSeq( &writer );
-    return CV_OK;
-}
-
-/****************************************************************************************\
-
-                 definition of the maximum roi size 
-
-\****************************************************************************************/
-void
-icvMaxRoi( _CvRect16u * max_rect, _CvRect16u * cur_rect )
-{
-    if( max_rect->x2 == 0 )
-        *max_rect = *cur_rect;
-    else
-    {
-        if( max_rect->x1 > cur_rect->x1 )
-            max_rect->x1 = cur_rect->x1;
-        if( max_rect->y1 > cur_rect->y1 )
-            max_rect->y1 = cur_rect->y1;
-
-        if( max_rect->x2 < cur_rect->x2 )
-            max_rect->x2 = cur_rect->x2;
-        if( max_rect->y2 < cur_rect->y2 )
-            max_rect->y2 = cur_rect->y2;
-    }
-}
-
-void
-icvMaxRoi1( _CvRect16u * max_rect, int x, int y )
-{
-    if( max_rect->x2 == 0 )
-    {
-        max_rect->x1 = (ushort) x;
-        max_rect->y1 = (ushort) y;
-
-        ++x;
-        ++y;
-
-        max_rect->x2 = (ushort) x;
-        max_rect->y2 = (ushort) y;
-    }
-    else
-    {
-        if( max_rect->x1 > x )
-            max_rect->x1 = (ushort) x;
-        if( max_rect->y1 > y )
-            max_rect->y1 = (ushort) y;
-
-        ++x;
-        ++y;
-
-        if( max_rect->x2 < x )
-            max_rect->x2 = (ushort) x;
-        if( max_rect->y2 < y )
-            max_rect->y2 = (ushort) y;
-    }
-}
-
-
-/*F///////////////////////////////////////////////////////////////////////////////////////
-//    Name:    cvPyrSegmentation
-//    Purpose:
-//      segments an image using pyramid-linking technique
-//    Context: 
-//    Parameters:
-//      src - source image
-//      dst - destination image
-//      comp - pointer to returned connected component sequence
-//      storage - where the sequence is stored
-//      level - maximal pyramid level
-//      threshold1 - first threshold, affecting on detalization level when pyramid
-//                   is built.
-//      threshold2 - second threshold - affects on final components merging.
-//    Returns:
-//    Notes:
-//      Source and destination image must be equal types and channels
-//F*/
-CV_IMPL void
-cvPyrSegmentation( IplImage * src,
-                   IplImage * dst,
-                   CvMemStorage * storage,
-                   CvSeq ** comp, int level, double threshold1, double threshold2 )
-{
-    CvSize src_size, dst_size;
-    uchar *src_data = 0;
-    uchar *dst_data = 0;
-    int src_step = 0, dst_step = 0;
-    int thresh1 = cvRound( threshold1 );
-    int thresh2 = cvRound( threshold2 );
-
-    CV_FUNCNAME( "cvPyrSegmentation" );
-
-    __BEGIN__;
-
-    if( src->depth != IPL_DEPTH_8U )
-        CV_ERROR( CV_BadDepth, cvUnsupportedFormat );
-
-    if( src->depth != dst->depth || src->nChannels != dst->nChannels )
-        CV_ERROR( CV_StsBadArg, "src and dst have different formats" );
-
-    cvGetRawData( src, &src_data, &src_step, &src_size );
-    cvGetRawData( dst, &dst_data, &dst_step, &dst_size );
-
-    if( src_size.width != dst_size.width ||
-        src_size.height != dst_size.height )
-        CV_ERROR( CV_StsBadArg, "src and dst have different ROIs" );
-
-    switch (src->nChannels)
-    {
-    case 1:
-        IPPI_CALL( icvPyrSegmentation8uC1R( src_data, src_step,
-                                            dst_data, dst_step,
-                                            src_size,
-                                            CV_GAUSSIAN_5x5,
-                                            comp, storage, level, thresh1, thresh2 ));
-        break;
-    case 3:
-        IPPI_CALL( icvPyrSegmentation8uC3R( src_data, src_step,
-                                            dst_data, dst_step,
-                                            src_size,
-                                            CV_GAUSSIAN_5x5,
-                                            comp, storage, level, thresh1, thresh2 ));
-        break;
-    default:
-        CV_ERROR( CV_BadNumChannels, cvUnsupportedFormat );
-    }
-    __END__;
-}
-
-
-/* End of file. */