This patch splits out a fairly common operation: that of narrowing a MEM to a particular mode and adjusting the bit number accordingly.
I've kept with "bit_field" rather than "bitfield" for consistency with the callers, although we do have "bitfield" in "adjust_bitfield_address". Tested as described in the covering note. OK to install? Richard gcc/ * expmed.c (narrow_bit_field_mem): New function. (store_bit_field_using_insv, store_bit_field_1, store_fixed_bit_field) (extract_bit_field_1): Use it. Index: gcc/expmed.c =================================================================== --- gcc/expmed.c 2012-10-30 19:25:44.797368678 +0000 +++ gcc/expmed.c 2012-10-30 19:25:47.730368671 +0000 @@ -387,6 +387,23 @@ mode_for_extraction (enum extraction_pat return data->operand[opno].mode; } +/* Adjust bitfield memory MEM so that it points to the first unit of + mode MODE that contains the bitfield at bit position BITNUM. + Set NEW_BITNUM to the bit position of the field within the + new memory. */ + +static rtx +narrow_bit_field_mem (rtx mem, enum machine_mode mode, + unsigned HOST_WIDE_INT bitnum, + unsigned HOST_WIDE_INT &new_bitnum) +{ + unsigned int unit = GET_MODE_BITSIZE (mode); + unsigned HOST_WIDE_INT offset = bitnum / unit * GET_MODE_SIZE (mode); + mem = adjust_bitfield_address (mem, mode, offset); + new_bitnum = bitnum % unit; + return mem; +} + /* Return true if a bitfield of size BITSIZE at bit number BITNUM within a structure of mode STRUCT_MODE represents a lowpart subreg. The subreg offset is then BITNUM / BITS_PER_UNIT. */ @@ -424,11 +441,8 @@ store_bit_field_using_insv (rtx op0, uns return false; if (MEM_P (xop0)) - { - /* Get a reference to the first byte of the field. */ - xop0 = adjust_bitfield_address (xop0, byte_mode, bitnum / BITS_PER_UNIT); - bitnum %= BITS_PER_UNIT; - } + /* Get a reference to the first byte of the field. */ + xop0 = narrow_bit_field_mem (xop0, byte_mode, bitnum, bitnum); else { /* Convert from counting within OP0 to counting in OP_MODE. */ @@ -831,18 +845,14 @@ store_bit_field_1 (rtx str_rtx, unsigned && GET_MODE_BITSIZE (bestmode) > MEM_ALIGN (op0))) { rtx last, tempreg, xop0; - unsigned int unit; - unsigned HOST_WIDE_INT offset, bitpos; + unsigned HOST_WIDE_INT bitpos; last = get_last_insn (); /* Adjust address to point to the containing unit of that mode. Compute the offset as a multiple of this unit, counting in bytes. */ - unit = GET_MODE_BITSIZE (bestmode); - offset = (bitnum / unit) * GET_MODE_SIZE (bestmode); - bitpos = bitnum % unit; - xop0 = adjust_bitfield_address (op0, bestmode, offset); + xop0 = narrow_bit_field_mem (op0, bestmode, bitnum, bitpos); /* Fetch that unit, store the bitfield in it, then store the unit. */ @@ -975,9 +985,7 @@ store_fixed_bit_field (rtx op0, unsigned return; } - HOST_WIDE_INT bit_offset = bitnum - bitnum % GET_MODE_BITSIZE (mode); - op0 = adjust_bitfield_address (op0, mode, bit_offset / BITS_PER_UNIT); - bitnum -= bit_offset; + op0 = narrow_bit_field_mem (op0, mode, bitnum, bitnum); } mode = GET_MODE (op0); @@ -1246,11 +1254,8 @@ extract_bit_field_using_extv (rtx op0, u return NULL_RTX; if (MEM_P (op0)) - { - /* Get a reference to the first byte of the field. */ - op0 = adjust_bitfield_address (op0, byte_mode, bitnum / BITS_PER_UNIT); - bitnum %= BITS_PER_UNIT; - } + /* Get a reference to the first byte of the field. */ + op0 = narrow_bit_field_mem (op0, byte_mode, bitnum, bitnum); else { /* Convert from counting within OP0 to counting in EXT_MODE. */ @@ -1640,23 +1645,19 @@ extract_bit_field_1 (rtx str_rtx, unsign && !(SLOW_UNALIGNED_ACCESS (bestmode, MEM_ALIGN (op0)) && GET_MODE_BITSIZE (bestmode) > MEM_ALIGN (op0))) { - unsigned HOST_WIDE_INT offset, bitpos; - - /* Compute the offset as a multiple of this unit, - counting in bytes. */ - unsigned int unit = GET_MODE_BITSIZE (bestmode); - offset = (bitnum / unit) * GET_MODE_SIZE (bestmode); - bitpos = bitnum % unit; + unsigned HOST_WIDE_INT bitpos; + rtx xop0 = narrow_bit_field_mem (op0, bestmode, bitnum, bitpos); - /* Make sure the register is big enough for the whole field. */ - if (bitpos + bitsize <= unit) + /* Make sure the register is big enough for the whole field. + (It might not be if bestmode == GET_MODE (op0) and the input + code was invalid.) */ + if (bitpos + bitsize <= GET_MODE_BITSIZE (bestmode)) { - rtx last, result, xop0; + rtx last, result; last = get_last_insn (); /* Fetch it to a register in that size. */ - xop0 = adjust_bitfield_address (op0, bestmode, offset); xop0 = force_reg (bestmode, xop0); result = extract_bit_field_1 (xop0, bitsize, bitpos, unsignedp, packedp, target,