JScriptInclude Gear - Механизм каскадного импорта скриптов/библиотек.

Rumata, спасибо ... но все же не все ваши замечания "в яблочко", особенно про область видимости, но об этом отдельно.
за "Вражеский язык" - стыдно, все поправил, и в коде и в посте.

3.И самый интересный момент
Да, действительно eval() отработает в контексте include() и все объявленное через ключевое слово var
умрет вместе с include.[[scope]]... ну так никто и не говорил что Вы не можете объявляться в библиотеках глобально
Я собственно именно это и имел в виду... Я немного переработал пример, чтобы этот момент уточнить.

То, что эта проблема не решается средствами языка, это понятно. В этом случае советую делать предобработку используемого кода. Это означает всякие придуманные фишки (инклуды, лямбды, LinQ и т.п.) заменять родным скриптом.

Например, сначала надо провести анализ какие библиотеки требуются для выполнения кода, затем просто все соединить в один файл. А далее по желанию: LibName.InnerVariable или - Variable in Global Context.

Ура, Ура, Ура !!!
Возрадуйтесь товарищи
готово - вот Вам пример, новой инкарнации моего механизма JScriptInclude... распаковываем => заходим в MainDir => стартуем mainScript.js (наслаждаемся )
Теперь все подключаемое импортируется прямо в глобальный [[scope]](это скрытый объект-хранилище доступных сущностей "область видимости", для тех кто ECMA не читал ),
Как и обещал - победил неудобство "инкогнито" объявления сущностей без ключевого слова var в основной стек
цена сией победы, требование к выполнению eval(jsImport.initialization), после описания подключений в вызывающем скрипте.
Есть лишь определенные требования к описанию относительных путей:
1) если необходимо подключить скрипт из той-же директории, то вид должен быть следующий
"\\имя_скрипта.js"
2) вглубь по лесу(древу каталогов), соответсвенно вида
"\\каталог_вглубь\\имя_скрипта.js"
3) вверх по лесу(древу каталогов), обозначается добавлением предшествующих точек, количество точек прямо пропорционально количеству шагов вверх по дереву каталогов, т.е.
...\\имя_скрипта.js выводит нас на три каталога вверх от родительского, например при
расположении вызывающего jsImport.include("...\\test.js") расположенного в D:\1\2\3\4\5\
механизм будет пытаться импортировать D:\1\2\test.js

Желательно описывать сам механизм имменно в вызывающем скрипте, хотя если вы заметили написан он таким образом,
что даже если он и будет в подключаемом скрипте, ничего не произойдет.

Прошу Вас протестировать, сие ноу-хау ну и соответственно, если все "бэнч!", то переписываю первый пост в теме.

Вот листинг mainScript.js, код механизма в таком виде занимает 2,8 Кб

if (typeof jsImport == "undefined"){var jsImport = new Object(); jsImport.initialization = "";};
if (typeof fso == "undefined"){var fso = new ActiveXObject("Scripting.FileSystemObject")};
if (typeof LoadedLibs == "undefined"){var LoadedLibs = []};
if (typeof SourseBuffer == "undefined"){SourseBuffer = [];}
 
 if(typeof  jsImport.include !== "function"){
        jsImport.include = function (TargetScript, ParentDir){
			if (typeof ParentDir == "undefined"){ParentDir = WScript.ScriptFullName.replace(/[^\\]+$/, '');};
		 
			PathValidation(ParentDir)		
 
            for (i in LoadedLibs){
                if(i == TargetScript){AlreadyLoaded = true}
            };
 
            if(typeof AlreadyLoaded == 'undefined' || AlreadyLoaded !== true){
                if(fso.FileExists(TargetScript)){				
                    var SourseBuffer = fso.OpenTextFile(TargetScript).ReadAll();
					var includeArray = includePharser()
					jsImport.initialization =  jsImport.initialization + SourseBuffer 										
						if(includeArray.length != 0){					
							for(i in includeArray){	
								jsImport.include(includeArray[i].replace(/\\\\/, "\\"), TargetScript.replace(/[^\\]+$/,""))						
							};
						};					
					LoadedLibs.push(TargetScript)
					AlreadyLoaded = false;
                } else { 				
                    WScript.Echo("Target " + TargetScript + " not found")					
                };
 
                 function StepOutside(outside){
                    return outside.substring(0, outside.lastIndexOf("\\"))
                };				
				
				function includePharser(){
					var pattern =  /jsImport.include\("(.*?)"\)/g;
					var result;
					var includeArray = [];					
						while ( (result = pattern.exec(SourseBuffer)) != null) {
							includeArray.push(result[1])
							SourseBuffer = SourseBuffer.replace(result[0],"")
							pattern.lastIndex = 0
						};
					return includeArray;
				};
				
				function PathValidation(ParentDir){		
					if(TargetScript.charAt(1) !== ":"){
						var dot = TargetScript.charAt(0)					   
						if(dot  == "."){
							var OutsidePath = ParentDir, counter= -1;                    		 
								while(dot == "."){
									counter++
									dot = TargetScript.charAt(counter);
									OutsidePath = StepOutside(OutsidePath);
								};		 
							TargetScript = OutsidePath + TargetScript.substring(counter);
							dot = "undefined"; counter = "undefined"; OutsidePath = "undefined"; AlreadyLoaded = 'undefined';
						} else {
							TargetScript = ParentDir + TargetScript.substring(1)
						};
					};
				};
				
            };
 
        };
    };
 
jsImport.include("\\EmbeddedDir\\EmbeddedScript.js")
jsImport.include("\\SecondIncludeTest.js")
eval(jsImport.initialization)
 
SecondIncludeFunction()
OutsideFunction()
EmbeddedFunction()
WScript.Echo(Embedded.Constant)
WScript.Echo(Embedded3)

И минимизированный вариант кода механизма (для тех кому глаз режет ) код механизма в таком виде занимает 2,05 Кб

if(typeof jsImport=="undefined"){var jsImport=new Object();jsImport.initialization=""};if(typeof fso=="undefined"){var fso=new ActiveXObject("Scripting.FileSystemObject")};if(typeof LoadedLibs=="undefined"){var LoadedLibs=[]};if(typeof SourseBuffer=="undefined"){SourseBuffer=[]}if(typeof jsImport.include!=="function"){jsImport.include=function(TargetScript,ParentDir){if(typeof ParentDir=="undefined"){ParentDir=WScript.ScriptFullName.replace(/[^\\]+$/,'')};PathValidation(ParentDir);for(i in LoadedLibs){if(i==TargetScript){AlreadyLoaded=true}};if(typeof AlreadyLoaded=='undefined'||AlreadyLoaded!==true){if(fso.FileExists(TargetScript)){var SourseBuffer=fso.OpenTextFile(TargetScript).ReadAll();var includeArray=includePharser();jsImport.initialization=jsImport.initialization+SourseBuffer;if(includeArray.length!=0){for(i in includeArray){jsImport.include(includeArray[i].replace(/\\\\/,"\\"),TargetScript.replace(/[^\\]+$/,""))}};LoadedLibs.push(TargetScript);AlreadyLoaded=false}else{WScript.Echo("Target "+TargetScript+" not found")};function StepOutside(outside){return outside.substring(0,outside.lastIndexOf("\\"))};function includePharser(){var pattern=/jsImport.include\("(.*?)"\)/g;var result;var includeArray=[];while((result=pattern.exec(SourseBuffer))!=null){includeArray.push(result[1]);SourseBuffer=SourseBuffer.replace(result[0],"");pattern.lastIndex=0};return includeArray};function PathValidation(ParentDir){if(TargetScript.charAt(1)!==":"){var dot=TargetScript.charAt(0);if(dot=="."){var OutsidePath=ParentDir,counter=-1;while(dot=="."){counter++;dot=TargetScript.charAt(counter);OutsidePath=StepOutside(OutsidePath)};TargetScript=OutsidePath+TargetScript.substring(counter);dot="undefined";counter="undefined";OutsidePath="undefined";AlreadyLoaded='undefined'}else{TargetScript=ParentDir+TargetScript.substring(1)}}}}}};

ну и для совсем минималисов-параноиков минимализированный и обфусцированный, код механизма в таком виде занимает - 1,66 Кб

eval(function(p,a,c,k,e,d){e=function(c){return(c<a?'':e(parseInt(c/a)))+((c=c%a)>35?String.fromCharCode(c+29):c.toString(36))};if(!''.replace(/^/,String)){while(c--){d[e(c)]=k[c]||e(c)}k=[function(e){return d[e]}];e=function(){return'\\w+'};c=1};while(c--){if(k[c]){p=p.replace(new RegExp('\\b'+e(c)+'\\b','g'),k[c])}}return p}('3(7 6=="5"){4 6=D O();6.o=""};3(7 k=="5"){4 k=D V("M.G")};3(7 l=="5"){4 l=[]};3(7 8=="5"){8=[]}3(7 6.j!=="d"){6.j=d(2,a){3(7 a=="5"){a=u.F.h(/[^\\\\]+$/,\'\')};x(a);C(i y l){3(i==2){f=w}};3(7 f==\'5\'||f!==w){3(k.H(2)){4 8=k.I(2).J();4 9=s();6.o=6.o+8;3(9.E!=0){C(i y 9){6.j(9[i].h(/\\\\\\\\/,"\\\\"),2.h(/[^\\\\]+$/,""))}};l.A(2);f=R}z{u.S("T "+2+" U Q")};d t(n){B n.r(0,n.P("\\\\"))};d s(){4 p=/6.j\\("(.*?)"\\)/g;4 m;4 9=[];v((m=p.L(8))!=K){9.A(m[1]);8=8.h(m[0],"");p.N=0};B 9};d x(a){3(2.q(1)!==":"){4 e=2.q(0);3(e=="."){4 c=a,b=-1;v(e=="."){b++;e=2.q(b);c=t(c)};2=c+2.r(b);e="5";b="5";c="5";f=\'5\'}z{2=a+2.r(1)}}}}}};',58,58,'||TargetScript|if|var|undefined|jsImport|typeof|SourseBuffer|includeArray|ParentDir|counter|OutsidePath|function|dot|AlreadyLoaded||replace||include|fso|LoadedLibs|result|outside|initialization|pattern|charAt|substring|includePharser|StepOutside|WScript|while|true|PathValidation|in|else|push|return|for|new|length|ScriptFullName|FileSystemObject|FileExists|OpenTextFile|ReadAll|null|exec|Scripting|lastIndex|Object|lastIndexOf|found|false|Echo|Target|not|ActiveXObject'.split('|'),0,{}))

Rumata, согласен
можете предложить более лаконичный вариант ? я был бы рад... (и наверное не один я)

PS: код действительно сыроват... но с поставленной задачей справляется, не так ли ?
Если у меня дойдут руки - перепишу, нет, так может кто ни будь другой подсобит...
Тем более за неимением альтернатив - и в таком виде штука вполне пригодная (ИМХО)
Я ее реализовывал в первую очередь для собственных нужд, меня собственно и первый
вариант вполне себе устраивал...

PPS:

ИМХО - излишне критично, и предвзято...
просто прочитать файл и выполнить - это две строки кода

var Sourse = fso.OpenTextFile("какой-то файл").ReadAll();
eval(Sourse)

а раз я использовал 60 - строк, наверное на то есть причины... мне не хочется верить что здесь
меня принимают совсем за дурака
код не подвергался ни оптимизации, ни адаптации... в основном для удобства отладки писался
более развернуто... (вменяемого дебагера для WSH-скриптов кроме как тащить себе монстра VisualStudio
я не нашел, хотя и не искал особо).

Оправдываюсь как маленький, честное слово, но я тут у Вас человек новый... маленьким можно

Отлично, давайте бадаться... (по доброму, кодо-дескутировать)

Давайте же сравнивать... да начнется шоу!

1) Строк кода (без пустых строк, с построчно раскрытыми блоками)
     JScriptInclude  - 60 строк               
     "функция эмуляции подключения..." - 24 строки
JScriptInclude - 0 баллов
"функция эмуляции подключения..." - 5 баллов (я бы даже 10 дал, но мы же по честному)

2.1) Возможность использования абсолютного пути
Запускаем скрипт в каталоге D:\Main\test.js пытаемся подключить D:\Main\Embedded\Embedded.js с содержимым

var WOW = "WOW it's work"

JScriptInclude  - Да   

jsImport.include("D:\\MainDir\\Embedded\\Embedded.js")
eval(jsImport.initialization)
WScript.Echo(WOW)

"функция эмуляции подключения..." - Судя по всему  - Да, но толку нет

reqire("D:\\MainDir\\Embedded\\Embedded.js")
eval(reqire.cache)
WScript.Echo(WOW)

- получаем ошибку "WOW - определение отсутствует"
JScriptInclude - 5 баллов
"функция эмуляции подключения..." - 0 баллов

2.2) Возможность подключения скриптов из родительского каталога
Запускаем скрипт в каталоге D:\Main\test.js пытаемся подключить D:\Main\Embedded.js с содержимым

var WOW = "WOW it's work"

JScriptInclude  - Да   

jsImport.include("\\Embedded.js")
eval(jsImport.initialization)
WScript.Echo(WOW)

"функция эмуляции подключения..." - Судя по всему  - Да, но толку нет

reqire("Embedded.js")
eval(reqire.cache)
WScript.Echo(WOW)

- получаем ошибку "WOW - определение отсутствует"
JScriptInclude - 5 баллов
"функция эмуляции подключения..." - 0 баллов

2.3) Возможность подключения скриптов из дочернего каталога (вверх по лесу/древу каталогов)
Запускаем скрипт в каталоге D:\Main\test.js пытаемся подключить D:\Main\Embedded\Embedded.js с содержимым

var WOW = "WOW it's work"

JScriptInclude  - Да   

jsImport.include("\\Embedded\\Embedded.js")
eval(jsImport.initialization)
WScript.Echo(WOW)

"функция эмуляции подключения..." - Судя по всему НЕТ

reqire("Embedded.js")
eval(reqire.cache)
WScript.Echo(WOW)

- пробовал и "\\Embedded\\Embedded.js" и "Embedded\\Embedded.js" и все равно ошибка "File not found D:\Embedded\Embedded.js"
ладно, не удивляемся идем дальше.
JScriptInclude - 5 баллов
"функция эмуляции подключения..." - 0 баллов

2.3) Возможность подключения скриптов из родительских каталогов (вниз по лесу/древу каталогов)
Запускаем скрипт в каталоге D:\Main\test.js пытаемся подключить D:\Embedded.js с содержимым

var WOW = "WOW it's work"

JScriptInclude  - Да   

jsImport.include(".\\Embedded.js")
eval(jsImport.initialization)
WScript.Echo(WOW)

"функция эмуляции подключения..." - НЕТ, она такую плюшку даже не предусматривает.
JScriptInclude - 5 баллов
"функция эмуляции подключения..." - 0 баллов

3) Возможность каскадного импорта библиотек, т.е. импорт скриптов, которые подключаю другие скрипты через тот-же синтаксис, и механизм
Запускаем скрипт в каталоге D:\Main\test.js пытаемся подключить D:\Embedded.js с содержимым

jsImport.include("\\Embedded\\Embedded2.js") // D:\Main\Embedded\Embedded2.js - содержимое var WOW2 = "WOW2 it's work"
var WOW = "WOW it's work"

JScriptInclude  - Да   

jsImport.include(".\\Embedded.js")
eval(jsImport.initialization)
WScript.Echo(WOW)
WScript.Echo(WOW2)

JScriptInclude - 5 баллов
"функция эмуляции подключения..." - 0 баллов

примеры обоих скриптов с окружением для теста - дабы не быть голословным

итак подведем итоги:
JScriptInclude - 25 баллов
"функция эмуляции подключения..." - 5 баллов (Учитывая что вообще ни разу не сделала то для чего предназначалась)

С нетерпением жду РЕВАНШ !

Полностью согласен с Вами, по поводу относительных путей...
это я обязательно переделаю... вы абсолютно правы, что я реализовал
не очевидный способ... (будем делать так как общепринято)
Вы конечно уже поправили, но не reqire, я взял из секции "Пример", предыдущей версии
ну и о главном

я почти то же самое говорил постом ранее

Извиняюсь за резкий ответ на критику (обоснованную)... мой вариант был не из  лучших, и тут собственно Ваш код... ну меня и понесло

PS: я просмотрел Ваш вариант, кое что подало парочку идей... спасибо.

Сомнительно. Файл подключается ради тех самых сущностей, которые в нем описаны. А вот ошибки времени выполнения скрипта в eval - абсолютно не информативны, так как покажут номер строки родительского файла, где описан вызов функции eval. Что значит, что таким способом подключаемые скрипты не отладишь.

Поэтому функции, подобно описанным в этой теме считаю, малополезными и ненадежными. В крайнем случае, один скрипт можно подключить по схеме open/read/eval. Если Вам необходимо много файлов - пишите wsf-файл.

Механизм переработан с учетом сделанных замечаний см. первый пост в топике.

Решение коллеги JSman лучше.