简 介
PHP取得成功的一个主要原因之一是她拥有大量的可用扩展。web开发者无论有何种需求,这种需求最有可能在PHP发行包里找到。PHP发行包包括支持各种数据库,图形文件格式,压缩,XML技术扩展在内的许多扩展。
扩展API的引入使PHP3取得了巨大的进展,扩展API机制使PHP开发社区很容易的开发出几十种扩展。现在,两个版本过去了,API仍然和PHP3时的非常相似。扩展主要的思想是:尽可能的从扩展编写者那里隐藏PHP的内部机制和脚本引擎本身,仅仅需要开发者熟悉API。
有两个理由需要自己编写PHP扩展。第一个理由是:PHP需要支持一项她还未支持的技术。这通常包括包裹一些现成的C函数库,以便提供PHP接口。例如,如果一个叫FooBase的数据库已推出市场,你需要建立一个PHP扩展帮助你从PHP里调用FooBase的C函数库。这个工作可能仅由一个人完成,然后被整个PHP社区共享(如果你愿意的话)。第二个不是很普遍的理由是:你需要从性能或功能的原因考虑来编写一些商业逻辑。
如果以上的两个理由都和你没什么关系,同时你感觉自己没有冒险精神,那么你可以跳过本章。
本章教你如何编写相对简单的PHP扩展,使用一部分扩展API函数。对于大多数打算开发自定义PHP扩展开发者而言,它含概了足够的资料。学习一门编程课程的最好方法之一就是动手做一些极其简单的例子,这些例子正是本章的线索。一旦你明白了基础的东西,你就可以在互联网上通过阅读文挡、原代码或参加邮件列表新闻组讨论来丰富自己。因此,本章集中在让你如何开始的话题。在UNIX下一个叫ext_skel的脚本被用于建立扩展的骨架,骨架信息从一个描述扩展接口的定义文件中取得。因此你需要利用UNIX来建立一个骨架。Windows开发者可以使用Windows ext_skel_win32.php代替ext_skel。
然而,本章关于用你开发的扩展编译PHP的指导仅涉及UNIX编译系统。本章中所有的对API的解释与UNIX和Windows下开发的扩展都有联系。
当你阅读完这章,你能学会如何
- 建立一个简单的商业逻辑扩展。
- 建议个C函数库的包裹扩展,尤其是有些标准C文件操作函数比如fopen()
快速开始
本节没有介绍关于脚本引擎基本构造的一些知识,而是直接进入扩展的编码讲解中,因此不要担心你无法立刻获得对扩展整体把握的感觉。假设你正在开发一个网站,需要一个把字符串重复n次的函数。下面是用PHP写的例子:
<ol><li><span class="sh_keyword">function</span> <span class="sh_function">self_concat</span><span class="sh_symbol">(</span><span class="sh_variable">$string</span><span class="sh_symbol">,</span> <span class="sh_variable">$n</span><span class="sh_symbol">)</span><span class="sh_cbracket">{</span></li><li> <span class="sh_variable">$result</span> <span class="sh_symbol">=</span> <span class="sh_string">""</span><span class="sh_symbol">;</span></li><li> <span class="sh_keyword">for</span><span class="sh_symbol">(</span><span class="sh_variable">$i</span> <span class="sh_symbol">=</span> <span class="sh_number">0</span><span class="sh_symbol">;</span> <span class="sh_variable">$i</span> <span class="sh_symbol"><</span> <span class="sh_variable">$n</span><span class="sh_symbol">;</span> <span class="sh_variable">$i</span><span class="sh_symbol">++)</span><span class="sh_cbracket">{</span></li><li> <span class="sh_variable">$result</span> <span class="sh_symbol">.=</span> <span class="sh_variable">$string</span><span class="sh_symbol">;</span></li><li> <span class="sh_cbracket">}</span></li><li> <span class="sh_keyword">return</span> <span class="sh_variable">$result</span><span class="sh_symbol">;</span></li><li><span class="sh_cbracket">}</span></li><li> </li><li><span class="sh_function">self_concat</span><span class="sh_symbol">(</span><span class="sh_string">"One"</span><span class="sh_symbol">,</span> <span class="sh_number">3</span><span class="sh_symbol">)</span> returns <span class="sh_string">"OneOneOne"</span><span class="sh_symbol">.</span></li><li> </li><li><span class="sh_function">self_concat</span><span class="sh_symbol">(</span><span class="sh_string">"One"</span><span class="sh_symbol">,</span> <span class="sh_number">1</span><span class="sh_symbol">)</span> returns <span class="sh_string">"One"</span><span class="sh_symbol">.</span></li></ol>
假设由于一些奇怪的原因,你需要时常调用这个函数,而且还要传给函数很长的字符串和大值n。这意味着在脚本里有相当巨大的字符串连接量和内存重新分配过程,以至显著地降低脚本执行速度。如果有一个函数能够更快地分配大量且足够的内存来存放结果字符串,然后把$string重复n次,就不需要在每次循环迭代中分配内存。
为扩展建立函数的第一步是写一个函数定义文件,该函数定义文件定义了扩展对外提供的函数原形。该例中,定义函数只有一行函数原形self_concat() :
<ol><li><span class="sh_usertype">string</span><span class="sh_normal"> </span><span class="sh_function">self_concat</span><span class="sh_symbol">(</span><span class="sh_usertype">string</span><span class="sh_normal"> </span>str<span class="sh_symbol">,</span> <span class="sh_type">int</span> n<span class="sh_symbol">)</span></li></ol>
函数定义文件的一般格式是一个函数一行。你可以定义可选参数和使用大量的PHP类型,包括: bool, float, int, array等。
保存为myfunctions.def文件至PHP原代码目录树下。
该是通过扩展骨架(skeleton)构造器运行函数定义文件的时机了。该构造器脚本叫ext_skel,放在PHP原代码目录树的ext/目录下(PHP原码主目录下的README.EXT_SKEL提供了更多的信息)。假设你把函数定义保存在一个叫做myfunctions.def的文件里,而且你希望把扩展取名为myfunctions,运行下面的命令来建立扩展骨架
<ol><li>./ext_skel --extname=myfunctions --proto=myfunctions.def</li></ol>
这个命令在ext/目录下建立了一个myfunctions/目录。你要做的第一件事情也许就是编译该骨架,以便编写和测试实际的C代码。编译扩展有两种方法:
- 作为一个可装载模块或者DSO(动态共享对象)
- 静态编译到PHP
因为第二种方法比较容易上手,所以本章采用静态编译。如果你对编译可装载扩展模块感兴趣,可以阅读PHP原代码根目录下的README.SELF-CONTAINED_EXTENSIONS文件。为了使扩展能够被编译,需要修改扩展目录ext/myfunctions/下的config.m4文件。扩展没有包裹任何外部的C库,你需要添加支持–enable-myfunctions配置开关到PHP编译系统里(–with-extension 开关用于那些需要用户指定相关C库路径的扩展)。可以去掉自动生成的下面两行的注释来开启这个配置。
<ol><li>./ext_skel --extname=myfunctions --proto=myfunctions.def</li><li>PHP_ARG_ENABLE(myfunctions, whether to enable myfunctions support,</li><li> </li><li>[ --enable-myfunctions Include myfunctions support])</li></ol>
现在剩下的事情就是在PHP原代码树根目录下运行./buildconf,该命令会生成一个新的配置脚本。通过查看./configure –help输出信息,可以检查新的配置选项是否被包含到配置文件中。现在,打开你喜好的配置选项开关和–enable-myfunctions重新配置一下PHP。最后的但不是最次要的是,用make来重新编译PHP。
ext_skel应该把两个PHP函数添加到你的扩展骨架了:打算实现的self_concat()函数和用于检测myfunctions 是否编译到PHP的confirm_myfunctions_compiled()函数。完成PHP的扩展开发后,可以把后者去掉。
<ol><li><span class="sh_symbol"><?php</span></li><li><span class="sh_keyword">print</span> <span class="sh_function">confirm_myfunctions_compiled</span><span class="sh_symbol">(</span><span class="sh_string">"myextension"</span><span class="sh_symbol">);</span></li><li><span class="sh_symbol">?></span></li></ol>
运行这个脚本会出现类似下面的输出:
<ol><li>"Congratulations! You have successfully modified ext/myfunctions</li><li> </li><li>config.m4. Module myfunctions is now compiled into PHP."</li></ol>
另外,ext_skel脚本生成一个叫myfunctions.php的脚本,你也可以利用它来验证扩展是否被成功地编译到PHP。它会列出该扩展所支持的所有函数。
现在你学会如何编译扩展了,该是真正地研究self_concat()函数的时候了。
下面就是ext_skel脚本生成的骨架结构:
<ol><li><span class="sh_comment">/* {{{ proto string self_concat(string str, int n)</span></li><li> </li><li><span class="sh_comment">*/</span></li><li> </li><li><span class="sh_function">PHP_FUNCTION</span><span class="sh_symbol">(</span>self_concat<span class="sh_symbol">)</span></li><li><span class="sh_cbracket">{</span></li><li> </li><li><span class="sh_type">char</span> <span class="sh_symbol">*</span>str <span class="sh_symbol">=</span> NULL<span class="sh_symbol">;</span></li><li> </li><li><span class="sh_type">int</span> argc <span class="sh_symbol">=</span> <span class="sh_function">ZEND_NUM_ARGS</span><span class="sh_symbol">();</span></li><li> </li><li><span class="sh_type">int</span> str_len<span class="sh_symbol">;</span></li><li> </li><li><span class="sh_type">long</span> n<span class="sh_symbol">;</span></li><li> </li><li><span class="sh_keyword">if</span> <span class="sh_symbol">(</span><span class="sh_function">zend_parse_parameters</span><span class="sh_symbol">(</span><span class="sh_usertype">argc</span><span class="sh_normal"> </span>TSRMLS_CC<span class="sh_symbol">,</span> <span class="sh_string">"sl"</span><span class="sh_symbol">,</span> <span class="sh_symbol">&</span>str<span class="sh_symbol">,</span> <span class="sh_symbol">&</span>str_len<span class="sh_symbol">,</span> <span class="sh_symbol">&</span>n<span class="sh_symbol">)</span> <span class="sh_symbol">==</span> FAILURE<span class="sh_symbol">)</span></li><li> </li><li><span class="sh_keyword">return</span><span class="sh_symbol">;</span></li><li> </li><li><span class="sh_function">php_error</span><span class="sh_symbol">(</span>E_WARNING<span class="sh_symbol">,</span> <span class="sh_string">"self_concat: not yet implemented"</span><span class="sh_symbol">);</span></li><li> </li><li><span class="sh_cbracket">}</span></li><li> </li><li><span class="sh_comment">/* }}} */</span></li></ol>
自动生成的PHP函数周围包含了一些注释,这些注释用于自动生成代码文档和vi、Emacs等编辑器的代码折叠。函数自身的定义使用了宏PHP_FUNCTION(),该宏可以生成一个适合于Zend引擎的函数原型。逻辑本身分成语义各部分,取得调用函数的参数和逻辑本身。
为了获得函数传递的参数,可以使用zend_parse_parameters()API函数。下面是该函数的原型:
<ol><li><span class="sh_function">zend_parse_parameters</span><span class="sh_symbol">(</span><span class="sh_type">int</span> <span class="sh_usertype">num_args</span><span class="sh_normal"> </span>TSRMLS_DC<span class="sh_symbol">,</span> <span class="sh_type">char</span> <span class="sh_symbol">*</span>type_spec<span class="sh_symbol">,</span> …<span class="sh_symbol">);</span></li></ol>
第一个参数是传递给函数的参数个数。通常的做法是传给它ZEND_NUM_ARGS()。这是一个表示传递给函数参数总个数的宏。第二个参数是为了线程安全,总是传递TSRMLS_CC宏,后面会讲到。第三个参数是一个字符串,指定了函数期望的参数类型,后面紧跟着需要随参数值更新的变量列表。因为PHP采用松散的变量定义和动态的类型判断,这样做就使得把不同类型的参数转化为期望的类型成为可能。例如,如果用户传递一个整数变量,可函数需要一个浮点数,那么zend_parse_parameters()就会自动地把整数转换为相应的浮点数。如果实际值无法转换成期望类型(比如整形到数组形),会触发一个警告。
下表列出了可能指定的类型。我们从完整性考虑也列出了一些没有讨论到的类型。
类型指定符 | 对应的C类型 | 描述 |
l | long | 符号整数 |
d | double | 浮点数 |
s | char *, int | 二进制字符串,长度 |
b | zend_bool | 逻辑型(1或0) |
r | zval * | 资源(文件指针,数据库连接等) |
a | zval * | 联合数组 |
o | zval * | 任何类型的对象 |
O | zval * | 指定类型的对象。需要提供目标对象的类类型 |
z | zval * | 无任何操作的zval |
为了容易地理解最后几个选项的含义,你需要知道zval是Zend引擎的值容器[1]。无论这个变量是布尔型,字符串型或者其他任何类型,其信息总会包含在一个zval联合体中。本章中我们不直接存取zval,而是通过一些附加的宏来操作。下面的是或多或少在C中的zval, 以便我们能更好地理解接下来的代码。
<ol><li><span class="sh_keyword">typedef</span> <span class="sh_keyword">union</span> _zval<span class="sh_cbracket">{</span></li><li> <span class="sh_type">long</span> lval<span class="sh_symbol">;</span></li><li> <span class="sh_type">double</span> dval<span class="sh_symbol">;</span></li><li> <span class="sh_keyword">struct</span> <span class="sh_cbracket">{</span></li><li> <span class="sh_type">char</span> <span class="sh_symbol">*</span>val<span class="sh_symbol">;</span></li><li> <span class="sh_type">int</span> len<span class="sh_symbol">;</span></li><li> <span class="sh_cbracket">}</span>str<span class="sh_symbol">;</span></li><li> </li><li> <span class="sh_usertype">HashTable</span><span class="sh_normal"> </span><span class="sh_symbol">*</span>ht<span class="sh_symbol">;</span></li><li> <span class="sh_usertype">zend_object_value</span><span class="sh_normal"> </span>obj<span class="sh_symbol">;</span></li><li> </li><li><span class="sh_cbracket">}</span>zval<span class="sh_symbol">;</span></li></ol>
在我们的例子中,我们用基本类型调用zend_parse_parameters(),以本地C类型的方式取得函数参数的值,而不是用zval容器。
为了让zend_parse_parameters()能够改变传递给它的参数的值,并返回这个改变值,需要传递一个引用。仔细查看一下self_concat():
<ol><li><span class="sh_keyword">if</span> <span class="sh_symbol">(</span><span class="sh_function">zend_parse_parameters</span><span class="sh_symbol">(</span><span class="sh_usertype">argc</span><span class="sh_normal"> </span>TSRMLS_CC<span class="sh_symbol">,</span> <span class="sh_string">"sl"</span><span class="sh_symbol">,</span> <span class="sh_symbol">&</span>str<span class="sh_symbol">,</span> <span class="sh_symbol">&</span>str_len<span class="sh_symbol">,</span> <span class="sh_symbol">&</span>n<span class="sh_symbol">)</span> <span class="sh_symbol">==</span> FAILURE<span class="sh_symbol">)</span></li><li><span class="sh_keyword">return</span><span class="sh_symbol">;</span></li></ol>
注意到自动生成的代码会检测函数的返回值FAILUER(成功即SUCCESS)来判断是否成功。如果没有成功则立即返回,并且由zend_parse_parameters()负责触发警告信息。因为函数打算接收一个字符串l和一个整数n,所以指定 ”sl” 作为其类型指示符。s需要两个参数,所以我们传递参考char * 和 int (str 和 str_len)给zend_parse_parameters()函数。无论什么时候,记得总是在代码中使用字符串长度str_len来确保函数工作在二进制安全的环境中。不要使用strlen()和strcpy(),除非你不介意函数在二进制字符串下不能工作。二进制字符串是包含有nulls的字符串。二进制格式包括图象文件,压缩文件,可执行文件和更多的其他文件。”l” 只需要一个参数,所以我们传递给它n的引用。尽管为了清晰起见,骨架脚本生成的C变量名与在函数原型定义文件中的参数名一样;这样做不是必须的,尽管在实践中鼓励这样做。
回到转换规则中来。下面三个对self_concat()函数的调用使str, str_len和n得到同样的值:
<ol><li><span class="sh_function">self_concat</span><span class="sh_symbol">(</span><span class="sh_string">"321"</span><span class="sh_symbol">,</span> <span class="sh_number">5</span><span class="sh_symbol">);</span></li><li> </li><li><span class="sh_function">self_concat</span><span class="sh_symbol">(</span><span class="sh_number">321</span><span class="sh_symbol">,</span> <span class="sh_string">"5"</span><span class="sh_symbol">);</span></li><li> </li><li><span class="sh_function">self_concat</span><span class="sh_symbol">(</span><span class="sh_string">"321"</span><span class="sh_symbol">,</span> <span class="sh_string">"5"</span><span class="sh_symbol">);</span></li><li> </li><li>str points to <span class="sh_usertype">the</span><span class="sh_normal"> </span>string <span class="sh_string">"321"</span><span class="sh_symbol">,</span> str_len equals <span class="sh_number">3</span><span class="sh_symbol">,</span> and n equals <span class="sh_number">5</span><span class="sh_symbol">.</span></li><li> </li><li>str 指向字符串<span class="sh_string">"321"</span>,str_len等于<span class="sh_number">3</span>,n等于<span class="sh_number">5</span>。</li></ol>
在我们编写代码来实现连接字符串返回给PHP的函数前,还得谈谈两个重要的话题:内存管理、从PHP内部返回函数值所使用的API。
内存管理
用于从堆中分配内存的PHP API几乎和标准C API一样。在编写扩展的时候,使用下面与C对应(因此不必再解释)的API函数:
<ol><li><span class="sh_function">emalloc</span><span class="sh_symbol">(</span><span class="sh_usertype">size_t</span><span class="sh_normal"> </span>size<span class="sh_symbol">);</span></li><li> </li><li><span class="sh_function">efree</span><span class="sh_symbol">(</span><span class="sh_type">void</span> <span class="sh_symbol">*</span>ptr<span class="sh_symbol">);</span></li><li> </li><li><span class="sh_function">ecalloc</span><span class="sh_symbol">(</span><span class="sh_usertype">size_t</span><span class="sh_normal"> </span>nmemb<span class="sh_symbol">,</span> <span class="sh_usertype">size_t</span><span class="sh_normal"> </span>size<span class="sh_symbol">);</span></li><li> </li><li><span class="sh_function">erealloc</span><span class="sh_symbol">(</span><span class="sh_type">void</span> <span class="sh_symbol">*</span>ptr<span class="sh_symbol">,</span> <span class="sh_usertype">size_t</span><span class="sh_normal"> </span>size<span class="sh_symbol">);</span></li><li> </li><li><span class="sh_function">estrdup</span><span class="sh_symbol">(</span><span class="sh_keyword">const</span> <span class="sh_type">char</span> <span class="sh_symbol">*</span>s<span class="sh_symbol">);</span></li><li> </li><li><span class="sh_function">estrndup</span><span class="sh_symbol">(</span><span class="sh_keyword">const</span> <span class="sh_type">char</span> <span class="sh_symbol">*</span>s<span class="sh_symbol">,</span> <span class="sh_type">unsigned</span> <span class="sh_type">int</span> length<span class="sh_symbol">);</span></li></ol>
在这一点上,任何一位有经验的C程序员应该象这样思考一下:“什么?标准C没有strndup()?”是的,这是正确的,因为GNU扩展通常在Linux下可用。estrndup()只是PHP下的一个特殊函数。它的行为与estrdup()相似,但是可以指定字符串重复的次数(不需要结束空字符),同时是二进制安全的。这是推荐使用estrndup()而不是estrdup()的原因。
在几乎所有的情况下,你应该使用这些内存分配函数。有一些情况,即扩展需要分配在请求中永久存在的内存,从而不得不使用malloc(),但是除非你知道你在做什么,你应该始终使用以上的函数。如果没有使用这些内存函数,而相反使用标准C函数分配的内存返回给脚本引擎,那么PHP会崩溃。
这些函数的优点是:任何分配的内存在偶然情况下如果没有被释放,则会在页面请求的最后被释放。因此,真正的内存泄漏不会产生。然而,不要依赖这一机制,从调试和性能两个原因来考虑,应当确保释放应该释放的内存。剩下的优点是在多线程环境下性能的提高,调试模式下检测内存错误等。
还有一个重要的原因,你不需要检查这些内存分配函数的返回值是否为null。当内存分配失败,它们会发出E_ERROR错误,从而决不会返回到扩展。
从PHP函数中返回值
扩展API包含丰富的用于从函数中返回值的宏。这些宏有两种主要风格:第一种是RETVAL_type()形式,它设置了返回值但C代码继续执行。这通常使用在把控制交给脚本引擎前还希望做的一些清理工作的时候使用,然后再使用C的返回声明 ”return” 返回到PHP;后一个宏更加普遍,其形式是RETURN_type(),他设置了返回类型,同时返回控制到PHP。下表解释了大多数存在的宏。
设置返回值并且结束函数 | 设置返回值 | 宏返回类型和参数 |
RETURN_LONG(l) | RETVAL_LONG(l) | 整数 |
RETURN_BOOL(b) | RETVAL_BOOL(b) | 布尔数(1或0) |
RETURN_NULL() | RETVAL_NULL() | NULL |
RETURN_DOUBLE(d) | RETVAL_DOUBLE(d) | 浮点数 |
RETURN_STRING(s, dup) | RETVAL_STRING(s, dup) | 字符串。如果dup为1,引擎会调用estrdup()重复s,使用拷贝。如果dup为0,就使用s |
RETURN_STRINGL(s, l, dup) | RETVAL_STRINGL(s, l, dup) | 长度为l的字符串值。与上一个宏一样,但因为s的长度被指定,所以速度更快。 |
RETURN_TRUE | RETVAL_TRUE | 返回布尔值true。注意到这个宏没有括号。 |
RETURN_FALSE | RETVAL_FALSE | 返回布尔值false。注意到这个宏没有括号。 |
RETURN_RESOURCE(r) | RETVAL_RESOURCE(r) | 资源句柄。 |
完成self_concat()
现在你已经学会了如何分配内存和从PHP扩展函数里返回函数值,那么我们就能够完成self_concat()的编码:
<ol><li><span class="sh_comment">/* {{{ proto string self_concat(string str, int n)</span></li><li> </li><li><span class="sh_comment">*/</span></li><li> </li><li><span class="sh_function">PHP_FUNCTION</span><span class="sh_symbol">(</span>self_concat<span class="sh_symbol">)</span></li><li> </li><li><span class="sh_cbracket">}</span></li><li> </li><li><span class="sh_type">char</span> <span class="sh_symbol">*</span>str <span class="sh_symbol">=</span> NULL<span class="sh_symbol">;</span></li><li> </li><li><span class="sh_type">int</span> argc <span class="sh_symbol">=</span> <span class="sh_function">ZEND_NUM_ARGS</span><span class="sh_symbol">();</span></li><li> </li><li><span class="sh_type">int</span> str_len<span class="sh_symbol">;</span></li><li> </li><li><span class="sh_type">long</span> n<span class="sh_symbol">;</span></li><li> </li><li><span class="sh_type">char</span> <span class="sh_symbol">*</span>result<span class="sh_symbol">;</span> <span class="sh_comment">/* Points to resulting string */</span></li><li> </li><li><span class="sh_type">char</span> <span class="sh_symbol">*</span>ptr<span class="sh_symbol">;</span> <span class="sh_comment">/* Points at the next location we want to copy to */</span></li><li> </li><li><span class="sh_type">int</span> result_length<span class="sh_symbol">;</span> <span class="sh_comment">/* Length of resulting string */</span></li><li> </li><li><span class="sh_keyword">if</span> <span class="sh_symbol">(</span><span class="sh_function">zend_parse_parameters</span><span class="sh_symbol">(</span><span class="sh_usertype">argc</span><span class="sh_normal"> </span>TSRMLS_CC<span class="sh_symbol">,</span> <span class="sh_string">"sl"</span><span class="sh_symbol">,</span> <span class="sh_symbol">&</span>str<span class="sh_symbol">,</span> <span class="sh_symbol">&</span>str_len<span class="sh_symbol">,</span> <span class="sh_symbol">&</span>n<span class="sh_symbol">)</span> <span class="sh_symbol">==</span> FAILURE<span class="sh_symbol">)</span></li><li> </li><li><span class="sh_keyword">return</span><span class="sh_symbol">;</span></li><li> </li><li><span class="sh_comment">/* Calculate length of result */</span></li><li> </li><li>result_length <span class="sh_symbol">=</span> <span class="sh_symbol">(</span>str_len <span class="sh_symbol">*</span> n<span class="sh_symbol">);</span></li><li> </li><li><span class="sh_comment">/* Allocate memory for result */</span></li><li> </li><li>result <span class="sh_symbol">=</span> <span class="sh_symbol">(</span><span class="sh_type">char</span> <span class="sh_symbol">*)</span> <span class="sh_function">emalloc</span><span class="sh_symbol">(</span>result_length <span class="sh_symbol">+</span> <span class="sh_number">1</span><span class="sh_symbol">);</span></li><li> </li><li><span class="sh_comment">/* Point at the beginning of the result */</span></li><li> </li><li>ptr <span class="sh_symbol">=</span> result<span class="sh_symbol">;</span></li><li> </li><li><span class="sh_keyword">while</span> <span class="sh_symbol">(</span>n<span class="sh_symbol">--)</span> <span class="sh_cbracket">{</span></li><li> </li><li><span class="sh_comment">/* Copy str to the result */</span></li><li> </li><li><span class="sh_function">memcpy</span><span class="sh_symbol">(</span>ptr<span class="sh_symbol">,</span> str<span class="sh_symbol">,</span> str_len<span class="sh_symbol">);</span></li><li> </li><li><span class="sh_comment">/* Increment ptr to point at the next position we want to write to */</span></li><li> </li><li>ptr <span class="sh_symbol">+=</span> str_len<span class="sh_symbol">;</span></li><li> </li><li><span class="sh_cbracket">}</span></li><li> </li><li><span class="sh_comment">/* Null terminate the result. Always null-terminate your strings</span></li><li> </li><li><span class="sh_comment">even if they are binary strings */</span></li><li> </li><li><span class="sh_symbol">*</span>ptr <span class="sh_symbol">=</span> <span class="sh_string">'</span><span class="sh_specialchar">