summaryrefslogtreecommitdiff
path: root/support/fribidixetex/src/fribidixetex-io.c
blob: 5d497162ed7bf1c3f1840765c5d6962ea5511f24 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
#include <fribidi/fribidi.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include "fribidixetex-io.h"

static char text_buffer[MAX_LINE_SIZE];
int io_line_number;

void io_init(void)
{
	io_line_number=0;
}

int io_read_line(FriBidiChar *text,int encoding,FILE *f)
{
	int len_char,len_uni;
	if(fgets(text_buffer,MAX_LINE_SIZE-1,f)==NULL) {
		return 0;
	}
	
	len_char=strlen(text_buffer);
	
	if(len_char==MAX_LINE_SIZE - 2) {
		fprintf(stderr,"Warning: line %d is too long\n",io_line_number+1);
	}
	if(len_char>0 && text_buffer[len_char-1]=='\n') {
		io_line_number++;
		text_buffer[len_char-1]=0;
		len_char--;
	}
	switch(encoding) {
		case ENC_ISO_8859_8:
			len_uni=fribidi_charset_to_unicode(FRIBIDI_CHAR_SET_ISO8859_8,text_buffer,len_char,text);
			text[len_uni]=0;
			break;
		case ENC_CP1255:
			len_uni=fribidi_charset_to_unicode(FRIBIDI_CHAR_SET_CP1255,text_buffer,len_char,text);
#if ( FRIBIDI_MAJOR_VERSION * 100 + FRIBIDI_MINOR_VERSION ) <= 10 // 0.10
			{
				int i;
				for(i=0;i<len_uni;i++) {
					if(text[i]==253 || text[i]==254)
						text[i] += (0x200E - 253);
				}
			}
#endif
			text[len_uni]=0;
			break;
		case ENC_UTF_8:
			if(len_char >= 3 && memcmp(text_buffer,"\xEF\xBB\xBF",3) == 0) {
				// remove BOM, support Win32 Notepad
				len_uni=fribidi_charset_to_unicode(FRIBIDI_CHAR_SET_UTF8,text_buffer+3,len_char-3,text);
			}
			else {
				len_uni=fribidi_charset_to_unicode(FRIBIDI_CHAR_SET_UTF8,text_buffer,len_char,text);
			}
			text[len_uni]=0;
			break;
		default:
			fprintf(stderr,"Internal error - wrong encoding\n");
			exit(1);
	}
	return 1;
}

void io_write_line(FriBidiChar *text,int encoding,FILE *f)
{
	int len,char_len,tmp_len;
	/* Find legth of buffer */
	for(len=0;text[len] && len<MAX_LINE_SIZE-1;len++) /* NOTHING */;
		
	if(len>=MAX_LINE_SIZE-1) {
		fprintf(stderr,"Internall error - unterminated line\n");
		exit(1);
	}
	
	if(encoding == ENC_ISO_8859_8) {
		char_len=fribidi_unicode_to_charset(FRIBIDI_CHAR_SET_ISO8859_8,text,len,text_buffer);
		text_buffer[char_len]=0;
		fprintf(f,"%s\n",text_buffer);
	}
	else if(encoding == ENC_CP1255) {
		char_len=fribidi_unicode_to_charset(FRIBIDI_CHAR_SET_CP1255,text,len,text_buffer);
		text_buffer[char_len]=0;
		fprintf(f,"%s\n",text_buffer);
	}
	else if(encoding == ENC_UTF_8) {
		while(len) {
			/* Because maybe |unicode| < |utf8| 
			 * in order to prevetn overflow */
			if(len>MAX_LINE_SIZE/8){
				tmp_len=MAX_LINE_SIZE/8;
			}
			else {
				tmp_len = len;
			}
			char_len=fribidi_unicode_to_charset(FRIBIDI_CHAR_SET_UTF8,text,tmp_len,text_buffer);
			text_buffer[char_len]=0;
			fprintf(f,"%s",text_buffer);
			len  -= tmp_len;
			text += tmp_len;
		}
		fprintf(f,"\n");
	}
	else {
		fprintf(stderr,"Internal error - wrong encoding\n");
		exit(1);
	}
}