File "thread__pthread_8c_source.html"
Full Path: /home/attunedd/public_html/byp/izo/con7ext_sym404/rintoar.txt/opt/alt/ruby19/share/doc/ruby/html/d1/d1c/thread__pthread_8c_source.html
File size: 250.02 KB
MIME-type: text/html
Charset: utf-8
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/xhtml;charset=UTF-8"/>
<meta http-equiv="X-UA-Compatible" content="IE=9"/>
<meta name="generator" content="Doxygen 1.8.14"/>
<meta name="viewport" content="width=device-width, initial-scale=1"/>
<title>Ruby: thread_pthread.c Source File</title>
<link href="../../tabs.css" rel="stylesheet" type="text/css"/>
<script type="text/javascript" src="../../jquery.js"></script>
<script type="text/javascript" src="../../dynsections.js"></script>
<link href="../../doxygen.css" rel="stylesheet" type="text/css" />
</head>
<body>
<div id="top"><!-- do not remove this div, it is closed by doxygen! -->
<div id="titlearea">
<table cellspacing="0" cellpadding="0">
<tbody>
<tr style="height: 56px;">
<td id="projectalign" style="padding-left: 0.5em;">
<div id="projectname">Ruby
 <span id="projectnumber">1.9.3p551(2014-11-13revision48407)</span>
</div>
</td>
</tr>
</tbody>
</table>
</div>
<!-- end header part -->
<!-- Generated by Doxygen 1.8.14 -->
<script type="text/javascript" src="../../menudata.js"></script>
<script type="text/javascript" src="../../menu.js"></script>
<script type="text/javascript">
/* @license magnet:?xt=urn:btih:cf05388f2679ee054f2beb29a391d25f4e673ac3&dn=gpl-2.0.txt GPL-v2 */
$(function() {
initMenu('../../',false,false,'search.php','Search');
});
/* @license-end */</script>
<div id="main-nav"></div>
</div><!-- top -->
<div class="header">
<div class="headertitle">
<div class="title">thread_pthread.c</div> </div>
</div><!--header-->
<div class="contents">
<a href="../../d1/d1c/thread__pthread_8c.html">Go to the documentation of this file.</a><div class="fragment"><div class="line"><a name="l00001"></a><span class="lineno"> 1</span> <span class="comment">/* -*-c-*- */</span></div><div class="line"><a name="l00002"></a><span class="lineno"> 2</span> <span class="comment">/**********************************************************************</span></div><div class="line"><a name="l00003"></a><span class="lineno"> 3</span> <span class="comment"></span></div><div class="line"><a name="l00004"></a><span class="lineno"> 4</span> <span class="comment"> thread_pthread.c -</span></div><div class="line"><a name="l00005"></a><span class="lineno"> 5</span> <span class="comment"></span></div><div class="line"><a name="l00006"></a><span class="lineno"> 6</span> <span class="comment"> $Author: usa $</span></div><div class="line"><a name="l00007"></a><span class="lineno"> 7</span> <span class="comment"></span></div><div class="line"><a name="l00008"></a><span class="lineno"> 8</span> <span class="comment"> Copyright (C) 2004-2007 Koichi Sasada</span></div><div class="line"><a name="l00009"></a><span class="lineno"> 9</span> <span class="comment"></span></div><div class="line"><a name="l00010"></a><span class="lineno"> 10</span> <span class="comment">**********************************************************************/</span></div><div class="line"><a name="l00011"></a><span class="lineno"> 11</span> </div><div class="line"><a name="l00012"></a><span class="lineno"> 12</span> <span class="preprocessor">#ifdef THREAD_SYSTEM_DEPENDENT_IMPLEMENTATION</span></div><div class="line"><a name="l00013"></a><span class="lineno"> 13</span> </div><div class="line"><a name="l00014"></a><span class="lineno"> 14</span> <span class="preprocessor">#include "<a class="code" href="../../d0/daa/gc_8h.html">gc.h</a>"</span></div><div class="line"><a name="l00015"></a><span class="lineno"> 15</span> </div><div class="line"><a name="l00016"></a><span class="lineno"> 16</span> <span class="preprocessor">#ifdef HAVE_SYS_RESOURCE_H</span></div><div class="line"><a name="l00017"></a><span class="lineno"> 17</span> <span class="preprocessor">#include <sys/resource.h></span></div><div class="line"><a name="l00018"></a><span class="lineno"> 18</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00019"></a><span class="lineno"> 19</span> <span class="preprocessor">#ifdef HAVE_THR_STKSEGMENT</span></div><div class="line"><a name="l00020"></a><span class="lineno"> 20</span> <span class="preprocessor">#include <thread.h></span></div><div class="line"><a name="l00021"></a><span class="lineno"> 21</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00022"></a><span class="lineno"> 22</span> <span class="preprocessor">#if HAVE_FCNTL_H</span></div><div class="line"><a name="l00023"></a><span class="lineno"> 23</span> <span class="preprocessor">#include <fcntl.h></span></div><div class="line"><a name="l00024"></a><span class="lineno"> 24</span> <span class="preprocessor">#elif HAVE_SYS_FCNTL_H</span></div><div class="line"><a name="l00025"></a><span class="lineno"> 25</span> <span class="preprocessor">#include <sys/fcntl.h></span></div><div class="line"><a name="l00026"></a><span class="lineno"> 26</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00027"></a><span class="lineno"> 27</span> <span class="preprocessor">#if defined(HAVE_SYS_TIME_H)</span></div><div class="line"><a name="l00028"></a><span class="lineno"> 28</span> <span class="preprocessor">#include <sys/time.h></span></div><div class="line"><a name="l00029"></a><span class="lineno"> 29</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00030"></a><span class="lineno"> 30</span> </div><div class="line"><a name="l00031"></a><span class="lineno"> 31</span> <span class="keyword">static</span> <span class="keywordtype">void</span> native_mutex_lock(pthread_mutex_t *lock);</div><div class="line"><a name="l00032"></a><span class="lineno"> 32</span> <span class="keyword">static</span> <span class="keywordtype">void</span> native_mutex_unlock(pthread_mutex_t *lock);</div><div class="line"><a name="l00033"></a><span class="lineno"> 33</span> <span class="keyword">static</span> <span class="keywordtype">int</span> native_mutex_trylock(pthread_mutex_t *lock);</div><div class="line"><a name="l00034"></a><span class="lineno"> 34</span> <span class="keyword">static</span> <span class="keywordtype">void</span> native_mutex_initialize(pthread_mutex_t *lock);</div><div class="line"><a name="l00035"></a><span class="lineno"> 35</span> <span class="keyword">static</span> <span class="keywordtype">void</span> native_mutex_destroy(pthread_mutex_t *lock);</div><div class="line"><a name="l00036"></a><span class="lineno"> 36</span> <span class="keyword">static</span> <span class="keywordtype">void</span> native_cond_signal(<a class="code" href="../../d0/d6c/structrb__thread__cond__struct.html">rb_thread_cond_t</a> *<a class="code" href="../../d5/d11/ripper_8c.html#a9c9363cead2d8e8616cb63b4eea79655">cond</a>);</div><div class="line"><a name="l00037"></a><span class="lineno"> 37</span> <span class="keyword">static</span> <span class="keywordtype">void</span> native_cond_broadcast(<a class="code" href="../../d0/d6c/structrb__thread__cond__struct.html">rb_thread_cond_t</a> *<a class="code" href="../../d5/d11/ripper_8c.html#a9c9363cead2d8e8616cb63b4eea79655">cond</a>);</div><div class="line"><a name="l00038"></a><span class="lineno"> 38</span> <span class="keyword">static</span> <span class="keywordtype">void</span> native_cond_wait(<a class="code" href="../../d0/d6c/structrb__thread__cond__struct.html">rb_thread_cond_t</a> *<a class="code" href="../../d5/d11/ripper_8c.html#a9c9363cead2d8e8616cb63b4eea79655">cond</a>, pthread_mutex_t *mutex);</div><div class="line"><a name="l00039"></a><span class="lineno"> 39</span> <span class="keyword">static</span> <span class="keywordtype">void</span> native_cond_initialize(<a class="code" href="../../d0/d6c/structrb__thread__cond__struct.html">rb_thread_cond_t</a> *<a class="code" href="../../d5/d11/ripper_8c.html#a9c9363cead2d8e8616cb63b4eea79655">cond</a>, <span class="keywordtype">int</span> flags);</div><div class="line"><a name="l00040"></a><span class="lineno"> 40</span> <span class="keyword">static</span> <span class="keywordtype">void</span> native_cond_destroy(<a class="code" href="../../d0/d6c/structrb__thread__cond__struct.html">rb_thread_cond_t</a> *<a class="code" href="../../d5/d11/ripper_8c.html#a9c9363cead2d8e8616cb63b4eea79655">cond</a>);</div><div class="line"><a name="l00041"></a><span class="lineno"> 41</span> <span class="keyword">static</span> pthread_t timer_thread_id;</div><div class="line"><a name="l00042"></a><span class="lineno"> 42</span> </div><div class="line"><a name="l00043"></a><span class="lineno"> 43</span> <span class="preprocessor">#define RB_CONDATTR_CLOCK_MONOTONIC 1</span></div><div class="line"><a name="l00044"></a><span class="lineno"> 44</span> </div><div class="line"><a name="l00045"></a><span class="lineno"> 45</span> <span class="preprocessor">#if defined(HAVE_PTHREAD_CONDATTR_SETCLOCK) && defined(HAVE_CLOCKID_T) && \</span></div><div class="line"><a name="l00046"></a><span class="lineno"> 46</span> <span class="preprocessor"> defined(CLOCK_REALTIME) && defined(CLOCK_MONOTONIC) && defined(HAVE_CLOCK_GETTIME)</span></div><div class="line"><a name="l00047"></a><span class="lineno"> 47</span> <span class="preprocessor">#define USE_MONOTONIC_COND 1</span></div><div class="line"><a name="l00048"></a><span class="lineno"> 48</span> <span class="preprocessor">#else</span></div><div class="line"><a name="l00049"></a><span class="lineno"> 49</span> <span class="preprocessor">#define USE_MONOTONIC_COND 0</span></div><div class="line"><a name="l00050"></a><span class="lineno"> 50</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00051"></a><span class="lineno"> 51</span> </div><div class="line"><a name="l00052"></a><span class="lineno"> 52</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l00053"></a><span class="lineno"> 53</span> gvl_acquire_common(<a class="code" href="../../db/d74/structrb__vm__struct.html">rb_vm_t</a> *vm)</div><div class="line"><a name="l00054"></a><span class="lineno"> 54</span> {</div><div class="line"><a name="l00055"></a><span class="lineno"> 55</span>  <span class="keywordflow">if</span> (vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#a615841146b7c9b86aa90bec80144fdd4">acquired</a>) {</div><div class="line"><a name="l00056"></a><span class="lineno"> 56</span> </div><div class="line"><a name="l00057"></a><span class="lineno"> 57</span>  vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#ad29605e99fcf3859e286ef2765f03149">waiting</a>++;</div><div class="line"><a name="l00058"></a><span class="lineno"> 58</span>  <span class="keywordflow">if</span> (vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#ad29605e99fcf3859e286ef2765f03149">waiting</a> == 1) {</div><div class="line"><a name="l00059"></a><span class="lineno"> 59</span>  <span class="comment">/* transit to polling mode */</span></div><div class="line"><a name="l00060"></a><span class="lineno"> 60</span>  <a class="code" href="../../d8/d32/vm__core_8h.html#a9d4e96f3fcd05963b5d43fc2ecbee3bb">rb_thread_wakeup_timer_thread</a>();</div><div class="line"><a name="l00061"></a><span class="lineno"> 61</span>  }</div><div class="line"><a name="l00062"></a><span class="lineno"> 62</span> </div><div class="line"><a name="l00063"></a><span class="lineno"> 63</span>  <span class="keywordflow">while</span> (vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#a615841146b7c9b86aa90bec80144fdd4">acquired</a>) {</div><div class="line"><a name="l00064"></a><span class="lineno"> 64</span>  native_cond_wait(&vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#addd15fc58f843f57ef20f2eb476aa42c">cond</a>, &vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#a948be6b7a74025df722091e4da6d9701">lock</a>);</div><div class="line"><a name="l00065"></a><span class="lineno"> 65</span>  }</div><div class="line"><a name="l00066"></a><span class="lineno"> 66</span> </div><div class="line"><a name="l00067"></a><span class="lineno"> 67</span>  vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#ad29605e99fcf3859e286ef2765f03149">waiting</a>--;</div><div class="line"><a name="l00068"></a><span class="lineno"> 68</span> </div><div class="line"><a name="l00069"></a><span class="lineno"> 69</span>  <span class="keywordflow">if</span> (vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#a871bd453d1a5d4321e11a4d0a3983c78">need_yield</a>) {</div><div class="line"><a name="l00070"></a><span class="lineno"> 70</span>  vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#a871bd453d1a5d4321e11a4d0a3983c78">need_yield</a> = 0;</div><div class="line"><a name="l00071"></a><span class="lineno"> 71</span>  native_cond_signal(&vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#acc4c61d6a2560d4639098de581cfc2b2">switch_cond</a>);</div><div class="line"><a name="l00072"></a><span class="lineno"> 72</span>  }</div><div class="line"><a name="l00073"></a><span class="lineno"> 73</span>  }</div><div class="line"><a name="l00074"></a><span class="lineno"> 74</span> </div><div class="line"><a name="l00075"></a><span class="lineno"> 75</span>  vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#a615841146b7c9b86aa90bec80144fdd4">acquired</a> = 1;</div><div class="line"><a name="l00076"></a><span class="lineno"> 76</span> }</div><div class="line"><a name="l00077"></a><span class="lineno"> 77</span> </div><div class="line"><a name="l00078"></a><span class="lineno"> 78</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l00079"></a><span class="lineno"> 79</span> gvl_acquire(<a class="code" href="../../db/d74/structrb__vm__struct.html">rb_vm_t</a> *vm, <a class="code" href="../../d2/d66/structrb__thread__struct.html">rb_thread_t</a> *<a class="code" href="../../d5/d7d/structevent__call__args.html#ad264dd84c59c2477096698b2967a9408">th</a>)</div><div class="line"><a name="l00080"></a><span class="lineno"> 80</span> {</div><div class="line"><a name="l00081"></a><span class="lineno"> 81</span>  native_mutex_lock(&vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#a948be6b7a74025df722091e4da6d9701">lock</a>);</div><div class="line"><a name="l00082"></a><span class="lineno"> 82</span>  gvl_acquire_common(vm);</div><div class="line"><a name="l00083"></a><span class="lineno"> 83</span>  native_mutex_unlock(&vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#a948be6b7a74025df722091e4da6d9701">lock</a>);</div><div class="line"><a name="l00084"></a><span class="lineno"> 84</span> }</div><div class="line"><a name="l00085"></a><span class="lineno"> 85</span> </div><div class="line"><a name="l00086"></a><span class="lineno"> 86</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l00087"></a><span class="lineno"> 87</span> gvl_release_common(<a class="code" href="../../db/d74/structrb__vm__struct.html">rb_vm_t</a> *vm)</div><div class="line"><a name="l00088"></a><span class="lineno"> 88</span> {</div><div class="line"><a name="l00089"></a><span class="lineno"> 89</span>  vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#a615841146b7c9b86aa90bec80144fdd4">acquired</a> = 0;</div><div class="line"><a name="l00090"></a><span class="lineno"> 90</span>  <span class="keywordflow">if</span> (vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#ad29605e99fcf3859e286ef2765f03149">waiting</a> > 0)</div><div class="line"><a name="l00091"></a><span class="lineno"> 91</span>  native_cond_signal(&vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#addd15fc58f843f57ef20f2eb476aa42c">cond</a>);</div><div class="line"><a name="l00092"></a><span class="lineno"> 92</span> }</div><div class="line"><a name="l00093"></a><span class="lineno"> 93</span> </div><div class="line"><a name="l00094"></a><span class="lineno"> 94</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l00095"></a><span class="lineno"> 95</span> gvl_release(<a class="code" href="../../db/d74/structrb__vm__struct.html">rb_vm_t</a> *vm)</div><div class="line"><a name="l00096"></a><span class="lineno"> 96</span> {</div><div class="line"><a name="l00097"></a><span class="lineno"> 97</span>  native_mutex_lock(&vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#a948be6b7a74025df722091e4da6d9701">lock</a>);</div><div class="line"><a name="l00098"></a><span class="lineno"> 98</span>  gvl_release_common(vm);</div><div class="line"><a name="l00099"></a><span class="lineno"> 99</span>  native_mutex_unlock(&vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#a948be6b7a74025df722091e4da6d9701">lock</a>);</div><div class="line"><a name="l00100"></a><span class="lineno"> 100</span> }</div><div class="line"><a name="l00101"></a><span class="lineno"> 101</span> </div><div class="line"><a name="l00102"></a><span class="lineno"> 102</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l00103"></a><span class="lineno"> 103</span> gvl_yield(<a class="code" href="../../db/d74/structrb__vm__struct.html">rb_vm_t</a> *vm, <a class="code" href="../../d2/d66/structrb__thread__struct.html">rb_thread_t</a> *<a class="code" href="../../d5/d7d/structevent__call__args.html#ad264dd84c59c2477096698b2967a9408">th</a>)</div><div class="line"><a name="l00104"></a><span class="lineno"> 104</span> {</div><div class="line"><a name="l00105"></a><span class="lineno"> 105</span>  native_mutex_lock(&vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#a948be6b7a74025df722091e4da6d9701">lock</a>);</div><div class="line"><a name="l00106"></a><span class="lineno"> 106</span> </div><div class="line"><a name="l00107"></a><span class="lineno"> 107</span>  gvl_release_common(vm);</div><div class="line"><a name="l00108"></a><span class="lineno"> 108</span> </div><div class="line"><a name="l00109"></a><span class="lineno"> 109</span>  <span class="comment">/* An another thread is processing GVL yield. */</span></div><div class="line"><a name="l00110"></a><span class="lineno"> 110</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d8/d32/vm__core_8h.html#ab10d0a221f4d7a706701b806c8135fd7">UNLIKELY</a>(vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#ae665ab760ae2fdf50a508074f72a9edb">wait_yield</a>)) {</div><div class="line"><a name="l00111"></a><span class="lineno"> 111</span>  <span class="keywordflow">while</span> (vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#ae665ab760ae2fdf50a508074f72a9edb">wait_yield</a>)</div><div class="line"><a name="l00112"></a><span class="lineno"> 112</span>  native_cond_wait(&vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#a34e139f2c60eee1ed4a0a9685cf1ab64">switch_wait_cond</a>, &vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#a948be6b7a74025df722091e4da6d9701">lock</a>);</div><div class="line"><a name="l00113"></a><span class="lineno"> 113</span>  <span class="keywordflow">goto</span> acquire;</div><div class="line"><a name="l00114"></a><span class="lineno"> 114</span>  }</div><div class="line"><a name="l00115"></a><span class="lineno"> 115</span> </div><div class="line"><a name="l00116"></a><span class="lineno"> 116</span>  <span class="keywordflow">if</span> (vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#ad29605e99fcf3859e286ef2765f03149">waiting</a> > 0) {</div><div class="line"><a name="l00117"></a><span class="lineno"> 117</span>  <span class="comment">/* Wait until another thread task take GVL. */</span></div><div class="line"><a name="l00118"></a><span class="lineno"> 118</span>  vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#a871bd453d1a5d4321e11a4d0a3983c78">need_yield</a> = 1;</div><div class="line"><a name="l00119"></a><span class="lineno"> 119</span>  vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#ae665ab760ae2fdf50a508074f72a9edb">wait_yield</a> = 1;</div><div class="line"><a name="l00120"></a><span class="lineno"> 120</span>  <span class="keywordflow">while</span> (vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#a871bd453d1a5d4321e11a4d0a3983c78">need_yield</a>)</div><div class="line"><a name="l00121"></a><span class="lineno"> 121</span>  native_cond_wait(&vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#acc4c61d6a2560d4639098de581cfc2b2">switch_cond</a>, &vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#a948be6b7a74025df722091e4da6d9701">lock</a>);</div><div class="line"><a name="l00122"></a><span class="lineno"> 122</span>  vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#ae665ab760ae2fdf50a508074f72a9edb">wait_yield</a> = 0;</div><div class="line"><a name="l00123"></a><span class="lineno"> 123</span>  }</div><div class="line"><a name="l00124"></a><span class="lineno"> 124</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l00125"></a><span class="lineno"> 125</span>  native_mutex_unlock(&vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#a948be6b7a74025df722091e4da6d9701">lock</a>);</div><div class="line"><a name="l00126"></a><span class="lineno"> 126</span>  sched_yield();</div><div class="line"><a name="l00127"></a><span class="lineno"> 127</span>  native_mutex_lock(&vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#a948be6b7a74025df722091e4da6d9701">lock</a>);</div><div class="line"><a name="l00128"></a><span class="lineno"> 128</span>  }</div><div class="line"><a name="l00129"></a><span class="lineno"> 129</span> </div><div class="line"><a name="l00130"></a><span class="lineno"> 130</span>  native_cond_broadcast(&vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#a34e139f2c60eee1ed4a0a9685cf1ab64">switch_wait_cond</a>);</div><div class="line"><a name="l00131"></a><span class="lineno"> 131</span>  acquire:</div><div class="line"><a name="l00132"></a><span class="lineno"> 132</span>  gvl_acquire_common(vm);</div><div class="line"><a name="l00133"></a><span class="lineno"> 133</span>  native_mutex_unlock(&vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#a948be6b7a74025df722091e4da6d9701">lock</a>);</div><div class="line"><a name="l00134"></a><span class="lineno"> 134</span> }</div><div class="line"><a name="l00135"></a><span class="lineno"> 135</span> </div><div class="line"><a name="l00136"></a><span class="lineno"> 136</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l00137"></a><span class="lineno"> 137</span> gvl_init(<a class="code" href="../../db/d74/structrb__vm__struct.html">rb_vm_t</a> *vm)</div><div class="line"><a name="l00138"></a><span class="lineno"> 138</span> {</div><div class="line"><a name="l00139"></a><span class="lineno"> 139</span>  native_mutex_initialize(&vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#a948be6b7a74025df722091e4da6d9701">lock</a>);</div><div class="line"><a name="l00140"></a><span class="lineno"> 140</span>  native_cond_initialize(&vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#addd15fc58f843f57ef20f2eb476aa42c">cond</a>, RB_CONDATTR_CLOCK_MONOTONIC);</div><div class="line"><a name="l00141"></a><span class="lineno"> 141</span>  native_cond_initialize(&vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#acc4c61d6a2560d4639098de581cfc2b2">switch_cond</a>, RB_CONDATTR_CLOCK_MONOTONIC);</div><div class="line"><a name="l00142"></a><span class="lineno"> 142</span>  native_cond_initialize(&vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#a34e139f2c60eee1ed4a0a9685cf1ab64">switch_wait_cond</a>, RB_CONDATTR_CLOCK_MONOTONIC);</div><div class="line"><a name="l00143"></a><span class="lineno"> 143</span>  vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#a615841146b7c9b86aa90bec80144fdd4">acquired</a> = 0;</div><div class="line"><a name="l00144"></a><span class="lineno"> 144</span>  vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#ad29605e99fcf3859e286ef2765f03149">waiting</a> = 0;</div><div class="line"><a name="l00145"></a><span class="lineno"> 145</span>  vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#a871bd453d1a5d4321e11a4d0a3983c78">need_yield</a> = 0;</div><div class="line"><a name="l00146"></a><span class="lineno"> 146</span>  vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#ae665ab760ae2fdf50a508074f72a9edb">wait_yield</a> = 0;</div><div class="line"><a name="l00147"></a><span class="lineno"> 147</span> }</div><div class="line"><a name="l00148"></a><span class="lineno"> 148</span> </div><div class="line"><a name="l00149"></a><span class="lineno"> 149</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l00150"></a><span class="lineno"> 150</span> gvl_destroy(<a class="code" href="../../db/d74/structrb__vm__struct.html">rb_vm_t</a> *vm)</div><div class="line"><a name="l00151"></a><span class="lineno"> 151</span> {</div><div class="line"><a name="l00152"></a><span class="lineno"> 152</span>  native_cond_destroy(&vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#a34e139f2c60eee1ed4a0a9685cf1ab64">switch_wait_cond</a>);</div><div class="line"><a name="l00153"></a><span class="lineno"> 153</span>  native_cond_destroy(&vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#acc4c61d6a2560d4639098de581cfc2b2">switch_cond</a>);</div><div class="line"><a name="l00154"></a><span class="lineno"> 154</span>  native_cond_destroy(&vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#addd15fc58f843f57ef20f2eb476aa42c">cond</a>);</div><div class="line"><a name="l00155"></a><span class="lineno"> 155</span>  native_mutex_destroy(&vm-><a class="code" href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">gvl</a>.<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#a948be6b7a74025df722091e4da6d9701">lock</a>);</div><div class="line"><a name="l00156"></a><span class="lineno"> 156</span> }</div><div class="line"><a name="l00157"></a><span class="lineno"> 157</span> </div><div class="line"><a name="l00158"></a><span class="lineno"> 158</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l00159"></a><span class="lineno"> 159</span> gvl_atfork(<a class="code" href="../../db/d74/structrb__vm__struct.html">rb_vm_t</a> *vm)</div><div class="line"><a name="l00160"></a><span class="lineno"> 160</span> {</div><div class="line"><a name="l00161"></a><span class="lineno"> 161</span>  gvl_init(vm);</div><div class="line"><a name="l00162"></a><span class="lineno"> 162</span>  gvl_acquire(vm, <a class="code" href="../../d8/d32/vm__core_8h.html#a8deb84ec6023e3229db88ac2c9da6138">GET_THREAD</a>());</div><div class="line"><a name="l00163"></a><span class="lineno"> 163</span> }</div><div class="line"><a name="l00164"></a><span class="lineno"> 164</span> </div><div class="line"><a name="l00165"></a><span class="lineno"> 165</span> <span class="preprocessor">#define NATIVE_MUTEX_LOCK_DEBUG 0</span></div><div class="line"><a name="l00166"></a><span class="lineno"> 166</span> </div><div class="line"><a name="l00167"></a><span class="lineno"> 167</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l00168"></a><span class="lineno"> 168</span> mutex_debug(<span class="keyword">const</span> <span class="keywordtype">char</span> *<a class="code" href="../../d5/d04/strerror_8c.html#ae4f3f55be5de649fd367081b9d1b4b0c">msg</a>, pthread_mutex_t *lock)</div><div class="line"><a name="l00169"></a><span class="lineno"> 169</span> {</div><div class="line"><a name="l00170"></a><span class="lineno"> 170</span>  <span class="keywordflow">if</span> (NATIVE_MUTEX_LOCK_DEBUG) {</div><div class="line"><a name="l00171"></a><span class="lineno"> 171</span>  <span class="keywordtype">int</span> r;</div><div class="line"><a name="l00172"></a><span class="lineno"> 172</span>  <span class="keyword">static</span> pthread_mutex_t dbglock = PTHREAD_MUTEX_INITIALIZER;</div><div class="line"><a name="l00173"></a><span class="lineno"> 173</span> </div><div class="line"><a name="l00174"></a><span class="lineno"> 174</span>  <span class="keywordflow">if</span> ((r = pthread_mutex_lock(&dbglock)) != 0) {exit(<a class="code" href="../../dd/dd0/eval__intern_8h.html#a73efe787c131b385070f25d18b7c9aa4">EXIT_FAILURE</a>);}</div><div class="line"><a name="l00175"></a><span class="lineno"> 175</span>  fprintf(stdout, <span class="stringliteral">"%s: %p\n"</span>, <a class="code" href="../../d5/d04/strerror_8c.html#ae4f3f55be5de649fd367081b9d1b4b0c">msg</a>, (<span class="keywordtype">void</span> *)lock);</div><div class="line"><a name="l00176"></a><span class="lineno"> 176</span>  <span class="keywordflow">if</span> ((r = pthread_mutex_unlock(&dbglock)) != 0) {exit(<a class="code" href="../../dd/dd0/eval__intern_8h.html#a73efe787c131b385070f25d18b7c9aa4">EXIT_FAILURE</a>);}</div><div class="line"><a name="l00177"></a><span class="lineno"> 177</span>  }</div><div class="line"><a name="l00178"></a><span class="lineno"> 178</span> }</div><div class="line"><a name="l00179"></a><span class="lineno"> 179</span> </div><div class="line"><a name="l00180"></a><span class="lineno"> 180</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l00181"></a><span class="lineno"> 181</span> native_mutex_lock(pthread_mutex_t *lock)</div><div class="line"><a name="l00182"></a><span class="lineno"> 182</span> {</div><div class="line"><a name="l00183"></a><span class="lineno"> 183</span>  <span class="keywordtype">int</span> r;</div><div class="line"><a name="l00184"></a><span class="lineno"> 184</span>  mutex_debug(<span class="stringliteral">"lock"</span>, lock);</div><div class="line"><a name="l00185"></a><span class="lineno"> 185</span>  <span class="keywordflow">if</span> ((r = pthread_mutex_lock(lock)) != 0) {</div><div class="line"><a name="l00186"></a><span class="lineno"> 186</span>  <a class="code" href="../../db/dcc/error_8c.html#a8fa20d858cb91f6b6ddaae05ccbed58c">rb_bug_errno</a>(<span class="stringliteral">"pthread_mutex_lock"</span>, r);</div><div class="line"><a name="l00187"></a><span class="lineno"> 187</span>  }</div><div class="line"><a name="l00188"></a><span class="lineno"> 188</span> }</div><div class="line"><a name="l00189"></a><span class="lineno"> 189</span> </div><div class="line"><a name="l00190"></a><span class="lineno"> 190</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l00191"></a><span class="lineno"> 191</span> native_mutex_unlock(pthread_mutex_t *lock)</div><div class="line"><a name="l00192"></a><span class="lineno"> 192</span> {</div><div class="line"><a name="l00193"></a><span class="lineno"> 193</span>  <span class="keywordtype">int</span> r;</div><div class="line"><a name="l00194"></a><span class="lineno"> 194</span>  mutex_debug(<span class="stringliteral">"unlock"</span>, lock);</div><div class="line"><a name="l00195"></a><span class="lineno"> 195</span>  <span class="keywordflow">if</span> ((r = pthread_mutex_unlock(lock)) != 0) {</div><div class="line"><a name="l00196"></a><span class="lineno"> 196</span>  <a class="code" href="../../db/dcc/error_8c.html#a8fa20d858cb91f6b6ddaae05ccbed58c">rb_bug_errno</a>(<span class="stringliteral">"pthread_mutex_unlock"</span>, r);</div><div class="line"><a name="l00197"></a><span class="lineno"> 197</span>  }</div><div class="line"><a name="l00198"></a><span class="lineno"> 198</span> }</div><div class="line"><a name="l00199"></a><span class="lineno"> 199</span> </div><div class="line"><a name="l00200"></a><span class="lineno"> 200</span> <span class="keyword">static</span> <span class="keyword">inline</span> <span class="keywordtype">int</span></div><div class="line"><a name="l00201"></a><span class="lineno"> 201</span> native_mutex_trylock(pthread_mutex_t *lock)</div><div class="line"><a name="l00202"></a><span class="lineno"> 202</span> {</div><div class="line"><a name="l00203"></a><span class="lineno"> 203</span>  <span class="keywordtype">int</span> r;</div><div class="line"><a name="l00204"></a><span class="lineno"> 204</span>  mutex_debug(<span class="stringliteral">"trylock"</span>, lock);</div><div class="line"><a name="l00205"></a><span class="lineno"> 205</span>  <span class="keywordflow">if</span> ((r = pthread_mutex_trylock(lock)) != 0) {</div><div class="line"><a name="l00206"></a><span class="lineno"> 206</span>  <span class="keywordflow">if</span> (r == EBUSY) {</div><div class="line"><a name="l00207"></a><span class="lineno"> 207</span>  <span class="keywordflow">return</span> EBUSY;</div><div class="line"><a name="l00208"></a><span class="lineno"> 208</span>  }</div><div class="line"><a name="l00209"></a><span class="lineno"> 209</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l00210"></a><span class="lineno"> 210</span>  <a class="code" href="../../db/dcc/error_8c.html#a8fa20d858cb91f6b6ddaae05ccbed58c">rb_bug_errno</a>(<span class="stringliteral">"pthread_mutex_trylock"</span>, r);</div><div class="line"><a name="l00211"></a><span class="lineno"> 211</span>  }</div><div class="line"><a name="l00212"></a><span class="lineno"> 212</span>  }</div><div class="line"><a name="l00213"></a><span class="lineno"> 213</span>  <span class="keywordflow">return</span> 0;</div><div class="line"><a name="l00214"></a><span class="lineno"> 214</span> }</div><div class="line"><a name="l00215"></a><span class="lineno"> 215</span> </div><div class="line"><a name="l00216"></a><span class="lineno"> 216</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l00217"></a><span class="lineno"> 217</span> native_mutex_initialize(pthread_mutex_t *lock)</div><div class="line"><a name="l00218"></a><span class="lineno"> 218</span> {</div><div class="line"><a name="l00219"></a><span class="lineno"> 219</span>  <span class="keywordtype">int</span> r = pthread_mutex_init(lock, 0);</div><div class="line"><a name="l00220"></a><span class="lineno"> 220</span>  mutex_debug(<span class="stringliteral">"init"</span>, lock);</div><div class="line"><a name="l00221"></a><span class="lineno"> 221</span>  <span class="keywordflow">if</span> (r != 0) {</div><div class="line"><a name="l00222"></a><span class="lineno"> 222</span>  <a class="code" href="../../db/dcc/error_8c.html#a8fa20d858cb91f6b6ddaae05ccbed58c">rb_bug_errno</a>(<span class="stringliteral">"pthread_mutex_init"</span>, r);</div><div class="line"><a name="l00223"></a><span class="lineno"> 223</span>  }</div><div class="line"><a name="l00224"></a><span class="lineno"> 224</span> }</div><div class="line"><a name="l00225"></a><span class="lineno"> 225</span> </div><div class="line"><a name="l00226"></a><span class="lineno"> 226</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l00227"></a><span class="lineno"> 227</span> native_mutex_destroy(pthread_mutex_t *lock)</div><div class="line"><a name="l00228"></a><span class="lineno"> 228</span> {</div><div class="line"><a name="l00229"></a><span class="lineno"> 229</span>  <span class="keywordtype">int</span> r = pthread_mutex_destroy(lock);</div><div class="line"><a name="l00230"></a><span class="lineno"> 230</span>  mutex_debug(<span class="stringliteral">"destroy"</span>, lock);</div><div class="line"><a name="l00231"></a><span class="lineno"> 231</span>  <span class="keywordflow">if</span> (r != 0) {</div><div class="line"><a name="l00232"></a><span class="lineno"> 232</span>  <a class="code" href="../../db/dcc/error_8c.html#a8fa20d858cb91f6b6ddaae05ccbed58c">rb_bug_errno</a>(<span class="stringliteral">"pthread_mutex_destroy"</span>, r);</div><div class="line"><a name="l00233"></a><span class="lineno"> 233</span>  }</div><div class="line"><a name="l00234"></a><span class="lineno"> 234</span> }</div><div class="line"><a name="l00235"></a><span class="lineno"> 235</span> </div><div class="line"><a name="l00236"></a><span class="lineno"> 236</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l00237"></a><span class="lineno"> 237</span> native_cond_initialize(<a class="code" href="../../d0/d6c/structrb__thread__cond__struct.html">rb_thread_cond_t</a> *<a class="code" href="../../d5/d11/ripper_8c.html#a9c9363cead2d8e8616cb63b4eea79655">cond</a>, <span class="keywordtype">int</span> flags)</div><div class="line"><a name="l00238"></a><span class="lineno"> 238</span> {</div><div class="line"><a name="l00239"></a><span class="lineno"> 239</span>  <span class="keywordtype">int</span> r;</div><div class="line"><a name="l00240"></a><span class="lineno"> 240</span>  pthread_condattr_t attr;</div><div class="line"><a name="l00241"></a><span class="lineno"> 241</span> </div><div class="line"><a name="l00242"></a><span class="lineno"> 242</span>  pthread_condattr_init(&attr);</div><div class="line"><a name="l00243"></a><span class="lineno"> 243</span> </div><div class="line"><a name="l00244"></a><span class="lineno"> 244</span> <span class="preprocessor">#if USE_MONOTONIC_COND</span></div><div class="line"><a name="l00245"></a><span class="lineno"> 245</span>  <a class="code" href="../../d5/d11/ripper_8c.html#a9c9363cead2d8e8616cb63b4eea79655">cond</a>->clockid = CLOCK_REALTIME;</div><div class="line"><a name="l00246"></a><span class="lineno"> 246</span>  <span class="keywordflow">if</span> (flags & RB_CONDATTR_CLOCK_MONOTONIC) {</div><div class="line"><a name="l00247"></a><span class="lineno"> 247</span>  r = pthread_condattr_setclock(&attr, CLOCK_MONOTONIC);</div><div class="line"><a name="l00248"></a><span class="lineno"> 248</span>  <span class="keywordflow">if</span> (r == 0) {</div><div class="line"><a name="l00249"></a><span class="lineno"> 249</span>  <a class="code" href="../../d5/d11/ripper_8c.html#a9c9363cead2d8e8616cb63b4eea79655">cond</a>->clockid = CLOCK_MONOTONIC;</div><div class="line"><a name="l00250"></a><span class="lineno"> 250</span>  }</div><div class="line"><a name="l00251"></a><span class="lineno"> 251</span>  }</div><div class="line"><a name="l00252"></a><span class="lineno"> 252</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00253"></a><span class="lineno"> 253</span> </div><div class="line"><a name="l00254"></a><span class="lineno"> 254</span>  r = pthread_cond_init(&<a class="code" href="../../d5/d11/ripper_8c.html#a9c9363cead2d8e8616cb63b4eea79655">cond</a>->cond, &attr);</div><div class="line"><a name="l00255"></a><span class="lineno"> 255</span>  pthread_condattr_destroy(&attr);</div><div class="line"><a name="l00256"></a><span class="lineno"> 256</span>  <span class="keywordflow">if</span> (r != 0) {</div><div class="line"><a name="l00257"></a><span class="lineno"> 257</span>  <a class="code" href="../../db/dcc/error_8c.html#a8fa20d858cb91f6b6ddaae05ccbed58c">rb_bug_errno</a>(<span class="stringliteral">"pthread_cond_init"</span>, r);</div><div class="line"><a name="l00258"></a><span class="lineno"> 258</span>  }</div><div class="line"><a name="l00259"></a><span class="lineno"> 259</span> </div><div class="line"><a name="l00260"></a><span class="lineno"> 260</span>  <span class="keywordflow">return</span>;</div><div class="line"><a name="l00261"></a><span class="lineno"> 261</span>  }</div><div class="line"><a name="l00262"></a><span class="lineno"> 262</span> </div><div class="line"><a name="l00263"></a><span class="lineno"> 263</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l00264"></a><span class="lineno"> 264</span> native_cond_destroy(<a class="code" href="../../d0/d6c/structrb__thread__cond__struct.html">rb_thread_cond_t</a> *<a class="code" href="../../d5/d11/ripper_8c.html#a9c9363cead2d8e8616cb63b4eea79655">cond</a>)</div><div class="line"><a name="l00265"></a><span class="lineno"> 265</span> {</div><div class="line"><a name="l00266"></a><span class="lineno"> 266</span>  <span class="keywordtype">int</span> r = pthread_cond_destroy(&<a class="code" href="../../d5/d11/ripper_8c.html#a9c9363cead2d8e8616cb63b4eea79655">cond</a>->cond);</div><div class="line"><a name="l00267"></a><span class="lineno"> 267</span>  <span class="keywordflow">if</span> (r != 0) {</div><div class="line"><a name="l00268"></a><span class="lineno"> 268</span>  <a class="code" href="../../db/dcc/error_8c.html#a8fa20d858cb91f6b6ddaae05ccbed58c">rb_bug_errno</a>(<span class="stringliteral">"pthread_cond_destroy"</span>, r);</div><div class="line"><a name="l00269"></a><span class="lineno"> 269</span>  }</div><div class="line"><a name="l00270"></a><span class="lineno"> 270</span> }</div><div class="line"><a name="l00271"></a><span class="lineno"> 271</span> </div><div class="line"><a name="l00272"></a><span class="lineno"> 272</span> <span class="comment">/*</span></div><div class="line"><a name="l00273"></a><span class="lineno"> 273</span> <span class="comment"> * In OS X 10.7 (Lion), pthread_cond_signal and pthread_cond_broadcast return</span></div><div class="line"><a name="l00274"></a><span class="lineno"> 274</span> <span class="comment"> * EAGAIN after retrying 8192 times. You can see them in the following page:</span></div><div class="line"><a name="l00275"></a><span class="lineno"> 275</span> <span class="comment"> *</span></div><div class="line"><a name="l00276"></a><span class="lineno"> 276</span> <span class="comment"> * http://www.opensource.apple.com/source/Libc/Libc-763.11/pthreads/pthread_cond.c</span></div><div class="line"><a name="l00277"></a><span class="lineno"> 277</span> <span class="comment"> *</span></div><div class="line"><a name="l00278"></a><span class="lineno"> 278</span> <span class="comment"> * The following native_cond_signal and native_cond_broadcast functions</span></div><div class="line"><a name="l00279"></a><span class="lineno"> 279</span> <span class="comment"> * need to retrying until pthread functions don't return EAGAIN.</span></div><div class="line"><a name="l00280"></a><span class="lineno"> 280</span> <span class="comment"> */</span></div><div class="line"><a name="l00281"></a><span class="lineno"> 281</span> </div><div class="line"><a name="l00282"></a><span class="lineno"> 282</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l00283"></a><span class="lineno"> 283</span> native_cond_signal(<a class="code" href="../../d0/d6c/structrb__thread__cond__struct.html">rb_thread_cond_t</a> *<a class="code" href="../../d5/d11/ripper_8c.html#a9c9363cead2d8e8616cb63b4eea79655">cond</a>)</div><div class="line"><a name="l00284"></a><span class="lineno"> 284</span> {</div><div class="line"><a name="l00285"></a><span class="lineno"> 285</span>  <span class="keywordtype">int</span> r;</div><div class="line"><a name="l00286"></a><span class="lineno"> 286</span>  <span class="keywordflow">do</span> {</div><div class="line"><a name="l00287"></a><span class="lineno"> 287</span>  r = pthread_cond_signal(&<a class="code" href="../../d5/d11/ripper_8c.html#a9c9363cead2d8e8616cb63b4eea79655">cond</a>->cond);</div><div class="line"><a name="l00288"></a><span class="lineno"> 288</span>  } <span class="keywordflow">while</span> (r == EAGAIN);</div><div class="line"><a name="l00289"></a><span class="lineno"> 289</span>  <span class="keywordflow">if</span> (r != 0) {</div><div class="line"><a name="l00290"></a><span class="lineno"> 290</span>  <a class="code" href="../../db/dcc/error_8c.html#a8fa20d858cb91f6b6ddaae05ccbed58c">rb_bug_errno</a>(<span class="stringliteral">"pthread_cond_signal"</span>, r);</div><div class="line"><a name="l00291"></a><span class="lineno"> 291</span>  }</div><div class="line"><a name="l00292"></a><span class="lineno"> 292</span> }</div><div class="line"><a name="l00293"></a><span class="lineno"> 293</span> </div><div class="line"><a name="l00294"></a><span class="lineno"> 294</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l00295"></a><span class="lineno"> 295</span> native_cond_broadcast(<a class="code" href="../../d0/d6c/structrb__thread__cond__struct.html">rb_thread_cond_t</a> *<a class="code" href="../../d5/d11/ripper_8c.html#a9c9363cead2d8e8616cb63b4eea79655">cond</a>)</div><div class="line"><a name="l00296"></a><span class="lineno"> 296</span> {</div><div class="line"><a name="l00297"></a><span class="lineno"> 297</span>  <span class="keywordtype">int</span> r;</div><div class="line"><a name="l00298"></a><span class="lineno"> 298</span>  <span class="keywordflow">do</span> {</div><div class="line"><a name="l00299"></a><span class="lineno"> 299</span>  r = pthread_cond_broadcast(&<a class="code" href="../../d5/d11/ripper_8c.html#a9c9363cead2d8e8616cb63b4eea79655">cond</a>->cond);</div><div class="line"><a name="l00300"></a><span class="lineno"> 300</span>  } <span class="keywordflow">while</span> (r == EAGAIN);</div><div class="line"><a name="l00301"></a><span class="lineno"> 301</span>  <span class="keywordflow">if</span> (r != 0) {</div><div class="line"><a name="l00302"></a><span class="lineno"> 302</span>  <a class="code" href="../../db/dcc/error_8c.html#a8fa20d858cb91f6b6ddaae05ccbed58c">rb_bug_errno</a>(<span class="stringliteral">"native_cond_broadcast"</span>, r);</div><div class="line"><a name="l00303"></a><span class="lineno"> 303</span>  }</div><div class="line"><a name="l00304"></a><span class="lineno"> 304</span> }</div><div class="line"><a name="l00305"></a><span class="lineno"> 305</span> </div><div class="line"><a name="l00306"></a><span class="lineno"> 306</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l00307"></a><span class="lineno"> 307</span> native_cond_wait(<a class="code" href="../../d0/d6c/structrb__thread__cond__struct.html">rb_thread_cond_t</a> *<a class="code" href="../../d5/d11/ripper_8c.html#a9c9363cead2d8e8616cb63b4eea79655">cond</a>, pthread_mutex_t *mutex)</div><div class="line"><a name="l00308"></a><span class="lineno"> 308</span> {</div><div class="line"><a name="l00309"></a><span class="lineno"> 309</span>  <span class="keywordtype">int</span> r = pthread_cond_wait(&<a class="code" href="../../d5/d11/ripper_8c.html#a9c9363cead2d8e8616cb63b4eea79655">cond</a>->cond, mutex);</div><div class="line"><a name="l00310"></a><span class="lineno"> 310</span>  <span class="keywordflow">if</span> (r != 0) {</div><div class="line"><a name="l00311"></a><span class="lineno"> 311</span>  <a class="code" href="../../db/dcc/error_8c.html#a8fa20d858cb91f6b6ddaae05ccbed58c">rb_bug_errno</a>(<span class="stringliteral">"pthread_cond_wait"</span>, r);</div><div class="line"><a name="l00312"></a><span class="lineno"> 312</span>  }</div><div class="line"><a name="l00313"></a><span class="lineno"> 313</span> }</div><div class="line"><a name="l00314"></a><span class="lineno"> 314</span> </div><div class="line"><a name="l00315"></a><span class="lineno"> 315</span> <span class="keyword">static</span> <span class="keywordtype">int</span></div><div class="line"><a name="l00316"></a><span class="lineno"> 316</span> native_cond_timedwait(<a class="code" href="../../d0/d6c/structrb__thread__cond__struct.html">rb_thread_cond_t</a> *<a class="code" href="../../d5/d11/ripper_8c.html#a9c9363cead2d8e8616cb63b4eea79655">cond</a>, pthread_mutex_t *mutex, <span class="keyword">struct</span> <a class="code" href="../../da/d1c/structtimespec.html">timespec</a> *ts)</div><div class="line"><a name="l00317"></a><span class="lineno"> 317</span> {</div><div class="line"><a name="l00318"></a><span class="lineno"> 318</span>  <span class="keywordtype">int</span> r;</div><div class="line"><a name="l00319"></a><span class="lineno"> 319</span> </div><div class="line"><a name="l00320"></a><span class="lineno"> 320</span>  <span class="comment">/*</span></div><div class="line"><a name="l00321"></a><span class="lineno"> 321</span> <span class="comment"> * An old Linux may return EINTR. Even though POSIX says</span></div><div class="line"><a name="l00322"></a><span class="lineno"> 322</span> <span class="comment"> * "These functions shall not return an error code of [EINTR]".</span></div><div class="line"><a name="l00323"></a><span class="lineno"> 323</span> <span class="comment"> * http://pubs.opengroup.org/onlinepubs/009695399/functions/pthread_cond_timedwait.html</span></div><div class="line"><a name="l00324"></a><span class="lineno"> 324</span> <span class="comment"> * Let's hide it from arch generic code.</span></div><div class="line"><a name="l00325"></a><span class="lineno"> 325</span> <span class="comment"> */</span></div><div class="line"><a name="l00326"></a><span class="lineno"> 326</span>  <span class="keywordflow">do</span> {</div><div class="line"><a name="l00327"></a><span class="lineno"> 327</span>  r = pthread_cond_timedwait(&<a class="code" href="../../d5/d11/ripper_8c.html#a9c9363cead2d8e8616cb63b4eea79655">cond</a>->cond, mutex, ts);</div><div class="line"><a name="l00328"></a><span class="lineno"> 328</span>  } <span class="keywordflow">while</span> (r == EINTR);</div><div class="line"><a name="l00329"></a><span class="lineno"> 329</span> </div><div class="line"><a name="l00330"></a><span class="lineno"> 330</span>  <span class="keywordflow">if</span> (r != 0 && r != <a class="code" href="../../dc/db1/win32_8h.html#a597718e59a8fc9c4d4ab63f5a34e28b1">ETIMEDOUT</a>) {</div><div class="line"><a name="l00331"></a><span class="lineno"> 331</span>  <a class="code" href="../../db/dcc/error_8c.html#a8fa20d858cb91f6b6ddaae05ccbed58c">rb_bug_errno</a>(<span class="stringliteral">"pthread_cond_timedwait"</span>, r);</div><div class="line"><a name="l00332"></a><span class="lineno"> 332</span>  }</div><div class="line"><a name="l00333"></a><span class="lineno"> 333</span> </div><div class="line"><a name="l00334"></a><span class="lineno"> 334</span>  <span class="keywordflow">return</span> r;</div><div class="line"><a name="l00335"></a><span class="lineno"> 335</span> }</div><div class="line"><a name="l00336"></a><span class="lineno"> 336</span> </div><div class="line"><a name="l00337"></a><span class="lineno"> 337</span> <span class="preprocessor">#if SIZEOF_TIME_T == SIZEOF_LONG</span></div><div class="line"><a name="l00338"></a><span class="lineno"> 338</span> <span class="keyword">typedef</span> <span class="keywordtype">unsigned</span> <span class="keywordtype">long</span> <a class="code" href="../../df/d73/time_8c.html#abe5239cfb3b9775b72cc1d81373c7e48">unsigned_time_t</a>;</div><div class="line"><a name="l00339"></a><span class="lineno"> 339</span> <span class="preprocessor">#elif SIZEOF_TIME_T == SIZEOF_INT</span></div><div class="line"><a name="l00340"></a><span class="lineno"> 340</span> <span class="keyword">typedef</span> <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> <a class="code" href="../../df/d73/time_8c.html#abe5239cfb3b9775b72cc1d81373c7e48">unsigned_time_t</a>;</div><div class="line"><a name="l00341"></a><span class="lineno"> 341</span> <span class="preprocessor">#elif SIZEOF_TIME_T == SIZEOF_LONG_LONG</span></div><div class="line"><a name="l00342"></a><span class="lineno"> 342</span> <span class="keyword">typedef</span> <span class="keywordtype">unsigned</span> LONG_LONG <a class="code" href="../../df/d73/time_8c.html#abe5239cfb3b9775b72cc1d81373c7e48">unsigned_time_t</a>;</div><div class="line"><a name="l00343"></a><span class="lineno"> 343</span> <span class="preprocessor">#else</span></div><div class="line"><a name="l00344"></a><span class="lineno"> 344</span> <span class="preprocessor"># error cannot find integer type which size is same as time_t.</span></div><div class="line"><a name="l00345"></a><span class="lineno"> 345</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00346"></a><span class="lineno"> 346</span> </div><div class="line"><a name="l00347"></a><span class="lineno"> 347</span> <span class="preprocessor">#define TIMET_MAX (~(time_t)0 <= 0 ? (time_t)((~(unsigned_time_t)0) >> 1) : (time_t)(~(unsigned_time_t)0))</span></div><div class="line"><a name="l00348"></a><span class="lineno"> 348</span> </div><div class="line"><a name="l00349"></a><span class="lineno"> 349</span> <span class="keyword">static</span> <span class="keyword">struct </span><a class="code" href="../../da/d1c/structtimespec.html">timespec</a></div><div class="line"><a name="l00350"></a><span class="lineno"> 350</span> native_cond_timeout(<a class="code" href="../../d0/d6c/structrb__thread__cond__struct.html">rb_thread_cond_t</a> *<a class="code" href="../../d5/d11/ripper_8c.html#a9c9363cead2d8e8616cb63b4eea79655">cond</a>, <span class="keyword">struct </span><a class="code" href="../../da/d1c/structtimespec.html">timespec</a> timeout_rel)</div><div class="line"><a name="l00351"></a><span class="lineno"> 351</span> {</div><div class="line"><a name="l00352"></a><span class="lineno"> 352</span>  <span class="keywordtype">int</span> ret;</div><div class="line"><a name="l00353"></a><span class="lineno"> 353</span>  <span class="keyword">struct </span><a class="code" href="../../d1/d1b/structtimeval.html">timeval</a> tv;</div><div class="line"><a name="l00354"></a><span class="lineno"> 354</span>  <span class="keyword">struct </span><a class="code" href="../../da/d1c/structtimespec.html">timespec</a> timeout;</div><div class="line"><a name="l00355"></a><span class="lineno"> 355</span>  <span class="keyword">struct </span><a class="code" href="../../da/d1c/structtimespec.html">timespec</a> now;</div><div class="line"><a name="l00356"></a><span class="lineno"> 356</span> </div><div class="line"><a name="l00357"></a><span class="lineno"> 357</span> <span class="preprocessor">#if USE_MONOTONIC_COND</span></div><div class="line"><a name="l00358"></a><span class="lineno"> 358</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/d11/ripper_8c.html#a9c9363cead2d8e8616cb63b4eea79655">cond</a>->clockid == CLOCK_MONOTONIC) {</div><div class="line"><a name="l00359"></a><span class="lineno"> 359</span>  ret = clock_gettime(<a class="code" href="../../d5/d11/ripper_8c.html#a9c9363cead2d8e8616cb63b4eea79655">cond</a>->clockid, &now);</div><div class="line"><a name="l00360"></a><span class="lineno"> 360</span>  <span class="keywordflow">if</span> (ret != 0)</div><div class="line"><a name="l00361"></a><span class="lineno"> 361</span>  <a class="code" href="../../db/dcc/error_8c.html#aec0502b6d84cff19bb2071d1386ff177">rb_sys_fail</a>(<span class="stringliteral">"clock_gettime()"</span>);</div><div class="line"><a name="l00362"></a><span class="lineno"> 362</span>  <span class="keywordflow">goto</span> out;</div><div class="line"><a name="l00363"></a><span class="lineno"> 363</span>  }</div><div class="line"><a name="l00364"></a><span class="lineno"> 364</span> </div><div class="line"><a name="l00365"></a><span class="lineno"> 365</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/d11/ripper_8c.html#a9c9363cead2d8e8616cb63b4eea79655">cond</a>->clockid != CLOCK_REALTIME)</div><div class="line"><a name="l00366"></a><span class="lineno"> 366</span>  <a class="code" href="../../db/dcc/error_8c.html#a2d5fb28e54f792e7341b2c45f52f3860">rb_bug</a>(<span class="stringliteral">"unsupported clockid %d"</span>, <a class="code" href="../../d5/d11/ripper_8c.html#a9c9363cead2d8e8616cb63b4eea79655">cond</a>->clockid);</div><div class="line"><a name="l00367"></a><span class="lineno"> 367</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00368"></a><span class="lineno"> 368</span> </div><div class="line"><a name="l00369"></a><span class="lineno"> 369</span>  ret = <a class="code" href="../../dc/db1/win32_8h.html#a091a762f60d91b0f5441d9520dc2079c">gettimeofday</a>(&tv, 0);</div><div class="line"><a name="l00370"></a><span class="lineno"> 370</span>  <span class="keywordflow">if</span> (ret != 0)</div><div class="line"><a name="l00371"></a><span class="lineno"> 371</span>  <a class="code" href="../../db/dcc/error_8c.html#aec0502b6d84cff19bb2071d1386ff177">rb_sys_fail</a>(0);</div><div class="line"><a name="l00372"></a><span class="lineno"> 372</span>  now.tv_sec = tv.tv_sec;</div><div class="line"><a name="l00373"></a><span class="lineno"> 373</span>  now.tv_nsec = tv.tv_usec * 1000;</div><div class="line"><a name="l00374"></a><span class="lineno"> 374</span> </div><div class="line"><a name="l00375"></a><span class="lineno"> 375</span> <span class="preprocessor">#if USE_MONOTONIC_COND</span></div><div class="line"><a name="l00376"></a><span class="lineno"> 376</span>  out:</div><div class="line"><a name="l00377"></a><span class="lineno"> 377</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00378"></a><span class="lineno"> 378</span>  timeout.tv_sec = now.tv_sec;</div><div class="line"><a name="l00379"></a><span class="lineno"> 379</span>  timeout.tv_nsec = now.tv_nsec;</div><div class="line"><a name="l00380"></a><span class="lineno"> 380</span>  timeout.tv_sec += timeout_rel.tv_sec;</div><div class="line"><a name="l00381"></a><span class="lineno"> 381</span>  timeout.tv_nsec += timeout_rel.tv_nsec;</div><div class="line"><a name="l00382"></a><span class="lineno"> 382</span> </div><div class="line"><a name="l00383"></a><span class="lineno"> 383</span>  <span class="keywordflow">if</span> (timeout.tv_nsec >= 1000*1000*1000) {</div><div class="line"><a name="l00384"></a><span class="lineno"> 384</span>  timeout.tv_sec++;</div><div class="line"><a name="l00385"></a><span class="lineno"> 385</span>  timeout.tv_nsec -= 1000*1000*1000;</div><div class="line"><a name="l00386"></a><span class="lineno"> 386</span>  }</div><div class="line"><a name="l00387"></a><span class="lineno"> 387</span> </div><div class="line"><a name="l00388"></a><span class="lineno"> 388</span>  <span class="keywordflow">if</span> (timeout.tv_sec < now.tv_sec)</div><div class="line"><a name="l00389"></a><span class="lineno"> 389</span>  timeout.tv_sec = <a class="code" href="../../df/d73/time_8c.html#ab95d28a7486992d93dd15bc24c06a9d2">TIMET_MAX</a>;</div><div class="line"><a name="l00390"></a><span class="lineno"> 390</span> </div><div class="line"><a name="l00391"></a><span class="lineno"> 391</span>  <span class="keywordflow">return</span> timeout;</div><div class="line"><a name="l00392"></a><span class="lineno"> 392</span> }</div><div class="line"><a name="l00393"></a><span class="lineno"> 393</span> </div><div class="line"><a name="l00394"></a><span class="lineno"> 394</span> <span class="preprocessor">#define native_cleanup_push pthread_cleanup_push</span></div><div class="line"><a name="l00395"></a><span class="lineno"> 395</span> <span class="preprocessor">#define native_cleanup_pop pthread_cleanup_pop</span></div><div class="line"><a name="l00396"></a><span class="lineno"> 396</span> <span class="preprocessor">#ifdef HAVE_SCHED_YIELD</span></div><div class="line"><a name="l00397"></a><span class="lineno"> 397</span> <span class="preprocessor">#define native_thread_yield() (void)sched_yield()</span></div><div class="line"><a name="l00398"></a><span class="lineno"> 398</span> <span class="preprocessor">#else</span></div><div class="line"><a name="l00399"></a><span class="lineno"> 399</span> <span class="preprocessor">#define native_thread_yield() ((void)0)</span></div><div class="line"><a name="l00400"></a><span class="lineno"> 400</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00401"></a><span class="lineno"> 401</span> </div><div class="line"><a name="l00402"></a><span class="lineno"> 402</span> <span class="preprocessor">#if defined(SIGVTALRM) && !defined(__CYGWIN__) && !defined(__SYMBIAN32__)</span></div><div class="line"><a name="l00403"></a><span class="lineno"> 403</span> <span class="preprocessor">#define USE_SIGNAL_THREAD_LIST 1</span></div><div class="line"><a name="l00404"></a><span class="lineno"> 404</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00405"></a><span class="lineno"> 405</span> <span class="preprocessor">#ifdef USE_SIGNAL_THREAD_LIST</span></div><div class="line"><a name="l00406"></a><span class="lineno"> 406</span> <span class="keyword">static</span> <span class="keywordtype">void</span> add_signal_thread_list(<a class="code" href="../../d2/d66/structrb__thread__struct.html">rb_thread_t</a> *th);</div><div class="line"><a name="l00407"></a><span class="lineno"> 407</span> <span class="keyword">static</span> <span class="keywordtype">void</span> remove_signal_thread_list(<a class="code" href="../../d2/d66/structrb__thread__struct.html">rb_thread_t</a> *th);</div><div class="line"><a name="l00408"></a><span class="lineno"> 408</span> <span class="keyword">static</span> <a class="code" href="../../d2/d82/thread__pthread_8h.html#aad27e6c1e30cf79f10930122e8ae405e">rb_thread_lock_t</a> signal_thread_list_lock;</div><div class="line"><a name="l00409"></a><span class="lineno"> 409</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00410"></a><span class="lineno"> 410</span> </div><div class="line"><a name="l00411"></a><span class="lineno"> 411</span> <span class="keyword">static</span> pthread_key_t ruby_native_thread_key;</div><div class="line"><a name="l00412"></a><span class="lineno"> 412</span> </div><div class="line"><a name="l00413"></a><span class="lineno"> 413</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l00414"></a><span class="lineno"> 414</span> null_func(<span class="keywordtype">int</span> <a class="code" href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a>)</div><div class="line"><a name="l00415"></a><span class="lineno"> 415</span> {</div><div class="line"><a name="l00416"></a><span class="lineno"> 416</span>  <span class="comment">/* null */</span></div><div class="line"><a name="l00417"></a><span class="lineno"> 417</span> }</div><div class="line"><a name="l00418"></a><span class="lineno"> 418</span> </div><div class="line"><a name="l00419"></a><span class="lineno"> 419</span> <span class="keyword">static</span> <a class="code" href="../../d2/d66/structrb__thread__struct.html">rb_thread_t</a> *</div><div class="line"><a name="l00420"></a><span class="lineno"> 420</span> ruby_thread_from_native(<span class="keywordtype">void</span>)</div><div class="line"><a name="l00421"></a><span class="lineno"> 421</span> {</div><div class="line"><a name="l00422"></a><span class="lineno"> 422</span>  <span class="keywordflow">return</span> pthread_getspecific(ruby_native_thread_key);</div><div class="line"><a name="l00423"></a><span class="lineno"> 423</span> }</div><div class="line"><a name="l00424"></a><span class="lineno"> 424</span> </div><div class="line"><a name="l00425"></a><span class="lineno"> 425</span> <span class="keyword">static</span> <span class="keywordtype">int</span></div><div class="line"><a name="l00426"></a><span class="lineno"> 426</span> ruby_thread_set_native(<a class="code" href="../../d2/d66/structrb__thread__struct.html">rb_thread_t</a> *th)</div><div class="line"><a name="l00427"></a><span class="lineno"> 427</span> {</div><div class="line"><a name="l00428"></a><span class="lineno"> 428</span>  <span class="keywordflow">return</span> pthread_setspecific(ruby_native_thread_key, th) == 0;</div><div class="line"><a name="l00429"></a><span class="lineno"> 429</span> }</div><div class="line"><a name="l00430"></a><span class="lineno"> 430</span> </div><div class="line"><a name="l00431"></a><span class="lineno"> 431</span> <span class="keyword">static</span> <span class="keywordtype">void</span> native_thread_init(<a class="code" href="../../d2/d66/structrb__thread__struct.html">rb_thread_t</a> *th);</div><div class="line"><a name="l00432"></a><span class="lineno"> 432</span> </div><div class="line"><a name="l00433"></a><span class="lineno"> 433</span> <span class="keywordtype">void</span></div><div class="line"><a name="l00434"></a><span class="lineno"> 434</span> <a class="code" href="../../db/dde/internal_8h.html#a1261ad828419468df5d4e92bb75ff6f3">Init_native_thread</a>(<span class="keywordtype">void</span>)</div><div class="line"><a name="l00435"></a><span class="lineno"> 435</span> {</div><div class="line"><a name="l00436"></a><span class="lineno"> 436</span>  <a class="code" href="../../d2/d66/structrb__thread__struct.html">rb_thread_t</a> *th = <a class="code" href="../../d8/d32/vm__core_8h.html#a8deb84ec6023e3229db88ac2c9da6138">GET_THREAD</a>();</div><div class="line"><a name="l00437"></a><span class="lineno"> 437</span> </div><div class="line"><a name="l00438"></a><span class="lineno"> 438</span>  pthread_key_create(&ruby_native_thread_key, <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>);</div><div class="line"><a name="l00439"></a><span class="lineno"> 439</span>  th-><a class="code" href="../../d2/d66/structrb__thread__struct.html#acbd5b841dcb2158ed2111abd6b876251">thread_id</a> = pthread_self();</div><div class="line"><a name="l00440"></a><span class="lineno"> 440</span>  native_thread_init(th);</div><div class="line"><a name="l00441"></a><span class="lineno"> 441</span> <span class="preprocessor">#ifdef USE_SIGNAL_THREAD_LIST</span></div><div class="line"><a name="l00442"></a><span class="lineno"> 442</span>  native_mutex_initialize(&signal_thread_list_lock);</div><div class="line"><a name="l00443"></a><span class="lineno"> 443</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00444"></a><span class="lineno"> 444</span>  <a class="code" href="../../d1/d68/missing-pips_8c.html#ab31381c830fadc7f095b9a7a63b8972d">posix_signal</a>(SIGVTALRM, null_func);</div><div class="line"><a name="l00445"></a><span class="lineno"> 445</span> }</div><div class="line"><a name="l00446"></a><span class="lineno"> 446</span> </div><div class="line"><a name="l00447"></a><span class="lineno"> 447</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l00448"></a><span class="lineno"> 448</span> native_thread_init(<a class="code" href="../../d2/d66/structrb__thread__struct.html">rb_thread_t</a> *th)</div><div class="line"><a name="l00449"></a><span class="lineno"> 449</span> {</div><div class="line"><a name="l00450"></a><span class="lineno"> 450</span>  native_cond_initialize(&th-><a class="code" href="../../d2/d66/structrb__thread__struct.html#a1ee6880a07f5e4bf524af64d1ccf3ad0">native_thread_data</a>.<a class="code" href="../../d9/dae/structnative__thread__data__struct.html#aa90ac8836ed5c4d26d6be4120ecd6054">sleep_cond</a>, RB_CONDATTR_CLOCK_MONOTONIC);</div><div class="line"><a name="l00451"></a><span class="lineno"> 451</span>  ruby_thread_set_native(th);</div><div class="line"><a name="l00452"></a><span class="lineno"> 452</span> }</div><div class="line"><a name="l00453"></a><span class="lineno"> 453</span> </div><div class="line"><a name="l00454"></a><span class="lineno"> 454</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l00455"></a><span class="lineno"> 455</span> native_thread_destroy(<a class="code" href="../../d2/d66/structrb__thread__struct.html">rb_thread_t</a> *th)</div><div class="line"><a name="l00456"></a><span class="lineno"> 456</span> {</div><div class="line"><a name="l00457"></a><span class="lineno"> 457</span>  native_cond_destroy(&th-><a class="code" href="../../d2/d66/structrb__thread__struct.html#a1ee6880a07f5e4bf524af64d1ccf3ad0">native_thread_data</a>.<a class="code" href="../../d9/dae/structnative__thread__data__struct.html#aa90ac8836ed5c4d26d6be4120ecd6054">sleep_cond</a>);</div><div class="line"><a name="l00458"></a><span class="lineno"> 458</span> }</div><div class="line"><a name="l00459"></a><span class="lineno"> 459</span> </div><div class="line"><a name="l00460"></a><span class="lineno"> 460</span> <span class="preprocessor">#define USE_THREAD_CACHE 0</span></div><div class="line"><a name="l00461"></a><span class="lineno"> 461</span> </div><div class="line"><a name="l00462"></a><span class="lineno"> 462</span> <span class="preprocessor">#if USE_THREAD_CACHE</span></div><div class="line"><a name="l00463"></a><span class="lineno"> 463</span> <span class="keyword">static</span> <a class="code" href="../../d2/d66/structrb__thread__struct.html">rb_thread_t</a> *register_cached_thread_and_wait(<span class="keywordtype">void</span>);</div><div class="line"><a name="l00464"></a><span class="lineno"> 464</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00465"></a><span class="lineno"> 465</span> </div><div class="line"><a name="l00466"></a><span class="lineno"> 466</span> <span class="preprocessor">#if defined HAVE_PTHREAD_GETATTR_NP || defined HAVE_PTHREAD_ATTR_GET_NP</span></div><div class="line"><a name="l00467"></a><span class="lineno"> 467</span> <span class="preprocessor">#define STACKADDR_AVAILABLE 1</span></div><div class="line"><a name="l00468"></a><span class="lineno"> 468</span> <span class="preprocessor">#elif defined HAVE_PTHREAD_GET_STACKADDR_NP && defined HAVE_PTHREAD_GET_STACKSIZE_NP</span></div><div class="line"><a name="l00469"></a><span class="lineno"> 469</span> <span class="preprocessor">#define STACKADDR_AVAILABLE 1</span></div><div class="line"><a name="l00470"></a><span class="lineno"> 470</span> <span class="preprocessor">#elif defined HAVE_THR_STKSEGMENT || defined HAVE_PTHREAD_STACKSEG_NP</span></div><div class="line"><a name="l00471"></a><span class="lineno"> 471</span> <span class="preprocessor">#define STACKADDR_AVAILABLE 1</span></div><div class="line"><a name="l00472"></a><span class="lineno"> 472</span> <span class="preprocessor">#elif defined HAVE_PTHREAD_GETTHRDS_NP</span></div><div class="line"><a name="l00473"></a><span class="lineno"> 473</span> <span class="preprocessor">#define STACKADDR_AVAILABLE 1</span></div><div class="line"><a name="l00474"></a><span class="lineno"> 474</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00475"></a><span class="lineno"> 475</span> </div><div class="line"><a name="l00476"></a><span class="lineno"> 476</span> <span class="preprocessor">#ifdef STACKADDR_AVAILABLE</span></div><div class="line"><a name="l00477"></a><span class="lineno"> 477</span> <span class="comment">/*</span></div><div class="line"><a name="l00478"></a><span class="lineno"> 478</span> <span class="comment"> * Get the initial address and size of current thread's stack</span></div><div class="line"><a name="l00479"></a><span class="lineno"> 479</span> <span class="comment"> */</span></div><div class="line"><a name="l00480"></a><span class="lineno"> 480</span> <span class="keyword">static</span> <span class="keywordtype">int</span></div><div class="line"><a name="l00481"></a><span class="lineno"> 481</span> get_stack(<span class="keywordtype">void</span> **addr, <span class="keywordtype">size_t</span> *<a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a>)</div><div class="line"><a name="l00482"></a><span class="lineno"> 482</span> {</div><div class="line"><a name="l00483"></a><span class="lineno"> 483</span> <span class="preprocessor">#define CHECK_ERR(expr) \</span></div><div class="line"><a name="l00484"></a><span class="lineno"> 484</span> <span class="preprocessor"> {int err = (expr); if (err) return err;}</span></div><div class="line"><a name="l00485"></a><span class="lineno"> 485</span> <span class="preprocessor">#ifdef HAVE_PTHREAD_GETATTR_NP </span><span class="comment">/* Linux */</span><span class="preprocessor"></span></div><div class="line"><a name="l00486"></a><span class="lineno"> 486</span>  pthread_attr_t attr;</div><div class="line"><a name="l00487"></a><span class="lineno"> 487</span>  <span class="keywordtype">size_t</span> guard = 0;</div><div class="line"><a name="l00488"></a><span class="lineno"> 488</span>  <a class="code" href="../../d0/daa/gc_8h.html#ae2c08ef15cfabdb246c9d17ca3b2e239">STACK_GROW_DIR_DETECTION</a>;</div><div class="line"><a name="l00489"></a><span class="lineno"> 489</span>  CHECK_ERR(pthread_getattr_np(pthread_self(), &attr));</div><div class="line"><a name="l00490"></a><span class="lineno"> 490</span> <span class="preprocessor"># ifdef HAVE_PTHREAD_ATTR_GETSTACK</span></div><div class="line"><a name="l00491"></a><span class="lineno"> 491</span>  CHECK_ERR(pthread_attr_getstack(&attr, addr, <a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a>));</div><div class="line"><a name="l00492"></a><span class="lineno"> 492</span>  <a class="code" href="../../d0/daa/gc_8h.html#a6880597546e9069cad9831dfe5722e36">STACK_DIR_UPPER</a>((<span class="keywordtype">void</span>)0, (<span class="keywordtype">void</span>)(*addr = (<span class="keywordtype">char</span> *)*addr + *<a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a>));</div><div class="line"><a name="l00493"></a><span class="lineno"> 493</span> <span class="preprocessor"># else</span></div><div class="line"><a name="l00494"></a><span class="lineno"> 494</span>  CHECK_ERR(pthread_attr_getstackaddr(&attr, addr));</div><div class="line"><a name="l00495"></a><span class="lineno"> 495</span>  CHECK_ERR(pthread_attr_getstacksize(&attr, <a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a>));</div><div class="line"><a name="l00496"></a><span class="lineno"> 496</span> <span class="preprocessor"># endif</span></div><div class="line"><a name="l00497"></a><span class="lineno"> 497</span>  CHECK_ERR(pthread_attr_getguardsize(&attr, &guard));</div><div class="line"><a name="l00498"></a><span class="lineno"> 498</span>  *<a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a> -= guard;</div><div class="line"><a name="l00499"></a><span class="lineno"> 499</span>  pthread_attr_destroy(&attr);</div><div class="line"><a name="l00500"></a><span class="lineno"> 500</span> <span class="preprocessor">#elif defined HAVE_PTHREAD_ATTR_GET_NP </span><span class="comment">/* FreeBSD, DragonFly BSD, NetBSD */</span><span class="preprocessor"></span></div><div class="line"><a name="l00501"></a><span class="lineno"> 501</span>  pthread_attr_t attr;</div><div class="line"><a name="l00502"></a><span class="lineno"> 502</span>  CHECK_ERR(pthread_attr_init(&attr));</div><div class="line"><a name="l00503"></a><span class="lineno"> 503</span>  CHECK_ERR(pthread_attr_get_np(pthread_self(), &attr));</div><div class="line"><a name="l00504"></a><span class="lineno"> 504</span> <span class="preprocessor"># ifdef HAVE_PTHREAD_ATTR_GETSTACK</span></div><div class="line"><a name="l00505"></a><span class="lineno"> 505</span>  CHECK_ERR(pthread_attr_getstack(&attr, addr, <a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a>));</div><div class="line"><a name="l00506"></a><span class="lineno"> 506</span>  <a class="code" href="../../d0/daa/gc_8h.html#a6880597546e9069cad9831dfe5722e36">STACK_DIR_UPPER</a>((<span class="keywordtype">void</span>)0, (<span class="keywordtype">void</span>)(*addr = (<span class="keywordtype">char</span> *)*addr + *<a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a>));</div><div class="line"><a name="l00507"></a><span class="lineno"> 507</span> <span class="preprocessor"># else</span></div><div class="line"><a name="l00508"></a><span class="lineno"> 508</span>  CHECK_ERR(pthread_attr_getstackaddr(&attr, addr));</div><div class="line"><a name="l00509"></a><span class="lineno"> 509</span>  CHECK_ERR(pthread_attr_getstacksize(&attr, <a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a>));</div><div class="line"><a name="l00510"></a><span class="lineno"> 510</span>  <a class="code" href="../../d0/daa/gc_8h.html#a6880597546e9069cad9831dfe5722e36">STACK_DIR_UPPER</a>((<span class="keywordtype">void</span>)0, (<span class="keywordtype">void</span>)(*addr = (<span class="keywordtype">char</span> *)*addr + *<a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a>));</div><div class="line"><a name="l00511"></a><span class="lineno"> 511</span> <span class="preprocessor"># endif</span></div><div class="line"><a name="l00512"></a><span class="lineno"> 512</span>  pthread_attr_destroy(&attr);</div><div class="line"><a name="l00513"></a><span class="lineno"> 513</span> <span class="preprocessor">#elif (defined HAVE_PTHREAD_GET_STACKADDR_NP && defined HAVE_PTHREAD_GET_STACKSIZE_NP) </span><span class="comment">/* MacOS X */</span><span class="preprocessor"></span></div><div class="line"><a name="l00514"></a><span class="lineno"> 514</span>  pthread_t th = pthread_self();</div><div class="line"><a name="l00515"></a><span class="lineno"> 515</span>  *addr = pthread_get_stackaddr_np(th);</div><div class="line"><a name="l00516"></a><span class="lineno"> 516</span>  *<a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a> = pthread_get_stacksize_np(th);</div><div class="line"><a name="l00517"></a><span class="lineno"> 517</span> <span class="preprocessor">#elif defined HAVE_THR_STKSEGMENT || defined HAVE_PTHREAD_STACKSEG_NP</span></div><div class="line"><a name="l00518"></a><span class="lineno"> 518</span>  stack_t stk;</div><div class="line"><a name="l00519"></a><span class="lineno"> 519</span> <span class="preprocessor"># if defined HAVE_THR_STKSEGMENT </span><span class="comment">/* Solaris */</span><span class="preprocessor"></span></div><div class="line"><a name="l00520"></a><span class="lineno"> 520</span>  CHECK_ERR(thr_stksegment(&stk));</div><div class="line"><a name="l00521"></a><span class="lineno"> 521</span> <span class="preprocessor"># else </span><span class="comment">/* OpenBSD */</span><span class="preprocessor"></span></div><div class="line"><a name="l00522"></a><span class="lineno"> 522</span>  CHECK_ERR(pthread_stackseg_np(pthread_self(), &stk));</div><div class="line"><a name="l00523"></a><span class="lineno"> 523</span> <span class="preprocessor"># endif</span></div><div class="line"><a name="l00524"></a><span class="lineno"> 524</span>  *addr = stk.ss_sp;</div><div class="line"><a name="l00525"></a><span class="lineno"> 525</span>  *<a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a> = stk.ss_size;</div><div class="line"><a name="l00526"></a><span class="lineno"> 526</span> <span class="preprocessor">#elif defined HAVE_PTHREAD_GETTHRDS_NP </span><span class="comment">/* AIX */</span><span class="preprocessor"></span></div><div class="line"><a name="l00527"></a><span class="lineno"> 527</span>  pthread_t th = pthread_self();</div><div class="line"><a name="l00528"></a><span class="lineno"> 528</span>  <span class="keyword">struct </span>__pthrdsinfo thinfo;</div><div class="line"><a name="l00529"></a><span class="lineno"> 529</span>  <span class="keywordtype">char</span> reg[256];</div><div class="line"><a name="l00530"></a><span class="lineno"> 530</span>  <span class="keywordtype">int</span> regsiz=<span class="keyword">sizeof</span>(reg);</div><div class="line"><a name="l00531"></a><span class="lineno"> 531</span>  CHECK_ERR(pthread_getthrds_np(&th, PTHRDSINFO_QUERY_ALL,</div><div class="line"><a name="l00532"></a><span class="lineno"> 532</span>  &thinfo, <span class="keyword">sizeof</span>(thinfo),</div><div class="line"><a name="l00533"></a><span class="lineno"> 533</span>  &reg, &regsiz));</div><div class="line"><a name="l00534"></a><span class="lineno"> 534</span>  *addr = thinfo.__pi_stackaddr;</div><div class="line"><a name="l00535"></a><span class="lineno"> 535</span>  *<a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a> = thinfo.__pi_stacksize;</div><div class="line"><a name="l00536"></a><span class="lineno"> 536</span>  <a class="code" href="../../d0/daa/gc_8h.html#a6880597546e9069cad9831dfe5722e36">STACK_DIR_UPPER</a>((<span class="keywordtype">void</span>)0, (<span class="keywordtype">void</span>)(*addr = (<span class="keywordtype">char</span> *)*addr + *<a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a>));</div><div class="line"><a name="l00537"></a><span class="lineno"> 537</span> <span class="preprocessor">#else</span></div><div class="line"><a name="l00538"></a><span class="lineno"> 538</span> <span class="preprocessor">#error STACKADDR_AVAILABLE is defined but not implemented.</span></div><div class="line"><a name="l00539"></a><span class="lineno"> 539</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00540"></a><span class="lineno"> 540</span>  <span class="keywordflow">return</span> 0;</div><div class="line"><a name="l00541"></a><span class="lineno"> 541</span> <span class="preprocessor">#undef CHECK_ERR</span></div><div class="line"><a name="l00542"></a><span class="lineno"> 542</span> }</div><div class="line"><a name="l00543"></a><span class="lineno"> 543</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00544"></a><span class="lineno"> 544</span> </div><div class="line"><a name="l00545"></a><span class="lineno"> 545</span> <span class="keyword">static</span> <span class="keyword">struct </span>{</div><div class="line"><a name="l00546"></a><span class="lineno"> 546</span>  <a class="code" href="../../d2/d82/thread__pthread_8h.html#a605b74cf6a0a0164ef1d6a633f5e70c9">rb_thread_id_t</a> <a class="code" href="../../d6/da0/nkf-utf8_2nkf_8c.html#a64ae40793ade89d800a8c5646d2980fc">id</a>;</div><div class="line"><a name="l00547"></a><span class="lineno"> 547</span>  <span class="keywordtype">size_t</span> stack_maxsize;</div><div class="line"><a name="l00548"></a><span class="lineno"> 548</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *stack_start;</div><div class="line"><a name="l00549"></a><span class="lineno"> 549</span> <span class="preprocessor">#ifdef __ia64</span></div><div class="line"><a name="l00550"></a><span class="lineno"> 550</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *register_stack_start;</div><div class="line"><a name="l00551"></a><span class="lineno"> 551</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00552"></a><span class="lineno"> 552</span> } native_main_thread;</div><div class="line"><a name="l00553"></a><span class="lineno"> 553</span> </div><div class="line"><a name="l00554"></a><span class="lineno"> 554</span> <span class="preprocessor">#ifdef STACK_END_ADDRESS</span></div><div class="line"><a name="l00555"></a><span class="lineno"> 555</span> <span class="keyword">extern</span> <span class="keywordtype">void</span> *STACK_END_ADDRESS;</div><div class="line"><a name="l00556"></a><span class="lineno"> 556</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00557"></a><span class="lineno"> 557</span> </div><div class="line"><a name="l00558"></a><span class="lineno"> 558</span> <span class="preprocessor">#undef ruby_init_stack</span></div><div class="line"><a name="l00559"></a><span class="lineno"> 559</span> <span class="keywordtype">void</span></div><div class="line"><a name="l00560"></a><span class="lineno"> 560</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#ab7d9aa9836c379212b86b985909f7303">ruby_init_stack</a>(<span class="keyword">volatile</span> <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *addr</div><div class="line"><a name="l00561"></a><span class="lineno"> 561</span> #ifdef __ia64</div><div class="line"><a name="l00562"></a><span class="lineno"> 562</span>  , <span class="keywordtype">void</span> *bsp</div><div class="line"><a name="l00563"></a><span class="lineno"> 563</span> #endif</div><div class="line"><a name="l00564"></a><span class="lineno"> 564</span>  )</div><div class="line"><a name="l00565"></a><span class="lineno"> 565</span> {</div><div class="line"><a name="l00566"></a><span class="lineno"> 566</span>  native_main_thread.id = pthread_self();</div><div class="line"><a name="l00567"></a><span class="lineno"> 567</span> <span class="preprocessor">#ifdef STACK_END_ADDRESS</span></div><div class="line"><a name="l00568"></a><span class="lineno"> 568</span>  native_main_thread.stack_start = STACK_END_ADDRESS;</div><div class="line"><a name="l00569"></a><span class="lineno"> 569</span> <span class="preprocessor">#else</span></div><div class="line"><a name="l00570"></a><span class="lineno"> 570</span>  <span class="keywordflow">if</span> (!native_main_thread.stack_start ||</div><div class="line"><a name="l00571"></a><span class="lineno"> 571</span>  <a class="code" href="../../d0/daa/gc_8h.html#ad79961092b2737e9102a9bcf9ca2dbed">STACK_UPPER</a>((<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *)(<span class="keywordtype">void</span> *)&addr,</div><div class="line"><a name="l00572"></a><span class="lineno"> 572</span>  native_main_thread.stack_start > addr,</div><div class="line"><a name="l00573"></a><span class="lineno"> 573</span>  native_main_thread.stack_start < addr)) {</div><div class="line"><a name="l00574"></a><span class="lineno"> 574</span>  native_main_thread.stack_start = (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> *)addr;</div><div class="line"><a name="l00575"></a><span class="lineno"> 575</span>  }</div><div class="line"><a name="l00576"></a><span class="lineno"> 576</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00577"></a><span class="lineno"> 577</span> <span class="preprocessor">#ifdef __ia64</span></div><div class="line"><a name="l00578"></a><span class="lineno"> 578</span>  <span class="keywordflow">if</span> (!native_main_thread.register_stack_start ||</div><div class="line"><a name="l00579"></a><span class="lineno"> 579</span>  (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a>*)bsp < native_main_thread.register_stack_start) {</div><div class="line"><a name="l00580"></a><span class="lineno"> 580</span>  native_main_thread.register_stack_start = (<a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a>*)bsp;</div><div class="line"><a name="l00581"></a><span class="lineno"> 581</span>  }</div><div class="line"><a name="l00582"></a><span class="lineno"> 582</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00583"></a><span class="lineno"> 583</span>  {</div><div class="line"><a name="l00584"></a><span class="lineno"> 584</span>  <span class="keywordtype">size_t</span> <a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a> = 0;</div><div class="line"><a name="l00585"></a><span class="lineno"> 585</span>  <span class="keywordtype">size_t</span> space = 0;</div><div class="line"><a name="l00586"></a><span class="lineno"> 586</span> <span class="preprocessor">#if defined(STACKADDR_AVAILABLE)</span></div><div class="line"><a name="l00587"></a><span class="lineno"> 587</span>  <span class="keywordtype">void</span>* stackaddr;</div><div class="line"><a name="l00588"></a><span class="lineno"> 588</span>  <a class="code" href="../../d0/daa/gc_8h.html#ae2c08ef15cfabdb246c9d17ca3b2e239">STACK_GROW_DIR_DETECTION</a>;</div><div class="line"><a name="l00589"></a><span class="lineno"> 589</span>  get_stack(&stackaddr, &<a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a>);</div><div class="line"><a name="l00590"></a><span class="lineno"> 590</span>  space = <a class="code" href="../../d0/daa/gc_8h.html#a6880597546e9069cad9831dfe5722e36">STACK_DIR_UPPER</a>((<span class="keywordtype">char</span> *)addr - (<span class="keywordtype">char</span> *)stackaddr, (<span class="keywordtype">char</span> *)stackaddr - (<span class="keywordtype">char</span> *)addr);</div><div class="line"><a name="l00591"></a><span class="lineno"> 591</span> <span class="preprocessor">#elif defined(HAVE_GETRLIMIT)</span></div><div class="line"><a name="l00592"></a><span class="lineno"> 592</span>  <span class="keyword">struct </span>rlimit rlim;</div><div class="line"><a name="l00593"></a><span class="lineno"> 593</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d1/d68/missing-pips_8c.html#a7698190710a325534c6b511a1a7d8324">getrlimit</a>(RLIMIT_STACK, &rlim) == 0) {</div><div class="line"><a name="l00594"></a><span class="lineno"> 594</span>  <a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a> = (size_t)rlim.rlim_cur;</div><div class="line"><a name="l00595"></a><span class="lineno"> 595</span>  }</div><div class="line"><a name="l00596"></a><span class="lineno"> 596</span>  space = <a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a> > 5 * 1024 * 1024 ? 1024 * 1024 : <a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a> / 5;</div><div class="line"><a name="l00597"></a><span class="lineno"> 597</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00598"></a><span class="lineno"> 598</span>  native_main_thread.stack_maxsize = <a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a> - space;</div><div class="line"><a name="l00599"></a><span class="lineno"> 599</span>  }</div><div class="line"><a name="l00600"></a><span class="lineno"> 600</span> }</div><div class="line"><a name="l00601"></a><span class="lineno"> 601</span> </div><div class="line"><a name="l00602"></a><span class="lineno"> 602</span> <span class="preprocessor">#define CHECK_ERR(expr) \</span></div><div class="line"><a name="l00603"></a><span class="lineno"> 603</span> <span class="preprocessor"> {int err = (expr); if (err) {rb_bug_errno(#expr, err);}}</span></div><div class="line"><a name="l00604"></a><span class="lineno"> 604</span> </div><div class="line"><a name="l00605"></a><span class="lineno"> 605</span> <span class="keyword">static</span> <span class="keywordtype">int</span></div><div class="line"><a name="l00606"></a><span class="lineno"> 606</span> native_thread_init_stack(<a class="code" href="../../d2/d66/structrb__thread__struct.html">rb_thread_t</a> *th)</div><div class="line"><a name="l00607"></a><span class="lineno"> 607</span> {</div><div class="line"><a name="l00608"></a><span class="lineno"> 608</span>  <a class="code" href="../../d2/d82/thread__pthread_8h.html#a605b74cf6a0a0164ef1d6a633f5e70c9">rb_thread_id_t</a> curr = pthread_self();</div><div class="line"><a name="l00609"></a><span class="lineno"> 609</span> </div><div class="line"><a name="l00610"></a><span class="lineno"> 610</span>  <span class="keywordflow">if</span> (pthread_equal(curr, native_main_thread.id)) {</div><div class="line"><a name="l00611"></a><span class="lineno"> 611</span>  th-><a class="code" href="../../d2/d66/structrb__thread__struct.html#a004e79191ba26ebbdc62ea9f77039f1b">machine_stack_start</a> = native_main_thread.stack_start;</div><div class="line"><a name="l00612"></a><span class="lineno"> 612</span>  th-><a class="code" href="../../d2/d66/structrb__thread__struct.html#add10746c443276bf6df2cc0c6a29c8d7">machine_stack_maxsize</a> = native_main_thread.stack_maxsize;</div><div class="line"><a name="l00613"></a><span class="lineno"> 613</span>  }</div><div class="line"><a name="l00614"></a><span class="lineno"> 614</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l00615"></a><span class="lineno"> 615</span> <span class="preprocessor">#ifdef STACKADDR_AVAILABLE</span></div><div class="line"><a name="l00616"></a><span class="lineno"> 616</span>  <span class="keywordtype">void</span> *start;</div><div class="line"><a name="l00617"></a><span class="lineno"> 617</span>  <span class="keywordtype">size_t</span> <a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a>;</div><div class="line"><a name="l00618"></a><span class="lineno"> 618</span> </div><div class="line"><a name="l00619"></a><span class="lineno"> 619</span>  <span class="keywordflow">if</span> (get_stack(&start, &<a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a>) == 0) {</div><div class="line"><a name="l00620"></a><span class="lineno"> 620</span>  th-><a class="code" href="../../d2/d66/structrb__thread__struct.html#a004e79191ba26ebbdc62ea9f77039f1b">machine_stack_start</a> = start;</div><div class="line"><a name="l00621"></a><span class="lineno"> 621</span>  th-><a class="code" href="../../d2/d66/structrb__thread__struct.html#add10746c443276bf6df2cc0c6a29c8d7">machine_stack_maxsize</a> = <a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a>;</div><div class="line"><a name="l00622"></a><span class="lineno"> 622</span>  }</div><div class="line"><a name="l00623"></a><span class="lineno"> 623</span> <span class="preprocessor">#else</span></div><div class="line"><a name="l00624"></a><span class="lineno"> 624</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../db/dcc/error_8c.html#a1f4044eeff81eb1676037771628b555c">rb_eNotImpError</a>, <span class="stringliteral">"ruby engine can initialize only in the main thread"</span>);</div><div class="line"><a name="l00625"></a><span class="lineno"> 625</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00626"></a><span class="lineno"> 626</span>  }</div><div class="line"><a name="l00627"></a><span class="lineno"> 627</span> <span class="preprocessor">#ifdef __ia64</span></div><div class="line"><a name="l00628"></a><span class="lineno"> 628</span>  th->machine_register_stack_start = native_main_thread.register_stack_start;</div><div class="line"><a name="l00629"></a><span class="lineno"> 629</span>  th-><a class="code" href="../../d2/d66/structrb__thread__struct.html#add10746c443276bf6df2cc0c6a29c8d7">machine_stack_maxsize</a> /= 2;</div><div class="line"><a name="l00630"></a><span class="lineno"> 630</span>  th->machine_register_stack_maxsize = th-><a class="code" href="../../d2/d66/structrb__thread__struct.html#add10746c443276bf6df2cc0c6a29c8d7">machine_stack_maxsize</a>;</div><div class="line"><a name="l00631"></a><span class="lineno"> 631</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00632"></a><span class="lineno"> 632</span>  <span class="keywordflow">return</span> 0;</div><div class="line"><a name="l00633"></a><span class="lineno"> 633</span> }</div><div class="line"><a name="l00634"></a><span class="lineno"> 634</span> </div><div class="line"><a name="l00635"></a><span class="lineno"> 635</span> <span class="preprocessor">#ifndef __CYGWIN__</span></div><div class="line"><a name="l00636"></a><span class="lineno"> 636</span> <span class="preprocessor">#define USE_NATIVE_THREAD_INIT 1</span></div><div class="line"><a name="l00637"></a><span class="lineno"> 637</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00638"></a><span class="lineno"> 638</span> </div><div class="line"><a name="l00639"></a><span class="lineno"> 639</span> <span class="keyword">static</span> <span class="keywordtype">void</span> *</div><div class="line"><a name="l00640"></a><span class="lineno"> 640</span> thread_start_func_1(<span class="keywordtype">void</span> *th_ptr)</div><div class="line"><a name="l00641"></a><span class="lineno"> 641</span> {</div><div class="line"><a name="l00642"></a><span class="lineno"> 642</span> <span class="preprocessor">#if USE_THREAD_CACHE</span></div><div class="line"><a name="l00643"></a><span class="lineno"> 643</span>  <a class="code" href="../../d3/de7/thread_8c.html#a55c3507d4449aa123567d234b0fdd480">thread_start</a>:</div><div class="line"><a name="l00644"></a><span class="lineno"> 644</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00645"></a><span class="lineno"> 645</span>  {</div><div class="line"><a name="l00646"></a><span class="lineno"> 646</span>  <a class="code" href="../../d2/d66/structrb__thread__struct.html">rb_thread_t</a> *th = th_ptr;</div><div class="line"><a name="l00647"></a><span class="lineno"> 647</span> <span class="preprocessor">#if !defined USE_NATIVE_THREAD_INIT</span></div><div class="line"><a name="l00648"></a><span class="lineno"> 648</span>  <a class="code" href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a> stack_start;</div><div class="line"><a name="l00649"></a><span class="lineno"> 649</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00650"></a><span class="lineno"> 650</span> </div><div class="line"><a name="l00651"></a><span class="lineno"> 651</span> <span class="preprocessor">#if defined USE_NATIVE_THREAD_INIT</span></div><div class="line"><a name="l00652"></a><span class="lineno"> 652</span>  native_thread_init_stack(th);</div><div class="line"><a name="l00653"></a><span class="lineno"> 653</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00654"></a><span class="lineno"> 654</span>  native_thread_init(th);</div><div class="line"><a name="l00655"></a><span class="lineno"> 655</span>  <span class="comment">/* run */</span></div><div class="line"><a name="l00656"></a><span class="lineno"> 656</span> <span class="preprocessor">#if defined USE_NATIVE_THREAD_INIT</span></div><div class="line"><a name="l00657"></a><span class="lineno"> 657</span>  <a class="code" href="../../d3/de7/thread_8c.html#a711ed0f5f2d64d14a71f64a971531c02">thread_start_func_2</a>(th, th-><a class="code" href="../../d2/d66/structrb__thread__struct.html#a004e79191ba26ebbdc62ea9f77039f1b">machine_stack_start</a>, rb_ia64_bsp());</div><div class="line"><a name="l00658"></a><span class="lineno"> 658</span> <span class="preprocessor">#else</span></div><div class="line"><a name="l00659"></a><span class="lineno"> 659</span>  <a class="code" href="../../d3/de7/thread_8c.html#a711ed0f5f2d64d14a71f64a971531c02">thread_start_func_2</a>(th, &stack_start, rb_ia64_bsp());</div><div class="line"><a name="l00660"></a><span class="lineno"> 660</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00661"></a><span class="lineno"> 661</span>  }</div><div class="line"><a name="l00662"></a><span class="lineno"> 662</span> <span class="preprocessor">#if USE_THREAD_CACHE</span></div><div class="line"><a name="l00663"></a><span class="lineno"> 663</span>  <span class="keywordflow">if</span> (1) {</div><div class="line"><a name="l00664"></a><span class="lineno"> 664</span>  <span class="comment">/* cache thread */</span></div><div class="line"><a name="l00665"></a><span class="lineno"> 665</span>  <a class="code" href="../../d2/d66/structrb__thread__struct.html">rb_thread_t</a> *th;</div><div class="line"><a name="l00666"></a><span class="lineno"> 666</span>  <span class="keywordflow">if</span> ((th = register_cached_thread_and_wait()) != 0) {</div><div class="line"><a name="l00667"></a><span class="lineno"> 667</span>  th_ptr = (<span class="keywordtype">void</span> *)th;</div><div class="line"><a name="l00668"></a><span class="lineno"> 668</span>  th-><a class="code" href="../../d2/d66/structrb__thread__struct.html#acbd5b841dcb2158ed2111abd6b876251">thread_id</a> = pthread_self();</div><div class="line"><a name="l00669"></a><span class="lineno"> 669</span>  <span class="keywordflow">goto</span> <a class="code" href="../../d3/de7/thread_8c.html#a55c3507d4449aa123567d234b0fdd480">thread_start</a>;</div><div class="line"><a name="l00670"></a><span class="lineno"> 670</span>  }</div><div class="line"><a name="l00671"></a><span class="lineno"> 671</span>  }</div><div class="line"><a name="l00672"></a><span class="lineno"> 672</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00673"></a><span class="lineno"> 673</span>  <span class="keywordflow">return</span> 0;</div><div class="line"><a name="l00674"></a><span class="lineno"> 674</span> }</div><div class="line"><a name="l00675"></a><span class="lineno"> 675</span> </div><div class="line"><a name="l00676"></a><span class="lineno"> 676</span> <span class="keyword">struct </span>cached_thread_entry {</div><div class="line"><a name="l00677"></a><span class="lineno"> 677</span>  <span class="keyword">volatile</span> <a class="code" href="../../d2/d66/structrb__thread__struct.html">rb_thread_t</a> **th_area;</div><div class="line"><a name="l00678"></a><span class="lineno"> 678</span>  <a class="code" href="../../d0/d6c/structrb__thread__cond__struct.html">rb_thread_cond_t</a> *<a class="code" href="../../d5/d11/ripper_8c.html#a9c9363cead2d8e8616cb63b4eea79655">cond</a>;</div><div class="line"><a name="l00679"></a><span class="lineno"> 679</span>  <span class="keyword">struct </span>cached_thread_entry *next;</div><div class="line"><a name="l00680"></a><span class="lineno"> 680</span> };</div><div class="line"><a name="l00681"></a><span class="lineno"> 681</span> </div><div class="line"><a name="l00682"></a><span class="lineno"> 682</span> </div><div class="line"><a name="l00683"></a><span class="lineno"> 683</span> <span class="preprocessor">#if USE_THREAD_CACHE</span></div><div class="line"><a name="l00684"></a><span class="lineno"> 684</span> <span class="keyword">static</span> pthread_mutex_t thread_cache_lock = PTHREAD_MUTEX_INITIALIZER;</div><div class="line"><a name="l00685"></a><span class="lineno"> 685</span> <span class="keyword">struct </span>cached_thread_entry *cached_thread_root;</div><div class="line"><a name="l00686"></a><span class="lineno"> 686</span> </div><div class="line"><a name="l00687"></a><span class="lineno"> 687</span> <span class="keyword">static</span> <a class="code" href="../../d2/d66/structrb__thread__struct.html">rb_thread_t</a> *</div><div class="line"><a name="l00688"></a><span class="lineno"> 688</span> register_cached_thread_and_wait(<span class="keywordtype">void</span>)</div><div class="line"><a name="l00689"></a><span class="lineno"> 689</span> {</div><div class="line"><a name="l00690"></a><span class="lineno"> 690</span>  <a class="code" href="../../d0/d6c/structrb__thread__cond__struct.html">rb_thread_cond_t</a> <a class="code" href="../../d5/d11/ripper_8c.html#a9c9363cead2d8e8616cb63b4eea79655">cond</a> = { PTHREAD_COND_INITIALIZER, };</div><div class="line"><a name="l00691"></a><span class="lineno"> 691</span>  <span class="keyword">volatile</span> <a class="code" href="../../d2/d66/structrb__thread__struct.html">rb_thread_t</a> *th_area = 0;</div><div class="line"><a name="l00692"></a><span class="lineno"> 692</span>  <span class="keyword">struct </span>cached_thread_entry *entry =</div><div class="line"><a name="l00693"></a><span class="lineno"> 693</span>  (<span class="keyword">struct </span>cached_thread_entry *)<a class="code" href="../../d1/d6f/date__strftime_8c.html#aa21fad24622996b74839deccf1202f29">malloc</a>(<span class="keyword">sizeof</span>(<span class="keyword">struct</span> cached_thread_entry));</div><div class="line"><a name="l00694"></a><span class="lineno"> 694</span> </div><div class="line"><a name="l00695"></a><span class="lineno"> 695</span>  <span class="keyword">struct </span><a class="code" href="../../d1/d1b/structtimeval.html">timeval</a> tv;</div><div class="line"><a name="l00696"></a><span class="lineno"> 696</span>  <span class="keyword">struct </span><a class="code" href="../../da/d1c/structtimespec.html">timespec</a> ts;</div><div class="line"><a name="l00697"></a><span class="lineno"> 697</span>  <a class="code" href="../../dc/db1/win32_8h.html#a091a762f60d91b0f5441d9520dc2079c">gettimeofday</a>(&tv, 0);</div><div class="line"><a name="l00698"></a><span class="lineno"> 698</span>  ts.<a class="code" href="../../da/d1c/structtimespec.html#afc3302668d7cb5952f590da69fdd4955">tv_sec</a> = tv.tv_sec + 60;</div><div class="line"><a name="l00699"></a><span class="lineno"> 699</span>  ts.<a class="code" href="../../da/d1c/structtimespec.html#ae3c7510dafa8cbcaede866ed13c99683">tv_nsec</a> = tv.tv_usec * 1000;</div><div class="line"><a name="l00700"></a><span class="lineno"> 700</span> </div><div class="line"><a name="l00701"></a><span class="lineno"> 701</span>  pthread_mutex_lock(&thread_cache_lock);</div><div class="line"><a name="l00702"></a><span class="lineno"> 702</span>  {</div><div class="line"><a name="l00703"></a><span class="lineno"> 703</span>  entry->th_area = &th_area;</div><div class="line"><a name="l00704"></a><span class="lineno"> 704</span>  entry->cond = &<a class="code" href="../../d5/d11/ripper_8c.html#a9c9363cead2d8e8616cb63b4eea79655">cond</a>;</div><div class="line"><a name="l00705"></a><span class="lineno"> 705</span>  entry->next = cached_thread_root;</div><div class="line"><a name="l00706"></a><span class="lineno"> 706</span>  cached_thread_root = entry;</div><div class="line"><a name="l00707"></a><span class="lineno"> 707</span> </div><div class="line"><a name="l00708"></a><span class="lineno"> 708</span>  native_cond_timedwait(&<a class="code" href="../../d5/d11/ripper_8c.html#a9c9363cead2d8e8616cb63b4eea79655">cond</a>, &thread_cache_lock, &ts);</div><div class="line"><a name="l00709"></a><span class="lineno"> 709</span> </div><div class="line"><a name="l00710"></a><span class="lineno"> 710</span>  {</div><div class="line"><a name="l00711"></a><span class="lineno"> 711</span>  <span class="keyword">struct </span>cached_thread_entry *e = cached_thread_root;</div><div class="line"><a name="l00712"></a><span class="lineno"> 712</span>  <span class="keyword">struct </span>cached_thread_entry *prev = cached_thread_root;</div><div class="line"><a name="l00713"></a><span class="lineno"> 713</span> </div><div class="line"><a name="l00714"></a><span class="lineno"> 714</span>  <span class="keywordflow">while</span> (e) {</div><div class="line"><a name="l00715"></a><span class="lineno"> 715</span>  <span class="keywordflow">if</span> (e == entry) {</div><div class="line"><a name="l00716"></a><span class="lineno"> 716</span>  <span class="keywordflow">if</span> (prev == cached_thread_root) {</div><div class="line"><a name="l00717"></a><span class="lineno"> 717</span>  cached_thread_root = e->next;</div><div class="line"><a name="l00718"></a><span class="lineno"> 718</span>  }</div><div class="line"><a name="l00719"></a><span class="lineno"> 719</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l00720"></a><span class="lineno"> 720</span>  prev->next = e->next;</div><div class="line"><a name="l00721"></a><span class="lineno"> 721</span>  }</div><div class="line"><a name="l00722"></a><span class="lineno"> 722</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l00723"></a><span class="lineno"> 723</span>  }</div><div class="line"><a name="l00724"></a><span class="lineno"> 724</span>  prev = e;</div><div class="line"><a name="l00725"></a><span class="lineno"> 725</span>  e = e->next;</div><div class="line"><a name="l00726"></a><span class="lineno"> 726</span>  }</div><div class="line"><a name="l00727"></a><span class="lineno"> 727</span>  }</div><div class="line"><a name="l00728"></a><span class="lineno"> 728</span> </div><div class="line"><a name="l00729"></a><span class="lineno"> 729</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a18100522f0b19b5e9b9875f5737a9386">free</a>(entry); <span class="comment">/* ok */</span></div><div class="line"><a name="l00730"></a><span class="lineno"> 730</span>  native_cond_destroy(&<a class="code" href="../../d5/d11/ripper_8c.html#a9c9363cead2d8e8616cb63b4eea79655">cond</a>);</div><div class="line"><a name="l00731"></a><span class="lineno"> 731</span>  }</div><div class="line"><a name="l00732"></a><span class="lineno"> 732</span>  pthread_mutex_unlock(&thread_cache_lock);</div><div class="line"><a name="l00733"></a><span class="lineno"> 733</span> </div><div class="line"><a name="l00734"></a><span class="lineno"> 734</span>  <span class="keywordflow">return</span> (<a class="code" href="../../d2/d66/structrb__thread__struct.html">rb_thread_t</a> *)th_area;</div><div class="line"><a name="l00735"></a><span class="lineno"> 735</span> }</div><div class="line"><a name="l00736"></a><span class="lineno"> 736</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00737"></a><span class="lineno"> 737</span> </div><div class="line"><a name="l00738"></a><span class="lineno"> 738</span> <span class="keyword">static</span> <span class="keywordtype">int</span></div><div class="line"><a name="l00739"></a><span class="lineno"> 739</span> use_cached_thread(<a class="code" href="../../d2/d66/structrb__thread__struct.html">rb_thread_t</a> *th)</div><div class="line"><a name="l00740"></a><span class="lineno"> 740</span> {</div><div class="line"><a name="l00741"></a><span class="lineno"> 741</span>  <span class="keywordtype">int</span> <a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a> = 0;</div><div class="line"><a name="l00742"></a><span class="lineno"> 742</span> <span class="preprocessor">#if USE_THREAD_CACHE</span></div><div class="line"><a name="l00743"></a><span class="lineno"> 743</span>  <span class="keyword">struct </span>cached_thread_entry *entry;</div><div class="line"><a name="l00744"></a><span class="lineno"> 744</span> </div><div class="line"><a name="l00745"></a><span class="lineno"> 745</span>  <span class="keywordflow">if</span> (cached_thread_root) {</div><div class="line"><a name="l00746"></a><span class="lineno"> 746</span>  pthread_mutex_lock(&thread_cache_lock);</div><div class="line"><a name="l00747"></a><span class="lineno"> 747</span>  entry = cached_thread_root;</div><div class="line"><a name="l00748"></a><span class="lineno"> 748</span>  {</div><div class="line"><a name="l00749"></a><span class="lineno"> 749</span>  <span class="keywordflow">if</span> (cached_thread_root) {</div><div class="line"><a name="l00750"></a><span class="lineno"> 750</span>  cached_thread_root = entry->next;</div><div class="line"><a name="l00751"></a><span class="lineno"> 751</span>  *entry->th_area = th;</div><div class="line"><a name="l00752"></a><span class="lineno"> 752</span>  <a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a> = 1;</div><div class="line"><a name="l00753"></a><span class="lineno"> 753</span>  }</div><div class="line"><a name="l00754"></a><span class="lineno"> 754</span>  }</div><div class="line"><a name="l00755"></a><span class="lineno"> 755</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a>) {</div><div class="line"><a name="l00756"></a><span class="lineno"> 756</span>  native_cond_signal(entry->cond);</div><div class="line"><a name="l00757"></a><span class="lineno"> 757</span>  }</div><div class="line"><a name="l00758"></a><span class="lineno"> 758</span>  pthread_mutex_unlock(&thread_cache_lock);</div><div class="line"><a name="l00759"></a><span class="lineno"> 759</span>  }</div><div class="line"><a name="l00760"></a><span class="lineno"> 760</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00761"></a><span class="lineno"> 761</span>  <span class="keywordflow">return</span> <a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a>;</div><div class="line"><a name="l00762"></a><span class="lineno"> 762</span> }</div><div class="line"><a name="l00763"></a><span class="lineno"> 763</span> </div><div class="line"><a name="l00764"></a><span class="lineno"> 764</span> <span class="keyword">enum</span> {</div><div class="line"><a name="l00765"></a><span class="lineno"> 765</span> <span class="preprocessor">#ifdef __SYMBIAN32__</span></div><div class="line"><a name="l00766"></a><span class="lineno"> 766</span>  RUBY_STACK_MIN_LIMIT = 64 * 1024, <span class="comment">/* 64KB: Let's be slightly more frugal on mobile platform */</span></div><div class="line"><a name="l00767"></a><span class="lineno"> 767</span> <span class="preprocessor">#else</span></div><div class="line"><a name="l00768"></a><span class="lineno"> 768</span>  RUBY_STACK_MIN_LIMIT = 512 * 1024, <span class="comment">/* 512KB */</span></div><div class="line"><a name="l00769"></a><span class="lineno"> 769</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00770"></a><span class="lineno"> 770</span>  RUBY_STACK_SPACE_LIMIT = 1024 * 1024</div><div class="line"><a name="l00771"></a><span class="lineno"> 771</span> };</div><div class="line"><a name="l00772"></a><span class="lineno"> 772</span> </div><div class="line"><a name="l00773"></a><span class="lineno"> 773</span> <span class="preprocessor">#ifdef PTHREAD_STACK_MIN</span></div><div class="line"><a name="l00774"></a><span class="lineno"> 774</span> <span class="preprocessor">#define RUBY_STACK_MIN ((RUBY_STACK_MIN_LIMIT < PTHREAD_STACK_MIN) ? \</span></div><div class="line"><a name="l00775"></a><span class="lineno"> 775</span> <span class="preprocessor"> PTHREAD_STACK_MIN * 2 : RUBY_STACK_MIN_LIMIT)</span></div><div class="line"><a name="l00776"></a><span class="lineno"> 776</span> <span class="preprocessor">#else</span></div><div class="line"><a name="l00777"></a><span class="lineno"> 777</span> <span class="preprocessor">#define RUBY_STACK_MIN (RUBY_STACK_MIN_LIMIT)</span></div><div class="line"><a name="l00778"></a><span class="lineno"> 778</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00779"></a><span class="lineno"> 779</span> <span class="preprocessor">#define RUBY_STACK_SPACE (RUBY_STACK_MIN/5 > RUBY_STACK_SPACE_LIMIT ? \</span></div><div class="line"><a name="l00780"></a><span class="lineno"> 780</span> <span class="preprocessor"> RUBY_STACK_SPACE_LIMIT : RUBY_STACK_MIN/5)</span></div><div class="line"><a name="l00781"></a><span class="lineno"> 781</span> </div><div class="line"><a name="l00782"></a><span class="lineno"> 782</span> <span class="keyword">static</span> <span class="keywordtype">int</span></div><div class="line"><a name="l00783"></a><span class="lineno"> 783</span> native_thread_create(<a class="code" href="../../d2/d66/structrb__thread__struct.html">rb_thread_t</a> *th)</div><div class="line"><a name="l00784"></a><span class="lineno"> 784</span> {</div><div class="line"><a name="l00785"></a><span class="lineno"> 785</span>  <span class="keywordtype">int</span> <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> = 0;</div><div class="line"><a name="l00786"></a><span class="lineno"> 786</span> </div><div class="line"><a name="l00787"></a><span class="lineno"> 787</span>  <span class="keywordflow">if</span> (use_cached_thread(th)) {</div><div class="line"><a name="l00788"></a><span class="lineno"> 788</span>  <a class="code" href="../../d3/de7/thread_8c.html#aa15388c1c819019d2cfa216af70f82bc">thread_debug</a>(<span class="stringliteral">"create (use cached thread): %p\n"</span>, (<span class="keywordtype">void</span> *)th);</div><div class="line"><a name="l00789"></a><span class="lineno"> 789</span>  }</div><div class="line"><a name="l00790"></a><span class="lineno"> 790</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l00791"></a><span class="lineno"> 791</span>  pthread_attr_t attr;</div><div class="line"><a name="l00792"></a><span class="lineno"> 792</span>  <span class="keyword">const</span> <span class="keywordtype">size_t</span> stack_size = RUBY_STACK_MIN;</div><div class="line"><a name="l00793"></a><span class="lineno"> 793</span>  <span class="keyword">const</span> <span class="keywordtype">size_t</span> space = RUBY_STACK_SPACE;</div><div class="line"><a name="l00794"></a><span class="lineno"> 794</span> </div><div class="line"><a name="l00795"></a><span class="lineno"> 795</span>  th-><a class="code" href="../../d2/d66/structrb__thread__struct.html#add10746c443276bf6df2cc0c6a29c8d7">machine_stack_maxsize</a> = stack_size - space;</div><div class="line"><a name="l00796"></a><span class="lineno"> 796</span> <span class="preprocessor">#ifdef __ia64</span></div><div class="line"><a name="l00797"></a><span class="lineno"> 797</span>  th-><a class="code" href="../../d2/d66/structrb__thread__struct.html#add10746c443276bf6df2cc0c6a29c8d7">machine_stack_maxsize</a> /= 2;</div><div class="line"><a name="l00798"></a><span class="lineno"> 798</span>  th->machine_register_stack_maxsize = th-><a class="code" href="../../d2/d66/structrb__thread__struct.html#add10746c443276bf6df2cc0c6a29c8d7">machine_stack_maxsize</a>;</div><div class="line"><a name="l00799"></a><span class="lineno"> 799</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00800"></a><span class="lineno"> 800</span> </div><div class="line"><a name="l00801"></a><span class="lineno"> 801</span>  CHECK_ERR(pthread_attr_init(&attr));</div><div class="line"><a name="l00802"></a><span class="lineno"> 802</span> </div><div class="line"><a name="l00803"></a><span class="lineno"> 803</span> <span class="preprocessor">#ifdef PTHREAD_STACK_MIN</span></div><div class="line"><a name="l00804"></a><span class="lineno"> 804</span>  <a class="code" href="../../d3/de7/thread_8c.html#aa15388c1c819019d2cfa216af70f82bc">thread_debug</a>(<span class="stringliteral">"create - stack size: %lu\n"</span>, (<span class="keywordtype">unsigned</span> <span class="keywordtype">long</span>)stack_size);</div><div class="line"><a name="l00805"></a><span class="lineno"> 805</span>  CHECK_ERR(pthread_attr_setstacksize(&attr, stack_size));</div><div class="line"><a name="l00806"></a><span class="lineno"> 806</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00807"></a><span class="lineno"> 807</span> </div><div class="line"><a name="l00808"></a><span class="lineno"> 808</span> <span class="preprocessor">#ifdef HAVE_PTHREAD_ATTR_SETINHERITSCHED</span></div><div class="line"><a name="l00809"></a><span class="lineno"> 809</span>  CHECK_ERR(pthread_attr_setinheritsched(&attr, PTHREAD_INHERIT_SCHED));</div><div class="line"><a name="l00810"></a><span class="lineno"> 810</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00811"></a><span class="lineno"> 811</span>  CHECK_ERR(pthread_attr_setdetachstate(&attr, PTHREAD_CREATE_DETACHED));</div><div class="line"><a name="l00812"></a><span class="lineno"> 812</span> </div><div class="line"><a name="l00813"></a><span class="lineno"> 813</span>  <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> = pthread_create(&th-><a class="code" href="../../d2/d66/structrb__thread__struct.html#acbd5b841dcb2158ed2111abd6b876251">thread_id</a>, &attr, thread_start_func_1, th);</div><div class="line"><a name="l00814"></a><span class="lineno"> 814</span>  <a class="code" href="../../d3/de7/thread_8c.html#aa15388c1c819019d2cfa216af70f82bc">thread_debug</a>(<span class="stringliteral">"create: %p (%d)\n"</span>, (<span class="keywordtype">void</span> *)th, <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a>);</div><div class="line"><a name="l00815"></a><span class="lineno"> 815</span>  CHECK_ERR(pthread_attr_destroy(&attr));</div><div class="line"><a name="l00816"></a><span class="lineno"> 816</span>  }</div><div class="line"><a name="l00817"></a><span class="lineno"> 817</span>  <span class="keywordflow">return</span> <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a>;</div><div class="line"><a name="l00818"></a><span class="lineno"> 818</span> }</div><div class="line"><a name="l00819"></a><span class="lineno"> 819</span> </div><div class="line"><a name="l00820"></a><span class="lineno"> 820</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l00821"></a><span class="lineno"> 821</span> native_thread_join(pthread_t th)</div><div class="line"><a name="l00822"></a><span class="lineno"> 822</span> {</div><div class="line"><a name="l00823"></a><span class="lineno"> 823</span>  <span class="keywordtype">int</span> <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> = pthread_join(th, 0);</div><div class="line"><a name="l00824"></a><span class="lineno"> 824</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a>) {</div><div class="line"><a name="l00825"></a><span class="lineno"> 825</span>  <a class="code" href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a>(<a class="code" href="../../d3/d57/eval_8c.html#af1c44c481affdca9f221f315a12601bf">rb_eThreadError</a>, <span class="stringliteral">"native_thread_join() failed (%d)"</span>, <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a>);</div><div class="line"><a name="l00826"></a><span class="lineno"> 826</span>  }</div><div class="line"><a name="l00827"></a><span class="lineno"> 827</span> }</div><div class="line"><a name="l00828"></a><span class="lineno"> 828</span> </div><div class="line"><a name="l00829"></a><span class="lineno"> 829</span> </div><div class="line"><a name="l00830"></a><span class="lineno"> 830</span> <span class="preprocessor">#if USE_NATIVE_THREAD_PRIORITY</span></div><div class="line"><a name="l00831"></a><span class="lineno"> 831</span> </div><div class="line"><a name="l00832"></a><span class="lineno"> 832</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l00833"></a><span class="lineno"> 833</span> native_thread_apply_priority(<a class="code" href="../../d2/d66/structrb__thread__struct.html">rb_thread_t</a> *th)</div><div class="line"><a name="l00834"></a><span class="lineno"> 834</span> {</div><div class="line"><a name="l00835"></a><span class="lineno"> 835</span> <span class="preprocessor">#if defined(_POSIX_PRIORITY_SCHEDULING) && (_POSIX_PRIORITY_SCHEDULING > 0)</span></div><div class="line"><a name="l00836"></a><span class="lineno"> 836</span>  <span class="keyword">struct </span>sched_param sp;</div><div class="line"><a name="l00837"></a><span class="lineno"> 837</span>  <span class="keywordtype">int</span> policy;</div><div class="line"><a name="l00838"></a><span class="lineno"> 838</span>  <span class="keywordtype">int</span> priority = 0 - th-><a class="code" href="../../d2/d66/structrb__thread__struct.html#aec8d3fa76bacce31680b55dd03eac0e9">priority</a>;</div><div class="line"><a name="l00839"></a><span class="lineno"> 839</span>  <span class="keywordtype">int</span> <a class="code" href="../../d1/d6f/date__strftime_8c.html#aa5d960354774dc177393b360c0f90aa9">max</a>, <a class="code" href="../../d1/d6f/date__strftime_8c.html#a2f2bf96d77a187bd4446b4ba3864470d">min</a>;</div><div class="line"><a name="l00840"></a><span class="lineno"> 840</span>  pthread_getschedparam(th-><a class="code" href="../../d2/d66/structrb__thread__struct.html#acbd5b841dcb2158ed2111abd6b876251">thread_id</a>, &policy, &sp);</div><div class="line"><a name="l00841"></a><span class="lineno"> 841</span>  <a class="code" href="../../d1/d6f/date__strftime_8c.html#aa5d960354774dc177393b360c0f90aa9">max</a> = sched_get_priority_max(policy);</div><div class="line"><a name="l00842"></a><span class="lineno"> 842</span>  <a class="code" href="../../d1/d6f/date__strftime_8c.html#a2f2bf96d77a187bd4446b4ba3864470d">min</a> = sched_get_priority_min(policy);</div><div class="line"><a name="l00843"></a><span class="lineno"> 843</span> </div><div class="line"><a name="l00844"></a><span class="lineno"> 844</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d1/d6f/date__strftime_8c.html#a2f2bf96d77a187bd4446b4ba3864470d">min</a> > priority) {</div><div class="line"><a name="l00845"></a><span class="lineno"> 845</span>  priority = <a class="code" href="../../d1/d6f/date__strftime_8c.html#a2f2bf96d77a187bd4446b4ba3864470d">min</a>;</div><div class="line"><a name="l00846"></a><span class="lineno"> 846</span>  }</div><div class="line"><a name="l00847"></a><span class="lineno"> 847</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (<a class="code" href="../../d1/d6f/date__strftime_8c.html#aa5d960354774dc177393b360c0f90aa9">max</a> < priority) {</div><div class="line"><a name="l00848"></a><span class="lineno"> 848</span>  priority = <a class="code" href="../../d1/d6f/date__strftime_8c.html#aa5d960354774dc177393b360c0f90aa9">max</a>;</div><div class="line"><a name="l00849"></a><span class="lineno"> 849</span>  }</div><div class="line"><a name="l00850"></a><span class="lineno"> 850</span> </div><div class="line"><a name="l00851"></a><span class="lineno"> 851</span>  sp.sched_priority = priority;</div><div class="line"><a name="l00852"></a><span class="lineno"> 852</span>  pthread_setschedparam(th-><a class="code" href="../../d2/d66/structrb__thread__struct.html#acbd5b841dcb2158ed2111abd6b876251">thread_id</a>, policy, &sp);</div><div class="line"><a name="l00853"></a><span class="lineno"> 853</span> <span class="preprocessor">#else</span></div><div class="line"><a name="l00854"></a><span class="lineno"> 854</span>  <span class="comment">/* not touched */</span></div><div class="line"><a name="l00855"></a><span class="lineno"> 855</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00856"></a><span class="lineno"> 856</span> }</div><div class="line"><a name="l00857"></a><span class="lineno"> 857</span> </div><div class="line"><a name="l00858"></a><span class="lineno"> 858</span> <span class="preprocessor">#endif </span><span class="comment">/* USE_NATIVE_THREAD_PRIORITY */</span><span class="preprocessor"></span></div><div class="line"><a name="l00859"></a><span class="lineno"> 859</span> </div><div class="line"><a name="l00860"></a><span class="lineno"> 860</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l00861"></a><span class="lineno"> 861</span> ubf_pthread_cond_signal(<span class="keywordtype">void</span> *ptr)</div><div class="line"><a name="l00862"></a><span class="lineno"> 862</span> {</div><div class="line"><a name="l00863"></a><span class="lineno"> 863</span>  <a class="code" href="../../d2/d66/structrb__thread__struct.html">rb_thread_t</a> *th = (<a class="code" href="../../d2/d66/structrb__thread__struct.html">rb_thread_t</a> *)ptr;</div><div class="line"><a name="l00864"></a><span class="lineno"> 864</span>  <a class="code" href="../../d3/de7/thread_8c.html#aa15388c1c819019d2cfa216af70f82bc">thread_debug</a>(<span class="stringliteral">"ubf_pthread_cond_signal (%p)\n"</span>, (<span class="keywordtype">void</span> *)th);</div><div class="line"><a name="l00865"></a><span class="lineno"> 865</span>  native_cond_signal(&th-><a class="code" href="../../d2/d66/structrb__thread__struct.html#a1ee6880a07f5e4bf524af64d1ccf3ad0">native_thread_data</a>.<a class="code" href="../../d9/dae/structnative__thread__data__struct.html#aa90ac8836ed5c4d26d6be4120ecd6054">sleep_cond</a>);</div><div class="line"><a name="l00866"></a><span class="lineno"> 866</span> }</div><div class="line"><a name="l00867"></a><span class="lineno"> 867</span> </div><div class="line"><a name="l00868"></a><span class="lineno"> 868</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l00869"></a><span class="lineno"> 869</span> native_sleep(<a class="code" href="../../d2/d66/structrb__thread__struct.html">rb_thread_t</a> *th, <span class="keyword">struct</span> <a class="code" href="../../d1/d1b/structtimeval.html">timeval</a> *timeout_tv)</div><div class="line"><a name="l00870"></a><span class="lineno"> 870</span> {</div><div class="line"><a name="l00871"></a><span class="lineno"> 871</span>  <span class="keyword">struct </span><a class="code" href="../../da/d1c/structtimespec.html">timespec</a> timeout;</div><div class="line"><a name="l00872"></a><span class="lineno"> 872</span>  pthread_mutex_t *lock = &th-><a class="code" href="../../d2/d66/structrb__thread__struct.html#a88b241c682c89f42b48fd478f208f5b2">interrupt_lock</a>;</div><div class="line"><a name="l00873"></a><span class="lineno"> 873</span>  <a class="code" href="../../d0/d6c/structrb__thread__cond__struct.html">rb_thread_cond_t</a> *<a class="code" href="../../d5/d11/ripper_8c.html#a9c9363cead2d8e8616cb63b4eea79655">cond</a> = &th-><a class="code" href="../../d2/d66/structrb__thread__struct.html#a1ee6880a07f5e4bf524af64d1ccf3ad0">native_thread_data</a>.<a class="code" href="../../d9/dae/structnative__thread__data__struct.html#aa90ac8836ed5c4d26d6be4120ecd6054">sleep_cond</a>;</div><div class="line"><a name="l00874"></a><span class="lineno"> 874</span> </div><div class="line"><a name="l00875"></a><span class="lineno"> 875</span>  <span class="keywordflow">if</span> (timeout_tv) {</div><div class="line"><a name="l00876"></a><span class="lineno"> 876</span>  <span class="keyword">struct </span><a class="code" href="../../da/d1c/structtimespec.html">timespec</a> timeout_rel;</div><div class="line"><a name="l00877"></a><span class="lineno"> 877</span> </div><div class="line"><a name="l00878"></a><span class="lineno"> 878</span>  timeout_rel.<a class="code" href="../../da/d1c/structtimespec.html#afc3302668d7cb5952f590da69fdd4955">tv_sec</a> = timeout_tv-><a class="code" href="../../d1/d1b/structtimeval.html#a3599199839a89e99a2ce29d45312b5cf">tv_sec</a>;</div><div class="line"><a name="l00879"></a><span class="lineno"> 879</span>  timeout_rel.tv_nsec = timeout_tv-><a class="code" href="../../d1/d1b/structtimeval.html#aa8396731f2914f9ed2a457d3da602b80">tv_usec</a> * 1000;</div><div class="line"><a name="l00880"></a><span class="lineno"> 880</span> </div><div class="line"><a name="l00881"></a><span class="lineno"> 881</span>  <span class="comment">/* Solaris cond_timedwait() return EINVAL if an argument is greater than</span></div><div class="line"><a name="l00882"></a><span class="lineno"> 882</span> <span class="comment"> * current_time + 100,000,000. So cut up to 100,000,000. This is</span></div><div class="line"><a name="l00883"></a><span class="lineno"> 883</span> <span class="comment"> * considered as a kind of spurious wakeup. The caller to native_sleep</span></div><div class="line"><a name="l00884"></a><span class="lineno"> 884</span> <span class="comment"> * should care about spurious wakeup.</span></div><div class="line"><a name="l00885"></a><span class="lineno"> 885</span> <span class="comment"> *</span></div><div class="line"><a name="l00886"></a><span class="lineno"> 886</span> <span class="comment"> * See also [Bug #1341] [ruby-core:29702]</span></div><div class="line"><a name="l00887"></a><span class="lineno"> 887</span> <span class="comment"> * http://download.oracle.com/docs/cd/E19683-01/816-0216/6m6ngupgv/index.html</span></div><div class="line"><a name="l00888"></a><span class="lineno"> 888</span> <span class="comment"> */</span></div><div class="line"><a name="l00889"></a><span class="lineno"> 889</span>  <span class="keywordflow">if</span> (timeout_rel.tv_sec > 100000000) {</div><div class="line"><a name="l00890"></a><span class="lineno"> 890</span>  timeout_rel.tv_sec = 100000000;</div><div class="line"><a name="l00891"></a><span class="lineno"> 891</span>  timeout_rel.tv_nsec = 0;</div><div class="line"><a name="l00892"></a><span class="lineno"> 892</span>  }</div><div class="line"><a name="l00893"></a><span class="lineno"> 893</span> </div><div class="line"><a name="l00894"></a><span class="lineno"> 894</span>  timeout = native_cond_timeout(<a class="code" href="../../d5/d11/ripper_8c.html#a9c9363cead2d8e8616cb63b4eea79655">cond</a>, timeout_rel);</div><div class="line"><a name="l00895"></a><span class="lineno"> 895</span>  }</div><div class="line"><a name="l00896"></a><span class="lineno"> 896</span> </div><div class="line"><a name="l00897"></a><span class="lineno"> 897</span>  <a class="code" href="../../d3/de7/thread_8c.html#ac4a353316c0c2cce85b75c7f0aada8ab">GVL_UNLOCK_BEGIN</a>();</div><div class="line"><a name="l00898"></a><span class="lineno"> 898</span>  {</div><div class="line"><a name="l00899"></a><span class="lineno"> 899</span>  pthread_mutex_lock(lock);</div><div class="line"><a name="l00900"></a><span class="lineno"> 900</span>  th-><a class="code" href="../../d2/d66/structrb__thread__struct.html#a1e8ee4d75d7d514449cf70ce7beca57e">unblock</a>.<a class="code" href="../../de/d45/structrb__unblock__callback.html#af641aca3c5c45670cdad373846a79dd2">func</a> = ubf_pthread_cond_signal;</div><div class="line"><a name="l00901"></a><span class="lineno"> 901</span>  th-><a class="code" href="../../d2/d66/structrb__thread__struct.html#a1e8ee4d75d7d514449cf70ce7beca57e">unblock</a>.<a class="code" href="../../de/d45/structrb__unblock__callback.html#a11d7995ba5947f27f071cfda0f48c593">arg</a> = th;</div><div class="line"><a name="l00902"></a><span class="lineno"> 902</span> </div><div class="line"><a name="l00903"></a><span class="lineno"> 903</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d8/d32/vm__core_8h.html#a0556a5a4763f36a45f81053a30570f3d">RUBY_VM_INTERRUPTED</a>(th)) {</div><div class="line"><a name="l00904"></a><span class="lineno"> 904</span>  <span class="comment">/* interrupted. return immediate */</span></div><div class="line"><a name="l00905"></a><span class="lineno"> 905</span>  <a class="code" href="../../d3/de7/thread_8c.html#aa15388c1c819019d2cfa216af70f82bc">thread_debug</a>(<span class="stringliteral">"native_sleep: interrupted before sleep\n"</span>);</div><div class="line"><a name="l00906"></a><span class="lineno"> 906</span>  }</div><div class="line"><a name="l00907"></a><span class="lineno"> 907</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l00908"></a><span class="lineno"> 908</span>  <span class="keywordflow">if</span> (!timeout_tv)</div><div class="line"><a name="l00909"></a><span class="lineno"> 909</span>  native_cond_wait(<a class="code" href="../../d5/d11/ripper_8c.html#a9c9363cead2d8e8616cb63b4eea79655">cond</a>, lock);</div><div class="line"><a name="l00910"></a><span class="lineno"> 910</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l00911"></a><span class="lineno"> 911</span>  native_cond_timedwait(<a class="code" href="../../d5/d11/ripper_8c.html#a9c9363cead2d8e8616cb63b4eea79655">cond</a>, lock, &timeout);</div><div class="line"><a name="l00912"></a><span class="lineno"> 912</span>  }</div><div class="line"><a name="l00913"></a><span class="lineno"> 913</span>  th-><a class="code" href="../../d2/d66/structrb__thread__struct.html#a1e8ee4d75d7d514449cf70ce7beca57e">unblock</a>.<a class="code" href="../../de/d45/structrb__unblock__callback.html#af641aca3c5c45670cdad373846a79dd2">func</a> = 0;</div><div class="line"><a name="l00914"></a><span class="lineno"> 914</span>  th-><a class="code" href="../../d2/d66/structrb__thread__struct.html#a1e8ee4d75d7d514449cf70ce7beca57e">unblock</a>.<a class="code" href="../../de/d45/structrb__unblock__callback.html#a11d7995ba5947f27f071cfda0f48c593">arg</a> = 0;</div><div class="line"><a name="l00915"></a><span class="lineno"> 915</span> </div><div class="line"><a name="l00916"></a><span class="lineno"> 916</span>  pthread_mutex_unlock(lock);</div><div class="line"><a name="l00917"></a><span class="lineno"> 917</span>  }</div><div class="line"><a name="l00918"></a><span class="lineno"> 918</span>  <a class="code" href="../../d3/de7/thread_8c.html#a7731fc2a60a727d5bbd8cf78fd5375a6">GVL_UNLOCK_END</a>();</div><div class="line"><a name="l00919"></a><span class="lineno"> 919</span> </div><div class="line"><a name="l00920"></a><span class="lineno"> 920</span>  <a class="code" href="../../d3/de7/thread_8c.html#aa15388c1c819019d2cfa216af70f82bc">thread_debug</a>(<span class="stringliteral">"native_sleep done\n"</span>);</div><div class="line"><a name="l00921"></a><span class="lineno"> 921</span> }</div><div class="line"><a name="l00922"></a><span class="lineno"> 922</span> </div><div class="line"><a name="l00923"></a><span class="lineno"> 923</span> <span class="preprocessor">#ifdef USE_SIGNAL_THREAD_LIST</span></div><div class="line"><a name="l00924"></a><span class="lineno"> 924</span> <span class="keyword">struct </span>signal_thread_list {</div><div class="line"><a name="l00925"></a><span class="lineno"> 925</span>  <a class="code" href="../../d2/d66/structrb__thread__struct.html">rb_thread_t</a> *th;</div><div class="line"><a name="l00926"></a><span class="lineno"> 926</span>  <span class="keyword">struct </span>signal_thread_list *prev;</div><div class="line"><a name="l00927"></a><span class="lineno"> 927</span>  <span class="keyword">struct </span>signal_thread_list *next;</div><div class="line"><a name="l00928"></a><span class="lineno"> 928</span> };</div><div class="line"><a name="l00929"></a><span class="lineno"> 929</span> </div><div class="line"><a name="l00930"></a><span class="lineno"> 930</span> <span class="keyword">static</span> <span class="keyword">struct </span>signal_thread_list signal_thread_list_anchor = {</div><div class="line"><a name="l00931"></a><span class="lineno"> 931</span>  0, 0, 0,</div><div class="line"><a name="l00932"></a><span class="lineno"> 932</span> };</div><div class="line"><a name="l00933"></a><span class="lineno"> 933</span> </div><div class="line"><a name="l00934"></a><span class="lineno"> 934</span> <span class="preprocessor">#define FGLOCK(lock, body) do { \</span></div><div class="line"><a name="l00935"></a><span class="lineno"> 935</span> <span class="preprocessor"> native_mutex_lock(lock); \</span></div><div class="line"><a name="l00936"></a><span class="lineno"> 936</span> <span class="preprocessor"> { \</span></div><div class="line"><a name="l00937"></a><span class="lineno"> 937</span> <span class="preprocessor"> body; \</span></div><div class="line"><a name="l00938"></a><span class="lineno"> 938</span> <span class="preprocessor"> } \</span></div><div class="line"><a name="l00939"></a><span class="lineno"> 939</span> <span class="preprocessor"> native_mutex_unlock(lock); \</span></div><div class="line"><a name="l00940"></a><span class="lineno"> 940</span> <span class="preprocessor">} while (0)</span></div><div class="line"><a name="l00941"></a><span class="lineno"> 941</span> </div><div class="line"><a name="l00942"></a><span class="lineno"> 942</span> <span class="preprocessor">#if 0 </span><span class="comment">/* for debug */</span><span class="preprocessor"></span></div><div class="line"><a name="l00943"></a><span class="lineno"> 943</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l00944"></a><span class="lineno"> 944</span> print_signal_list(<span class="keywordtype">char</span> *str)</div><div class="line"><a name="l00945"></a><span class="lineno"> 945</span> {</div><div class="line"><a name="l00946"></a><span class="lineno"> 946</span>  <span class="keyword">struct </span>signal_thread_list *<a class="code" href="../../d5/db5/encoding_8c.html#a05f70dacbe595d27364e1e014efb0c8e">list</a> =</div><div class="line"><a name="l00947"></a><span class="lineno"> 947</span>  signal_thread_list_anchor.next;</div><div class="line"><a name="l00948"></a><span class="lineno"> 948</span>  <a class="code" href="../../d3/de7/thread_8c.html#aa15388c1c819019d2cfa216af70f82bc">thread_debug</a>(<span class="stringliteral">"list (%s)> "</span>, str);</div><div class="line"><a name="l00949"></a><span class="lineno"> 949</span>  <span class="keywordflow">while</span>(<a class="code" href="../../d5/db5/encoding_8c.html#a05f70dacbe595d27364e1e014efb0c8e">list</a>){</div><div class="line"><a name="l00950"></a><span class="lineno"> 950</span>  <a class="code" href="../../d3/de7/thread_8c.html#aa15388c1c819019d2cfa216af70f82bc">thread_debug</a>(<span class="stringliteral">"%p (%p), "</span>, <a class="code" href="../../d5/db5/encoding_8c.html#a05f70dacbe595d27364e1e014efb0c8e">list</a>->th, <a class="code" href="../../d5/db5/encoding_8c.html#a05f70dacbe595d27364e1e014efb0c8e">list</a>->th->thread_id);</div><div class="line"><a name="l00951"></a><span class="lineno"> 951</span>  <a class="code" href="../../d5/db5/encoding_8c.html#a05f70dacbe595d27364e1e014efb0c8e">list</a> = <a class="code" href="../../d5/db5/encoding_8c.html#a05f70dacbe595d27364e1e014efb0c8e">list</a>->next;</div><div class="line"><a name="l00952"></a><span class="lineno"> 952</span>  }</div><div class="line"><a name="l00953"></a><span class="lineno"> 953</span>  <a class="code" href="../../d3/de7/thread_8c.html#aa15388c1c819019d2cfa216af70f82bc">thread_debug</a>(<span class="stringliteral">"\n"</span>);</div><div class="line"><a name="l00954"></a><span class="lineno"> 954</span> }</div><div class="line"><a name="l00955"></a><span class="lineno"> 955</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l00956"></a><span class="lineno"> 956</span> </div><div class="line"><a name="l00957"></a><span class="lineno"> 957</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l00958"></a><span class="lineno"> 958</span> add_signal_thread_list(<a class="code" href="../../d2/d66/structrb__thread__struct.html">rb_thread_t</a> *th)</div><div class="line"><a name="l00959"></a><span class="lineno"> 959</span> {</div><div class="line"><a name="l00960"></a><span class="lineno"> 960</span>  <span class="keywordflow">if</span> (!th-><a class="code" href="../../d2/d66/structrb__thread__struct.html#a1ee6880a07f5e4bf524af64d1ccf3ad0">native_thread_data</a>.<a class="code" href="../../d9/dae/structnative__thread__data__struct.html#a144da313977e6bb9229cb2ae5ec7feb1">signal_thread_list</a>) {</div><div class="line"><a name="l00961"></a><span class="lineno"> 961</span>  FGLOCK(&signal_thread_list_lock, {</div><div class="line"><a name="l00962"></a><span class="lineno"> 962</span>  <span class="keyword">struct </span>signal_thread_list *<a class="code" href="../../d5/db5/encoding_8c.html#a05f70dacbe595d27364e1e014efb0c8e">list</a> =</div><div class="line"><a name="l00963"></a><span class="lineno"> 963</span>  <a class="code" href="../../d1/d6f/date__strftime_8c.html#aa21fad24622996b74839deccf1202f29">malloc</a>(<span class="keyword">sizeof</span>(<span class="keyword">struct</span> signal_thread_list));</div><div class="line"><a name="l00964"></a><span class="lineno"> 964</span> </div><div class="line"><a name="l00965"></a><span class="lineno"> 965</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/db5/encoding_8c.html#a05f70dacbe595d27364e1e014efb0c8e">list</a> == 0) {</div><div class="line"><a name="l00966"></a><span class="lineno"> 966</span>  fprintf(stderr, <span class="stringliteral">"[FATAL] failed to allocate memory\n"</span>);</div><div class="line"><a name="l00967"></a><span class="lineno"> 967</span>  exit(<a class="code" href="../../dd/dd0/eval__intern_8h.html#a73efe787c131b385070f25d18b7c9aa4">EXIT_FAILURE</a>);</div><div class="line"><a name="l00968"></a><span class="lineno"> 968</span>  }</div><div class="line"><a name="l00969"></a><span class="lineno"> 969</span> </div><div class="line"><a name="l00970"></a><span class="lineno"> 970</span>  <a class="code" href="../../d5/db5/encoding_8c.html#a05f70dacbe595d27364e1e014efb0c8e">list</a>->th = th;</div><div class="line"><a name="l00971"></a><span class="lineno"> 971</span> </div><div class="line"><a name="l00972"></a><span class="lineno"> 972</span>  <a class="code" href="../../d5/db5/encoding_8c.html#a05f70dacbe595d27364e1e014efb0c8e">list</a>->prev = &signal_thread_list_anchor;</div><div class="line"><a name="l00973"></a><span class="lineno"> 973</span>  <a class="code" href="../../d5/db5/encoding_8c.html#a05f70dacbe595d27364e1e014efb0c8e">list</a>->next = signal_thread_list_anchor.next;</div><div class="line"><a name="l00974"></a><span class="lineno"> 974</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/db5/encoding_8c.html#a05f70dacbe595d27364e1e014efb0c8e">list</a>->next) {</div><div class="line"><a name="l00975"></a><span class="lineno"> 975</span>  <a class="code" href="../../d5/db5/encoding_8c.html#a05f70dacbe595d27364e1e014efb0c8e">list</a>->next->prev = <a class="code" href="../../d5/db5/encoding_8c.html#a05f70dacbe595d27364e1e014efb0c8e">list</a>;</div><div class="line"><a name="l00976"></a><span class="lineno"> 976</span>  }</div><div class="line"><a name="l00977"></a><span class="lineno"> 977</span>  signal_thread_list_anchor.next = <a class="code" href="../../d5/db5/encoding_8c.html#a05f70dacbe595d27364e1e014efb0c8e">list</a>;</div><div class="line"><a name="l00978"></a><span class="lineno"> 978</span>  th-><a class="code" href="../../d2/d66/structrb__thread__struct.html#a1ee6880a07f5e4bf524af64d1ccf3ad0">native_thread_data</a>.<a class="code" href="../../d9/dae/structnative__thread__data__struct.html#a144da313977e6bb9229cb2ae5ec7feb1">signal_thread_list</a> = <a class="code" href="../../d5/db5/encoding_8c.html#a05f70dacbe595d27364e1e014efb0c8e">list</a>;</div><div class="line"><a name="l00979"></a><span class="lineno"> 979</span>  });</div><div class="line"><a name="l00980"></a><span class="lineno"> 980</span>  }</div><div class="line"><a name="l00981"></a><span class="lineno"> 981</span> }</div><div class="line"><a name="l00982"></a><span class="lineno"> 982</span> </div><div class="line"><a name="l00983"></a><span class="lineno"> 983</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l00984"></a><span class="lineno"> 984</span> remove_signal_thread_list(<a class="code" href="../../d2/d66/structrb__thread__struct.html">rb_thread_t</a> *th)</div><div class="line"><a name="l00985"></a><span class="lineno"> 985</span> {</div><div class="line"><a name="l00986"></a><span class="lineno"> 986</span>  <span class="keywordflow">if</span> (th-><a class="code" href="../../d2/d66/structrb__thread__struct.html#a1ee6880a07f5e4bf524af64d1ccf3ad0">native_thread_data</a>.<a class="code" href="../../d9/dae/structnative__thread__data__struct.html#a144da313977e6bb9229cb2ae5ec7feb1">signal_thread_list</a>) {</div><div class="line"><a name="l00987"></a><span class="lineno"> 987</span>  FGLOCK(&signal_thread_list_lock, {</div><div class="line"><a name="l00988"></a><span class="lineno"> 988</span>  <span class="keyword">struct </span>signal_thread_list *<a class="code" href="../../d5/db5/encoding_8c.html#a05f70dacbe595d27364e1e014efb0c8e">list</a> =</div><div class="line"><a name="l00989"></a><span class="lineno"> 989</span>  (<span class="keyword">struct </span>signal_thread_list *)</div><div class="line"><a name="l00990"></a><span class="lineno"> 990</span>  th-><a class="code" href="../../d2/d66/structrb__thread__struct.html#a1ee6880a07f5e4bf524af64d1ccf3ad0">native_thread_data</a>.<a class="code" href="../../d9/dae/structnative__thread__data__struct.html#a144da313977e6bb9229cb2ae5ec7feb1">signal_thread_list</a>;</div><div class="line"><a name="l00991"></a><span class="lineno"> 991</span> </div><div class="line"><a name="l00992"></a><span class="lineno"> 992</span>  <a class="code" href="../../d5/db5/encoding_8c.html#a05f70dacbe595d27364e1e014efb0c8e">list</a>->prev->next = <a class="code" href="../../d5/db5/encoding_8c.html#a05f70dacbe595d27364e1e014efb0c8e">list</a>->next;</div><div class="line"><a name="l00993"></a><span class="lineno"> 993</span>  <a class="code" href="../../d3/d15/name2ctype_8h.html#a79f608ac340f2e7545bb7c0a0030a13a">if</a> (<a class="code" href="../../d5/db5/encoding_8c.html#a05f70dacbe595d27364e1e014efb0c8e">list</a>->next) {</div><div class="line"><a name="l00994"></a><span class="lineno"> 994</span>  <a class="code" href="../../d5/db5/encoding_8c.html#a05f70dacbe595d27364e1e014efb0c8e">list</a>->next->prev = <a class="code" href="../../d5/db5/encoding_8c.html#a05f70dacbe595d27364e1e014efb0c8e">list</a>->prev;</div><div class="line"><a name="l00995"></a><span class="lineno"> 995</span>  }</div><div class="line"><a name="l00996"></a><span class="lineno"> 996</span>  th-><a class="code" href="../../d2/d66/structrb__thread__struct.html#a1ee6880a07f5e4bf524af64d1ccf3ad0">native_thread_data</a>.<a class="code" href="../../d9/dae/structnative__thread__data__struct.html#a144da313977e6bb9229cb2ae5ec7feb1">signal_thread_list</a> = 0;</div><div class="line"><a name="l00997"></a><span class="lineno"> 997</span>  <a class="code" href="../../d5/db5/encoding_8c.html#a05f70dacbe595d27364e1e014efb0c8e">list</a>->th = 0;</div><div class="line"><a name="l00998"></a><span class="lineno"> 998</span>  <a class="code" href="../../d2/d99/win32ole_8c.html#a18100522f0b19b5e9b9875f5737a9386">free</a>(<a class="code" href="../../d5/db5/encoding_8c.html#a05f70dacbe595d27364e1e014efb0c8e">list</a>); <span class="comment">/* ok */</span></div><div class="line"><a name="l00999"></a><span class="lineno"> 999</span>  });</div><div class="line"><a name="l01000"></a><span class="lineno"> 1000</span>  }</div><div class="line"><a name="l01001"></a><span class="lineno"> 1001</span> }</div><div class="line"><a name="l01002"></a><span class="lineno"> 1002</span> </div><div class="line"><a name="l01003"></a><span class="lineno"> 1003</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l01004"></a><span class="lineno"> 1004</span> ubf_select_each(<a class="code" href="../../d2/d66/structrb__thread__struct.html">rb_thread_t</a> *th)</div><div class="line"><a name="l01005"></a><span class="lineno"> 1005</span> {</div><div class="line"><a name="l01006"></a><span class="lineno"> 1006</span>  <a class="code" href="../../d3/de7/thread_8c.html#aa15388c1c819019d2cfa216af70f82bc">thread_debug</a>(<span class="stringliteral">"ubf_select_each (%p)\n"</span>, (<span class="keywordtype">void</span> *)th-><a class="code" href="../../d2/d66/structrb__thread__struct.html#acbd5b841dcb2158ed2111abd6b876251">thread_id</a>);</div><div class="line"><a name="l01007"></a><span class="lineno"> 1007</span>  <span class="keywordflow">if</span> (th) {</div><div class="line"><a name="l01008"></a><span class="lineno"> 1008</span>  <a class="code" href="../../d1/d68/missing-pips_8c.html#a5aafacc071cdfafd0eb992004dee3e62">pthread_kill</a>(th-><a class="code" href="../../d2/d66/structrb__thread__struct.html#acbd5b841dcb2158ed2111abd6b876251">thread_id</a>, SIGVTALRM);</div><div class="line"><a name="l01009"></a><span class="lineno"> 1009</span>  }</div><div class="line"><a name="l01010"></a><span class="lineno"> 1010</span> }</div><div class="line"><a name="l01011"></a><span class="lineno"> 1011</span> </div><div class="line"><a name="l01012"></a><span class="lineno"> 1012</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l01013"></a><span class="lineno"> 1013</span> ubf_select(<span class="keywordtype">void</span> *ptr)</div><div class="line"><a name="l01014"></a><span class="lineno"> 1014</span> {</div><div class="line"><a name="l01015"></a><span class="lineno"> 1015</span>  <a class="code" href="../../d2/d66/structrb__thread__struct.html">rb_thread_t</a> *th = (<a class="code" href="../../d2/d66/structrb__thread__struct.html">rb_thread_t</a> *)ptr;</div><div class="line"><a name="l01016"></a><span class="lineno"> 1016</span>  add_signal_thread_list(th);</div><div class="line"><a name="l01017"></a><span class="lineno"> 1017</span>  <span class="keywordflow">if</span> (pthread_self() != timer_thread_id)</div><div class="line"><a name="l01018"></a><span class="lineno"> 1018</span>  <a class="code" href="../../d8/d32/vm__core_8h.html#a9d4e96f3fcd05963b5d43fc2ecbee3bb">rb_thread_wakeup_timer_thread</a>(); <span class="comment">/* activate timer thread */</span></div><div class="line"><a name="l01019"></a><span class="lineno"> 1019</span>  ubf_select_each(th);</div><div class="line"><a name="l01020"></a><span class="lineno"> 1020</span> }</div><div class="line"><a name="l01021"></a><span class="lineno"> 1021</span> </div><div class="line"><a name="l01022"></a><span class="lineno"> 1022</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l01023"></a><span class="lineno"> 1023</span> ping_signal_thread_list(<span class="keywordtype">void</span>) {</div><div class="line"><a name="l01024"></a><span class="lineno"> 1024</span>  <span class="keywordflow">if</span> (signal_thread_list_anchor.next) {</div><div class="line"><a name="l01025"></a><span class="lineno"> 1025</span>  FGLOCK(&signal_thread_list_lock, {</div><div class="line"><a name="l01026"></a><span class="lineno"> 1026</span>  <span class="keyword">struct </span>signal_thread_list *<a class="code" href="../../d5/db5/encoding_8c.html#a05f70dacbe595d27364e1e014efb0c8e">list</a>;</div><div class="line"><a name="l01027"></a><span class="lineno"> 1027</span> </div><div class="line"><a name="l01028"></a><span class="lineno"> 1028</span>  <a class="code" href="../../d5/db5/encoding_8c.html#a05f70dacbe595d27364e1e014efb0c8e">list</a> = signal_thread_list_anchor.next;</div><div class="line"><a name="l01029"></a><span class="lineno"> 1029</span>  <span class="keywordflow">while</span> (<a class="code" href="../../d5/db5/encoding_8c.html#a05f70dacbe595d27364e1e014efb0c8e">list</a>) {</div><div class="line"><a name="l01030"></a><span class="lineno"> 1030</span>  ubf_select_each(<a class="code" href="../../d5/db5/encoding_8c.html#a05f70dacbe595d27364e1e014efb0c8e">list</a>->th);</div><div class="line"><a name="l01031"></a><span class="lineno"> 1031</span>  <a class="code" href="../../d5/db5/encoding_8c.html#a05f70dacbe595d27364e1e014efb0c8e">list</a> = <a class="code" href="../../d5/db5/encoding_8c.html#a05f70dacbe595d27364e1e014efb0c8e">list</a>->next;</div><div class="line"><a name="l01032"></a><span class="lineno"> 1032</span>  }</div><div class="line"><a name="l01033"></a><span class="lineno"> 1033</span>  });</div><div class="line"><a name="l01034"></a><span class="lineno"> 1034</span>  }</div><div class="line"><a name="l01035"></a><span class="lineno"> 1035</span> }</div><div class="line"><a name="l01036"></a><span class="lineno"> 1036</span> </div><div class="line"><a name="l01037"></a><span class="lineno"> 1037</span> <span class="keyword">static</span> <span class="keywordtype">int</span></div><div class="line"><a name="l01038"></a><span class="lineno"> 1038</span> check_signal_thread_list(<span class="keywordtype">void</span>)</div><div class="line"><a name="l01039"></a><span class="lineno"> 1039</span> {</div><div class="line"><a name="l01040"></a><span class="lineno"> 1040</span>  <span class="keywordflow">if</span> (signal_thread_list_anchor.next)</div><div class="line"><a name="l01041"></a><span class="lineno"> 1041</span>  <span class="keywordflow">return</span> 1;</div><div class="line"><a name="l01042"></a><span class="lineno"> 1042</span>  <span class="keywordflow">else</span></div><div class="line"><a name="l01043"></a><span class="lineno"> 1043</span>  <span class="keywordflow">return</span> 0;</div><div class="line"><a name="l01044"></a><span class="lineno"> 1044</span> }</div><div class="line"><a name="l01045"></a><span class="lineno"> 1045</span> <span class="preprocessor">#else </span><span class="comment">/* USE_SIGNAL_THREAD_LIST */</span><span class="preprocessor"></span></div><div class="line"><a name="l01046"></a><span class="lineno"> 1046</span> <span class="keyword">static</span> <span class="keywordtype">void</span> add_signal_thread_list(<a class="code" href="../../d2/d66/structrb__thread__struct.html">rb_thread_t</a> *th) { }</div><div class="line"><a name="l01047"></a><span class="lineno"> 1047</span> <span class="keyword">static</span> <span class="keywordtype">void</span> remove_signal_thread_list(<a class="code" href="../../d2/d66/structrb__thread__struct.html">rb_thread_t</a> *th) { }</div><div class="line"><a name="l01048"></a><span class="lineno"> 1048</span> <span class="preprocessor">#define ubf_select 0</span></div><div class="line"><a name="l01049"></a><span class="lineno"> 1049</span> <span class="keyword">static</span> <span class="keywordtype">void</span> ping_signal_thread_list(<span class="keywordtype">void</span>) { <span class="keywordflow">return</span>; }</div><div class="line"><a name="l01050"></a><span class="lineno"> 1050</span> <span class="keyword">static</span> <span class="keywordtype">int</span> check_signal_thread_list(<span class="keywordtype">void</span>) { <span class="keywordflow">return</span> 0; }</div><div class="line"><a name="l01051"></a><span class="lineno"> 1051</span> <span class="preprocessor">#endif </span><span class="comment">/* USE_SIGNAL_THREAD_LIST */</span><span class="preprocessor"></span></div><div class="line"><a name="l01052"></a><span class="lineno"> 1052</span> </div><div class="line"><a name="l01053"></a><span class="lineno"> 1053</span> <span class="keyword">static</span> <span class="keywordtype">int</span> timer_thread_pipe[2] = {-1, -1};</div><div class="line"><a name="l01054"></a><span class="lineno"> 1054</span> <span class="keyword">static</span> <span class="keywordtype">int</span> timer_thread_pipe_owner_process;</div><div class="line"><a name="l01055"></a><span class="lineno"> 1055</span> </div><div class="line"><a name="l01056"></a><span class="lineno"> 1056</span> <span class="preprocessor">#define TT_DEBUG 0</span></div><div class="line"><a name="l01057"></a><span class="lineno"> 1057</span> </div><div class="line"><a name="l01058"></a><span class="lineno"> 1058</span> <span class="preprocessor">#define WRITE_CONST(fd, str) (void)(write((fd),(str),sizeof(str)-1)<0)</span></div><div class="line"><a name="l01059"></a><span class="lineno"> 1059</span> </div><div class="line"><a name="l01060"></a><span class="lineno"> 1060</span> <span class="comment">/* only use signal-safe system calls here */</span></div><div class="line"><a name="l01061"></a><span class="lineno"> 1061</span> <span class="keywordtype">void</span></div><div class="line"><a name="l01062"></a><span class="lineno"> 1062</span> <a class="code" href="../../d8/d32/vm__core_8h.html#a9d4e96f3fcd05963b5d43fc2ecbee3bb">rb_thread_wakeup_timer_thread</a>(<span class="keywordtype">void</span>)</div><div class="line"><a name="l01063"></a><span class="lineno"> 1063</span> {</div><div class="line"><a name="l01064"></a><span class="lineno"> 1064</span>  ssize_t <a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a>;</div><div class="line"><a name="l01065"></a><span class="lineno"> 1065</span> </div><div class="line"><a name="l01066"></a><span class="lineno"> 1066</span>  <span class="comment">/* already opened */</span></div><div class="line"><a name="l01067"></a><span class="lineno"> 1067</span>  <span class="keywordflow">if</span> (timer_thread_pipe_owner_process == getpid()) {</div><div class="line"><a name="l01068"></a><span class="lineno"> 1068</span>  <span class="keyword">const</span> <span class="keywordtype">char</span> *buff = <span class="stringliteral">"!"</span>;</div><div class="line"><a name="l01069"></a><span class="lineno"> 1069</span>  retry:</div><div class="line"><a name="l01070"></a><span class="lineno"> 1070</span>  <span class="keywordflow">if</span> ((<a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a> = write(timer_thread_pipe[1], buff, 1)) <= 0) {</div><div class="line"><a name="l01071"></a><span class="lineno"> 1071</span>  <span class="keywordflow">switch</span> (<a class="code" href="../../d4/db0/__sdbm_8c.html#ad65a8842cc674e3ddf69355898c0ecbf">errno</a>) {</div><div class="line"><a name="l01072"></a><span class="lineno"> 1072</span>  <span class="keywordflow">case</span> EINTR: <span class="keywordflow">goto</span> retry;</div><div class="line"><a name="l01073"></a><span class="lineno"> 1073</span>  <span class="keywordflow">case</span> EAGAIN:</div><div class="line"><a name="l01074"></a><span class="lineno"> 1074</span> <span class="preprocessor">#if defined(EWOULDBLOCK) && EWOULDBLOCK != EAGAIN</span></div><div class="line"><a name="l01075"></a><span class="lineno"> 1075</span>  <span class="keywordflow">case</span> <a class="code" href="../../dd/d8c/rubysocket_8h.html#a4a3a0b3605fd3b2336455062ee8e25f0">EWOULDBLOCK</a>:</div><div class="line"><a name="l01076"></a><span class="lineno"> 1076</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l01077"></a><span class="lineno"> 1077</span>  <span class="keywordflow">break</span>;</div><div class="line"><a name="l01078"></a><span class="lineno"> 1078</span>  <span class="keywordflow">default</span>:</div><div class="line"><a name="l01079"></a><span class="lineno"> 1079</span>  <a class="code" href="../../db/dcc/error_8c.html#ad430edfb87ccda99231539a5f6099c8f">rb_async_bug_errno</a>(<span class="stringliteral">"rb_thread_wakeup_timer_thread - write"</span>, <a class="code" href="../../d4/db0/__sdbm_8c.html#ad65a8842cc674e3ddf69355898c0ecbf">errno</a>);</div><div class="line"><a name="l01080"></a><span class="lineno"> 1080</span>  }</div><div class="line"><a name="l01081"></a><span class="lineno"> 1081</span>  }</div><div class="line"><a name="l01082"></a><span class="lineno"> 1082</span>  <span class="keywordflow">if</span> (TT_DEBUG) <a class="code" href="../../db/dcc/error_8c.html#afca333f56561767da0aded8491aa152a">WRITE_CONST</a>(2, <span class="stringliteral">"rb_thread_wakeup_timer_thread: write\n"</span>);</div><div class="line"><a name="l01083"></a><span class="lineno"> 1083</span>  }</div><div class="line"><a name="l01084"></a><span class="lineno"> 1084</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l01085"></a><span class="lineno"> 1085</span>  <span class="comment">/* ignore wakeup */</span></div><div class="line"><a name="l01086"></a><span class="lineno"> 1086</span>  }</div><div class="line"><a name="l01087"></a><span class="lineno"> 1087</span> }</div><div class="line"><a name="l01088"></a><span class="lineno"> 1088</span> </div><div class="line"><a name="l01089"></a><span class="lineno"> 1089</span> <span class="comment">/* VM-dependent API is not available for this function */</span></div><div class="line"><a name="l01090"></a><span class="lineno"> 1090</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l01091"></a><span class="lineno"> 1091</span> consume_communication_pipe(<span class="keywordtype">void</span>)</div><div class="line"><a name="l01092"></a><span class="lineno"> 1092</span> {</div><div class="line"><a name="l01093"></a><span class="lineno"> 1093</span> <span class="preprocessor">#define CCP_READ_BUFF_SIZE 1024</span></div><div class="line"><a name="l01094"></a><span class="lineno"> 1094</span>  <span class="comment">/* buffer can be shared because no one refers to them. */</span></div><div class="line"><a name="l01095"></a><span class="lineno"> 1095</span>  <span class="keyword">static</span> <span class="keywordtype">char</span> buff[CCP_READ_BUFF_SIZE];</div><div class="line"><a name="l01096"></a><span class="lineno"> 1096</span>  ssize_t <a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a>;</div><div class="line"><a name="l01097"></a><span class="lineno"> 1097</span> </div><div class="line"><a name="l01098"></a><span class="lineno"> 1098</span>  retry:</div><div class="line"><a name="l01099"></a><span class="lineno"> 1099</span>  <a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a> = read(timer_thread_pipe[0], buff, CCP_READ_BUFF_SIZE);</div><div class="line"><a name="l01100"></a><span class="lineno"> 1100</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a> < 0) {</div><div class="line"><a name="l01101"></a><span class="lineno"> 1101</span>  <span class="keywordflow">switch</span> (<a class="code" href="../../d4/db0/__sdbm_8c.html#ad65a8842cc674e3ddf69355898c0ecbf">errno</a>) {</div><div class="line"><a name="l01102"></a><span class="lineno"> 1102</span>  <span class="keywordflow">case</span> EINTR: <span class="keywordflow">goto</span> retry;</div><div class="line"><a name="l01103"></a><span class="lineno"> 1103</span>  <span class="keywordflow">default</span>:</div><div class="line"><a name="l01104"></a><span class="lineno"> 1104</span>  <a class="code" href="../../db/dcc/error_8c.html#ad430edfb87ccda99231539a5f6099c8f">rb_async_bug_errno</a>(<span class="stringliteral">"consume_communication_pipe: read\n"</span>, <a class="code" href="../../d4/db0/__sdbm_8c.html#ad65a8842cc674e3ddf69355898c0ecbf">errno</a>);</div><div class="line"><a name="l01105"></a><span class="lineno"> 1105</span>  }</div><div class="line"><a name="l01106"></a><span class="lineno"> 1106</span>  }</div><div class="line"><a name="l01107"></a><span class="lineno"> 1107</span> }</div><div class="line"><a name="l01108"></a><span class="lineno"> 1108</span> </div><div class="line"><a name="l01109"></a><span class="lineno"> 1109</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l01110"></a><span class="lineno"> 1110</span> close_communication_pipe(<span class="keywordtype">void</span>)</div><div class="line"><a name="l01111"></a><span class="lineno"> 1111</span> {</div><div class="line"><a name="l01112"></a><span class="lineno"> 1112</span>  <span class="keywordflow">if</span> (close(timer_thread_pipe[0]) < 0) {</div><div class="line"><a name="l01113"></a><span class="lineno"> 1113</span>  <a class="code" href="../../db/dcc/error_8c.html#a8fa20d858cb91f6b6ddaae05ccbed58c">rb_bug_errno</a>(<span class="stringliteral">"native_stop_timer_thread - close(ttp[0])"</span>, <a class="code" href="../../d4/db0/__sdbm_8c.html#ad65a8842cc674e3ddf69355898c0ecbf">errno</a>);</div><div class="line"><a name="l01114"></a><span class="lineno"> 1114</span>  }</div><div class="line"><a name="l01115"></a><span class="lineno"> 1115</span>  <span class="keywordflow">if</span> (close(timer_thread_pipe[1]) < 0) {</div><div class="line"><a name="l01116"></a><span class="lineno"> 1116</span>  <a class="code" href="../../db/dcc/error_8c.html#a8fa20d858cb91f6b6ddaae05ccbed58c">rb_bug_errno</a>(<span class="stringliteral">"native_stop_timer_thread - close(ttp[1])"</span>, <a class="code" href="../../d4/db0/__sdbm_8c.html#ad65a8842cc674e3ddf69355898c0ecbf">errno</a>);</div><div class="line"><a name="l01117"></a><span class="lineno"> 1117</span>  }</div><div class="line"><a name="l01118"></a><span class="lineno"> 1118</span>  timer_thread_pipe[0] = timer_thread_pipe[1] = -1;</div><div class="line"><a name="l01119"></a><span class="lineno"> 1119</span> }</div><div class="line"><a name="l01120"></a><span class="lineno"> 1120</span> </div><div class="line"><a name="l01121"></a><span class="lineno"> 1121</span> <span class="comment">/* 100ms. 10ms is too small for user level thread scheduling</span></div><div class="line"><a name="l01122"></a><span class="lineno"> 1122</span> <span class="comment"> * on recent Linux (tested on 2.6.35)</span></div><div class="line"><a name="l01123"></a><span class="lineno"> 1123</span> <span class="comment"> */</span></div><div class="line"><a name="l01124"></a><span class="lineno"> 1124</span> <span class="preprocessor">#define TIME_QUANTUM_USEC (100 * 1000)</span></div><div class="line"><a name="l01125"></a><span class="lineno"> 1125</span> </div><div class="line"><a name="l01126"></a><span class="lineno"> 1126</span> <span class="keyword">static</span> <span class="keywordtype">void</span> *</div><div class="line"><a name="l01127"></a><span class="lineno"> 1127</span> thread_timer(<span class="keywordtype">void</span> *<a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>)</div><div class="line"><a name="l01128"></a><span class="lineno"> 1128</span> {</div><div class="line"><a name="l01129"></a><span class="lineno"> 1129</span>  <a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html">rb_global_vm_lock_t</a> *gvl = (<a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html">rb_global_vm_lock_t</a> *)<a class="code" href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a>;</div><div class="line"><a name="l01130"></a><span class="lineno"> 1130</span>  <span class="keywordtype">int</span> <a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a>;</div><div class="line"><a name="l01131"></a><span class="lineno"> 1131</span>  <span class="keyword">struct </span><a class="code" href="../../d1/d1b/structtimeval.html">timeval</a> timeout;</div><div class="line"><a name="l01132"></a><span class="lineno"> 1132</span> </div><div class="line"><a name="l01133"></a><span class="lineno"> 1133</span>  <span class="keywordflow">if</span> (TT_DEBUG) <a class="code" href="../../db/dcc/error_8c.html#afca333f56561767da0aded8491aa152a">WRITE_CONST</a>(2, <span class="stringliteral">"start timer thread\n"</span>);</div><div class="line"><a name="l01134"></a><span class="lineno"> 1134</span> </div><div class="line"><a name="l01135"></a><span class="lineno"> 1135</span>  <span class="keywordflow">while</span> (<a class="code" href="../../d3/de7/thread_8c.html#aa871bbcb89aaa173181b8afa98846042">system_working</a> > 0) {</div><div class="line"><a name="l01136"></a><span class="lineno"> 1136</span>  fd_set rfds;</div><div class="line"><a name="l01137"></a><span class="lineno"> 1137</span>  <span class="keywordtype">int</span> need_polling;</div><div class="line"><a name="l01138"></a><span class="lineno"> 1138</span> </div><div class="line"><a name="l01139"></a><span class="lineno"> 1139</span>  <span class="comment">/* timer function */</span></div><div class="line"><a name="l01140"></a><span class="lineno"> 1140</span>  ping_signal_thread_list();</div><div class="line"><a name="l01141"></a><span class="lineno"> 1141</span>  <a class="code" href="../../d3/de7/thread_8c.html#a4ff953a04ceb8333e059e4fc73a786c0">timer_thread_function</a>(0);</div><div class="line"><a name="l01142"></a><span class="lineno"> 1142</span>  need_polling = check_signal_thread_list();</div><div class="line"><a name="l01143"></a><span class="lineno"> 1143</span> </div><div class="line"><a name="l01144"></a><span class="lineno"> 1144</span>  <span class="keywordflow">if</span> (TT_DEBUG) <a class="code" href="../../db/dcc/error_8c.html#afca333f56561767da0aded8491aa152a">WRITE_CONST</a>(2, <span class="stringliteral">"tick\n"</span>);</div><div class="line"><a name="l01145"></a><span class="lineno"> 1145</span> </div><div class="line"><a name="l01146"></a><span class="lineno"> 1146</span>  <span class="comment">/* wait */</span></div><div class="line"><a name="l01147"></a><span class="lineno"> 1147</span>  FD_ZERO(&rfds);</div><div class="line"><a name="l01148"></a><span class="lineno"> 1148</span>  <a class="code" href="../../dc/db1/win32_8h.html#ac9a6234e30e3cb64542eca6dab921a93">FD_SET</a>(timer_thread_pipe[0], &rfds);</div><div class="line"><a name="l01149"></a><span class="lineno"> 1149</span> </div><div class="line"><a name="l01150"></a><span class="lineno"> 1150</span>  <span class="keywordflow">if</span> (gvl-><a class="code" href="../../d3/d61/structrb__global__vm__lock__struct.html#ad29605e99fcf3859e286ef2765f03149">waiting</a> > 0 || need_polling) {</div><div class="line"><a name="l01151"></a><span class="lineno"> 1151</span>  timeout.tv_sec = 0;</div><div class="line"><a name="l01152"></a><span class="lineno"> 1152</span>  timeout.tv_usec = TIME_QUANTUM_USEC;</div><div class="line"><a name="l01153"></a><span class="lineno"> 1153</span> </div><div class="line"><a name="l01154"></a><span class="lineno"> 1154</span>  <span class="comment">/* polling (TIME_QUANTUM_USEC usec) */</span></div><div class="line"><a name="l01155"></a><span class="lineno"> 1155</span>  <a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a> = select(timer_thread_pipe[0] + 1, &rfds, 0, 0, &timeout);</div><div class="line"><a name="l01156"></a><span class="lineno"> 1156</span>  }</div><div class="line"><a name="l01157"></a><span class="lineno"> 1157</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l01158"></a><span class="lineno"> 1158</span>  <span class="comment">/* wait (infinite) */</span></div><div class="line"><a name="l01159"></a><span class="lineno"> 1159</span>  <a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a> = select(timer_thread_pipe[0] + 1, &rfds, 0, 0, 0);</div><div class="line"><a name="l01160"></a><span class="lineno"> 1160</span>  }</div><div class="line"><a name="l01161"></a><span class="lineno"> 1161</span> </div><div class="line"><a name="l01162"></a><span class="lineno"> 1162</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a> == 0) {</div><div class="line"><a name="l01163"></a><span class="lineno"> 1163</span>  <span class="comment">/* maybe timeout */</span></div><div class="line"><a name="l01164"></a><span class="lineno"> 1164</span>  }</div><div class="line"><a name="l01165"></a><span class="lineno"> 1165</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (<a class="code" href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a> > 0) {</div><div class="line"><a name="l01166"></a><span class="lineno"> 1166</span>  consume_communication_pipe();</div><div class="line"><a name="l01167"></a><span class="lineno"> 1167</span>  }</div><div class="line"><a name="l01168"></a><span class="lineno"> 1168</span>  <span class="keywordflow">else</span> { <span class="comment">/* result < 0 */</span></div><div class="line"><a name="l01169"></a><span class="lineno"> 1169</span>  <span class="keywordflow">switch</span> (<a class="code" href="../../d4/db0/__sdbm_8c.html#ad65a8842cc674e3ddf69355898c0ecbf">errno</a>) {</div><div class="line"><a name="l01170"></a><span class="lineno"> 1170</span>  <span class="keywordflow">case</span> EBADF:</div><div class="line"><a name="l01171"></a><span class="lineno"> 1171</span>  <span class="keywordflow">case</span> EINVAL:</div><div class="line"><a name="l01172"></a><span class="lineno"> 1172</span>  <span class="keywordflow">case</span> ENOMEM: <span class="comment">/* from Linux man */</span></div><div class="line"><a name="l01173"></a><span class="lineno"> 1173</span>  <span class="keywordflow">case</span> EFAULT: <span class="comment">/* from FreeBSD man */</span></div><div class="line"><a name="l01174"></a><span class="lineno"> 1174</span>  <a class="code" href="../../db/dcc/error_8c.html#ad430edfb87ccda99231539a5f6099c8f">rb_async_bug_errno</a>(<span class="stringliteral">"thread_timer: select"</span>, <a class="code" href="../../d4/db0/__sdbm_8c.html#ad65a8842cc674e3ddf69355898c0ecbf">errno</a>);</div><div class="line"><a name="l01175"></a><span class="lineno"> 1175</span>  <span class="keywordflow">default</span>:</div><div class="line"><a name="l01176"></a><span class="lineno"> 1176</span>  <span class="comment">/* ignore */</span>;</div><div class="line"><a name="l01177"></a><span class="lineno"> 1177</span>  }</div><div class="line"><a name="l01178"></a><span class="lineno"> 1178</span>  }</div><div class="line"><a name="l01179"></a><span class="lineno"> 1179</span>  }</div><div class="line"><a name="l01180"></a><span class="lineno"> 1180</span> </div><div class="line"><a name="l01181"></a><span class="lineno"> 1181</span>  <span class="keywordflow">if</span> (TT_DEBUG) <a class="code" href="../../db/dcc/error_8c.html#afca333f56561767da0aded8491aa152a">WRITE_CONST</a>(2, <span class="stringliteral">"finish timer thread\n"</span>);</div><div class="line"><a name="l01182"></a><span class="lineno"> 1182</span>  <span class="keywordflow">return</span> <a class="code" href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a>;</div><div class="line"><a name="l01183"></a><span class="lineno"> 1183</span> }</div><div class="line"><a name="l01184"></a><span class="lineno"> 1184</span> </div><div class="line"><a name="l01185"></a><span class="lineno"> 1185</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l01186"></a><span class="lineno"> 1186</span> rb_thread_create_timer_thread(<span class="keywordtype">void</span>)</div><div class="line"><a name="l01187"></a><span class="lineno"> 1187</span> {</div><div class="line"><a name="l01188"></a><span class="lineno"> 1188</span>  <a class="code" href="../../d8/d36/signal_8c.html#aa327af6a7f7e71295123fa51c29b85b5">rb_enable_interrupt</a>();</div><div class="line"><a name="l01189"></a><span class="lineno"> 1189</span> </div><div class="line"><a name="l01190"></a><span class="lineno"> 1190</span>  <span class="keywordflow">if</span> (!timer_thread_id) {</div><div class="line"><a name="l01191"></a><span class="lineno"> 1191</span>  pthread_attr_t attr;</div><div class="line"><a name="l01192"></a><span class="lineno"> 1192</span>  <span class="keywordtype">int</span> <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a>;</div><div class="line"><a name="l01193"></a><span class="lineno"> 1193</span> </div><div class="line"><a name="l01194"></a><span class="lineno"> 1194</span>  pthread_attr_init(&attr);</div><div class="line"><a name="l01195"></a><span class="lineno"> 1195</span> <span class="preprocessor">#ifdef PTHREAD_STACK_MIN</span></div><div class="line"><a name="l01196"></a><span class="lineno"> 1196</span>  {</div><div class="line"><a name="l01197"></a><span class="lineno"> 1197</span>  <span class="keyword">const</span> <span class="keywordtype">size_t</span> min_size = (4096 * 4);</div><div class="line"><a name="l01198"></a><span class="lineno"> 1198</span>  <span class="comment">/* Allocate the machine stack for the timer thread</span></div><div class="line"><a name="l01199"></a><span class="lineno"> 1199</span> <span class="comment"> * at least 16KB (4 pages). FreeBSD 8.2 AMD64 causes</span></div><div class="line"><a name="l01200"></a><span class="lineno"> 1200</span> <span class="comment"> * machine stack overflow only with PTHREAD_STACK_MIN.</span></div><div class="line"><a name="l01201"></a><span class="lineno"> 1201</span> <span class="comment"> */</span></div><div class="line"><a name="l01202"></a><span class="lineno"> 1202</span>  <span class="keywordtype">size_t</span> stack_size = PTHREAD_STACK_MIN; <span class="comment">/* may be dynamic, get only once */</span></div><div class="line"><a name="l01203"></a><span class="lineno"> 1203</span>  <span class="keywordflow">if</span> (stack_size < min_size) stack_size = min_size;</div><div class="line"><a name="l01204"></a><span class="lineno"> 1204</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d3/de7/thread_8c.html#a90f94aa25d18b63151123512564bfdee">THREAD_DEBUG</a>) stack_size += BUFSIZ;</div><div class="line"><a name="l01205"></a><span class="lineno"> 1205</span>  pthread_attr_setstacksize(&attr, stack_size);</div><div class="line"><a name="l01206"></a><span class="lineno"> 1206</span>  }</div><div class="line"><a name="l01207"></a><span class="lineno"> 1207</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l01208"></a><span class="lineno"> 1208</span> </div><div class="line"><a name="l01209"></a><span class="lineno"> 1209</span>  <span class="comment">/* communication pipe with timer thread and signal handler */</span></div><div class="line"><a name="l01210"></a><span class="lineno"> 1210</span>  <span class="keywordflow">if</span> (timer_thread_pipe_owner_process != getpid()) {</div><div class="line"><a name="l01211"></a><span class="lineno"> 1211</span>  <span class="keywordflow">if</span> (timer_thread_pipe[0] != -1) {</div><div class="line"><a name="l01212"></a><span class="lineno"> 1212</span>  <span class="comment">/* close pipe of parent process */</span></div><div class="line"><a name="l01213"></a><span class="lineno"> 1213</span>  close_communication_pipe();</div><div class="line"><a name="l01214"></a><span class="lineno"> 1214</span>  }</div><div class="line"><a name="l01215"></a><span class="lineno"> 1215</span> </div><div class="line"><a name="l01216"></a><span class="lineno"> 1216</span>  <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> = pipe(timer_thread_pipe);</div><div class="line"><a name="l01217"></a><span class="lineno"> 1217</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> != 0) {</div><div class="line"><a name="l01218"></a><span class="lineno"> 1218</span>  <a class="code" href="../../db/dcc/error_8c.html#a8fa20d858cb91f6b6ddaae05ccbed58c">rb_bug_errno</a>(<span class="stringliteral">"thread_timer: Failed to create communication pipe for timer thread"</span>, <a class="code" href="../../d4/db0/__sdbm_8c.html#ad65a8842cc674e3ddf69355898c0ecbf">errno</a>);</div><div class="line"><a name="l01219"></a><span class="lineno"> 1219</span>  }</div><div class="line"><a name="l01220"></a><span class="lineno"> 1220</span>  <a class="code" href="../../db/d2e/intern_8h.html#a6448f20b0936afe0cb85ab3186753db2">rb_update_max_fd</a>(timer_thread_pipe[0]);</div><div class="line"><a name="l01221"></a><span class="lineno"> 1221</span>  <a class="code" href="../../db/d2e/intern_8h.html#a6448f20b0936afe0cb85ab3186753db2">rb_update_max_fd</a>(timer_thread_pipe[1]);</div><div class="line"><a name="l01222"></a><span class="lineno"> 1222</span> <span class="preprocessor">#if defined(HAVE_FCNTL) && defined(F_GETFL) && defined(F_SETFL)</span></div><div class="line"><a name="l01223"></a><span class="lineno"> 1223</span>  {</div><div class="line"><a name="l01224"></a><span class="lineno"> 1224</span>  <span class="keywordtype">int</span> oflags;</div><div class="line"><a name="l01225"></a><span class="lineno"> 1225</span> <span class="preprocessor">#if defined(O_NONBLOCK)</span></div><div class="line"><a name="l01226"></a><span class="lineno"> 1226</span>  oflags = <a class="code" href="../../dc/db1/win32_8h.html#aa7a55dad56032ce4c5a40eab1d9c8e01">fcntl</a>(timer_thread_pipe[1], F_GETFL);</div><div class="line"><a name="l01227"></a><span class="lineno"> 1227</span>  oflags |= <a class="code" href="../../dc/db1/win32_8h.html#a39d33ce33804efd4d52606d59071c6d8">O_NONBLOCK</a>;</div><div class="line"><a name="l01228"></a><span class="lineno"> 1228</span>  <a class="code" href="../../dc/db1/win32_8h.html#aa7a55dad56032ce4c5a40eab1d9c8e01">fcntl</a>(timer_thread_pipe[1], <a class="code" href="../../dc/db1/win32_8h.html#af2939853c650561d3495ed40f68f6249">F_SETFL</a>, oflags);</div><div class="line"><a name="l01229"></a><span class="lineno"> 1229</span> <span class="preprocessor">#endif </span><span class="comment">/* defined(O_NONBLOCK) */</span><span class="preprocessor"></span></div><div class="line"><a name="l01230"></a><span class="lineno"> 1230</span> <span class="preprocessor">#if defined(FD_CLOEXEC)</span></div><div class="line"><a name="l01231"></a><span class="lineno"> 1231</span>  oflags = <a class="code" href="../../dc/db1/win32_8h.html#aa7a55dad56032ce4c5a40eab1d9c8e01">fcntl</a>(timer_thread_pipe[0], F_GETFD);</div><div class="line"><a name="l01232"></a><span class="lineno"> 1232</span>  <a class="code" href="../../dc/db1/win32_8h.html#aa7a55dad56032ce4c5a40eab1d9c8e01">fcntl</a>(timer_thread_pipe[0], F_SETFD, oflags | FD_CLOEXEC);</div><div class="line"><a name="l01233"></a><span class="lineno"> 1233</span>  oflags = <a class="code" href="../../dc/db1/win32_8h.html#aa7a55dad56032ce4c5a40eab1d9c8e01">fcntl</a>(timer_thread_pipe[1], F_GETFD);</div><div class="line"><a name="l01234"></a><span class="lineno"> 1234</span>  <a class="code" href="../../dc/db1/win32_8h.html#aa7a55dad56032ce4c5a40eab1d9c8e01">fcntl</a>(timer_thread_pipe[1], F_SETFD, oflags | FD_CLOEXEC);</div><div class="line"><a name="l01235"></a><span class="lineno"> 1235</span> <span class="preprocessor">#endif </span><span class="comment">/* defined(FD_CLOEXEC) */</span><span class="preprocessor"></span></div><div class="line"><a name="l01236"></a><span class="lineno"> 1236</span>  }</div><div class="line"><a name="l01237"></a><span class="lineno"> 1237</span> <span class="preprocessor">#endif </span><span class="comment">/* defined(HAVE_FCNTL) && defined(F_GETFL) && defined(F_SETFL) */</span><span class="preprocessor"></span></div><div class="line"><a name="l01238"></a><span class="lineno"> 1238</span> </div><div class="line"><a name="l01239"></a><span class="lineno"> 1239</span>  <span class="comment">/* validate pipe on this process */</span></div><div class="line"><a name="l01240"></a><span class="lineno"> 1240</span>  timer_thread_pipe_owner_process = getpid();</div><div class="line"><a name="l01241"></a><span class="lineno"> 1241</span>  }</div><div class="line"><a name="l01242"></a><span class="lineno"> 1242</span> </div><div class="line"><a name="l01243"></a><span class="lineno"> 1243</span>  <span class="comment">/* create timer thread */</span></div><div class="line"><a name="l01244"></a><span class="lineno"> 1244</span>  <span class="keywordflow">if</span> (timer_thread_id) {</div><div class="line"><a name="l01245"></a><span class="lineno"> 1245</span>  <a class="code" href="../../db/dcc/error_8c.html#a2d5fb28e54f792e7341b2c45f52f3860">rb_bug</a>(<span class="stringliteral">"rb_thread_create_timer_thread: Timer thread was already created\n"</span>);</div><div class="line"><a name="l01246"></a><span class="lineno"> 1246</span>  }</div><div class="line"><a name="l01247"></a><span class="lineno"> 1247</span>  <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> = pthread_create(&timer_thread_id, &attr, thread_timer, &<a class="code" href="../../d8/d32/vm__core_8h.html#a6cfcd3997994924c8cd13c3b5c099ec6">GET_VM</a>()->gvl);</div><div class="line"><a name="l01248"></a><span class="lineno"> 1248</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a> != 0) {</div><div class="line"><a name="l01249"></a><span class="lineno"> 1249</span>  fprintf(stderr, <span class="stringliteral">"[FATAL] Failed to create timer thread (errno: %d)\n"</span>, <a class="code" href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a>);</div><div class="line"><a name="l01250"></a><span class="lineno"> 1250</span>  exit(<a class="code" href="../../dd/dd0/eval__intern_8h.html#a73efe787c131b385070f25d18b7c9aa4">EXIT_FAILURE</a>);</div><div class="line"><a name="l01251"></a><span class="lineno"> 1251</span>  }</div><div class="line"><a name="l01252"></a><span class="lineno"> 1252</span>  pthread_attr_destroy(&attr);</div><div class="line"><a name="l01253"></a><span class="lineno"> 1253</span>  }</div><div class="line"><a name="l01254"></a><span class="lineno"> 1254</span> </div><div class="line"><a name="l01255"></a><span class="lineno"> 1255</span>  <a class="code" href="../../d8/d36/signal_8c.html#a45f4182f58112de024cfdd530eb1363c">rb_disable_interrupt</a>(); <span class="comment">/* only timer thread recieve signal */</span></div><div class="line"><a name="l01256"></a><span class="lineno"> 1256</span> }</div><div class="line"><a name="l01257"></a><span class="lineno"> 1257</span> </div><div class="line"><a name="l01258"></a><span class="lineno"> 1258</span> <span class="keyword">static</span> <span class="keywordtype">int</span></div><div class="line"><a name="l01259"></a><span class="lineno"> 1259</span> native_stop_timer_thread(<span class="keywordtype">int</span> close_anyway)</div><div class="line"><a name="l01260"></a><span class="lineno"> 1260</span> {</div><div class="line"><a name="l01261"></a><span class="lineno"> 1261</span>  <span class="keywordtype">int</span> stopped;</div><div class="line"><a name="l01262"></a><span class="lineno"> 1262</span>  stopped = --<a class="code" href="../../d3/de7/thread_8c.html#aa871bbcb89aaa173181b8afa98846042">system_working</a> <= 0;</div><div class="line"><a name="l01263"></a><span class="lineno"> 1263</span> </div><div class="line"><a name="l01264"></a><span class="lineno"> 1264</span>  <span class="keywordflow">if</span> (TT_DEBUG) fprintf(stderr, <span class="stringliteral">"stop timer thread\n"</span>);</div><div class="line"><a name="l01265"></a><span class="lineno"> 1265</span>  <span class="keywordflow">if</span> (stopped) {</div><div class="line"><a name="l01266"></a><span class="lineno"> 1266</span>  <span class="comment">/* join */</span></div><div class="line"><a name="l01267"></a><span class="lineno"> 1267</span>  <a class="code" href="../../d8/d32/vm__core_8h.html#a9d4e96f3fcd05963b5d43fc2ecbee3bb">rb_thread_wakeup_timer_thread</a>();</div><div class="line"><a name="l01268"></a><span class="lineno"> 1268</span>  native_thread_join(timer_thread_id);</div><div class="line"><a name="l01269"></a><span class="lineno"> 1269</span>  <span class="keywordflow">if</span> (TT_DEBUG) fprintf(stderr, <span class="stringliteral">"joined timer thread\n"</span>);</div><div class="line"><a name="l01270"></a><span class="lineno"> 1270</span>  timer_thread_id = 0;</div><div class="line"><a name="l01271"></a><span class="lineno"> 1271</span> </div><div class="line"><a name="l01272"></a><span class="lineno"> 1272</span>  <span class="comment">/* close communication pipe */</span></div><div class="line"><a name="l01273"></a><span class="lineno"> 1273</span>  <span class="keywordflow">if</span> (close_anyway) {</div><div class="line"><a name="l01274"></a><span class="lineno"> 1274</span>  <span class="comment">/* TODO: Uninstall all signal handlers or mask all signals.</span></div><div class="line"><a name="l01275"></a><span class="lineno"> 1275</span> <span class="comment"> * This pass is cleaning phase (terminate ruby process).</span></div><div class="line"><a name="l01276"></a><span class="lineno"> 1276</span> <span class="comment"> * To avoid such race, we skip to close communication</span></div><div class="line"><a name="l01277"></a><span class="lineno"> 1277</span> <span class="comment"> * pipe. OS will close it at process termination.</span></div><div class="line"><a name="l01278"></a><span class="lineno"> 1278</span> <span class="comment"> * It may not good practice, but pragmatic.</span></div><div class="line"><a name="l01279"></a><span class="lineno"> 1279</span> <span class="comment"> * We remain it is TODO.</span></div><div class="line"><a name="l01280"></a><span class="lineno"> 1280</span> <span class="comment"> */</span></div><div class="line"><a name="l01281"></a><span class="lineno"> 1281</span>  <span class="comment">/* close_communication_pipe(); */</span></div><div class="line"><a name="l01282"></a><span class="lineno"> 1282</span>  }</div><div class="line"><a name="l01283"></a><span class="lineno"> 1283</span>  }</div><div class="line"><a name="l01284"></a><span class="lineno"> 1284</span>  <span class="keywordflow">return</span> stopped;</div><div class="line"><a name="l01285"></a><span class="lineno"> 1285</span> }</div><div class="line"><a name="l01286"></a><span class="lineno"> 1286</span> </div><div class="line"><a name="l01287"></a><span class="lineno"> 1287</span> <span class="keyword">static</span> <span class="keywordtype">void</span></div><div class="line"><a name="l01288"></a><span class="lineno"> 1288</span> native_reset_timer_thread(<span class="keywordtype">void</span>)</div><div class="line"><a name="l01289"></a><span class="lineno"> 1289</span> {</div><div class="line"><a name="l01290"></a><span class="lineno"> 1290</span>  <span class="keywordflow">if</span> (TT_DEBUG) fprintf(stderr, <span class="stringliteral">"reset timer thread\n"</span>);</div><div class="line"><a name="l01291"></a><span class="lineno"> 1291</span> }</div><div class="line"><a name="l01292"></a><span class="lineno"> 1292</span> </div><div class="line"><a name="l01293"></a><span class="lineno"> 1293</span> <span class="preprocessor">#ifdef HAVE_SIGALTSTACK</span></div><div class="line"><a name="l01294"></a><span class="lineno"> 1294</span> <span class="keywordtype">int</span></div><div class="line"><a name="l01295"></a><span class="lineno"> 1295</span> ruby_stack_overflowed_p(<span class="keyword">const</span> <a class="code" href="../../d2/d66/structrb__thread__struct.html">rb_thread_t</a> *th, <span class="keyword">const</span> <span class="keywordtype">void</span> *addr)</div><div class="line"><a name="l01296"></a><span class="lineno"> 1296</span> {</div><div class="line"><a name="l01297"></a><span class="lineno"> 1297</span>  <span class="keywordtype">void</span> *base;</div><div class="line"><a name="l01298"></a><span class="lineno"> 1298</span>  <span class="keywordtype">size_t</span> <a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a>;</div><div class="line"><a name="l01299"></a><span class="lineno"> 1299</span>  <span class="keyword">const</span> <span class="keywordtype">size_t</span> water_mark = 1024 * 1024;</div><div class="line"><a name="l01300"></a><span class="lineno"> 1300</span>  <a class="code" href="../../d0/daa/gc_8h.html#ae2c08ef15cfabdb246c9d17ca3b2e239">STACK_GROW_DIR_DETECTION</a>;</div><div class="line"><a name="l01301"></a><span class="lineno"> 1301</span> </div><div class="line"><a name="l01302"></a><span class="lineno"> 1302</span>  <span class="keywordflow">if</span> (th) {</div><div class="line"><a name="l01303"></a><span class="lineno"> 1303</span>  <a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a> = th-><a class="code" href="../../d2/d66/structrb__thread__struct.html#add10746c443276bf6df2cc0c6a29c8d7">machine_stack_maxsize</a>;</div><div class="line"><a name="l01304"></a><span class="lineno"> 1304</span>  base = (<span class="keywordtype">char</span> *)th-><a class="code" href="../../d2/d66/structrb__thread__struct.html#a004e79191ba26ebbdc62ea9f77039f1b">machine_stack_start</a> - <a class="code" href="../../d0/daa/gc_8h.html#a6880597546e9069cad9831dfe5722e36">STACK_DIR_UPPER</a>(0, <a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a>);</div><div class="line"><a name="l01305"></a><span class="lineno"> 1305</span>  }</div><div class="line"><a name="l01306"></a><span class="lineno"> 1306</span> <span class="preprocessor">#ifdef STACKADDR_AVAILABLE</span></div><div class="line"><a name="l01307"></a><span class="lineno"> 1307</span>  <span class="keywordflow">else</span> <span class="keywordflow">if</span> (get_stack(&base, &<a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a>) == 0) {</div><div class="line"><a name="l01308"></a><span class="lineno"> 1308</span>  <a class="code" href="../../d0/daa/gc_8h.html#a6880597546e9069cad9831dfe5722e36">STACK_DIR_UPPER</a>((<span class="keywordtype">void</span>)(base = (<span class="keywordtype">char</span> *)base + <a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a>), (<span class="keywordtype">void</span>)0);</div><div class="line"><a name="l01309"></a><span class="lineno"> 1309</span>  }</div><div class="line"><a name="l01310"></a><span class="lineno"> 1310</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l01311"></a><span class="lineno"> 1311</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l01312"></a><span class="lineno"> 1312</span>  <span class="keywordflow">return</span> 0;</div><div class="line"><a name="l01313"></a><span class="lineno"> 1313</span>  }</div><div class="line"><a name="l01314"></a><span class="lineno"> 1314</span>  <a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a> /= 5;</div><div class="line"><a name="l01315"></a><span class="lineno"> 1315</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a> > water_mark) <a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a> = water_mark;</div><div class="line"><a name="l01316"></a><span class="lineno"> 1316</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d0/daa/gc_8h.html#ae4823bd6cedcee35bb41d71b344b0056">IS_STACK_DIR_UPPER</a>()) {</div><div class="line"><a name="l01317"></a><span class="lineno"> 1317</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a> > ~(<span class="keywordtype">size_t</span>)base+1) <a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a> = ~(size_t)base+1;</div><div class="line"><a name="l01318"></a><span class="lineno"> 1318</span>  <span class="keywordflow">if</span> (addr > base && addr <= (<span class="keywordtype">void</span> *)((<span class="keywordtype">char</span> *)base + <a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a>)) <span class="keywordflow">return</span> 1;</div><div class="line"><a name="l01319"></a><span class="lineno"> 1319</span>  }</div><div class="line"><a name="l01320"></a><span class="lineno"> 1320</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l01321"></a><span class="lineno"> 1321</span>  <span class="keywordflow">if</span> (<a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a> > (<span class="keywordtype">size_t</span>)base) <a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a> = (<span class="keywordtype">size_t</span>)base;</div><div class="line"><a name="l01322"></a><span class="lineno"> 1322</span>  <span class="keywordflow">if</span> (addr > (<span class="keywordtype">void</span> *)((<span class="keywordtype">char</span> *)base - <a class="code" href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a>) && addr <= base) <span class="keywordflow">return</span> 1;</div><div class="line"><a name="l01323"></a><span class="lineno"> 1323</span>  }</div><div class="line"><a name="l01324"></a><span class="lineno"> 1324</span>  <span class="keywordflow">return</span> 0;</div><div class="line"><a name="l01325"></a><span class="lineno"> 1325</span> }</div><div class="line"><a name="l01326"></a><span class="lineno"> 1326</span> <span class="preprocessor">#endif</span></div><div class="line"><a name="l01327"></a><span class="lineno"> 1327</span> </div><div class="line"><a name="l01328"></a><span class="lineno"> 1328</span> <span class="keywordtype">int</span></div><div class="line"><a name="l01329"></a><span class="lineno"> 1329</span> <a class="code" href="../../db/d2e/intern_8h.html#a99e6a1aee4d7f246bde93617c860767a">rb_reserved_fd_p</a>(<span class="keywordtype">int</span> fd)</div><div class="line"><a name="l01330"></a><span class="lineno"> 1330</span> {</div><div class="line"><a name="l01331"></a><span class="lineno"> 1331</span>  <span class="keywordflow">if</span> (fd == timer_thread_pipe[0] ||</div><div class="line"><a name="l01332"></a><span class="lineno"> 1332</span>  fd == timer_thread_pipe[1]) {</div><div class="line"><a name="l01333"></a><span class="lineno"> 1333</span>  <span class="keywordflow">return</span> 1;</div><div class="line"><a name="l01334"></a><span class="lineno"> 1334</span>  }</div><div class="line"><a name="l01335"></a><span class="lineno"> 1335</span>  <span class="keywordflow">else</span> {</div><div class="line"><a name="l01336"></a><span class="lineno"> 1336</span>  <span class="keywordflow">return</span> 0;</div><div class="line"><a name="l01337"></a><span class="lineno"> 1337</span>  }</div><div class="line"><a name="l01338"></a><span class="lineno"> 1338</span> }</div><div class="line"><a name="l01339"></a><span class="lineno"> 1339</span> </div><div class="line"><a name="l01340"></a><span class="lineno"> 1340</span> <span class="preprocessor">#endif </span><span class="comment">/* THREAD_SYSTEM_DEPENDENT_IMPLEMENTATION */</span><span class="preprocessor"></span></div><div class="ttc" id="ripper_8c_html_a9c9363cead2d8e8616cb63b4eea79655"><div class="ttname"><a href="../../d5/d11/ripper_8c.html#a9c9363cead2d8e8616cb63b4eea79655">cond</a></div><div class="ttdeci">#define cond(node)</div><div class="ttdef"><b>Definition:</b> <a href="../../d5/d11/ripper_8c_source.html#l00392">ripper.c:392</a></div></div>
<div class="ttc" id="structevent__call__args_html_ad264dd84c59c2477096698b2967a9408"><div class="ttname"><a href="../../d5/d7d/structevent__call__args.html#ad264dd84c59c2477096698b2967a9408">event_call_args::th</a></div><div class="ttdeci">rb_thread_t * th</div><div class="ttdef"><b>Definition:</b> <a href="../../d3/de7/thread_8c_source.html#l04099">thread.c:4099</a></div></div>
<div class="ttc" id="error_8c_html_a2d5fb28e54f792e7341b2c45f52f3860"><div class="ttname"><a href="../../db/dcc/error_8c.html#a2d5fb28e54f792e7341b2c45f52f3860">rb_bug</a></div><div class="ttdeci">void rb_bug(const char *fmt,...)</div><div class="ttdef"><b>Definition:</b> <a href="../../db/dcc/error_8c_source.html#l00265">error.c:265</a></div></div>
<div class="ttc" id="win32_8h_html_a091a762f60d91b0f5441d9520dc2079c"><div class="ttname"><a href="../../dc/db1/win32_8h.html#a091a762f60d91b0f5441d9520dc2079c">gettimeofday</a></div><div class="ttdeci">int gettimeofday(struct timeval *, struct timezone *)</div><div class="ttdef"><b>Definition:</b> <a href="../../d5/df2/win32_8c_source.html#l03746">win32.c:3746</a></div></div>
<div class="ttc" id="structrb__global__vm__lock__struct_html_ae665ab760ae2fdf50a508074f72a9edb"><div class="ttname"><a href="../../d3/d61/structrb__global__vm__lock__struct.html#ae665ab760ae2fdf50a508074f72a9edb">rb_global_vm_lock_struct::wait_yield</a></div><div class="ttdeci">int wait_yield</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d82/thread__pthread_8h_source.html#l00048">thread_pthread.h:48</a></div></div>
<div class="ttc" id="intern_8h_html_a6448f20b0936afe0cb85ab3186753db2"><div class="ttname"><a href="../../db/d2e/intern_8h.html#a6448f20b0936afe0cb85ab3186753db2">rb_update_max_fd</a></div><div class="ttdeci">void rb_update_max_fd(int fd)</div><div class="ttdef"><b>Definition:</b> <a href="../../df/d0a/io_8c_source.html#l00156">io.c:156</a></div></div>
<div class="ttc" id="win32ole_8c_html_acb559820d9ca11295b4500f179ef6392"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#acb559820d9ca11295b4500f179ef6392">i</a></div><div class="ttdeci">int i</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00776">win32ole.c:776</a></div></div>
<div class="ttc" id="time_8c_html_ab95d28a7486992d93dd15bc24c06a9d2"><div class="ttname"><a href="../../df/d73/time_8c.html#ab95d28a7486992d93dd15bc24c06a9d2">TIMET_MAX</a></div><div class="ttdeci">#define TIMET_MAX</div><div class="ttdef"><b>Definition:</b> <a href="../../df/d73/time_8c_source.html#l00741">time.c:741</a></div></div>
<div class="ttc" id="structrb__global__vm__lock__struct_html_ad29605e99fcf3859e286ef2765f03149"><div class="ttname"><a href="../../d3/d61/structrb__global__vm__lock__struct.html#ad29605e99fcf3859e286ef2765f03149">rb_global_vm_lock_struct::waiting</a></div><div class="ttdeci">volatile unsigned long waiting</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d82/thread__pthread_8h_source.html#l00041">thread_pthread.h:41</a></div></div>
<div class="ttc" id="date__strftime_8c_html_aa5d960354774dc177393b360c0f90aa9"><div class="ttname"><a href="../../d1/d6f/date__strftime_8c.html#aa5d960354774dc177393b360c0f90aa9">max</a></div><div class="ttdeci">static int max(int a, int b)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/d6f/date__strftime_8c_source.html#l00149">date_strftime.c:149</a></div></div>
<div class="ttc" id="structnative__thread__data__struct_html_a144da313977e6bb9229cb2ae5ec7feb1"><div class="ttname"><a href="../../d9/dae/structnative__thread__data__struct.html#a144da313977e6bb9229cb2ae5ec7feb1">native_thread_data_struct::signal_thread_list</a></div><div class="ttdeci">void * signal_thread_list</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d82/thread__pthread_8h_source.html#l00029">thread_pthread.h:29</a></div></div>
<div class="ttc" id="structrb__thread__struct_html_a88b241c682c89f42b48fd478f208f5b2"><div class="ttname"><a href="../../d2/d66/structrb__thread__struct.html#a88b241c682c89f42b48fd478f208f5b2">rb_thread_struct::interrupt_lock</a></div><div class="ttdeci">rb_thread_lock_t interrupt_lock</div><div class="ttdef"><b>Definition:</b> <a href="../../d8/d32/vm__core_8h_source.html#l00441">vm_core.h:441</a></div></div>
<div class="ttc" id="thread__pthread_8h_html_aad27e6c1e30cf79f10930122e8ae405e"><div class="ttname"><a href="../../d2/d82/thread__pthread_8h.html#aad27e6c1e30cf79f10930122e8ae405e">rb_thread_lock_t</a></div><div class="ttdeci">pthread_mutex_t rb_thread_lock_t</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d82/thread__pthread_8h_source.html#l00019">thread_pthread.h:19</a></div></div>
<div class="ttc" id="name2ctype_8h_html_a79f608ac340f2e7545bb7c0a0030a13a"><div class="ttname"><a href="../../d3/d15/name2ctype_8h.html#a79f608ac340f2e7545bb7c0a0030a13a">if</a></div><div class="ttdeci">if(len<=MAX_WORD_LENGTH &&len >=MIN_WORD_LENGTH)</div><div class="ttdef"><b>Definition:</b> <a href="../../d3/d15/name2ctype_8h_source.html#l23841">name2ctype.h:23841</a></div></div>
<div class="ttc" id="structrb__unblock__callback_html_af641aca3c5c45670cdad373846a79dd2"><div class="ttname"><a href="../../de/d45/structrb__unblock__callback.html#af641aca3c5c45670cdad373846a79dd2">rb_unblock_callback::func</a></div><div class="ttdeci">rb_unblock_function_t * func</div><div class="ttdef"><b>Definition:</b> <a href="../../d8/d32/vm__core_8h_source.html#l00381">vm_core.h:381</a></div></div>
<div class="ttc" id="thread_8c_html_a90f94aa25d18b63151123512564bfdee"><div class="ttname"><a href="../../d3/de7/thread_8c.html#a90f94aa25d18b63151123512564bfdee">THREAD_DEBUG</a></div><div class="ttdeci">#define THREAD_DEBUG</div><div class="ttdef"><b>Definition:</b> <a href="../../d3/de7/thread_8c_source.html#l00072">thread.c:72</a></div></div>
<div class="ttc" id="nkf-utf8_2nkf_8c_html_a64ae40793ade89d800a8c5646d2980fc"><div class="ttname"><a href="../../d6/da0/nkf-utf8_2nkf_8c.html#a64ae40793ade89d800a8c5646d2980fc">id</a></div><div class="ttdeci">const int id</div><div class="ttdef"><b>Definition:</b> <a href="../../d6/da0/nkf-utf8_2nkf_8c_source.html#l00209">nkf.c:209</a></div></div>
<div class="ttc" id="structtimeval_html_a3599199839a89e99a2ce29d45312b5cf"><div class="ttname"><a href="../../d1/d1b/structtimeval.html#a3599199839a89e99a2ce29d45312b5cf">timeval::tv_sec</a></div><div class="ttdeci">long tv_sec</div><div class="ttdef"><b>Definition:</b> <a href="../../dd/dbc/ossl__asn1_8c_source.html#l00017">ossl_asn1.c:17</a></div></div>
<div class="ttc" id="structrb__global__vm__lock__struct_html_acc4c61d6a2560d4639098de581cfc2b2"><div class="ttname"><a href="../../d3/d61/structrb__global__vm__lock__struct.html#acc4c61d6a2560d4639098de581cfc2b2">rb_global_vm_lock_struct::switch_cond</a></div><div class="ttdeci">rb_thread_cond_t switch_cond</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d82/thread__pthread_8h_source.html#l00045">thread_pthread.h:45</a></div></div>
<div class="ttc" id="win32_8h_html_aa7a55dad56032ce4c5a40eab1d9c8e01"><div class="ttname"><a href="../../dc/db1/win32_8h.html#aa7a55dad56032ce4c5a40eab1d9c8e01">fcntl</a></div><div class="ttdeci">int fcntl(int, int,...)</div><div class="ttdef"><b>Definition:</b> <a href="../../d5/df2/win32_8c_source.html#l03579">win32.c:3579</a></div></div>
<div class="ttc" id="error_8c_html_ad430edfb87ccda99231539a5f6099c8f"><div class="ttname"><a href="../../db/dcc/error_8c.html#ad430edfb87ccda99231539a5f6099c8f">rb_async_bug_errno</a></div><div class="ttdeci">void rb_async_bug_errno(const char *mesg, int errno_arg)</div><div class="ttdef"><b>Definition:</b> <a href="../../db/dcc/error_8c_source.html#l00309">error.c:309</a></div></div>
<div class="ttc" id="gc_8h_html_ad79961092b2737e9102a9bcf9ca2dbed"><div class="ttname"><a href="../../d0/daa/gc_8h.html#ad79961092b2737e9102a9bcf9ca2dbed">STACK_UPPER</a></div><div class="ttdeci">#define STACK_UPPER(x, a, b)</div><div class="ttdef"><b>Definition:</b> <a href="../../d0/daa/gc_8h_source.html#l00074">gc.h:74</a></div></div>
<div class="ttc" id="error_8c_html_a0f771a2840561f1838169b3d7d4616f3"><div class="ttname"><a href="../../db/dcc/error_8c.html#a0f771a2840561f1838169b3d7d4616f3">rb_raise</a></div><div class="ttdeci">void rb_raise(VALUE exc, const char *fmt,...)</div><div class="ttdef"><b>Definition:</b> <a href="../../db/dcc/error_8c_source.html#l01574">error.c:1574</a></div></div>
<div class="ttc" id="gc_8h_html"><div class="ttname"><a href="../../d0/daa/gc_8h.html">gc.h</a></div></div>
<div class="ttc" id="thread_8c_html_aa871bbcb89aaa173181b8afa98846042"><div class="ttname"><a href="../../d3/de7/thread_8c.html#aa871bbcb89aaa173181b8afa98846042">system_working</a></div><div class="ttdeci">static volatile int system_working</div><div class="ttdef"><b>Definition:</b> <a href="../../d3/de7/thread_8c_source.html#l00088">thread.c:88</a></div></div>
<div class="ttc" id="time_8c_html_abe5239cfb3b9775b72cc1d81373c7e48"><div class="ttname"><a href="../../df/d73/time_8c.html#abe5239cfb3b9775b72cc1d81373c7e48">unsigned_time_t</a></div><div class="ttdeci">unsigned long unsigned_time_t</div><div class="ttdef"><b>Definition:</b> <a href="../../df/d73/time_8c_source.html#l00732">time.c:732</a></div></div>
<div class="ttc" id="structrb__thread__struct_html"><div class="ttname"><a href="../../d2/d66/structrb__thread__struct.html">rb_thread_struct</a></div><div class="ttdef"><b>Definition:</b> <a href="../../d8/d32/vm__core_8h_source.html#l00393">vm_core.h:393</a></div></div>
<div class="ttc" id="date__strftime_8c_html_a2f2bf96d77a187bd4446b4ba3864470d"><div class="ttname"><a href="../../d1/d6f/date__strftime_8c.html#a2f2bf96d77a187bd4446b4ba3864470d">min</a></div><div class="ttdeci">static int min(int a, int b)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/d6f/date__strftime_8c_source.html#l00133">date_strftime.c:133</a></div></div>
<div class="ttc" id="vm__core_8h_html_a8deb84ec6023e3229db88ac2c9da6138"><div class="ttname"><a href="../../d8/d32/vm__core_8h.html#a8deb84ec6023e3229db88ac2c9da6138">GET_THREAD</a></div><div class="ttdeci">#define GET_THREAD()</div><div class="ttdef"><b>Definition:</b> <a href="../../d8/d32/vm__core_8h_source.html#l00690">vm_core.h:690</a></div></div>
<div class="ttc" id="structtimespec_html_afc3302668d7cb5952f590da69fdd4955"><div class="ttname"><a href="../../da/d1c/structtimespec.html#afc3302668d7cb5952f590da69fdd4955">timespec::tv_sec</a></div><div class="ttdeci">time_t tv_sec</div><div class="ttdef"><b>Definition:</b> <a href="../../d3/d90/missing_8h_source.html#l00045">missing.h:45</a></div></div>
<div class="ttc" id="win32ole_8c_html_a4b5a598a4f53b3724549c48dcfbf7c48"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a4b5a598a4f53b3724549c48dcfbf7c48">p</a></div><div class="ttdeci">Win32OLEIDispatch * p</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d99/win32ole_8c_source.html#l00778">win32ole.c:778</a></div></div>
<div class="ttc" id="thread__pthread_8h_html_a605b74cf6a0a0164ef1d6a633f5e70c9"><div class="ttname"><a href="../../d2/d82/thread__pthread_8h.html#a605b74cf6a0a0164ef1d6a633f5e70c9">rb_thread_id_t</a></div><div class="ttdeci">pthread_t rb_thread_id_t</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d82/thread__pthread_8h_source.html#l00018">thread_pthread.h:18</a></div></div>
<div class="ttc" id="missing-pips_8c_html_ab31381c830fadc7f095b9a7a63b8972d"><div class="ttname"><a href="../../d1/d68/missing-pips_8c.html#ab31381c830fadc7f095b9a7a63b8972d">posix_signal</a></div><div class="ttdeci">sighandler_t posix_signal(int signum, sighandler_t handler)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/d68/missing-pips_8c_source.html#l00043">missing-pips.c:43</a></div></div>
<div class="ttc" id="vm__core_8h_html_a9d4e96f3fcd05963b5d43fc2ecbee3bb"><div class="ttname"><a href="../../d8/d32/vm__core_8h.html#a9d4e96f3fcd05963b5d43fc2ecbee3bb">rb_thread_wakeup_timer_thread</a></div><div class="ttdeci">void rb_thread_wakeup_timer_thread(void)</div></div>
<div class="ttc" id="missing-pips_8c_html_a7698190710a325534c6b511a1a7d8324"><div class="ttname"><a href="../../d1/d68/missing-pips_8c.html#a7698190710a325534c6b511a1a7d8324">getrlimit</a></div><div class="ttdeci">int getrlimit(int resource, struct rlimit *rlp)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/d68/missing-pips_8c_source.html#l00048">missing-pips.c:48</a></div></div>
<div class="ttc" id="win32_8h_html_af2939853c650561d3495ed40f68f6249"><div class="ttname"><a href="../../dc/db1/win32_8h.html#af2939853c650561d3495ed40f68f6249">F_SETFL</a></div><div class="ttdeci">#define F_SETFL</div><div class="ttdef"><b>Definition:</b> <a href="../../dc/db1/win32_8h_source.html#l00588">win32.h:588</a></div></div>
<div class="ttc" id="structtimeval_html_aa8396731f2914f9ed2a457d3da602b80"><div class="ttname"><a href="../../d1/d1b/structtimeval.html#aa8396731f2914f9ed2a457d3da602b80">timeval::tv_usec</a></div><div class="ttdeci">long tv_usec</div><div class="ttdef"><b>Definition:</b> <a href="../../dd/dbc/ossl__asn1_8c_source.html#l00018">ossl_asn1.c:18</a></div></div>
<div class="ttc" id="structtimespec_html_ae3c7510dafa8cbcaede866ed13c99683"><div class="ttname"><a href="../../da/d1c/structtimespec.html#ae3c7510dafa8cbcaede866ed13c99683">timespec::tv_nsec</a></div><div class="ttdeci">long tv_nsec</div><div class="ttdef"><b>Definition:</b> <a href="../../d3/d90/missing_8h_source.html#l00046">missing.h:46</a></div></div>
<div class="ttc" id="vm__core_8h_html_ab10d0a221f4d7a706701b806c8135fd7"><div class="ttname"><a href="../../d8/d32/vm__core_8h.html#ab10d0a221f4d7a706701b806c8135fd7">UNLIKELY</a></div><div class="ttdeci">#define UNLIKELY(x)</div><div class="ttdef"><b>Definition:</b> <a href="../../d8/d32/vm__core_8h_source.html#l00111">vm_core.h:111</a></div></div>
<div class="ttc" id="strerror_8c_html_ae4f3f55be5de649fd367081b9d1b4b0c"><div class="ttname"><a href="../../d5/d04/strerror_8c.html#ae4f3f55be5de649fd367081b9d1b4b0c">msg</a></div><div class="ttdeci">static char msg[50]</div><div class="ttdef"><b>Definition:</b> <a href="../../d5/d04/strerror_8c_source.html#l00008">strerror.c:8</a></div></div>
<div class="ttc" id="thread_8c_html_aa15388c1c819019d2cfa216af70f82bc"><div class="ttname"><a href="../../d3/de7/thread_8c.html#aa15388c1c819019d2cfa216af70f82bc">thread_debug</a></div><div class="ttdeci">#define thread_debug</div><div class="ttdef"><b>Definition:</b> <a href="../../d3/de7/thread_8c_source.html#l00197">thread.c:197</a></div></div>
<div class="ttc" id="win32_8c_html_a6ce68847c12434f60d1b2654a3dc3409"><div class="ttname"><a href="../../d5/df2/win32_8c.html#a6ce68847c12434f60d1b2654a3dc3409">err</a></div><div class="ttdeci">int err</div><div class="ttdef"><b>Definition:</b> <a href="../../d5/df2/win32_8c_source.html#l00078">win32.c:78</a></div></div>
<div class="ttc" id="eval__intern_8h_html_a73efe787c131b385070f25d18b7c9aa4"><div class="ttname"><a href="../../dd/dd0/eval__intern_8h.html#a73efe787c131b385070f25d18b7c9aa4">EXIT_FAILURE</a></div><div class="ttdeci">#define EXIT_FAILURE</div><div class="ttdef"><b>Definition:</b> <a href="../../dd/dd0/eval__intern_8h_source.html#l00024">eval_intern.h:24</a></div></div>
<div class="ttc" id="structrb__thread__struct_html_a004e79191ba26ebbdc62ea9f77039f1b"><div class="ttname"><a href="../../d2/d66/structrb__thread__struct.html#a004e79191ba26ebbdc62ea9f77039f1b">rb_thread_struct::machine_stack_start</a></div><div class="ttdeci">VALUE * machine_stack_start</div><div class="ttdef"><b>Definition:</b> <a href="../../d8/d32/vm__core_8h_source.html#l00463">vm_core.h:463</a></div></div>
<div class="ttc" id="thread_8c_html_ac4a353316c0c2cce85b75c7f0aada8ab"><div class="ttname"><a href="../../d3/de7/thread_8c.html#ac4a353316c0c2cce85b75c7f0aada8ab">GVL_UNLOCK_BEGIN</a></div><div class="ttdeci">#define GVL_UNLOCK_BEGIN()</div><div class="ttdef"><b>Definition:</b> <a href="../../d3/de7/thread_8c_source.html#l00119">thread.c:119</a></div></div>
<div class="ttc" id="win32_8h_html_ac9a6234e30e3cb64542eca6dab921a93"><div class="ttname"><a href="../../dc/db1/win32_8h.html#ac9a6234e30e3cb64542eca6dab921a93">FD_SET</a></div><div class="ttdeci">#define FD_SET(fd, set)</div><div class="ttdef"><b>Definition:</b> <a href="../../dc/db1/win32_8h_source.html#l00592">win32.h:592</a></div></div>
<div class="ttc" id="signal_8c_html_a45f4182f58112de024cfdd530eb1363c"><div class="ttname"><a href="../../d8/d36/signal_8c.html#a45f4182f58112de024cfdd530eb1363c">rb_disable_interrupt</a></div><div class="ttdeci">void rb_disable_interrupt(void)</div><div class="ttdef"><b>Definition:</b> <a href="../../d8/d36/signal_8c_source.html#l00538">signal.c:538</a></div></div>
<div class="ttc" id="structrb__global__vm__lock__struct_html_addd15fc58f843f57ef20f2eb476aa42c"><div class="ttname"><a href="../../d3/d61/structrb__global__vm__lock__struct.html#addd15fc58f843f57ef20f2eb476aa42c">rb_global_vm_lock_struct::cond</a></div><div class="ttdeci">rb_thread_cond_t cond</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d82/thread__pthread_8h_source.html#l00042">thread_pthread.h:42</a></div></div>
<div class="ttc" id="structtimeval_html"><div class="ttname"><a href="../../d1/d1b/structtimeval.html">timeval</a></div><div class="ttdef"><b>Definition:</b> <a href="../../dd/dbc/ossl__asn1_8c_source.html#l00016">ossl_asn1.c:16</a></div></div>
<div class="ttc" id="__sdbm_8c_html_ad65a8842cc674e3ddf69355898c0ecbf"><div class="ttname"><a href="../../d4/db0/__sdbm_8c.html#ad65a8842cc674e3ddf69355898c0ecbf">errno</a></div><div class="ttdeci">int errno</div></div>
<div class="ttc" id="gc_8h_html_a6880597546e9069cad9831dfe5722e36"><div class="ttname"><a href="../../d0/daa/gc_8h.html#a6880597546e9069cad9831dfe5722e36">STACK_DIR_UPPER</a></div><div class="ttdeci">#define STACK_DIR_UPPER(a, b)</div><div class="ttdef"><b>Definition:</b> <a href="../../d0/daa/gc_8h_source.html#l00082">gc.h:82</a></div></div>
<div class="ttc" id="structrb__global__vm__lock__struct_html_a34e139f2c60eee1ed4a0a9685cf1ab64"><div class="ttname"><a href="../../d3/d61/structrb__global__vm__lock__struct.html#a34e139f2c60eee1ed4a0a9685cf1ab64">rb_global_vm_lock_struct::switch_wait_cond</a></div><div class="ttdeci">rb_thread_cond_t switch_wait_cond</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d82/thread__pthread_8h_source.html#l00046">thread_pthread.h:46</a></div></div>
<div class="ttc" id="missing-pips_8c_html_a5aafacc071cdfafd0eb992004dee3e62"><div class="ttname"><a href="../../d1/d68/missing-pips_8c.html#a5aafacc071cdfafd0eb992004dee3e62">pthread_kill</a></div><div class="ttdeci">int pthread_kill(pthread_t thread, int sig)</div><div class="ttdef"><b>Definition:</b> <a href="../../d1/d68/missing-pips_8c_source.html#l00037">missing-pips.c:37</a></div></div>
<div class="ttc" id="thread_8c_html_a7731fc2a60a727d5bbd8cf78fd5375a6"><div class="ttname"><a href="../../d3/de7/thread_8c.html#a7731fc2a60a727d5bbd8cf78fd5375a6">GVL_UNLOCK_END</a></div><div class="ttdeci">#define GVL_UNLOCK_END()</div><div class="ttdef"><b>Definition:</b> <a href="../../d3/de7/thread_8c_source.html#l00124">thread.c:124</a></div></div>
<div class="ttc" id="ruby_2ruby_8h_html_a3c1d4bfc6a81af60bdcb48744c35f760"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#a3c1d4bfc6a81af60bdcb48744c35f760">VALUE</a></div><div class="ttdeci">unsigned long VALUE</div><div class="ttdef"><b>Definition:</b> <a href="../../de/de6/ruby_2ruby_8h_source.html#l00088">ruby.h:88</a></div></div>
<div class="ttc" id="gc_8h_html_ae2c08ef15cfabdb246c9d17ca3b2e239"><div class="ttname"><a href="../../d0/daa/gc_8h.html#ae2c08ef15cfabdb246c9d17ca3b2e239">STACK_GROW_DIR_DETECTION</a></div><div class="ttdeci">#define STACK_GROW_DIR_DETECTION</div><div class="ttdef"><b>Definition:</b> <a href="../../d0/daa/gc_8h_source.html#l00081">gc.h:81</a></div></div>
<div class="ttc" id="nkf_8c_html_a5ea5ac7abf5cce39283e422add1067d5"><div class="ttname"><a href="../../d8/d90/nkf_8c.html#a5ea5ac7abf5cce39283e422add1067d5">result</a></div><div class="ttdeci">static VALUE result</div><div class="ttdef"><b>Definition:</b> <a href="../../d8/d90/nkf_8c_source.html#l00040">nkf.c:40</a></div></div>
<div class="ttc" id="date__strftime_8c_html_aa21fad24622996b74839deccf1202f29"><div class="ttname"><a href="../../d1/d6f/date__strftime_8c.html#aa21fad24622996b74839deccf1202f29">malloc</a></div><div class="ttdeci">void * malloc()</div></div>
<div class="ttc" id="internal_8h_html_a1261ad828419468df5d4e92bb75ff6f3"><div class="ttname"><a href="../../db/dde/internal_8h.html#a1261ad828419468df5d4e92bb75ff6f3">Init_native_thread</a></div><div class="ttdeci">void Init_native_thread(void)</div></div>
<div class="ttc" id="error_8c_html_a8fa20d858cb91f6b6ddaae05ccbed58c"><div class="ttname"><a href="../../db/dcc/error_8c.html#a8fa20d858cb91f6b6ddaae05ccbed58c">rb_bug_errno</a></div><div class="ttdeci">void rb_bug_errno(const char *mesg, int errno_arg)</div><div class="ttdef"><b>Definition:</b> <a href="../../db/dcc/error_8c_source.html#l00288">error.c:288</a></div></div>
<div class="ttc" id="structrb__thread__cond__struct_html"><div class="ttname"><a href="../../d0/d6c/structrb__thread__cond__struct.html">rb_thread_cond_struct</a></div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d82/thread__pthread_8h_source.html#l00021">thread_pthread.h:21</a></div></div>
<div class="ttc" id="thread_8c_html_a4ff953a04ceb8333e059e4fc73a786c0"><div class="ttname"><a href="../../d3/de7/thread_8c.html#a4ff953a04ceb8333e059e4fc73a786c0">timer_thread_function</a></div><div class="ttdeci">static void timer_thread_function(void *)</div><div class="ttdef"><b>Definition:</b> <a href="../../d3/de7/thread_8c_source.html#l03024">thread.c:3024</a></div></div>
<div class="ttc" id="structrb__thread__struct_html_aec8d3fa76bacce31680b55dd03eac0e9"><div class="ttname"><a href="../../d2/d66/structrb__thread__struct.html#aec8d3fa76bacce31680b55dd03eac0e9">rb_thread_struct::priority</a></div><div class="ttdeci">int priority</div><div class="ttdef"><b>Definition:</b> <a href="../../d8/d32/vm__core_8h_source.html#l00429">vm_core.h:429</a></div></div>
<div class="ttc" id="error_8c_html_aec0502b6d84cff19bb2071d1386ff177"><div class="ttname"><a href="../../db/dcc/error_8c.html#aec0502b6d84cff19bb2071d1386ff177">rb_sys_fail</a></div><div class="ttdeci">void rb_sys_fail(const char *mesg)</div><div class="ttdef"><b>Definition:</b> <a href="../../db/dcc/error_8c_source.html#l01671">error.c:1671</a></div></div>
<div class="ttc" id="intern_8h_html_a99e6a1aee4d7f246bde93617c860767a"><div class="ttname"><a href="../../db/d2e/intern_8h.html#a99e6a1aee4d7f246bde93617c860767a">rb_reserved_fd_p</a></div><div class="ttdeci">int rb_reserved_fd_p(int fd)</div></div>
<div class="ttc" id="signal_8c_html_aa327af6a7f7e71295123fa51c29b85b5"><div class="ttname"><a href="../../d8/d36/signal_8c.html#aa327af6a7f7e71295123fa51c29b85b5">rb_enable_interrupt</a></div><div class="ttdeci">void rb_enable_interrupt(void)</div><div class="ttdef"><b>Definition:</b> <a href="../../d8/d36/signal_8c_source.html#l00550">signal.c:550</a></div></div>
<div class="ttc" id="error_8c_html_afca333f56561767da0aded8491aa152a"><div class="ttname"><a href="../../db/dcc/error_8c.html#afca333f56561767da0aded8491aa152a">WRITE_CONST</a></div><div class="ttdeci">#define WRITE_CONST(fd, str)</div><div class="ttdef"><b>Definition:</b> <a href="../../db/dcc/error_8c_source.html#l00306">error.c:306</a></div></div>
<div class="ttc" id="thread_8c_html_a711ed0f5f2d64d14a71f64a971531c02"><div class="ttname"><a href="../../d3/de7/thread_8c.html#a711ed0f5f2d64d14a71f64a971531c02">thread_start_func_2</a></div><div class="ttdeci">#define thread_start_func_2(th, st, rst)</div><div class="ttdef"><b>Definition:</b> <a href="../../d3/de7/thread_8c_source.html#l00201">thread.c:201</a></div></div>
<div class="ttc" id="encoding_8c_html_a439227feff9d7f55384e8780cfc2eb82"><div class="ttname"><a href="../../d5/db5/encoding_8c.html#a439227feff9d7f55384e8780cfc2eb82">size</a></div><div class="ttdeci">int size</div><div class="ttdef"><b>Definition:</b> <a href="../../d5/db5/encoding_8c_source.html#l00051">encoding.c:51</a></div></div>
<div class="ttc" id="structrb__thread__struct_html_a1e8ee4d75d7d514449cf70ce7beca57e"><div class="ttname"><a href="../../d2/d66/structrb__thread__struct.html#a1e8ee4d75d7d514449cf70ce7beca57e">rb_thread_struct::unblock</a></div><div class="ttdeci">struct rb_unblock_callback unblock</div><div class="ttdef"><b>Definition:</b> <a href="../../d8/d32/vm__core_8h_source.html#l00442">vm_core.h:442</a></div></div>
<div class="ttc" id="structrb__unblock__callback_html_a11d7995ba5947f27f071cfda0f48c593"><div class="ttname"><a href="../../de/d45/structrb__unblock__callback.html#a11d7995ba5947f27f071cfda0f48c593">rb_unblock_callback::arg</a></div><div class="ttdeci">void * arg</div><div class="ttdef"><b>Definition:</b> <a href="../../d8/d32/vm__core_8h_source.html#l00382">vm_core.h:382</a></div></div>
<div class="ttc" id="structnative__thread__data__struct_html_aa90ac8836ed5c4d26d6be4120ecd6054"><div class="ttname"><a href="../../d9/dae/structnative__thread__data__struct.html#aa90ac8836ed5c4d26d6be4120ecd6054">native_thread_data_struct::sleep_cond</a></div><div class="ttdeci">rb_thread_cond_t sleep_cond</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d82/thread__pthread_8h_source.html#l00030">thread_pthread.h:30</a></div></div>
<div class="ttc" id="win32_8h_html_a39d33ce33804efd4d52606d59071c6d8"><div class="ttname"><a href="../../dc/db1/win32_8h.html#a39d33ce33804efd4d52606d59071c6d8">O_NONBLOCK</a></div><div class="ttdeci">#define O_NONBLOCK</div><div class="ttdef"><b>Definition:</b> <a href="../../dc/db1/win32_8h_source.html#l00589">win32.h:589</a></div></div>
<div class="ttc" id="encoding_8c_html_a05f70dacbe595d27364e1e014efb0c8e"><div class="ttname"><a href="../../d5/db5/encoding_8c.html#a05f70dacbe595d27364e1e014efb0c8e">list</a></div><div class="ttdeci">struct rb_encoding_entry * list</div><div class="ttdef"><b>Definition:</b> <a href="../../d5/db5/encoding_8c_source.html#l00049">encoding.c:49</a></div></div>
<div class="ttc" id="win32_8h_html_a597718e59a8fc9c4d4ab63f5a34e28b1"><div class="ttname"><a href="../../dc/db1/win32_8h.html#a597718e59a8fc9c4d4ab63f5a34e28b1">ETIMEDOUT</a></div><div class="ttdeci">#define ETIMEDOUT</div><div class="ttdef"><b>Definition:</b> <a href="../../dc/db1/win32_8h_source.html#l00556">win32.h:556</a></div></div>
<div class="ttc" id="structrb__thread__struct_html_a1ee6880a07f5e4bf524af64d1ccf3ad0"><div class="ttname"><a href="../../d2/d66/structrb__thread__struct.html#a1ee6880a07f5e4bf524af64d1ccf3ad0">rb_thread_struct::native_thread_data</a></div><div class="ttdeci">native_thread_data_t native_thread_data</div><div class="ttdef"><b>Definition:</b> <a href="../../d8/d32/vm__core_8h_source.html#l00431">vm_core.h:431</a></div></div>
<div class="ttc" id="rubysocket_8h_html_a4a3a0b3605fd3b2336455062ee8e25f0"><div class="ttname"><a href="../../dd/d8c/rubysocket_8h.html#a4a3a0b3605fd3b2336455062ee8e25f0">EWOULDBLOCK</a></div><div class="ttdeci">#define EWOULDBLOCK</div><div class="ttdef"><b>Definition:</b> <a href="../../dd/d8c/rubysocket_8h_source.html#l00089">rubysocket.h:89</a></div></div>
<div class="ttc" id="thread_8c_html_a55c3507d4449aa123567d234b0fdd480"><div class="ttname"><a href="../../d3/de7/thread_8c.html#a55c3507d4449aa123567d234b0fdd480">thread_start</a></div><div class="ttdeci">static VALUE thread_start(VALUE klass, VALUE args)</div><div class="ttdef"><b>Definition:</b> <a href="../../d3/de7/thread_8c_source.html#l00626">thread.c:626</a></div></div>
<div class="ttc" id="structtimespec_html"><div class="ttname"><a href="../../da/d1c/structtimespec.html">timespec</a></div><div class="ttdef"><b>Definition:</b> <a href="../../d3/d90/missing_8h_source.html#l00044">missing.h:44</a></div></div>
<div class="ttc" id="error_8c_html_a1f4044eeff81eb1676037771628b555c"><div class="ttname"><a href="../../db/dcc/error_8c.html#a1f4044eeff81eb1676037771628b555c">rb_eNotImpError</a></div><div class="ttdeci">VALUE rb_eNotImpError</div><div class="ttdef"><b>Definition:</b> <a href="../../db/dcc/error_8c_source.html#l00477">error.c:477</a></div></div>
<div class="ttc" id="structrb__vm__struct_html_a0e73c33ec1f57037ccdf288b3242bef5"><div class="ttname"><a href="../../db/d74/structrb__vm__struct.html#a0e73c33ec1f57037ccdf288b3242bef5">rb_vm_struct::gvl</a></div><div class="ttdeci">rb_global_vm_lock_t gvl</div><div class="ttdef"><b>Definition:</b> <a href="../../d8/d32/vm__core_8h_source.html#l00280">vm_core.h:280</a></div></div>
<div class="ttc" id="structrb__global__vm__lock__struct_html_a615841146b7c9b86aa90bec80144fdd4"><div class="ttname"><a href="../../d3/d61/structrb__global__vm__lock__struct.html#a615841146b7c9b86aa90bec80144fdd4">rb_global_vm_lock_struct::acquired</a></div><div class="ttdeci">unsigned long acquired</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d82/thread__pthread_8h_source.html#l00037">thread_pthread.h:37</a></div></div>
<div class="ttc" id="structrb__vm__struct_html"><div class="ttname"><a href="../../db/d74/structrb__vm__struct.html">rb_vm_struct</a></div><div class="ttdef"><b>Definition:</b> <a href="../../d8/d32/vm__core_8h_source.html#l00277">vm_core.h:277</a></div></div>
<div class="ttc" id="vm__core_8h_html_a0556a5a4763f36a45f81053a30570f3d"><div class="ttname"><a href="../../d8/d32/vm__core_8h.html#a0556a5a4763f36a45f81053a30570f3d">RUBY_VM_INTERRUPTED</a></div><div class="ttdeci">#define RUBY_VM_INTERRUPTED(th)</div><div class="ttdef"><b>Definition:</b> <a href="../../d8/d32/vm__core_8h_source.html#l00707">vm_core.h:707</a></div></div>
<div class="ttc" id="structrb__global__vm__lock__struct_html_a871bd453d1a5d4321e11a4d0a3983c78"><div class="ttname"><a href="../../d3/d61/structrb__global__vm__lock__struct.html#a871bd453d1a5d4321e11a4d0a3983c78">rb_global_vm_lock_struct::need_yield</a></div><div class="ttdeci">int need_yield</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d82/thread__pthread_8h_source.html#l00047">thread_pthread.h:47</a></div></div>
<div class="ttc" id="structrb__global__vm__lock__struct_html_a948be6b7a74025df722091e4da6d9701"><div class="ttname"><a href="../../d3/d61/structrb__global__vm__lock__struct.html#a948be6b7a74025df722091e4da6d9701">rb_global_vm_lock_struct::lock</a></div><div class="ttdeci">pthread_mutex_t lock</div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d82/thread__pthread_8h_source.html#l00038">thread_pthread.h:38</a></div></div>
<div class="ttc" id="structrb__thread__struct_html_add10746c443276bf6df2cc0c6a29c8d7"><div class="ttname"><a href="../../d2/d66/structrb__thread__struct.html#add10746c443276bf6df2cc0c6a29c8d7">rb_thread_struct::machine_stack_maxsize</a></div><div class="ttdeci">size_t machine_stack_maxsize</div><div class="ttdef"><b>Definition:</b> <a href="../../d8/d32/vm__core_8h_source.html#l00465">vm_core.h:465</a></div></div>
<div class="ttc" id="__sdbm_8c_html_a070d2ce7b6bb7e5c05602aa8c308d0c4"><div class="ttname"><a href="../../d4/db0/__sdbm_8c.html#a070d2ce7b6bb7e5c05602aa8c308d0c4">NULL</a></div><div class="ttdeci">#define NULL</div><div class="ttdef"><b>Definition:</b> <a href="../../d4/db0/__sdbm_8c_source.html#l00107">_sdbm.c:107</a></div></div>
<div class="ttc" id="ruby_2ruby_8h_html_ab7d9aa9836c379212b86b985909f7303"><div class="ttname"><a href="../../de/de6/ruby_2ruby_8h.html#ab7d9aa9836c379212b86b985909f7303">ruby_init_stack</a></div><div class="ttdeci">void ruby_init_stack(volatile VALUE *)</div></div>
<div class="ttc" id="structrb__global__vm__lock__struct_html"><div class="ttname"><a href="../../d3/d61/structrb__global__vm__lock__struct.html">rb_global_vm_lock_struct</a></div><div class="ttdef"><b>Definition:</b> <a href="../../d2/d82/thread__pthread_8h_source.html#l00035">thread_pthread.h:35</a></div></div>
<div class="ttc" id="win32ole_8c_html_a18100522f0b19b5e9b9875f5737a9386"><div class="ttname"><a href="../../d2/d99/win32ole_8c.html#a18100522f0b19b5e9b9875f5737a9386">free</a></div><div class="ttdeci">free(psz)</div></div>
<div class="ttc" id="eval_8c_html_af1c44c481affdca9f221f315a12601bf"><div class="ttname"><a href="../../d3/d57/eval_8c.html#af1c44c481affdca9f221f315a12601bf">rb_eThreadError</a></div><div class="ttdeci">VALUE rb_eThreadError</div><div class="ttdef"><b>Definition:</b> <a href="../../d3/d57/eval_8c_source.html#l00623">eval.c:623</a></div></div>
<div class="ttc" id="structrb__thread__struct_html_acbd5b841dcb2158ed2111abd6b876251"><div class="ttname"><a href="../../d2/d66/structrb__thread__struct.html#acbd5b841dcb2158ed2111abd6b876251">rb_thread_struct::thread_id</a></div><div class="ttdeci">rb_thread_id_t thread_id</div><div class="ttdef"><b>Definition:</b> <a href="../../d8/d32/vm__core_8h_source.html#l00427">vm_core.h:427</a></div></div>
<div class="ttc" id="gc_8h_html_ae4823bd6cedcee35bb41d71b344b0056"><div class="ttname"><a href="../../d0/daa/gc_8h.html#ae4823bd6cedcee35bb41d71b344b0056">IS_STACK_DIR_UPPER</a></div><div class="ttdeci">#define IS_STACK_DIR_UPPER()</div><div class="ttdef"><b>Definition:</b> <a href="../../d0/daa/gc_8h_source.html#l00084">gc.h:84</a></div></div>
<div class="ttc" id="vm__core_8h_html_a6cfcd3997994924c8cd13c3b5c099ec6"><div class="ttname"><a href="../../d8/d32/vm__core_8h.html#a6cfcd3997994924c8cd13c3b5c099ec6">GET_VM</a></div><div class="ttdeci">#define GET_VM()</div><div class="ttdef"><b>Definition:</b> <a href="../../d8/d32/vm__core_8h_source.html#l00689">vm_core.h:689</a></div></div>
</div><!-- fragment --></div><!-- contents -->
<!-- start footer part -->
<hr class="footer"/><address class="footer"><small>
Generated by  <a href="http://www.doxygen.org/index.html">
<img class="footer" src="../../doxygen.png" alt="doxygen"/>
</a> 1.8.14
</small></address>
</body>
</html>