#pragma GCC optimize("O3")
#pragma GCC optimize ("unroll-loops")
#pragma GCC target("avx,avx2,fma")
#include <iostream>
#include <bits/stdc++.h>
using namespace std;

#define ll long long
#define fi first
#define sc second
const int N=505;
char a[N][N];
pair<int,int> disc[N][N];
int dis[N][N],m,n,v[N][N];
int di[4]={0,1,0,-1};
int dj[4]={1,0,-1,0};
void bfs()
{
    set<pair<pair<int,int>,pair<int,int>>>s;
    for(int i=0;i<m;i++)
    {
        for(int j=0;j<n;j++)
        {
            if(a[i][j]=='*')
            {
                s.insert({{0,0},{i,j}});
                disc[i][j]={0,0};

            }
        }
    }
    while(!s.empty())
    {
        pair<int,int> p=s.begin()->sc;
        s.erase(s.begin());
        for(int i=0;i<4;i++)
        {
            if(p.fi+di[i]<m&&p.fi+di[i]>=0&&p.sc+dj[i]>=0&&p.sc+dj[i]<n)
            {
                int x=p.fi+di[i];
                int y=p.sc+dj[i];
                if(max(disc[x][y].fi,disc[x][y].sc)>max(disc[p.fi][p.sc].fi+abs(di[i]),disc[p.fi][p.sc].sc+abs(dj[i])))
                {
                    v[x][y]=1;
                    s.erase({{disc[x][y].fi,disc[x][y].sc},{x,y}});
                    disc[x][y]={disc[p.fi][p.sc].fi+abs(di[i]),disc[p.fi][p.sc].sc+abs(dj[i])};
                    s.insert({{disc[x][y].fi,disc[x][y].sc},{x,y}});
                }
            }
        }
    }
    for(int i=0;i<m;i++)
    {
        for(int j=0;j<n;j++)
        {
            dis[i][j]=max(disc[i][j].fi,disc[i][j].sc);
        }
    }

}
int dp[N][N];
pair<int,int> st,en;
int vis[N][N];
void solve()
{
    set<pair<int,pair<int,int>>>s;
    s.insert({-dis[st.fi][st.sc],{st.fi,st.sc}});
    dp[st.fi][st.sc]=dis[st.fi][st.sc];
    while(!s.empty())
    {
        pair<int,int> p=s.begin()->sc;
        s.erase(s.begin());
        for(int i=0;i<4;i++)
        {
            if(p.fi+di[i]<m&&p.fi+di[i]>=0&&p.sc+dj[i]>=0&&p.sc+dj[i]<n)
            {
                int x=p.fi+di[i];
                int y=p.sc+dj[i];
                if(a[x][y]!='*'&&a[x][y]!='#'&&(!vis[x][y]||dp[x][y]<min(dp[p.fi][p.sc],dis[x][y])))
                {
                    vis[x][y]=1;
                    s.erase({-dp[x][y],{x,y}});
                    dp[x][y]=min(dp[p.fi][p.sc],dis[x][y]);
                    s.insert({-dp[x][y],{x,y}});
                }
            }
        }
    }
}
int main()
{
	cin>>m>>n;
	int x=0;
	en={-1,-1};
	st={-1,-1};
	for(int i=0;i<m;i++)
    {
        for(int j=0;j<n;j++)
        {
            cin>>a[i][j];
            dis[i][j]=1000000;
            disc[i][j]={1000000,100000};
            if(a[i][j]=='*')x++;
            if(a[i][j]=='S')st={i,j};
            if(a[i][j]=='E')en={i,j};
        }
    }
    bfs();
    pair<int,int>p={-1,-1};
    if(en==p)
    {
        cout<<dis[st.fi][st.sc];
        return 0;
    }
    if(st==p)
    {
        st=en;
        cout<<dis[st.fi][st.sc];
        return 0;
    }

    solve();

    if(vis[en.fi][en.sc])
    {
        if(x)cout<<dp[en.fi][en.sc];
        else cout<<"safe";
    }
    else cout<<-1;
	return 0;
}