如何在閃亮的應用程序中獲取父URL

Question

我在我的網站中嵌入了一個帶有iframe的Shiny應用程序，我現在正在嘗試保護我的Shiny應用程序：我希望iframe只能在我的網站上訪問，而不是直接使用其URL。

  <iframe name="rshiny" 
    src="http://url-of-my-shiny-app/" style="border: none; width: 100%;height:800px;">
  </iframe>  

為此，我試圖獲取包含我的Shiny-app內部iframe的父級的URL，並阻止它是否不是好網站。

問題是：我發現如何使用多種語言獲取URL父級，但是R.有誰知道我怎么能這樣做？

我有另一個可能的解決方案，暫時不起作用：

postForm('http://url.php', .params = params, curl = curl, style="POST")

我以為我可以從我的網站向我的R應用程序發送一個post變量，比如一個密鑰，只允許訪問知道密鑰的網站。 但我不能讓它發揮作用。

編輯：我認為這個問題與評論中建議的鏈接不同。 實際上，建議的選項似乎不適用於R Shiny。

Answer 1

我找到了解決方案！

在這里，你可以找到一種方法來獲得閃亮的應用程序中的“GET”變量。 https://github.com/brianbolt/rShinyApps/tree/master/getParameters.shiny 。 在我的PHP代碼中，我計算了一個md5密碼，它取決於日期，每天都要更改，我在iframe中用它作為GET參數：

<iframe name="rshiny" 
    src="youradress?bins=<?php echo $md5password;?">
  </iframe>  

從那時起，我可以直接在我的代碼中使用它（請參閱我共享的代碼中的input$n_breaks ）。 我在我的server.R中創建一個反應函數，它計算相同的md5密碼。

最后，我們將它與參數中給出的密碼進行比較。 如果它是相同的，我們打開圖表，讀取數據......否則，我們只是停止該過程。