rqr 0.1.0

data/ext/rqr/qr_draw_png.h

@@ -0,0 +1,28 @@
+#ifndef _QR_DRAW_PNG_
+#define _QR_DRAW_PNG_
+
+#include <stdlib.h>
+#include <math.h>
+#include "qr_draw.h"
+
+#ifdef USE_PNG
+	#include <png.h>
+#endif
+
+//=============================================================================
+// QRDrawPNG クラス
+//=============================================================================
+class QRDrawPNG : public QRDraw
+{
+	private:
+		int raster(unsigned char data[MAX_MODULESIZE][MAX_MODULESIZE]);
+		int write();
+	
+	public:
+		QRDrawPNG();
+		~QRDrawPNG();
+		int draw(char *filename, int modulesize, int symbolsize,
+                      unsigned char data[MAX_MODULESIZE][MAX_MODULESIZE], void *opt);
+};
+
+#endif

data/ext/rqr/qr_draw_ps.cpp

@@ -0,0 +1,240 @@
+#include "qr_draw_ps.h"
+
+//=================================================================================
+// QRDrawPS::QRDrawPS
+//=================================================================================
+QRDrawPS::QRDrawPS()
+{
+}
+
+//=============================================================================
+// QRDrawPS::draw
+//=============================================================================
+int QRDrawPS::draw(char *filename, int modulesize, int symbolsize, 
+					unsigned char data[MAX_MODULESIZE][MAX_MODULESIZE], void *opt)
+{
+	if(!filename) return(1);
+	setup(filename, modulesize, symbolsize);
+	
+	bool preview;
+	if(!opt){
+		preview = false;
+	}else{
+		preview = (bool)opt;
+	}
+	
+	if(preview){
+#ifdef USE_TIFF
+		return( this->write2(data) );
+#endif
+	}else{
+		return( this->write(data, "wb") );
+	}
+	
+	return(1);
+}
+
+//=============================================================================
+// QRDrawPS::write_preview_eps
+//=============================================================================
+int QRDrawPS::write2(unsigned char data[MAX_MODULESIZE][MAX_MODULESIZE])
+{
+#ifdef USE_TIFF
+	FILE *stream;
+	unsigned char lt[4];
+	struct stat st;
+	
+	if((stream=fopen(this->filename, "wb")) == NULL) return(1);
+
+	/* ダミーヘッダー書き込み */
+	this->write_header(stream);
+	
+	/* TIFF書き込み */
+	this->write_preview(stream, data);
+	fclose(stream);
+	
+	/* EPS書き込み */
+	this->write(data, "a");
+	
+	/* EPSサイズ算出 */
+	stat(this->filename, &st);
+	unsigned int esize = st.st_size - (this->tsize+30);
+	
+	/* ヘッダー書き換え */
+	if((stream=fopen(this->filename, "rb+")) == NULL) return(1);
+
+	/* PS開始位置 */
+	fseek(stream, 4, SEEK_SET);
+	this->littleEndian(30+this->tsize, lt);
+	fprintf(stream, "%c%c%c%c", lt[0], lt[1], lt[2], lt[3]);
+
+	/* PS長 */
+	fseek(stream, 8, SEEK_SET);
+	this->littleEndian(esize, lt);
+	fprintf(stream, "%c%c%c%c", lt[0], lt[1], lt[2], lt[3]);
+	
+	/* TIFFプレビュー長 */
+	fseek(stream, 24, SEEK_SET);
+	this->littleEndian(this->tsize, lt);
+	fprintf(stream, "%c%c%c%c", lt[0], lt[1], lt[2], lt[3]);
+	
+	fclose(stream);
+	
+	return(0);
+#else
+	return(1);
+#endif
+}
+
+//=============================================================================
+// QRDrawPS::write_header
+//=============================================================================
+void QRDrawPS::write_header(FILE *stream)
+{
+	unsigned char lt[4];
+	
+	/* ナミモニ */
+	fprintf(stream, "%c%c%c%c", 0xC5, 0xD0, 0xD3, 0xC6);
+	
+	/* PostScript開始位置 */
+	fprintf(stream, "%c%c%c%c", 0x00, 0x00, 0x00, 0x00);
+	
+	/* PostScript長さ */
+	fprintf(stream, "%c%c%c%c", 0x00, 0x00, 0x00, 0x00);
+
+	/* MetaFile */
+	fprintf(stream, "%c%c%c%c", 0x00, 0x00, 0x00, 0x00);
+	fprintf(stream, "%c%c%c%c", 0x00, 0x00, 0x00, 0x00);
+	
+	/* TIFFプレビュー開始位置 */
+	littleEndian(30, lt);
+	fprintf(stream, "%c%c%c%c", lt[0], lt[1], lt[2], lt[3]);
+	
+	/* TIFFプレビュー長 */
+	fprintf(stream, "%c%c%c%c", 0x00, 0x00, 0x00, 0x00);
+
+	/* チェックサム */
+	fprintf(stream, "%c%c", 0xff, 0xff);
+}
+
+//=================================================================================
+// littleEndian
+//=================================================================================
+void QRDrawPS::littleEndian(int data, unsigned char *lt)
+{
+	lt[0] =  data & 0x000000FF;
+	lt[1] = (data & 0x0000FF00) >> 8;
+	lt[2] = (data & 0x00FF0000) >> 16;
+	lt[3] = (data & 0xFF000000) >> 24;
+}
+
+//=============================================================================
+// QRDrawPS::write_preview
+//=============================================================================
+int QRDrawPS::write_preview(FILE *stream, unsigned char data[MAX_MODULESIZE][MAX_MODULESIZE])
+{
+#ifdef USE_TIFF
+	FILE *t;
+	char tmp[L_tmpnam];
+	QRDrawTIFF tif;
+	unsigned char *p;
+	
+	tmpnam(tmp);
+	if( tif.draw(tmp, this->msize, this->ssize, data, NULL) ) return(1);
+	
+	/* TIFFをオープンしてファイルサイズを取得する */
+	if((t=fopen(tmp, "rb")) == NULL){
+		remove(tmp);
+		return(1);
+	}
+	fseek(t, 0, SEEK_END);
+	this->tsize = ftell(t);
+	fseek(t, 0, SEEK_SET);
+
+	/* TIFF本体の書き込み */
+	p = (unsigned char *)malloc(this->tsize);
+	fread(p, 1, this->tsize, t);
+	fwrite(p, 1, this->tsize, stream);
+	
+	free(p);
+	fclose(t);
+	remove(tmp);
+	
+	return(0);
+#else
+	return(1);
+#endif
+}
+
+//=============================================================================
+// QRDrawPS::write_eps
+//=============================================================================
+int QRDrawPS::write(unsigned char data[MAX_MODULESIZE][MAX_MODULESIZE], char *mode)
+{
+	FILE *stream;
+	int i, j;
+	time_t mytime;
+	struct tm *lt;
+
+	if((stream=fopen(this->filename, mode)) == NULL) return(1);
+
+	fprintf(stream, "%%!PS-Adobe-3.0 EPSF-3.0\n");
+	fprintf(stream, "%%%%Creator: kei-soe\n");
+	fprintf(stream, "%%%%Title: %s\n", this->filename);
+	
+	time(&mytime);
+	lt = localtime(&mytime);
+	fprintf(stream, "%%%%CreationDate: %04d:%02d:%02d %02d:%02d:%02d\n", 
+								lt->tm_year+1900, lt->tm_mon+1, lt->tm_mday,
+								lt->tm_hour, lt->tm_min, lt->tm_sec);
+	fprintf(stream, "%%%%BoundingBox: 0 0 %d %d\n", this->rsize, this->rsize);
+	fprintf(stream, "%%%%HiResBoundingBox: 0 0 %d %d\n", this->rsize, this->rsize);
+	fprintf(stream, "%%%%DocumentProcessColors: Cyan Magenta Yellow Black\n");
+	fprintf(stream, "%%%%EndComments\n");
+	fprintf(stream, "%%%%BeginProlog\n");
+	fprintf(stream, "%%%%EndProlog\n");
+	fprintf(stream, "%%%%BeginSetup\n");
+	fprintf(stream, "%%%%EndSetup\n");
+	
+	fprintf(stream, "/size %d def\n", this->ssize);
+	fprintf(stream, "/margin %d def\n", MARGIN_SIZE);
+	fprintf(stream, "gsave\n");
+	fprintf(stream, "%d %d scale\n", this->msize, this->msize);
+	fprintf(stream, "newpath\n");
+	fprintf(stream, "0 0 moveto\n");
+	fprintf(stream, "0 size margin 2 mul add rlineto\n");
+	fprintf(stream, "size margin 2 mul add 0 rlineto\n");
+	fprintf(stream, "0 size margin 2 mul add neg rlineto\n");
+	fprintf(stream, "closepath\n");
+	fprintf(stream, "1 setgray\n");
+	fprintf(stream, "fill\n");
+	
+	// ドット描画
+	for(i=0; i<this->ssize; i++){
+		for(j=0; j<this->ssize; j++) fprintf(stream, "%d ", data[j][i]);
+		fprintf(stream, "\n");
+	}
+
+	fprintf(stream, "margin margin translate\n");
+	fprintf(stream, "0 setgray\n");
+	fprintf(stream, "1 1 size {\n");
+	fprintf(stream, "/ypos exch def\n");
+	fprintf(stream, "size -1 1 {\n");
+	fprintf(stream, "/xpos exch def\n");
+	fprintf(stream, "1 eq {\n");
+	fprintf(stream, "newpath\n");
+	fprintf(stream, "xpos ypos moveto\n");
+	fprintf(stream, "0 -1 rlineto\n");
+	fprintf(stream, "-1 0 rlineto\n");
+	fprintf(stream, "0 1 rlineto\n");
+	fprintf(stream, "closepath\n");
+	fprintf(stream, "fill\n");
+	fprintf(stream, "} if\n");
+	fprintf(stream, "} for\n");
+	fprintf(stream, "} for\n");
+	fprintf(stream, "grestore\n");
+
+	fclose(stream);
+
+	return(0);
+}

data/ext/rqr/qr_draw_ps.h

@@ -0,0 +1,36 @@
+#ifndef _QR_DRAW_PS_
+#define _QR_DRAW_PS_
+
+#include <time.h>
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <stdlib.h>
+#include <stdio.h>
+#include "qr_draw.h"
+
+#ifdef USE_TIFF
+	#include "qr_draw_tiff.h"
+#endif
+
+//=============================================================================
+// QRDrawPS クラス
+//=============================================================================
+class QRDrawPS : public QRDraw
+{
+	private:
+		unsigned int tsize;
+		
+	private:
+		int write(unsigned char data[MAX_MODULESIZE][MAX_MODULESIZE], char *mode);	//normal ps
+		int write2(unsigned char data[MAX_MODULESIZE][MAX_MODULESIZE]);	//preview ps
+		void write_header(FILE *stream);
+		int write_preview(FILE *stream, unsigned char data[MAX_MODULESIZE][MAX_MODULESIZE]);
+		void littleEndian(int data, unsigned char *lt);
+		
+	public:
+		QRDrawPS();
+		int draw(char *filename, int modulesize, int symbolsize, 
+							unsigned char data[MAX_MODULESIZE][MAX_MODULESIZE], void *opt);
+};
+
+#endif

data/ext/rqr/qr_draw_tiff.cpp

@@ -0,0 +1,135 @@
+#include "qr_draw_tiff.h"
+
+//=================================================================================
+// QRDrawPNG::QRDrawPNG
+//=================================================================================
+QRDrawTIFF::QRDrawTIFF()
+{
+#ifdef USE_TIFF
+	bit_image  = NULL;
+#endif
+}
+
+//=================================================================================
+// QRDrawTIFF::~QRDrawTIFF
+//=================================================================================
+QRDrawTIFF::~QRDrawTIFF()
+{
+#ifdef USE_TIFF
+	int i;
+	
+	if(bit_image){
+		for(i=0; i<this->rsize; i++){
+			free(bit_image[i]);
+		}
+		free(bit_image);
+	}
+#endif
+}
+
+//=============================================================================
+// QRDrawPNG::draw
+//=============================================================================
+int QRDrawTIFF::draw(char *filename, int modulesize, int symbolsize,
+						unsigned char data[MAX_MODULESIZE][MAX_MODULESIZE], void *opt)
+{
+#ifdef USE_TIFF
+	if(!filename) return(1);
+	setup(filename, modulesize, symbolsize);
+	if( this->raster(data) )return(1);
+	if( this->write() ) return(1);
+	
+	return(0);
+#else
+	return(1);
+#endif
+}
+
+//=================================================================================
+// QRDrawTIFF::raster
+//=================================================================================
+int QRDrawTIFF::raster(unsigned char data[MAX_MODULESIZE][MAX_MODULESIZE])
+{
+#ifdef USE_TIFF
+	int bitw = (int)ceil(this->rsize/8) + 1;
+	
+	/* 実際にデータを置く領域を確保 */
+	bit_image = (unsigned char **)malloc(sizeof(unsigned char *) * this->rsize);
+	for(int i=0; i<this->rsize; i++){
+		bit_image[i] = (unsigned char *)malloc(bitw);
+		memset(bit_image[i], 0, bitw);
+	}
+
+	for(int i=0; i<this->ssize; i++){
+		int dp  = MARGIN_SIZE*this->msize / 8;			//横方向のバイト位置
+		int sht =(MARGIN_SIZE*this->msize % 8) ? 3 : 7;	//ビットシフト
+		unsigned char c = 0;							//1バイトの構成を保存
+
+		for(int j=0; j<this->ssize; j++){
+			/* 1行分生成 */
+			for(int k=0; k<this->msize; k++){
+				c += (data[j][i] << sht);
+				sht--;
+				
+				bit_image[(i+MARGIN_SIZE)*this->msize][ dp ] = c;
+				
+				if(sht < 0){
+					sht = 7;
+					c   = 0;
+					dp++;
+				}
+			}
+		}
+		/* モジュールサイズ分縦方向に増やす */
+		for(int k=1; k<this->msize; k++){
+			memcpy(bit_image[(i+MARGIN_SIZE)*this->msize+k], bit_image[(i+MARGIN_SIZE)*this->msize], bitw);
+		}
+	}
+
+	return(0);
+#else
+	return(1);
+#endif
+}
+
+//=================================================================================
+// QRDrawTIFF::write_png
+//=================================================================================
+int QRDrawTIFF::write()
+{
+#ifdef USE_TIFF
+	TIFF *tiff;
+	int  i;
+
+	/* Open the TIFF file */
+	if( (tiff=TIFFOpen(this->filename, "w")) == NULL ) return(1);
+
+	/* タグ */
+	TIFFSetField(tiff, TIFFTAG_IMAGEWIDTH, this->rsize);				/* 幅(ピクセル数) */
+	TIFFSetField(tiff, TIFFTAG_IMAGELENGTH, this->rsize);				/* 高(スキャンライン数) */
+	TIFFSetField(tiff, TIFFTAG_COMPRESSION, COMPRESSION_NONE);			/* 圧縮モード */
+	TIFFSetField(tiff, TIFFTAG_BITSPERSAMPLE, 1);						/* ピクセルの深さ */
+	TIFFSetField(tiff, TIFFTAG_PHOTOMETRIC, PHOTOMETRIC_MINISWHITE);	/* カラータイプ */
+	TIFFSetField(tiff, TIFFTAG_SAMPLESPERPIXEL, 1);						/* カラープレーン数 */
+	TIFFSetField(tiff, TIFFTAG_ORIENTATION, ORIENTATION_TOPLEFT);		/* スキャン方向 */
+	TIFFSetField(tiff, TIFFTAG_PLANARCONFIG, PLANARCONFIG_CONTIG);		/* ? */
+	TIFFSetField(tiff, TIFFTAG_XRESOLUTION, 72.0);						/* 解像度 */
+	TIFFSetField(tiff, TIFFTAG_YRESOLUTION, 72.0);						/* 解像度 */
+	TIFFSetField(tiff, TIFFTAG_RESOLUTIONUNIT, RESUNIT_INCH);			/* 解像度の単位(RESUNIT_INCH:インチ) */
+	TIFFSetField(tiff, TIFFTAG_ROWSPERSTRIP, this->rsize);				/* 1ストリップに何行格納されるか */
+	
+	/* 1行ずつ書き込み */
+	for(i=0 ; i<this->rsize ; i++){
+		if( TIFFWriteScanline(tiff, bit_image[i], i, 0) < 0 ){
+			TIFFClose(tiff);
+			return(1);
+		}
+	}
+
+	TIFFClose(tiff);
+
+	return(0);
+#else
+	return(1);
+#endif
+}

data/ext/rqr/qr_draw_tiff.h

@@ -0,0 +1,29 @@
+#ifndef _QR_DRAW_TIFF_
+#define _QR_DRAW_TIFF_
+
+#include <stdlib.h>
+#include <string.h>
+#include <math.h>
+#include "qr_draw.h"
+
+#ifdef USE_TIFF
+	#include <tiffio.h>
+#endif
+
+//=============================================================================
+// QRDrawTIFF クラス
+//=============================================================================
+class QRDrawTIFF : public QRDraw
+{
+	private:
+		int raster(unsigned char data[MAX_MODULESIZE][MAX_MODULESIZE]);
+		int write();
+		
+	public:
+		QRDrawTIFF();
+		~QRDrawTIFF();
+		int draw(char *filename, int modulesize, int symbolsize,
+                      unsigned char data[MAX_MODULESIZE][MAX_MODULESIZE], void *opt);
+};
+
+#endif