feat: add std.PrevRealm

examples/gno.land/p/demo/tests/subtests/subtests.gno

@@ -0,0 +1,17 @@
+package subtests
+
+import (
+	"std"
+)
+
+func CurrentRealmPath() string {
+	return std.CurrentRealmPath()
+}
+
+func GetRealmCaller() std.Address {
+	return std.GetRealmCaller()
+}
+
+func Exec(fn func()) {
+	fn()
+}

examples/gno.land/p/demo/tests/tests.gno

@@ -3,7 +3,9 @@ package tests
 import (
 	"std"
 
+	psubtests "gno.land/p/demo/tests/subtests"
 	"gno.land/r/demo/tests"
+	rtests "gno.land/r/demo/tests"
 )
 
 // IncCounter demonstrates that it's possible to call a realm function from
@@ -51,3 +53,20 @@ func ModifyTestRealmObject2b() {
 func ModifyTestRealmObject2c() {
 	SomeValue3.Field = "modified"
 }
+
+func GetRealmCaller() std.Address {
+	return std.GetRealmCaller()
+}
+
+func GetPSubtestsCaller() std.Address {
+	return psubtests.GetRealmCaller()
+}
+
+func GetRTestsGetRealmCaller() std.Address {
+	return rtests.GetRealmCaller()
+}
+
+// Warning: unsafe pattern.
+func Exec(fn func()) {
+	fn()
+}

examples/gno.land/r/demo/tests/subtests/subtests.gno

@@ -0,0 +1,17 @@
+package subtests
+
+import (
+	"std"
+)
+
+func CurrentRealmPath() string {
+	return std.CurrentRealmPath()
+}
+
+func GetRealmCaller() std.Address {
+	return std.GetRealmCaller()
+}
+
+func Exec(fn func()) {
+	fn()
+}

examples/gno.land/r/demo/tests/tests.gno

@@ -1,6 +1,10 @@
 package tests
 
-import "std"
+import (
+	"std"
+
+	"gno.land/r/demo/tests/subtests"
+)
 
 var counter int
 
@@ -69,3 +73,15 @@ func ModTestNodes() {
 func PrintTestNodes() {
 	println(gTestNode2.Child.Name)
 }
+
+func GetRealmCaller() std.Address {
+	return std.GetRealmCaller()
+}
+
+func GetPSubtestsCaller() std.Address {
+	return subtests.GetRealmCaller()
+}
+
+func Exec(fn func()) {
+	fn()
+}

gnovm/pkg/gnolang/frame.go

@@ -1,6 +1,8 @@
 package gnolang
 
-import "fmt"
+import (
+	"fmt"
+)
 
 //----------------------------------------
 // (runtime) Frame

gnovm/stdlibs/stdlibs.go

@@ -286,6 +286,50 @@ func InjectPackage(store gno.Store, pn *gno.PackageNode) {
 				m.PushValue(res0)
 			},
 		)
+		pn.DefineNative("GetRealmCaller",
+			gno.Flds( // params
+			),
+			gno.Flds( // results
+				"", "Address",
+			),
+			func(m *gno.Machine) {
+				var (
+					ctx = m.Context.(ExecContext)
+					// Default lastCaller is OrigCaller, the signer of the tx
+					lastCaller  = ctx.OrigCaller
+					lastPkgPath = ""
+				)
+
+				for i := m.NumFrames() - 1; i > 0; i-- {
+					fr := m.Frames[i]
+					if fr.LastPackage == nil || !fr.LastPackage.IsRealm() {
+						// Ignore non-realm frame
+						continue
+					}
+					pkgPath := fr.LastPackage.PkgPath
+					if lastPkgPath == "" || lastPkgPath == pkgPath {
+						// Ignore first realm met
+						lastPkgPath = pkgPath
+						continue
+					}
+
+					// second realm met in the frames, it becomes the lastCaller
+					lastCaller = fr.LastPackage.GetPkgAddr().Bech32()
+					// we don't need to iterate further
+					break
+				}
+
+				// Return the result
+				res0 := gno.Go2GnoValue(
+					m.Alloc,
+					m.Store,
+					reflect.ValueOf(lastCaller),
+				)
+				addrT := store.GetType(gno.DeclaredTypeID("std", "Address"))
+				res0.T = addrT
+				m.PushValue(res0)
+			},
+		)
 		pn.DefineNative("GetOrigPkgAddr",
 			gno.Flds( // params
 			),

gnovm/stdlibs/stdshim/stdshim.gno

@@ -36,6 +36,11 @@ func GetOrigSend() Coins {
 	return Coins{}
 }
 
+func GetRealmCaller() Address {
+	panic(shimWarn)
+	return Address("")
+}
+
 func GetOrigCaller() Address {
 	panic(shimWarn)
 	return Address("")

gnovm/tests/file.go

@@ -13,13 +13,12 @@ import (
 	"strconv"
 	"strings"
 
-	"github.com/pmezard/go-difflib/difflib"
-
 	gno "github.com/gnolang/gno/gnovm/pkg/gnolang"
 	"github.com/gnolang/gno/gnovm/stdlibs"
 	"github.com/gnolang/gno/tm2/pkg/crypto"
 	osm "github.com/gnolang/gno/tm2/pkg/os"
 	"github.com/gnolang/gno/tm2/pkg/std"
+	"github.com/pmezard/go-difflib/difflib"
 )
 
 type loggerFunc func(args ...interface{})

gnovm/tests/files/zrealm_crossrealm11.gno

@@ -0,0 +1,134 @@
+// PKGPATH: gno.land/r/crossrealm_test
+package crossrealm_test
+
+import (
+	"std"
+	"strings"
+
+	ptests "gno.land/p/demo/tests"
+	"gno.land/p/demo/ufmt"
+	rtests "gno.land/r/demo/tests"
+	testfoo "gno.land/r/demo/tests_foo"
+)
+
+func getRealmCaller() std.Address {
+	return std.GetRealmCaller()
+}
+
+func Exec(fn func()) {
+	fn()
+}
+
+func main() {
+	// Create a map of the potential callers, this will give more understandable
+	// output than the bech32 addresses.
+	callersByAddr := make(map[std.Address]string)
+	for _, caller := range []string{
+		"user1.gno", "gno.land/r/crossrealm_test", "gno.land/r/demo/tests",
+	} {
+		addr := std.DerivePkgAddr(caller)
+		callersByAddr[addr] = caller
+	}
+
+	tests := []struct {
+		callStackAdd string
+		callerFn     func() std.Address
+	}{
+		{
+			callStackAdd: "",
+			callerFn:     std.GetRealmCaller,
+		},
+		{
+			callStackAdd: " -> r/crossrealm_test.getRealmCaller",
+			callerFn:     getRealmCaller,
+		},
+		{
+			callStackAdd: " -> p/demo/tests",
+			callerFn:     ptests.GetRealmCaller,
+		},
+		{
+			callStackAdd: " -> p/demo/tests -> p/demo/tests/subtests",
+			callerFn:     ptests.GetPSubtestsCaller,
+		},
+		{
+			callStackAdd: " -> r/demo/tests",
+			callerFn:     rtests.GetRealmCaller,
+		},
+		{
+			callStackAdd: " -> r/demo/tests -> r/demo/tests/subtests",
+			callerFn:     rtests.GetPSubtestsCaller,
+		},
+		{
+			callStackAdd: " -> p/demo/tests -> r/demo/tests",
+			callerFn:     ptests.GetRTestsGetRealmCaller,
+		},
+	}
+
+	println("---") // needed to have space prefixes
+	printColumns("STACK", "std.GetRealmCaller")
+	printColumns("-----", "------------------")
+
+	baseCallStack := "user1.gno -> r/crossrealm_test.main"
+	for i, tt := range tests {
+		printColumns(baseCallStack+tt.callStackAdd, callersByAddr[tt.callerFn()])
+		Exec(func() {
+			printColumns(baseCallStack+" -> r/crossrealm_test.Exec"+tt.callStackAdd, callersByAddr[tt.callerFn()])
+		})
+		rtests.Exec(func() {
+			printColumns(baseCallStack+" -> r/demo/tests.Exec"+tt.callStackAdd, callersByAddr[tt.callerFn()])
+		})
+		ptests.Exec(func() {
+			printColumns(baseCallStack+" -> p/demo/tests.Exec"+tt.callStackAdd, callersByAddr[tt.callerFn()])
+		})
+	}
+}
+
+func printColumns(left, right string) {
+	const w = 105
+
+	output := ""
+	padding := w - len(left)
+
+	// strings.Repeat is not always available when using various imports modes.
+	for i := 0; i < padding; i++ {
+		output += " "
+	}
+
+	output += left
+	output += " = "
+	output += right
+	println(output)
+}
+
+// Output:
+// ---
+//                                                                                                     STACK = std.GetRealmCaller
+//                                                                                                     ----- = ------------------
+//                                                                       user1.gno -> r/crossrealm_test.main = user1.gno
+//                                             user1.gno -> r/crossrealm_test.main -> r/crossrealm_test.Exec = user1.gno
+//                                                  user1.gno -> r/crossrealm_test.main -> r/demo/tests.Exec = gno.land/r/demo/tests
+//                                                  user1.gno -> r/crossrealm_test.main -> p/demo/tests.Exec = user1.gno
+//                                   user1.gno -> r/crossrealm_test.main -> r/crossrealm_test.getRealmCaller = user1.gno
+//         user1.gno -> r/crossrealm_test.main -> r/crossrealm_test.Exec -> r/crossrealm_test.getRealmCaller = user1.gno
+//              user1.gno -> r/crossrealm_test.main -> r/demo/tests.Exec -> r/crossrealm_test.getRealmCaller = gno.land/r/demo/tests
+//              user1.gno -> r/crossrealm_test.main -> p/demo/tests.Exec -> r/crossrealm_test.getRealmCaller = user1.gno
+//                                                       user1.gno -> r/crossrealm_test.main -> p/demo/tests = user1.gno
+//                             user1.gno -> r/crossrealm_test.main -> r/crossrealm_test.Exec -> p/demo/tests = user1.gno
+//                                  user1.gno -> r/crossrealm_test.main -> r/demo/tests.Exec -> p/demo/tests = gno.land/r/demo/tests
+//                                  user1.gno -> r/crossrealm_test.main -> p/demo/tests.Exec -> p/demo/tests = user1.gno
+//                              user1.gno -> r/crossrealm_test.main -> p/demo/tests -> p/demo/tests/subtests = user1.gno
+//    user1.gno -> r/crossrealm_test.main -> r/crossrealm_test.Exec -> p/demo/tests -> p/demo/tests/subtests = user1.gno
+//         user1.gno -> r/crossrealm_test.main -> r/demo/tests.Exec -> p/demo/tests -> p/demo/tests/subtests = gno.land/r/demo/tests
+//         user1.gno -> r/crossrealm_test.main -> p/demo/tests.Exec -> p/demo/tests -> p/demo/tests/subtests = user1.gno
+//                                                       user1.gno -> r/crossrealm_test.main -> r/demo/tests = gno.land/r/crossrealm_test
+//                             user1.gno -> r/crossrealm_test.main -> r/crossrealm_test.Exec -> r/demo/tests = gno.land/r/crossrealm_test
+//                                  user1.gno -> r/crossrealm_test.main -> r/demo/tests.Exec -> r/demo/tests = gno.land/r/crossrealm_test
+//                                  user1.gno -> r/crossrealm_test.main -> p/demo/tests.Exec -> r/demo/tests = gno.land/r/crossrealm_test
+//                              user1.gno -> r/crossrealm_test.main -> r/demo/tests -> r/demo/tests/subtests = gno.land/r/demo/tests
+//    user1.gno -> r/crossrealm_test.main -> r/crossrealm_test.Exec -> r/demo/tests -> r/demo/tests/subtests = gno.land/r/demo/tests
+//         user1.gno -> r/crossrealm_test.main -> r/demo/tests.Exec -> r/demo/tests -> r/demo/tests/subtests = gno.land/r/demo/tests
+//         user1.gno -> r/crossrealm_test.main -> p/demo/tests.Exec -> r/demo/tests -> r/demo/tests/subtests = gno.land/r/demo/tests
+//                                       user1.gno -> r/crossrealm_test.main -> p/demo/tests -> r/demo/tests = gno.land/r/crossrealm_test
+//             user1.gno -> r/crossrealm_test.main -> r/crossrealm_test.Exec -> p/demo/tests -> r/demo/tests = gno.land/r/crossrealm_test
+//                  user1.gno -> r/crossrealm_test.main -> r/demo/tests.Exec -> p/demo/tests -> r/demo/tests = gno.land/r/crossrealm_test
+//                  user1.gno -> r/crossrealm_test.main -> p/demo/tests.Exec -> p/demo/tests -> r/demo/tests = gno.land/r/crossrealm_test