全て半角文字であるかチェックする

// *********************************************************
// 全て半角文字であるかチェックする
// 2008/07/30 追加 By B.Xi
// *********************************************************
function is_half($instr) {
	$flag = FALSE;			//直前文字が全角カタカナならTRUE
	$len = mb_strlen($instr);
	$ofst = 1;
	$symbol = '\!\"\#\$\%\&\'\(\)\*\+\,\-\.\/\:\;\<\=\>\?\@\{\|\}\~';
 
	for ($ofst = 0; $ofst < $len; $ofst++) {
		$ch = mb_substr($instr, $ofst, 1);
		if (mb_ereg('^[ｱ-ﾝﾞﾟｦｰ]+$', $ch)) {
			$flag = TRUE;
		} else if (mb_ereg('^[a-zA-Z0-9]+$', $ch)) {
			$flag = TRUE;
		} else if (inStr($ch, $symbol)) {
			$flag = TRUE;
		} else {
			$flag = false;
		}
		if($flag == false) break;
	}
	return $flag; 
}