/*====================================================================
 * loop.c
 *
 * Copyright 1993, Silicon Graphics, Inc.
 * All Rights Reserved.
 *
 * This is UNPUBLISHED PROPRIETARY SOURCE CODE of Silicon Graphics,
 * Inc.; the contents of this file may not be disclosed to third
 * parties, copied or duplicated in any form, in whole or in part,
 * without the prior written permission of Silicon Graphics, Inc.
 *
 * RESTRICTED RIGHTS LEGEND:
 * Use, duplication or disclosure by the Government is subject to
 * restrictions as set forth in subdivision (c)(1)(ii) of the Rights
 * in Technical Data and Computer Software clause at DFARS
 * 252.227-7013, and/or in similar or successor clauses in the FAR,
 * DOD or NASA FAR Supplement. Unpublished - rights reserved under the
 * Copyright Laws of the United States.
 *====================================================================*/

#include <assert.h>
#include "ic.h"

void loopNew(ICLoop *l)
{
    l->decl.declclass = ICLOOP;
    l->decl.id = objectID++;
    l->decl.offset = (void *)-1;      
    l->decl.size = sizeof(Aloop);
    l->loop = 0;
    l->start = l->end = l->count = 0;
}

void loopSetPoints(ICLoop *l, u_long start, u_long end, u_long count,
                   ICLoopState state)
{
    int i;
    
    l->start = start;
    l->end   = end;
    l->count = count;
    for (i=0; i<ADPCMFSIZE; i++)
        l->state[i] = state[i];
        
}

void loopLayOut(ICLoop *icl)
{
    Aloop *l;
    int i;
    
    icl->decl.size = declSize((Decl *)icl);
    l = calloc(1, icl->decl.size);
    assert(l);

    l->start    = icl->start;
    l->end      = icl->end;
    l->count    = icl->count;
    for (i=0; i<ADPCMFSIZE; i++)
        l->state[i] = icl->state[i];
    
    icl->loop = l;
}

void loopPrint(ICLoop *icl)
{
    Aloop       *l = icl->loop;
    Id          *name;
    int         i;
    
    name = findname((Decl *)icl);

    if (name) {
         printf("Loop: %s\n", name->name);
    } else {
         printf("Loop: \n");
    }
    
    declPrint((Decl *)icl);
    
    printf("\tstart:\t\t= %d\n", l->start);
    printf("\tend:\t\t= %d\n", l->end);
    printf("\tcount:\t\t= %d\n", l->count);
    printf("\tstate:\n\t");
    for (i=0; i<ADPCMFSIZE/2; i++)
        printf("%6d ",l->state[i]);
    printf("\n\t");
    for (i=ADPCMFSIZE/2; i<ADPCMFSIZE; i++)
        printf("%6d ",l->state[i]);
    printf("\n");
        
    printf("\n");
}

void loopWrite(ICLoop *l, FILE *file)
{
    fwrite(l->loop, l->decl.size, 1, file);
}


char *ReadPString(FILE *ifile)

{
    unsigned char c;
    char        *st;

    fread(&c, 1, 1, ifile);
    st = (char *) malloc(c+1);
    fread(st, c, 1, ifile);
    *(st+c) = 0;
    
    /*
     * Read the pad byte if necessary
     */
    if (!(c & 1))
        fread(&c, 1, 1, ifile);
    return st;
}