From: David Coallier <davidc@php.net>
Date: Sat, 19 Jan 2008 19:23:25 +0000 (+0000)
Subject: - Added lcfirst() function. The sister function of ucfirst()
X-Git-Tag: RELEASE_2_0_0a1~841
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=7a66695286c22eca91d431fc2a6dc85c3199f465;p=php

- Added lcfirst() function. The sister function of ucfirst()
- Test #1 for lcfirst()
---

diff --git a/ext/standard/basic_functions.c b/ext/standard/basic_functions.c
index 6d6f038ea4..7cf04874be 100644
--- a/ext/standard/basic_functions.c
+++ b/ext/standard/basic_functions.c
@@ -2634,6 +2634,11 @@ ZEND_BEGIN_ARG_INFO(arginfo_ucfirst, 0)
 	ZEND_ARG_INFO(0, str)
 ZEND_END_ARG_INFO()
 
+static
+ZEND_BEGIN_ARG_INFO(arginfo_lcfirst, 0)
+	ZEND_ARG_INFO(0, str)
+ZEND_END_ARG_INFO()
+
 static
 ZEND_BEGIN_ARG_INFO(arginfo_ucwords, 0)
 	ZEND_ARG_INFO(0, str)
@@ -3189,6 +3194,7 @@ const zend_function_entry basic_functions[] = { /* {{{ */
 	PHP_FE(substr_replace,													arginfo_substr_replace)
 	PHP_FE(quotemeta,														arginfo_quotemeta)
 	PHP_FE(ucfirst,															arginfo_ucfirst)
+	PHP_FE(lcfirst,															arginfo_lcfirst)
 	PHP_FE(ucwords,															arginfo_ucwords)
 	PHP_FE(strtr,															arginfo_strtr)
 	PHP_FE(addslashes,														arginfo_addslashes)
diff --git a/ext/standard/php_string.h b/ext/standard/php_string.h
index ca00aa3ed1..a5fab47470 100644
--- a/ext/standard/php_string.h
+++ b/ext/standard/php_string.h
@@ -54,6 +54,7 @@ PHP_FUNCTION(strrchr);
 PHP_FUNCTION(substr);
 PHP_FUNCTION(quotemeta);
 PHP_FUNCTION(ucfirst);
+PHP_FUNCTION(lcfirst);
 PHP_FUNCTION(ucwords);
 PHP_FUNCTION(strtr);
 PHP_FUNCTION(strrev);
diff --git a/ext/standard/string.c b/ext/standard/string.c
index 4c9277a20b..aae82e4c9f 100644
--- a/ext/standard/string.c
+++ b/ext/standard/string.c
@@ -3856,6 +3856,69 @@ PHP_FUNCTION(chr)
 }
 /* }}} */
 
+/* {{{ php_u_lcfirst()
+   Makes an Unicode string's first character lowercase */
+static void php_u_lcfirst(UChar *ustr, int ustr_len, zval *return_value TSRMLS_DC)
+{
+	UChar tmp[3] = { 0, 0, 0 }; /* UChar32 will be converted to upto 2 UChar units */
+	int tmp_len = 0;
+	int pos = 0;
+	UErrorCode status = U_ZERO_ERROR;
+
+	U16_FWD_1(ustr, pos, ustr_len);
+	tmp_len = u_strToUpper(tmp, sizeof(tmp)/sizeof(UChar), ustr, pos, UG(default_locale), &status);
+
+	Z_USTRVAL_P(return_value) = eumalloc(tmp_len + ustr_len - pos+1);
+	
+	Z_USTRVAL_P(return_value)[0] = tmp[0];
+	if (tmp_len > 1) {
+		Z_USTRVAL_P(return_value)[1] = tmp[1];
+	}
+	u_memcpy(Z_USTRVAL_P(return_value)+tmp_len, ustr + pos, ustr_len - pos+1);
+	Z_USTRLEN_P(return_value) = tmp_len + ustr_len - pos;
+}
+/* }}} */
+
+/* {{{ php_lcfirst 
+   Lowercase the first character of the word in a native string */
+static void php_lcfirst(char *str)
+{
+	register char *r;
+	r = str;
+	*r = tolower((unsigned char) *r);
+}
+/* }}} */
+
+/* {{{ proto string ucfirst(string str) U
+   Makes a string's first character uppercase */
+PHP_FUNCTION(lcfirst)
+{
+	zstr       str;
+	int        str_len;
+	zend_uchar str_type;
+
+	if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "t", &str, &str_len, &str_type) == FAILURE) {
+		return;
+	}
+	
+	if (str_len == 0) {
+		if (str_type == IS_UNICODE) {
+			RETURN_EMPTY_UNICODE();
+		} else {
+			RETURN_EMPTY_STRING();
+		}
+	}	
+
+	if (str_type == IS_UNICODE) {
+		Z_TYPE_P(return_value) = IS_UNICODE;
+		php_u_lcfirst(str.u, str_len, return_value TSRMLS_CC);
+	} else {
+		ZVAL_STRINGL(return_value, str.s, str_len, ZSTR_DUPLICATE);
+		php_lcfirst(Z_STRVAL_P(return_value));
+	}	
+}
+/* }}} */
+
 /* {{{ php_u_ucfirst()
    Makes an Unicode string's first character uppercase */
 static void php_u_ucfirst(UChar *ustr, int ustr_len, zval *return_value TSRMLS_DC)
diff --git a/ext/standard/tests/strings/lcfirst.phpt b/ext/standard/tests/strings/lcfirst.phpt
new file mode 100644
index 0000000000..2b5fea3e37
Binary files /dev/null and b/ext/standard/tests/strings/lcfirst.phpt differ