mirror of
https://github.com/Interlisp/maiko.git
synced 2026-01-28 12:39:28 +00:00
Reformat all C source files with Clang-format in Google style w/ 100 col width.
This commit is contained in:
Nick Briggs
251
src/codeconv.c
Executable file → Normal file
251
src/codeconv.c
Executable file → Normal file
@@ -1,8 +1,7 @@
|
||||
/* $Id: codeconv.c,v 1.3 1999/05/31 23:35:26 sybalsky Exp $ (C) Copyright Venue, All Rights Reserved */
|
||||
/* $Id: codeconv.c,v 1.3 1999/05/31 23:35:26 sybalsky Exp $ (C) Copyright Venue, All Rights Reserved
|
||||
*/
|
||||
static char *id = "$Id: codeconv.c,v 1.3 1999/05/31 23:35:26 sybalsky Exp $ Copyright (C) Venue";
|
||||
|
||||
|
||||
|
||||
/************************************************************************/
|
||||
/* */
|
||||
/* (C) Copyright 1989-95 Venue. All Rights Reserved. */
|
||||
@@ -17,7 +16,6 @@ static char *id = "$Id: codeconv.c,v 1.3 1999/05/31 23:35:26 sybalsky Exp $ Copy
|
||||
|
||||
#include "version.h"
|
||||
|
||||
|
||||
/*************************************************/
|
||||
/* NSFatchar string <-> EUC character string */
|
||||
/* conversion program */
|
||||
@@ -32,179 +30,164 @@ static char *id = "$Id: codeconv.c,v 1.3 1999/05/31 23:35:26 sybalsky Exp $ Copy
|
||||
|
||||
#include <stdio.h>
|
||||
|
||||
#define EUCMASK 0x80
|
||||
#define EUCUNMASK 0x7F
|
||||
#define MASK8BIT 0x00FF
|
||||
#define TABLESIZE 256
|
||||
#define EUCMASK 0x80
|
||||
#define EUCUNMASK 0x7F
|
||||
#define MASK8BIT 0x00FF
|
||||
#define TABLESIZE 256
|
||||
|
||||
int
|
||||
FatcharNStoEUC(unsigned char *ns_ptr, int ns_len, unsigned char *euc_ptr)
|
||||
{
|
||||
int i;
|
||||
int euc_len;
|
||||
unsigned short ns, euc;
|
||||
unsigned short ns_euc(short unsigned int ns);
|
||||
int FatcharNStoEUC(unsigned char *ns_ptr, int ns_len, unsigned char *euc_ptr) {
|
||||
int i;
|
||||
int euc_len;
|
||||
unsigned short ns, euc;
|
||||
unsigned short ns_euc(short unsigned int ns);
|
||||
|
||||
#ifdef DEBUG
|
||||
unsigned char *ptr;
|
||||
ptr = euc_ptr;
|
||||
printf("FatcharNStoEUC start\n");
|
||||
printf("ns_len = %d\n", ns_len);
|
||||
for (i = 0; i < ns_len*2; i++)
|
||||
printf("%x ", ns_ptr[i]);
|
||||
printf("\n");
|
||||
unsigned char *ptr;
|
||||
ptr = euc_ptr;
|
||||
printf("FatcharNStoEUC start\n");
|
||||
printf("ns_len = %d\n", ns_len);
|
||||
for (i = 0; i < ns_len * 2; i++) printf("%x ", ns_ptr[i]);
|
||||
printf("\n");
|
||||
#endif
|
||||
|
||||
/* ns_len convert to byte count */
|
||||
ns_len *= 2;
|
||||
/* ns_len convert to byte count */
|
||||
ns_len *= 2;
|
||||
|
||||
for (i = euc_len = 0; i < ns_len; i += 2) {
|
||||
ns = *ns_ptr++ * TABLESIZE;
|
||||
ns += *ns_ptr++;
|
||||
euc = ns_euc(ns);
|
||||
if (euc / TABLESIZE) {
|
||||
/* 16 bit charactor */
|
||||
*euc_ptr++ = euc / TABLESIZE;
|
||||
*euc_ptr++ = euc % TABLESIZE;
|
||||
euc_len += 2;
|
||||
} else {
|
||||
/* ASCII charactor */
|
||||
*euc_ptr++ = euc % TABLESIZE;
|
||||
++euc_len;
|
||||
}
|
||||
}
|
||||
for (i = euc_len = 0; i < ns_len; i += 2) {
|
||||
ns = *ns_ptr++ * TABLESIZE;
|
||||
ns += *ns_ptr++;
|
||||
euc = ns_euc(ns);
|
||||
if (euc / TABLESIZE) {
|
||||
/* 16 bit charactor */
|
||||
*euc_ptr++ = euc / TABLESIZE;
|
||||
*euc_ptr++ = euc % TABLESIZE;
|
||||
euc_len += 2;
|
||||
} else {
|
||||
/* ASCII charactor */
|
||||
*euc_ptr++ = euc % TABLESIZE;
|
||||
++euc_len;
|
||||
}
|
||||
}
|
||||
|
||||
*euc_ptr++ = '\0';
|
||||
*euc_ptr++ = '\0';
|
||||
|
||||
#ifdef DEBUG
|
||||
printf("FatcharNStoEUC end\n");
|
||||
printf("euc_len = %d\n", euc_len);
|
||||
for (i = 0; i < euc_len; i++)
|
||||
printf("%x ", ptr[i]);
|
||||
printf("\n");
|
||||
printf("FatcharNStoEUC end\n");
|
||||
printf("euc_len = %d\n", euc_len);
|
||||
for (i = 0; i < euc_len; i++) printf("%x ", ptr[i]);
|
||||
printf("\n");
|
||||
#endif
|
||||
|
||||
return (euc_len);
|
||||
return (euc_len);
|
||||
}
|
||||
|
||||
int
|
||||
ThincharNStoEUC(unsigned char *ns_ptr, int ns_len, unsigned char *euc_ptr)
|
||||
{
|
||||
int i;
|
||||
int euc_len = 0;
|
||||
unsigned short ns, euc;
|
||||
unsigned short ns_euc(short unsigned int ns);
|
||||
int ThincharNStoEUC(unsigned char *ns_ptr, int ns_len, unsigned char *euc_ptr) {
|
||||
int i;
|
||||
int euc_len = 0;
|
||||
unsigned short ns, euc;
|
||||
unsigned short ns_euc(short unsigned int ns);
|
||||
|
||||
#ifdef DEBUG
|
||||
unsigned char *ptr;
|
||||
ptr = euc_ptr;
|
||||
printf("ThincharNStoEUC start\n");
|
||||
printf("ns_len = %d\n", ns_len);
|
||||
for (i = 0; i < ns_len; i++)
|
||||
printf("%x ", ns_ptr[i]);
|
||||
printf("\n");
|
||||
unsigned char *ptr;
|
||||
ptr = euc_ptr;
|
||||
printf("ThincharNStoEUC start\n");
|
||||
printf("ns_len = %d\n", ns_len);
|
||||
for (i = 0; i < ns_len; i++) printf("%x ", ns_ptr[i]);
|
||||
printf("\n");
|
||||
#endif
|
||||
|
||||
/* ns_len convert to byte count */
|
||||
for (i = euc_len = 0; i < ns_len; i++) {
|
||||
ns = *ns_ptr++;
|
||||
euc = ns_euc(ns);
|
||||
if (euc / TABLESIZE) {
|
||||
/* 16 bit charactor */
|
||||
*euc_ptr++ = euc / TABLESIZE;
|
||||
*euc_ptr++ = euc % TABLESIZE;
|
||||
euc_len += 2;
|
||||
} else {
|
||||
/* ASCII charactor */
|
||||
*euc_ptr++ = euc % TABLESIZE;
|
||||
++euc_len;
|
||||
}
|
||||
}
|
||||
/* ns_len convert to byte count */
|
||||
for (i = euc_len = 0; i < ns_len; i++) {
|
||||
ns = *ns_ptr++;
|
||||
euc = ns_euc(ns);
|
||||
if (euc / TABLESIZE) {
|
||||
/* 16 bit charactor */
|
||||
*euc_ptr++ = euc / TABLESIZE;
|
||||
*euc_ptr++ = euc % TABLESIZE;
|
||||
euc_len += 2;
|
||||
} else {
|
||||
/* ASCII charactor */
|
||||
*euc_ptr++ = euc % TABLESIZE;
|
||||
++euc_len;
|
||||
}
|
||||
}
|
||||
|
||||
*euc_ptr++ = '\0';
|
||||
*euc_ptr++ = '\0';
|
||||
|
||||
#ifdef DEBUG
|
||||
printf("ThincharNStoEUC end\n");
|
||||
printf("euc_len = %d\n", euc_len);
|
||||
for (i = 0; i < euc_len; i++)
|
||||
printf("%x ", ptr[i]);
|
||||
printf("\n");
|
||||
printf("ThincharNStoEUC end\n");
|
||||
printf("euc_len = %d\n", euc_len);
|
||||
for (i = 0; i < euc_len; i++) printf("%x ", ptr[i]);
|
||||
printf("\n");
|
||||
#endif
|
||||
|
||||
return (euc_len);
|
||||
return (euc_len);
|
||||
}
|
||||
|
||||
int
|
||||
EUCtoFatcharNS(unsigned char *euc_ptr, unsigned char *ns_ptr)
|
||||
{
|
||||
int i;
|
||||
int ns_len;
|
||||
unsigned short euc, ns;
|
||||
unsigned short euc_ns(short unsigned int euc);
|
||||
int EUCtoFatcharNS(unsigned char *euc_ptr, unsigned char *ns_ptr) {
|
||||
int i;
|
||||
int ns_len;
|
||||
unsigned short euc, ns;
|
||||
unsigned short euc_ns(short unsigned int euc);
|
||||
|
||||
#ifdef DEBUG
|
||||
printf("EUCtoFatcharNS start\n");
|
||||
for (i = 0; i < strlen(euc_ptr); i++)
|
||||
printf("%x ", euc_ptr[i]);
|
||||
printf("\n");
|
||||
printf("EUCtoFatcharNS start\n");
|
||||
for (i = 0; i < strlen(euc_ptr); i++) printf("%x ", euc_ptr[i]);
|
||||
printf("\n");
|
||||
#endif
|
||||
|
||||
i = 0;
|
||||
while (euc = *euc_ptr++) {
|
||||
if (euc & EUCMASK) {
|
||||
/* 16 bit charactor */
|
||||
euc *= TABLESIZE;
|
||||
euc += *euc_ptr++;
|
||||
}
|
||||
i = 0;
|
||||
while (euc = *euc_ptr++) {
|
||||
if (euc & EUCMASK) {
|
||||
/* 16 bit charactor */
|
||||
euc *= TABLESIZE;
|
||||
euc += *euc_ptr++;
|
||||
}
|
||||
|
||||
ns = euc_ns(euc);
|
||||
ns = euc_ns(euc);
|
||||
|
||||
ns_ptr[i++] = ns / TABLESIZE;
|
||||
ns_ptr[i++] = ns % TABLESIZE;
|
||||
}
|
||||
ns_len = i / 2;
|
||||
ns_ptr[i++] = ns / TABLESIZE;
|
||||
ns_ptr[i++] = ns % TABLESIZE;
|
||||
}
|
||||
ns_len = i / 2;
|
||||
|
||||
#ifdef DEBUG
|
||||
printf("EUCtoFatcharNS end\n");
|
||||
printf("ns_len = %d\n", ns_len);
|
||||
for (i = 0; i < ns_len*2; i++)
|
||||
printf("%x ", ns_ptr[i]);
|
||||
printf("\n");
|
||||
printf("EUCtoFatcharNS end\n");
|
||||
printf("ns_len = %d\n", ns_len);
|
||||
for (i = 0; i < ns_len * 2; i++) printf("%x ", ns_ptr[i]);
|
||||
printf("\n");
|
||||
#endif
|
||||
|
||||
return (ns_len);
|
||||
return (ns_len);
|
||||
}
|
||||
|
||||
int
|
||||
EUCstrlen(char *euc_ptr)
|
||||
{
|
||||
int len = 0;
|
||||
int EUCstrlen(char *euc_ptr) {
|
||||
int len = 0;
|
||||
|
||||
#ifdef DEBUG
|
||||
int i;
|
||||
int i;
|
||||
|
||||
printf("EUCstrlen start\n");
|
||||
for (i = 0; i < strlen(euc_ptr); i++)
|
||||
printf("%x ", euc_ptr[i]);
|
||||
printf("\n");
|
||||
printf("EUCstrlen start\n");
|
||||
for (i = 0; i < strlen(euc_ptr); i++) printf("%x ", euc_ptr[i]);
|
||||
printf("\n");
|
||||
#endif
|
||||
|
||||
while (*euc_ptr)
|
||||
if (*euc_ptr & EUCMASK) {
|
||||
/* 16 bit charactor */
|
||||
len += 2;
|
||||
*euc_ptr++;
|
||||
*euc_ptr++;
|
||||
} else {
|
||||
/* ASCII charactor */
|
||||
len++;
|
||||
*euc_ptr++;
|
||||
}
|
||||
while (*euc_ptr)
|
||||
if (*euc_ptr & EUCMASK) {
|
||||
/* 16 bit charactor */
|
||||
len += 2;
|
||||
*euc_ptr++;
|
||||
*euc_ptr++;
|
||||
} else {
|
||||
/* ASCII charactor */
|
||||
len++;
|
||||
*euc_ptr++;
|
||||
}
|
||||
|
||||
#ifdef DEBUG
|
||||
printf("EUCstrlen end\n");
|
||||
printf("len = %d\n", len);
|
||||
printf("EUCstrlen end\n");
|
||||
printf("len = %d\n", len);
|
||||
#endif
|
||||
|
||||
return (len);
|
||||
return (len);
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user