passenger 5.0.8 → 5.0.9

Sign up to get free protection for your applications and to get access to all the features.

Potentially problematic release.


This version of passenger might be problematic. Click here for more details.

Files changed (168) hide show
  1. checksums.yaml +8 -8
  2. checksums.yaml.gz.asc +7 -7
  3. data.tar.gz.asc +7 -7
  4. data/.editorconfig +20 -0
  5. data/CHANGELOG +21 -0
  6. data/bin/passenger-install-apache2-module +3 -1
  7. data/build/agents.rb +7 -5
  8. data/build/basics.rb +3 -3
  9. data/build/common_library.rb +52 -30
  10. data/build/cxx_tests.rb +20 -13
  11. data/build/misc.rb +5 -5
  12. data/doc/Design and Architecture.html +1 -1
  13. data/doc/Design and Architecture.txt +1 -1
  14. data/doc/Packaging.html +4 -4
  15. data/doc/Packaging.txt.md +4 -4
  16. data/doc/Users guide Apache.html +22 -9
  17. data/doc/Users guide Apache.idmap.txt +4 -2
  18. data/doc/Users guide Apache.txt +2 -0
  19. data/doc/Users guide Nginx.html +22 -9
  20. data/doc/Users guide Nginx.idmap.txt +4 -2
  21. data/doc/Users guide Nginx.txt +2 -0
  22. data/doc/Users guide Standalone.html +14 -9
  23. data/doc/Users guide Standalone.idmap.txt +4 -2
  24. data/doc/users_guide_snippets/installation.txt +10 -6
  25. data/ext/apache2/Hooks.cpp +13 -2
  26. data/ext/common/ApplicationPool2/Pool/Inspection.h +8 -3
  27. data/ext/common/BackgroundEventLoop.cpp +249 -67
  28. data/ext/common/BackgroundEventLoop.h +5 -5
  29. data/ext/common/Constants.h +1 -1
  30. data/ext/common/InstanceDirectory.h +8 -6
  31. data/ext/common/ServerKit/Context.h +8 -2
  32. data/ext/common/ServerKit/FileBufferedChannel.h +262 -226
  33. data/ext/common/ServerKit/HeaderTable.h +28 -3
  34. data/ext/common/ServerKit/HttpHeaderParser.h +37 -13
  35. data/ext/common/ServerKit/HttpServer.h +17 -1
  36. data/ext/common/ServerKit/Implementation.cpp +2 -0
  37. data/ext/common/ServerKit/Server.h +25 -28
  38. data/ext/common/Utils/IOUtils.cpp +11 -0
  39. data/ext/common/Utils/ProcessMetricsCollector.h +4 -0
  40. data/ext/common/Utils/StrIntUtils.cpp +11 -7
  41. data/ext/common/Utils/StrIntUtils.h +1 -1
  42. data/ext/common/Utils/StrIntUtilsNoStrictAliasing.cpp +21 -16
  43. data/ext/common/agents/Base.cpp +6 -0
  44. data/ext/common/agents/Base.h +2 -0
  45. data/ext/common/agents/HelperAgent/AdminServer.h +25 -25
  46. data/ext/common/agents/HelperAgent/Main.cpp +37 -12
  47. data/ext/common/agents/HelperAgent/RequestHandler.h +18 -20
  48. data/ext/common/agents/HelperAgent/RequestHandler/AppResponse.h +4 -0
  49. data/ext/common/agents/HelperAgent/RequestHandler/ForwardResponse.cpp +10 -6
  50. data/ext/common/agents/HelperAgent/RequestHandler/Hooks.cpp +2 -0
  51. data/ext/common/agents/HelperAgent/RequestHandler/InitRequest.cpp +1 -1
  52. data/ext/common/agents/HelperAgent/RequestHandler/SendRequest.cpp +1 -1
  53. data/ext/common/agents/HelperAgent/RequestHandler/Utils.cpp +9 -2
  54. data/ext/common/agents/HelperAgent/ResponseCache.h +11 -11
  55. data/ext/common/agents/LoggingAgent/AdminServer.h +8 -8
  56. data/ext/common/agents/LoggingAgent/Main.cpp +6 -5
  57. data/ext/common/agents/Watchdog/AdminServer.h +13 -13
  58. data/ext/common/agents/Watchdog/Main.cpp +8 -3
  59. data/ext/libuv/.gitignore +72 -0
  60. data/ext/libuv/AUTHORS +199 -0
  61. data/ext/libuv/ChangeLog +2023 -0
  62. data/ext/libuv/LICENSE +46 -0
  63. data/ext/libuv/Makefile.am +336 -0
  64. data/ext/libuv/README.md +197 -0
  65. data/ext/libuv/checksparse.sh +233 -0
  66. data/ext/libuv/common.gypi +210 -0
  67. data/ext/libuv/configure.ac +67 -0
  68. data/ext/libuv/gyp_uv.py +96 -0
  69. data/ext/libuv/include/android-ifaddrs.h +54 -0
  70. data/ext/libuv/include/pthread-fixes.h +72 -0
  71. data/ext/libuv/include/tree.h +768 -0
  72. data/ext/libuv/include/uv-aix.h +32 -0
  73. data/ext/libuv/include/uv-bsd.h +34 -0
  74. data/ext/libuv/include/uv-darwin.h +61 -0
  75. data/ext/libuv/include/uv-errno.h +418 -0
  76. data/ext/libuv/include/uv-linux.h +34 -0
  77. data/ext/libuv/include/uv-sunos.h +44 -0
  78. data/ext/libuv/include/uv-threadpool.h +37 -0
  79. data/ext/libuv/include/uv-unix.h +383 -0
  80. data/ext/libuv/include/uv-version.h +39 -0
  81. data/ext/libuv/include/uv.h +1455 -0
  82. data/ext/libuv/libuv.pc.in +11 -0
  83. data/ext/libuv/m4/.gitignore +4 -0
  84. data/ext/libuv/m4/as_case.m4 +21 -0
  85. data/ext/libuv/m4/libuv-check-flags.m4 +319 -0
  86. data/ext/libuv/src/fs-poll.c +255 -0
  87. data/ext/libuv/src/heap-inl.h +245 -0
  88. data/ext/libuv/src/inet.c +313 -0
  89. data/ext/libuv/src/queue.h +92 -0
  90. data/ext/libuv/src/threadpool.c +303 -0
  91. data/ext/libuv/src/unix/aix.c +1240 -0
  92. data/ext/libuv/src/unix/android-ifaddrs.c +703 -0
  93. data/ext/libuv/src/unix/async.c +284 -0
  94. data/ext/libuv/src/unix/atomic-ops.h +60 -0
  95. data/ext/libuv/src/unix/core.c +985 -0
  96. data/ext/libuv/src/unix/darwin-proctitle.c +206 -0
  97. data/ext/libuv/src/unix/darwin.c +331 -0
  98. data/ext/libuv/src/unix/dl.c +83 -0
  99. data/ext/libuv/src/unix/freebsd.c +435 -0
  100. data/ext/libuv/src/unix/fs.c +1189 -0
  101. data/ext/libuv/src/unix/fsevents.c +899 -0
  102. data/ext/libuv/src/unix/getaddrinfo.c +202 -0
  103. data/ext/libuv/src/unix/getnameinfo.c +120 -0
  104. data/ext/libuv/src/unix/internal.h +314 -0
  105. data/ext/libuv/src/unix/kqueue.c +418 -0
  106. data/ext/libuv/src/unix/linux-core.c +876 -0
  107. data/ext/libuv/src/unix/linux-inotify.c +257 -0
  108. data/ext/libuv/src/unix/linux-syscalls.c +471 -0
  109. data/ext/libuv/src/unix/linux-syscalls.h +158 -0
  110. data/ext/libuv/src/unix/loop-watcher.c +63 -0
  111. data/ext/libuv/src/unix/loop.c +135 -0
  112. data/ext/libuv/src/unix/netbsd.c +368 -0
  113. data/ext/libuv/src/unix/openbsd.c +384 -0
  114. data/ext/libuv/src/unix/pipe.c +288 -0
  115. data/ext/libuv/src/unix/poll.c +113 -0
  116. data/ext/libuv/src/unix/process.c +551 -0
  117. data/ext/libuv/src/unix/proctitle.c +102 -0
  118. data/ext/libuv/src/unix/pthread-fixes.c +103 -0
  119. data/ext/libuv/src/unix/signal.c +465 -0
  120. data/ext/libuv/src/unix/spinlock.h +53 -0
  121. data/ext/libuv/src/unix/stream.c +1598 -0
  122. data/ext/libuv/src/unix/sunos.c +763 -0
  123. data/ext/libuv/src/unix/tcp.c +327 -0
  124. data/ext/libuv/src/unix/thread.c +519 -0
  125. data/ext/libuv/src/unix/timer.c +172 -0
  126. data/ext/libuv/src/unix/tty.c +265 -0
  127. data/ext/libuv/src/unix/udp.c +833 -0
  128. data/ext/libuv/src/uv-common.c +544 -0
  129. data/ext/libuv/src/uv-common.h +214 -0
  130. data/ext/libuv/src/version.c +49 -0
  131. data/ext/libuv/uv.gyp +487 -0
  132. data/ext/nginx/ContentHandler.c +21 -10
  133. data/ext/nginx/ngx_http_passenger_module.c +7 -0
  134. data/ext/oxt/implementation.cpp +9 -2
  135. data/ext/oxt/initialize.hpp +5 -1
  136. data/lib/phusion_passenger.rb +3 -3
  137. data/lib/phusion_passenger/admin_tools/instance.rb +10 -6
  138. data/lib/phusion_passenger/admin_tools/instance_registry.rb +6 -2
  139. data/lib/phusion_passenger/packaging.rb +3 -4
  140. data/lib/phusion_passenger/platform_info.rb +13 -1
  141. data/lib/phusion_passenger/platform_info/apache.rb +15 -4
  142. data/lib/phusion_passenger/platform_info/apache_detector.rb +5 -1
  143. data/lib/phusion_passenger/rack/thread_handler_extension.rb +184 -99
  144. data/lib/phusion_passenger/request_handler/thread_handler.rb +13 -6
  145. data/lib/phusion_passenger/standalone/start_command.rb +2 -2
  146. data/resources/templates/apache2/apache_install_broken.txt.erb +2 -1
  147. metadata +99 -22
  148. metadata.gz.asc +7 -7
  149. data/ext/libeio/Changes +0 -76
  150. data/ext/libeio/LICENSE +0 -36
  151. data/ext/libeio/Makefile.am +0 -15
  152. data/ext/libeio/Makefile.in +0 -694
  153. data/ext/libeio/aclocal.m4 +0 -9418
  154. data/ext/libeio/autogen.sh +0 -3
  155. data/ext/libeio/config.guess +0 -1540
  156. data/ext/libeio/config.h.in +0 -136
  157. data/ext/libeio/config.sub +0 -1779
  158. data/ext/libeio/configure +0 -14822
  159. data/ext/libeio/configure.ac +0 -22
  160. data/ext/libeio/demo.c +0 -194
  161. data/ext/libeio/ecb.h +0 -714
  162. data/ext/libeio/eio.c +0 -2818
  163. data/ext/libeio/eio.h +0 -414
  164. data/ext/libeio/install-sh +0 -520
  165. data/ext/libeio/libeio.m4 +0 -195
  166. data/ext/libeio/ltmain.sh +0 -9636
  167. data/ext/libeio/missing +0 -376
  168. data/ext/libeio/xthread.h +0 -166
@@ -0,0 +1,96 @@
1
+ #!/usr/bin/env python
2
+
3
+ import os
4
+ import platform
5
+ import sys
6
+
7
+ try:
8
+ import multiprocessing.synchronize
9
+ gyp_parallel_support = True
10
+ except ImportError:
11
+ gyp_parallel_support = False
12
+
13
+
14
+ CC = os.environ.get('CC', 'cc')
15
+ script_dir = os.path.dirname(__file__)
16
+ uv_root = os.path.normpath(script_dir)
17
+ output_dir = os.path.join(os.path.abspath(uv_root), 'out')
18
+
19
+ sys.path.insert(0, os.path.join(uv_root, 'build', 'gyp', 'pylib'))
20
+ try:
21
+ import gyp
22
+ except ImportError:
23
+ print('You need to install gyp in build/gyp first. See the README.')
24
+ sys.exit(42)
25
+
26
+
27
+ def host_arch():
28
+ machine = platform.machine()
29
+ if machine == 'i386': return 'ia32'
30
+ if machine == 'x86_64': return 'x64'
31
+ if machine.startswith('arm'): return 'arm'
32
+ if machine.startswith('mips'): return 'mips'
33
+ return machine # Return as-is and hope for the best.
34
+
35
+
36
+ def run_gyp(args):
37
+ rc = gyp.main(args)
38
+ if rc != 0:
39
+ print 'Error running GYP'
40
+ sys.exit(rc)
41
+
42
+
43
+ if __name__ == '__main__':
44
+ args = sys.argv[1:]
45
+
46
+ # GYP bug.
47
+ # On msvs it will crash if it gets an absolute path.
48
+ # On Mac/make it will crash if it doesn't get an absolute path.
49
+ if sys.platform == 'win32':
50
+ args.append(os.path.join(uv_root, 'uv.gyp'))
51
+ common_fn = os.path.join(uv_root, 'common.gypi')
52
+ options_fn = os.path.join(uv_root, 'options.gypi')
53
+ # we force vs 2010 over 2008 which would otherwise be the default for gyp
54
+ if not os.environ.get('GYP_MSVS_VERSION'):
55
+ os.environ['GYP_MSVS_VERSION'] = '2010'
56
+ else:
57
+ args.append(os.path.join(os.path.abspath(uv_root), 'uv.gyp'))
58
+ common_fn = os.path.join(os.path.abspath(uv_root), 'common.gypi')
59
+ options_fn = os.path.join(os.path.abspath(uv_root), 'options.gypi')
60
+
61
+ if os.path.exists(common_fn):
62
+ args.extend(['-I', common_fn])
63
+
64
+ if os.path.exists(options_fn):
65
+ args.extend(['-I', options_fn])
66
+
67
+ args.append('--depth=' + uv_root)
68
+
69
+ # There's a bug with windows which doesn't allow this feature.
70
+ if sys.platform != 'win32':
71
+ if '-f' not in args:
72
+ args.extend('-f make'.split())
73
+ if 'eclipse' not in args and 'ninja' not in args:
74
+ args.extend(['-Goutput_dir=' + output_dir])
75
+ args.extend(['--generator-output', output_dir])
76
+
77
+ if not any(a.startswith('-Dhost_arch=') for a in args):
78
+ args.append('-Dhost_arch=%s' % host_arch())
79
+
80
+ if not any(a.startswith('-Dtarget_arch=') for a in args):
81
+ args.append('-Dtarget_arch=%s' % host_arch())
82
+
83
+ if not any(a.startswith('-Duv_library=') for a in args):
84
+ args.append('-Duv_library=static_library')
85
+
86
+ if not any(a.startswith('-Dcomponent=') for a in args):
87
+ args.append('-Dcomponent=static_library')
88
+
89
+ # Some platforms (OpenBSD for example) don't have multiprocessing.synchronize
90
+ # so gyp must be run with --no-parallel
91
+ if not gyp_parallel_support:
92
+ args.append('--no-parallel')
93
+
94
+ gyp_args = list(args)
95
+ print gyp_args
96
+ run_gyp(gyp_args)
@@ -0,0 +1,54 @@
1
+ /*
2
+ * Copyright (c) 1995, 1999
3
+ * Berkeley Software Design, Inc. All rights reserved.
4
+ *
5
+ * Redistribution and use in source and binary forms, with or without
6
+ * modification, are permitted provided that the following conditions
7
+ * are met:
8
+ * 1. Redistributions of source code must retain the above copyright
9
+ * notice, this list of conditions and the following disclaimer.
10
+ *
11
+ * THIS SOFTWARE IS PROVIDED BY Berkeley Software Design, Inc. ``AS IS'' AND
12
+ * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
13
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
14
+ * ARE DISCLAIMED. IN NO EVENT SHALL Berkeley Software Design, Inc. BE LIABLE
15
+ * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
16
+ * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
17
+ * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
18
+ * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
19
+ * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
20
+ * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
21
+ * SUCH DAMAGE.
22
+ *
23
+ * BSDI ifaddrs.h,v 2.5 2000/02/23 14:51:59 dab Exp
24
+ */
25
+
26
+ #ifndef _IFADDRS_H_
27
+ #define _IFADDRS_H_
28
+
29
+ struct ifaddrs {
30
+ struct ifaddrs *ifa_next;
31
+ char *ifa_name;
32
+ unsigned int ifa_flags;
33
+ struct sockaddr *ifa_addr;
34
+ struct sockaddr *ifa_netmask;
35
+ struct sockaddr *ifa_dstaddr;
36
+ void *ifa_data;
37
+ };
38
+
39
+ /*
40
+ * This may have been defined in <net/if.h>. Note that if <net/if.h> is
41
+ * to be included it must be included before this header file.
42
+ */
43
+ #ifndef ifa_broadaddr
44
+ #define ifa_broadaddr ifa_dstaddr /* broadcast address interface */
45
+ #endif
46
+
47
+ #include <sys/cdefs.h>
48
+
49
+ __BEGIN_DECLS
50
+ extern int getifaddrs(struct ifaddrs **ifap);
51
+ extern void freeifaddrs(struct ifaddrs *ifa);
52
+ __END_DECLS
53
+
54
+ #endif
@@ -0,0 +1,72 @@
1
+ /* Copyright (c) 2013, Sony Mobile Communications AB
2
+ * Copyright (c) 2012, Google Inc.
3
+ All rights reserved.
4
+
5
+ Redistribution and use in source and binary forms, with or without
6
+ modification, are permitted provided that the following conditions are
7
+ met:
8
+
9
+ * Redistributions of source code must retain the above copyright
10
+ notice, this list of conditions and the following disclaimer.
11
+ * Redistributions in binary form must reproduce the above
12
+ copyright notice, this list of conditions and the following disclaimer
13
+ in the documentation and/or other materials provided with the
14
+ distribution.
15
+ * Neither the name of Google Inc. nor the names of its
16
+ contributors may be used to endorse or promote products derived from
17
+ this software without specific prior written permission.
18
+
19
+ THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
20
+ "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
21
+ LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
22
+ A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
23
+ OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
24
+ SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
25
+ LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
26
+ DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
27
+ THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
28
+ (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
29
+ OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
30
+ */
31
+
32
+ #ifndef GOOGLE_BREAKPAD_COMMON_ANDROID_TESTING_PTHREAD_FIXES_H
33
+ #define GOOGLE_BREAKPAD_COMMON_ANDROID_TESTING_PTHREAD_FIXES_H
34
+
35
+ #include <pthread.h>
36
+
37
+
38
+ /*Android doesn't provide pthread_barrier_t for now.*/
39
+ #ifndef PTHREAD_BARRIER_SERIAL_THREAD
40
+
41
+ /* Anything except 0 will do here.*/
42
+ #define PTHREAD_BARRIER_SERIAL_THREAD 0x12345
43
+
44
+ typedef struct {
45
+ pthread_mutex_t mutex;
46
+ pthread_cond_t cond;
47
+ unsigned count;
48
+ } pthread_barrier_t;
49
+
50
+ int pthread_barrier_init(pthread_barrier_t* barrier,
51
+ const void* barrier_attr,
52
+ unsigned count);
53
+
54
+ int pthread_barrier_wait(pthread_barrier_t* barrier);
55
+ int pthread_barrier_destroy(pthread_barrier_t *barrier);
56
+ #endif /* defined(PTHREAD_BARRIER_SERIAL_THREAD) */
57
+
58
+ int pthread_yield(void);
59
+
60
+ /* Workaround pthread_sigmask() returning EINVAL on versions < 4.1 by
61
+ * replacing all calls to pthread_sigmask with sigprocmask. See:
62
+ * https://android.googlesource.com/platform/bionic/+/9bf330b5
63
+ * https://code.google.com/p/android/issues/detail?id=15337
64
+ */
65
+ int uv__pthread_sigmask(int how, const sigset_t* set, sigset_t* oset);
66
+
67
+ #ifdef pthread_sigmask
68
+ #undef pthread_sigmask
69
+ #endif
70
+ #define pthread_sigmask(how, set, oldset) uv__pthread_sigmask(how, set, oldset)
71
+
72
+ #endif /* GOOGLE_BREAKPAD_COMMON_ANDROID_TESTING_PTHREAD_FIXES_H */
@@ -0,0 +1,768 @@
1
+ /*-
2
+ * Copyright 2002 Niels Provos <provos@citi.umich.edu>
3
+ * All rights reserved.
4
+ *
5
+ * Redistribution and use in source and binary forms, with or without
6
+ * modification, are permitted provided that the following conditions
7
+ * are met:
8
+ * 1. Redistributions of source code must retain the above copyright
9
+ * notice, this list of conditions and the following disclaimer.
10
+ * 2. Redistributions in binary form must reproduce the above copyright
11
+ * notice, this list of conditions and the following disclaimer in the
12
+ * documentation and/or other materials provided with the distribution.
13
+ *
14
+ * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
15
+ * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
16
+ * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
17
+ * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
18
+ * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
19
+ * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
20
+ * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
21
+ * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
22
+ * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
23
+ * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
24
+ */
25
+
26
+ #ifndef UV_TREE_H_
27
+ #define UV_TREE_H_
28
+
29
+ #ifndef UV__UNUSED
30
+ # if __GNUC__
31
+ # define UV__UNUSED __attribute__((unused))
32
+ # else
33
+ # define UV__UNUSED
34
+ # endif
35
+ #endif
36
+
37
+ /*
38
+ * This file defines data structures for different types of trees:
39
+ * splay trees and red-black trees.
40
+ *
41
+ * A splay tree is a self-organizing data structure. Every operation
42
+ * on the tree causes a splay to happen. The splay moves the requested
43
+ * node to the root of the tree and partly rebalances it.
44
+ *
45
+ * This has the benefit that request locality causes faster lookups as
46
+ * the requested nodes move to the top of the tree. On the other hand,
47
+ * every lookup causes memory writes.
48
+ *
49
+ * The Balance Theorem bounds the total access time for m operations
50
+ * and n inserts on an initially empty tree as O((m + n)lg n). The
51
+ * amortized cost for a sequence of m accesses to a splay tree is O(lg n);
52
+ *
53
+ * A red-black tree is a binary search tree with the node color as an
54
+ * extra attribute. It fulfills a set of conditions:
55
+ * - every search path from the root to a leaf consists of the
56
+ * same number of black nodes,
57
+ * - each red node (except for the root) has a black parent,
58
+ * - each leaf node is black.
59
+ *
60
+ * Every operation on a red-black tree is bounded as O(lg n).
61
+ * The maximum height of a red-black tree is 2lg (n+1).
62
+ */
63
+
64
+ #define SPLAY_HEAD(name, type) \
65
+ struct name { \
66
+ struct type *sph_root; /* root of the tree */ \
67
+ }
68
+
69
+ #define SPLAY_INITIALIZER(root) \
70
+ { NULL }
71
+
72
+ #define SPLAY_INIT(root) do { \
73
+ (root)->sph_root = NULL; \
74
+ } while (/*CONSTCOND*/ 0)
75
+
76
+ #define SPLAY_ENTRY(type) \
77
+ struct { \
78
+ struct type *spe_left; /* left element */ \
79
+ struct type *spe_right; /* right element */ \
80
+ }
81
+
82
+ #define SPLAY_LEFT(elm, field) (elm)->field.spe_left
83
+ #define SPLAY_RIGHT(elm, field) (elm)->field.spe_right
84
+ #define SPLAY_ROOT(head) (head)->sph_root
85
+ #define SPLAY_EMPTY(head) (SPLAY_ROOT(head) == NULL)
86
+
87
+ /* SPLAY_ROTATE_{LEFT,RIGHT} expect that tmp hold SPLAY_{RIGHT,LEFT} */
88
+ #define SPLAY_ROTATE_RIGHT(head, tmp, field) do { \
89
+ SPLAY_LEFT((head)->sph_root, field) = SPLAY_RIGHT(tmp, field); \
90
+ SPLAY_RIGHT(tmp, field) = (head)->sph_root; \
91
+ (head)->sph_root = tmp; \
92
+ } while (/*CONSTCOND*/ 0)
93
+
94
+ #define SPLAY_ROTATE_LEFT(head, tmp, field) do { \
95
+ SPLAY_RIGHT((head)->sph_root, field) = SPLAY_LEFT(tmp, field); \
96
+ SPLAY_LEFT(tmp, field) = (head)->sph_root; \
97
+ (head)->sph_root = tmp; \
98
+ } while (/*CONSTCOND*/ 0)
99
+
100
+ #define SPLAY_LINKLEFT(head, tmp, field) do { \
101
+ SPLAY_LEFT(tmp, field) = (head)->sph_root; \
102
+ tmp = (head)->sph_root; \
103
+ (head)->sph_root = SPLAY_LEFT((head)->sph_root, field); \
104
+ } while (/*CONSTCOND*/ 0)
105
+
106
+ #define SPLAY_LINKRIGHT(head, tmp, field) do { \
107
+ SPLAY_RIGHT(tmp, field) = (head)->sph_root; \
108
+ tmp = (head)->sph_root; \
109
+ (head)->sph_root = SPLAY_RIGHT((head)->sph_root, field); \
110
+ } while (/*CONSTCOND*/ 0)
111
+
112
+ #define SPLAY_ASSEMBLE(head, node, left, right, field) do { \
113
+ SPLAY_RIGHT(left, field) = SPLAY_LEFT((head)->sph_root, field); \
114
+ SPLAY_LEFT(right, field) = SPLAY_RIGHT((head)->sph_root, field); \
115
+ SPLAY_LEFT((head)->sph_root, field) = SPLAY_RIGHT(node, field); \
116
+ SPLAY_RIGHT((head)->sph_root, field) = SPLAY_LEFT(node, field); \
117
+ } while (/*CONSTCOND*/ 0)
118
+
119
+ /* Generates prototypes and inline functions */
120
+
121
+ #define SPLAY_PROTOTYPE(name, type, field, cmp) \
122
+ void name##_SPLAY(struct name *, struct type *); \
123
+ void name##_SPLAY_MINMAX(struct name *, int); \
124
+ struct type *name##_SPLAY_INSERT(struct name *, struct type *); \
125
+ struct type *name##_SPLAY_REMOVE(struct name *, struct type *); \
126
+ \
127
+ /* Finds the node with the same key as elm */ \
128
+ static __inline struct type * \
129
+ name##_SPLAY_FIND(struct name *head, struct type *elm) \
130
+ { \
131
+ if (SPLAY_EMPTY(head)) \
132
+ return(NULL); \
133
+ name##_SPLAY(head, elm); \
134
+ if ((cmp)(elm, (head)->sph_root) == 0) \
135
+ return (head->sph_root); \
136
+ return (NULL); \
137
+ } \
138
+ \
139
+ static __inline struct type * \
140
+ name##_SPLAY_NEXT(struct name *head, struct type *elm) \
141
+ { \
142
+ name##_SPLAY(head, elm); \
143
+ if (SPLAY_RIGHT(elm, field) != NULL) { \
144
+ elm = SPLAY_RIGHT(elm, field); \
145
+ while (SPLAY_LEFT(elm, field) != NULL) { \
146
+ elm = SPLAY_LEFT(elm, field); \
147
+ } \
148
+ } else \
149
+ elm = NULL; \
150
+ return (elm); \
151
+ } \
152
+ \
153
+ static __inline struct type * \
154
+ name##_SPLAY_MIN_MAX(struct name *head, int val) \
155
+ { \
156
+ name##_SPLAY_MINMAX(head, val); \
157
+ return (SPLAY_ROOT(head)); \
158
+ }
159
+
160
+ /* Main splay operation.
161
+ * Moves node close to the key of elm to top
162
+ */
163
+ #define SPLAY_GENERATE(name, type, field, cmp) \
164
+ struct type * \
165
+ name##_SPLAY_INSERT(struct name *head, struct type *elm) \
166
+ { \
167
+ if (SPLAY_EMPTY(head)) { \
168
+ SPLAY_LEFT(elm, field) = SPLAY_RIGHT(elm, field) = NULL; \
169
+ } else { \
170
+ int __comp; \
171
+ name##_SPLAY(head, elm); \
172
+ __comp = (cmp)(elm, (head)->sph_root); \
173
+ if(__comp < 0) { \
174
+ SPLAY_LEFT(elm, field) = SPLAY_LEFT((head)->sph_root, field); \
175
+ SPLAY_RIGHT(elm, field) = (head)->sph_root; \
176
+ SPLAY_LEFT((head)->sph_root, field) = NULL; \
177
+ } else if (__comp > 0) { \
178
+ SPLAY_RIGHT(elm, field) = SPLAY_RIGHT((head)->sph_root, field); \
179
+ SPLAY_LEFT(elm, field) = (head)->sph_root; \
180
+ SPLAY_RIGHT((head)->sph_root, field) = NULL; \
181
+ } else \
182
+ return ((head)->sph_root); \
183
+ } \
184
+ (head)->sph_root = (elm); \
185
+ return (NULL); \
186
+ } \
187
+ \
188
+ struct type * \
189
+ name##_SPLAY_REMOVE(struct name *head, struct type *elm) \
190
+ { \
191
+ struct type *__tmp; \
192
+ if (SPLAY_EMPTY(head)) \
193
+ return (NULL); \
194
+ name##_SPLAY(head, elm); \
195
+ if ((cmp)(elm, (head)->sph_root) == 0) { \
196
+ if (SPLAY_LEFT((head)->sph_root, field) == NULL) { \
197
+ (head)->sph_root = SPLAY_RIGHT((head)->sph_root, field); \
198
+ } else { \
199
+ __tmp = SPLAY_RIGHT((head)->sph_root, field); \
200
+ (head)->sph_root = SPLAY_LEFT((head)->sph_root, field); \
201
+ name##_SPLAY(head, elm); \
202
+ SPLAY_RIGHT((head)->sph_root, field) = __tmp; \
203
+ } \
204
+ return (elm); \
205
+ } \
206
+ return (NULL); \
207
+ } \
208
+ \
209
+ void \
210
+ name##_SPLAY(struct name *head, struct type *elm) \
211
+ { \
212
+ struct type __node, *__left, *__right, *__tmp; \
213
+ int __comp; \
214
+ \
215
+ SPLAY_LEFT(&__node, field) = SPLAY_RIGHT(&__node, field) = NULL; \
216
+ __left = __right = &__node; \
217
+ \
218
+ while ((__comp = (cmp)(elm, (head)->sph_root)) != 0) { \
219
+ if (__comp < 0) { \
220
+ __tmp = SPLAY_LEFT((head)->sph_root, field); \
221
+ if (__tmp == NULL) \
222
+ break; \
223
+ if ((cmp)(elm, __tmp) < 0){ \
224
+ SPLAY_ROTATE_RIGHT(head, __tmp, field); \
225
+ if (SPLAY_LEFT((head)->sph_root, field) == NULL) \
226
+ break; \
227
+ } \
228
+ SPLAY_LINKLEFT(head, __right, field); \
229
+ } else if (__comp > 0) { \
230
+ __tmp = SPLAY_RIGHT((head)->sph_root, field); \
231
+ if (__tmp == NULL) \
232
+ break; \
233
+ if ((cmp)(elm, __tmp) > 0){ \
234
+ SPLAY_ROTATE_LEFT(head, __tmp, field); \
235
+ if (SPLAY_RIGHT((head)->sph_root, field) == NULL) \
236
+ break; \
237
+ } \
238
+ SPLAY_LINKRIGHT(head, __left, field); \
239
+ } \
240
+ } \
241
+ SPLAY_ASSEMBLE(head, &__node, __left, __right, field); \
242
+ } \
243
+ \
244
+ /* Splay with either the minimum or the maximum element \
245
+ * Used to find minimum or maximum element in tree. \
246
+ */ \
247
+ void name##_SPLAY_MINMAX(struct name *head, int __comp) \
248
+ { \
249
+ struct type __node, *__left, *__right, *__tmp; \
250
+ \
251
+ SPLAY_LEFT(&__node, field) = SPLAY_RIGHT(&__node, field) = NULL; \
252
+ __left = __right = &__node; \
253
+ \
254
+ while (1) { \
255
+ if (__comp < 0) { \
256
+ __tmp = SPLAY_LEFT((head)->sph_root, field); \
257
+ if (__tmp == NULL) \
258
+ break; \
259
+ if (__comp < 0){ \
260
+ SPLAY_ROTATE_RIGHT(head, __tmp, field); \
261
+ if (SPLAY_LEFT((head)->sph_root, field) == NULL) \
262
+ break; \
263
+ } \
264
+ SPLAY_LINKLEFT(head, __right, field); \
265
+ } else if (__comp > 0) { \
266
+ __tmp = SPLAY_RIGHT((head)->sph_root, field); \
267
+ if (__tmp == NULL) \
268
+ break; \
269
+ if (__comp > 0) { \
270
+ SPLAY_ROTATE_LEFT(head, __tmp, field); \
271
+ if (SPLAY_RIGHT((head)->sph_root, field) == NULL) \
272
+ break; \
273
+ } \
274
+ SPLAY_LINKRIGHT(head, __left, field); \
275
+ } \
276
+ } \
277
+ SPLAY_ASSEMBLE(head, &__node, __left, __right, field); \
278
+ }
279
+
280
+ #define SPLAY_NEGINF -1
281
+ #define SPLAY_INF 1
282
+
283
+ #define SPLAY_INSERT(name, x, y) name##_SPLAY_INSERT(x, y)
284
+ #define SPLAY_REMOVE(name, x, y) name##_SPLAY_REMOVE(x, y)
285
+ #define SPLAY_FIND(name, x, y) name##_SPLAY_FIND(x, y)
286
+ #define SPLAY_NEXT(name, x, y) name##_SPLAY_NEXT(x, y)
287
+ #define SPLAY_MIN(name, x) (SPLAY_EMPTY(x) ? NULL \
288
+ : name##_SPLAY_MIN_MAX(x, SPLAY_NEGINF))
289
+ #define SPLAY_MAX(name, x) (SPLAY_EMPTY(x) ? NULL \
290
+ : name##_SPLAY_MIN_MAX(x, SPLAY_INF))
291
+
292
+ #define SPLAY_FOREACH(x, name, head) \
293
+ for ((x) = SPLAY_MIN(name, head); \
294
+ (x) != NULL; \
295
+ (x) = SPLAY_NEXT(name, head, x))
296
+
297
+ /* Macros that define a red-black tree */
298
+ #define RB_HEAD(name, type) \
299
+ struct name { \
300
+ struct type *rbh_root; /* root of the tree */ \
301
+ }
302
+
303
+ #define RB_INITIALIZER(root) \
304
+ { NULL }
305
+
306
+ #define RB_INIT(root) do { \
307
+ (root)->rbh_root = NULL; \
308
+ } while (/*CONSTCOND*/ 0)
309
+
310
+ #define RB_BLACK 0
311
+ #define RB_RED 1
312
+ #define RB_ENTRY(type) \
313
+ struct { \
314
+ struct type *rbe_left; /* left element */ \
315
+ struct type *rbe_right; /* right element */ \
316
+ struct type *rbe_parent; /* parent element */ \
317
+ int rbe_color; /* node color */ \
318
+ }
319
+
320
+ #define RB_LEFT(elm, field) (elm)->field.rbe_left
321
+ #define RB_RIGHT(elm, field) (elm)->field.rbe_right
322
+ #define RB_PARENT(elm, field) (elm)->field.rbe_parent
323
+ #define RB_COLOR(elm, field) (elm)->field.rbe_color
324
+ #define RB_ROOT(head) (head)->rbh_root
325
+ #define RB_EMPTY(head) (RB_ROOT(head) == NULL)
326
+
327
+ #define RB_SET(elm, parent, field) do { \
328
+ RB_PARENT(elm, field) = parent; \
329
+ RB_LEFT(elm, field) = RB_RIGHT(elm, field) = NULL; \
330
+ RB_COLOR(elm, field) = RB_RED; \
331
+ } while (/*CONSTCOND*/ 0)
332
+
333
+ #define RB_SET_BLACKRED(black, red, field) do { \
334
+ RB_COLOR(black, field) = RB_BLACK; \
335
+ RB_COLOR(red, field) = RB_RED; \
336
+ } while (/*CONSTCOND*/ 0)
337
+
338
+ #ifndef RB_AUGMENT
339
+ #define RB_AUGMENT(x) do {} while (0)
340
+ #endif
341
+
342
+ #define RB_ROTATE_LEFT(head, elm, tmp, field) do { \
343
+ (tmp) = RB_RIGHT(elm, field); \
344
+ if ((RB_RIGHT(elm, field) = RB_LEFT(tmp, field)) != NULL) { \
345
+ RB_PARENT(RB_LEFT(tmp, field), field) = (elm); \
346
+ } \
347
+ RB_AUGMENT(elm); \
348
+ if ((RB_PARENT(tmp, field) = RB_PARENT(elm, field)) != NULL) { \
349
+ if ((elm) == RB_LEFT(RB_PARENT(elm, field), field)) \
350
+ RB_LEFT(RB_PARENT(elm, field), field) = (tmp); \
351
+ else \
352
+ RB_RIGHT(RB_PARENT(elm, field), field) = (tmp); \
353
+ } else \
354
+ (head)->rbh_root = (tmp); \
355
+ RB_LEFT(tmp, field) = (elm); \
356
+ RB_PARENT(elm, field) = (tmp); \
357
+ RB_AUGMENT(tmp); \
358
+ if ((RB_PARENT(tmp, field))) \
359
+ RB_AUGMENT(RB_PARENT(tmp, field)); \
360
+ } while (/*CONSTCOND*/ 0)
361
+
362
+ #define RB_ROTATE_RIGHT(head, elm, tmp, field) do { \
363
+ (tmp) = RB_LEFT(elm, field); \
364
+ if ((RB_LEFT(elm, field) = RB_RIGHT(tmp, field)) != NULL) { \
365
+ RB_PARENT(RB_RIGHT(tmp, field), field) = (elm); \
366
+ } \
367
+ RB_AUGMENT(elm); \
368
+ if ((RB_PARENT(tmp, field) = RB_PARENT(elm, field)) != NULL) { \
369
+ if ((elm) == RB_LEFT(RB_PARENT(elm, field), field)) \
370
+ RB_LEFT(RB_PARENT(elm, field), field) = (tmp); \
371
+ else \
372
+ RB_RIGHT(RB_PARENT(elm, field), field) = (tmp); \
373
+ } else \
374
+ (head)->rbh_root = (tmp); \
375
+ RB_RIGHT(tmp, field) = (elm); \
376
+ RB_PARENT(elm, field) = (tmp); \
377
+ RB_AUGMENT(tmp); \
378
+ if ((RB_PARENT(tmp, field))) \
379
+ RB_AUGMENT(RB_PARENT(tmp, field)); \
380
+ } while (/*CONSTCOND*/ 0)
381
+
382
+ /* Generates prototypes and inline functions */
383
+ #define RB_PROTOTYPE(name, type, field, cmp) \
384
+ RB_PROTOTYPE_INTERNAL(name, type, field, cmp,)
385
+ #define RB_PROTOTYPE_STATIC(name, type, field, cmp) \
386
+ RB_PROTOTYPE_INTERNAL(name, type, field, cmp, UV__UNUSED static)
387
+ #define RB_PROTOTYPE_INTERNAL(name, type, field, cmp, attr) \
388
+ attr void name##_RB_INSERT_COLOR(struct name *, struct type *); \
389
+ attr void name##_RB_REMOVE_COLOR(struct name *, struct type *, struct type *);\
390
+ attr struct type *name##_RB_REMOVE(struct name *, struct type *); \
391
+ attr struct type *name##_RB_INSERT(struct name *, struct type *); \
392
+ attr struct type *name##_RB_FIND(struct name *, struct type *); \
393
+ attr struct type *name##_RB_NFIND(struct name *, struct type *); \
394
+ attr struct type *name##_RB_NEXT(struct type *); \
395
+ attr struct type *name##_RB_PREV(struct type *); \
396
+ attr struct type *name##_RB_MINMAX(struct name *, int); \
397
+ \
398
+
399
+ /* Main rb operation.
400
+ * Moves node close to the key of elm to top
401
+ */
402
+ #define RB_GENERATE(name, type, field, cmp) \
403
+ RB_GENERATE_INTERNAL(name, type, field, cmp,)
404
+ #define RB_GENERATE_STATIC(name, type, field, cmp) \
405
+ RB_GENERATE_INTERNAL(name, type, field, cmp, UV__UNUSED static)
406
+ #define RB_GENERATE_INTERNAL(name, type, field, cmp, attr) \
407
+ attr void \
408
+ name##_RB_INSERT_COLOR(struct name *head, struct type *elm) \
409
+ { \
410
+ struct type *parent, *gparent, *tmp; \
411
+ while ((parent = RB_PARENT(elm, field)) != NULL && \
412
+ RB_COLOR(parent, field) == RB_RED) { \
413
+ gparent = RB_PARENT(parent, field); \
414
+ if (parent == RB_LEFT(gparent, field)) { \
415
+ tmp = RB_RIGHT(gparent, field); \
416
+ if (tmp && RB_COLOR(tmp, field) == RB_RED) { \
417
+ RB_COLOR(tmp, field) = RB_BLACK; \
418
+ RB_SET_BLACKRED(parent, gparent, field); \
419
+ elm = gparent; \
420
+ continue; \
421
+ } \
422
+ if (RB_RIGHT(parent, field) == elm) { \
423
+ RB_ROTATE_LEFT(head, parent, tmp, field); \
424
+ tmp = parent; \
425
+ parent = elm; \
426
+ elm = tmp; \
427
+ } \
428
+ RB_SET_BLACKRED(parent, gparent, field); \
429
+ RB_ROTATE_RIGHT(head, gparent, tmp, field); \
430
+ } else { \
431
+ tmp = RB_LEFT(gparent, field); \
432
+ if (tmp && RB_COLOR(tmp, field) == RB_RED) { \
433
+ RB_COLOR(tmp, field) = RB_BLACK; \
434
+ RB_SET_BLACKRED(parent, gparent, field); \
435
+ elm = gparent; \
436
+ continue; \
437
+ } \
438
+ if (RB_LEFT(parent, field) == elm) { \
439
+ RB_ROTATE_RIGHT(head, parent, tmp, field); \
440
+ tmp = parent; \
441
+ parent = elm; \
442
+ elm = tmp; \
443
+ } \
444
+ RB_SET_BLACKRED(parent, gparent, field); \
445
+ RB_ROTATE_LEFT(head, gparent, tmp, field); \
446
+ } \
447
+ } \
448
+ RB_COLOR(head->rbh_root, field) = RB_BLACK; \
449
+ } \
450
+ \
451
+ attr void \
452
+ name##_RB_REMOVE_COLOR(struct name *head, struct type *parent, \
453
+ struct type *elm) \
454
+ { \
455
+ struct type *tmp; \
456
+ while ((elm == NULL || RB_COLOR(elm, field) == RB_BLACK) && \
457
+ elm != RB_ROOT(head)) { \
458
+ if (RB_LEFT(parent, field) == elm) { \
459
+ tmp = RB_RIGHT(parent, field); \
460
+ if (RB_COLOR(tmp, field) == RB_RED) { \
461
+ RB_SET_BLACKRED(tmp, parent, field); \
462
+ RB_ROTATE_LEFT(head, parent, tmp, field); \
463
+ tmp = RB_RIGHT(parent, field); \
464
+ } \
465
+ if ((RB_LEFT(tmp, field) == NULL || \
466
+ RB_COLOR(RB_LEFT(tmp, field), field) == RB_BLACK) && \
467
+ (RB_RIGHT(tmp, field) == NULL || \
468
+ RB_COLOR(RB_RIGHT(tmp, field), field) == RB_BLACK)) { \
469
+ RB_COLOR(tmp, field) = RB_RED; \
470
+ elm = parent; \
471
+ parent = RB_PARENT(elm, field); \
472
+ } else { \
473
+ if (RB_RIGHT(tmp, field) == NULL || \
474
+ RB_COLOR(RB_RIGHT(tmp, field), field) == RB_BLACK) { \
475
+ struct type *oleft; \
476
+ if ((oleft = RB_LEFT(tmp, field)) \
477
+ != NULL) \
478
+ RB_COLOR(oleft, field) = RB_BLACK; \
479
+ RB_COLOR(tmp, field) = RB_RED; \
480
+ RB_ROTATE_RIGHT(head, tmp, oleft, field); \
481
+ tmp = RB_RIGHT(parent, field); \
482
+ } \
483
+ RB_COLOR(tmp, field) = RB_COLOR(parent, field); \
484
+ RB_COLOR(parent, field) = RB_BLACK; \
485
+ if (RB_RIGHT(tmp, field)) \
486
+ RB_COLOR(RB_RIGHT(tmp, field), field) = RB_BLACK; \
487
+ RB_ROTATE_LEFT(head, parent, tmp, field); \
488
+ elm = RB_ROOT(head); \
489
+ break; \
490
+ } \
491
+ } else { \
492
+ tmp = RB_LEFT(parent, field); \
493
+ if (RB_COLOR(tmp, field) == RB_RED) { \
494
+ RB_SET_BLACKRED(tmp, parent, field); \
495
+ RB_ROTATE_RIGHT(head, parent, tmp, field); \
496
+ tmp = RB_LEFT(parent, field); \
497
+ } \
498
+ if ((RB_LEFT(tmp, field) == NULL || \
499
+ RB_COLOR(RB_LEFT(tmp, field), field) == RB_BLACK) && \
500
+ (RB_RIGHT(tmp, field) == NULL || \
501
+ RB_COLOR(RB_RIGHT(tmp, field), field) == RB_BLACK)) { \
502
+ RB_COLOR(tmp, field) = RB_RED; \
503
+ elm = parent; \
504
+ parent = RB_PARENT(elm, field); \
505
+ } else { \
506
+ if (RB_LEFT(tmp, field) == NULL || \
507
+ RB_COLOR(RB_LEFT(tmp, field), field) == RB_BLACK) { \
508
+ struct type *oright; \
509
+ if ((oright = RB_RIGHT(tmp, field)) \
510
+ != NULL) \
511
+ RB_COLOR(oright, field) = RB_BLACK; \
512
+ RB_COLOR(tmp, field) = RB_RED; \
513
+ RB_ROTATE_LEFT(head, tmp, oright, field); \
514
+ tmp = RB_LEFT(parent, field); \
515
+ } \
516
+ RB_COLOR(tmp, field) = RB_COLOR(parent, field); \
517
+ RB_COLOR(parent, field) = RB_BLACK; \
518
+ if (RB_LEFT(tmp, field)) \
519
+ RB_COLOR(RB_LEFT(tmp, field), field) = RB_BLACK; \
520
+ RB_ROTATE_RIGHT(head, parent, tmp, field); \
521
+ elm = RB_ROOT(head); \
522
+ break; \
523
+ } \
524
+ } \
525
+ } \
526
+ if (elm) \
527
+ RB_COLOR(elm, field) = RB_BLACK; \
528
+ } \
529
+ \
530
+ attr struct type * \
531
+ name##_RB_REMOVE(struct name *head, struct type *elm) \
532
+ { \
533
+ struct type *child, *parent, *old = elm; \
534
+ int color; \
535
+ if (RB_LEFT(elm, field) == NULL) \
536
+ child = RB_RIGHT(elm, field); \
537
+ else if (RB_RIGHT(elm, field) == NULL) \
538
+ child = RB_LEFT(elm, field); \
539
+ else { \
540
+ struct type *left; \
541
+ elm = RB_RIGHT(elm, field); \
542
+ while ((left = RB_LEFT(elm, field)) != NULL) \
543
+ elm = left; \
544
+ child = RB_RIGHT(elm, field); \
545
+ parent = RB_PARENT(elm, field); \
546
+ color = RB_COLOR(elm, field); \
547
+ if (child) \
548
+ RB_PARENT(child, field) = parent; \
549
+ if (parent) { \
550
+ if (RB_LEFT(parent, field) == elm) \
551
+ RB_LEFT(parent, field) = child; \
552
+ else \
553
+ RB_RIGHT(parent, field) = child; \
554
+ RB_AUGMENT(parent); \
555
+ } else \
556
+ RB_ROOT(head) = child; \
557
+ if (RB_PARENT(elm, field) == old) \
558
+ parent = elm; \
559
+ (elm)->field = (old)->field; \
560
+ if (RB_PARENT(old, field)) { \
561
+ if (RB_LEFT(RB_PARENT(old, field), field) == old) \
562
+ RB_LEFT(RB_PARENT(old, field), field) = elm; \
563
+ else \
564
+ RB_RIGHT(RB_PARENT(old, field), field) = elm; \
565
+ RB_AUGMENT(RB_PARENT(old, field)); \
566
+ } else \
567
+ RB_ROOT(head) = elm; \
568
+ RB_PARENT(RB_LEFT(old, field), field) = elm; \
569
+ if (RB_RIGHT(old, field)) \
570
+ RB_PARENT(RB_RIGHT(old, field), field) = elm; \
571
+ if (parent) { \
572
+ left = parent; \
573
+ do { \
574
+ RB_AUGMENT(left); \
575
+ } while ((left = RB_PARENT(left, field)) != NULL); \
576
+ } \
577
+ goto color; \
578
+ } \
579
+ parent = RB_PARENT(elm, field); \
580
+ color = RB_COLOR(elm, field); \
581
+ if (child) \
582
+ RB_PARENT(child, field) = parent; \
583
+ if (parent) { \
584
+ if (RB_LEFT(parent, field) == elm) \
585
+ RB_LEFT(parent, field) = child; \
586
+ else \
587
+ RB_RIGHT(parent, field) = child; \
588
+ RB_AUGMENT(parent); \
589
+ } else \
590
+ RB_ROOT(head) = child; \
591
+ color: \
592
+ if (color == RB_BLACK) \
593
+ name##_RB_REMOVE_COLOR(head, parent, child); \
594
+ return (old); \
595
+ } \
596
+ \
597
+ /* Inserts a node into the RB tree */ \
598
+ attr struct type * \
599
+ name##_RB_INSERT(struct name *head, struct type *elm) \
600
+ { \
601
+ struct type *tmp; \
602
+ struct type *parent = NULL; \
603
+ int comp = 0; \
604
+ tmp = RB_ROOT(head); \
605
+ while (tmp) { \
606
+ parent = tmp; \
607
+ comp = (cmp)(elm, parent); \
608
+ if (comp < 0) \
609
+ tmp = RB_LEFT(tmp, field); \
610
+ else if (comp > 0) \
611
+ tmp = RB_RIGHT(tmp, field); \
612
+ else \
613
+ return (tmp); \
614
+ } \
615
+ RB_SET(elm, parent, field); \
616
+ if (parent != NULL) { \
617
+ if (comp < 0) \
618
+ RB_LEFT(parent, field) = elm; \
619
+ else \
620
+ RB_RIGHT(parent, field) = elm; \
621
+ RB_AUGMENT(parent); \
622
+ } else \
623
+ RB_ROOT(head) = elm; \
624
+ name##_RB_INSERT_COLOR(head, elm); \
625
+ return (NULL); \
626
+ } \
627
+ \
628
+ /* Finds the node with the same key as elm */ \
629
+ attr struct type * \
630
+ name##_RB_FIND(struct name *head, struct type *elm) \
631
+ { \
632
+ struct type *tmp = RB_ROOT(head); \
633
+ int comp; \
634
+ while (tmp) { \
635
+ comp = cmp(elm, tmp); \
636
+ if (comp < 0) \
637
+ tmp = RB_LEFT(tmp, field); \
638
+ else if (comp > 0) \
639
+ tmp = RB_RIGHT(tmp, field); \
640
+ else \
641
+ return (tmp); \
642
+ } \
643
+ return (NULL); \
644
+ } \
645
+ \
646
+ /* Finds the first node greater than or equal to the search key */ \
647
+ attr struct type * \
648
+ name##_RB_NFIND(struct name *head, struct type *elm) \
649
+ { \
650
+ struct type *tmp = RB_ROOT(head); \
651
+ struct type *res = NULL; \
652
+ int comp; \
653
+ while (tmp) { \
654
+ comp = cmp(elm, tmp); \
655
+ if (comp < 0) { \
656
+ res = tmp; \
657
+ tmp = RB_LEFT(tmp, field); \
658
+ } \
659
+ else if (comp > 0) \
660
+ tmp = RB_RIGHT(tmp, field); \
661
+ else \
662
+ return (tmp); \
663
+ } \
664
+ return (res); \
665
+ } \
666
+ \
667
+ /* ARGSUSED */ \
668
+ attr struct type * \
669
+ name##_RB_NEXT(struct type *elm) \
670
+ { \
671
+ if (RB_RIGHT(elm, field)) { \
672
+ elm = RB_RIGHT(elm, field); \
673
+ while (RB_LEFT(elm, field)) \
674
+ elm = RB_LEFT(elm, field); \
675
+ } else { \
676
+ if (RB_PARENT(elm, field) && \
677
+ (elm == RB_LEFT(RB_PARENT(elm, field), field))) \
678
+ elm = RB_PARENT(elm, field); \
679
+ else { \
680
+ while (RB_PARENT(elm, field) && \
681
+ (elm == RB_RIGHT(RB_PARENT(elm, field), field))) \
682
+ elm = RB_PARENT(elm, field); \
683
+ elm = RB_PARENT(elm, field); \
684
+ } \
685
+ } \
686
+ return (elm); \
687
+ } \
688
+ \
689
+ /* ARGSUSED */ \
690
+ attr struct type * \
691
+ name##_RB_PREV(struct type *elm) \
692
+ { \
693
+ if (RB_LEFT(elm, field)) { \
694
+ elm = RB_LEFT(elm, field); \
695
+ while (RB_RIGHT(elm, field)) \
696
+ elm = RB_RIGHT(elm, field); \
697
+ } else { \
698
+ if (RB_PARENT(elm, field) && \
699
+ (elm == RB_RIGHT(RB_PARENT(elm, field), field))) \
700
+ elm = RB_PARENT(elm, field); \
701
+ else { \
702
+ while (RB_PARENT(elm, field) && \
703
+ (elm == RB_LEFT(RB_PARENT(elm, field), field))) \
704
+ elm = RB_PARENT(elm, field); \
705
+ elm = RB_PARENT(elm, field); \
706
+ } \
707
+ } \
708
+ return (elm); \
709
+ } \
710
+ \
711
+ attr struct type * \
712
+ name##_RB_MINMAX(struct name *head, int val) \
713
+ { \
714
+ struct type *tmp = RB_ROOT(head); \
715
+ struct type *parent = NULL; \
716
+ while (tmp) { \
717
+ parent = tmp; \
718
+ if (val < 0) \
719
+ tmp = RB_LEFT(tmp, field); \
720
+ else \
721
+ tmp = RB_RIGHT(tmp, field); \
722
+ } \
723
+ return (parent); \
724
+ }
725
+
726
+ #define RB_NEGINF -1
727
+ #define RB_INF 1
728
+
729
+ #define RB_INSERT(name, x, y) name##_RB_INSERT(x, y)
730
+ #define RB_REMOVE(name, x, y) name##_RB_REMOVE(x, y)
731
+ #define RB_FIND(name, x, y) name##_RB_FIND(x, y)
732
+ #define RB_NFIND(name, x, y) name##_RB_NFIND(x, y)
733
+ #define RB_NEXT(name, x, y) name##_RB_NEXT(y)
734
+ #define RB_PREV(name, x, y) name##_RB_PREV(y)
735
+ #define RB_MIN(name, x) name##_RB_MINMAX(x, RB_NEGINF)
736
+ #define RB_MAX(name, x) name##_RB_MINMAX(x, RB_INF)
737
+
738
+ #define RB_FOREACH(x, name, head) \
739
+ for ((x) = RB_MIN(name, head); \
740
+ (x) != NULL; \
741
+ (x) = name##_RB_NEXT(x))
742
+
743
+ #define RB_FOREACH_FROM(x, name, y) \
744
+ for ((x) = (y); \
745
+ ((x) != NULL) && ((y) = name##_RB_NEXT(x), (x) != NULL); \
746
+ (x) = (y))
747
+
748
+ #define RB_FOREACH_SAFE(x, name, head, y) \
749
+ for ((x) = RB_MIN(name, head); \
750
+ ((x) != NULL) && ((y) = name##_RB_NEXT(x), (x) != NULL); \
751
+ (x) = (y))
752
+
753
+ #define RB_FOREACH_REVERSE(x, name, head) \
754
+ for ((x) = RB_MAX(name, head); \
755
+ (x) != NULL; \
756
+ (x) = name##_RB_PREV(x))
757
+
758
+ #define RB_FOREACH_REVERSE_FROM(x, name, y) \
759
+ for ((x) = (y); \
760
+ ((x) != NULL) && ((y) = name##_RB_PREV(x), (x) != NULL); \
761
+ (x) = (y))
762
+
763
+ #define RB_FOREACH_REVERSE_SAFE(x, name, head, y) \
764
+ for ((x) = RB_MAX(name, head); \
765
+ ((x) != NULL) && ((y) = name##_RB_PREV(x), (x) != NULL); \
766
+ (x) = (y))
767
+
768
+ #endif /* UV_TREE_H_ */