X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Fdata%2Fvariable.c;h=7a631a73650e132a00752ffb72755e6d3525c91a;hb=1255b66223eac8ff1b0abf138ead22fd801c6633;hp=ee6c8747865b734cf0ba0f2eb00bdd543a39040c;hpb=65c7da3a918fd720a0d7db73feebdb0442480e5b;p=pspp diff --git a/src/data/variable.c b/src/data/variable.c index ee6c874786..7a631a7365 100644 --- a/src/data/variable.c +++ b/src/data/variable.c @@ -19,6 +19,7 @@ #include #include "variable.h" +#include #include #include #include @@ -346,84 +347,7 @@ dict_class_to_name (enum dict_class dict_class) case DC_SCRATCH: return _("scratch"); default: - assert (0); - abort (); - } -} - - -/* Copies buffer SRC, of SRC_SIZE bytes, to DST, of DST_SIZE bytes. - Each 256th byte, which is expected to be a ' ', is deleted. - DST is then truncated to DST_SIZE bytes or padded on the right with - spaces as needed. */ -void -copy_demangle (char *dst, size_t dst_size, - const char *src, size_t src_size) -{ - int src_bytes_left = src_size; - int dst_bytes_left = dst_size; - const char *s = src; - char *d = dst; - - - while( src_bytes_left > 0 ) - { - const size_t s_chunk = min(MAX_LONG_STRING, src_bytes_left); - const size_t d_chunk = min(MAX_LONG_STRING, dst_bytes_left); - - assert ( d < dst + dst_size); - - buf_copy_rpad (d, d_chunk, - s, s_chunk); - - d += d_chunk; - s += s_chunk; - src_bytes_left -= s_chunk; - dst_bytes_left -= d_chunk; - - if ( src_bytes_left > 0 && ! (++s - src) % (MAX_LONG_STRING+1) ) - { - if ( *s != ' ') - msg(MW, _("Expected a space in very long string")); - src_bytes_left--; - } - } -} - -/* Copies buffer SRC, of SRC_SIZE bytes, to DST, of DST_SIZE bytes. - DST is rounded up to the nearest 8 byte boundary. - A space is inserted at each 256th byte. - DST is then truncated to DST_SIZE bytes or padded on the right with - spaces as needed. */ -void -copy_mangle (char *dst, size_t dst_size, - const char *src, size_t src_size) -{ - int src_bytes_left = src_size; - int dst_bytes_left = dst_size; - const char *s = src; - char *d = dst; - - memset(dst, ' ', dst_size); - - while( src_bytes_left > 0 ) - { - const size_t s_chunk = min(MAX_LONG_STRING, src_bytes_left); - const size_t d_chunk = min(MAX_LONG_STRING, dst_bytes_left); - - buf_copy_rpad (d, d_chunk, s, s_chunk); - - d += d_chunk; - s += s_chunk; - src_bytes_left -= s_chunk; - dst_bytes_left -= d_chunk; - - if ( dst_bytes_left > 0 && 0 == ( d + 1 - dst ) % (MAX_LONG_STRING + 1) ) - { - memset(d, ' ', 1); - d++; - dst_bytes_left--; - } + NOT_REACHED (); } } @@ -432,29 +356,19 @@ copy_mangle (char *dst, size_t dst_size, int width_to_bytes(int width) { - const int chunks = width / EFFECTIVE_LONG_STRING_LENGTH ; - const int remainder = width - (chunks * EFFECTIVE_LONG_STRING_LENGTH) ; - int bytes, mod8; - assert (width >= 0); if ( width == 0 ) return MAX_SHORT_STRING ; - - if ( width <= MAX_LONG_STRING) - return MAX_SHORT_STRING * DIV_RND_UP(width, MAX_SHORT_STRING); - - - bytes = remainder + (chunks * (MAX_LONG_STRING + 1) ); - - /* Round up to the nearest 8 */ - mod8 = bytes % MAX_SHORT_STRING; - - if ( mod8 ) - bytes += MAX_SHORT_STRING - mod8; - - assert( bytes % MAX_SHORT_STRING == 0 ); - - return bytes; + else if (width <= MAX_LONG_STRING) + return ROUND_UP (width, MAX_SHORT_STRING); + else + { + int chunks = width / EFFECTIVE_LONG_STRING_LENGTH ; + int remainder = width % EFFECTIVE_LONG_STRING_LENGTH ; + int bytes = remainder + (chunks * (MAX_LONG_STRING + 1) ); + return ROUND_UP (bytes, MAX_SHORT_STRING); + } } +