摘要：例子的值是，因此核心源碼調(diào)用函數(shù)查找如果不是字符串，轉(zhuǎn)換成數(shù)字并賦值為該數(shù)字的字符。設(shè)置結(jié)束字符有一點(diǎn)要注意的是，如果不是字符串的話，會(huì)調(diào)用函數(shù)將轉(zhuǎn)成整型數(shù)字并轉(zhuǎn)換為其值。變量就是調(diào)用函數(shù)時(shí)傳遞的變量。核心源碼拷貝一份調(diào)用函數(shù)找出的值。

我在github有對(duì)PHP源碼更詳細(xì)的注解。感興趣的可以圍觀一下，給個(gè)star。PHP5.4源碼注解。可以通過(guò)commit記錄查看已添加的注解。

mixed strpos ( string $haystack, mixed $needle [, int $offset = 0 ] )

如果offset指定了，查找會(huì)從offset的位置開(kāi)始。offset不能為負(fù)數(shù)。

返回needle第一次出現(xiàn)在haystack的位置。如果在haystack中找不到needle，則返回FALSE。

needle，如果needle不是字符串，它會(huì)被轉(zhuǎn)換成整型數(shù)值并賦值為該數(shù)值的ASCII字符。請(qǐng)看下面例子。

$str = "hello";
$pos = strpos($str, 111);
// 111的ASCII值是o，因此$pos = 4

if (Z_TYPE_P(needle) == IS_STRING) {
     if (!Z_STRLEN_P(needle)) {
          php_error_docref(NULL TSRMLS_CC, E_WARNING, "Empty needle");
          RETURN_FALSE;
     }

     // 調(diào)用php_memnstr函數(shù)查找needle
     found = php_memnstr(haystack + offset,
                            Z_STRVAL_P(needle),
                            Z_STRLEN_P(needle),
                            haystack + haystack_len);
     } else {
          // 如果不是字符串，轉(zhuǎn)換成數(shù)字并賦值為該數(shù)字的ASCII字符。
          if (php_needle_char(needle, needle_char TSRMLS_CC) != SUCCESS) {
               RETURN_FALSE;
          }
          //設(shè)置結(jié)束字符
          needle_char[1] = 0;
          found = php_memnstr(haystack + offset,
                            needle_char,
                            1,
                            haystack + haystack_len);
　　  }
}

有一點(diǎn)要注意的是，如果needle不是字符串的話，會(huì)調(diào)用php_needle_char函數(shù)將needle轉(zhuǎn)成整型數(shù)字并轉(zhuǎn)換為其ASCII值。

函數(shù)最后返回的是found，php_memnstr函數(shù)實(shí)現(xiàn)了查找的方法。那么再繼續(xù)看看php_memnstr函數(shù)做了什么：

#define php_memnstr zend_memnstr

php_memnstr是函數(shù)zend_memnstr的宏定義，查看zend_memnstr函數(shù)如下：

static inline char *
zend_memnstr(char *haystack, char *needle, int needle_len, char *end)
{
    char *p = haystack;
    char ne = needle[needle_len-1];
    if (needle_len == 1) {
        return (char *)memchr(p, *needle, (end-p));
    }

    if (needle_len > end-haystack) {
        return NULL;
    }

    // 第一個(gè)優(yōu)化，只查找end - needle_len次
    end -= needle_len;

    while (p <= end) {
        // 第二個(gè)優(yōu)化，先判斷字符串的開(kāi)頭和結(jié)尾是否一樣再判斷整個(gè)字符串
        if ((p = (char *)memchr(p, *needle, (end-p+1))) && ne == p[needle_len-1]) {
            if (!memcmp(needle, p, needle_len-1)) {
                return p;
            }
        }

        if (p == NULL) {
            return NULL;
        }

        p++;
    }

    return NULL;
}

第一個(gè)優(yōu)化，因?yàn)?b>(char *)memchr(p, *needle, (end-p+1)是在end - needle_len + 1（即haystack_len+1）中查找，如果p為空，說(shuō)明needle的第一個(gè)字符在p中從未出現(xiàn)過(guò)。

string strstr ( string $haystack, mixed $needle [, bool $before_needle = false ] )

返回needle在haystack中第一次出現(xiàn)的位置到結(jié)束的字符串。

這個(gè)函數(shù)的區(qū)分大小寫(xiě)的。

如果needle在haystack中不存在，返回FALSE。

如果before_needle為true，則返回haystack中needle在haystack第一次出現(xiàn)的位置之前的字符串。

if (found) {
        // 計(jì)算出found的位置
        found_offset = found - haystack;
        if (part) {
            RETURN_STRINGL(haystack, found_offset, 1);
        } else {
            RETURN_STRINGL(found, haystack_len - found_offset, 1);
        }
}

strstr函數(shù)的前半部分跟strpos類似，區(qū)別在于strstr函數(shù)在找到位置后，需要返回haystack部分的字符串。part變量就是調(diào)用strstr函數(shù)時(shí)傳遞的before_needle變量。

mixed stripos ( string $haystack, string $needle [, int $offset = 0 ] )

不區(qū)分大小寫(xiě)的strpos。實(shí)現(xiàn)方式跟下面的類似，主要是使用一份拷貝然后將需要比較的字符串轉(zhuǎn)換成小寫(xiě)字符后進(jìn)行再進(jìn)行查找。

string stristr ( string $haystack, mixed $needle [, bool $before_needle = false ] )

不區(qū)分大小寫(xiě)的strstr。

// 拷貝一份haystack
haystack_dup = estrndup(haystack, haystack_len);

if (Z_TYPE_P(needle) == IS_STRING) {
    char *orig_needle;
    if (!Z_STRLEN_P(needle)) {
        php_error_docref(NULL TSRMLS_CC, E_WARNING, "Empty needle");
        efree(haystack_dup);
        RETURN_FALSE;
    }
    orig_needle = estrndup(Z_STRVAL_P(needle), Z_STRLEN_P(needle));
    // 調(diào)用php_stristr函數(shù)找出orig_needle的值。
    found = php_stristr(haystack_dup, orig_needle,    haystack_len, Z_STRLEN_P(needle));
    efree(orig_needle);
} else {
    if (php_needle_char(needle, needle_char TSRMLS_CC) != SUCCESS) {
        efree(haystack_dup);
        RETURN_FALSE;
    }
    needle_char[1] = 0;

    found = php_stristr(haystack_dup, needle_char,    haystack_len, 1);
}

if (found) {
    found_offset = found - haystack_dup;
    if (part) {
        RETVAL_STRINGL(haystack, found_offset, 1);
    } else {
        RETVAL_STRINGL(haystack + found_offset, haystack_len - found_offset, 1);
    }
} else {
    RETVAL_FALSE;
}

// 釋放變量
efree(haystack_dup);

可以知道，found是從php_stristr中得到的，繼續(xù)查看php_stristr函數(shù)：

PHPAPI char *php_stristr(char *s, char *t, size_t s_len, size_t t_len)
{
    php_strtolower(s, s_len);
    php_strtolower(t, t_len);
    return php_memnstr(s, t, t_len, s + s_len);
}

這個(gè)函數(shù)的功能就是將字符串都轉(zhuǎn)成小寫(xiě)之后調(diào)用php_mennstr函數(shù)來(lái)查找needle在haystack第一次出現(xiàn)的位置。

因?yàn)閟trpos/stripos返回的是位置，位置從0開(kāi)始計(jì)算，所以判斷查找失敗都用=== FALSE更適合。

閱讀PHP的源碼收獲挺多，一方面可以知道某個(gè)函數(shù)的具體實(shí)現(xiàn)原理是怎樣的，另一方面可以學(xué)習(xí)到一些編程優(yōu)化方案。

到此本文結(jié)束，如果還有什么疑問(wèn)或者建議，可以多多交流，原創(chuàng)文章，文筆有限，才疏學(xué)淺，文中若有不正之處，萬(wàn)望告知。

如果本文對(duì)你有幫助，望點(diǎn)下推薦，謝謝^_^

最后再安利一下，我在github有對(duì)PHP源碼更詳細(xì)的注解。感興趣的可以圍觀一下，給個(gè)star。PHP5.4源碼注解?？梢酝ㄟ^(guò)commit記錄查看已添加的注解。