Mercurial > octave-nkf

annotate liboctave/glob-match.h @ 10139:93c74edcc3e3

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
glob-match.h: update copyright
author John W. Eaton <jwe@octave.org>
date Wed, 20 Jan 2010 02:01:26 -0500
parents 805a83ecd3da
children deba43069023
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
2924
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
1 /*
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
2
10139
93c74edcc3e3 glob-match.h: update copyright
John W. Eaton <jwe@octave.org>
parents: 10138
diff changeset
3 Copyright (C) 1996, 1997, 2000, 2005, 2006, 2007, 2010 John W. Eaton
2924
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
4
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
5 This file is part of Octave.
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
6
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
7 Octave is free software; you can redistribute it and/or modify it
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
8 under the terms of the GNU General Public License as published by the
7016
93c65f2a5668 [project @ 2007-10-12 06:40:56 by jwe]
jwe
parents: 6108
diff changeset
9 Free Software Foundation; either version 3 of the License, or (at your
93c65f2a5668 [project @ 2007-10-12 06:40:56 by jwe]
jwe
parents: 6108
diff changeset
10 option) any later version.
2924
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
11
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
12 Octave is distributed in the hope that it will be useful, but WITHOUT
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
13 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
14 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
15 for more details.
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
16
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
17 You should have received a copy of the GNU General Public License
7016
93c65f2a5668 [project @ 2007-10-12 06:40:56 by jwe]
jwe
parents: 6108
diff changeset
18 along with Octave; see the file COPYING. If not, see
93c65f2a5668 [project @ 2007-10-12 06:40:56 by jwe]
jwe
parents: 6108
diff changeset
19 <http://www.gnu.org/licenses/>.
2924
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
20
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
21 */
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
22
2926
66ef74ee5d9f [project @ 1997-05-05 03:20:52 by jwe]
jwe
parents: 2924
diff changeset
23 #if !defined (octave_glob_match_h)
66ef74ee5d9f [project @ 1997-05-05 03:20:52 by jwe]
jwe
parents: 2924
diff changeset
24 #define octave_glob_match_h 1
2924
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
25
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
26 #include <string>
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
27
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
28 #include "Array.h"
10138
805a83ecd3da avoid conflict between glob.h definition of glob and glob_match::glob function
John W. Eaton <jwe@octave.org>
parents: 9994
diff changeset
29 #include "oct-glob.h"
2924
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
30 #include "str-vec.h"
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
31
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
32 class
6108
143b556ce725 [project @ 2006-10-27 01:45:54 by jwe]
jwe
parents: 6095
diff changeset
33 OCTAVE_API
2924
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
34 glob_match
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
35 {
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
36 public:
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
37
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
38 enum opts
10138
805a83ecd3da avoid conflict between glob.h definition of glob and glob_match::glob function
John W. Eaton <jwe@octave.org>
parents: 9994
diff changeset
39 {
805a83ecd3da avoid conflict between glob.h definition of glob and glob_match::glob function
John W. Eaton <jwe@octave.org>
parents: 9994
diff changeset
40 pathname = 1, // No wildcard can ever match `/'.
805a83ecd3da avoid conflict between glob.h definition of glob and glob_match::glob function
John W. Eaton <jwe@octave.org>
parents: 9994
diff changeset
41 noescape = 2, // Backslashes don't quote special chars.
805a83ecd3da avoid conflict between glob.h definition of glob and glob_match::glob function
John W. Eaton <jwe@octave.org>
parents: 9994
diff changeset
42 period = 4 // Leading `.' is matched only explicitly.
805a83ecd3da avoid conflict between glob.h definition of glob and glob_match::glob function
John W. Eaton <jwe@octave.org>
parents: 9994
diff changeset
43 };
2924
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
44
6095
a8aa7a014c22 [project @ 2006-10-26 01:22:31 by jwe]
jwe
parents: 5307
diff changeset
45 glob_match (const std::string& p,
10138
805a83ecd3da avoid conflict between glob.h definition of glob and glob_match::glob function
John W. Eaton <jwe@octave.org>
parents: 9994
diff changeset
46 unsigned int xopts = pathname|noescape|period)
805a83ecd3da avoid conflict between glob.h definition of glob and glob_match::glob function
John W. Eaton <jwe@octave.org>
parents: 9994
diff changeset
47 : pat (p), fnmatch_flags (opts_to_fnmatch_flags (xopts)) { }
2924
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
48
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
49 glob_match (const string_vector& p = string_vector (),
10138
805a83ecd3da avoid conflict between glob.h definition of glob and glob_match::glob function
John W. Eaton <jwe@octave.org>
parents: 9994
diff changeset
50 unsigned int xopts = pathname|noescape|period)
805a83ecd3da avoid conflict between glob.h definition of glob and glob_match::glob function
John W. Eaton <jwe@octave.org>
parents: 9994
diff changeset
51 : pat (p), fnmatch_flags (opts_to_fnmatch_flags (xopts)) { }
2924
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
52
10138
805a83ecd3da avoid conflict between glob.h definition of glob and glob_match::glob function
John W. Eaton <jwe@octave.org>
parents: 9994
diff changeset
53 glob_match (const glob_match& gm)
805a83ecd3da avoid conflict between glob.h definition of glob and glob_match::glob function
John W. Eaton <jwe@octave.org>
parents: 9994
diff changeset
54 : pat (gm.pat), fnmatch_flags (gm.fnmatch_flags) { }
2924
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
55
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
56 glob_match& operator = (const glob_match& gm)
10138
805a83ecd3da avoid conflict between glob.h definition of glob and glob_match::glob function
John W. Eaton <jwe@octave.org>
parents: 9994
diff changeset
57 {
805a83ecd3da avoid conflict between glob.h definition of glob and glob_match::glob function
John W. Eaton <jwe@octave.org>
parents: 9994
diff changeset
58 if (this != &gm)
805a83ecd3da avoid conflict between glob.h definition of glob and glob_match::glob function
John W. Eaton <jwe@octave.org>
parents: 9994
diff changeset
59 {
805a83ecd3da avoid conflict between glob.h definition of glob and glob_match::glob function
John W. Eaton <jwe@octave.org>
parents: 9994
diff changeset
60 pat = gm.pat;
805a83ecd3da avoid conflict between glob.h definition of glob and glob_match::glob function
John W. Eaton <jwe@octave.org>
parents: 9994
diff changeset
61 fnmatch_flags = gm.fnmatch_flags;
805a83ecd3da avoid conflict between glob.h definition of glob and glob_match::glob function
John W. Eaton <jwe@octave.org>
parents: 9994
diff changeset
62 }
805a83ecd3da avoid conflict between glob.h definition of glob and glob_match::glob function
John W. Eaton <jwe@octave.org>
parents: 9994
diff changeset
63 return *this;
805a83ecd3da avoid conflict between glob.h definition of glob and glob_match::glob function
John W. Eaton <jwe@octave.org>
parents: 9994
diff changeset
64 }
2924
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
65
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
66 ~glob_match (void) { }
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
67
3504
5eef8a2294bd [project @ 2000-02-01 10:06:51 by jwe]
jwe
parents: 2926
diff changeset
68 void set_pattern (const std::string& p) { pat = p; }
2924
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
69
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
70 void set_pattern (const string_vector& p) { pat = p; }
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
71
10138
805a83ecd3da avoid conflict between glob.h definition of glob and glob_match::glob function
John W. Eaton <jwe@octave.org>
parents: 9994
diff changeset
72 bool match (const std::string& str)
805a83ecd3da avoid conflict between glob.h definition of glob and glob_match::glob function
John W. Eaton <jwe@octave.org>
parents: 9994
diff changeset
73 {
805a83ecd3da avoid conflict between glob.h definition of glob and glob_match::glob function
John W. Eaton <jwe@octave.org>
parents: 9994
diff changeset
74 return octave_fnmatch (pat, str, fnmatch_flags);
805a83ecd3da avoid conflict between glob.h definition of glob and glob_match::glob function
John W. Eaton <jwe@octave.org>
parents: 9994
diff changeset
75 }
2924
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
76
10138
805a83ecd3da avoid conflict between glob.h definition of glob and glob_match::glob function
John W. Eaton <jwe@octave.org>
parents: 9994
diff changeset
77 Array<bool> match (const string_vector& str)
805a83ecd3da avoid conflict between glob.h definition of glob and glob_match::glob function
John W. Eaton <jwe@octave.org>
parents: 9994
diff changeset
78 {
805a83ecd3da avoid conflict between glob.h definition of glob and glob_match::glob function
John W. Eaton <jwe@octave.org>
parents: 9994
diff changeset
79 int n = str.length ();
805a83ecd3da avoid conflict between glob.h definition of glob and glob_match::glob function
John W. Eaton <jwe@octave.org>
parents: 9994
diff changeset
80
805a83ecd3da avoid conflict between glob.h definition of glob and glob_match::glob function
John W. Eaton <jwe@octave.org>
parents: 9994
diff changeset
81 Array<bool> retval (n);
805a83ecd3da avoid conflict between glob.h definition of glob and glob_match::glob function
John W. Eaton <jwe@octave.org>
parents: 9994
diff changeset
82
805a83ecd3da avoid conflict between glob.h definition of glob and glob_match::glob function
John W. Eaton <jwe@octave.org>
parents: 9994
diff changeset
83 for (int i = 0; i < n; i++)
805a83ecd3da avoid conflict between glob.h definition of glob and glob_match::glob function
John W. Eaton <jwe@octave.org>
parents: 9994
diff changeset
84 retval(i) = match (str[i]);
805a83ecd3da avoid conflict between glob.h definition of glob and glob_match::glob function
John W. Eaton <jwe@octave.org>
parents: 9994
diff changeset
85
805a83ecd3da avoid conflict between glob.h definition of glob and glob_match::glob function
John W. Eaton <jwe@octave.org>
parents: 9994
diff changeset
86 return retval;
805a83ecd3da avoid conflict between glob.h definition of glob and glob_match::glob function
John W. Eaton <jwe@octave.org>
parents: 9994
diff changeset
87 }
2924
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
88
9994
fdc3a43c0be8 avoid conflict with gnulib defining glob to be rpl_glob
John W. Eaton <jwe@octave.org>
parents: 7017
diff changeset
89 // We forward to glob_internal here to avoid problems with gnulib's
fdc3a43c0be8 avoid conflict with gnulib defining glob to be rpl_glob
John W. Eaton <jwe@octave.org>
parents: 7017
diff changeset
90 // glob.h defining glob to be rpl_glob.
fdc3a43c0be8 avoid conflict with gnulib defining glob to be rpl_glob
John W. Eaton <jwe@octave.org>
parents: 7017
diff changeset
91
10138
805a83ecd3da avoid conflict between glob.h definition of glob and glob_match::glob function
John W. Eaton <jwe@octave.org>
parents: 9994
diff changeset
92 string_vector glob (void) { return octave_glob (pat); }
2924
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
93
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
94 private:
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
95
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
96 // Globbing pattern(s).
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
97 string_vector pat;
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
98
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
99 // Option flags.
10138
805a83ecd3da avoid conflict between glob.h definition of glob and glob_match::glob function
John W. Eaton <jwe@octave.org>
parents: 9994
diff changeset
100 int fnmatch_flags;
9994
fdc3a43c0be8 avoid conflict with gnulib defining glob to be rpl_glob
John W. Eaton <jwe@octave.org>
parents: 7017
diff changeset
101
10138
805a83ecd3da avoid conflict between glob.h definition of glob and glob_match::glob function
John W. Eaton <jwe@octave.org>
parents: 9994
diff changeset
102 int opts_to_fnmatch_flags (unsigned int xopts) const;
2924
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
103 };
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
104
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
105 #endif
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
106
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
107 /*
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
108 ;;; Local Variables: ***
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
109 ;;; mode: C++ ***
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
110 ;;; End: ***
50edcdd3ec22 [project @ 1997-05-03 20:21:03 by jwe]
jwe
parents:
diff changeset
111 */