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