Add temporary implementation of FallingColors/HexMod#412 since there's no 1.20 gloop

Author: object-Object

Common/src/main/kotlin/gay/object/hexdebug/blocks/focusholder/FocusHolderBlockEntity.kt

@@ -35,7 +35,13 @@ class FocusHolderBlockEntity(pos: BlockPos, state: BlockState) :
 
     override fun readIotaTag() = iotaHolder?.readIotaTag()
 
-    override fun writeIota(iota: Iota?, simulate: Boolean) = iotaHolder?.writeIota(iota, simulate) ?: false
+    override fun writeIota(iota: Iota?, simulate: Boolean): Boolean {
+        val success = iotaHolder?.writeIota(iota, simulate) ?: false
+        if (!simulate && success) {
+            sync() // sync container to clients, eg. to update scrying lens readout
+        }
+        return success
+    }
 
     override fun writeable() = iotaHolder?.writeable() ?: false
 

Common/src/main/kotlin/gay/object/hexdebug/casting/actions/OpReadBlock.kt

@@ -0,0 +1,31 @@
+package gay.`object`.hexdebug.casting.actions
+
+import at.petrak.hexcasting.api.casting.castables.ConstMediaAction
+import at.petrak.hexcasting.api.casting.eval.CastingEnvironment
+import at.petrak.hexcasting.api.casting.getBlockPos
+import at.petrak.hexcasting.api.casting.iota.Iota
+import at.petrak.hexcasting.api.casting.mishaps.MishapBadBlock
+import gay.`object`.hexdebug.utils.findDataHolder
+
+// temporary implementation of FallingColors/HexMod#412 since there's no 1.20 gloop
+object OpReadBlock : ConstMediaAction {
+    override val argc = 1
+
+    override fun execute(
+        args: List<Iota>,
+        env: CastingEnvironment,
+    ): List<Iota> {
+        val pos = args.getBlockPos(0, argc)
+
+        env.assertPosInRange(pos)
+
+        val datumHolder = findDataHolder(env.world, pos)
+            ?: throw MishapBadBlock.of(pos, "iota.read")
+
+        val datum = datumHolder.readIota(env.world)
+            ?: datumHolder.emptyIota()
+            ?: throw MishapBadBlock.of(pos, "iota.read")
+
+        return listOf(datum)
+    }
+}

Common/src/main/kotlin/gay/object/hexdebug/casting/actions/OpWriteBlock.kt

@@ -0,0 +1,50 @@
+package gay.`object`.hexdebug.casting.actions
+
+import at.petrak.hexcasting.api.addldata.ADIotaHolder
+import at.petrak.hexcasting.api.casting.ParticleSpray
+import at.petrak.hexcasting.api.casting.RenderedSpell
+import at.petrak.hexcasting.api.casting.castables.SpellAction
+import at.petrak.hexcasting.api.casting.eval.CastingEnvironment
+import at.petrak.hexcasting.api.casting.getBlockPos
+import at.petrak.hexcasting.api.casting.iota.Iota
+import at.petrak.hexcasting.api.casting.mishaps.MishapBadBlock
+import at.petrak.hexcasting.api.casting.mishaps.MishapOthersName
+import gay.`object`.hexdebug.utils.findDataHolder
+import net.minecraft.world.phys.Vec3
+
+// temporary implementation of FallingColors/HexMod#412 since there's no 1.20 gloop
+object OpWriteBlock : SpellAction {
+    override val argc = 2
+
+    override fun execute(
+        args: List<Iota>,
+        env: CastingEnvironment,
+    ): SpellAction.Result {
+        val pos = args.getBlockPos(0, argc)
+        val datum = args[1]
+
+        env.assertPosInRange(pos)
+
+        val datumHolder = findDataHolder(env.world, pos)
+            ?: throw MishapBadBlock.of(pos, "iota.write")
+
+        if (!datumHolder.writeIota(datum, true))
+            throw MishapBadBlock.of(pos, "iota.write")
+
+        val trueName = MishapOthersName.getTrueNameFromDatum(datum, null)
+        if (trueName != null)
+            throw MishapOthersName(trueName)
+
+        return SpellAction.Result(
+            Spell(datum, datumHolder),
+            0,
+            listOf(ParticleSpray(pos.center, Vec3(1.0, 0.0, 0.0), 0.25, 3.14, 40))
+        )
+    }
+
+    private data class Spell(val datum: Iota, val datumHolder: ADIotaHolder) : RenderedSpell {
+        override fun cast(env: CastingEnvironment) {
+            datumHolder.writeIota(datum, false)
+        }
+    }
+}

Common/src/main/kotlin/gay/object/hexdebug/registry/HexDebugActions.kt

@@ -9,9 +9,7 @@ import at.petrak.hexcasting.common.casting.actions.spells.OpMakePackagedSpell
 import at.petrak.hexcasting.common.items.magic.ItemPackagedHex
 import at.petrak.hexcasting.common.lib.HexRegistries
 import at.petrak.hexcasting.common.lib.hex.HexActions
-import gay.`object`.hexdebug.casting.actions.OpBreakpoint
-import gay.`object`.hexdebug.casting.actions.OpIsDebugging
-import gay.`object`.hexdebug.casting.actions.OpNextEvalIndex
+import gay.`object`.hexdebug.casting.actions.*
 
 object HexDebugActions : HexDebugRegistrar<ActionRegistryEntry>(HexRegistries.ACTION, { HexActions.REGISTRY }) {
     val IS_DEBUGGING = make("const/debugging", HexDir.EAST, "qqqqqewaa", OpIsDebugging)
@@ -25,6 +23,10 @@ object HexDebugActions : HexDebugRegistrar<ActionRegistryEntry>(HexRegistries.AC
         OpMakePackagedSpell(HexDebugItems.DEBUGGER.value as ItemPackagedHex, 10 * MediaConstants.CRYSTAL_UNIT)
     }
 
+    // temporary implementation of FallingColors/HexMod#412 since there's no 1.20 gloop
+    val BLOCK_READ = make("block_read", HexDir.EAST, "aqqqqqeawqwaw", OpReadBlock)
+    val BLOCK_WRITE = make("block_write", HexDir.EAST, "deeeeeqdwewewewdw", OpWriteBlock)
+
     private fun make(name: String, startDir: HexDir, signature: String, action: Action) =
         make(name, startDir, signature) { action }
 

Common/src/main/kotlin/gay/object/hexdebug/utils/Utils.kt

@@ -1,6 +1,14 @@
 package gay.`object`.hexdebug.utils
 
+import at.petrak.hexcasting.api.addldata.ADIotaHolder
 import at.petrak.hexcasting.xplat.IXplatAbstractions
+import net.minecraft.core.BlockPos
 import net.minecraft.world.item.ItemStack
+import net.minecraft.world.level.Level
 
 fun isIotaHolder(stack: ItemStack) = IXplatAbstractions.INSTANCE.findDataHolder(stack) != null
+
+fun findDataHolder(world: Level, pos: BlockPos): ADIotaHolder? {
+    return world.getBlockState(pos).block as? ADIotaHolder
+        ?: world.getBlockEntity(pos) as? ADIotaHolder
+}