tests/lha-test13

   1 # -*- shell-script -*-
   2 FILENAME=lha-test13
   3 message testing the kanji code conversion.
   4
   5 printf '\xb4\xc1\xbb\xfa\xc9\xbd\n' > test-tmp-euc
   6                                                         check $? $LINENO
   7 printf '\x8a\xbf\x8e\x9a\x95\x5c\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++ < 100))
  49 do
  50   cat test-tmp-euc >> test-tmp-euc2
  51   cat test-tmp-sjis >> test-tmp-sjis2
  52 done
  53
  54 # no convert
  55 $lha c test-tmp-euc2.lzh test-tmp-euc2
  56                                                         check $? $LINENO
  57 $lha v test-tmp-euc2.lzh | egrep 'lh[567]'
  58                                                         check $? $LINENO
  59 # no convert
  60 $lha xw=test-tmp-euc2-d test-tmp-euc2.lzh
  61                                                         check $? $LINENO
  62 diff -r test-tmp-euc2 test-tmp-euc2-d/test-tmp-euc2
  63                                                         check $? $LINENO
  64 # sjis to euc
  65 $lha xew=test-tmp-unknown2-d test-tmp-euc2.lzh
  66                                                         check $? $LINENO
  67 diff -r test-tmp-euc2 test-tmp-unknown2-d/test-tmp-euc2
  68 test $? -ne 0
  69                                                         check $? $LINENO
  70 diff -r test-tmp-sjis2 test-tmp-unknown2-d/test-tmp-euc2
  71 test $? -ne 0
  72                                                         check $? $LINENO
  73
  74 # euc to sjis (NL to CR NL)
  75 $lha ce test-tmp-sjis2.lzh test-tmp-euc2
  76                                                         check $? $LINENO
  77 $lha v test-tmp-euc2.lzh | egrep 'lh[567]'
  78                                                         check $? $LINENO
  79 # no convert (CR NL to NL)
  80 $lha xtw=test-tmp-sjis2-d test-tmp-sjis2.lzh
  81                                                         check $? $LINENO
  82 diff test-tmp-sjis2 test-tmp-sjis2-d/test-tmp-euc2
  83                                                         check $? $LINENO
  84 # sjis to euc (CR NL to NL)
  85 $lha xew=test-tmp-euc2-d2 test-tmp-sjis2.lzh
  86                                                         check $? $LINENO
  87 diff test-tmp-euc2 test-tmp-euc2-d2/test-tmp-euc2
  88                                                         check $? $LINENO