blob: d99134ff16c04b3a4f9f7b2d064a4f55c4e0bfc9 (
plain)
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
82
83
84
85
86
87
88
|
/***********************************************************************
* *
* This software is part of the ast package *
* Copyright (c) 1985-2010 AT&T Intellectual Property *
* and is licensed under the *
* Common Public License, Version 1.0 *
* by AT&T Intellectual Property *
* *
* A copy of the License is available at *
* http://www.opensource.org/licenses/cpl1.0.txt *
* (with md5 checksum 059e8cd6165cb4c31e351f2b69388fd9) *
* *
* Information and Software Systems Research *
* AT&T Research *
* Florham Park NJ *
* *
* Glenn Fowler <gsf@research.att.com> *
* David Korn <dgk@research.att.com> *
* Phong Vo <kpv@research.att.com> *
* *
***********************************************************************/
#pragma prototyped
/*
* Glenn Fowler
* AT&T Bell Laboratories
*
* hash table library
*/
#include "hashlib.h"
/*
* push/pop/query hash table scope
*
* bot==0 pop top scope
* bot==top query
* bot!=0 push top on bot
*
* scope table pointer returned
*/
Hash_table_t*
hashview(Hash_table_t* top, Hash_table_t* bot)
{
register Hash_bucket_t* b;
register Hash_bucket_t* p;
register Hash_bucket_t** sp;
register Hash_bucket_t** sx;
if (!top || top->frozen)
bot = 0;
else if (top == bot)
bot = top->scope;
else if (bot)
{
if (top->scope)
bot = 0;
else
{
sx = &top->table[top->size];
sp = &top->table[0];
while (sp < sx)
for (b = *sp++; b; b = b->next)
if (p = (Hash_bucket_t*)hashlook(bot, b->name, HASH_LOOKUP, NiL))
{
b->name = (p->hash & HASH_HIDES) ? p->name : (char*)b;
b->hash |= HASH_HIDES;
}
top->scope = bot;
bot->frozen++;
}
}
else if (bot = top->scope)
{
sx = &top->table[top->size];
sp = &top->table[0];
while (sp < sx)
for (b = *sp++; b; b = b->next)
if (b->hash & HASH_HIDES)
{
b->hash &= ~HASH_HIDES;
b->name = ((Hash_bucket_t*)b->name)->name;
}
top->scope = 0;
bot->frozen--;
}
return(bot);
}
|
