nishiTV/sj3
1
0
Fork 0
Code Pull requests Activity

Format source code

Browse source
This commit is contained in:
Nishi 2026-06-18 13:40:14 +09:00
commit d0be6165c0
165 changed files with 30306 additions and 33687 deletions
Download patch file Download diff file Expand all files Collapse all files

267
sjrc.c
View file

@ -1,6 +1,6 @@
/*
* Copyright (c) 1991-1994 Sony Corporation
*
*
* Permission is hereby granted, free of charge, to any person obtaining
* a copy of this software and associated documentation files (the
* "Software"), to deal in the Software without restriction, including
@ -8,10 +8,10 @@
* distribute, sublicense, and/or sell copies of the Software, and to
* permit persons to whom the Software is furnished to do so, subject to
* the following conditions:
*
*
* The above copyright notice and this permission notice shall be
* included in all copies or substantial portions of the Software.
*
*
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
* EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
* MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
@ -19,7 +19,7 @@
* DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR
* OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR
* THE USE OR OTHER DEALINGS IN THE SOFTWARE.
*
*
* Except as contained in this notice, the name of Sony Corporation
* shall not be used in advertising or otherwise to promote the sale, use
* or other dealings in this Software without prior written authorization
@ -28,14 +28,11 @@
*/
/*
* $SonyRCSfile: sjrc.c,v $
* $SonyRevision: 1.3 $
* $SonyRCSfile: sjrc.c,v $
* $SonyRevision: 1.3 $
* $SonyDate: 1997/01/23 11:26:31 $
*/
#include <string.h>
#include <stdio.h>
#include <locale.h>
@ -45,96 +42,89 @@
#include "sjtool.h"
struct wordent {
char word_str[MAXWORD];
};
extern char home_dir[];
extern char term_name[];
char RCfile[LONGLENGTH];
static char *rcfile = ".sjrc";
static int user_euc = 0;
static int file_code = SYS_SJIS;
void setrc();
int set_dict(), set_server();
struct functbl {
char *keyword;
int (*func)();
} funcs[] = {
{"dictionary", set_dict},
{"userdic", set_dict},
{"server", set_server},
{NULL, NULL}
char word_str[MAXWORD];
};
#define TOLOWER(c) (isupper(c) ? tolower(c) : (c))
extern char home_dir[];
extern char term_name[];
int
sjset_code()
{
char *loc;
char RCfile[LONGLENGTH];
#ifdef LACKOF_SETLOCALE
loc = getenv("LANG");
static char* rcfile = ".sjrc";
static int user_euc = 0;
static int file_code = SYS_SJIS;
void setrc();
int set_dict(), set_server();
struct functbl {
char* keyword;
int (*func)();
} funcs[] = {
{"dictionary", set_dict},
{"userdic", set_dict},
{"server", set_server},
{NULL, NULL}};
#define TOLOWER(c) (isupper(c) ? tolower(c) : (c))
int sjset_code() {
char* loc;
#ifdef LACKOF_SETLOCALE
loc = getenv("LANG");
#else
loc = setlocale(LC_CTYPE, "");
#endif
if (!loc) {
if(!loc) {
fprintf(stderr, "Error: can't get current locale\n");
exit(1);
}
if (strncmp(loc, "ja_JP.SJIS", 10) == 0) {
if(strncmp(loc, "ja_JP.SJIS", 10) == 0) {
user_euc = 0;
} else if (strncmp(loc, "ja", 2) == 0 ||
strncmp(loc, "Ja", 2) == 0) {
user_euc = 1;
} else if(strncmp(loc, "ja", 2) == 0 ||
strncmp(loc, "Ja", 2) == 0) {
user_euc = 1;
file_code = -1;
} else
} else
#ifdef __sony_news
return 0;
return 0;
#else
{
fprintf(stderr, "Warrning: In this locale japanese will not be used.\n");
user_euc = 1;
file_code = -1;
}
{
fprintf(stderr, "Warrning: In this locale japanese will not be used.\n");
user_euc = 1;
file_code = -1;
}
#endif
return 1;
}
int
getsjrc ()
{
FILE *fd;
char *p;
int getsjrc() {
FILE* fd;
char* p;
sjset_code();
RCfile[0] = '\0';
if ((p = getenv("SJRC")) != NULL && *p != '\0') {
if (*p != '/') {
if((p = getenv("SJRC")) != NULL && *p != '\0') {
if(*p != '/') {
strcpy(RCfile, home_dir);
strcat(RCfile, "/");
}
strcat(RCfile, p);
if ((fd = fopen (RCfile, "r")) != NULL) {
setrc (RCfile, fd);
fclose (fd);
if((fd = fopen(RCfile, "r")) != NULL) {
setrc(RCfile, fd);
fclose(fd);
return TRUE;
}
}
if (home_dir[0] != '\0') {
}
if(home_dir[0] != '\0') {
strcpy(RCfile, home_dir);
strcat(RCfile, "/");
strcat(RCfile, rcfile);
if ((fd = fopen (RCfile, "r")) != NULL) {
setrc (RCfile, fd);
fclose (fd);
if((fd = fopen(RCfile, "r")) != NULL) {
setrc(RCfile, fd);
fclose(fd);
return TRUE;
}
}
@ -142,81 +132,76 @@ getsjrc ()
return FALSE;
}
void
setrc (file, fd)
char *file;
FILE *fd;
setrc(file, fd) char* file;
FILE* fd;
{
char line[MAXLINE];
int w;
struct wordent word[WORDN];
char *p;
struct functbl *functp;
int w;
struct wordent word[WORDN];
char* p;
struct functbl* functp;
while ((p = fgets (line, MAXLINE, fd)) != NULL) {
if ((w = getword(line, word)) <= 0)
while((p = fgets(line, MAXLINE, fd)) != NULL) {
if((w = getword(line, word)) <= 0)
continue;
functp = funcs;
p = word[0].word_str;
while (functp->keyword != NULL) {
if (much(p, functp->keyword)) {
if (functp->func) (*(functp->func))(word);
break;;
p = word[0].word_str;
while(functp->keyword != NULL) {
if(much(p, functp->keyword)) {
if(functp->func) (*(functp->func))(word);
break;
;
}
functp++;
}
}
}
int
much(s1, s2)
int much(s1, s2)
char *s1, *s2;
{
char c1, c2;
if (s1 == NULL)
if(s1 == NULL)
return 0;
while (*s2 != '\0') {
while(*s2 != '\0') {
c1 = *s1++;
c2 = *s2++;
if (TOLOWER(c1) != TOLOWER(c2))
if(TOLOWER(c1) != TOLOWER(c2))
return 0;
}
return 1;
}
int
getword (s, word)
char *s;
struct wordent word[];
int getword(s, word)
char* s;
struct wordent word[];
{
unsigned char c, cc;
char *p;
int i, wcount;
unsigned char c, cc;
char* p;
int i, wcount;
if (IsDelimitor(*s)) {
if(IsDelimitor(*s)) {
s++;
} else {
p = s;
while(!IsDelimitor(*s)) {
if (IsTerminator(*s) || isTerminator(*s))
if(IsTerminator(*s) || isTerminator(*s))
break;
s++;
}
*s++ = '\0';
if (much(p, term_name) == 0)
if(much(p, term_name) == 0)
return 0;
}
i = wcount = 0;
p = word[wcount].word_str;
while (*s != '\0') {
p = word[wcount].word_str;
while(*s != '\0') {
c = *s++;
if (file_code == SYS_SJIS) {
if (issjis1(c) && issjis2(*s)) {
if (i < MAXWORD - 2) {
if(file_code == SYS_SJIS) {
if(issjis1(c) && issjis2(*s)) {
if(i < MAXWORD - 2) {
*p++ = c;
*p++ = *s;
i += 2;
@ -224,98 +209,92 @@ struct wordent word[];
s++;
continue;
}
} else if (file_code == SYS_EUC) {
if (iseuc(c) && iseuc(*s)) {
if (i < MAXWORD - 2) {
cc = (c << 8) + (*s & 0xff);
cc = euc2sjis(cc);
} else if(file_code == SYS_EUC) {
if(iseuc(c) && iseuc(*s)) {
if(i < MAXWORD - 2) {
cc = (c << 8) + (*s & 0xff);
cc = euc2sjis(cc);
*p++ = (cc >> 8) & 0xff;
*p++ = cc & 0xff;
i += 2;
}
s++;
continue;
}
if (iseuckana(c) && iskana2(*s))
}
if(iseuckana(c) && iskana2(*s))
c = *s++;
} else {
if (issjis1(c) && issjis2(*s)) {
if(issjis1(c) && issjis2(*s)) {
file_code = SYS_SJIS;
s--;
continue;
}
if ((iseuc(c) && iseuc(*s)) ||
(iseuckana(c) && iskana2(*s))) {
if((iseuc(c) && iseuc(*s)) ||
(iseuckana(c) && iskana2(*s))) {
file_code = SYS_EUC;
s--;
continue;
}
}
if (isTerminator(c))
if(isTerminator(c))
break;
if (IsDelimitor(c)) {
if (i > 0) {
if (++wcount >= WORDN - 1)
if(IsDelimitor(c)) {
if(i > 0) {
if(++wcount >= WORDN - 1)
break;
*p = '\0';
i = 0;
p = word[wcount].word_str;
i = 0;
p = word[wcount].word_str;
}
continue;
}
if (IsEscape(c))
if(IsEscape(c))
c = *s++;
if (IsTerminator(c))
if(IsTerminator(c))
break;
if (i < MAXWORD - 1) {
if(i < MAXWORD - 1) {
*p++ = c;
i++;
}
}
*p = '\0';
if (word[wcount].word_str[0] != '\0')
if(word[wcount].word_str[0] != '\0')
word[++wcount].word_str[0] = '\0';
return wcount;
}
int
IsTerminator (c)
unsigned char c;
int IsTerminator(c)
unsigned char c;
{
return (c == '\n') ? 1 : 0;
}
int
isTerminator (c)
unsigned char c;
int isTerminator(c)
unsigned char c;
{
return (c == '#') ? 1 : 0;
}
int
IsEscape (c)
unsigned char c;
int IsEscape(c)
unsigned char c;
{
return (c == '\\') ? 1 : 0;
}
int
IsDelimitor (c)
unsigned char c;
int IsDelimitor(c)
unsigned char c;
{
return (c == ' ' || c == '\t' || c == '.') ? 1 : 0;
}
int
set_dict (word)
struct wordent word[];
int set_dict(word)
struct wordent word[];
{
setdicname(word[1].word_str);
}
int
set_server(word)
struct wordent word[];
int set_server(word)
struct wordent word[];
{
setsjserv(word[1].word_str);
}