tests/lha-test13

   1 # -*- shell-script -*-
   2 FILENAME=lha-test13
   3 message testing the kanji code conversion.
   4
   5 printf '\xb4\xc1\xbb\xfa\n' > test-tmp-euc
   6                                                         check $? $LINENO
   7 printf '\x8a\xbf\x8e\x9a\n' > test-tmp-sjis
   8                                                         check $? $LINENO
   9 # no convert
  10 $lha c test-tmp-euc.lzh test-tmp-euc
  11                                                         check $? $LINENO
  12 # file size is too small, so no compressed
  13 $lha v test-tmp-euc.lzh | egrep lh0
  14                                                         check $? $LINENO
  15 # no convert
  16 $lha xw=test-tmp-euc-d test-tmp-euc.lzh
  17                                                         check $? $LINENO
  18 diff -r test-tmp-euc test-tmp-euc-d/test-tmp-euc
  19                                                         check $? $LINENO
  20 # sjis to euc
  21 $lha xew=test-tmp-unknown-d test-tmp-euc.lzh
  22                                                         check $? $LINENO
  23 diff -r test-tmp-euc test-tmp-unknown-d/test-tmp-euc
  24 test $? -ne 0
  25                                                         check $? $LINENO
  26 diff -r test-tmp-sjis test-tmp-unknown-d/test-tmp-euc
  27 test $? -ne 0
  28                                                         check $? $LINENO
  29
  30 # euc to sjis (NL to CR NL)
  31 $lha ce test-tmp-sjis.lzh test-tmp-euc
  32                                                         check $? $LINENO
  33 # file size is too small, so no compressed
  34 $lha v test-tmp-euc.lzh | egrep lh0
  35                                                         check $? $LINENO
  36 # no convert (CR NL to NL)
  37 $lha xtw=test-tmp-sjis-d test-tmp-sjis.lzh
  38                                                         check $? $LINENO
  39 diff test-tmp-sjis test-tmp-sjis-d/test-tmp-euc
  40                                                         check $? $LINENO
  41 # sjis to euc (CR NL to NL)
  42 $lha xew=test-tmp-euc-d2 test-tmp-sjis.lzh
  43                                                         check $? $LINENO
  44 diff test-tmp-euc test-tmp-euc-d2/test-tmp-euc
  45                                                         check $? $LINENO
  46
  47 i=0
  48 while ((i < 10))
  49 do
  50   cat test-tmp-euc
  51   ((i = i + 1))
  52 done > test-tmp-euc2
  53
  54 i=0
  55 while ((i < 10))
  56 do
  57   cat test-tmp-sjis
  58   ((i = i + 1))
  59 done > test-tmp-sjis2
  60
  61 # no convert
  62 $lha c test-tmp-euc2.lzh test-tmp-euc2
  63                                                         check $? $LINENO
  64 $lha v test-tmp-euc2.lzh | egrep 'lh[567]'
  65                                                         check $? $LINENO
  66 # no convert
  67 $lha xw=test-tmp-euc2-d test-tmp-euc2.lzh
  68                                                         check $? $LINENO
  69 diff -r test-tmp-euc2 test-tmp-euc2-d/test-tmp-euc2
  70                                                         check $? $LINENO
  71 # sjis to euc
  72 $lha xew=test-tmp-unknown2-d test-tmp-euc2.lzh
  73                                                         check $? $LINENO
  74 diff -r test-tmp-euc2 test-tmp-unknown2-d/test-tmp-euc2
  75 test $? -ne 0
  76                                                         check $? $LINENO
  77 diff -r test-tmp-sjis2 test-tmp-unknown2-d/test-tmp-euc2
  78 test $? -ne 0
  79                                                         check $? $LINENO
  80
  81 # euc to sjis (NL to CR NL)
  82 $lha ce test-tmp-sjis2.lzh test-tmp-euc2
  83                                                         check $? $LINENO
  84 $lha v test-tmp-euc2.lzh | egrep 'lh[567]'
  85                                                         check $? $LINENO
  86 # no convert (CR NL to NL)
  87 $lha xtw=test-tmp-sjis2-d test-tmp-sjis2.lzh
  88                                                         check $? $LINENO
  89 diff test-tmp-sjis2 test-tmp-sjis2-d/test-tmp-euc2
  90                                                         check $? $LINENO
  91 # sjis to euc (CR NL to NL)
  92 $lha xew=test-tmp-euc2-d2 test-tmp-sjis2.lzh
  93                                                         check $? $LINENO
  94 diff test-tmp-euc2 test-tmp-euc2-d2/test-tmp-euc2
  95                                                         check $? $LINENO