// Copyright 2017 Google Inc. All rights reserved.
//
// Licensed under the Apache License, Version 2.0 (the "License");
// you may not use this file except in compliance with the License.
// You may obtain a copy of the License at
//
//     http://www.apache.org/licenses/LICENSE-2.0
//
// Unless required by applicable law or agreed to in writing, software
// distributed under the License is distributed on an "AS IS" BASIS,
// WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
// See the License for the specific language governing permissions and
// limitations under the License.

package parser

import "strings"

type Scope interface {
 Get(name string) string
 Set(name, value string)
 Call(name string, args []string) []string
 SetFunc(name string, f func([]string) []string)
}

type scope struct {
 variables map[string]string
 functions map[string]func([]string) []string
 parent    Scope
}

func (s *scope) Get(name string) string {
 if val, ok := s.variables[name]; ok {
  return val
 } else if s.parent != nil {
  return s.parent.Get(name)
 } else if val, ok := builtinScope[name]; ok {
  return val
 } else {
  return "<'" + name + "' unset>"
 }
}

func (s *scope) Set(name, value string) {
 s.variables[name] = value
}

func (s *scope) Call(name string, args []string) []string {
 if f, ok := s.functions[name]; ok {
  return f(args)
 }

 return []string{"<func:'" + name + "' unset>"}
}

func (s *scope) SetFunc(name string, f func([]string) []string) {
 s.functions[name] = f
}

func NewScope(parent Scope) Scope {
 return &scope{
  variables: make(map[string]string),
  functions: make(map[string]func([]string) []string),
  parent:    parent,
 }
}

var builtinScope map[string]string

func init() {
 builtinScope := make(map[string]string)
 builtinScope[builtinDollar] = "$"
}

func (v Variable) EvalFunction(scope Scope) ([]string, bool) {
 f := v.Name.SplitN(" \t", 2)
 if len(f) > 1 && f[0].Const() {
  fname := f[0].Value(nil)
  if isFunctionName(fname) {
   args := f[1].Split(",")
   argVals := make([]string, len(args))
   for i, a := range args {
    argVals[i] = a.Value(scope)
   }

   if fname == "call" {
    return scope.Call(argVals[0], argVals[1:]), true
   } else {
    return []string{"UNSUPPORTED FUNCTION:" + fname + " " + strings.Join(argVals, " ")}, true
   }
  }
 }

 return []string{""}, false
}

func (v Variable) Value(scope Scope) string {
 if ret, ok := v.EvalFunction(scope); ok {
  if len(ret) > 1 {
   panic("Expected a single value, but instead got a list")
  }
  return ret[0]
 }
 if scope == nil {
  panic("Cannot take the value of a variable in a nil scope")
 }
 return scope.Get(v.Name.Value(scope))
}

func toVariable(ms *MakeString) (Variable, bool) {
 if len(ms.Variables) == 1 && ms.Strings[0] == "" && ms.Strings[1] == "" {
  return ms.Variables[0], true
 }
 return Variable{}, false
}