Searched refs:nocase (Results 1 - 25 of 90) sorted by relevance

1234

/macosx-10.10.1/tcl-105/tcl_ext/expect/expect/
H A Dexp_glob.c25 int nocase));
32 Exp_StringCaseMatch(string, strlen, pattern, plen, nocase, offset) /* INTL */
37 int nocase;
54 expDiagLog(" nocase=%d\n",nocase);
72 sm = Exp_StringCaseMatch2(string,stop,pattern,pstop,nocase);
101 ssm = Exp_StringCaseMatch2(s,stop,pattern,pstop,nocase);
126 Exp_StringCaseMatch2(string,stop,pattern,pstop,nocase) /* INTL */
132 int nocase;
145 expDiagLog(" nocase
[all...]
/macosx-10.10.1/tcl-105/tcl_ext/expect/expect/example/
H A Dpassmass128 expect -nocase -re "(login|username):.*" {
143 expect -nocase "password*" {
171 expect -nocase "password:"
179 expect -nocase -re "(old|existing login) password:.*" {
181 expect -nocase "sorry*" {
184 } -nocase "password:"
185 } -nocase -re "new password:" {
195 } -nocase -re "(password|verification|verify|again):.*"
197 expect -nocase -re "(not changed|incorrect|choose new).*" {
/macosx-10.10.1/tcl-105/tcl84/tcl/generic/
H A DtclUtf.c1644 Tcl_UniCharCaseMatch(string, pattern, nocase)
1648 int nocase; /* 0 for case sensitive, 1 for insensitive */
1685 if (nocase) {
1695 if (nocase) {
1704 if (Tcl_UniCharCaseMatch(string, pattern, nocase)) {
1735 ch1 = (nocase ? Tcl_UniCharToLower(*string) : *string);
1741 startChar = (nocase ? Tcl_UniCharToLower(*pattern) : *pattern);
1748 endChar = (nocase ? Tcl_UniCharToLower(*pattern)
1789 if (nocase) {
1825 TclUniCharMatch(string, strLen, pattern, ptnLen, nocase)
[all...]
H A DtclUtil.c1212 Tcl_StringCaseMatch(string, pattern, nocase)
1216 int nocase; /* 0 for case sensitive, 1 for insensitive */
1259 (nocase ? tolower(UCHAR(*pattern)) : UCHAR(*pattern));
1262 if (nocase) {
1273 if (nocase) {
1296 if (Tcl_StringCaseMatch(string, pattern, nocase)) {
1329 (nocase ? tolower(UCHAR(*string)) : UCHAR(*string));
1333 if (nocase) {
1343 (nocase ? tolower(UCHAR(*pattern)) : UCHAR(*pattern));
1347 if (nocase) {
[all...]
/macosx-10.10.1/tcl-105/tcl/tcl/generic/
H A DtclUtf.c1652 int nocase) /* 0 for case sensitive, 1 for insensitive */
1692 if (nocase) {
1703 if (nocase) {
1714 if (Tcl_UniCharCaseMatch(uniStr, uniPattern, nocase)) {
1745 ch1 = (nocase ? Tcl_UniCharToLower(*uniStr) : *uniStr);
1751 startChar = (nocase ? Tcl_UniCharToLower(*uniPattern)
1759 endChar = (nocase ? Tcl_UniCharToLower(*uniPattern)
1800 if (nocase) {
1842 int nocase) /* 0 for case sensitive, 1 for insensitive */
1885 if (nocase) {
1610 Tcl_UniCharCaseMatch( CONST Tcl_UniChar *uniStr, CONST Tcl_UniChar *uniPattern, int nocase) argument
1798 TclUniCharMatch( CONST Tcl_UniChar *string, int strLen, CONST Tcl_UniChar *pattern, int ptnLen, int nocase) argument
[all...]
H A DtclCmdMZ.c101 "-nocase", "-start", "--", NULL
460 "-all", "-nocase", "-expanded",
559 int slen, nocase;
564 nocase = (cflags & TCL_REG_NOCASE);
565 strCmpFn = nocase ? Tcl_UniCharNcasecmp : Tcl_UniCharNcmp;
593 (nocase && Tcl_UniCharToLower(*wstring)==wsrclc)) &&
1768 int nocase = 0, mapWithDict = 0, copySource = 0;
1774 Tcl_WrongNumArgs(interp, 1, objv, "?-nocase? charMap string");
1782 strncmp(string, "-nocase", (size_t) length2) == 0) {
1783 nocase
556 int slen, nocase; local
1756 int nocase = 0, mapWithDict = 0, copySource = 0; local
2024 int nocase = 0; local
2492 int length1, length2, i, match, length, nocase = 0, reqlength = -1; local
2639 int length1, length2, i, match, length, nocase = 0, reqlength = -1; local
[all...]
H A DtclUtil.c1355 int nocase) /* 0 for case sensitive, 1 for insensitive */
1401 (nocase ? tolower(UCHAR(*pattern)) : UCHAR(*pattern));
1404 if (nocase) {
1417 if (nocase) {
1441 if (Tcl_StringCaseMatch(str, pattern, nocase)) {
1474 (nocase ? tolower(UCHAR(*str)) : UCHAR(*str));
1478 if (nocase) {
1487 startChar = (Tcl_UniChar) (nocase
1492 if (nocase) {
1502 endChar = (Tcl_UniChar) (nocase
1337 Tcl_StringCaseMatch( CONST char *str, CONST char *pattern, int nocase) argument
[all...]
/macosx-10.10.1/ksh-23/ksh/src/cmd/ksh93/edit/
H A Dcompletion.c65 static int charcmp(int a, int b, int nocase) argument
67 if(nocase)
82 static char *overlaid(register char *str,register const char *newstr,int nocase) argument
85 while((c= *(unsigned char *)str) && ((d= *(unsigned char*)newstr++),charcmp(c,d,nocase)))
304 int nocase=0,narg,cmd_completion=0; local
370 nocase = (strchr(saveout,'c')!=0);
420 out = overlaid(begin,path_basename(*com++),nocase);
422 out = overlaid(begin,*com++,nocase);
/macosx-10.10.1/sudo-73/src/
H A Dfnmatch.c160 const int nocase = !!(flags & FNM_CASEFOLD); local
202 if (classmatch(*pattern, **string, nocase, pattern)
228 else if (nocase && (isupper((unsigned char)**string) ||
242 else if (nocase && (isupper((unsigned char)**string) ||
270 else if (nocase && (isupper((unsigned char)**string) || isupper((unsigned char)**pattern))
/macosx-10.10.1/tcl-105/tcl_ext/tcllib/tcllib/modules/snit/
H A Dvalidate.tcl564 # -nocase 0|1
566 # globs and regexps are case-insensitive if -nocase 1.
568 option -nocase -readonly 1 -default 0
620 # NEXT, validate -nocase
621 if {[catch {snit::boolean validate $options(-nocase)} result]} {
622 return -code error "invalid -nocase: $result"
663 if {$options(-nocase)} {
664 set result [string match -nocase $options(-glob) $value]
677 if {$options(-nocase)} {
678 set result [regexp -nocase
[all...]
/macosx-10.10.1/tcl-105/tcl_ext/tcllib/tcllib/modules/dns/
H A Dresolv.tcl104 if { [string match -nocase "nameserver" $e] } {
106 if { [string match -nocase "UnKnown" $hostname] } {
/macosx-10.10.1/tcl-105/tcl_ext/xotcl/xotcl/apps/comm/
H A Dlink-checker.xotcl74 if {![regexp -nocase {http://([^/:]+)} $url _ host]} {
91 if {[regexp -nocase {[.](gif|jpg|ps|pdf|gz)$} $url]} {
115 while {[regexp -nocase -indices -start $start -- \
121 if {[regexp -nocase $ref($elem)$ref_re $attribs _ i]} {
/macosx-10.10.1/apr-32/apr/apr/strings/
H A Dapr_fnmatch.c77 const int nocase = !!(flags & APR_FNM_CASE_BLIND); local
138 else if (nocase && (isupper(**string) || isupper(*startch)
151 else if (nocase && (isupper(**string) || isupper(**pattern))
178 else if (nocase && (isupper(**string) || isupper(**pattern))
/macosx-10.10.1/tcl-105/tcl_ext/incrtcl/iwidgets/generic/
H A Dregexpfield.itk60 itk_option define -nocase nocase Nocase 0
242 # OPTION: -nocase
247 itcl::configbody iwidgets::Regexpfield::nocase {
249 switch $itk_option(-nocase) {
255 error "bad nocase option \"$itk_option(-nocase)\":\
437 # If the value of the "-nocase" option is true, then add the
438 # "-nocase" flag to the list of flags.
442 if {$itk_option(-nocase)} {
[all...]
/macosx-10.10.1/tcl-105/tcl/tcl/library/http1.0/
H A Dhttp.tcl121 if {! [regexp -nocase {^(http://)?([^/:]+)(:([0-9]+))?(/.*)?$} $url \
224 if {![regexp -nocase ^text $state(type)]} {
238 if {[regexp -nocase {^content-type:(.+)$} $line x type]} {
241 if {[regexp -nocase {^content-length:(.+)$} $line x length]} {
244 if {[regexp -nocase {^([^:]+):(.+)$} $line x key value]} {
/macosx-10.10.1/tcl-105/tcl84/tcl/library/http1.0/
H A Dhttp.tcl121 if {! [regexp -nocase {^(http://)?([^/:]+)(:([0-9]+))?(/.*)?$} $url \
224 if {![regexp -nocase ^text $state(type)]} {
238 if {[regexp -nocase {^content-type:(.+)$} $line x type]} {
241 if {[regexp -nocase {^content-length:(.+)$} $line x length]} {
244 if {[regexp -nocase {^([^:]+):(.+)$} $line x key value]} {
/macosx-10.10.1/tcl-105/tcl_ext/sdx/sdx/lib/app-sdx/
H A Dfetch.tcl78 if {[regexp -nocase ^location$ $name]} {
/macosx-10.10.1/tcl-105/tcl_ext/tcllib/tcllib/modules/bibtex/
H A Dbibtex.tcl360 if {[regexp -nocase {\s*comment([^\n])*\n(.*)} $block \
366 } elseif {[regexp -nocase {\s*string[^\{]*\{(.*)\}[^\}]*} \
371 } elseif {[regexp -nocase {\s*preamble[^\{]*\{(.*)\}[^\}]*} \
378 set rest [string map -nocase $data($token,strings) $rest]
/macosx-10.10.1/tcl-105/tcl84/tcl/library/http/
H A Dhttp.tcl807 if {$state(-binary) || ![string match -nocase text* $state(type)]
834 if {[regexp -nocase {^content-type:(.+)$} $line x type]} {
837 regexp -nocase {charset\s*=\s*(\S+)} $type x state(charset)
839 if {[regexp -nocase {^content-length:(.+)$} $line x length]} {
842 if {[regexp -nocase {^content-encoding:(.+)$} $line x coding]} {
845 if {[regexp -nocase {^([^:]+):(.+)$} $line x key value]} {
/macosx-10.10.1/tcl-105/tcl_ext/tcllib/tcllib/modules/smtpd/
H A Dsmtpd.tcl565 set r [regexp -nocase {^HELO\s+([-\w\.]+)\s*$} $line -> domain]
593 set r [regexp -nocase {^EHLO\s+([-\w\.]+)\s*$} $line -> domain]
616 set r [regexp -nocase {^MAIL FROM:\s*(.*)} $line -> from]
669 set r [regexp -nocase {^RCPT TO:\s*(.*)} $line -> to]
690 if {[string match -nocase "postmaster" $addr(local)]} {
824 regexp -nocase {^NOOP (.*)$} -> str
/macosx-10.10.1/tcl-105/tcl_ext/bwidget/bwidget/
H A Dxpm2image.tcl64 if { [string equal -nocase $color "none"] } {
/macosx-10.10.1/tcl-105/tcl_ext/tklib/tklib/examples/widget/
H A Dscreenruler.tcl87 if {![regexp -nocase $re $file -> ext]} {
/macosx-10.10.1/tcl-105/tcl/tcl/library/http/
H A Dhttp.tcl680 if {[string equal -nocase $key "host"]} {
683 if {[string equal -nocase $key "accept-encoding"]} {
688 if {[string equal -nocase $key "content-length"]} {
1007 $state(-binary) || ![string match -nocase text* $state(type)]
1031 if {[regexp -nocase {^([^:]+):(.+)$} $line x key value]} {
1036 if {[regexp -nocase \
1041 regexp -nocase {charset\s*=\s*(\S+?);?} \
/macosx-10.10.1/tcl-105/tcl_ext/tcllib/tcllib/modules/ldap/
H A Dldapx.tcl689 if {[string equal -nocase $newdn $olddn]} then {
713 if {! [string equal -nocase $osup $nsup]} then {
723 if {! [string equal -nocase $ordn $nrdn]} then {
792 if {[regexp -expanded -nocase "^$utf8yes$" $attr]} then {
794 if {[regexp -expanded -nocase "^$utf8no$" $attr]} then {
1607 if {[string equal -nocase [lindex $r 0] "version"]} then {
/macosx-10.10.1/tcl-105/tcl_ext/tclvfs/tclvfs/http2.6/
H A Dhttp.tcl692 if {[string equal -nocase $key "host"]} { continue }
693 if {[string equal -nocase $key "accept-encoding"]} {
698 if {[string equal -nocase $key "content-length"]} {
999 if {$state(-binary) || ![string match -nocase text* $state(type)]} {
1018 if {[regexp -nocase {^([^:]+):(.+)$} $line x key value]} {
1023 regexp -nocase {charset\s*=\s*(\S+?);?} \

Completed in 346 milliseconds

1234