range.go

     1  // Copyright 2009 The Go Authors. All rights reserved.
     2  // Use of this source code is governed by a BSD-style
     3  // license that can be found in the LICENSE file.
     4  
     5  package walk
     6  
     7  import (
     8  	"go/constant"
     9  	"unicode/utf8"
    10  
    11  	"cmd/compile/internal/base"
    12  	"cmd/compile/internal/ir"
    13  	"cmd/compile/internal/reflectdata"
    14  	"cmd/compile/internal/ssagen"
    15  	"cmd/compile/internal/typecheck"
    16  	"cmd/compile/internal/types"
    17  	"cmd/internal/src"
    18  	"cmd/internal/sys"
    19  )
    20  
    21  func cheapComputableIndex(width int64) bool {
    22  	switch ssagen.Arch.LinkArch.Family {
    23  	// MIPS does not have R+R addressing
    24  	// Arm64 may lack ability to generate this code in our assembler,
    25  	// but the architecture supports it.
    26  	case sys.Loong64, sys.PPC64, sys.S390X:
    27  		return width == 1
    28  	case sys.AMD64, sys.I386, sys.ARM64, sys.ARM:
    29  		switch width {
    30  		case 1, 2, 4, 8:
    31  			return true
    32  		}
    33  	}
    34  	return false
    35  }
    36  
    37  // walkRange transforms various forms of ORANGE into
    38  // simpler forms.  The result must be assigned back to n.
    39  // Node n may also be modified in place, and may also be
    40  // the returned node.
    41  func walkRange(nrange *ir.RangeStmt) ir.Node {
    42  	base.Assert(!nrange.DistinctVars) // Should all be rewritten before escape analysis
    43  	if isMapClear(nrange) {
    44  		return mapRangeClear(nrange)
    45  	}
    46  
    47  	nfor := ir.NewForStmt(nrange.Pos(), nil, nil, nil, nil, nrange.DistinctVars)
    48  	nfor.SetInit(nrange.Init())
    49  	nfor.Label = nrange.Label
    50  
    51  	// variable name conventions:
    52  	//	ohv1, hv1, hv2: hidden (old) val 1, 2
    53  	//	ha, hit: hidden aggregate, iterator
    54  	//	hn, hp: hidden len, pointer
    55  	//	hb: hidden bool
    56  	//	a, v1, v2: not hidden aggregate, val 1, 2
    57  
    58  	a := nrange.X
    59  	t := a.Type()
    60  	lno := ir.SetPos(a)
    61  
    62  	v1, v2 := nrange.Key, nrange.Value
    63  
    64  	if ir.IsBlank(v2) {
    65  		v2 = nil
    66  	}
    67  
    68  	if ir.IsBlank(v1) && v2 == nil {
    69  		v1 = nil
    70  	}
    71  
    72  	if v1 == nil && v2 != nil {
    73  		base.Fatalf("walkRange: v2 != nil while v1 == nil")
    74  	}
    75  
    76  	var body []ir.Node
    77  	var init []ir.Node
    78  	switch k := t.Kind(); {
    79  	default:
    80  		base.Fatalf("walkRange")
    81  
    82  	case types.IsInt[k]:
    83  		if nn := arrayRangeClear(nrange, v1, v2, a); nn != nil {
    84  			base.Pos = lno
    85  			return nn
    86  		}
    87  		hv1 := typecheck.TempAt(base.Pos, ir.CurFunc, t)
    88  		hn := typecheck.TempAt(base.Pos, ir.CurFunc, t)
    89  
    90  		init = append(init, ir.NewAssignStmt(base.Pos, hv1, nil))
    91  		init = append(init, ir.NewAssignStmt(base.Pos, hn, a))
    92  
    93  		nfor.Cond = ir.NewBinaryExpr(base.Pos, ir.OLT, hv1, hn)
    94  		nfor.Post = ir.NewAssignStmt(base.Pos, hv1, ir.NewBinaryExpr(base.Pos, ir.OADD, hv1, ir.NewInt(base.Pos, 1)))
    95  
    96  		if v1 != nil {
    97  			body = []ir.Node{rangeAssign(nrange, hv1)}
    98  		}
    99  
   100  	case k == types.TARRAY, k == types.TSLICE, k == types.TPTR: // TPTR is pointer-to-array
   101  		if nn := arrayRangeClear(nrange, v1, v2, a); nn != nil {
   102  			base.Pos = lno
   103  			return nn
   104  		}
   105  
   106  		// Element type of the iteration
   107  		var elem *types.Type
   108  		switch t.Kind() {
   109  		case types.TSLICE, types.TARRAY:
   110  			elem = t.Elem()
   111  		case types.TPTR:
   112  			elem = t.Elem().Elem()
   113  		}
   114  
   115  		// order.stmt arranged for a copy of the array/slice variable if needed.
   116  		ha := a
   117  
   118  		hv1 := typecheck.TempAt(base.Pos, ir.CurFunc, types.Types[types.TINT])
   119  		hn := typecheck.TempAt(base.Pos, ir.CurFunc, types.Types[types.TINT])
   120  
   121  		init = append(init, ir.NewAssignStmt(base.Pos, hv1, nil))
   122  		init = append(init, ir.NewAssignStmt(base.Pos, hn, ir.NewUnaryExpr(base.Pos, ir.OLEN, ha)))
   123  
   124  		nfor.Cond = ir.NewBinaryExpr(base.Pos, ir.OLT, hv1, hn)
   125  		nfor.Post = ir.NewAssignStmt(base.Pos, hv1, ir.NewBinaryExpr(base.Pos, ir.OADD, hv1, ir.NewInt(base.Pos, 1)))
   126  
   127  		// for range ha { body }
   128  		if v1 == nil {
   129  			break
   130  		}
   131  
   132  		// for v1 := range ha { body }
   133  		if v2 == nil {
   134  			body = []ir.Node{rangeAssign(nrange, hv1)}
   135  			break
   136  		}
   137  
   138  		// for v1, v2 := range ha { body }
   139  		if cheapComputableIndex(elem.Size()) {
   140  			// v1, v2 = hv1, ha[hv1]
   141  			tmp := ir.NewIndexExpr(base.Pos, ha, hv1)
   142  			tmp.SetBounded(true)
   143  			body = []ir.Node{rangeAssign2(nrange, hv1, tmp)}
   144  			break
   145  		}
   146  
   147  		// Slice to iterate over
   148  		var hs ir.Node
   149  		if t.IsSlice() {
   150  			hs = ha
   151  		} else {
   152  			var arr ir.Node
   153  			if t.IsPtr() {
   154  				arr = ha
   155  			} else {
   156  				arr = typecheck.NodAddr(ha)
   157  				arr.SetType(t.PtrTo())
   158  				arr.SetTypecheck(1)
   159  			}
   160  			hs = ir.NewSliceExpr(base.Pos, ir.OSLICEARR, arr, nil, nil, nil)
   161  			// old typechecker doesn't know OSLICEARR, so we set types explicitly
   162  			hs.SetType(types.NewSlice(elem))
   163  			hs.SetTypecheck(1)
   164  		}
   165  
   166  		// We use a "pointer" to keep track of where we are in the backing array
   167  		// of the slice hs. This pointer starts at hs.ptr and gets incremented
   168  		// by the element size each time through the loop.
   169  		//
   170  		// It's tricky, though, as on the last iteration this pointer gets
   171  		// incremented to point past the end of the backing array. We can't
   172  		// let the garbage collector see that final out-of-bounds pointer.
   173  		//
   174  		// To avoid this, we keep the "pointer" alternately in 2 variables, one
   175  		// pointer typed and one uintptr typed. Most of the time it lives in the
   176  		// regular pointer variable, but when it might be out of bounds (after it
   177  		// has been incremented, but before the loop condition has been checked)
   178  		// it lives briefly in the uintptr variable.
   179  		//
   180  		// hp contains the pointer version (of type *T, where T is the element type).
   181  		// It is guaranteed to always be in range, keeps the backing store alive,
   182  		// and is updated on stack copies. If a GC occurs when this function is
   183  		// suspended at any safepoint, this variable ensures correct operation.
   184  		//
   185  		// hu contains the equivalent uintptr version. It may point past the
   186  		// end, but doesn't keep the backing store alive and doesn't get updated
   187  		// on a stack copy. If a GC occurs while this function is on the top of
   188  		// the stack, then the last frame is scanned conservatively and hu will
   189  		// act as a reference to the backing array to ensure it is not collected.
   190  		//
   191  		// The "pointer" we're moving across the backing array lives in one
   192  		// or the other of hp and hu as the loop proceeds.
   193  		//
   194  		// hp is live during most of the body of the loop. But it isn't live
   195  		// at the very top of the loop, when we haven't checked i<n yet, and
   196  		// it could point off the end of the backing store.
   197  		// hu is live only at the very top and very bottom of the loop.
   198  		// In particular, only when it cannot possibly be live across a call.
   199  		//
   200  		// So we do
   201  		//   hu = uintptr(unsafe.Pointer(hs.ptr))
   202  		//   for i := 0; i < hs.len; i++ {
   203  		//     hp = (*T)(unsafe.Pointer(hu))
   204  		//     v1, v2 = i, *hp
   205  		//     ... body of loop ...
   206  		//     hu = uintptr(unsafe.Pointer(hp)) + elemsize
   207  		//   }
   208  		//
   209  		// Between the assignments to hu and the assignment back to hp, there
   210  		// must not be any calls.
   211  
   212  		// Pointer to current iteration position. Start on entry to the loop
   213  		// with the pointer in hu.
   214  		ptr := ir.NewUnaryExpr(base.Pos, ir.OSPTR, hs)
   215  		ptr.SetBounded(true)
   216  		huVal := ir.NewConvExpr(base.Pos, ir.OCONVNOP, types.Types[types.TUNSAFEPTR], ptr)
   217  		huVal = ir.NewConvExpr(base.Pos, ir.OCONVNOP, types.Types[types.TUINTPTR], huVal)
   218  		hu := typecheck.TempAt(base.Pos, ir.CurFunc, types.Types[types.TUINTPTR])
   219  		init = append(init, ir.NewAssignStmt(base.Pos, hu, huVal))
   220  
   221  		// Convert hu to hp at the top of the loop (after the condition has been checked).
   222  		hpVal := ir.NewConvExpr(base.Pos, ir.OCONVNOP, types.Types[types.TUNSAFEPTR], hu)
   223  		hpVal.SetCheckPtr(true) // disable checkptr on this conversion
   224  		hpVal = ir.NewConvExpr(base.Pos, ir.OCONVNOP, elem.PtrTo(), hpVal)
   225  		hp := typecheck.TempAt(base.Pos, ir.CurFunc, elem.PtrTo())
   226  		body = append(body, ir.NewAssignStmt(base.Pos, hp, hpVal))
   227  
   228  		// Assign variables on the LHS of the range statement. Use *hp to get the element.
   229  		e := ir.NewStarExpr(base.Pos, hp)
   230  		e.SetBounded(true)
   231  		a := rangeAssign2(nrange, hv1, e)
   232  		body = append(body, a)
   233  
   234  		// Advance pointer for next iteration of the loop.
   235  		// This reads from hp and writes to hu.
   236  		huVal = ir.NewConvExpr(base.Pos, ir.OCONVNOP, types.Types[types.TUNSAFEPTR], hp)
   237  		huVal = ir.NewConvExpr(base.Pos, ir.OCONVNOP, types.Types[types.TUINTPTR], huVal)
   238  		as := ir.NewAssignStmt(base.Pos, hu, ir.NewBinaryExpr(base.Pos, ir.OADD, huVal, ir.NewInt(base.Pos, elem.Size())))
   239  		nfor.Post = ir.NewBlockStmt(base.Pos, []ir.Node{nfor.Post, as})
   240  
   241  	case k == types.TMAP:
   242  		// order.stmt allocated the iterator for us.
   243  		// we only use a once, so no copy needed.
   244  		ha := a
   245  
   246  		hit := nrange.Prealloc
   247  		th := hit.Type()
   248  		// depends on layout of iterator struct.
   249  		// See cmd/compile/internal/reflectdata/map.go:MapIterType
   250  		keysym := th.Field(0).Sym
   251  		elemsym := th.Field(1).Sym // ditto
   252  		iterInit := "mapIterStart"
   253  		iterNext := "mapIterNext"
   254  
   255  		fn := typecheck.LookupRuntime(iterInit, t.Key(), t.Elem(), th)
   256  		init = append(init, mkcallstmt1(fn, reflectdata.RangeMapRType(base.Pos, nrange), ha, typecheck.NodAddr(hit)))
   257  		nfor.Cond = ir.NewBinaryExpr(base.Pos, ir.ONE, ir.NewSelectorExpr(base.Pos, ir.ODOT, hit, keysym), typecheck.NodNil())
   258  
   259  		fn = typecheck.LookupRuntime(iterNext, th)
   260  		nfor.Post = mkcallstmt1(fn, typecheck.NodAddr(hit))
   261  
   262  		key := ir.NewStarExpr(base.Pos, typecheck.ConvNop(ir.NewSelectorExpr(base.Pos, ir.ODOT, hit, keysym), types.NewPtr(t.Key())))
   263  		if v1 == nil {
   264  			body = nil
   265  		} else if v2 == nil {
   266  			body = []ir.Node{rangeAssign(nrange, key)}
   267  		} else {
   268  			elem := ir.NewStarExpr(base.Pos, typecheck.ConvNop(ir.NewSelectorExpr(base.Pos, ir.ODOT, hit, elemsym), types.NewPtr(t.Elem())))
   269  			body = []ir.Node{rangeAssign2(nrange, key, elem)}
   270  		}
   271  
   272  	case k == types.TCHAN:
   273  		// order.stmt arranged for a copy of the channel variable.
   274  		ha := a
   275  
   276  		hv1 := typecheck.TempAt(base.Pos, ir.CurFunc, t.Elem())
   277  		hv1.SetTypecheck(1)
   278  		if t.Elem().HasPointers() {
   279  			init = append(init, ir.NewAssignStmt(base.Pos, hv1, nil))
   280  		}
   281  		hb := typecheck.TempAt(base.Pos, ir.CurFunc, types.Types[types.TBOOL])
   282  
   283  		nfor.Cond = ir.NewBinaryExpr(base.Pos, ir.ONE, hb, ir.NewBool(base.Pos, false))
   284  		lhs := []ir.Node{hv1, hb}
   285  		rhs := []ir.Node{ir.NewUnaryExpr(base.Pos, ir.ORECV, ha)}
   286  		a := ir.NewAssignListStmt(base.Pos, ir.OAS2RECV, lhs, rhs)
   287  		a.SetTypecheck(1)
   288  		nfor.Cond = ir.InitExpr([]ir.Node{a}, nfor.Cond)
   289  		if v1 == nil {
   290  			body = nil
   291  		} else {
   292  			body = []ir.Node{rangeAssign(nrange, hv1)}
   293  		}
   294  		// Zero hv1. This prevents hv1 from being the sole, inaccessible
   295  		// reference to an otherwise GC-able value during the next channel receive.
   296  		// See issue 15281.
   297  		body = append(body, ir.NewAssignStmt(base.Pos, hv1, nil))
   298  
   299  	case k == types.TSTRING:
   300  		// Transform string range statements like "for v1, v2 = range a" into
   301  		//
   302  		// ha := a
   303  		// for hv1 := 0; hv1 < len(ha); {
   304  		//   hv1t := hv1
   305  		//   hv2 := rune(ha[hv1])
   306  		//   if hv2 < utf8.RuneSelf {
   307  		//      hv1++
   308  		//   } else {
   309  		//      hv2, hv1 = decoderune(ha, hv1)
   310  		//   }
   311  		//   v1, v2 = hv1t, hv2
   312  		//   // original body
   313  		// }
   314  
   315  		// order.stmt arranged for a copy of the string variable.
   316  		ha := a
   317  
   318  		hv1 := typecheck.TempAt(base.Pos, ir.CurFunc, types.Types[types.TINT])
   319  		hv1t := typecheck.TempAt(base.Pos, ir.CurFunc, types.Types[types.TINT])
   320  		hv2 := typecheck.TempAt(base.Pos, ir.CurFunc, types.RuneType)
   321  
   322  		// hv1 := 0
   323  		init = append(init, ir.NewAssignStmt(base.Pos, hv1, nil))
   324  
   325  		// hv1 < len(ha)
   326  		nfor.Cond = ir.NewBinaryExpr(base.Pos, ir.OLT, hv1, ir.NewUnaryExpr(base.Pos, ir.OLEN, ha))
   327  
   328  		if v1 != nil {
   329  			// hv1t = hv1
   330  			body = append(body, ir.NewAssignStmt(base.Pos, hv1t, hv1))
   331  		}
   332  
   333  		// hv2 := rune(ha[hv1])
   334  		nind := ir.NewIndexExpr(base.Pos, ha, hv1)
   335  		nind.SetBounded(true)
   336  		body = append(body, ir.NewAssignStmt(base.Pos, hv2, typecheck.Conv(nind, types.RuneType)))
   337  
   338  		// if hv2 < utf8.RuneSelf
   339  		nif := ir.NewIfStmt(base.Pos, nil, nil, nil)
   340  
   341  		// On x86, hv2 <= 127 is shorter to encode than hv2 < 128
   342  		// Doesn't hurt other archs.
   343  		nif.Cond = ir.NewBinaryExpr(base.Pos, ir.OLE, hv2, ir.NewInt(base.Pos, utf8.RuneSelf-1))
   344  
   345  		// hv1++
   346  		nif.Body = []ir.Node{ir.NewAssignStmt(base.Pos, hv1, ir.NewBinaryExpr(base.Pos, ir.OADD, hv1, ir.NewInt(base.Pos, 1)))}
   347  
   348  		// } else {
   349  		// hv2, hv1 = decoderune(ha, hv1)
   350  		fn := typecheck.LookupRuntime("decoderune")
   351  		// decoderune expects a uint, but hv1 is an int.
   352  		// This is safe because hv1 is always >= 0.
   353  		call := mkcall1(fn, fn.Type().ResultsTuple(), &nif.Else, ha, hv1)
   354  		a := ir.NewAssignListStmt(base.Pos, ir.OAS2, []ir.Node{hv2, hv1}, []ir.Node{call})
   355  		nif.Else.Append(a)
   356  
   357  		body = append(body, nif)
   358  
   359  		if v1 != nil {
   360  			if v2 != nil {
   361  				// v1, v2 = hv1t, hv2
   362  				body = append(body, rangeAssign2(nrange, hv1t, hv2))
   363  			} else {
   364  				// v1 = hv1t
   365  				body = append(body, rangeAssign(nrange, hv1t))
   366  			}
   367  		}
   368  	}
   369  
   370  	typecheck.Stmts(init)
   371  
   372  	nfor.PtrInit().Append(init...)
   373  
   374  	typecheck.Stmts(nfor.Cond.Init())
   375  
   376  	nfor.Cond = typecheck.Expr(nfor.Cond)
   377  	nfor.Cond = typecheck.DefaultLit(nfor.Cond, nil)
   378  	nfor.Post = typecheck.Stmt(nfor.Post)
   379  	typecheck.Stmts(body)
   380  	nfor.Body.Append(body...)
   381  	nfor.Body.Append(nrange.Body...)
   382  
   383  	var n ir.Node = nfor
   384  
   385  	n = walkStmt(n)
   386  
   387  	base.Pos = lno
   388  	return n
   389  }
   390  
   391  // rangeAssign returns "n.Key = key".
   392  func rangeAssign(n *ir.RangeStmt, key ir.Node) ir.Node {
   393  	key = rangeConvert(n, n.Key.Type(), key, n.KeyTypeWord, n.KeySrcRType)
   394  	return ir.NewAssignStmt(n.Pos(), n.Key, key)
   395  }
   396  
   397  // rangeAssign2 returns "n.Key, n.Value = key, value".
   398  func rangeAssign2(n *ir.RangeStmt, key, value ir.Node) ir.Node {
   399  	// Use OAS2 to correctly handle assignments
   400  	// of the form "v1, a[v1] = range".
   401  	key = rangeConvert(n, n.Key.Type(), key, n.KeyTypeWord, n.KeySrcRType)
   402  	value = rangeConvert(n, n.Value.Type(), value, n.ValueTypeWord, n.ValueSrcRType)
   403  	return ir.NewAssignListStmt(n.Pos(), ir.OAS2, []ir.Node{n.Key, n.Value}, []ir.Node{key, value})
   404  }
   405  
   406  // rangeConvert returns src, converted to dst if necessary. If a
   407  // conversion is necessary, then typeWord and srcRType are copied to
   408  // their respective ConvExpr fields.
   409  func rangeConvert(nrange *ir.RangeStmt, dst *types.Type, src, typeWord, srcRType ir.Node) ir.Node {
   410  	src = typecheck.Expr(src)
   411  	if dst.Kind() == types.TBLANK || types.Identical(dst, src.Type()) {
   412  		return src
   413  	}
   414  
   415  	n := ir.NewConvExpr(nrange.Pos(), ir.OCONV, dst, src)
   416  	n.TypeWord = typeWord
   417  	n.SrcRType = srcRType
   418  	return typecheck.Expr(n)
   419  }
   420  
   421  // isMapClear checks if n is of the form:
   422  //
   423  //	for k := range m {
   424  //		delete(m, k)
   425  //	}
   426  //
   427  // where == for keys of map m is reflexive.
   428  func isMapClear(n *ir.RangeStmt) bool {
   429  	if base.Flag.N != 0 || base.Flag.Cfg.Instrumenting {
   430  		return false
   431  	}
   432  
   433  	t := n.X.Type()
   434  	if n.Op() != ir.ORANGE || t.Kind() != types.TMAP || n.Key == nil || n.Value != nil {
   435  		return false
   436  	}
   437  
   438  	k := n.Key
   439  	// Require k to be a new variable name.
   440  	if !ir.DeclaredBy(k, n) {
   441  		return false
   442  	}
   443  
   444  	if len(n.Body) != 1 {
   445  		return false
   446  	}
   447  
   448  	stmt := n.Body[0] // only stmt in body
   449  	if stmt == nil || stmt.Op() != ir.ODELETE {
   450  		return false
   451  	}
   452  
   453  	m := n.X
   454  	if delete := stmt.(*ir.CallExpr); !ir.SameSafeExpr(delete.Args[0], m) || !ir.SameSafeExpr(delete.Args[1], k) {
   455  		return false
   456  	}
   457  
   458  	// Keys where equality is not reflexive can not be deleted from maps.
   459  	if !types.IsReflexive(t.Key()) {
   460  		return false
   461  	}
   462  
   463  	return true
   464  }
   465  
   466  // mapRangeClear constructs a call to runtime.mapclear for the map range idiom.
   467  func mapRangeClear(nrange *ir.RangeStmt) ir.Node {
   468  	m := nrange.X
   469  	origPos := ir.SetPos(m)
   470  	defer func() { base.Pos = origPos }()
   471  
   472  	return mapClear(m, reflectdata.RangeMapRType(base.Pos, nrange))
   473  }
   474  
   475  // mapClear constructs a call to runtime.mapclear for the map m.
   476  func mapClear(m, rtyp ir.Node) ir.Node {
   477  	t := m.Type()
   478  
   479  	// instantiate mapclear(typ *type, hmap map[any]any)
   480  	fn := typecheck.LookupRuntime("mapclear", t.Key(), t.Elem())
   481  	n := mkcallstmt1(fn, rtyp, m)
   482  	return typecheck.Stmt(n)
   483  }
   484  
   485  // Lower n into runtime·memclr if possible, for
   486  // fast zeroing of slices and arrays (issue 5373).
   487  // Look for instances of
   488  //
   489  //	for i := range a {
   490  //		a[i] = zero
   491  //	}
   492  //
   493  // in which the evaluation of a is side-effect-free.
   494  //
   495  // Parameters are as in walkRange: "for v1, v2 = range a".
   496  func arrayRangeClear(loop *ir.RangeStmt, v1, v2, a ir.Node) ir.Node {
   497  	if base.Flag.N != 0 || base.Flag.Cfg.Instrumenting {
   498  		return nil
   499  	}
   500  
   501  	if v1 == nil || v2 != nil {
   502  		return nil
   503  	}
   504  
   505  	if len(loop.Body) != 1 || loop.Body[0] == nil {
   506  		return nil
   507  	}
   508  
   509  	stmt1 := loop.Body[0] // only stmt in body
   510  	if stmt1.Op() != ir.OAS {
   511  		return nil
   512  	}
   513  	stmt := stmt1.(*ir.AssignStmt)
   514  	if stmt.X.Op() != ir.OINDEX {
   515  		return nil
   516  	}
   517  	lhs := stmt.X.(*ir.IndexExpr)
   518  	x := lhs.X
   519  
   520  	// Get constant number of iterations for int and array cases.
   521  	n := int64(-1)
   522  	if ir.IsConst(a, constant.Int) {
   523  		n = ir.Int64Val(a)
   524  	} else if a.Type().IsArray() {
   525  		n = a.Type().NumElem()
   526  	} else if a.Type().IsPtr() && a.Type().Elem().IsArray() {
   527  		n = a.Type().Elem().NumElem()
   528  	}
   529  
   530  	if n >= 0 {
   531  		// Int/Array case.
   532  		if !x.Type().IsArray() {
   533  			return nil
   534  		}
   535  		if x.Type().NumElem() != n {
   536  			return nil
   537  		}
   538  	} else {
   539  		// Slice case.
   540  		if !ir.SameSafeExpr(x, a) {
   541  			return nil
   542  		}
   543  	}
   544  
   545  	if !ir.SameSafeExpr(lhs.Index, v1) {
   546  		return nil
   547  	}
   548  
   549  	if !ir.IsZero(stmt.Y) {
   550  		return nil
   551  	}
   552  
   553  	return arrayClear(stmt.Pos(), x, loop)
   554  }
   555  
   556  // arrayClear constructs a call to runtime.memclr for fast zeroing of slices and arrays.
   557  func arrayClear(wbPos src.XPos, a ir.Node, nrange *ir.RangeStmt) ir.Node {
   558  	elemsize := typecheck.RangeExprType(a.Type()).Elem().Size()
   559  	if elemsize <= 0 {
   560  		return nil
   561  	}
   562  
   563  	// Convert to
   564  	// if len(a) != 0 {
   565  	// 	hp = &a[0]
   566  	// 	hn = len(a)*sizeof(elem(a))
   567  	// 	memclr{NoHeap,Has}Pointers(hp, hn)
   568  	// 	i = len(a) - 1
   569  	// }
   570  	n := ir.NewIfStmt(base.Pos, nil, nil, nil)
   571  	n.Cond = ir.NewBinaryExpr(base.Pos, ir.ONE, ir.NewUnaryExpr(base.Pos, ir.OLEN, a), ir.NewInt(base.Pos, 0))
   572  
   573  	// hp = &a[0]
   574  	hp := typecheck.TempAt(base.Pos, ir.CurFunc, types.Types[types.TUNSAFEPTR])
   575  
   576  	ix := ir.NewIndexExpr(base.Pos, a, ir.NewInt(base.Pos, 0))
   577  	ix.SetBounded(true)
   578  	addr := typecheck.ConvNop(typecheck.NodAddr(ix), types.Types[types.TUNSAFEPTR])
   579  	n.Body.Append(ir.NewAssignStmt(base.Pos, hp, addr))
   580  
   581  	// hn = len(a) * sizeof(elem(a))
   582  	hn := typecheck.TempAt(base.Pos, ir.CurFunc, types.Types[types.TUINTPTR])
   583  	mul := typecheck.Conv(ir.NewBinaryExpr(base.Pos, ir.OMUL, ir.NewUnaryExpr(base.Pos, ir.OLEN, a), ir.NewInt(base.Pos, elemsize)), types.Types[types.TUINTPTR])
   584  	n.Body.Append(ir.NewAssignStmt(base.Pos, hn, mul))
   585  
   586  	var fn ir.Node
   587  	if a.Type().Elem().HasPointers() {
   588  		// memclrHasPointers(hp, hn)
   589  		ir.CurFunc.SetWBPos(wbPos)
   590  		fn = mkcallstmt("memclrHasPointers", hp, hn)
   591  	} else {
   592  		// memclrNoHeapPointers(hp, hn)
   593  		fn = mkcallstmt("memclrNoHeapPointers", hp, hn)
   594  	}
   595  
   596  	n.Body.Append(fn)
   597  
   598  	// For array range clear, also set "i = len(a) - 1"
   599  	if nrange != nil {
   600  		idx := ir.NewAssignStmt(base.Pos, nrange.Key, typecheck.Conv(ir.NewBinaryExpr(base.Pos, ir.OSUB, ir.NewUnaryExpr(base.Pos, ir.OLEN, a), ir.NewInt(base.Pos, 1)), nrange.Key.Type()))
   601  		n.Body.Append(idx)
   602  	}
   603  
   604  	n.Cond = typecheck.Expr(n.Cond)
   605  	n.Cond = typecheck.DefaultLit(n.Cond, nil)
   606  	typecheck.Stmts(n.Body)
   607  	return walkStmt(n)
   608  }
   609
View as plain text