Initial import of binutils 2.22 on the new vendor branch
[dragonfly.git] / contrib / groff / src / libs / libgroff / lf.cpp
1 // -*- C++ -*-
2 /* Copyright (C) 1989, 1990, 1991, 1992, 2004, 2009
3      Free Software Foundation, Inc.
4      Written by James Clark (jjc@jclark.com)
5
6 This file is part of groff.
7
8 groff is free software; you can redistribute it and/or modify it under
9 the terms of the GNU General Public License as published by the Free
10 Software Foundation, either version 3 of the License, or
11 (at your option) any later version.
12
13 groff is distributed in the hope that it will be useful, but WITHOUT ANY
14 WARRANTY; without even the implied warranty of MERCHANTABILITY or
15 FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
16 for more details.
17
18 You should have received a copy of the GNU General Public License
19 along with this program. If not, see <http://www.gnu.org/licenses/>. */
20
21 #include <ctype.h>
22
23 #include "lib.h"
24 #include "cset.h"
25 #include "stringclass.h"
26
27 extern void change_filename(const char *);
28 extern void change_lineno(int);
29
30 int interpret_lf_args(const char *p)
31 {
32   while (*p == ' ')
33     p++;
34   if (!csdigit(*p))
35     return 0;
36   int ln = 0;
37   do {
38     ln *= 10;
39     ln += *p++ - '0';
40   } while (csdigit(*p));
41   if (*p != ' ' && *p != '\n' && *p != '\0')
42     return 0;
43   while (*p == ' ')
44     p++;
45   if (*p == '\0' || *p == '\n')  {
46     change_lineno(ln);
47     return 1;
48   }
49   const char *q;
50   for (q = p;
51        *q != '\0' && *q != ' ' && *q != '\n' && *q != '\\';
52        q++)
53     ;
54   string tem(p, q - p);
55   while (*q == ' ')
56     q++;
57   if (*q != '\n' && *q != '\0')
58     return 0;
59   tem += '\0';
60   change_filename(tem.contents());
61   change_lineno(ln);
62   return 1;
63 }