123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475 |
- #!/bin/sh
- # test conv=ascii
- # Copyright (C) 2014-2018 Free Software Foundation, Inc.
- # This program is free software: you can redistribute it and/or modify
- # it under the terms of the GNU General Public License as published by
- # the Free Software Foundation, either version 3 of the License, or
- # (at your option) any later version.
- # This program is distributed in the hope that it will be useful,
- # but WITHOUT ANY WARRANTY; without even the implied warranty of
- # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- # GNU General Public License for more details.
- # You should have received a copy of the GNU General Public License
- # along with this program. If not, see <https://www.gnu.org/licenses/>.
- . "${srcdir=.}/tests/init.sh"; path_prepend_ ./src
- print_ver_ dd printf
- {
- # Two lines, EBCDIC " A A" and " A ", followed by all the bytes in order.
- env printf '\100\301\100\301\100\301\100\100' &&
- env printf $(env printf '\\%03o' $(seq 0 255));
- } >in || framework_failure_
- {
- # The converted lines, with trailing spaces removed.
- env printf \
- ' A A\n A\n'\
- '\000\001\002\003\n\234\011\206\177\n'\
- '\227\215\216\013\n\014\015\016\017\n'\
- '\020\021\022\023\n\235\205\010\207\n'\
- '\030\031\222\217\n\034\035\036\037\n'\
- '\200\201\202\203\n\204\012\027\033\n'\
- '\210\211\212\213\n\214\005\006\007\n'\
- '\220\221\026\223\n\224\225\226\004\n'\
- '\230\231\232\233\n\024\025\236\032\n'\
- '\040\240\241\242\n\243\244\245\246\n'\
- '\247\250\325\056\n\074\050\053\174\n'\
- '\046\251\252\253\n\254\255\256\257\n'\
- '\260\261\041\044\n\052\051\073\176\n'\
- '\055\057\262\263\n\264\265\266\267\n'\
- '\270\271\313\054\n\045\137\076\077\n'\
- '\272\273\274\275\n\276\277\300\301\n'\
- '\302\140\072\043\n\100\047\075\042\n'\
- '\303\141\142\143\n\144\145\146\147\n'\
- '\150\151\304\305\n\306\307\310\311\n'\
- '\312\152\153\154\n\155\156\157\160\n'\
- '\161\162\136\314\n\315\316\317\320\n'\
- '\321\345\163\164\n\165\166\167\170\n'\
- '\171\172\322\323\n\324\133\326\327\n'\
- '\330\331\332\333\n\334\335\336\337\n'\
- '\340\341\342\343\n\344\135\346\347\n'\
- '\173\101\102\103\n\104\105\106\107\n'\
- '\110\111\350\351\n\352\353\354\355\n'\
- '\175\112\113\114\n\115\116\117\120\n'\
- '\121\122\356\357\n\360\361\362\363\n'\
- '\134\237\123\124\n\125\126\127\130\n'\
- '\131\132\364\365\n\366\367\370\371\n'\
- '\060\061\062\063\n\064\065\066\067\n'\
- '\070\071\372\373\n\374\375\376\377\n';
- } >exp || framework_failure_
- dd if=in of=out conv=ascii cbs=4 || fail=1
- compare exp out \
- || { od -v -to1 exp > exp2 || framework_failure_;
- od -v -to1 out > out2 || framework_failure_;
- compare exp2 out2;
- fail=1; }
- Exit $fail
|