contrib/gcc/tree-stdarg.c

117 va_list_counter_bump (struct stdarg_info *si, tree counter, tree rhs,
135   orig_lhs = lhs = rhs;
156       rhs = TREE_OPERAND (stmt, 1);
157       if (TREE_CODE (rhs) == WITH_SIZE_EXPR)
158 	rhs = TREE_OPERAND (rhs, 0);
160       if (TREE_CODE (rhs) == SSA_NAME)
162 	  lhs = rhs;
166       if ((TREE_CODE (rhs) == NOP_EXPR
167 	   || TREE_CODE (rhs) == CONVERT_EXPR)
168 	  && TREE_CODE (TREE_OPERAND (rhs, 0)) == SSA_NAME)
170 	  lhs = TREE_OPERAND (rhs, 0);
174       if (TREE_CODE (rhs) == PLUS_EXPR
175 	  && TREE_CODE (TREE_OPERAND (rhs, 0)) == SSA_NAME
176 	  && TREE_CODE (TREE_OPERAND (rhs, 1)) == INTEGER_CST
177 	  && host_integerp (TREE_OPERAND (rhs, 1), 1))
179 	  ret += tree_low_cst (TREE_OPERAND (rhs, 1), 1);
180 	  lhs = TREE_OPERAND (rhs, 0);
184       if (TREE_CODE (counter) != TREE_CODE (rhs))
189 	  if (get_base_address (counter) != get_base_address (rhs)
190 	      || TREE_CODE (TREE_OPERAND (rhs, 1)) != FIELD_DECL
191 	      || TREE_OPERAND (counter, 1) != TREE_OPERAND (rhs, 1))
194       else if (counter != rhs)
214       rhs = TREE_OPERAND (stmt, 1);
215       if (TREE_CODE (rhs) == WITH_SIZE_EXPR)
216 	rhs = TREE_OPERAND (rhs, 0);
218       if (TREE_CODE (rhs) == SSA_NAME)
220 	  lhs = rhs;
224       if ((TREE_CODE (rhs) == NOP_EXPR
225 	   || TREE_CODE (rhs) == CONVERT_EXPR)
226 	  && TREE_CODE (TREE_OPERAND (rhs, 0)) == SSA_NAME)
228 	  lhs = TREE_OPERAND (rhs, 0);
232       if (TREE_CODE (rhs) == PLUS_EXPR
233 	  && TREE_CODE (TREE_OPERAND (rhs, 0)) == SSA_NAME
234 	  && TREE_CODE (TREE_OPERAND (rhs, 1)) == INTEGER_CST
235 	  && host_integerp (TREE_OPERAND (rhs, 1), 1))
237 	  val -= tree_low_cst (TREE_OPERAND (rhs, 1), 1);
238 	  lhs = TREE_OPERAND (rhs, 0);
445 check_va_list_escapes (struct stdarg_info *si, tree lhs, tree rhs)
447   if (! POINTER_TYPE_P (TREE_TYPE (rhs)))
450   if ((TREE_CODE (rhs) == PLUS_EXPR
451        && TREE_CODE (TREE_OPERAND (rhs, 1)) == INTEGER_CST)
452       || TREE_CODE (rhs) == NOP_EXPR
453       || TREE_CODE (rhs) == CONVERT_EXPR)
454     rhs = TREE_OPERAND (rhs, 0);
456   if (TREE_CODE (rhs) != SSA_NAME
458 			 DECL_UID (SSA_NAME_VAR (rhs))))
528 		  tree rhs = TREE_OPERAND (stmt, 1);
530 		  if (TREE_CODE (rhs) == WITH_SIZE_EXPR)
531 		    rhs = TREE_OPERAND (rhs, 0);
534 		  if (TREE_CODE (rhs) == INDIRECT_REF
535 		      && TREE_OPERAND (rhs, 0) == use
536 		      && TYPE_SIZE_UNIT (TREE_TYPE (rhs))
537 		      && host_integerp (TYPE_SIZE_UNIT (TREE_TYPE (rhs)), 1)
541 		      tree access_size = TYPE_SIZE_UNIT (TREE_TYPE (rhs));
558 		  if ((TREE_CODE (rhs) == PLUS_EXPR
559 		       && TREE_CODE (TREE_OPERAND (rhs, 1)) == INTEGER_CST)
560 		      || TREE_CODE (rhs) == NOP_EXPR
561 		      || TREE_CODE (rhs) == CONVERT_EXPR)
562 		    rhs = TREE_OPERAND (rhs, 0);
564 		  if (rhs == use)
753 	  tree phi, lhs, rhs;
766 		  rhs = USE_FROM_PTR (uop);
767 		  if (va_list_ptr_read (&si, rhs, lhs))
769 		  else if (va_list_ptr_write (&si, lhs, rhs))
772 		    check_va_list_escapes (&si, lhs, rhs);
813 	      tree rhs = TREE_OPERAND (stmt, 1);
815 	      if (TREE_CODE (rhs) == WITH_SIZE_EXPR)
816 		rhs = TREE_OPERAND (rhs, 0);
821 		  if (va_list_ptr_read (&si, rhs, lhs))
829 		  else if (va_list_ptr_write (&si, lhs, rhs))
833 		    check_va_list_escapes (&si, lhs, rhs);
838 		  if (va_list_counter_struct_op (&si, lhs, rhs, true))
842 		  else if (va_list_counter_struct_op (&si, rhs, lhs, false))
847 			   && targetm.stdarg_optimize_hook (&si, lhs, rhs))