/********************************************************************/          
/*   TESTICONV : iconv による Unicode 変換テスト                    */          
/*                                                                  */          
/*   CRTCMOD QTEMP/TESTICONV SRCFILE(MYSRCLIB/QCSRC) AUT(*ALL)      */          
/*   CRTPGM MYLIB/TESTICONV  MODULE(QTEMP/TESTICONV)                */          
/*          BNDSRVPGM(QSYS/QTQICONV) ACTGRP(*NEW) AUT(*ALL)         */          
/********************************************************************/          
#include <stdio.h>                                                              
#include <stdlib.h>                                                             
#include <string.h>                                                             
#include <qtqiconv.h>                                                           
#include <errno.h>                                                              
                                                                                
#define TRUE         0                                                          
#define FALSE       -1                                                          
#define UTF8      1208                                                          
void main(void){                                                                
  char ebcbuf[128], unibuf[128];                                                
  iconv_t cd;                                                                   
  QtqCode_T fromcode, tocode;                                                   
  size_t inbyte, outbyte, rtnbyte;                                              
  char* source, *target;                                                        
  int  i, len;                                                                  
                                                                                
  printf("** TESTICONV : iconv による Unicode 変換テスト **\n");                
  getchar();                                                                    
  printf("size of cd = %d\n", sizeof(cd));                                      
  memset(&fromcode, 0, sizeof(fromcode));                                       
  memset(&tocode, 0, sizeof(tocode));                                           
  fromcode.CCSID = 5026;                                                        
  tocode.CCSID   = UTF8;                                                        
  /*( 文字「Ａ」を UNICODE に変換する )*/                                       
  printf(" 文字「Ａ」を UNICODE に変換する \n");                                
  memset(ebcbuf, 0, sizeof(ebcbuf));                                            
  ebcbuf[0] = 0x0e;                                                             
  ebcbuf[1] = 0x42;                                                             
  ebcbuf[2] = 0xc1; /*  倍角の A */                                             
  ebcbuf[3] = 0x0f;                                                             
  inbyte = strlen(ebcbuf);                                                      
  for(i = 0; i<inbyte; i++){/*for-loop*/                                        
     printf("ebcbuf[%d] = 0x%02x\n", i, ebcbuf[i]);                             
  }/*for-loop*/                                                                 
  /*(1) 変換ハンドルを作成 */                                                   
  cd = QtqIconvOpen(&tocode, &fromcode);                                        
  if(cd.return_value == FALSE){                                                 
    printf("[ERR] QtqIconvOpen errno = %d\n", errno);                           
    getchar();                                                                  
    exit(-1);                                                                   
  }                                                                             
  source = ebcbuf;                                                              
  target = unibuf;                                                              
  inbyte = strlen(ebcbuf);                                                      
  outbyte = sizeof(unibuf);                                                     
  /*(2) 変換を実行 */                                                           
  rtnbyte = iconv(cd, &source, &inbyte, &target, &outbyte);                     
  if(rtnbyte < 0){                                                              
    printf("failed in iconv: %s\n", strerror(errno));                           
    getchar();                                                                  
    iconv_close(cd);                                                            
    exit(-1);                                                                   
  }                                                                             
  printf(" 文字「Ａ」のユニコード変換結果 \n");                                 
  for(i = 0; i<strlen(unibuf); i++){/*for-loop*/                                
     printf("unibuf[%d] = 0x%02x\n", i, unibuf[i]);                             
  }/*for-loop*/                                                                 
  getchar();                                                                    
  /*(3) 変換ハンドルをクローズ */                                               
  iconv_close(cd);                                                              
}