File: IncludeMeta.c

package info (click to toggle)
swish++ 6.1.5-2
  • links: PTS
  • area: main
  • in suites: squeeze
  • size: 2,256 kB
  • ctags: 1,759
  • sloc: ansic: 11,931; lisp: 804; sh: 629; perl: 366; makefile: 80
file content (81 lines) | stat: -rw-r--r-- 2,567 bytes parent folder | download | duplicates (6)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
/*
**      SWISH++
**      IncludeMeta.c
**
**      Copyright (C) 2000  Paul J. Lucas
**
**      This program is free software; you can redistribute it and/or modify
**      it under the terms of the GNU General Public License as published by
**      the Free Software Foundation; either version 2 of the License, or
**      (at your option) any later version.
**
**      This program is distributed in the hope that it will be useful,
**      but WITHOUT ANY WARRANTY; without even the implied warranty of
**      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
**      GNU General Public License for more details.
**
**      You should have received a copy of the GNU General Public License
**      along with this program; if not, write to the Free Software
**      Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
*/

// standard
#include <cstring>

// local
#include "auto_vec.h"
#include "IncludeMeta.h"
#include "exit_codes.h"
#include "platform.h"
#include "util.h"           /* for error(), new_strdup() */

using namespace PJL;
using namespace std;

//*****************************************************************************
//
// SYNOPSIS
//
        void IncludeMeta::parse_value( char *line )
//
// DESCRIPTION
//
//      Parse the line of text by splitting it into words that are separated by
//      whitespace.  Additionally, "words" can be further split by '=' to do
//      meta name reassignment, e.g.:
//
//          adr=address
//
// PARAMETERS
//
//      line    The line of text to be parsed.
//
//*****************************************************************************
{
    auto_vec<char> lower( to_lower_r( line ) );
    char *p = lower;
    for ( register char const *meta_name;
          meta_name = ::strtok( p, " \r\t" ); p = 0
    ) {
        //
        // See if the meta name contains a reassignment: if so, chop it at the
        // '='.
        //
        // The const_cast<>() is needed for Sun's (wrong!) implementation of
        // strchr() returning char const*.  Its use is harmless for other
        // compilers.
        //
        register char *reassign =
            const_cast<char*>( ::strchr( meta_name, '=' ) );
        if ( reassign ) {
            *reassign = '\0';
            if ( !*++reassign ) {
                error() << "name expected after '='\n";
                ::exit( Exit_Config_File );
            }
        }
        char *const m = new_strdup( meta_name );
        insert( value_type( m, reassign ? new_strdup( reassign ) : m ));
    }
}
/* vim:set et sw=4 ts=4: */