68 lines
1.6 KiB
C
68 lines
1.6 KiB
C
/*
|
|
* This file is part of the UCB release of Plan 9. It is subject to the license
|
|
* terms in the LICENSE file found in the top-level directory of this
|
|
* distribution and at http://akaros.cs.berkeley.edu/files/Plan9License. No
|
|
* part of the UCB release of Plan 9, including this file, may be copied,
|
|
* modified, propagated, or distributed except according to the terms contained
|
|
* in the LICENSE file.
|
|
*/
|
|
|
|
#include <u.h>
|
|
#include <lib9.h>
|
|
#include <bio.h>
|
|
#include <chartypes.h>
|
|
#include <ndb.h>
|
|
#include "ndbhf.h"
|
|
|
|
/*
|
|
* Parse a data base entry. Entries may span multiple
|
|
* lines. An entry starts on a left margin. All subsequent
|
|
* lines must be indented by white space. An entry consists
|
|
* of tuples of the forms:
|
|
* attribute-name
|
|
* attribute-name=value
|
|
* attribute-name="value with white space"
|
|
*
|
|
* The parsing returns a 2-dimensional structure. The first
|
|
* dimension joins all tuples. All tuples on the same line
|
|
* form a ring along the second dimension.
|
|
*/
|
|
|
|
/*
|
|
* parse the next entry in the file
|
|
*/
|
|
Ndbtuple*
|
|
ndbparse(Ndb *db)
|
|
{
|
|
char *line;
|
|
Ndbtuple *t;
|
|
Ndbtuple *first, *last;
|
|
int len;
|
|
|
|
first = last = 0;
|
|
for(;;){
|
|
if((line = Brdline(&db->b, '\n')) == 0)
|
|
break;
|
|
len = Blinelen(&db->b);
|
|
if(line[len-1] != '\n')
|
|
break;
|
|
if(first && !ISWHITE(*line) && *line != '#'){
|
|
Bseek(&db->b, -len, 1);
|
|
break;
|
|
}
|
|
t = _ndbparseline(line);
|
|
if(t == 0)
|
|
continue;
|
|
setmalloctag(t, getcallerpc());
|
|
if(first)
|
|
last->entry = t;
|
|
else
|
|
first = t;
|
|
last = t;
|
|
while(last->entry)
|
|
last = last->entry;
|
|
}
|
|
ndbsetmalloctag(first, getcallerpc());
|
|
return first;
|
|
}
|