// Copyright 2017 syzkaller project authors. All rights reserved.
// Use of this source code is governed by Apache 2 LICENSE that can be found in the LICENSE file.

package prog

import (
	"fmt"

	"github.com/google/syzkaller/sys"
)

func generateSize(arg Arg, lenType *sys.LenType) Arg {
	if arg == nil {
		// Arg is an optional pointer, set size to 0.
		return constArg(lenType, 0)
	}

	switch arg.Type().(type) {
	case *sys.VmaType:
		a := arg.(*PointerArg)
		return constArg(lenType, a.PagesNum*pageSize)
	case *sys.ArrayType:
		a := arg.(*GroupArg)
		if lenType.ByteSize != 0 {
			return constArg(lenType, a.Size()/lenType.ByteSize)
		} else {
			return constArg(lenType, uintptr(len(a.Inner)))
		}
	default:
		if lenType.ByteSize != 0 {
			return constArg(lenType, arg.Size()/lenType.ByteSize)
		} else {
			return constArg(lenType, arg.Size())
		}
	}
}

func assignSizes(args []Arg, parentsMap map[Arg]Arg) {
	// Create a map from field names to args.
	argsMap := make(map[string]Arg)
	for _, arg := range args {
		if sys.IsPad(arg.Type()) {
			continue
		}
		argsMap[arg.Type().FieldName()] = arg
	}

	// Fill in size arguments.
	for _, arg := range args {
		if arg = InnerArg(arg); arg == nil {
			continue // Pointer to optional len field, no need to fill in value.
		}
		if typ, ok := arg.Type().(*sys.LenType); ok {
			a := arg.(*ConstArg)

			buf, ok := argsMap[typ.Buf]
			if ok {
				*a = *generateSize(InnerArg(buf), typ).(*ConstArg)
				continue
			}

			if typ.Buf == "parent" {
				a.Val = parentsMap[arg].Size()
				if typ.ByteSize != 0 {
					a.Val /= typ.ByteSize
				}
				continue
			}

			sizeAssigned := false
			for parent := parentsMap[arg]; parent != nil; parent = parentsMap[parent] {
				if typ.Buf == parent.Type().Name() {
					a.Val = parent.Size()
					if typ.ByteSize != 0 {
						a.Val /= typ.ByteSize
					}
					sizeAssigned = true
					break
				}
			}
			if sizeAssigned {
				continue
			}

			panic(fmt.Sprintf("len field '%v' references non existent field '%v', argsMap: %+v",
				typ.FieldName(), typ.Buf, argsMap))
		}
	}
}

func assignSizesArray(args []Arg) {
	parentsMap := make(map[Arg]Arg)
	foreachArgArray(&args, nil, func(arg, base Arg, _ *[]Arg) {
		if _, ok := arg.Type().(*sys.StructType); ok {
			for _, field := range arg.(*GroupArg).Inner {
				parentsMap[InnerArg(field)] = arg
			}
		}
	})
	assignSizes(args, parentsMap)
	foreachArgArray(&args, nil, func(arg, base Arg, _ *[]Arg) {
		if _, ok := arg.Type().(*sys.StructType); ok {
			assignSizes(arg.(*GroupArg).Inner, parentsMap)
		}
	})
}

func assignSizesCall(c *Call) {
	assignSizesArray(c.Args)
}