dyndoc-ruby-core 1.0.0

data/share/R/tools/dynMsys2.R

@@ -0,0 +1,54 @@
+# The goal is to tranform an MINGW naming file into a MSYS2 naming file
+
+DyndocMsys2.root_path <- function(pa=NULL) {
+  rp <- Sys.getenv("DYNDOC_MSYS2_ROOT")
+  if(rp=="") {
+    rp <- strsplit(Sys.getenv("WD"),'\\\\')[[1]]
+    rp[1]<-substring(rp[1],1,1)
+    rp <- c("",rp)
+  }
+  if(!is.null(pa)) rp <- c(rp,pa)
+  paste(rp,collapse="/")
+}
+
+
+
+DyndocMsys2.global_msys2_path<-function(pa){
+  if((substring(pa,1,1) %in% c("C","c","D","d","E","e","Z","z")) && substring(pa,2,2)==":")  {
+    # global mingw path
+    sep <- if(substring(pa,3,3)=="\\") '\\\\' else '/'
+    paste(c("",substring(pa,1,1),strsplit(substring(pa,4),sep)[[1]]),collapse="/")
+  } else {
+    NULL
+  }
+}
+
+DyndocMsys2.global_mingw_path<-function(pa){
+  if((substring(pa,1,1) %in% c("C","c","D","d","E","e","Z","z")) && substring(pa,2,2)==":")  {
+    # global mingw path
+    sep <- if(substring(pa,3,3)=="\\") '\\\\' else '/'
+    paste(substring(pa,1,1),paste(c("",strsplit(substring(pa,4),sep)[[1]]),collapse="/"),sep=":")
+  } else {
+    NULL
+  }
+}
+
+DyndocMsys2.global_path <- function(pa) {
+  root_pa <- DyndocMsys2.root_path()
+  if(substring(pa,1,1)=="/") {
+    # supposed to be from inside root of msys2 system (i.e. /<nodrive-rep>/...)
+    paste(c(root_pa,substring(pa,2)),collapse="/")
+  } else {
+    DyndocMsys2.global_mingw_path(pa)
+  }
+}
+
+DyndocMsys2.home_path <- function(pa=NULL) paste(c(DyndocMsys2.root_path(),"home",Sys.getenv("USERNAME"),pa),collapse="/")
+
+tempdir <- function() DyndocMsys2.global_mingw_path(base:::tempdir())
+
+tempfile <- function(...) DyndocMsys2.global_mingw_path(base:::tempfile(...))
+
+system.file <- function(...) DyndocMsys2.global_mingw_path(base:::system.file(...))
+
+save(tempdir,tempfile,system.file,list=ls(pat="DyndocMsys2*"),file="file_tools.RData")

data/share/julia/dynArray.jl

@@ -0,0 +1,93 @@
+# include("ruby.jl")
+
+module Dyndoc
+
+import Base.setindex!,Base.getindex,Base.IO,Base.show,Base.showarray
+importall Ruby
+
+export DynVector,DynArray,getindex,setindex!,show,Vector,sync,getkey
+
+# this is just a wrapper of Vector type with update of all connected vectors
+# when change on the vector occurs 
+
+
+type DynVector
+	ary::Vector
+	key::ASCIIString
+
+	DynVector(a::Vector,k::ASCIIString)=(x=new();x.ary=a;x.key=k;x)
+end
+
+function getindex(dynvect::DynVector,i::Integer)
+	#if Ruby.alive() Ruby.run("Dyndoc::Vector[\""*dynvect.key*"\"].sync_to(:jl)") end
+	dynvect.ary[i]
+end
+
+function setindex!(dynvect::DynVector,value,i::Integer)
+	dynvect.ary[i]=value
+	## println("inisde vect:",Ruby.alive())
+	if Ruby.alive() 
+		Ruby.run("Dyndoc::Vector[\""*dynvect.key*"\"].sync(:jl)") 
+	end
+end
+
+show(io::IO,dynvect::DynVector)=showarray(io,dynvect.ary)
+
+# gather all the julia vectors connected to dyndoc.
+
+type DynArray
+	vars::Dict
+
+	DynArray()=(x=new();x.vars=Dict();x)
+end
+
+global const Vec=DynArray()
+
+function getindex(dynary::DynArray,key::ASCIIString)
+	#println("getindex(" * key * ")->todo")
+	#if Ruby.alive()
+		#println("getindex(" * key * ")->to sync")
+		#Ruby.run("Dyndoc::Vector[\""*key*"\"].sync_to(:jl)") 
+	#end
+	#println("getindex(" * key * ")->done")
+	dynary.vars[key]
+end
+getindex(dynary::DynArray,key::Symbol)=getindex(dynary,string(key))
+
+function setindex!(dynary::DynArray,value,key::ASCIIString)
+	#println("key:" * key)
+	#println(keys(dynary.vars))
+	if(haskey(dynary.vars,key))
+		#println("haskey" * key)
+		dynary.vars[key].ary=value
+	else
+		dynary.vars[key]=DynVector(value,key)
+	end
+
+	## println("inside array:",Ruby.alive())
+	
+	if Ruby.alive()
+		Ruby.run("Dyndoc::Vector[\""*key*"\"].sync(:jl)")
+	end
+end
+setindex!(dynary::DynArray,value,key::Symbol)=setindex!(dynary,value,string(key))
+
+
+sync(dynary::DynArray,key::ASCIIString)= if Ruby.alive() Ruby.run("Dyndoc::Vector[\""*key*"\"].sync(:jl)") end
+
+show(io::IO,dynary::DynArray)=show(io,dynary.vars)
+
+# NO MORE KEY WITH THE FORM "<name>@<ruby id object>"
+# function getkey(dynary::DynArray,k::Symbol)
+# 	for k2 in keys(dynary.vars)  
+# 	 	if split(k2,"@")[1] == string(k)
+# 	 		return k2
+# 	 	end
+# 	end
+# 	return "#undef"
+# end
+# getindex(dynary::DynArray,key::Symbol)=getindex(dynary,getkey(dynary,key))
+# setindex!(dynary::DynArray,value,key::Symbol)=setindex!(dynary,value,getkey(dynary,key))
+
+end
+

data/share/julia/dyndoc.jl

@@ -0,0 +1,110 @@
+#cmd="a=1\n(a)\nfor i in 1:3\nprintln(i)\nend"
+
+# # Unused! See capture_julia
+# function capture_cmd(cmd::String)
+# 	add,cmd0=true,String[]
+# 	res=Any[] #Dict{String,Any}()
+# 	for l=split(cmd,"\n")
+# 		#println("l => ",l)
+# 		push!(cmd0,l) 
+# 		pcmd0=Base.parse_input_line(join(cmd0,"\n"))
+# 		#print(join(cmd0,"\n")*":");println(pcmd0)
+# 		add = typeof(pcmd0)==Expr && pcmd0.head == :continue
+# 		if !add 
+# 			#print("ici:")
+# 			#println(Base.eval(pcmd0))
+# 			push!(res,(join(cmd0,"\n"),eval(pcmd0))) 
+# 			cmd0=String[] 
+# 		end
+# 		#println(res)
+# 	end
+# 	res
+# end
+
+module DyndocSandbox
+	importall Ruby
+	importall Dyndoc
+
+    # Replace OUTPUT_STREAM references so we can capture output.
+    OUTPUT_STREAM = IOBuffer()
+    print(x) = Base.print(OUTPUT_STREAM, x)
+    println(x) = Base.println(OUTPUT_STREAM, x)
+
+    # Output
+    MIME_OUTPUT = Array(Tuple, 0)
+    emit(mime, data) = push!(MIME_OUTPUT, (mime, data))
+end
+
+function get_stdout_iobuffer()
+	#seek(DyndocSandbox.OUTPUT_STREAM, 0)
+	#jl4rb_out = 
+	takebuf_string(DyndocSandbox.OUTPUT_STREAM)
+	#truncate(DyndocSandbox.OUTPUT_STREAM, 0)
+	#jl4rb_out
+end
+
+function get_stderr_iobuffer()
+	#jl4rb_out = takebuf_string(STDERR.buffer)
+	#jl4rb_out
+	## THIS FAILS WHEN DYNDOC DAEMONIZED SO AUTOMATIC EMPTY RESULT for now
+	## MAYBE TO DELETE SOON!
+	""
+end
+
+# export weave
+# module DyndocSandbox
+#     # Copied from Gadfly.jl/src/weave.jl 
+#     # Replace OUTPUT_STREAM references so we can capture output.
+#     OUTPUT_STREAM = IOString()
+#     print(x) = Base.print(OUTPUT_STREAM, x)
+#     println(x) = Base.println(OUTPUT_STREAM, x)
+
+#     function eval(expr)
+#     	result = try 
+#             Base.eval(DyndocSandbox, expr)
+#             seek(DyndocSandbox.OUTPUT_STREAM, 0)
+#         	output = takebuf_string(DyndocSandbox.OUTPUT_STREAM)
+#         	truncate(DyndocSandbox.OUTPUT_STREAM, 0)
+#         	output
+#         catch e
+#             io = IOBuffer()
+#             print(io, "ERROR: ")
+#             Base.error_show(io, e)
+#             tmp = bytestring(io)
+#             close(io)
+#             tmp
+#         end
+#         result
+#     end
+# end
+
+function capture_julia(cmd::String)
+	add,cmd0=true,String[]
+	res=Any[] #Dict{String,Any}()
+	#println(cmd)
+	for l=split(cmd,"\n")
+		#println("l => ",l)
+		push!(cmd0,l) 
+		pcmd0=Base.parse_input_line(join(cmd0,"\n"))
+		#print(join(cmd0,"\n")*":");println(pcmd0)
+		add = typeof(pcmd0)==Expr && pcmd0.head == :incomplete
+		if !add 
+			#print("ici:")
+			#println(Base.eval(pcmd0))
+			result,error = "","" 
+			try 
+				result=eval(DyndocSandbox, pcmd0)
+			catch e
+	            #io = IOBuffer()
+	            #print(io, "ERROR: ")
+	            #Base.error_show(io, e)
+	            error = "Error: $(string(e))"
+	            #close(io)
+	        end
+			push!(res,(join(cmd0,"\n"),string(result),get_stdout_iobuffer(),error,get_stderr_iobuffer())) 
+			cmd0=String[] 
+		end
+		#println(res)
+	end
+	res
+end

data/share/julia/ruby.jl

@@ -0,0 +1,37 @@
+
+
+module Ruby
+
+	librb=dlopen("libruby") 
+
+	export start,stop,run,alive
+
+	global ruby_alive=false
+
+	function start()
+		ccall(dlsym(librb,:ruby_init),Void,())
+		ccall(dlsym(librb,:ruby_init_loadpath),Void,())
+		ruby_alive=true
+	end
+
+	function stop()
+		ccall(dlsym(librb,:ruby_finalize),Void,())
+		ruby_alive=false
+	end
+
+	function run(code::String)
+		state=1 #not modified then
+		##println(code)
+		res=ccall(dlsym(librb,:rb_eval_string_protect),Ptr{Uint64},(Ptr{Uint8},Ptr{Uint32}),bytestring(code),&state)
+	 	return nothing
+	end
+
+	function alive(b::Bool)
+		global ruby_alive=b
+	end
+
+	function alive()
+		ruby_alive
+	end
+
+end

metadata

@@ -0,0 +1,202 @@
+--- !ruby/object:Gem::Specification
+name: dyndoc-ruby-core
+version: !ruby/object:Gem::Version
+  version: 1.0.0
+platform: ruby
+authors:
+- CQLS
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2016-02-21 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: configliere
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: '0.4'
+    - - '>='
+      - !ruby/object:Gem::Version
+        version: 0.4.18
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: '0.4'
+    - - '>='
+      - !ruby/object:Gem::Version
+        version: 0.4.18
+description: |2
+    Provide templating in text document.
+email: rdrouilh@gmail.com
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- lib/dyndoc-core.rb
+- lib/dyndoc/base/envir.rb
+- lib/dyndoc/base/filter/call.rb
+- lib/dyndoc/base/filter/filter_mngr.rb
+- lib/dyndoc/base/filter/server.rb
+- lib/dyndoc/base/filters.rb
+- lib/dyndoc/base/helpers.rb
+- lib/dyndoc/base/helpers/core.rb
+- lib/dyndoc/base/helpers/parser.rb
+- lib/dyndoc/base/scanner.rb
+- lib/dyndoc/base/tags.rb
+- lib/dyndoc/base/tags/keys_mngr.rb
+- lib/dyndoc/base/tags/part_tag.rb
+- lib/dyndoc/base/tags/tag_mngr.rb
+- lib/dyndoc/base/tags/user_tag.rb
+- lib/dyndoc/base/tmpl.rb
+- lib/dyndoc/base/tmpl/eval.rb
+- lib/dyndoc/base/tmpl/extension.rb
+- lib/dyndoc/base/tmpl/manager.rb
+- lib/dyndoc/base/tmpl/oop.rb
+- lib/dyndoc/base/tmpl/parse_do.rb
+- lib/dyndoc/base/tmpl/rbenvir.rb
+- lib/dyndoc/base/utils.rb
+- lib/dyndoc/common/dynArray.rb
+- lib/dyndoc/common/file.rb
+- lib/dyndoc/common/init.rb
+- lib/dyndoc/common/tilt.rb
+- lib/dyndoc/common/utils.rb
+- lib/dyndoc/common/uv.rb
+- lib/dyndoc/init/config.rb
+- lib/dyndoc/init/home.rb
+- lib/dyndoc/plugins/tex.rb
+- lib/dyndoc/plugins/tex/beamer.rb
+- lib/dyndoc/plugins/tex/tex_eval.rb
+- lib/dyndoc/plugins/tex/tex_parse_do.rb
+- lib/dyndoc/plugins/tex/tex_user_tag.rb
+- dyndoc/Dyn/After.dyn
+- dyndoc/Dyn/Base.dyn
+- dyndoc/Dyn/Minimum.dyn
+- dyndoc/Model/Html/DefaultPost_html.dyn
+- dyndoc/Model/Html/DefaultPre_html.dyn
+- dyndoc/Model/Odt/DefaultPost_content.xml
+- dyndoc/Model/Odt/DefaultPost_tmpl_content.xml
+- dyndoc/Model/Odt/DefaultPre_content.xml
+- dyndoc/Model/Odt/DefaultPre_tmpl_content.xml
+- dyndoc/Model/Tex/ContentPost_tmpl.tex
+- dyndoc/Model/Tex/ContentPre_tmpl.tex
+- dyndoc/Model/Tex/DefaultPost_tmpl.tex
+- dyndoc/Model/Tex/DefaultPre_tmpl.tex
+- dyndoc/Model/Ttm/DefaultPost_tmpl.ttm
+- dyndoc/Model/Ttm/DefaultPre_tmpl.ttm
+- dyndoc/Std/Array.dyn
+- dyndoc/Std/Composer.dyn
+- dyndoc/Std/DevTag.dyn
+- dyndoc/Std/DynVar.dyn
+- dyndoc/Std/File.dyn
+- dyndoc/Std/Git.dyn
+- dyndoc/Std/List.dyn
+- dyndoc/Std/OOP.dyn
+- dyndoc/Std/Signal.dyn
+- dyndoc/Std/String.dyn
+- dyndoc/Std/Styles.dyn
+- dyndoc/Std/Test.dyn
+- dyndoc/Std/Utils.dyn
+- dyndoc/Std/Verb.dyn
+- dyndoc/Style/Notation/Math.dyn
+- dyndoc/Style/Notation/Stat/Classic.dyn
+- dyndoc/Style/Notation/Stat/Cqls.dyn
+- dyndoc/Style/Text/Std.dyn
+- dyndoc/Style/Text/StdAlias.dyn
+- dyndoc/Style/Text/StdTex.dyn
+- dyndoc/Style/Text/Txt.dyn
+- dyndoc/Tex/10pt_tmpl.tex
+- dyndoc/Tex/11pt_tmpl.tex
+- dyndoc/Tex/12pt_tmpl.tex
+- dyndoc/Tex/Article_tmpl.tex
+- dyndoc/Tex/Beamer.dyn_tex
+- dyndoc/Tex/BeamerHandout_tmpl.tex
+- dyndoc/Tex/Book_tmpl.tex
+- dyndoc/Tex/DefaultFirst_tmpl.tex
+- dyndoc/Tex/DefaultLast_tmpl.tex
+- dyndoc/Tex/Default_tmpl.tex
+- dyndoc/Tex/First_tmpl.tex
+- dyndoc/Tex/Fr_tmpl.tex
+- dyndoc/Tex/Header_tmpl.tex
+- dyndoc/Tex/InclGraph_tmpl.tex
+- dyndoc/Tex/InclSpatProc_tmpl.tex
+- dyndoc/Tex/InclSumMI_tmpl.tex
+- dyndoc/Tex/LargeA4_tmpl.tex
+- dyndoc/Tex/Last_tmpl.tex
+- dyndoc/Tex/Option_tmpl.tex
+- dyndoc/Tex/Png_tmpl.tex
+- dyndoc/Tex/RefCite2_tmpl.tex
+- dyndoc/Tex/RefCite_tmpl.tex
+- dyndoc/Tex/Report_tmpl.tex
+- dyndoc/Tex/Theorem_tmpl.tex
+- dyndoc/Tools/Atom.dyn/index.dyn
+- dyndoc/Tools/AtomDyndocker.dyn/index.dyn
+- dyndoc/Tools/R/Fig.dyn
+- dyndoc/Tools/R/Tools.dyn
+- dyndoc/Tools/Tex/Beamer.dyn
+- dyndoc/Tools/Tex/BeamerSlide.dyn_tex
+- dyndoc/Tools/Tex/Pgf.dyn
+- dyndoc/Tools/Tex/Table.dyn
+- dyndoc/Tools/Tex/Tools.dyn
+- dyndoc/Tools/Tex/Verb.dyn
+- dyndoc/Tools/Web/Ace.dyn
+- dyndoc/Tools/Web/Code.dyn
+- dyndoc/Tools/Web/DHtmlX.dyn
+- dyndoc/Tools/Web/DataTable.dyn_html
+- dyndoc/Tools/Web/Html.dyn
+- dyndoc/Tools/Web/Html/JQuery.dyn
+- dyndoc/Tools/Web/Html/Styles.dyn
+- dyndoc/Tools/Web/JQueryTools.dyn
+- dyndoc/Tools/Web/Layout.dyn
+- dyndoc/Tools/Web/Layout/CQLS.dyn
+- dyndoc/Tools/Web/Layout/LJK.dyn
+- dyndoc/Tools/Web/TabBar.dyn
+- dyndoc/Tools/Web/Ttm.dyn
+- dyndoc/Tools/Web/Txtl.dyn
+- share/julia/dynArray.jl
+- share/julia/dyndoc.jl
+- share/julia/ruby.jl
+- share/R/dyndocMsys2.R
+- share/R/dyndocTools.R
+- share/R/test.R
+- share/R/tools/dynArray.R
+- share/R/tools/dynCapture.R
+- share/R/tools/dynMsys2.R
+- dyndoc/.DS_Store
+- dyndoc/Dyn/.postload
+- dyndoc/Dyn/.preload
+- dyndoc/Tex/.postload
+- dyndoc/Tex/.preload
+- dyndoc/Tools/.DS_Store
+- dyndoc/Tools/Web/.DS_Store
+homepage: http://cqls.upmf-grenoble.fr
+licenses:
+- MIT
+- GPL-2
+metadata: {}
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements:
+- none
+rubyforge_project: 
+rubygems_version: 2.0.14
+signing_key: 
+specification_version: 4
+summary: R and Ruby in text document
+test_files: []