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
|
/* ISC license. */
#include <skalibs/functypes.h>
#include <skalibs/avlnode.h>
#include "avlnode-internal.h"
unsigned int avlnode_insertnode (avlnode *s, unsigned int max, unsigned int r, unsigned int i, dtokfunc_t_ref dtok, cmpfunc_t_ref f, void *p)
{
unsigned int stack[AVLNODE_MAXDEPTH] ;
int spin[AVLNODE_MAXDEPTH] ;
unsigned int sp = 0 ;
{
register void const *k = (*dtok)(s[i].data, p) ;
for (; r < max ; sp++)
{
spin[sp] = avlnode_ufroms((*f)(k, (*dtok)(s[r].data, p), p)) ;
stack[sp] = r ;
r = s[r].child[spin[sp]] ;
}
}
r = i ;
while (sp--)
{
s[stack[sp]].child[spin[sp]] = r ;
r = stack[sp] ;
if (s[r].balance) goto lastfix ;
s[r].balance = avlnode_sfromu(spin[sp]) ;
}
return r ;
lastfix:
if (avlnode_ufroms(s[r].balance) != spin[sp])
{
s[r].balance = 0 ;
return stack[0] ;
}
r = avlnode_rotate_maydouble(s, max, r, !spin[sp], spin[sp] != spin[sp+1]) ;
if (!sp--) return r ;
s[stack[sp]].child[spin[sp]] = r ;
return stack[0] ;
}
|
