NotebookInformation[]

"WindowTitle"/.NotebookInformation[]

WindowSize/.AbsoluteOptions[EvaluationNotebook[]]

NotebookFileName[]

NotebookDirectory[]