php内置函数分析之strpos()

 PHP_FUNCTION(strpos)
 {
     zval *needle;
     zend_string *haystack;
     char *found = NULL;
     char  needle_char[];
     zend_long  offset = ; // 搜索位置默认0

     ZEND_PARSE_PARAMETERS_START(, )
         Z_PARAM_STR(haystack)
         Z_PARAM_ZVAL(needle)
         Z_PARAM_OPTIONAL
         Z_PARAM_LONG(offset)
     ZEND_PARSE_PARAMETERS_END();

     /* 如果搜索起始位置offset<0, 则转换一下 */
     if (offset < ) {
         offset += (zend_long)ZSTR_LEN(haystack);
     }
     /* 如果转换之后 offset<0 或 offset大于(待查找字符串的长度)，则待查找字符串中根本就没有这个位置*/
     if (offset <  || (size_t)offset > ZSTR_LEN(haystack)) {
         php_error_docref(NULL, E_WARNING, "Offset not contained in string");
         RETURN_FALSE;
     }

     /* 搜索 */
     if (Z_TYPE_P(needle) == IS_STRING) { // needle是字符串
         /* needle长度为0，则报错 */
         if (!Z_STRLEN_P(needle)) {
             php_error_docref(NULL, E_WARNING, "Empty needle");
             RETURN_FALSE;
         }
         /* 具体的搜索实现 */
         found = (char*)php_memnstr(ZSTR_VAL(haystack) + offset,
                             Z_STRVAL_P(needle),
                             Z_STRLEN_P(needle),
                             ZSTR_VAL(haystack) + ZSTR_LEN(haystack));
     } else {
         if (php_needle_char(needle, needle_char) != SUCCESS) {
             RETURN_FALSE;
         }
         needle_char[] = ;

         found = (char*)php_memnstr(ZSTR_VAL(haystack) + offset,
                             needle_char,
                             ,
                             ZSTR_VAL(haystack) + ZSTR_LEN(haystack));
     }

     if (found) {
         RETURN_LONG(found - ZSTR_VAL(haystack));
     } else {
         RETURN_FALSE;
     }
 }