大家看看这些代码...是否可以移植到x86上面来用.

hdpt · 发表于 2004-10-31 22:07:29

rt

/* $Id: xunpak.c,v 3.2 1995/11/17 07:42:06 hampton Exp $
* $Source: /swtal/cherf.111/ios/boot/xunpak.c,v $
*------------------------------------------------------------------
* LZHUF.C English version 1.0
*
* Based on Japanese version 29-NOV-1988
* LZSS coded by Haruhiko OKUMURA
* Adaptive Huffman Coding coded by Haruyasu YOSHIZAKI
* Edited and translated to English by Kenji RIKITAKE
*------------------------------------------------------------------
* $Log: xunpak.c,v $
* Revision 3.2  1995/11/17  07:42:06  hampton
* Remove old entries from the RCS header logs.
*
* Revision 3.1  1995/11/09  09:05:09  shaker
* Bump version numbers from 2.x to 3.x.
*
* Revision 2.1  1995/06/07  19:13:04  hampton
* Bump version numbers from 1.x to 2.x.
*
*------------------------------------------------------------------
* $Endlog$
*/

#ifndef LIB
#  include <stdio.h>
#  include <string.h>
#  include <ctype.h>

  /* These values are Turbo-C dependent;
EXIT_SUCCESS, EXIT_FAILURE
renamed by Kenji */

#  define EXIT_OK 0
#  define EXIT_FAILED -1

FILE  *infile, *outfile;
#endif

unsigned char *inptr, *outptr, *instart, *outstart;
long inlength;
#  define putc(c,file) *outptr++ = c

unsigned long int  textsize = 0, codesize = 0, printcount = 0;

void Error(char *message)
{
#ifndef LIB
printf("\n%s\n", message);
exit(EXIT_FAILED);
#endif
}

/* LZSS Parameters */

#define N 4096 /* Size of string buffer */
#define F 60 /* Size of look-ahead buffer */
#define THRESHOLD 2
#define NIL N /* End of tree's node  */

/* Huffman coding parameters */

#define N_CHAR    (256 - THRESHOLD + F)
/* character code (= 0..N_CHAR-1) */
#define T (N_CHAR * 2 - 1) /* Size of table */
#define R (T - 1) /* root position */
#define MAX_FREQ 0x8000
/* update when cumulative frequency */
/* reaches to this value */

typedef unsigned char uchar;

/*
* Tables for encoding/decoding upper 6 bits of
* sliding dictionary pointer
*/

/* decoder table */
uchar d_code[256] = {
0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01,
/*40*/ 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01,
0x02, 0x02, 0x02, 0x02, 0x02, 0x02, 0x02, 0x02,
0x02, 0x02, 0x02, 0x02, 0x02, 0x02, 0x02, 0x02,
0x03, 0x03, 0x03, 0x03, 0x03, 0x03, 0x03, 0x03,
0x03, 0x03, 0x03, 0x03, 0x03, 0x03, 0x03, 0x03,
/*80*/ 0x04, 0x04, 0x04, 0x04, 0x04, 0x04, 0x04, 0x04,
0x05, 0x05, 0x05, 0x05, 0x05, 0x05, 0x05, 0x05,
0x06, 0x06, 0x06, 0x06, 0x06, 0x06, 0x06, 0x06,
0x07, 0x07, 0x07, 0x07, 0x07, 0x07, 0x07, 0x07,
0x08, 0x08, 0x08, 0x08, 0x08, 0x08, 0x08, 0x08,
/*120*/ 0x09, 0x09, 0x09, 0x09, 0x09, 0x09, 0x09, 0x09,
0x0A, 0x0A, 0x0A, 0x0A, 0x0A, 0x0A, 0x0A, 0x0A,
0x0B, 0x0B, 0x0B, 0x0B, 0x0B, 0x0B, 0x0B, 0x0B,
0x0C, 0x0C, 0x0C, 0x0C, 0x0D, 0x0D, 0x0D, 0x0D,
0x0E, 0x0E, 0x0E, 0x0E, 0x0F, 0x0F, 0x0F, 0x0F,
/*160*/ 0x10, 0x10, 0x10, 0x10, 0x11, 0x11, 0x11, 0x11,
0x12, 0x12, 0x12, 0x12, 0x13, 0x13, 0x13, 0x13,
0x14, 0x14, 0x14, 0x14, 0x15, 0x15, 0x15, 0x15,
0x16, 0x16, 0x16, 0x16, 0x17, 0x17, 0x17, 0x17,
0x18, 0x18, 0x19, 0x19, 0x1A, 0x1A, 0x1B, 0x1B,
0x1C, 0x1C, 0x1D, 0x1D, 0x1E, 0x1E, 0x1F, 0x1F,
0x20, 0x20, 0x21, 0x21, 0x22, 0x22, 0x23, 0x23,
0x24, 0x24, 0x25, 0x25, 0x26, 0x26, 0x27, 0x27,
0x28, 0x28, 0x29, 0x29, 0x2A, 0x2A, 0x2B, 0x2B,
0x2C, 0x2C, 0x2D, 0x2D, 0x2E, 0x2E, 0x2F, 0x2F,
0x30, 0x31, 0x32, 0x33, 0x34, 0x35, 0x36, 0x37,
0x38, 0x39, 0x3A, 0x3B, 0x3C, 0x3D, 0x3E, 0x3F,
};
#ifdef V0
uchar d_len[256] = {
0x03, 0x03, 0x03, 0x03, 0x03, 0x03, 0x03, 0x03,
0x03, 0x03, 0x03, 0x03, 0x03, 0x03, 0x03, 0x03,
0x03, 0x03, 0x03, 0x03, 0x03, 0x03, 0x03, 0x03,
0x03, 0x03, 0x03, 0x03, 0x03, 0x03, 0x03, 0x03,
0x04, 0x04, 0x04, 0x04, 0x04, 0x04, 0x04, 0x04,
0x04, 0x04, 0x04, 0x04, 0x04, 0x04, 0x04, 0x04,
0x04, 0x04, 0x04, 0x04, 0x04, 0x04, 0x04, 0x04,
0x04, 0x04, 0x04, 0x04, 0x04, 0x04, 0x04, 0x04,
0x04, 0x04, 0x04, 0x04, 0x04, 0x04, 0x04, 0x04,
0x04, 0x04, 0x04, 0x04, 0x04, 0x04, 0x04, 0x04,
0x05, 0x05, 0x05, 0x05, 0x05, 0x05, 0x05, 0x05,
0x05, 0x05, 0x05, 0x05, 0x05, 0x05, 0x05, 0x05,
0x05, 0x05, 0x05, 0x05, 0x05, 0x05, 0x05, 0x05,
0x05, 0x05, 0x05, 0x05, 0x05, 0x05, 0x05, 0x05,
0x05, 0x05, 0x05, 0x05, 0x05, 0x05, 0x05, 0x05,
0x05, 0x05, 0x05, 0x05, 0x05, 0x05, 0x05, 0x05,
0x05, 0x05, 0x05, 0x05, 0x05, 0x05, 0x05, 0x05,
0x05, 0x05, 0x05, 0x05, 0x05, 0x05, 0x05, 0x05,
0x06, 0x06, 0x06, 0x06, 0x06, 0x06, 0x06, 0x06,
0x06, 0x06, 0x06, 0x06, 0x06, 0x06, 0x06, 0x06,
0x06, 0x06, 0x06, 0x06, 0x06, 0x06, 0x06, 0x06,
0x06, 0x06, 0x06, 0x06, 0x06, 0x06, 0x06, 0x06,
0x06, 0x06, 0x06, 0x06, 0x06, 0x06, 0x06, 0x06,
0x06, 0x06, 0x06, 0x06, 0x06, 0x06, 0x06, 0x06,
0x07, 0x07, 0x07, 0x07, 0x07, 0x07, 0x07, 0x07,
0x07, 0x07, 0x07, 0x07, 0x07, 0x07, 0x07, 0x07,
0x07, 0x07, 0x07, 0x07, 0x07, 0x07, 0x07, 0x07,
0x07, 0x07, 0x07, 0x07, 0x07, 0x07, 0x07, 0x07,
0x07, 0x07, 0x07, 0x07, 0x07, 0x07, 0x07, 0x07,
0x07, 0x07, 0x07, 0x07, 0x07, 0x07, 0x07, 0x07,
0x08, 0x08, 0x08, 0x08, 0x08, 0x08, 0x08, 0x08,
0x08, 0x08, 0x08, 0x08, 0x08, 0x08, 0x08, 0x08,
};
#endif
unsigned char text_buf[N + F - 1];
short match_position, match_length;

unsigned short freq[T + 1]; /* cumulative freq table */

/*
* pointing parent nodes.
* area [T..(T + N_CHAR - 1)] are pointers for leaves
*/
short prnt[T + N_CHAR];

/* pointing children nodes (son[], son[] + 1)*/
short son[T];

unsigned short getbuf = 0;
uchar getlen = 0;

unsigned short GetBit(void) /* get one bit */
{
short i;

while (getlen <=

{
if (inlength > 0) {
i = *inptr++; inlength--;
} else i = 0;
getbuf |= i << (8 - getlen);
getlen += 8;
}
i = getbuf;
getbuf <<= 1;
getlen--;
return (i < 0);
}

int GetByte(void) /* get a byte */
{
unsigned short i;

while (getlen <=

{
i = inlength > 0 ? inlength--, *inptr++ : 0;
getbuf |= (unsigned short) i << (8 - getlen);
getlen += 8;
}
(unsigned short) i = getbuf;
getbuf <<= 8;
getlen -= 8;
return((unsigned short) i >>

;
}

/* initialize freq tree */

void StartHuff()
{
short i, j;

for (i = 0; i < N_CHAR; i++) {
freq = 1;
son = i + T;
prnt[i + T] = i;
}
i = 0; j = N_CHAR;
while (j <= R) {
freq[j] = freq + freq[i + 1];
son[j] = i;
prnt = prnt[i + 1] = j;
i += 2; j++;
}
freq[T] = 0xffff;
prnt[R] = 0;
}

/* reconstruct freq tree */

void reconst()
{
short i, j, k;
unsigned short f, l;

/* halven cumulative freq for leaf nodes */
j = 0;
for (i = 0; i < T; i++) {
if (son >= T) {
freq[j] = (freq + 1) / 2;
son[j] = son;
j++;
}
}
/* make a tree : first, connect children nodes */
for (i = 0, j = N_CHAR; j < T; i += 2, j++) {
k = i + 1;
f = freq[j] = freq + freq[k];
for (k = j - 1; f < freq[k]; k--);
k++;
l = (j - k) * sizeof(short);

(void)bcopy(&freq[k], &freq[k + 1], l);
freq[k] = f;
bcopy(&son[k], &son[k + 1], l);
son[k] = i;
}
/* connect parent nodes */
for (i = 0; i < T; i++) {
if ((k = son) >= T) {
prnt[k] = i;
} else {
prnt[k] = prnt[k + 1] = i;
}
}
}

/* update freq tree */

void update(short c)
{
short i, j, k, l;

if (freq[R] == MAX_FREQ) {
reconst();
}
c = prnt[c + T];
do {
k = ++freq[c];

/* swap nodes to keep the tree freq-ordered */
if (k > freq[l = c + 1]) {
while (k > freq[++l]);
l--;
freq[c] = freq[l];
freq[l] = k;

i = son[c];
prnt = l;
if (i < T) prnt[i + 1] = l;

j = son[l];
son[l] = i;

prnt[j] = c;
if (j < T) prnt[j + 1] = c;
son[c] = j;

c = l;
}
} while ((c = prnt[c]) != 0); /* do it until reaching the root */
}

short DecodeChar()
{
unsigned short c;

c = son[R];

/*
   * start searching tree from the root to leaves.
   * choose node #(son[]) if input bit == 0
   * else choose #(son[]+1) (input bit == 1)
   */
while (c < T) {
c += GetBit();
c = son[c];
}
c -= T;
update(c);
return(c);
}

short DecodePosition()
{
unsigned short i, j, c;

/* decode upper 6 bits from given table */
i = GetByte();
c = (unsigned short)(d_code) << 6;
#ifdef V0
j = d_len;
#else
if (i < 32) j = 3;
else if (i < 80) j = 4;
else if (i < 144) j = 5;
else if (i < 192) j = 6;
else if (i < 240) j = 7;
else j = 8;
#endif
/* input lower 6 bits directly */
j -= 2;
while (j--) {
i = (i << 1) + GetBit();
}
return(c | i & 0x3f);
}

void Decode(void)  /* Decoding/Uncompressing */
{
short  i, j, k, r, c;
unsigned long int  count;

bcopy(inptr, &textsize, sizeof textsize);
inlength -= sizeof textsize;
inptr += sizeof textsize;
#ifndef LIB
fprintf(stderr, "\nOriginal file size %ld", textsize);
#endif

if (textsize == 0)
return;
StartHuff();
for (i = 0; i < N - F; i++)
text_buf = 0;
r = N - F;
for (count = 0; count < textsize; ) {
c = DecodeChar();
if (c < 256) {
putc(c, outfile);
text_buf[r++] = c;
r &= (N - 1);
count++;
} else {
i = (r - DecodePosition() - 1) & (N - 1);
j = c - 255 + THRESHOLD;
for (k = 0; k < j; k++) {
c = text_buf[(i + k) & (N - 1)];
putc(c, outfile);
text_buf[r++] = c;
r &= (N - 1);
count++;
}
}
}
printf("%12ld\n", count);
}

#ifndef LIB
int main(int argc, char *argv[])
{
char  *s;

printf("\nSizes of data structures:");
printf("\n  text_buf = %6d", sizeof text_buf);
printf("\n  freq =    %6d", sizeof freq);
printf("\n  prnt =    %6d", sizeof prnt);
printf("\n  son  =    %6d\n\n", sizeof son);

if (argc != 4) {
printf("Usage:lzhuf e(compression)|d(uncompression)"
" infile outfile\n");
return EXIT_FAILED;
}
if ((s = argv[1], s[1] || strpbrk(s, "DEde") == NULL)
   || (s = argv[2], (infile  = fopen(s, "rb")) == NULL)
   || (s = argv[3], (outfile = fopen(s, "wb")) == NULL)) {
printf("$@HHH(J %s\n", s);
return EXIT_FAILED;
}
fseek(infile, 0L, 2);
textsize = ftell(infile);
rewind(infile);
fprintf(stderr,"\nInput file size %ld", textsize);
inptr = malloc(textsize + 1000);
instart = inptr;
if (fread(inptr, textsize, 1, infile) < 1)
Error("Unable to read");  /* read size of original text */
outstart = malloc(textsize * 2);
outptr = outstart;
inlength = textsize;
Decode();
fwrite(outstart, textsize, 1, outfile);
fclose(infile);
fclose(outfile);
free(instart);
free(outstart);
return EXIT_OK;
}
#else
uncompress(in,out,len)
unsigned char *in, *out;
long len;
{
inptr = in;
outptr = out;
inlength = len;
Decode();
}
#endif

hdpt · 发表于 2004-10-31 22:08:43

/* $Id: cpu.h,v 3.8.4.3 1996/04/08 18:13:27 smackie Exp $
* $Source: /release/112/cvs/Xboot/cpu.h,v $
*------------------------------------------------------------------
* cpu.h -- define the cpu types and associated strings
*
* August 1986, Greg Satz
*
* Copyright (c) 1986-1996,97 by cisco Systems, Inc.
* All rights reserved.
*------------------------------------------------------------------
* $Log: cpu.h,v $
* Revision 3.8.4.3  1996/04/08  18:13:27  smackie
* Add new CPU types for LightStream and Grand Junction. (CSCdi53907)
* Branch: California_branch
*
* Revision 3.8.4.2  1996/04/05  02:41:42  yoko
* CSCdi53681:  add new cpu types
* Branch: California_branch
* define new cpu types and emt calls
*
* Revision 3.8.4.1  1996/03/26  18:24:35  enf
* CSCdi52111:  Need to reserve #defines for new platform
* Branch: California_branch
* Define CPU_VOLCANO
*
* Revision 3.8  1996/03/09  23:33:31  jturner
* CSCdi51191:  Make cpu type addition
* Grab cpu type for new platform development.
*
* Revision 3.7  1996/01/30  21:10:55  vandys
* CSCdi46080:  Deep six CS500 in source base
*
* Revision 3.6  1996/01/12  01:34:51  lcheung
* add new cpu type to arkansas
* CSCdi46793:  add new cpu type
*
* Revision 3.5  1995/12/31  23:25:04  anil
* i86 CPU
*
* Revision 3.4  1995/12/03  17:54:49  thille
* CSCdi44905:  ciscopro targets not in 11.1
* Put them in.
*
* Revision 3.3  1995/11/20  19:35:09  mbeesley
* CSCdi43065:  need to reserve cpu types for future development
*
* Revision 3.2  1995/11/17  07:40:58  hampton
* Remove old entries from the RCS header logs.
*
* Revision 3.1  1995/11/09  09:04:05  shaker
* Bump version numbers from 2.x to 3.x.
*
* Revision 2.4  1995/11/08  20:13:45  shaker
* Merge Arkansas_branch into 11.1 mainline.
*
* Revision 2.3  1995/10/20  00:53:57  ljiang
* CSCdi42394:  Add vendor codes for cisco partners
*
* Revision 2.2  1995/10/04  22:57:24  hampton
* Added a new define for an unknown processor family.  [CSCdi41098]
*
* Revision 2.1  1995/06/07  19:11:38  hampton
* Bump version numbers from 1.x to 2.x.
*
*------------------------------------------------------------------
* $Endlog$
*/

#define CPU_SMI8 0 /* never used -- predates cisco */
#define CPU_CADLINC 1 /* never used -- predates cisco */
#define CPU_SMI10 2 /* never used -- predates cisco */
#define CPU_FTI10 3 /* never used -- predates cisco */
#define CPU_CSC1 4 /* also called P20, 68000 @ 10MHz */
#define CPU_UNIX 5 /* we are a UNIX user mode process */
#define CPU_CSC2 6 /* also called PIPPIN, 68020 @ 12MHz */
#define CPU_MPU12 7 /* never used */
#define CPU_CSC3 8 /* 68020 @ 30 MHz */
#define CPU_STS1 9 /* 68010 in CMC Small Terminal Server */
#define CPU_PAN 10 /* IGS (was called Pancake, or HYBRIDGE II),
                                 16 MHz 68020 */
#define CPU_MERLOT 11 /* Merlot (Token ring IGS), 20 Mhz 68030 */
#define CPU_LEMONADE 12 /* Lemonade (16 line terminal server) (RIP) */
#define CPU_CSC4 13 /* 68EC040 @ 25 MHz */
#define CPU_XX    14 /* XX (the 4000), 40 Mhz 68030 */
#define CPU_IGS_BRUT 15 /* IGS-BRUT,68030 20 MHz, w/ no CPU memory */
#define CPU_RP1 16 /* 68EC040 @ 25 MHz */
#define CPU_BASS 17 /* Bass and Pinot */
#define CPU_CRISTAL 18 /* Cristal (3 port merlot) */
#define CPU_CANCUN 19 /* Cancun like Cristal with ASIC's and BRUT */
/* Timers */
#define CPU_SIERRA    20    /* The C4000 with the Orion chip (R4600) */
#define CPU_RSP 21 /* integrated route-switch processor */
#define CPU_SAPPHIRE 22    /* 68360 aka "QUICC chip" */
#define CPU_SYNALC 23 /* Synergy ATM Line Card (25MHz 68EC030) */
#define CPU_VIP 24 /* R4600 based IP running IOS */
#define CPU_C7100 25 /* Predator */
#define CPU_i86 26 /* Intel x86 */
#define CPU_RHINO    27    /* LS1010 ATM Switch*/
#define CPU_BRASIL    28    /* The AS5200, a Cancun superset. Define used */
                              /* only for Brasil family type creation. */
#define CPU_VOLCANO 29 /* 68360 (C100X) + Wan Module slot */
#define CPU_C3500    30    /* MARs */
#define CPU_NP1       31    /* LightStream NP1 - 25Mhz 68040 */
#define CPU_ASP       32    /* LightStream ASP - 75Mhz PowerPC 603 */
#define CPU_MALIBU    33    /* Grand Junction FE Switch - PowerPC 403 */
#define CPU_RINCON    34    /* StrataCom RINCON Access Switch - 33MHz
                                 MC68360 */
#define CPU_JANEIRO    35    /* AS5300, an access server router based on
                                 Sierra platform */
#define CPU_BFRP       36    /* BFR Route Processor */
#define CPU_BFLC       37    /* BFR Line Card */

#define NITRO          42    /* Dial Aggregation Cards - Nitro */

/****************************************************************
* if you add cpu types, please add entries in delay_table
* for spin wait delays in ../sys/os/delay_table.c, and ../boot/asm.S.
* and not to forget to add the string to cpu.c.
* and to the chassis MIB definitions and code as well
* thank you for your consideration.
****************************************************************/

#define CPU_UNKNOWN 43 /* LAST VALUE - unknown processor */

#define CPU_CISCOPRO_MASK 0x80 /* Mask CPU type for CiscoPro platforms
   to hide the CPU's true identity,
   but only for EMT_PROCTYPE calls */

/*
* CPU family defines.  As family grow please update the following list
*/

#define FAMILY_UNIX    CPU_UNIX
#define FAMILY_CSC2    CPU_CSC2
#define FAMILY_RP1    CPU_RP1
#define FAMILY_PAN    CPU_PAN
#define FAMILY_XX    CPU_XX
#define FAMILY_SIERRA CPU_SIERRA
#define FAMILY_RSP    CPU_RSP
#define FAMILY_C1000 CPU_SAPPHIRE
#define FAMILY_SYNALC CPU_SYNALC
#define FAMILY_VIP CPU_VIP
#define FAMILY_C7100 CPU_C7100
#define FAMILY_i86 CPU_i86
#define FAMILY_BRASIL CPU_BRASIL
#define FAMILY_VOLCANO CPU_VOLCANO
#define FAMILY_C3500 CPU_C3500
#define FAMILY_NP1    CPU_NP1
#define FAMILY_ASP    CPU_ASP
#define FAMILY_MALIBU CPU_MALIBU
#define FAMILY_JANEIRO  CPU_JANEIRO
#define FAMILY_UNKNOWN -1

/*
* VENDOR types defines.  As vendors grow, please update the following list
*/
#define VENDOR_CISCO 1
#define VENDOR_SYNOPTICS 2
#define VENDOR_CHIPCOM 3
#define VENDOR_CABLETRON 4
#define VENDOR_DEC             5
#define VENDOR_NCR 6
#define VENDOR_USROBOTICS    7
#define VENDOR_ALCATEL       8
#define VENDOR_NEC             9
#define VENDOR_DSC             10
#define VENDOR_MICROCOM       11
#define VENDOR_OKI             12
#define VENDOR_UBN             13
#define VENDOR_HP             14
#define VENDOR_MAX             15
/****************************************************************
* if you add a vendor, you will need to update chassisPartner in the Chassis
* MIB, enumerations must match, never change an enumeration, only add them.
* Mail to [email protected] for enumeration numbering assistant.
*
* Also, you'll need to add the vendor string to the les/init_les.c.
*/

#define IS_FAMILY(family) ((family) == cpu_family)

#define IS_CPU(cpu) ((cpu) == cpu_type)

#define IS_VENDOR(a) ((a) == cookie->vendor)

hdpt · 发表于 2004-10-31 22:10:14

就是cisco的IOS....11.2.8的代码..
如果需要我全部发上来..
有40多M.

suowei1979 · 发表于 2004-11-1 09:40:20

差不多吧

hdpt · 发表于 2004-11-2 01:50:25

那么可以移植吗?

		自动登录	找回密码
密码			注册