advent_of_ruby 0.2.0 → 0.3.0

data/data/solutions/github/eregon/2024/04_1.yml

@@ -0,0 +1,72 @@
+---
+- :name: 4a.rb
+  :url: https://github.com/eregon/adventofcode/blob/master/2024
+  :solution: |-
+    def overlapping_scan(string, regexp)
+      offset = 0
+      matches = []
+      while m = regexp.match(string, offset)
+        matches << m
+        offset = m.begin(0) + 1
+      end
+      matches
+    end
+
+    c = $<.read
+    w = c.lines.first.size
+    used = ("." * (w-1) + "\n") * c.lines.size
+    regexps = [
+      /(XMAS)/,
+      /(SAMX)/,
+      *(-2..0).flat_map {
+        [
+          /(X).{#{w+it}}(M).{#{w+it}}(A).{#{w+it}}(S)/m,
+          /(S).{#{w+it}}(A).{#{w+it}}(M).{#{w+it}}(X)/m
+        ]
+      }
+    ]
+    p regexps.sum {
+      overlapping_scan(c, it).each { |m|
+        m.captures.each_index { |i|
+          a, b = m.offset(i+1)
+          used[a...b] = c[a...b]
+        }
+      }
+      overlapping_scan(c, it).size
+    }
+
+    puts used
+- :name: 4a2.rb
+  :url: https://github.com/eregon/adventofcode/blob/master/2024
+  :solution: |-
+    def overlapping_scan(string, regexp)
+      offset = 0
+      matches = []
+      while m = regexp.match(string, offset)
+        matches << m
+        offset = m.begin(0) + 1
+      end
+      matches
+    end
+
+    c = $<.read
+    w = c.lines.first.size
+    regexps = [
+      /XMAS/,
+      /SAMX/,
+      *(-2..0).flat_map {
+        [
+          /X.{#{w+it}}M.{#{w+it}}A.{#{w+it}}S/m,
+          /S.{#{w+it}}A.{#{w+it}}M.{#{w+it}}X/m
+        ]
+      }
+    ]
+    p regexps.sum {
+      overlapping_scan(c, it).size
+    }
+- :name: 4a_golf.rb
+  :url: https://github.com/eregon/adventofcode/blob/master/2024
+  :solution: z=->s,r{o=n=0;(n+=1;s=s[o+1..])while o=r=~s;n};p [-(w=((c=$<.read)=~/$/)+1),-2,-1,0].sum{r=/#{%w[X M A S].join".{#{w+it}}"}/m;z[c,r]+z[c.reverse,r]}
+- :name: 4a_golf2.rb
+  :url: https://github.com/eregon/adventofcode/blob/master/2024
+  :solution: p [-(w=((c=$<.read)=~/$/)+1),-2,-1,0].sum{s=c+??*w+c.reverse;o=n=0;(n+=1;s=s[o+1..])while o=/#{%w[X M A S].join".{#{w+it}}"}/m=~s;n}

data/data/solutions/github/eregon/2024/04_2.yml

@@ -0,0 +1,18 @@
+---
+- :name: 4b.rb
+  :url: https://github.com/eregon/adventofcode/blob/master/2024
+  :solution: |-
+    rows = $<.map{it.chomp.chars}
+
+    map = {}
+    rows.each_with_index { |row,y|
+      row.each_with_index { |c,x|
+        map[x+y.i] = c
+      }
+    }
+
+    p map.each_pair.count { |pos,c|
+      c == "A" and [[1+1i, -1-1i], [1-1i, -1+1i]].count { |d,e|
+        [map[pos+d], map[pos+e]].sort_by(&:to_s) == %w[M S]
+      } >= 2
+    }

data/data/solutions/github/eregon/2024/05_1.yml

@@ -0,0 +1,22 @@
+---
+- :name: 5a.rb
+  :url: https://github.com/eregon/adventofcode/blob/master/2024
+  :solution: |-
+    rules, updates = $<.read.split("\n\n")
+
+    rules = rules.lines.map { |rule| rule.split('|').map(&:to_i) }
+      .group_by { |a,b| a }.transform_values { it.map(&:last) }
+
+    updates = updates.lines.map { |update| update.split(',').map(&:to_i) }
+
+    p updates.select { |pages|
+      pages.each_with_index.all? { |page,i|
+        (after = rules[page]).nil? or after.all? { |a|
+          j = pages.index(a)
+          !j || j > i
+        }
+      }
+    }.sum { it[it.size/2] }
+- :name: 5a_golf.rb
+  :url: https://github.com/eregon/adventofcode/blob/master/2024
+  :solution: 'r={};(c=$<.read).scan(/(.+)\|(.+)/){(r[_1]||=[])<<_2};c[/\n\n/];p$''.lines.map{it.scan /\d+/}.sum{|q|q.none?{|p|r[p]&.any?{q.index(it)&.<q.index p}}?q[q.size/2].to_i: 0}'

data/data/solutions/github/eregon/2024/05_2.yml

@@ -0,0 +1 @@
+--- []

data/data/solutions/github/eregon/2024/06_1.yml

@@ -0,0 +1,34 @@
+---
+- :name: 6a.rb
+  :url: https://github.com/eregon/adventofcode/blob/master/2024
+  :solution: |-
+    map = {}
+    $<.map(&:chomp).each_with_index { |row,y|
+      row.chars.each_with_index { |c,x|
+        map[x+y.i] = c
+      }
+    }
+
+    dirs = [-1i, 1, 1i, -1] * 2
+
+    pos = map.key('^')
+    dir = dirs[0]
+    while map[pos]
+      map[pos] = 'X'
+      while map[pos + dir] == '#'
+        dir = dirs[dirs.index(dir)+1]
+      end
+      pos += dir
+    end
+    p map.values.count('X')
+- :name: 6a_golf.rb
+  :url: https://github.com/eregon/adventofcode/blob/master/2024
+  :solution: |-
+    e=[d=-(w=((m=$<.read)=~/$/)+1),1,w,-1].cycle
+    p=m.index'^'
+    ok=->c{m[c]if c>=0&&m[c]!=?\n}
+    (m[p]=?X;d=e.next while ok[p+d]==?#;p+=d)while ok[p]
+    p m.count'X'
+- :name: 6a_golf2.rb
+  :url: https://github.com/eregon/adventofcode/blob/master/2024
+  :solution: e=[d=-(w=((m=$<.read)=~/$/)+1),1,w,-1].cycle;p=m.index'^';loop{m[p]=?X;d=e.next while((z=m[c=p+d])&&c>=0&&z!=?\n||(p m.count'X';exit))&&z==?#;p=c}

data/data/solutions/github/eregon/2024/06_2.yml

@@ -0,0 +1 @@
+--- []

data/data/solutions/github/eregon/2024/07_1.yml

@@ -0,0 +1,14 @@
+---
+- :name: 7a.rb
+  :url: https://github.com/eregon/adventofcode/blob/master/2024
+  :solution: |-
+    equations = $<.map { it.split(/\D+/).map(&:to_i).then { |res, *operands| [res, operands] } }
+
+    p equations.select { |result, operands|
+      %i[+ *].repeated_permutation(operands.size-1).any? { |operators|
+        operands.inject { |r, n| r.send(operators.shift, n) } == result
+      }
+    }.sum(&:first)
+- :name: 7a_golf.rb
+  :url: https://github.com/eregon/adventofcode/blob/master/2024
+  :solution: p$<.sum{e,*n=it.split(/\D+/).map &:to_i;%i[+ *].repeated_permutation(n.size-1).any?{|o|n.inject{_1.send o.shift,_2}==e}?e:0}

data/data/solutions/github/eregon/2024/07_2.yml

@@ -0,0 +1 @@
+--- []

data/data/solutions/github/eregon/2024/08_1.yml

@@ -0,0 +1 @@
+--- []

data/data/solutions/github/eregon/2024/08_2.yml

@@ -0,0 +1 @@
+--- []

data/data/solutions/github/eregon/2024/09_1.yml

@@ -0,0 +1 @@
+--- []

data/data/solutions/github/eregon/2024/09_2.yml

@@ -0,0 +1 @@
+--- []

data/data/solutions/github/eregon/2024/10_1.yml

@@ -0,0 +1 @@
+--- []

data/data/solutions/github/eregon/2024/10_2.yml

@@ -0,0 +1 @@
+--- []

data/data/solutions/github/eregon/2024/11_1.yml

@@ -0,0 +1 @@
+--- []

data/data/solutions/github/eregon/2024/11_2.yml

@@ -0,0 +1 @@
+--- []

data/data/solutions/github/eregon/2024/12_1.yml

@@ -0,0 +1 @@
+--- []

data/data/solutions/github/eregon/2024/12_2.yml

@@ -0,0 +1 @@
+--- []

data/data/solutions/github/eregon/2024/13_1.yml

@@ -0,0 +1 @@
+--- []

data/data/solutions/github/eregon/2024/13_2.yml

@@ -0,0 +1 @@
+--- []

data/data/solutions/github/eregon/2024/14_1.yml

@@ -0,0 +1 @@
+--- []

data/data/solutions/github/eregon/2024/14_2.yml

@@ -0,0 +1 @@
+--- []

data/data/solutions/github/eregon/2024/15_1.yml

@@ -0,0 +1 @@
+--- []

data/data/solutions/github/eregon/2024/15_2.yml

@@ -0,0 +1 @@
+--- []

data/data/solutions/github/eregon/2024/16_1.yml

@@ -0,0 +1 @@
+--- []

data/data/solutions/github/eregon/2024/16_2.yml

@@ -0,0 +1 @@
+--- []

data/data/solutions/github/eregon/2024/17_1.yml

@@ -0,0 +1,51 @@
+---
+- :name: 17a.rb
+  :url: https://github.com/eregon/adventofcode/blob/master/2024
+  :solution: |-
+    a, b, c, *program = $<.read.scan(/\d+/).map(&:to_i)
+
+    literal = :itself.to_proc
+
+    combo = -> x {
+      case x
+      in 0..3 then x
+      in 4 then a
+      in 5 then b
+      in 6 then c
+      end
+    }
+
+    ip = 0
+
+    instructions = [
+      -> x { a /= (2 ** combo[x]) }, # adv
+      -> x { b ^= literal[x] }, # bxl
+      -> x { b = combo[x] % 8 }, # bst
+      -> x { ip = literal[x] - 2 unless a == 0 }, # jnz
+      -> x { b ^= c }, # bxc
+      -> x { print "#{combo[x] % 8}," }, # out
+      -> x { b = a / (2 ** combo[x]) }, # bdv
+      -> x { c = a / (2 ** combo[x]) }, # cdv
+    ]
+
+    while opcode = program[ip]
+      instructions[opcode][program[ip + 1]]
+      ip += 2
+    end
+
+    puts
+    p [a,b,c]
+- :name: 17a_golf.rb
+  :url: https://github.com/eregon/adventofcode/blob/master/2024
+  :solution: |-
+    a,b,c,*p=$<.read.scan(/\d+/).map &:to_i
+    e=->x{x<4?x:[a,b,c][x-4]}
+    o=i=0
+    # [->{a>>=e[it]},->{b^=it},->{b=e[it]%8},->{a!=0&&i=it},->_{b^=c},->{print"#{e[it]%8},"},->{b=a>>e[it]},->{c=a>>e[it]}][o][p[(i+=2)-1]]while o=p[i]
+    # eval("proc{#{%w[a>>=e[it] b^=it b=e[it]%8 a!=0&&i=it b^=c print"#{e[it]%8}," b=a>>e[it] c=a>>e[it]][o]}}")[p[(i+=2)-1]]while o=p[i]
+    # proc{it=_1;eval(%w[a>>=e[it] b^=it b=e[it]%8 a!=0&&i=it b^=c print"#{e[it]%8}," b=a>>e[it] c=a>>e[it]][o])}[p[(i+=2)-1]]while o=p[i]
+    # (z=p[(i+=2)-1];eval %w[a>>=e[z] b^=z b=e[z]%8 a!=0&&i=z b^=c print"#{e[z]%8}," b=a>>e[z] c=a>>e[z]][o])while o=p[i]
+    eval'z=p[(i+=2)-1];'+%w[a>>=e[z] b^=z b=e[z]%8 a!=0&&i=z b^=c print(e[z]%8,?,) b=a>>e[z] c=a>>e[z]][o]while o=p[i]
+- :name: 17a_golf2.rb
+  :url: https://github.com/eregon/adventofcode/blob/master/2024
+  :solution: a,b,c,*p=$<.read.scan(/\d+/).map &:to_i;e=->x{x<4?x:[a,b,c][x-4]};o=i=0;eval'x=p[(i+=2)-1];'+%w[a>>=e[x] b^=x b=e[x]%8 a!=0&&i=x b^=c print(e[x]%8,?,) b=a>>e[x] c=a>>e[x]][o]while o=p[i]

data/data/solutions/github/eregon/2024/17_2.yml

@@ -0,0 +1,284 @@
+---
+- :name: 17b.rb
+  :url: https://github.com/eregon/adventofcode/blob/master/2024
+  :solution: |-
+    _, _, _, *program = $<.read.scan(/\d+/).map(&:to_i)
+    program.freeze
+
+    run = -> n {
+      a = n
+      b, c = 0, 0
+      ip = 0
+      out = []
+
+      literal = :itself.to_proc
+
+      combo = -> x {
+        case x
+        in 0..3 then x
+        in 4 then a
+        in 5 then b
+        in 6 then c
+        end
+      }
+
+      instructions = [
+        -> x { a /= (2 ** combo[x]) }, # adv
+        -> x { b ^= literal[x] }, # bxl
+        -> x { b = combo[x] % 8 }, # bst
+        -> x { ip = literal[x] - 2 unless a == 0 }, # jnz
+        -> x { b ^= c }, # bxc
+        -> x { out << combo[x] % 8 }, # out
+        -> x { b = a / (2 ** combo[x]) }, # bdv
+        -> x { c = a / (2 ** combo[x]) }, # cdv
+      ]
+
+      while opcode = program[ip]
+        instructions[opcode][program[ip + 1]]
+        ip += 2
+      end
+
+      out
+    }
+
+    p (0..).find { |n| run[n] == program }
+- :name: 17b2.rb
+  :url: https://github.com/eregon/adventofcode/blob/master/2024
+  :solution: |-
+    _, _, _, *program = $<.read.scan(/\d+/).map(&:to_i)
+    program.freeze
+
+    a, b, c = 0, 0, 0
+    ip = 0
+    out = []
+
+    literal = :itself.to_proc
+
+    combo = -> x {
+      case x
+      in 0..3 then x
+      in 4 then a
+      in 5 then b
+      in 6 then c
+      end
+    }
+
+    instructions = [
+      -> x { a /= (2 ** combo[x]) }, # adv
+      -> x { b ^= literal[x] }, # bxl
+      -> x { b = combo[x] % 8 }, # bst
+      -> x { ip = literal[x] - 2 unless a == 0 }, # jnz
+      -> x { b ^= c }, # bxc
+      -> x { out << combo[x] % 8 }, # out
+      -> x { b = a / (2 ** combo[x]) }, # bdv
+      -> x { c = a / (2 ** combo[x]) }, # cdv
+    ]
+
+    compiled = program.each_slice(2).map { |opcode, operand|
+      instr = instructions.fetch(opcode)
+      -> { instr[operand] }
+    }
+
+    run = -> n {
+      a = n
+      b, c = 0, 0
+      ip = 0
+      out = []
+
+      while op = compiled[ip / 2]
+        op.()
+        ip += 2
+      end
+
+      out
+    }
+
+    p (0..).find { |n| run[n] == program }
+- :name: 17b3.rb
+  :url: https://github.com/eregon/adventofcode/blob/master/2024
+  :solution: |-
+    _, _, _, *program = $<.read.scan(/\d+/).map(&:to_i)
+
+    compiled = []
+
+    compiled << <<~RUBY.chomp
+    def run(n)
+      a = n
+      b, c = 0, 0
+      ip = 0
+      out = []
+      -> {
+    RUBY
+
+    combo = -> x {
+      case x
+      in 0..3 then x
+      in 4 then "a"
+      in 5 then "b"
+      in 6 then "c"
+      end
+    }
+
+    program.each_slice(2) { |opcode, x|
+      compiled << " " * 4 + case %i[adv bxl bst jnz bxc out bdv cdv][opcode]
+      in :adv then "a = a / (2 ** #{combo[x]})"
+      in :bxl then "b ^= #{x}"
+      in :bst then "b = #{combo[x]} % 8"
+      in :jnz then
+        raise "jnz #{x}" unless x == 0
+        "redo unless a == 0"
+      in :bxc then "b ^= c"
+      in :out then "out << #{combo[x]} % 8"
+      in :bdv then "b = a / (2 ** #{combo[x]})"
+      in :cdv then "c = a / (2 ** #{combo[x]})"
+      end
+    }
+
+    compiled << <<~RUBY
+      }.()
+      out
+    end
+    RUBY
+
+    compiled = compiled.join("\n")
+
+    puts compiled
+    eval compiled
+
+    $n = 0
+
+    Thread.new {
+      loop {
+        sleep 1
+        p $n
+      }
+    }
+
+    p (0..).find { |n|
+      $n = n
+      run(n) == program
+    }
+- :name: 17b4.rb
+  :url: https://github.com/eregon/adventofcode/blob/master/2024
+  :solution: |-
+    _, _, _, *PROGRAM = $<.read.scan(/\d+/).map(&:to_i)
+
+    compiled = []
+
+    compiled << <<~RUBY.chomp
+    def run(n)
+      a = n
+      b, c = 0, 0
+      ip = 0
+      out = []
+      -> {
+    RUBY
+
+    combo = -> x {
+      case x
+      in 0..3 then x
+      in 4 then "a"
+      in 5 then "b"
+      in 6 then "c"
+      end
+    }
+
+    PROGRAM.each_slice(2) { |opcode, x|
+      compiled << " " * 4 + case %i[adv bxl bst jnz bxc out bdv cdv][opcode]
+      in :adv then "a = a / (2 ** #{combo[x]})"
+      in :bxl then "b ^= #{x}"
+      in :bst then "b = #{combo[x]} % 8"
+      in :jnz then
+        raise "jnz #{x}" unless x == 0
+        "redo unless a == 0"
+      in :bxc then "b ^= c"
+      in :out then
+        "out << #{combo[x]} % 8; return false unless out.last == PROGRAM[out.size-1]"
+      in :bdv then "b = a / (2 ** #{combo[x]})"
+      in :cdv then "c = a / (2 ** #{combo[x]})"
+      end
+    }
+
+    compiled << <<~RUBY
+      }.()
+      out
+    end
+    RUBY
+
+    compiled = compiled.join("\n")
+
+    puts compiled
+    eval compiled
+
+    $n = 0
+
+    Thread.new {
+      loop {
+        sleep 1
+        p $n
+      }
+    }
+
+    p (0..).find { |n|
+      $n = n
+      run(n) == PROGRAM
+    }
+- :name: 17b5.rb
+  :url: https://github.com/eregon/adventofcode/blob/master/2024
+  :solution: |-
+    # Copied from 17b4.rb output
+    def run(n)
+      a = n
+      b, c = 0, 0
+      ip = 0
+      out = []
+      -> {
+        b = a % 8
+        b ^= 1
+        c = a / (2 ** b)
+        b ^= 4
+        b ^= c
+
+        a /= 8
+
+        out << b % 8
+        return false unless out.last == Program[out.size-1]
+
+        redo unless a == 0
+      }.()
+      out
+    end
+
+    Program = [2,4,1,1,7,5,1,4,0,3,4,5,5,5,3,0]
+
+    def iter(a)
+      b = a % 8
+      b ^= 1
+      c = a / (2 ** b)
+      b ^= 4
+      b ^= c
+
+      a /= 8
+
+      b % 8
+    end
+
+    FOUND = []
+
+    def find(i, a)
+      if i < 0
+        FOUND << a
+      else
+        d = Program[i]
+        (0...8).each { |n|
+          v = n + (a << 3)
+          if iter(v) == d
+            find(i-1, v)
+          end
+        }
+      end
+    end
+
+    find(Program.size - 1, 0)
+    p run(FOUND.min)
+    p FOUND.min

data/data/solutions/github/eregon/2024/18_1.yml

@@ -0,0 +1 @@
+--- []

data/data/solutions/github/eregon/2024/18_2.yml

@@ -0,0 +1 @@
+--- []

data/data/solutions/github/eregon/2024/19_1.yml

@@ -0,0 +1 @@
+--- []

data/data/solutions/github/eregon/2024/19_2.yml

@@ -0,0 +1 @@
+--- []

data/data/solutions/github/eregon/2024/20_1.yml

@@ -0,0 +1 @@
+--- []

data/data/solutions/github/eregon/2024/20_2.yml

@@ -0,0 +1 @@
+--- []

data/data/solutions/github/eregon/2024/21_1.yml

@@ -0,0 +1 @@
+--- []

data/data/solutions/github/eregon/2024/21_2.yml

@@ -0,0 +1 @@
+--- []

data/data/solutions/github/eregon/2024/22_1.yml

@@ -0,0 +1 @@
+--- []

data/data/solutions/github/eregon/2024/22_2.yml

@@ -0,0 +1 @@
+--- []

data/data/solutions/github/eregon/2024/23_1.yml

@@ -0,0 +1 @@
+--- []

data/data/solutions/github/eregon/2024/23_2.yml

@@ -0,0 +1 @@
+--- []

data/data/solutions/github/eregon/2024/24_1.yml

@@ -0,0 +1 @@
+--- []

data/data/solutions/github/eregon/2024/24_2.yml

@@ -0,0 +1 @@
+--- []

data/data/solutions/github/eregon/2024/25_1.yml

@@ -0,0 +1 @@
+--- []

data/data/solutions/github/erikw/2015/01_1.yml

@@ -0,0 +1,14 @@
+---
+- :name: part1.rb
+  :url: https://github.com/erikw/advent-of-code-solutions/blob/main/2015/01
+  :solution: |-
+    floor = 0
+    ARGF.readline.split('').each do |c|
+      case c
+      when '('
+        floor += 1
+      when ')'
+        floor -= 1
+      end
+    end
+    puts floor

data/data/solutions/github/erikw/2015/01_2.yml

@@ -0,0 +1,19 @@
+---
+- :name: part2.rb
+  :url: https://github.com/erikw/advent-of-code-solutions/blob/main/2015/01
+  :solution: |-
+    floor = 0
+    instruction = 0
+    ARGF.readline.split('').each do |c|
+      instruction += 1
+      case c
+      when '('
+        floor += 1
+      when ')'
+        floor -= 1
+      end
+      if floor == -1
+        puts instruction
+        return
+      end
+    end

data/data/solutions/github/erikw/2015/02_1.yml

@@ -0,0 +1,11 @@
+---
+- :name: part1.rb
+  :url: https://github.com/erikw/advent-of-code-solutions/blob/main/2015/02
+  :solution: |-
+    paper = ARGF.each_line.map { |l| l.split('x').map(&:to_i) }.map do |l, w, h|
+      lw = l * w
+      wh = w * h
+      hl = h * l
+      2 * lw + 2 * wh + 2 * hl + [lw, wh, hl].min
+    end.sum
+    puts paper