cmd/spell/hashcheck.c

	hashcheck.c revision 7c478bd95313f5f23a4c958a745db2134aa03244
/*
 * CDDL HEADER START
 *
 * The contents of this file are subject to the terms of the
 * Common Development and Distribution License, Version 1.0 only
 * (the "License").  You may not use this file except in compliance
 * with the License.
 *
 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
 * or http://www.opensolaris.org/os/licensing.
 * See the License for the specific language governing permissions
 * and limitations under the License.
 *
 * When distributing Covered Code, include this CDDL HEADER in each
 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
 * If applicable, add the following below this CDDL HEADER, with the
 * fields enclosed by brackets "[]" replaced with your own identifying
 * information: Portions Copyright [yyyy] [name of copyright owner]
 *
 * CDDL HEADER END
 */
/*  Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T */
/*    All Rights Reserved   */


#ident  "%Z%%M% %I% %E% SMI"    /* SVr4.0 1.2   */
#include <stdlib.h>
#include <unistd.h>
#include <stdio.h>
#include <locale.h>
#include "hash.h"
#include "huff.h"

int decode(long, long *);

int hindex[NI];
unsigned *table;
unsigned wp;
int bp;
#define U (BYTE*sizeof (unsigned))
#define L (BYTE*sizeof (long))

static long
fetch(void)
{
    long w1;
    long y = 0;
    int empty = L;
    int i = bp;
    int tp = wp;
    while (empty >= i) {
        empty -= i;
        i = U;
        y |= (long)table[tp++] << empty;
    }
    if (empty > 0)
        y |= table[tp]>>i-empty;
    i = decode((y >> 1) &
        (((unsigned long)1 << (BYTE * sizeof (y) - 1)) - 1), &w1);
    bp -= i;
    while (bp <= 0) {
        bp += U;
        wp++;
    }
    return (w1);
}


/* ARGSUSED */
void
main(int argc, char **argv)
{
    int i;
    long v;
    long a;

    /* Set locale environment variables local definitions */
    (void) setlocale(LC_ALL, "");
#if !defined(TEXT_DOMAIN)   /* Should be defined by cc -D */
#define TEXT_DOMAIN "SYS_TEST"  /* Use this only if it wasn't */
#endif
    (void) textdomain(TEXT_DOMAIN);

    (void) rhuff(stdin);
    (void) fread((char *)hindex, sizeof (*hindex), NI, stdin);
    table = (unsigned *)malloc(hindex[NI-1]*sizeof (*table));
    (void) fread((char *)table, sizeof (*table), hindex[NI-1], stdin);
    for (i = 0; i < NI-1; i++) {
        bp = U;
        v = (long)i<<(HASHWIDTH-INDEXWIDTH);
        for (wp = hindex[i]; wp < hindex[i+1]; ) {
            if (wp == hindex[i] && bp == U)
                a = fetch();
            else {
                a = fetch();
                if (a == 0)
                    break;
            }
            if (wp > hindex[i+1] ||
                wp == hindex[i+1] && bp < U)
                break;
            v += a;
            (void) printf("%.9lo\n", v);
        }
    }
    exit(0);
}