rearchitectured, simple AI for code finding

bofa/src/main/scala/bot/Bofa.scala

@@ -1,21 +1,45 @@
 package bot
 
 import scala.io.StdIn
-
-package object bot {
-  val Dbg: Boolean = true
-  val Log: Boolean = true
-  
-  def dbg(msg: String) = if(Dbg) Console.err.println(msg)
-  def log(msg: String) = if(Log) Console.err.println(msg)
-}
+import DebugUtil.{log,dbg,time}
 
 object Main {
   def main(args: Array[String]) = {
-    var input = StdIn.readLine()
     
-    while(input != null){
-      Parser.dispatch(input) foreach (println(_))
+    var input: String = ""
+    
+    //Initialize general game settings
+    input = StdIn.readLine()
+    while (input startsWith "settings") {
+      S parse input
+      input = StdIn.readLine()
+    }
+    
+    log("init current state")
+    val currentState = new State()
+    log("init cortex")
+    val cortex = new Cortex()
+    
+    log("init debug")
+    DebugUtil.state = Some(currentState)
+    
+    
+    // Main loop
+    while (input != null ){
+      def cmd: Seq[String] = input.split(" ")
+      
+      // dispatch
+      cmd match {
+        case Seq("update", _*)             => currentState parse input
+        case Seq("action", "character", _) => println ("bixiette")
+        case Seq("action", "move", t)      => {
+          log(s"Timebank: $t")
+          val move: Direction = cortex move (currentState, t.toInt)
+          log (move.label)
+          println (move.label)
+        }                                     
+      }
+      
       input = StdIn.readLine()
     }
   }

bofa/src/main/scala/bot/Brain.scala

@@ -1,13 +0,0 @@
-package bot
-
-import scala.util.Random
-import bot.dbg
-
-object Brain {
-  def move(time: Int): String = {
-    val dirs = Array("left", "right", "up", "down")
-    val dir = Random.nextInt(4)
-    
-    dirs(dir)
-  }
-}

bofa/src/main/scala/bot/Cortex.scala

@@ -0,0 +1,152 @@
+package bot
+
+import scala.util.Random
+import DebugUtil.{ log, dbg, time }
+import scala.collection.mutable
+
+sealed trait Direction {
+  val label: String
+  val deltaX: Int
+  val deltaY: Int
+  override def toString: String = label
+}
+final case object Left extends { val label = "left"; val deltaX = -1; val deltaY = 0 } with Direction
+final case object Right extends { val label = "right"; val deltaX = 1; val deltaY = 0 } with Direction
+final case object Up extends { val label = "up"; val deltaX = 0; val deltaY = -1 } with Direction
+final case object Down extends { val label = "down"; val deltaX = 0; val deltaY = 1 } with Direction
+
+class Cortex {
+  def move(state: State, time: Int): Direction = {
+    val directions: Seq[Direction] = possibleDirections(state.bofaField, state)
+    val weightBoard = weightCodes(1000, decr, state)
+    val dir = getMaxDir(state.bofaField, directions, weightBoard, state)
+    weightBoard(state.bofaField.x)(state.bofaField.y) = -999
+    printBoard(weightBoard)
+    
+    dir
+  }
+  
+  def decr(dist: Int, start: Int) = {
+    (start/math.pow(2, (dist+1))).intValue()
+  }
+  
+  def getMaxField(weightBoard: Array[Array[Int]], state: State): Field = {
+    var maxField = (0,0)
+    for (x <- 0 until S.width; y <- 0 until S.height) {
+      if (weightBoard(x)(y) > weightBoard(maxField _1)(maxField _2)) maxField = (x,y) 
+    }
+    
+    state.board(maxField _1)(maxField _2)
+  }
+  
+  def shortestPathTo(field: Field, state: State) = {
+    0
+  }
+  
+  def getMaxDir(field: Field, directions: Seq[Direction], weightBoard: Array[Array[Int]], state: State): Direction = {
+    var maxDir: Direction = randomDirection(directions)
+    val board = state.board
+    
+    for (d <- directions){
+      var (x,y) = (field.x+d.deltaX, field.y+d.deltaY)
+      if ( d.equals(Left) && board(field.x)(field.y).citizens.contains(Gate("l")) ) x = S.width-1
+      else if ( d.equals(Right) && board(field.x)(field.y).citizens.contains(Gate("r")) ) x = 0
+      
+      if (weightBoard(x)(y) > weightBoard(field.x+maxDir.deltaX)(field.y+maxDir.deltaY)) maxDir = d
+    }
+    
+    maxDir
+  }
+
+  def possibleDirections(field: Field, state: State): Seq[Direction] = {
+    val pd = new mutable.ListBuffer[Direction]
+    val board = state.board
+
+    val toCheck = checkBorder(field, state)
+    
+    for (d <- toCheck) {
+      if ( d == Left && board(field.x)(field.y).citizens.contains(Gate("l")) ) pd += d
+      else if ( d == Right && board(field.x)(field.y).citizens.contains(Gate("r")) ) pd += d
+      else {
+        val pfield = board(field.x + d.deltaX)(field.y + d.deltaY)
+        if (!(pfield.citizens contains Wall)) {
+          pd += d
+        }
+      }
+    }
+    
+    pd
+  }
+  
+  def weightCodes(start: Int, drop: (Int, Int) => Int, state: State): Array[Array[Int]] = {
+    val board = state.board
+    val codes = state.codes
+    val weightBoard = Array.ofDim[Int](S.width, S.height)
+    
+    log(s"Codes: ${codes.length}")
+    
+    
+    for (code <- codes) {
+      val visited = Array.ofDim[Boolean](S.width, S.height)
+      for (x <- 0 until S.width; y <- 0 until S.height) visited(x)(y) = false
+      
+      var coords: Seq[Field] = Seq.empty    
+      val frontier = new mutable.ListBuffer[Field]
+      
+      frontier += code
+      var weight = start
+      var dist = 0
+      
+      while (weight >= drop(dist, start) && !frontier.isEmpty) {
+        coords = frontier.toList
+        frontier.clear()
+        
+        for(field <- coords){
+          val dirs = possibleDirections(field, state)
+          for (d <- dirs) {
+            var (x,y) = (field.x+d.deltaX, field.y+d.deltaY)
+            if ( d == Left && board(field.x)(field.y).citizens.contains(Gate("l")) ) x = S.width-1
+            else if ( d == Right && board(field.x)(field.y).citizens.contains(Gate("r")) ) x = 0
+
+            if (!visited(x)(y)) frontier += board(x)(y)
+          }
+        
+          if (!visited(field.x)(field.y)) weightBoard(field.x)(field.y) += weight
+          visited(field.x)(field.y) = true
+        }
+           
+        weight -= drop(dist, start)
+        dist += 1
+      }
+    }
+    
+    weightBoard
+  }
+  
+  def checkBorder(field: Field, state: State): Seq[Direction] = {
+    val dirs = new mutable.ListBuffer[Direction]
+    
+    if (field.y != 0) dirs += Up
+    if (field.y != (S.height-1)) dirs += Down
+    if (field.x != 0 || field.citizens.contains(Gate("l"))) dirs += Left
+    if (field.x != (S.width-1) || field.citizens.contains(Gate("r"))) dirs += Right
+    
+    dirs
+  }
+
+  def randomDirection(directions: Seq[Direction]) = directions(Random.nextInt(directions.length))
+  
+  def printBoard(board: Array[Array[Int]]) = {
+    val btp = board.transpose
+    val buf = new StringBuilder
+    buf append "\n+" + "-" * (S.width * 10) + "+" + "\n"
+    for (line <- btp) {
+      buf append s"""|${line.map(_.toString.padTo(4, ' ')).mkString("|")}|"""
+      buf append "\n+" + "-" * (S.width * 10) + "+" + "\n"
+    }
+
+    log(buf toString)
+  }
+}
+
+  

bofa/src/main/scala/bot/DebugUtil.scala

@@ -0,0 +1,25 @@
+package bot
+
+object DebugUtil {
+  var state: Option[State] = None // we need this to get access to the current game round
+  val Dbg: Boolean = true
+  val Log: Boolean = true
+  val Time: Boolean = true
+  
+  def dbg(msg: String) = if(Dbg) Console.err.println(s"$round $msg")
+  def log(msg: String) = if(Log) Console.err.println(s"$round $msg")
+  
+  def round: String = if (state.isDefined) s"[${state.get.round}]" else ""
+  
+  def time[R](name: String)(block: => R): R = {
+    if(Time){
+      val t0 = System.nanoTime()
+      val result = block    // call-by-name
+      val t1 = System.nanoTime()
+      log(s"$name: " + (t1 - t0)/1000000.0 + "ms")
+      result
+    }else{
+      block
+    }
+  }
+}

bofa/src/main/scala/bot/Extracted.scala

@@ -0,0 +1,5 @@
+package bot
+
+trait Extracted
+
+

bofa/src/main/scala/bot/Parser.scala

@@ -1,74 +0,0 @@
-package bot
-
-import bot.{dbg,log}
-
-object Parser {
-  
-  def dispatch(input: String): Option[String] = {
-      val parts: Seq[String] = input.split(" ")
-      
-      parts match {
-        case Seq("settings", xs@_*)           => settings(xs); None
-        case Seq("update", xs@_*)             => update(xs); None
-        case Seq("action", "character", _)    => Some("bixiette")
-        case Seq("action", "move", time)      => Some(Brain.move(time.toInt))
-      }
-  }
-  
-  def settings(setting: Seq[String]): Unit = {
-    val splitNames = setting(1).split(",")
-  
-    setting(0) match {
-      case "timebank"      => Settings.timebank    = setting(1).toInt
-      case "time_per_move" => Settings.timePerMove = setting(1).toInt
-      case "your_botid"    => Settings.bofaId      = setting(1).toInt
-      case "field_width"   => Settings.width       = setting(1).toInt
-      case "field_height"  => Settings.height      = setting(1).toInt
-      case "max_rounds"    => Settings.maxRounds   = setting(1).toInt
-      
-      case "your_bot"      => Settings.bofaName    = setting(1)
-      case "player_names"  => Settings.player1Name = splitNames(0)
-                              Settings.player2Name = splitNames(1)
-      // case _ => let MatchError through, don't try recovering
-    }
-  }
-     
-  def update(update: Seq[String]): Unit = {  
-     val cs = CurrentState
-     
-     update match {
-       case Seq("game", "round", newround)        => cs.round = newround.toInt
-       case Seq("game", "field", cellstring)      => cells(cellstring)
-       case Seq(playerName, "snippets", snippets) => cs.playerBy(playerName).snippets = snippets.toInt
-       case Seq(playerName, "bombs", bombs)       => cs.playerBy(playerName).bombs = bombs.toInt
-     }
-   }
-   
-   def cells(cellstring: String): Unit = {
-     val cellParts = cellstring.split(",")
-     val board = CurrentState.board
-     
-     for(cellId <- 0 until cellParts.length) {
-       val (x: Int, y: Int) = (cellId % Settings.width, cellId / Settings.width)
-       val cellCmd = cellParts(cellId).toCharArray()
-              
-       cellCmd(0) match {
-         case '.' => board.put(EmptyCell(x,y))
-         case 'x' => board.put(Wall(x,y))
-         case 'P' => board.put(PlayerPos(x,y, cellCmd(1).toInt))
-         case 'G' => board.put(Gate(x,y, cellCmd(1).toString()))
-         case 'E' => board.put(BugPos(x,y, cellCmd(1).toInt))
-         case 'C' => board.put(CodePos(x,y))
-         case 'S' => {
-           if(cellCmd.length == 2)  board.put(BugSpawner(x,y, Some(cellCmd(1).toInt)))
-           else                     board.put(BugSpawner(x,y, None))
-         }
-         case 'B'  => {
-           if(cellCmd.length == 2)  board.put(BombPos(x,y, Some(cellCmd(1).toInt)))
-           else                     board.put(BombPos(x,y, None))
-         }
-       }
-     }
-   }
-
-}

bofa/src/main/scala/bot/Settings.scala

@@ -0,0 +1,46 @@
+package bot
+
+import DebugUtil.{log,dbg,time}
+
+/** Settings holder containing global settings set in the beginning. Only set once per game. */
+object S {
+  var timebank: Int = -1
+  var timePerMove: Int = -1
+  var width: Int = -1
+  var height: Int = -1
+  var maxRounds: Int = -1
+  var players: Seq[String] = Seq()
+  var bofaId: Int = -1
+  var bofaName: String = ""
+
+  def oppoId       = 1-bofaId
+  def oppoName     = players(oppoId)
+  
+  def parse(setting: String): Unit = {
+    val parts = setting.split(" ")
+  
+    parts(1) match {
+      case "timebank"      => timebank    = parts(2).toInt
+      case "time_per_move" => timePerMove = parts(2).toInt
+      case "your_botid"    => bofaId      = parts(2).toInt
+      case "field_width"   => width       = parts(2).toInt
+      case "field_height"  => height      = parts(2).toInt
+      case "max_rounds"    => maxRounds   = parts(2).toInt
+      case "your_bot"      => bofaName    = parts(2)
+      case "player_names"  => players     = parts(2).split(",")
+      // case _ => let MatchError through, don't try recovering
+    }
+  }
+ 
+  override def toString: String = {
+    s"""
+      Settings {
+        .timebank     = $timebank
+        .timePerMove  = $timePerMove
+        .width        = $width
+        .height       = $height
+        .maxRounds    = $maxRounds
+      }
+    """
+  }
+}

bofa/src/main/scala/bot/State.scala

@@ -1,123 +1,142 @@
 package bot
 
-import bot.dbg
+import scala.collection.Seq
+import DebugUtil.{ log, dbg, time }
 
-class Field(val x: Int, val y: Int){
-  override def toString: String = s"Field { .x = $x, .y = $y }"
+/** Field of the game board
+ *  
+ *  The field knows its citizens and location in the world
+ *  for faster access
+ */
+class Field(val x: Int, val y: Int, var citizens: Seq[Citizen]) {
+  def this(x: Int, y: Int) = this(x, y, Seq.empty)
+  
+  override def toString(): String = s"""($x,$y): ${citizens.map(_.getClass.getSimpleName).mkString(",")}"""
+}
+object Field {
+  val empty: Field = new Field(-1, -1)
+  
+  def apply(x: Int, y: Int): Field = new Field (x, y)
+  def apply(x: Int, y: Int, citizen: Seq[Citizen]): Field = Field (x, y, citizen)
 }
 
-// static fields
-case class EmptyCell  (x0: Int, y0: Int)                       extends Field(x0,y0)
-case class Wall       (x0: Int, y0: Int)                       extends Field(x0,y0)
-case class Gate       (x0: Int, y0: Int, direction: String)    extends Field(x0,y0)
-case class BugSpawner (x0: Int, y0: Int, rounds: Option[Int])  extends Field(x0,y0)
-// dynamic fields
-case class PlayerPos  (x0: Int, y0: Int, id: Int)              extends Field(x0,y0)
-case class BugPos     (x0: Int, y0: Int, ai: Int)              extends Field(x0,y0)
-case class BombPos    (x0: Int, y0: Int, rounds: Option[Int])  extends Field(x0,y0)
-case class CodePos    (x0: Int, y0: Int)                       extends Field(x0,y0)
-
-
-class Player(id: Int){
-  val name: String = Settings.players(id)
+/** Potential population of the game board */
+sealed trait Citizen
+final case object Floor                            extends Citizen
+final case object Wall                             extends Citizen
+final case object Code                             extends Citizen
+final case class Gate      (direction: String)     extends Citizen
+final case class Spawner   (rounds: Option[Int])   extends Citizen
+final case class Bug       (ai: Int)               extends Citizen
+final case class Bomb      (rounds: Option[Int])   extends Citizen
+final case class Player    (id: Int, name: String) extends Citizen {
   var snippets: Int = 0
   var bombs: Int = 0
-  
-  override def toString = s"Player { .name = $name, .snippets = $snippets, .bombs = $bombs }"
 }
 
-class Board {
-  // index top-left (0,0) to bottom-right (Settings.width,Settings.height)
-  private val _board: Array[Array[Field]] = Array.ofDim[Field](Settings.width, Settings.height)
+/** A State in the game
+ * 	
+ * 	A state consists at minimum of a populated game board and two players.
+ */
+class State {
+  // index top-left (0,0) to bottom-right (S.width,S.height)
+  val board: Array[Array[Field]] = Array.ofDim[Field](S.width, S.height)
+  for (i <- board.indices; j <- board(i).indices) board(i)(j) = Field (i, j) // init board
+
+  var round: Int = -1 // may not be set
+  var bofa: Player = new Player(S.bofaId, S.bofaName)
+  var oppo: Player = new Player(S.oppoId, S.oppoName)
+
+  var bofaField: Field = Field.empty
+  var oppoField: Field = Field.empty
   
-  def put(field: Field){
-    _board(field.x)(field.y) = field
-  }
-  
-  override def toString = {
-    val btp = _board.transpose
-    val buf = new StringBuilder
-    buf append "+" + "-" * (Settings.width*10+Settings.width*3-1) + "+" + "\n"
-    for(j <- 0 until Settings.height){
-      buf append s"""| ${btp(j) map (_.getClass.getSimpleName().padTo(10, ' ')) mkString (" | ")} |\n"""
+  var codes: Seq[Field] = Seq.empty
+  var bombs: Seq[Field] = Seq.empty
+  var bugs: Seq[Field] = Seq.empty
+
+  def update(x: Int, y: Int, citizens: Seq[Citizen]) {
+    val field = board(x)(y)
+    field.citizens = citizens
+
+    for (citizen <- citizens) {
+      citizen match {
+        case Player(id, name) if id == S.bofaId => bofaField = field
+        case Player(id, name) if id == S.oppoId => oppoField = field
+        
+        case Code     => codes = codes :+ field
+        case Bomb (_) => bombs = bombs :+ field
+        case Bug  (_) => bugs = bugs  :+ field
+        
+        case _ =>
+      }
     }
-    buf append "+" + "-" * (Settings.width*10+Settings.width*3-1) + "+" + "\n"
+  }
+
+  def playerBy(id: Int) = if (id == (S.bofaId)) bofa else oppo
+  def playerBy(name: String) = if (name equals (S.bofaName)) bofa else oppo
+
+  def parse(update: String): Unit = { 
+    val cmd: Seq[String] = update split (" ") tail
+
+    cmd match {
+      case Seq("game", "round", uround)     => round = uround.toInt
+      case Seq("game", "field", cellstring) => parseCells(cellstring)
+      case Seq(name, "snippets", snippets)  => playerBy(name).snippets = snippets.toInt
+      case Seq(name, "bombs", bombs)        => playerBy(name).bombs = bombs.toInt
+      // case _ => let MatchError through, don't try recovering
+    }
+  }
+
+  def parseCells(cellstring: String): Unit = {
+    codes = Seq.empty
+    bombs = Seq.empty
+    bugs = Seq.empty
+    
+    val cellParts = cellstring.split(",")
+
+    for (cellId <- 0 until cellParts.length) {
+      val (x: Int, y: Int) = (cellId % S.width, cellId / S.width)
+      val citizens: Array[Citizen] =
+        cellParts(cellId).split(";")
+          .map(_.toCharArray())
+          .map {
+            case Array('.')            => Floor
+            case Array('x')            => Wall
+            case Array('P', id)        => playerBy(id.asDigit)
+            case Array('G', direction) => Gate(direction.toString)
+            case Array('E', ai)        => Bug(ai.asDigit)
+            case Array('C')            => Code
+            case Array('S')            => Spawner(None)
+            case Array('S', time @ _*) => Spawner(Some(time.mkString.toInt))
+            case Array('B')            => Bomb(None)
+            case Array('B', time @ _*) => Bomb(Some(time.mkString.toInt))
+          }
+
+      update(x, y, citizens)
+    }
+  }
+
+  override def toString = {
+    val btp = board.transpose
+    val buf = new StringBuilder
+    buf append "\n+" + "-" * (S.width * 10 + S.width * 3 - 1) + "+" + "\n"
+    for (line <- btp) {
+      val maxCitizens = line map (_.citizens.length) max
+
+      for (citizenCounter <- 0 until maxCitizens) {
+        for (field <- line) {
+          if (field.citizens.length > citizenCounter)
+            buf append s"""| ${field.citizens(citizenCounter).getClass.getSimpleName().padTo(10, ' ')} """
+          else
+            buf append s"| ${" " * 10} "
+        }
+        buf append "|\n"
+      }
+      buf append "+" + "-" * (S.width * 10 + S.width * 3 - 1) + "+" + "\n"
+    }
+
     buf toString
   }
 }
 
-class State {
-  val bofa: Player = new Player(Settings.bofaId)
-  val oppo: Player = new Player(2)
-  val board: Board = new Board()
-
-  def playerBy(name: String) = if (name equals bofa.name) bofa else oppo
-}
-
-object CurrentState extends State {
-   var round: Int = 1
-}
-
-
-/** Settings holder containing global settings set only once per game.
- *  
- *  These settings should not change after initialization and
- *  stay constant for the whole game.
- */
-object Settings {
-  private var _timebank:     Option[Int]     = None
-  private var _timePerMove:  Option[Int]     = None 
-  private var _player1Name:  Option[String]  = None
-  private var _player2Name:  Option[String]  = None
-  private var _bofaName:     Option[String]  = None
-  private var _bofaId:       Option[Int]     = None
-  private var _width:        Option[Int]     = None
-  private var _height:       Option[Int]     = None
-  private var _maxRounds:    Option[Int]     = None
-  
-      
-  /* Get Option or fail with exception
-   *  Don't try to be smart but just fail if settings not initialized properly
-   */
-  def timebank     = _timebank.get
-  def timePerMove  = _timePerMove.get
-  def player1Name  = _player1Name.get
-  def player2Name  = _player2Name.get
-  def bofaName     = _bofaName.get
-  def bofaId       = _bofaId.get
-  def width        = _width.get
-  def height       = _height.get
-  def maxRounds    = _maxRounds.get
-  
-  def timebank_=    (value: Int)    = _timebank     = Some(value)
-  def timePerMove_= (value: Int)    = _timePerMove  = Some(value)
-  def player1Name_= (value: String) = _player1Name  = Some(value)
-  def player2Name_= (value: String) = _player2Name  = Some(value)
-  def bofaName_=    (value: String) = _bofaName     = Some(value)
-  def bofaId_=      (value: Int)    = _bofaId       = Some(value)
-  def width_=       (value: Int)    = _width        = Some(value)
-  def height_=      (value: Int)    = _height       = Some(value)
-  def maxRounds_=   (value: Int)    = _maxRounds    = Some(value)
-  
-  def oppoName = if(bofaId == 1) player2Name else player1Name
-  def oppoId = if(bofaId == 1) 2 else 1
-  def players(id: Int) = if(id == 1) player1Name else player2Name
-  
-  override def toString: String = {
-    s"""
-      Settings {
-        .timebank     = ${_timebank.getOrElse("Not Set")}
-        .timePerMove  = ${_timePerMove.getOrElse("Not Set")}
-        .player1Name  = ${_player1Name.getOrElse("Not Set")}
-        .player2Name  = ${_player2Name.getOrElse("Not Set")}
-        .bofaName     = ${_bofaName.getOrElse("Not Set")}
-        .bofaId       = ${_bofaId.getOrElse("Not Set")}
-        .width        = ${_width.getOrElse("Not Set")}
-        .height       = ${_height.getOrElse("Not Set")}
-        .maxRounds    = ${_maxRounds.getOrElse("Not Set")}
-      }
-    """
-  }
-}
-