「mb_list_encodings()のパッチ書いてみた」に対する所感

この件ですが。個人的には無理して統合する必要は無いんじゃないのかなぁ。。。と思う次第です。
ゴッチャにしてしまうと、どれがどれだか判断できないと思うので。という訳で関数を分離してみたタコさんパッチ。
後、mb_get_info関数の「func_overload」が、ありえない値を返していたので修正。

--- php-5.1.2,orig/ext/mbstring/mbstring.h	2006-01-01 21:50:08.000000000 +0900
+++ php-5.1.2/ext/mbstring/mbstring.h	2006-02-24 10:18:42.000000000 +0900
@@ -112,6 +112,8 @@
 PHP_FUNCTION(mb_convert_encoding);
 PHP_FUNCTION(mb_detect_encoding);
 PHP_FUNCTION(mb_list_encodings);
+PHP_FUNCTION(mb_list_encodings_alias_names);
+PHP_FUNCTION(mb_list_mime_names);
 PHP_FUNCTION(mb_convert_kana);
 PHP_FUNCTION(mb_encode_mimeheader);
 PHP_FUNCTION(mb_decode_mimeheader);
--- php-5.1.2,orig/ext/mbstring/mbstring.c	2006-01-01 21:50:08.000000000 +0900
+++ php-5.1.2/ext/mbstring/mbstring.c	2006-02-24 10:23:35.000000000 +0900
@@ -212,6 +212,8 @@
 	PHP_FE(mb_convert_encoding,		NULL)
 	PHP_FE(mb_detect_encoding,		NULL)
 	PHP_FE(mb_list_encodings,		NULL)
+	PHP_FE(mb_list_encodings_alias_names,		NULL)
+	PHP_FE(mb_list_mime_names,		NULL)
 	PHP_FE(mb_convert_kana,			NULL)
 	PHP_FE(mb_encode_mimeheader,	NULL)
 	PHP_FE(mb_decode_mimeheader,	NULL)
@@ -2323,6 +2325,52 @@
 }
 /* }}} */
 
+/* {{{ proto array mb_list_encodings_alias_names()
+   Returns an array of all supported encodings alias names */
+PHP_FUNCTION(mb_list_encodings_alias_names)
+{
+	const mbfl_encoding **encodings;
+	const mbfl_encoding *encoding;
+	int i, j;
+	zval *row;
+
+	array_init(return_value);
+	i = 0;
+	encodings = mbfl_get_supported_encodings();
+	while ((encoding = encodings[i++]) != NULL) {
+		if (encoding->aliases != NULL) {
+			MAKE_STD_ZVAL(row);
+			array_init(row);
+			add_assoc_zval(return_value, (char *) encoding->name, row);
+			j = 0;
+			while ((*encoding->aliases)[j] != NULL) {
+				add_next_index_string(row, (char *)(*encoding->aliases)[j], 1);
+				j++;
+			}
+		}
+	}
+}
+/* }}} */
+
+/* {{{ proto array mb_list_mime_names()
+   Returns an array of all supported mime names */
+PHP_FUNCTION(mb_list_mime_names)
+{
+	const mbfl_encoding **encodings;
+	const mbfl_encoding *encoding;
+	int i;
+
+	array_init(return_value);
+	i = 0;
+	encodings = mbfl_get_supported_encodings();
+	while ((encoding = encodings[i++]) != NULL) {
+		if(encoding->mime_name != NULL) {
+			add_assoc_string(return_value, (char *) encoding->name, (char *) encoding->mime_name, 1);
+		}
+	}
+}
+/* }}} */
+
 /* {{{ proto string mb_encode_mimeheader(string str [, string charset [, string transfer-encoding [, string linefeed [, int indent]]]])
    Converts the string to MIME "encoded-word" in the format of =?charset?(B|Q)?encoded_string?= */
 PHP_FUNCTION(mb_encode_mimeheader)
@@ -3328,6 +3376,8 @@
 	char *typ = NULL;
 	int typ_len;
 	char *name;
+	const struct mb_overload_def *over_func;
+	zval *row;
 
 	if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|s", &typ, &typ_len) == FAILURE) {
 		RETURN_FALSE;
@@ -3344,8 +3394,19 @@
 		if ((name = (char *)mbfl_no_encoding2name(MBSTRG(current_http_output_encoding))) != NULL) {
 			add_assoc_string(return_value, "http_output", name, 1);
 		}
-		if ((name = (char *)mbfl_no_encoding2name(MBSTRG(func_overload))) != NULL) {
-			add_assoc_string(return_value, "func_overload", name, 1);
+		if (MBSTRG(func_overload)){
+			over_func = &(mb_ovld[0]);
+			MAKE_STD_ZVAL(row);
+			array_init(row);
+			add_assoc_zval(return_value, "func_overload", row);
+			while (over_func->type > 0) {
+				if ((MBSTRG(func_overload) & over_func->type) == over_func->type ) {
+					add_assoc_string(row, over_func->orig_func, over_func->ovld_func, 1);
+				}
+				over_func++;
+			}
+		} else {
+			add_assoc_string(return_value, "func_overload", "no overload", 1);
 		}
 	} else if (!strcasecmp("internal_encoding", typ)) {
 		if ((name = (char *)mbfl_no_encoding2name(MBSTRG(current_internal_encoding))) != NULL) {
@@ -3360,9 +3421,18 @@
 			RETVAL_STRING(name, 1);
 		}		
 	} else if (!strcasecmp("func_overload", typ)) {
-		if ((name = (char *)mbfl_no_encoding2name(MBSTRG(func_overload))) != NULL) {
-			RETVAL_STRING(name, 1);
-		}
+			if (MBSTRG(func_overload)){
+				over_func = &(mb_ovld[0]);
+				array_init(return_value);
+				while (over_func->type > 0) {
+					if ((MBSTRG(func_overload) & over_func->type) == over_func->type ) {
+						add_assoc_string(return_value, over_func->orig_func, over_func->ovld_func, 1);
+					}
+					over_func++;
+				}
+			} else {
+				RETVAL_STRING("no overload", 1);
+			}
 	} else {
 		RETURN_FALSE;
 	}

これを適用すると、以下の様な結果になります。

こういう風になれば、PHPスクリプト上で色んな技が応用できますよね。
MIMEエンコード名とエイリアス名は連想配列にしてみました。対比が分かりやすいので。
エイリアス名が無い場合はリストには出てこないので。悪しからず。
っていうか、忙しいのに現実逃避してどうすんだ。。。＿|￣|○

ます’s Blog - どうでもいい記事100選

どうでもいい記事100選