mirror of
				https://github.com/KevinMidboe/linguist.git
				synced 2025-10-29 17:50:22 +00:00 
			
		
		
		
	Compare commits
	
		
			58 Commits
		
	
	
		
	
	| Author | SHA1 | Date | |
|---|---|---|---|
|  | 32b07a4e10 | ||
|  | 8890c57681 | ||
|  | de188126fb | ||
|  | 97a1adcef1 | ||
|  | ffbe95d6e5 | ||
|  | d54f86ae58 | ||
|  | 92ace440b9 | ||
|  | d5ee477d3b | ||
|  | 6e8152c423 | ||
|  | 8149356668 | ||
|  | 806e30d70f | ||
|  | 299ec8f8ea | ||
|  | f6fbd18bd5 | ||
|  | ecd30d3ccf | ||
|  | 228d89649a | ||
|  | 751360ecf1 | ||
|  | d9ed216092 | ||
|  | 18a3ef9e5e | ||
|  | e7b670c5de | ||
|  | 114fabd29a | ||
|  | 0946791434 | ||
|  | 06bcdba9c4 | ||
|  | 1dbbcb73e7 | ||
|  | f2cd75332c | ||
|  | 2cd7579e21 | ||
|  | d9daae176e | ||
|  | 20814ec533 | ||
|  | 9d8ab16a38 | ||
|  | 49c2793bf5 | ||
|  | 20aee11cea | ||
|  | e8cf750e18 | ||
|  | 21f56744d4 | ||
|  | 02aeb4f895 | ||
|  | f9de16fbd2 | ||
|  | abe002f30c | ||
|  | e5ae6fb00d | ||
|  | a0a8dd8897 | ||
|  | e00f073726 | ||
|  | 1a9ee8e187 | ||
|  | 213fce00e0 | ||
|  | 380739b209 | ||
|  | 36322f8ac0 | ||
|  | 57d1ec7733 | ||
|  | 648c6d4547 | ||
|  | ebabcfc84f | ||
|  | 5f22bf225c | ||
|  | 8eee8ad9cf | ||
|  | 24743985e4 | ||
|  | fd707ddf7e | ||
|  | b6a9993c97 | ||
|  | 9c044c5bd0 | ||
|  | b2cb74cabf | ||
|  | 6f8278aa79 | ||
|  | cd743332f4 | ||
|  | a1884ca261 | ||
|  | e452291314 | ||
|  | ce1e2441f4 | ||
|  | 5a59ecbc2a | 
| @@ -6,6 +6,7 @@ before_install: | ||||
| rvm: | ||||
|   - 1.9.3 | ||||
|   - 2.0.0 | ||||
|   - 2.1.1 | ||||
|   - 2.1 | ||||
|   - 2.2 | ||||
| notifications: | ||||
|   disabled: true | ||||
|   | ||||
							
								
								
									
										1
									
								
								Gemfile
									
									
									
									
									
								
							
							
						
						
									
										1
									
								
								Gemfile
									
									
									
									
									
								
							| @@ -1,2 +1,3 @@ | ||||
| source 'https://rubygems.org' | ||||
| gemspec | ||||
| gem 'test-unit', require: false if RUBY_VERSION >= '2.2' | ||||
|   | ||||
| @@ -108,6 +108,8 @@ See [Linguist::Generated#generated?](https://github.com/github/linguist/blob/mas | ||||
|  | ||||
| Linguist supports custom overrides for language definitions and vendored paths. Add a `.gitattributes` file to your project using the keys `linguist-language` and `linguist-vendored` with the standard git-style path matchers for the files you want to override. | ||||
|  | ||||
| Please note that the overrides currently only affect the language statistics for a repository and not the syntax-highlighting of files. | ||||
|  | ||||
| ``` | ||||
| $ cat .gitattributes | ||||
| *.rb linguist-language=Java | ||||
|   | ||||
							
								
								
									
										18
									
								
								Rakefile
									
									
									
									
									
								
							
							
						
						
									
										18
									
								
								Rakefile
									
									
									
									
									
								
							| @@ -1,8 +1,8 @@ | ||||
| require 'bundler/setup' | ||||
| require 'json' | ||||
| require 'rake/clean' | ||||
| require 'rake/testtask' | ||||
| require 'yaml' | ||||
| require 'yajl' | ||||
|  | ||||
| task :default => :test | ||||
|  | ||||
| @@ -20,15 +20,13 @@ end | ||||
|  | ||||
| task :samples do | ||||
|   require 'linguist/samples' | ||||
|   require 'yajl' | ||||
|   data = Linguist::Samples.data | ||||
|   json = Yajl::Encoder.encode(data, :pretty => true) | ||||
|   File.open('lib/linguist/samples.json', 'w') { |io| io.write json } | ||||
|   json = Yajl.dump(Linguist::Samples.data, :pretty => true) | ||||
|   File.write 'lib/linguist/samples.json', json | ||||
| end | ||||
|  | ||||
| task :build_gem => :samples do | ||||
|   languages = YAML.load_file("lib/linguist/languages.yml") | ||||
|   File.write("lib/linguist/languages.json", JSON.dump(languages)) | ||||
|   File.write("lib/linguist/languages.json", Yajl.dump(languages)) | ||||
|   `gem build github-linguist.gemspec` | ||||
|   File.delete("lib/linguist/languages.json") | ||||
| end | ||||
| @@ -72,11 +70,11 @@ namespace :benchmark do | ||||
|     reference_file = ENV["REFERENCE"] | ||||
|     candidate_file = ENV["CANDIDATE"] | ||||
|  | ||||
|     reference = JSON.parse(File.read(reference_file)) | ||||
|     reference = Yajl.load(File.read(reference_file)) | ||||
|     reference_counts = Hash.new(0) | ||||
|     reference.each { |filename, language| reference_counts[language] += 1 } | ||||
|  | ||||
|     candidate = JSON.parse(File.read(candidate_file)) | ||||
|     candidate = Yajl.load(File.read(candidate_file)) | ||||
|     candidate_counts = Hash.new(0) | ||||
|     candidate.each { |filename, language| candidate_counts[language] += 1 } | ||||
|  | ||||
| @@ -126,14 +124,12 @@ namespace :classifier do | ||||
|  | ||||
|   def each_public_gist | ||||
|     require 'open-uri' | ||||
|     require 'json' | ||||
|  | ||||
|     url = "https://api.github.com/gists/public" | ||||
|  | ||||
|     loop do | ||||
|       resp = open(url) | ||||
|       url = resp.meta['link'][/<([^>]+)>; rel="next"/, 1] | ||||
|       gists = JSON.parse(resp.read) | ||||
|       gists = Yajl.load(resp.read) | ||||
|  | ||||
|       for gist in gists | ||||
|         for filename, attrs in gist['files'] | ||||
|   | ||||
| @@ -19,7 +19,6 @@ Gem::Specification.new do |s| | ||||
|   s.add_dependency 'pygments.rb',     '~> 0.6.0' | ||||
|   s.add_dependency 'rugged',          '~> 0.21.1b2' | ||||
|  | ||||
|   s.add_development_dependency 'json' | ||||
|   s.add_development_dependency 'mocha' | ||||
|   s.add_development_dependency 'pry' | ||||
|   s.add_development_dependency 'rake' | ||||
|   | ||||
| @@ -25,6 +25,15 @@ module Linguist | ||||
|         if languages.all? { |l| ["Common Lisp", "OpenCL"].include?(l) } | ||||
|           result = disambiguate_cl(data, languages) | ||||
|         end | ||||
|         if languages.all? { |l| ["Hack", "PHP"].include?(l) } | ||||
|           result = disambiguate_hack(data, languages) | ||||
|         end | ||||
|         if languages.all? { |l| ["Scala", "SuperCollider"].include?(l) } | ||||
|           result = disambiguate_sc(data, languages) | ||||
|         end | ||||
|         if languages.all? { |l| ["AsciiDoc", "AGS Script"].include?(l) } | ||||
|           result = disambiguate_asc(data, languages) | ||||
|         end | ||||
|         return result | ||||
|       end | ||||
|     end | ||||
| @@ -88,6 +97,33 @@ module Linguist | ||||
|       matches | ||||
|     end | ||||
|  | ||||
|     def self.disambiguate_hack(data, languages) | ||||
|       matches = [] | ||||
|       if data.include?("<?hh") | ||||
|         matches << Language["Hack"] | ||||
|       elsif /<?[^h]/.match(data) | ||||
|         matches << Language["PHP"] | ||||
|       end | ||||
|       matches | ||||
|     end | ||||
|  | ||||
|     def self.disambiguate_sc(data, languages) | ||||
|       matches = [] | ||||
|       if (/\^(this|super)\./.match(data) || /^\s*(\+|\*)\s*\w+\s*{/.match(data) || /^\s*~\w+\s*=\./.match(data)) | ||||
|         matches << Language["SuperCollider"] | ||||
|       end | ||||
|       if (/^\s*import (scala|java)\./.match(data) || /^\s*val\s+\w+\s*=/.match(data) || /^\s*class\b/.match(data)) | ||||
|         matches << Language["Scala"] | ||||
|       end | ||||
|       matches | ||||
|     end | ||||
|  | ||||
|     def self.disambiguate_asc(data, languages) | ||||
|       matches = [] | ||||
|       matches << Language["AsciiDoc"] if /^=+(\s|\n)/.match(data) | ||||
|       matches | ||||
|     end | ||||
|  | ||||
|     def self.active? | ||||
|       !!ACTIVE | ||||
|     end | ||||
|   | ||||
| @@ -2,7 +2,7 @@ require 'escape_utils' | ||||
| require 'pygments' | ||||
| require 'yaml' | ||||
| begin | ||||
|   require 'json' | ||||
|   require 'yajl' | ||||
| rescue LoadError | ||||
| end | ||||
|  | ||||
| @@ -62,7 +62,7 @@ module Linguist | ||||
|       end | ||||
|  | ||||
|       # Language name index | ||||
|       @index[language.name] = @name_index[language.name] = language | ||||
|       @index[language.name.downcase] = @name_index[language.name.downcase] = language | ||||
|  | ||||
|       language.aliases.each do |name| | ||||
|         # All Language aliases should be unique. Raise if there is a duplicate. | ||||
| @@ -70,7 +70,7 @@ module Linguist | ||||
|           raise ArgumentError, "Duplicate alias: #{name}" | ||||
|         end | ||||
|  | ||||
|         @index[name] = @alias_index[name] = language | ||||
|         @index[name.downcase] = @alias_index[name.downcase] = language | ||||
|       end | ||||
|  | ||||
|       language.extensions.each do |extension| | ||||
| @@ -164,7 +164,7 @@ module Linguist | ||||
|     # | ||||
|     # Returns the Language or nil if none was found. | ||||
|     def self.find_by_name(name) | ||||
|       @name_index[name] | ||||
|       @name_index[name.downcase] | ||||
|     end | ||||
|  | ||||
|     # Public: Look up Language by one of its aliases. | ||||
| @@ -178,7 +178,7 @@ module Linguist | ||||
|     # | ||||
|     # Returns the Lexer or nil if none was found. | ||||
|     def self.find_by_alias(name) | ||||
|       @alias_index[name] | ||||
|       @alias_index[name.downcase] | ||||
|     end | ||||
|  | ||||
|     # Public: Look up Languages by filename. | ||||
| @@ -194,9 +194,25 @@ module Linguist | ||||
|     def self.find_by_filename(filename) | ||||
|       basename = File.basename(filename) | ||||
|       extname = FileBlob.new(filename).extension | ||||
|       langs = @filename_index[basename] + | ||||
|               @extension_index[extname] | ||||
|       langs.compact.uniq | ||||
|       (@filename_index[basename] + find_by_extension(extname)).compact.uniq | ||||
|     end | ||||
|  | ||||
|     # Public: Look up Languages by file extension. | ||||
|     # | ||||
|     # extname - The extension String. | ||||
|     # | ||||
|     # Examples | ||||
|     # | ||||
|     #   Language.find_by_extension('.rb') | ||||
|     #   # => [#<Language name="Ruby">] | ||||
|     # | ||||
|     #   Language.find_by_extension('rb') | ||||
|     #   # => [#<Language name="Ruby">] | ||||
|     # | ||||
|     # Returns all matching Languages or [] if none were found. | ||||
|     def self.find_by_extension(extname) | ||||
|       extname = ".#{extname}" unless extname.start_with?(".") | ||||
|       @extension_index[extname] | ||||
|     end | ||||
|  | ||||
|     # Public: Look up Languages by shebang line. | ||||
| @@ -227,7 +243,7 @@ module Linguist | ||||
|     # | ||||
|     # Returns the Language or nil if none was found. | ||||
|     def self.[](name) | ||||
|       @index[name] | ||||
|       @index[name.downcase] | ||||
|     end | ||||
|  | ||||
|     # Public: A List of popular languages | ||||
| @@ -533,8 +549,8 @@ module Linguist | ||||
|   languages_yml = File.expand_path("../languages.yml", __FILE__) | ||||
|   languages_json = File.expand_path("../languages.json", __FILE__) | ||||
|  | ||||
|   if File.exist?(languages_json) && defined?(JSON) | ||||
|     languages = JSON.load(File.read(languages_json)) | ||||
|   if File.exist?(languages_json) && defined?(Yajl) | ||||
|     languages = Yajl.load(File.read(languages_json)) | ||||
|   else | ||||
|     languages = YAML.load_file(languages_yml) | ||||
|   end | ||||
|   | ||||
| @@ -90,6 +90,8 @@ ActionScript: | ||||
|   color: "#e3491a" | ||||
|   search_term: as3 | ||||
|   aliases: | ||||
|   - actionscript 3 | ||||
|   - actionscript3 | ||||
|   - as3 | ||||
|   extensions: | ||||
|   - .as | ||||
| @@ -99,7 +101,10 @@ Ada: | ||||
|   color: "#02f88c" | ||||
|   extensions: | ||||
|   - .adb | ||||
|   - .ada | ||||
|   - .ads | ||||
|   aliases: | ||||
|   - ada95ada2005 | ||||
|  | ||||
| Agda: | ||||
|   type: programming | ||||
| @@ -117,9 +122,11 @@ Alloy: | ||||
| ApacheConf: | ||||
|   type: markup | ||||
|   aliases: | ||||
|   - aconf | ||||
|   - apache | ||||
|   extensions: | ||||
|   - .apacheconf | ||||
|   - .conf | ||||
|   tm_scope: source.apache-config | ||||
|  | ||||
| Apex: | ||||
| @@ -180,6 +187,7 @@ Assembly: | ||||
|   - nasm | ||||
|   extensions: | ||||
|   - .asm | ||||
|   - .ASM | ||||
|   - .a51 | ||||
|   tm_scope: source.asm.x86 | ||||
|  | ||||
| @@ -196,6 +204,7 @@ AutoHotkey: | ||||
|   - ahk | ||||
|   extensions: | ||||
|   - .ahk | ||||
|   - .ahkl | ||||
|  | ||||
| AutoIt: | ||||
|   type: programming | ||||
| @@ -229,6 +238,9 @@ Batchfile: | ||||
|   search_term: bat | ||||
|   aliases: | ||||
|   - bat | ||||
|   - batch | ||||
|   - dosbatch | ||||
|   - winbatch | ||||
|   extensions: | ||||
|   - .bat | ||||
|   - .cmd | ||||
| @@ -241,8 +253,10 @@ Befunge: | ||||
| BlitzBasic: | ||||
|   type: programming | ||||
|   aliases: | ||||
|   - blitzplus | ||||
|   - b3d | ||||
|   - blitz3d | ||||
|   - blitzplus | ||||
|   - bplus | ||||
|   extensions: | ||||
|   - .bb | ||||
|   - .decls | ||||
| @@ -253,6 +267,8 @@ BlitzMax: | ||||
|   color: "#cd6400" | ||||
|   extensions: | ||||
|   - .bmx | ||||
|   aliases: | ||||
|   - bmax | ||||
|  | ||||
| Bluespec: | ||||
|   type: programming | ||||
| @@ -291,6 +307,7 @@ C: | ||||
|   - .c | ||||
|   - .cats | ||||
|   - .h | ||||
|   - .idc | ||||
|   - .w | ||||
|  | ||||
| C#: | ||||
| @@ -316,19 +333,20 @@ C++: | ||||
|   extensions: | ||||
|   - .cpp | ||||
|   - .C | ||||
|   - .CPP | ||||
|   - .H | ||||
|   - .c++ | ||||
|   - .cc | ||||
|   - .cxx | ||||
|   - .H | ||||
|   - .h | ||||
|   - .h++ | ||||
|   - .hh | ||||
|   - .hpp | ||||
|   - .hxx | ||||
|   - .inl | ||||
|   - .ipp | ||||
|   - .tcc | ||||
|   - .tpp | ||||
|   - .ipp | ||||
|  | ||||
| C-ObjDump: | ||||
|   type: data | ||||
| @@ -364,6 +382,8 @@ COBOL: | ||||
|   type: programming | ||||
|   extensions: | ||||
|   - .cob | ||||
|   - .COB | ||||
|   - .CPY | ||||
|   - .cbl | ||||
|   - .ccp | ||||
|   - .cobol | ||||
| @@ -455,8 +475,10 @@ ColdFusion: | ||||
|   aliases: | ||||
|   - cfm | ||||
|   - cfml | ||||
|   - coldfusion html | ||||
|   extensions: | ||||
|   - .cfm | ||||
|   - .cfml | ||||
|   tm_scope: text.html.cfm | ||||
|  | ||||
| ColdFusion CFC: | ||||
| @@ -500,6 +522,9 @@ Component Pascal: | ||||
|   - .cp | ||||
|   - .cps | ||||
|   tm_scope: source.pascal | ||||
|   aliases: | ||||
|   - delphi | ||||
|   - objectpascal | ||||
|  | ||||
| Coq: | ||||
|   type: programming | ||||
| @@ -512,9 +537,13 @@ Cpp-ObjDump: | ||||
|   lexer: cpp-objdump | ||||
|   extensions: | ||||
|   - .cppobjdump | ||||
|   - .c++-objdump | ||||
|   - .c++objdump | ||||
|   - .cpp-objdump | ||||
|   - .cxx-objdump | ||||
|   tm_scope: objdump.x86asm | ||||
|   aliases: | ||||
|   - c++-objdumb | ||||
|  | ||||
| Creole: | ||||
|   type: prose | ||||
| @@ -536,6 +565,8 @@ Cucumber: | ||||
|   extensions: | ||||
|   - .feature | ||||
|   tm_scope: text.gherkin.feature | ||||
|   aliases: | ||||
|   - gherkin | ||||
|  | ||||
| Cuda: | ||||
|   type: programming | ||||
| @@ -559,6 +590,8 @@ Cython: | ||||
|   - .pyx | ||||
|   - .pxd | ||||
|   - .pxi | ||||
|   aliases: | ||||
|   - pyrex | ||||
|  | ||||
| D: | ||||
|   type: programming | ||||
| @@ -609,6 +642,8 @@ Diff: | ||||
|   extensions: | ||||
|   - .diff | ||||
|   - .patch | ||||
|   aliases: | ||||
|   - udiff | ||||
|  | ||||
| Dogescript: | ||||
|   type: programming | ||||
| @@ -622,6 +657,7 @@ Dylan: | ||||
|   color: "#3ebc27" | ||||
|   extensions: | ||||
|   - .dylan | ||||
|   - .dyl | ||||
|   - .intr | ||||
|   - .lid | ||||
|  | ||||
| @@ -706,6 +742,7 @@ Erlang: | ||||
|   color: "#0faf8d" | ||||
|   extensions: | ||||
|   - .erl | ||||
|   - .es | ||||
|   - .escript | ||||
|   - .hrl | ||||
|  | ||||
| @@ -848,6 +885,7 @@ GLSL: | ||||
|   - .frag | ||||
|   - .frg | ||||
|   - .fshader | ||||
|   - .geo | ||||
|   - .geom | ||||
|   - .glslv | ||||
|   - .gshader | ||||
| @@ -860,6 +898,9 @@ Genshi: | ||||
|   extensions: | ||||
|   - .kid | ||||
|   tm_scope: text.xml.genshi | ||||
|   aliases: | ||||
|   - xml+genshi | ||||
|   - xml+kid | ||||
|  | ||||
| Gentoo Ebuild: | ||||
|   group: Shell | ||||
| @@ -910,6 +951,13 @@ Go: | ||||
|   extensions: | ||||
|   - .go | ||||
|  | ||||
| Golo: | ||||
|   type: programming | ||||
|   color: "#f6a51f" | ||||
|   lexer: Golo | ||||
|   extensions: | ||||
|   - .golo | ||||
|  | ||||
| Gosu: | ||||
|   type: programming | ||||
|   color: "#82937f" | ||||
| @@ -955,6 +1003,8 @@ Groff: | ||||
|   - '.6' | ||||
|   - '.7' | ||||
|   tm_scope: text.groff | ||||
|   aliases: | ||||
|   - nroff | ||||
|  | ||||
| Groovy: | ||||
|   type: programming | ||||
| @@ -962,7 +1012,6 @@ Groovy: | ||||
|   color: "#e69f56" | ||||
|   extensions: | ||||
|   - .groovy | ||||
|   - .gradle | ||||
|   - .grt | ||||
|   - .gtpl | ||||
|   - .gvy | ||||
| @@ -974,6 +1023,7 @@ Groovy Server Pages: | ||||
|   lexer: Java Server Page | ||||
|   aliases: | ||||
|   - gsp | ||||
|   - java server page | ||||
|   extensions: | ||||
|   - .gsp | ||||
|   tm_scope: text.html.jsp | ||||
| @@ -998,6 +1048,10 @@ HTML+Django: | ||||
|   extensions: | ||||
|   - .mustache | ||||
|   - .jinja | ||||
|   aliases: | ||||
|   - html+django/jinja | ||||
|   - html+jinja | ||||
|   - htmldjango | ||||
|  | ||||
| HTML+ERB: | ||||
|   type: markup | ||||
| @@ -1022,6 +1076,14 @@ HTTP: | ||||
|   extensions: | ||||
|   - .http | ||||
|  | ||||
| Hack: | ||||
|   type: programming | ||||
|   lexer: PHP | ||||
|   ace_mode: php | ||||
|   extensions: | ||||
|   - .hh | ||||
|   - .php | ||||
|  | ||||
| Haml: | ||||
|   group: HTML | ||||
|   type: markup | ||||
| @@ -1069,6 +1131,8 @@ Hy: | ||||
|   color: "#7891b1" | ||||
|   extensions: | ||||
|   - .hy | ||||
|   aliases: | ||||
|   - hylang | ||||
|  | ||||
| IDL: | ||||
|   type: programming | ||||
| @@ -1083,14 +1147,20 @@ IGOR Pro: | ||||
|   lexer: Igor | ||||
|   extensions: | ||||
|   - .ipf | ||||
|   aliases: | ||||
|   - igor | ||||
|   - igorpro | ||||
|  | ||||
| INI: | ||||
|   type: data | ||||
|   extensions: | ||||
|   - .ini | ||||
|   - .cfg | ||||
|   - .prefs | ||||
|   - .properties | ||||
|   tm_scope: source.ini | ||||
|   aliases: | ||||
|   - dosini | ||||
|  | ||||
| Inno Setup: | ||||
|   extensions: | ||||
| @@ -1112,6 +1182,9 @@ Inform 7: | ||||
|   - .ni | ||||
|   - .i7x | ||||
|   tm_scope: source.inform | ||||
|   aliases: | ||||
|   - i7 | ||||
|   - inform7 | ||||
|  | ||||
| Inno Setup: | ||||
|   extensions: | ||||
| @@ -1123,6 +1196,7 @@ IRC log: | ||||
|   search_term: irc | ||||
|   aliases: | ||||
|   - irc | ||||
|   - irc logs | ||||
|   extensions: | ||||
|   - .irclog | ||||
|   - .weechatlog | ||||
| @@ -1323,9 +1397,12 @@ Lasso: | ||||
|   extensions: | ||||
|   - .lasso | ||||
|   - .las | ||||
|   - .lasso8 | ||||
|   - .lasso9 | ||||
|   - .ldml | ||||
|   tm_scope: file.lasso | ||||
|   aliases: | ||||
|   - lassoscript | ||||
|  | ||||
| Latte: | ||||
|   type: markup | ||||
| @@ -1380,6 +1457,7 @@ Literate Haskell: | ||||
|   group: Haskell | ||||
|   search_term: lhs | ||||
|   aliases: | ||||
|   - lhaskell | ||||
|   - lhs | ||||
|   extensions: | ||||
|   - .lhs | ||||
| @@ -1390,6 +1468,7 @@ LiveScript: | ||||
|   ace_mode: ls | ||||
|   color: "#499886" | ||||
|   aliases: | ||||
|   - live-script | ||||
|   - ls | ||||
|   extensions: | ||||
|   - .ls | ||||
| @@ -1401,6 +1480,8 @@ Logos: | ||||
|   type: programming | ||||
|   extensions: | ||||
|   - .xm | ||||
|   - .x | ||||
|   - .xi | ||||
|  | ||||
| Logtalk: | ||||
|   type: programming | ||||
| @@ -1427,6 +1508,7 @@ Lua: | ||||
|   - .nse | ||||
|   - .pd_lua | ||||
|   - .rbxs | ||||
|   - .wlua | ||||
|   interpreters: | ||||
|   - lua | ||||
|  | ||||
| @@ -1450,7 +1532,9 @@ MTML: | ||||
|  | ||||
| Makefile: | ||||
|   aliases: | ||||
|   - bsdmake | ||||
|   - make | ||||
|   - mf | ||||
|   extensions: | ||||
|   - .mak | ||||
|   - .mk | ||||
| @@ -1483,7 +1567,7 @@ Markdown: | ||||
|  | ||||
| Mask: | ||||
|   type: markup | ||||
|   lexer: SCSS | ||||
|   lexer: Mask | ||||
|   color: "#f97732" | ||||
|   ace_mode: scss | ||||
|   extensions: | ||||
| @@ -1494,9 +1578,14 @@ Mathematica: | ||||
|   type: programming | ||||
|   extensions: | ||||
|   - .mathematica | ||||
|   - .cdf | ||||
|   - .m | ||||
|   - .ma | ||||
|   - .nb | ||||
|   - .nbp | ||||
|   lexer: Mathematica | ||||
|   aliases: | ||||
|   - mma | ||||
|  | ||||
| Matlab: | ||||
|   type: programming | ||||
| @@ -1571,6 +1660,8 @@ MoonScript: | ||||
|   type: programming | ||||
|   extensions: | ||||
|   - .moon | ||||
|   interpreters: | ||||
|   - moon | ||||
|  | ||||
| Myghty: | ||||
|   extensions: | ||||
| @@ -1601,6 +1692,8 @@ Nginx: | ||||
|   extensions: | ||||
|   - .nginxconf | ||||
|   tm_scope: source.nginx | ||||
|   aliases: | ||||
|   - nginx configuration file | ||||
|  | ||||
| Nimrod: | ||||
|   type: programming | ||||
| @@ -1621,6 +1714,8 @@ Nix: | ||||
|   lexer: Nix | ||||
|   extensions: | ||||
|   - .nix | ||||
|   aliases: | ||||
|   - nixos | ||||
|  | ||||
| Nu: | ||||
|   type: programming | ||||
| @@ -1668,6 +1763,7 @@ Objective-C: | ||||
|   aliases: | ||||
|   - obj-c | ||||
|   - objc | ||||
|   - objectivec | ||||
|   extensions: | ||||
|   - .m | ||||
|   - .h | ||||
| @@ -1679,6 +1775,7 @@ Objective-C++: | ||||
|   aliases: | ||||
|   - obj-c++ | ||||
|   - objc++ | ||||
|   - objectivec++ | ||||
|   extensions: | ||||
|   - .mm | ||||
|  | ||||
| @@ -1687,6 +1784,8 @@ Objective-J: | ||||
|   color: "#ff0c5a" | ||||
|   aliases: | ||||
|   - obj-j | ||||
|   - objectivej | ||||
|   - objj | ||||
|   extensions: | ||||
|   - .j | ||||
|   - .sj | ||||
| @@ -1786,6 +1885,8 @@ PHP: | ||||
|   - Phakefile | ||||
|   interpreters: | ||||
|   - php | ||||
|   aliases: | ||||
|   - inc | ||||
|  | ||||
| Pan: | ||||
|   type: programming | ||||
| @@ -1794,6 +1895,13 @@ Pan: | ||||
|   extensions: | ||||
|   - .pan | ||||
|  | ||||
| Papyrus: | ||||
|   type: programming | ||||
|   color: "#6600cc" | ||||
|   lexer: Text only | ||||
|   extensions: | ||||
|   - .psc | ||||
|  | ||||
| Parrot: | ||||
|   type: programming | ||||
|   color: "#f3ca0a" | ||||
| @@ -1898,6 +2006,8 @@ PostScript: | ||||
|   - .ps | ||||
|   - .eps | ||||
|   tm_scope: source.postscript | ||||
|   aliases: | ||||
|   - postscr | ||||
|  | ||||
| PowerShell: | ||||
|   type: programming | ||||
| @@ -1979,6 +2089,7 @@ Python: | ||||
|   - .pyp | ||||
|   - .pyt | ||||
|   - .pyw | ||||
|   - .tac | ||||
|   - .wsgi | ||||
|   - .xpy | ||||
|   filenames: | ||||
| @@ -1995,6 +2106,7 @@ Python traceback: | ||||
|   searchable: false | ||||
|   extensions: | ||||
|   - .pytb | ||||
|   tm_scope: text.python.traceback | ||||
|  | ||||
| QML: | ||||
|   type: markup | ||||
| @@ -2016,6 +2128,7 @@ R: | ||||
|   aliases: | ||||
|   - R | ||||
|   - Rscript | ||||
|   - splus | ||||
|   extensions: | ||||
|   - .r | ||||
|   - .R | ||||
| @@ -2054,6 +2167,8 @@ RHTML: | ||||
|   extensions: | ||||
|   - .rhtml | ||||
|   tm_scope: text.html.ruby | ||||
|   aliases: | ||||
|   - html+ruby | ||||
|  | ||||
| RMarkdown: | ||||
|   type: prose | ||||
| @@ -2081,6 +2196,9 @@ Ragel in Ruby Host: | ||||
|   color: "#ff9c2e" | ||||
|   extensions: | ||||
|   - .rl | ||||
|   aliases: | ||||
|   - ragel-rb | ||||
|   - ragel-ruby | ||||
|  | ||||
| Raw token data: | ||||
|   search_term: raw | ||||
| @@ -2107,6 +2225,8 @@ Red: | ||||
|   extensions: | ||||
|   - .red | ||||
|   - .reds | ||||
|   aliases: | ||||
|   - red/system | ||||
|  | ||||
| Redcode: | ||||
|   extensions: | ||||
| @@ -2288,7 +2408,7 @@ Shell: | ||||
|   type: programming | ||||
|   lexer: Bash | ||||
|   search_term: bash | ||||
|   color: "#5861ce" | ||||
|   color: "#89e051" | ||||
|   aliases: | ||||
|   - sh | ||||
|   - bash | ||||
| @@ -2300,6 +2420,7 @@ Shell: | ||||
|   - .cgi | ||||
|   - .command | ||||
|   - .fcgi | ||||
|   - .ksh | ||||
|   - .tmux | ||||
|   - .zsh | ||||
|   interpreters: | ||||
| @@ -2314,6 +2435,10 @@ ShellSession: | ||||
|   lexer: Bash Session | ||||
|   extensions: | ||||
|   - .sh-session | ||||
|   aliases: | ||||
|   - bash session | ||||
|   - console | ||||
|   tm_scope: text.shell-session | ||||
|  | ||||
| Shen: | ||||
|   type: programming | ||||
| @@ -2342,6 +2467,8 @@ Smalltalk: | ||||
|   color: "#596706" | ||||
|   extensions: | ||||
|   - .st | ||||
|   aliases: | ||||
|   - squeak | ||||
|  | ||||
| Smarty: | ||||
|   extensions: | ||||
| @@ -2400,6 +2527,7 @@ SuperCollider: | ||||
|   lexer: Text only | ||||
|   extensions: | ||||
|   - .scd | ||||
|   - .sc | ||||
|  | ||||
| Swift: | ||||
|   type: programming | ||||
| @@ -2595,6 +2723,9 @@ Visual Basic: | ||||
|   - .vbhtml | ||||
|   - .vbs | ||||
|   tm_scope: source.vbnet | ||||
|   aliases: | ||||
|   - vb.net | ||||
|   - vbnet | ||||
|  | ||||
| Volt: | ||||
|     type: programming | ||||
| @@ -2665,6 +2796,7 @@ XML: | ||||
|   - .vcxproj | ||||
|   - .vxml | ||||
|   - .wsdl | ||||
|   - .wsf | ||||
|   - .wxi | ||||
|   - .wxl | ||||
|   - .wxs | ||||
| @@ -2680,6 +2812,7 @@ XML: | ||||
|   filenames: | ||||
|   - .classpath | ||||
|   - .project | ||||
|   - build.xml.dist | ||||
|   - phpunit.xml.dist | ||||
|  | ||||
| XProc: | ||||
|   | ||||
| @@ -1,5 +1,5 @@ | ||||
| begin | ||||
|   require 'json' | ||||
|   require 'yajl' | ||||
| rescue LoadError | ||||
|   require 'yaml' | ||||
| end | ||||
| @@ -19,7 +19,7 @@ module Linguist | ||||
|     # Hash of serialized samples object | ||||
|     def self.cache | ||||
|       @cache ||= begin | ||||
|         serializer = defined?(JSON) ? JSON : YAML | ||||
|         serializer = defined?(Yajl) ? Yajl : YAML | ||||
|         serializer.load(File.read(PATH)) | ||||
|       end | ||||
|     end | ||||
|   | ||||
| @@ -36,15 +36,16 @@ | ||||
| # Go dependencies | ||||
| - Godeps/_workspace/ | ||||
|  | ||||
| # Bootstrap minified css and js | ||||
| - (^|/)bootstrap([^.]*)(\.min)?\.(js|css)$ | ||||
| # Minified JavaScript and CSS | ||||
| - (\.|-)min\.(js|css)$ | ||||
|  | ||||
| # Bootstrap css and js | ||||
| - (^|/)bootstrap([^.]*)\.(js|css)$ | ||||
|  | ||||
| # Font Awesome | ||||
| - font-awesome.min.css | ||||
| - font-awesome.css | ||||
|  | ||||
| # Foundation css | ||||
| - foundation.min.css | ||||
| - foundation.css | ||||
|  | ||||
| # Normalize.css | ||||
| @@ -56,7 +57,6 @@ | ||||
|  | ||||
| # Animate.css | ||||
| - animate.css | ||||
| - animate.min.css | ||||
|  | ||||
| # Vendored dependencies | ||||
| - third[-_]?party/ | ||||
| @@ -73,12 +73,12 @@ | ||||
| ## Commonly Bundled JavaScript frameworks ## | ||||
|  | ||||
| # jQuery | ||||
| - (^|/)jquery([^.]*)(\.min)?\.js$ | ||||
| - (^|/)jquery\-\d\.\d+(\.\d+)?(\.min)?\.js$ | ||||
| - (^|/)jquery([^.]*)\.js$ | ||||
| - (^|/)jquery\-\d\.\d+(\.\d+)?\.js$ | ||||
|  | ||||
| # jQuery UI | ||||
| - (^|/)jquery\-ui(\-\d\.\d+(\.\d+)?)?(\.\w+)?(\.min)?\.(js|css)$ | ||||
| - (^|/)jquery\.(ui|effects)\.([^.]*)(\.min)?\.(js|css)$ | ||||
| - (^|/)jquery\-ui(\-\d\.\d+(\.\d+)?)?(\.\w+)?\.(js|css)$ | ||||
| - (^|/)jquery\.(ui|effects)\.([^.]*)\.(js|css)$ | ||||
|  | ||||
| # Prototype | ||||
| - (^|/)prototype(.*)\.js$ | ||||
| @@ -116,21 +116,20 @@ | ||||
| - (^|/)shLegacy\.js$ | ||||
|  | ||||
| # AngularJS | ||||
| - (^|/)angular([^.]*)(\.min)?\.js$ | ||||
| - (^|/)angular([^.]*)\.js$ | ||||
|  | ||||
| # D3.js | ||||
| - (^|\/)d3(\.v\d+)?([^.]*)(\.min)?\.js$ | ||||
| - (^|\/)d3(\.v\d+)?([^.]*)\.js$ | ||||
|  | ||||
| # React | ||||
| - (^|/)react(-[^.]*)?(\.min)?\.js$ | ||||
| - (^|/)react(-[^.]*)?\.js$ | ||||
|  | ||||
| # Modernizr | ||||
| - (^|/)modernizr\-\d\.\d+(\.\d+)?(\.min)?\.js$ | ||||
| - (^|/)modernizr\-\d\.\d+(\.\d+)?\.js$ | ||||
| - (^|/)modernizr\.custom\.\d+\.js$ | ||||
|  | ||||
| # Knockout | ||||
| - (^|/)knockout-(\d+\.){3}(debug\.)?js$ | ||||
| - knockout-min.js | ||||
|  | ||||
| ## Python ## | ||||
|  | ||||
| @@ -168,8 +167,8 @@ | ||||
| - \.intellisense\.js$ | ||||
|  | ||||
| # jQuery validation plugin (MS bundles this with asp.net mvc) | ||||
| - (^|/)jquery([^.]*)\.validate(\.unobtrusive)?(\.min)?\.js$ | ||||
| - (^|/)jquery([^.]*)\.unobtrusive\-ajax(\.min)?\.js$ | ||||
| - (^|/)jquery([^.]*)\.validate(\.unobtrusive)?\.js$ | ||||
| - (^|/)jquery([^.]*)\.unobtrusive\-ajax\.js$ | ||||
|  | ||||
| # Microsoft Ajax | ||||
| - (^|/)[Mm]icrosoft([Mm]vc)?([Aa]jax|[Vv]alidation)(\.debug)?\.js$ | ||||
| @@ -196,7 +195,7 @@ | ||||
| - (^|/)extjs/welcome/ | ||||
|  | ||||
| # Html5shiv | ||||
| - (^|/)html5shiv(\.min)?\.js$ | ||||
| - (^|/)html5shiv\.js$ | ||||
|  | ||||
| # Samples folders | ||||
| - ^[Ss]amples/ | ||||
| @@ -215,8 +214,8 @@ | ||||
| - ^[Tt]est/fixtures/ | ||||
|  | ||||
| # PhoneGap/Cordova | ||||
| - (^|/)cordova([^.]*)(\.min)?\.js$ | ||||
| - (^|/)cordova\-\d\.\d(\.\d)?(\.min)?\.js$ | ||||
| - (^|/)cordova([^.]*)\.js$ | ||||
| - (^|/)cordova\-\d\.\d(\.\d)?\.js$ | ||||
|  | ||||
| # Foundation js | ||||
| - foundation(\..*)?\.js$ | ||||
| @@ -236,7 +235,6 @@ | ||||
|  | ||||
| # Octicons | ||||
| - octicons.css | ||||
| - octicons.min.css | ||||
| - sprockets-octicons.scss | ||||
|  | ||||
| # Typesafe Activator | ||||
|   | ||||
| @@ -1,3 +1,3 @@ | ||||
| module Linguist | ||||
|   VERSION = "3.4.1" | ||||
|   VERSION = "3.5.0" | ||||
| end | ||||
|   | ||||
							
								
								
									
										10
									
								
								samples/C++/bar.hh
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										10
									
								
								samples/C++/bar.hh
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,10 @@ | ||||
| class Bar | ||||
| { | ||||
|   protected: | ||||
|  | ||||
|     char *name; | ||||
|  | ||||
|   public: | ||||
|  | ||||
|     void hello(); | ||||
| } | ||||
							
								
								
									
										67
									
								
								samples/Golo/adapters.golo
									
									
									
									
									
										Executable file
									
								
							
							
						
						
									
										67
									
								
								samples/Golo/adapters.golo
									
									
									
									
									
										Executable file
									
								
							| @@ -0,0 +1,67 @@ | ||||
| # Copyright 2012-2014 Institut National des Sciences Appliquées de Lyon (INSA-Lyon) | ||||
| #  | ||||
| # Licensed under the Apache License, Version 2.0 (the "License"); | ||||
| # you may not use this file except in compliance with the License. | ||||
| # You may obtain a copy of the License at | ||||
| #  | ||||
| #     http://www.apache.org/licenses/LICENSE-2.0 | ||||
| #  | ||||
| # Unless required by applicable law or agreed to in writing, software | ||||
| # distributed under the License is distributed on an "AS IS" BASIS, | ||||
| # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. | ||||
| # See the License for the specific language governing permissions and | ||||
| # limitations under the License. | ||||
|  | ||||
| module samples.Adapters | ||||
|  | ||||
| local function list_sample = |fabric| { | ||||
|   println(">>> list_sample()") | ||||
|   let carbonCopy = list[] | ||||
|   let conf = map[ | ||||
|     ["extends", "java.util.ArrayList"], | ||||
|     ["overrides", map[ | ||||
|       ["*", |super, name, args| { | ||||
|         if name == "add" { | ||||
|           if args: length() == 2 { | ||||
|             carbonCopy: add(args: get(1)) | ||||
|           } else { | ||||
|             carbonCopy: add(args: get(1), args: get(2)) | ||||
|           } | ||||
|         } | ||||
|         return super: invokeWithArguments(args) | ||||
|       } | ||||
|     ]] | ||||
|   ]] | ||||
|   let list = fabric: maker(conf): newInstance() | ||||
|   list: add("bar") | ||||
|   list: add(0, "foo") | ||||
|   list: add("baz") | ||||
|   println("      list: " + list + " " + list: getClass()) | ||||
|   println("carbonCopy: " + carbonCopy + " " + carbonCopy: getClass()) | ||||
| } | ||||
|  | ||||
| local function runnable_sample = |fabric| { | ||||
|   println(">>> runnable_sample") | ||||
|   let result = array[1, 2, 3] | ||||
|   let conf = map[ | ||||
|     ["interfaces", ["java.io.Serializable", "java.lang.Runnable"]], | ||||
|     ["implements", map[ | ||||
|       ["run", |this| { | ||||
|         for (var i = 0, i < result: length(), i = i + 1) { | ||||
|           result: set(i, result: get(i) + 10) | ||||
|         } | ||||
|       }] | ||||
|     ]] | ||||
|   ] | ||||
|   let runner = fabric: maker(conf): newInstance() | ||||
|   runner: run() | ||||
|   println("      result: " + result: toString()) | ||||
|   println("serializable? " + (runner oftype java.io.Serializable.class)) | ||||
|   println("    runnable? " + (runner oftype java.lang.Runnable.class)) | ||||
| } | ||||
|  | ||||
| function main = |args| { | ||||
|   let fabric = AdapterFabric() | ||||
|   list_sample(fabric) | ||||
|   runnable_sample(fabric) | ||||
| } | ||||
							
								
								
									
										84
									
								
								samples/Golo/async.golo
									
									
									
									
									
										Executable file
									
								
							
							
						
						
									
										84
									
								
								samples/Golo/async.golo
									
									
									
									
									
										Executable file
									
								
							| @@ -0,0 +1,84 @@ | ||||
| # Copyright 2012-2014 Institut National des Sciences Appliquées de Lyon (INSA-Lyon) | ||||
| #  | ||||
| # Licensed under the Apache License, Version 2.0 (the "License"); | ||||
| # you may not use this file except in compliance with the License. | ||||
| # You may obtain a copy of the License at | ||||
| #  | ||||
| #     http://www.apache.org/licenses/LICENSE-2.0 | ||||
| #  | ||||
| # Unless required by applicable law or agreed to in writing, software | ||||
| # distributed under the License is distributed on an "AS IS" BASIS, | ||||
| # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. | ||||
| # See the License for the specific language governing permissions and | ||||
| # limitations under the License. | ||||
|  | ||||
| module samples.AsyncHelpers | ||||
|  | ||||
| import gololang.Async | ||||
| import java.util.concurrent.TimeUnit | ||||
| import java.util.concurrent.Executors | ||||
|  | ||||
| local function fib = |n| { | ||||
|   if n <= 1 { | ||||
|     return n | ||||
|   } else { | ||||
|     return fib(n - 1) + fib(n - 2) | ||||
|   } | ||||
| } | ||||
|  | ||||
| function main = |args| { | ||||
|  | ||||
|   let executor = newCachedThreadPool() | ||||
|   println("Let's do some useless asynchronous operations...") | ||||
|  | ||||
|   var f = executor: enqueue({ | ||||
|     Thread.sleep(1000_L) | ||||
|     return 666 | ||||
|   }) | ||||
|   f: | ||||
|     onSet(|v| -> println(">>> #slow -> " + v)):  | ||||
|     onFail(|e| -> println(">>> #fail -> " + e)) | ||||
|   f: | ||||
|     cancel(true) | ||||
|  | ||||
|   f = executor: enqueue({ | ||||
|     Thread.sleep(1000_L) | ||||
|     return 666 | ||||
|   }) | ||||
|   f: | ||||
|     onSet(|v| -> println(">>> #ok -> " + v)):  | ||||
|     onFail(|e| -> println(">>> #wtf? -> " + e)) | ||||
|  | ||||
|   let fib_10 = promise() | ||||
|   let fib_20 = promise() | ||||
|   let fib_30 = promise() | ||||
|   let fib_40 = promise() | ||||
|  | ||||
|   let futures = [ | ||||
|     fib_10: future(), fib_20: future(),  | ||||
|     fib_30: future(), fib_40: future() | ||||
|   ] | ||||
|  | ||||
|   executor: submit(-> fib_10: set(fib(10))) | ||||
|   executor: submit(-> fib_20: set(fib(20))) | ||||
|   executor: submit(-> fib_30: set(fib(30))) | ||||
|   executor: submit(-> fib_40: set(fib(40))) | ||||
|  | ||||
|   all(futures): onSet(|results| -> println(">>> Fibs: " + results)) | ||||
|  | ||||
|   let truth = promise() | ||||
|   truth:  | ||||
|     future():  | ||||
|     map(|v| -> "truth=" + v):  | ||||
|     onSet(|v| -> executor: submit(-> println(">>> (another thread) " + v))): | ||||
|     onSet(|v| -> println(">>> (same thread) " + v)) | ||||
|   executor: submit({ | ||||
|     Thread.sleep(500_L) | ||||
|     truth: set(42) | ||||
|   }) | ||||
|    | ||||
|   Thread.sleep(1000_L) | ||||
|   executor: shutdown() | ||||
|   executor: awaitTermination(2_L, SECONDS()) | ||||
|   println("Bye!") | ||||
| } | ||||
							
								
								
									
										37
									
								
								samples/Golo/augmentations.golo
									
									
									
									
									
										Executable file
									
								
							
							
						
						
									
										37
									
								
								samples/Golo/augmentations.golo
									
									
									
									
									
										Executable file
									
								
							| @@ -0,0 +1,37 @@ | ||||
| # Copyright 2012-2014 Institut National des Sciences Appliquées de Lyon (INSA-Lyon) | ||||
| #  | ||||
| # Licensed under the Apache License, Version 2.0 (the "License"); | ||||
| # you may not use this file except in compliance with the License. | ||||
| # You may obtain a copy of the License at | ||||
| #  | ||||
| #     http://www.apache.org/licenses/LICENSE-2.0 | ||||
| #  | ||||
| # Unless required by applicable law or agreed to in writing, software | ||||
| # distributed under the License is distributed on an "AS IS" BASIS, | ||||
| # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. | ||||
| # See the License for the specific language governing permissions and | ||||
| # limitations under the License. | ||||
|  | ||||
| module samples.Augmentations | ||||
|  | ||||
| import java.util.LinkedList | ||||
|  | ||||
| augment java.util.List { | ||||
|   function with = |this, value| { | ||||
|     this: add(value) | ||||
|     return this | ||||
|   } | ||||
| } | ||||
|  | ||||
| augment java.util.Collection { | ||||
|   function doToEach = |this, func| { | ||||
|     foreach (element in this) { | ||||
|       func(element) | ||||
|     } | ||||
|   } | ||||
| } | ||||
|  | ||||
| function main = |args| { | ||||
|   let list = LinkedList(): with("foo"): with("bar"): with("baz") | ||||
|   list: doToEach(|value| -> println(">>> " + value)) | ||||
| } | ||||
							
								
								
									
										43
									
								
								samples/Golo/closures.golo
									
									
									
									
									
										Executable file
									
								
							
							
						
						
									
										43
									
								
								samples/Golo/closures.golo
									
									
									
									
									
										Executable file
									
								
							| @@ -0,0 +1,43 @@ | ||||
| # Copyright 2012-2014 Institut National des Sciences Appliquées de Lyon (INSA-Lyon) | ||||
| #  | ||||
| # Licensed under the Apache License, Version 2.0 (the "License"); | ||||
| # you may not use this file except in compliance with the License. | ||||
| # You may obtain a copy of the License at | ||||
| #  | ||||
| #     http://www.apache.org/licenses/LICENSE-2.0 | ||||
| #  | ||||
| # Unless required by applicable law or agreed to in writing, software | ||||
| # distributed under the License is distributed on an "AS IS" BASIS, | ||||
| # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. | ||||
| # See the License for the specific language governing permissions and | ||||
| # limitations under the License. | ||||
|  | ||||
| module Closures | ||||
|  | ||||
| local function sayHello = |who| -> "Hello " + who + "!" | ||||
|  | ||||
| function main = |args| { | ||||
|   let adder = |a, b| -> a + b | ||||
|   println(adder: invokeWithArguments(1, 2)) | ||||
|   println(adder(1, 2)) | ||||
|  | ||||
|   let addToTen = adder: bindTo(10) | ||||
|   println(addToTen: invokeWithArguments(2)) | ||||
|   println(addToTen(2)) | ||||
|  | ||||
|   let adding = |x| -> |y| -> adder(x, y) | ||||
|   let addingTen = adding(10) | ||||
|   println(addingTen(4)) | ||||
|   println(adding(2)(4)) | ||||
|  | ||||
|   println(sayHello("Julien")) | ||||
|  | ||||
|   let list = java.util.LinkedList() | ||||
|   let pump_it = { | ||||
|     list: add("I heard you say") | ||||
|     list: add("Hey!") | ||||
|     list: add("Hey!") | ||||
|   } | ||||
|   pump_it() | ||||
|   println(list) | ||||
| } | ||||
							
								
								
									
										34
									
								
								samples/Golo/coin-change.golo
									
									
									
									
									
										Executable file
									
								
							
							
						
						
									
										34
									
								
								samples/Golo/coin-change.golo
									
									
									
									
									
										Executable file
									
								
							| @@ -0,0 +1,34 @@ | ||||
| # Copyright 2012-2014 Institut National des Sciences Appliquées de Lyon (INSA-Lyon) | ||||
| #  | ||||
| # Licensed under the Apache License, Version 2.0 (the "License"); | ||||
| # you may not use this file except in compliance with the License. | ||||
| # You may obtain a copy of the License at | ||||
| #  | ||||
| #     http://www.apache.org/licenses/LICENSE-2.0 | ||||
| #  | ||||
| # Unless required by applicable law or agreed to in writing, software | ||||
| # distributed under the License is distributed on an "AS IS" BASIS, | ||||
| # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. | ||||
| # See the License for the specific language governing permissions and | ||||
| # limitations under the License. | ||||
|  | ||||
| module CoinChange | ||||
|  | ||||
| import java.util.LinkedList | ||||
|  | ||||
| function change = |money, coins| -> match { | ||||
|   when money == 0 then 1 | ||||
|   when (money < 0) or (coins: isEmpty()) then 0 | ||||
|   otherwise change(money - coins: head(), coins) + change(money, coins: tail()) | ||||
| } | ||||
|  | ||||
| function main = |args| { | ||||
|   let coins = LinkedList(): append(1, 2, 5, 10, 20) | ||||
|   println("Coins: " + coins) | ||||
|   println("0: " + change(0, coins)) | ||||
|   println("1: " + change(1, coins)) | ||||
|   println("2: " + change(2, coins)) | ||||
|   println("10: " + change(10, coins)) | ||||
|   println("12: " + change(12, coins)) | ||||
|   println("6: " + change(6, coins)) | ||||
| } | ||||
							
								
								
									
										55
									
								
								samples/Golo/collection-literals.golo
									
									
									
									
									
										Executable file
									
								
							
							
						
						
									
										55
									
								
								samples/Golo/collection-literals.golo
									
									
									
									
									
										Executable file
									
								
							| @@ -0,0 +1,55 @@ | ||||
| # Copyright 2012-2014 Institut National des Sciences Appliquées de Lyon (INSA-Lyon) | ||||
| #  | ||||
| # Licensed under the Apache License, Version 2.0 (the "License"); | ||||
| # you may not use this file except in compliance with the License. | ||||
| # You may obtain a copy of the License at | ||||
| #  | ||||
| #     http://www.apache.org/licenses/LICENSE-2.0 | ||||
| #  | ||||
| # Unless required by applicable law or agreed to in writing, software | ||||
| # distributed under the License is distributed on an "AS IS" BASIS, | ||||
| # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. | ||||
| # See the License for the specific language governing permissions and | ||||
| # limitations under the License. | ||||
|  | ||||
| module samples.CollectionLiterals | ||||
|  | ||||
| local function play_with_tuples = { | ||||
|   let hello = ["Hello", "world", "!"] | ||||
|   foreach str in hello { | ||||
|     print(str + " ") | ||||
|   } | ||||
|   println("") | ||||
|  | ||||
|   println(hello: get(0) + "-" + hello: get(1) + "-" + hello: get(2)) | ||||
|  | ||||
|   println(hello: join("/")) | ||||
| } | ||||
|  | ||||
| local function play_with_literals = { | ||||
|   let data = [ | ||||
|     [1, 2, 3], | ||||
|     tuple[1, 2, 3], | ||||
|     array[1, 2, 3], | ||||
|     set[1, 2, 3, 3, 1], | ||||
|     map[ | ||||
|       ["a", 10], | ||||
|       ["b", 20] | ||||
|     ], | ||||
|     vector[1, 2, 3], | ||||
|     list[1, 2, 3] | ||||
|   ] | ||||
|  | ||||
|   data: each(|element| { | ||||
|     println(element: toString()) | ||||
|     println("  type: " + element: getClass()) | ||||
|   }) | ||||
| } | ||||
|  | ||||
| function main = |args| { | ||||
|   println(">>> Literals") | ||||
|   play_with_literals() | ||||
|   println("\n>>> Tuples") | ||||
|   play_with_tuples() | ||||
| } | ||||
|  | ||||
							
								
								
									
										53
									
								
								samples/Golo/context-decorator.golo
									
									
									
									
									
										Executable file
									
								
							
							
						
						
									
										53
									
								
								samples/Golo/context-decorator.golo
									
									
									
									
									
										Executable file
									
								
							| @@ -0,0 +1,53 @@ | ||||
| # Copyright 2012-2014 Institut National des Sciences Appliquées de Lyon (INSA-Lyon) | ||||
| # | ||||
| # Licensed under the Apache License, Version 2.0 (the "License"); | ||||
| # you may not use this file except in compliance with the License. | ||||
| # You may obtain a copy of the License at | ||||
| # | ||||
| #     http://www.apache.org/licenses/LICENSE-2.0 | ||||
| # | ||||
| # Unless required by applicable law or agreed to in writing, software | ||||
| # distributed under the License is distributed on an "AS IS" BASIS, | ||||
| # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. | ||||
| # See the License for the specific language governing permissions and | ||||
| # limitations under the License. | ||||
|  | ||||
| module samples.ContextDecorator | ||||
|  | ||||
| import gololang.Decorators | ||||
|  | ||||
| let myContext = defaultContext(): | ||||
|   count(0): | ||||
|   define("entry", |this, args| { | ||||
|     this: count(this: count() + 1) | ||||
|     println("hello:" + this: count()) | ||||
|     return args | ||||
|   }): | ||||
|   define("exit", |this, result| { | ||||
|     require(result >= 3, "wrong value") | ||||
|     println("goobye") | ||||
|     return result | ||||
|   }): | ||||
|   define("catcher", |this, e| { | ||||
|     println("Caught " + e) | ||||
|     throw e | ||||
|   }): | ||||
|   define("finallizer", |this| {println("do some cleanup")}) | ||||
|  | ||||
|  | ||||
| @withContext(myContext) | ||||
| function foo = |a, b| { | ||||
|   println("Hard computation") | ||||
|   return a + b | ||||
| } | ||||
|  | ||||
| function main = |args| { | ||||
|   println(foo(1,2)) | ||||
|   println("====") | ||||
|   println(withContext(myContext)(|a| -> 2*a)(3)) | ||||
|   println("====") | ||||
|   try { | ||||
|     println(foo(1, 1)) | ||||
|   } catch (e) { } | ||||
| } | ||||
|  | ||||
							
								
								
									
										83
									
								
								samples/Golo/decorators.golo
									
									
									
									
									
										Executable file
									
								
							
							
						
						
									
										83
									
								
								samples/Golo/decorators.golo
									
									
									
									
									
										Executable file
									
								
							| @@ -0,0 +1,83 @@ | ||||
| # Copyright 2012-2014 Institut National des Sciences Appliquées de Lyon (INSA-Lyon) | ||||
| #  | ||||
| # Licensed under the Apache License, Version 2.0 (the "License"); | ||||
| # you may not use this file except in compliance with the License. | ||||
| # You may obtain a copy of the License at | ||||
| #  | ||||
| #     http://www.apache.org/licenses/LICENSE-2.0 | ||||
| #  | ||||
| # Unless required by applicable law or agreed to in writing, software | ||||
| # distributed under the License is distributed on an "AS IS" BASIS, | ||||
| # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. | ||||
| # See the License for the specific language governing permissions and | ||||
| # limitations under the License. | ||||
|  | ||||
| module samples.Decorators | ||||
|  | ||||
| import java.util.LinkedList | ||||
|  | ||||
| function simple_decorator = |func| { | ||||
|   return |a,b| -> func(a+1,b+1) | ||||
| } | ||||
|  | ||||
| @simple_decorator | ||||
| function simple_adder = |x,y| -> x + y | ||||
|  | ||||
| function decorator_with_params = |param1, param2|{ | ||||
|   return |func| { | ||||
|     return |a,b| -> func(a+param1,b+param2) | ||||
|   } | ||||
| } | ||||
|  | ||||
| @decorator_with_params(10,2) | ||||
| function parametrized_adder = |x,y| -> x + y | ||||
|  | ||||
| function generic_decorator = |func| { | ||||
|   return |args...| { | ||||
|     println("number of params : "+args: length()) | ||||
|     return func: invokeWithArguments(args) | ||||
|   } | ||||
| } | ||||
|  | ||||
| @generic_decorator | ||||
| function generic_adder0 = -> 42 | ||||
|  | ||||
| @generic_decorator | ||||
| function generic_adder1 = |x| -> x | ||||
|  | ||||
| @generic_decorator | ||||
| function generic_adder2 = |x,y| -> x + y | ||||
|  | ||||
| @generic_decorator | ||||
| function generic_adder3 = |x,y,z| -> x + y + z | ||||
|  | ||||
| function list_sum_decorator = |func| { | ||||
|     return |this| -> func(this) - 8 | ||||
| } | ||||
|  | ||||
| augment java.util.List { | ||||
|  | ||||
|   @list_sum_decorator | ||||
|   function sum = |this| { | ||||
|     var acc = 0 | ||||
|     foreach elem in this { | ||||
|         acc = acc + elem | ||||
|     } | ||||
|     return acc | ||||
|   } | ||||
| } | ||||
|  | ||||
| function main = |args| { | ||||
|   println(simple_adder(10,30)) | ||||
|   println(parametrized_adder(10,20)) | ||||
|   println(generic_adder0()) | ||||
|   println(generic_adder1(42)) | ||||
|   println(generic_adder2(20,22)) | ||||
|   println(generic_adder3(10,12,20)) | ||||
|   let list = LinkedList() | ||||
|   list: add(5) | ||||
|   list: add(10) | ||||
|   list: add(15) | ||||
|   list: add(20) | ||||
|   println(list: sum()) | ||||
| } | ||||
							
								
								
									
										88
									
								
								samples/Golo/dynamic-evaluation.golo
									
									
									
									
									
										Executable file
									
								
							
							
						
						
									
										88
									
								
								samples/Golo/dynamic-evaluation.golo
									
									
									
									
									
										Executable file
									
								
							| @@ -0,0 +1,88 @@ | ||||
| # Copyright 2012-2014 Institut National des Sciences Appliquées de Lyon (INSA-Lyon) | ||||
| #  | ||||
| # Licensed under the Apache License, Version 2.0 (the "License"); | ||||
| # you may not use this file except in compliance with the License. | ||||
| # You may obtain a copy of the License at | ||||
| #  | ||||
| #     http://www.apache.org/licenses/LICENSE-2.0 | ||||
| #  | ||||
| # Unless required by applicable law or agreed to in writing, software | ||||
| # distributed under the License is distributed on an "AS IS" BASIS, | ||||
| # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. | ||||
| # See the License for the specific language governing permissions and | ||||
| # limitations under the License. | ||||
|  | ||||
| module samples.DynamicEvaluation | ||||
|  | ||||
| import gololang.EvaluationEnvironment | ||||
|  | ||||
| local function test_asModule = |env| { | ||||
|   let code = | ||||
| """ | ||||
| module foo | ||||
|  | ||||
| function a = -> "a!" | ||||
| function b = -> "b!" | ||||
| """ | ||||
|   let mod = env: asModule(code) | ||||
|   let a = fun("a", mod) | ||||
|   let b = fun("b", mod) | ||||
|   println(">>> asModule()") | ||||
|   println(a()) | ||||
|   println(b()) | ||||
| } | ||||
|  | ||||
| local function test_anonymousModule = |env| { | ||||
|   let code = | ||||
| """ | ||||
| function a = -> "a." | ||||
| function b = -> "b." | ||||
| """ | ||||
|   let mod = env: anonymousModule(code) | ||||
|   let a = fun("a", mod) | ||||
|   let b = fun("b", mod) | ||||
|   println(">>> anonymousModule()") | ||||
|   println(a()) | ||||
|   println(b()) | ||||
| } | ||||
|  | ||||
| local function test_asFunction = |env| { | ||||
|   let code = "return (a + b) * 2" | ||||
|   let f = env: asFunction(code, "a", "b") | ||||
|   println(">>> asFunction") | ||||
|   println(f(10, 20)) | ||||
| } | ||||
|  | ||||
| local function test_def = |env| { | ||||
|   let code = "|a, b| -> (a + b) * 2" | ||||
|   let f = env: def(code) | ||||
|   println(">>> def") | ||||
|   println(f(10, 20)) | ||||
| } | ||||
|  | ||||
| local function test_run = |env| { | ||||
|   let code = """println(">>> run") | ||||
|   foreach (i in range(0, 3)) { | ||||
|     println("w00t") | ||||
|   }""" | ||||
|   env: run(code) | ||||
| } | ||||
|  | ||||
| local function test_run_map = |env| { | ||||
|   let code = """println(">>> run_map") | ||||
|   println(a) | ||||
|   println(b) | ||||
|   """ | ||||
|   let values = java.util.TreeMap(): add("a", 1): add("b", 2) | ||||
|   env: run(code, values) | ||||
| } | ||||
|  | ||||
| function main = |args| { | ||||
|   let env = EvaluationEnvironment() | ||||
|   test_asModule(env) | ||||
|   test_anonymousModule(env) | ||||
|   test_asFunction(env) | ||||
|   test_def(env) | ||||
|   test_run(env) | ||||
|   test_run_map(env) | ||||
| } | ||||
							
								
								
									
										29
									
								
								samples/Golo/dynamic-object-person.golo
									
									
									
									
									
										Executable file
									
								
							
							
						
						
									
										29
									
								
								samples/Golo/dynamic-object-person.golo
									
									
									
									
									
										Executable file
									
								
							| @@ -0,0 +1,29 @@ | ||||
| # Copyright 2012-2014 Institut National des Sciences Appliquées de Lyon (INSA-Lyon) | ||||
| # | ||||
| # Licensed under the Apache License, Version 2.0 (the "License"); | ||||
| # you may not use this file except in compliance with the License. | ||||
| # You may obtain a copy of the License at | ||||
| # | ||||
| #     http://www.apache.org/licenses/LICENSE-2.0 | ||||
| # | ||||
| # Unless required by applicable law or agreed to in writing, software | ||||
| # distributed under the License is distributed on an "AS IS" BASIS, | ||||
| # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. | ||||
| # See the License for the specific language governing permissions and | ||||
| # limitations under the License. | ||||
|  | ||||
| module samples.DynamicObjectPerson | ||||
|  | ||||
| local function mrbean = -> DynamicObject(): | ||||
|   name("Mr Bean"): | ||||
|   email("mrbean@gmail.com"): | ||||
|   define("toString", |this| -> this: name() + " <" + this: email() + ">") | ||||
|  | ||||
| function main = |args| { | ||||
|  | ||||
|   let bean = mrbean() | ||||
|   println(bean: toString()) | ||||
|  | ||||
|   bean: email("mrbean@outlook.com") | ||||
|   println(bean: toString()) | ||||
| } | ||||
							
								
								
									
										34
									
								
								samples/Golo/echo-args.golo
									
									
									
									
									
										Executable file
									
								
							
							
						
						
									
										34
									
								
								samples/Golo/echo-args.golo
									
									
									
									
									
										Executable file
									
								
							| @@ -0,0 +1,34 @@ | ||||
| # Copyright 2012-2014 Institut National des Sciences Appliquées de Lyon (INSA-Lyon) | ||||
| #  | ||||
| # Licensed under the Apache License, Version 2.0 (the "License"); | ||||
| # you may not use this file except in compliance with the License. | ||||
| # You may obtain a copy of the License at | ||||
| #  | ||||
| #     http://www.apache.org/licenses/LICENSE-2.0 | ||||
| #  | ||||
| # Unless required by applicable law or agreed to in writing, software | ||||
| # distributed under the License is distributed on an "AS IS" BASIS, | ||||
| # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. | ||||
| # See the License for the specific language governing permissions and | ||||
| # limitations under the License. | ||||
|  | ||||
| module EchoArgs | ||||
|  | ||||
| function main = |args| { | ||||
|    | ||||
|   println("With a for loop and an index:") | ||||
|   for (var i = 0, i < args: length(), i = i + 1) { | ||||
|     println("  #" + i + " -> " + args: get(i)) | ||||
|   } | ||||
|  | ||||
|   println("With a foreach loop:") | ||||
|   foreach arg in args { | ||||
|     println("  " + arg) | ||||
|   } | ||||
|  | ||||
|   println("With a foreach over a range:") | ||||
|   foreach i in range(0, args: length()) { | ||||
|     println("  #" + i + " -> " + args: get(i)) | ||||
|   } | ||||
| } | ||||
|  | ||||
							
								
								
									
										31
									
								
								samples/Golo/enums-thread-state.golo
									
									
									
									
									
										Executable file
									
								
							
							
						
						
									
										31
									
								
								samples/Golo/enums-thread-state.golo
									
									
									
									
									
										Executable file
									
								
							| @@ -0,0 +1,31 @@ | ||||
| # Copyright 2012-2014 Institut National des Sciences Appliquées de Lyon (INSA-Lyon) | ||||
| #  | ||||
| # Licensed under the Apache License, Version 2.0 (the "License"); | ||||
| # you may not use this file except in compliance with the License. | ||||
| # You may obtain a copy of the License at | ||||
| #  | ||||
| #     http://www.apache.org/licenses/LICENSE-2.0 | ||||
| #  | ||||
| # Unless required by applicable law or agreed to in writing, software | ||||
| # distributed under the License is distributed on an "AS IS" BASIS, | ||||
| # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. | ||||
| # See the License for the specific language governing permissions and | ||||
| # limitations under the License. | ||||
|  | ||||
| module sample.EnumsThreadState | ||||
|  | ||||
| import java.lang.Thread$State | ||||
|  | ||||
| function main = |args| { | ||||
|  | ||||
|   # Call the enum entry like a function | ||||
|   let new = Thread$State.NEW() | ||||
|   println("name=" + new: name() + ", ordinal=" + new: ordinal()) | ||||
|   println("-----------") | ||||
|  | ||||
|   # Walk through all enum entries | ||||
|   foreach element in Thread$State.values() { | ||||
|     println("name=" + element: name() + ", ordinal=" + element: ordinal()) | ||||
|   } | ||||
| } | ||||
|  | ||||
							
								
								
									
										39
									
								
								samples/Golo/fibonacci.golo
									
									
									
									
									
										Executable file
									
								
							
							
						
						
									
										39
									
								
								samples/Golo/fibonacci.golo
									
									
									
									
									
										Executable file
									
								
							| @@ -0,0 +1,39 @@ | ||||
| # Copyright 2012-2014 Institut National des Sciences Appliquées de Lyon (INSA-Lyon) | ||||
| #  | ||||
| # Licensed under the Apache License, Version 2.0 (the "License"); | ||||
| # you may not use this file except in compliance with the License. | ||||
| # You may obtain a copy of the License at | ||||
| #  | ||||
| #     http://www.apache.org/licenses/LICENSE-2.0 | ||||
| #  | ||||
| # Unless required by applicable law or agreed to in writing, software | ||||
| # distributed under the License is distributed on an "AS IS" BASIS, | ||||
| # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. | ||||
| # See the License for the specific language governing permissions and | ||||
| # limitations under the License. | ||||
|  | ||||
| module samples.Fibonacci | ||||
|  | ||||
| import java.lang.System | ||||
|  | ||||
| function fib = |n| { | ||||
|   if n <= 1 { | ||||
|     return n | ||||
|   } else { | ||||
|     return fib(n - 1) + fib(n - 2) | ||||
|   } | ||||
| } | ||||
|  | ||||
| local function run = { | ||||
|   let start = System.currentTimeMillis() | ||||
|   let result = fib(40) | ||||
|   let duration = System.currentTimeMillis() - start | ||||
|   println(">>> " + result + " (took " + duration + "ms)") | ||||
| } | ||||
|  | ||||
| function main = |args| { | ||||
|   while true { | ||||
|     run() | ||||
|   } | ||||
| } | ||||
|  | ||||
							
								
								
									
										20
									
								
								samples/Golo/helloworld.golo
									
									
									
									
									
										Executable file
									
								
							
							
						
						
									
										20
									
								
								samples/Golo/helloworld.golo
									
									
									
									
									
										Executable file
									
								
							| @@ -0,0 +1,20 @@ | ||||
| # Copyright 2012-2014 Institut National des Sciences Appliquées de Lyon (INSA-Lyon) | ||||
| #  | ||||
| # Licensed under the Apache License, Version 2.0 (the "License"); | ||||
| # you may not use this file except in compliance with the License. | ||||
| # You may obtain a copy of the License at | ||||
| #  | ||||
| #     http://www.apache.org/licenses/LICENSE-2.0 | ||||
| #  | ||||
| # Unless required by applicable law or agreed to in writing, software | ||||
| # distributed under the License is distributed on an "AS IS" BASIS, | ||||
| # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. | ||||
| # See the License for the specific language governing permissions and | ||||
| # limitations under the License. | ||||
|  | ||||
| module hello.World | ||||
|  | ||||
| function main = |args| { | ||||
|   println("Hello world!") | ||||
| } | ||||
|  | ||||
							
								
								
									
										53
									
								
								samples/Golo/http-server.golo
									
									
									
									
									
										Executable file
									
								
							
							
						
						
									
										53
									
								
								samples/Golo/http-server.golo
									
									
									
									
									
										Executable file
									
								
							| @@ -0,0 +1,53 @@ | ||||
| # Copyright 2012-2014 Institut National des Sciences Appliquées de Lyon (INSA-Lyon) | ||||
| #  | ||||
| # Licensed under the Apache License, Version 2.0 (the "License"); | ||||
| # you may not use this file except in compliance with the License. | ||||
| # You may obtain a copy of the License at | ||||
| #  | ||||
| #     http://www.apache.org/licenses/LICENSE-2.0 | ||||
| #  | ||||
| # Unless required by applicable law or agreed to in writing, software | ||||
| # distributed under the License is distributed on an "AS IS" BASIS, | ||||
| # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. | ||||
| # See the License for the specific language governing permissions and | ||||
| # limitations under the License. | ||||
|  | ||||
| module samples.WebServer | ||||
|  | ||||
| import java.lang | ||||
| import java.net.InetSocketAddress | ||||
| import com.sun.net.httpserver | ||||
| import com.sun.net.httpserver.HttpServer | ||||
|  | ||||
| function main = |args| { | ||||
|  | ||||
|   let server = HttpServer.create(InetSocketAddress("localhost", 8081), 0) | ||||
|    | ||||
|   server: createContext("/", |exchange| { | ||||
|     let headers = exchange: getResponseHeaders() | ||||
|     let response = StringBuilder(): | ||||
|       append("Requested URI: "): | ||||
|       append(exchange: getRequestURI()): | ||||
|       append("\n"): | ||||
|       append("Current time: "): | ||||
|       append(java.util.Date()): | ||||
|       append("\n"): | ||||
|       toString() | ||||
|     headers: set("Content-Type", "text/plain") | ||||
|     exchange: sendResponseHeaders(200, response: length()) | ||||
|     exchange: getResponseBody(): write(response: getBytes()) | ||||
|     exchange: close() | ||||
|   }) | ||||
|  | ||||
|   server: createContext("/shutdown", |exchange| { | ||||
|     let response = "Ok, thanks, bye!" | ||||
|     exchange: getResponseHeaders(): set("Content-Type", "text/plain") | ||||
|     exchange: sendResponseHeaders(200, response: length()) | ||||
|     exchange: getResponseBody(): write(response: getBytes()) | ||||
|     exchange: close() | ||||
|     server: stop(5) | ||||
|   }) | ||||
|  | ||||
|   server: start() | ||||
|   println(">>> http://localhost:8081/") | ||||
| } | ||||
							
								
								
									
										65
									
								
								samples/Golo/logdeco.golo
									
									
									
									
									
										Executable file
									
								
							
							
						
						
									
										65
									
								
								samples/Golo/logdeco.golo
									
									
									
									
									
										Executable file
									
								
							| @@ -0,0 +1,65 @@ | ||||
|  | ||||
| module samples.LogDeco | ||||
|  | ||||
| function log1 = |msg| { | ||||
|     return |fun| { | ||||
|         return |args...| { | ||||
|             println(msg) | ||||
|             return fun: invokeWithArguments(args) | ||||
|         } | ||||
|     } | ||||
| } | ||||
|  | ||||
| @log1("calling foo") | ||||
| function foo = |a| { | ||||
|     println("foo got a " + a) | ||||
| } | ||||
|  | ||||
| @log1("I'am a bar") | ||||
| function bar = |a| -> 2*a | ||||
|  | ||||
| let sayHello = log1("Hello") | ||||
|  | ||||
| @sayHello | ||||
| function baz = -> "Goodbye" | ||||
|  | ||||
| function log2 = |msgBefore| -> |msgAfter| -> |func| -> |args...| { | ||||
|     println(msgBefore) | ||||
|     let res = func: invokeWithArguments(args) | ||||
|     println(msgAfter) | ||||
|     return res | ||||
| } | ||||
|  | ||||
| @log2("enter foo")("exit foo") | ||||
| function spam = |a| { | ||||
|     println("foo: " + a) | ||||
| } | ||||
|  | ||||
| function logEnterExit = |name| -> log2("# enter " + name)("# exit " + name) | ||||
|  | ||||
| @logEnterExit("bar") | ||||
| function egg = { println("doing something...") } | ||||
|  | ||||
| function main = |args| { | ||||
|  | ||||
|     foo("bar") | ||||
|      | ||||
|     println("---") | ||||
|     println(bar(21)) | ||||
|      | ||||
|     println("---") | ||||
|     println(baz()) | ||||
|  | ||||
|     println("---") | ||||
|     spam("bar") | ||||
|  | ||||
|     println("---") | ||||
|     egg() | ||||
|  | ||||
|     println("---") | ||||
|     let strange_use = log2("hello")("goodbye")({println(":p")}) | ||||
|     strange_use() | ||||
|  | ||||
|     println("---") | ||||
|     log2("another")("use")(|a|{println(a)})("strange") | ||||
| } | ||||
							
								
								
									
										40
									
								
								samples/Golo/matching-operator.golo
									
									
									
									
									
										Executable file
									
								
							
							
						
						
									
										40
									
								
								samples/Golo/matching-operator.golo
									
									
									
									
									
										Executable file
									
								
							| @@ -0,0 +1,40 @@ | ||||
| # Copyright 2012-2014 Institut National des Sciences Appliquées de Lyon (INSA-Lyon) | ||||
| #  | ||||
| # Licensed under the Apache License, Version 2.0 (the "License"); | ||||
| # you may not use this file except in compliance with the License. | ||||
| # You may obtain a copy of the License at | ||||
| #  | ||||
| #     http://www.apache.org/licenses/LICENSE-2.0 | ||||
| #  | ||||
| # Unless required by applicable law or agreed to in writing, software | ||||
| # distributed under the License is distributed on an "AS IS" BASIS, | ||||
| # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. | ||||
| # See the License for the specific language governing permissions and | ||||
| # limitations under the License. | ||||
|  | ||||
| module Matching | ||||
|  | ||||
| import java.util.LinkedList | ||||
|  | ||||
| local function data = { | ||||
|   let list = LinkedList() | ||||
|   list: add("foo@bar.com") | ||||
|   list: add("+33.6.11.22.33") | ||||
|   list: add("http://golo-lang.org/") | ||||
|   list: add("def foo = bar(_._) with :> T") | ||||
|   return list | ||||
| } | ||||
|  | ||||
| local function what_it_could_be = |item| -> match { | ||||
|   when item: contains("@") then "an email?" | ||||
|   when item: startsWith("+33") then "a French phone number?" | ||||
|   when item: startsWith("http://") then "a website URL?" | ||||
|   otherwise "I have no clue, mate!" | ||||
| } | ||||
|  | ||||
| function main = |args| { | ||||
|   foreach item in data() { | ||||
|     println(item + " => " + what_it_could_be(item)) | ||||
|   } | ||||
| } | ||||
|  | ||||
							
								
								
									
										24
									
								
								samples/Golo/max-int.golo
									
									
									
									
									
										Executable file
									
								
							
							
						
						
									
										24
									
								
								samples/Golo/max-int.golo
									
									
									
									
									
										Executable file
									
								
							| @@ -0,0 +1,24 @@ | ||||
| # Copyright 2012-2014 Institut National des Sciences Appliquées de Lyon (INSA-Lyon) | ||||
| #  | ||||
| # Licensed under the Apache License, Version 2.0 (the "License"); | ||||
| # you may not use this file except in compliance with the License. | ||||
| # You may obtain a copy of the License at | ||||
| #  | ||||
| #     http://www.apache.org/licenses/LICENSE-2.0 | ||||
| #  | ||||
| # Unless required by applicable law or agreed to in writing, software | ||||
| # distributed under the License is distributed on an "AS IS" BASIS, | ||||
| # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. | ||||
| # See the License for the specific language governing permissions and | ||||
| # limitations under the License. | ||||
|  | ||||
| module samples.MaxInt | ||||
|  | ||||
| local function max_int = { | ||||
|   return java.lang.Integer.MAX_VALUE() | ||||
| } | ||||
|  | ||||
| function main = |args| { | ||||
|   println(max_int()) | ||||
| } | ||||
|  | ||||
							
								
								
									
										55
									
								
								samples/Golo/memoize.golo
									
									
									
									
									
										Executable file
									
								
							
							
						
						
									
										55
									
								
								samples/Golo/memoize.golo
									
									
									
									
									
										Executable file
									
								
							| @@ -0,0 +1,55 @@ | ||||
| # Copyright 2012-2014 Institut National des Sciences Appliquées de Lyon (INSA-Lyon) | ||||
| # | ||||
| # Licensed under the Apache License, Version 2.0 (the "License"); | ||||
| # you may not use this file except in compliance with the License. | ||||
| # You may obtain a copy of the License at | ||||
| # | ||||
| #     http://www.apache.org/licenses/LICENSE-2.0 | ||||
| # | ||||
| # Unless required by applicable law or agreed to in writing, software | ||||
| # distributed under the License is distributed on an "AS IS" BASIS, | ||||
| # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. | ||||
| # See the License for the specific language governing permissions and | ||||
| # limitations under the License. | ||||
|  | ||||
| module samples.MemoizeDecorator | ||||
|  | ||||
| import gololang.Decorators | ||||
|  | ||||
| import java.lang.System | ||||
|  | ||||
| let memo = memoizer() | ||||
|  | ||||
| @memo | ||||
| function fib = |n| { | ||||
|   if n <= 1 { | ||||
|     return n | ||||
|   } else { | ||||
|     return fib(n - 1) + fib(n - 2) | ||||
|   } | ||||
| } | ||||
|  | ||||
| @memo | ||||
| function foo = |n| -> n | ||||
|  | ||||
| local function run = { | ||||
|   let start = System.currentTimeMillis() | ||||
|   let result = fib(40) | ||||
|   let duration = System.currentTimeMillis() - start | ||||
|   println(">>> fib(40) = " + result + " (took " + duration + "ms)") | ||||
| } | ||||
|  | ||||
| local function run2 = { | ||||
|   let start = System.currentTimeMillis() | ||||
|   let result = foo(40) | ||||
|   let duration = System.currentTimeMillis() - start | ||||
|   println(">>> foo(40) = " + result + " (took " + duration + "ms)") | ||||
| } | ||||
|  | ||||
| function main = |args| { | ||||
|   foreach i in range(0, 5) { | ||||
|     println("run " + i) | ||||
|     run() | ||||
|     run2() | ||||
|   } | ||||
| } | ||||
							
								
								
									
										43
									
								
								samples/Golo/null-safety.golo
									
									
									
									
									
										Executable file
									
								
							
							
						
						
									
										43
									
								
								samples/Golo/null-safety.golo
									
									
									
									
									
										Executable file
									
								
							| @@ -0,0 +1,43 @@ | ||||
| # Copyright 2012-2014 Institut National des Sciences Appliquées de Lyon (INSA-Lyon) | ||||
| #  | ||||
| # Licensed under the Apache License, Version 2.0 (the "License"); | ||||
| # you may not use this file except in compliance with the License. | ||||
| # You may obtain a copy of the License at | ||||
| #  | ||||
| #     http://www.apache.org/licenses/LICENSE-2.0 | ||||
| #  | ||||
| # Unless required by applicable law or agreed to in writing, software | ||||
| # distributed under the License is distributed on an "AS IS" BASIS, | ||||
| # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. | ||||
| # See the License for the specific language governing permissions and | ||||
| # limitations under the License. | ||||
|  | ||||
| module DealingWithNull | ||||
|  | ||||
| import java.util | ||||
|  | ||||
| function main = |args| { | ||||
|  | ||||
|   # Data model | ||||
|   let contacts = map[ | ||||
|     ["mrbean", map[ | ||||
|       ["email", "bean@gmail.com"], | ||||
|       ["url", "http://mrbean.com"] | ||||
|     ]], | ||||
|     ["larry", map[ | ||||
|       ["email", "larry@iamricherthanyou.com"] | ||||
|     ]] | ||||
|   ] | ||||
|  | ||||
|   # MrBean and Larry | ||||
|   let mrbean = contacts: get("mrbean") | ||||
|   let larry = contacts: get("larry") | ||||
|    | ||||
|   # Illustrates orIfNull | ||||
|   println(mrbean: get("url") orIfNull "n/a") | ||||
|   println(larry: get("url") orIfNull "n/a") | ||||
|  | ||||
|   # Querying a non-existent data model because there is no 'address' entry | ||||
|   println(mrbean: get("address")?: street()?: number() orIfNull "n/a") | ||||
| } | ||||
|  | ||||
							
								
								
									
										65
									
								
								samples/Golo/prepost-decorators.golo
									
									
									
									
									
										Executable file
									
								
							
							
						
						
									
										65
									
								
								samples/Golo/prepost-decorators.golo
									
									
									
									
									
										Executable file
									
								
							| @@ -0,0 +1,65 @@ | ||||
| # Copyright 2012-2014 Institut National des Sciences Appliquées de Lyon (INSA-Lyon) | ||||
| #  | ||||
| # Licensed under the Apache License, Version 2.0 (the "License"); | ||||
| # you may not use this file except in compliance with the License. | ||||
| # You may obtain a copy of the License at | ||||
| #  | ||||
| #     http://www.apache.org/licenses/LICENSE-2.0 | ||||
| #  | ||||
| # Unless required by applicable law or agreed to in writing, software | ||||
| # distributed under the License is distributed on an "AS IS" BASIS, | ||||
| # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. | ||||
| # See the License for the specific language governing permissions and | ||||
| # limitations under the License. | ||||
|  | ||||
| module samples.PrepostDecorator | ||||
|  | ||||
| import gololang.Decorators | ||||
|  | ||||
| let isInteger = isOfType(Integer.class) | ||||
|  | ||||
| @checkResult(isString(): andThen(lengthIs(2))) | ||||
| @checkArguments(isInteger: andThen(isPositive()), isString()) | ||||
| function foo = |a, b| { | ||||
|     return b + a | ||||
| } | ||||
|  | ||||
| let myCheck = checkArguments(isInteger: andThen(isPositive())) | ||||
|  | ||||
| @myCheck | ||||
| function inv = |v| -> 1.0 / v | ||||
|  | ||||
| let isPositiveInt = isInteger: andThen(isPositive()) | ||||
|  | ||||
| @checkArguments(isPositiveInt) | ||||
| function mul = |v| -> 10 * v | ||||
|  | ||||
| @checkArguments(isNumber()) | ||||
| function num = |v| -> "ok" | ||||
|  | ||||
| @checkArguments(isNotNull()) | ||||
| function notnull = |v| -> "ok" | ||||
|  | ||||
| function main = |args| { | ||||
|     try { println(foo(1, "b")) } catch (e) { println(e) } | ||||
|     try { println(foo(-1, "b")) } catch (e) { println(e) } | ||||
|     try { println(foo("a", 2)) } catch (e) { println(e) } | ||||
|     try { println(foo(1, 2)) } catch (e) { println(e) } | ||||
|     try { println(foo(10, "ab")) } catch (e) { println(e) } | ||||
|  | ||||
|     try { println(inv(10)) } catch (e) { println(e) } | ||||
|     try { println(inv(0)) } catch (e) { println(e) } | ||||
|  | ||||
|     try { println(mul(5)) } catch (e) { println(e) } | ||||
|     try { println(mul(0)) } catch (e) { println(e) } | ||||
|  | ||||
|     try { println(num(1)) } catch (e) { println(e) } | ||||
|     try { println(num(1_L)) } catch (e) { println(e) } | ||||
|     try { println(num(1.5)) } catch (e) { println(e) } | ||||
|     try { println(num(1.5_F)) } catch (e) { println(e) } | ||||
|     try { println(num("a")) } catch (e) { println(e) } | ||||
|     try { println(num('a')) } catch (e) { println(e) } | ||||
|  | ||||
|     try { println(notnull('1')) } catch (e) { println(e) } | ||||
|     try { println(notnull(null)) } catch (e) { println(e) } | ||||
| } | ||||
							
								
								
									
										69
									
								
								samples/Golo/structs.golo
									
									
									
									
									
										Executable file
									
								
							
							
						
						
									
										69
									
								
								samples/Golo/structs.golo
									
									
									
									
									
										Executable file
									
								
							| @@ -0,0 +1,69 @@ | ||||
| # Copyright 2012-2014 Institut National des Sciences Appliquées de Lyon (INSA-Lyon) | ||||
| #  | ||||
| # Licensed under the Apache License, Version 2.0 (the "License"); | ||||
| # you may not use this file except in compliance with the License. | ||||
| # You may obtain a copy of the License at | ||||
| #  | ||||
| #     http://www.apache.org/licenses/LICENSE-2.0 | ||||
| #  | ||||
| # Unless required by applicable law or agreed to in writing, software | ||||
| # distributed under the License is distributed on an "AS IS" BASIS, | ||||
| # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. | ||||
| # See the License for the specific language governing permissions and | ||||
| # limitations under the License. | ||||
|  | ||||
| module StructDemo | ||||
|  | ||||
| struct Point = { x, y } | ||||
|  | ||||
| augment StructDemo.types.Point { | ||||
|  | ||||
|   function move = |this, offsetX, offsetY| { | ||||
|     this: x(this: x() + offsetX) | ||||
|     this: y(this: y() + offsetY) | ||||
|     return this | ||||
|   } | ||||
|  | ||||
|   function relative = |this, offsetX, offsetY| -> Point(this: x() + offsetX, this: y() + offsetY) | ||||
| } | ||||
|  | ||||
| function main = |args| { | ||||
|    | ||||
|   let p1 = Point(1, 2) | ||||
|   let p2 = Point(): x(1): y(2) | ||||
|   let p3 = p1: frozenCopy() | ||||
|   let p4 = p1: frozenCopy() | ||||
|  | ||||
|   println(p1) | ||||
|   println("x = " + p1: x()) | ||||
|   println("y = " + p1: y()) | ||||
|  | ||||
|   println("p1 == p2 " + (p1 == p2)) | ||||
|   println("p1 == p3 " + (p1 == p3)) | ||||
|   println("p3 == p4 " + (p3 == p4)) | ||||
|  | ||||
|   println("#p1 " + p1: hashCode()) | ||||
|   println("#p2 " + p2: hashCode()) | ||||
|   println("#p3 " + p3: hashCode()) | ||||
|   println("#p4 " + p4: hashCode()) | ||||
|  | ||||
|   println("p1: members() " + p1: members()) | ||||
|   println("p1: values() " + p1: values()) | ||||
|   foreach item in p1 { | ||||
|     println(item: get(0) + " -> " + item: get(1)) | ||||
|   } | ||||
|  | ||||
|   println("p1: set(\"x\", 10) " + p1: set("x", 10)) | ||||
|   println("p1: move(10, 5) " + p1: move(10, 5)) | ||||
|   println("p1: relative(11, 6) " + p1: relative(11, 6)) | ||||
|  | ||||
|   let p5 = ImmutablePoint(10, 20) | ||||
|   println("p5: " + p5) | ||||
|   try { | ||||
|     p5: x(100) | ||||
|   } catch (expected) { | ||||
|     println("p5 is immutable, so... " + expected: getMessage()) | ||||
|   } | ||||
| } | ||||
|  | ||||
|  | ||||
							
								
								
									
										43
									
								
								samples/Golo/swing-actionlistener.golo
									
									
									
									
									
										Executable file
									
								
							
							
						
						
									
										43
									
								
								samples/Golo/swing-actionlistener.golo
									
									
									
									
									
										Executable file
									
								
							| @@ -0,0 +1,43 @@ | ||||
| # Copyright 2012-2014 Institut National des Sciences Appliquées de Lyon (INSA-Lyon) | ||||
| # | ||||
| # Licensed under the Apache License, Version 2.0 (the "License"); | ||||
| # you may not use this file except in compliance with the License. | ||||
| # You may obtain a copy of the License at | ||||
| # | ||||
| #     http://www.apache.org/licenses/LICENSE-2.0 | ||||
| # | ||||
| # Unless required by applicable law or agreed to in writing, software | ||||
| # distributed under the License is distributed on an "AS IS" BASIS, | ||||
| # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. | ||||
| # See the License for the specific language governing permissions and | ||||
| # limitations under the License. | ||||
|  | ||||
| module samples.SwingActionListener | ||||
|  | ||||
| import java.awt.event | ||||
| import javax.swing | ||||
| import javax.swing.WindowConstants | ||||
|  | ||||
| local function listener = |handler| -> asInterfaceInstance(ActionListener.class, handler) | ||||
|  | ||||
| function main = |args| { | ||||
|  | ||||
|   let frame = JFrame("Action listeners") | ||||
|   frame: setDefaultCloseOperation(EXIT_ON_CLOSE()) | ||||
|  | ||||
|   let button = JButton("Click me!") | ||||
|   button: setFont(button: getFont(): deriveFont(96.0_F)) | ||||
|  | ||||
|   # Using a helper function | ||||
|   button: addActionListener(listener(|event| -> println("Clicked!"))) | ||||
|  | ||||
|   # Using a standard augmentation: MethodHandle::to(Class) | ||||
|   button: addActionListener((|event| -> println("[click]")): to(ActionListener.class)) | ||||
|  | ||||
|   # Straight closure passing | ||||
|   button: addActionListener(|event| -> println("( )")) | ||||
|  | ||||
|   frame: getContentPane(): add(button) | ||||
|   frame: pack() | ||||
|   frame: setVisible(true) | ||||
| } | ||||
							
								
								
									
										31
									
								
								samples/Golo/swing-helloworld.golo
									
									
									
									
									
										Executable file
									
								
							
							
						
						
									
										31
									
								
								samples/Golo/swing-helloworld.golo
									
									
									
									
									
										Executable file
									
								
							| @@ -0,0 +1,31 @@ | ||||
| # Copyright 2012-2014 Institut National des Sciences Appliquées de Lyon (INSA-Lyon) | ||||
| # | ||||
| # Licensed under the Apache License, Version 2.0 (the "License"); | ||||
| # you may not use this file except in compliance with the License. | ||||
| # You may obtain a copy of the License at | ||||
| # | ||||
| #     http://www.apache.org/licenses/LICENSE-2.0 | ||||
| # | ||||
| # Unless required by applicable law or agreed to in writing, software | ||||
| # distributed under the License is distributed on an "AS IS" BASIS, | ||||
| # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. | ||||
| # See the License for the specific language governing permissions and | ||||
| # limitations under the License. | ||||
|  | ||||
| module samples.SwingHelloWorld | ||||
|  | ||||
| import javax.swing | ||||
| import javax.swing.WindowConstants | ||||
|  | ||||
| function main = |args| { | ||||
|  | ||||
|   let frame = JFrame("Hello world") | ||||
|   frame: setDefaultCloseOperation(EXIT_ON_CLOSE()) | ||||
|  | ||||
|   let label = JLabel("Hello world") | ||||
|   label: setFont(label: getFont(): deriveFont(128.0_F)) | ||||
|  | ||||
|   frame: getContentPane(): add(label) | ||||
|   frame: pack() | ||||
|   frame: setVisible(true) | ||||
| } | ||||
							
								
								
									
										90
									
								
								samples/Golo/templates-chat-webapp.golo
									
									
									
									
									
										Executable file
									
								
							
							
						
						
									
										90
									
								
								samples/Golo/templates-chat-webapp.golo
									
									
									
									
									
										Executable file
									
								
							| @@ -0,0 +1,90 @@ | ||||
| # Copyright 2012-2014 Institut National des Sciences Appliquées de Lyon (INSA-Lyon) | ||||
| # | ||||
| # Licensed under the Apache License, Version 2.0 (the "License"); | ||||
| # you may not use this file except in compliance with the License. | ||||
| # You may obtain a copy of the License at | ||||
| # | ||||
| #     http://www.apache.org/licenses/LICENSE-2.0 | ||||
| # | ||||
| # Unless required by applicable law or agreed to in writing, software | ||||
| # distributed under the License is distributed on an "AS IS" BASIS, | ||||
| # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. | ||||
| # See the License for the specific language governing permissions and | ||||
| # limitations under the License. | ||||
|  | ||||
| module samples.TemplatesChatWebapp | ||||
|  | ||||
| import java.lang | ||||
| import java.io | ||||
| import java.net.InetSocketAddress | ||||
| import com.sun.net.httpserver | ||||
| import com.sun.net.httpserver.HttpServer | ||||
|  | ||||
| local function redirect = |exchange, to| { | ||||
|   exchange: getResponseHeaders(): set("Location", to) | ||||
|   exchange: sendResponseHeaders(303, 0) | ||||
|   exchange: close() | ||||
| } | ||||
|  | ||||
| local function respond = |exchange, body| { | ||||
|   exchange: getResponseHeaders(): set("Content-Type", "text/html") | ||||
|   exchange: sendResponseHeaders(200, body: length()) | ||||
|   exchange: getResponseBody(): write(body: getBytes()) | ||||
|   exchange: close() | ||||
| } | ||||
|  | ||||
| # This is leaky and works with just 1 POST parameter... | ||||
| local function extract_post = |exchange, posts| { | ||||
|   let reader = BufferedReader(InputStreamReader(exchange: getRequestBody())) | ||||
|   var line = reader: readLine() | ||||
|   while line isnt null { | ||||
|     if line: startsWith("msg=") { | ||||
|       posts: add(java.net.URLDecoder.decode(line: substring(4), "UTF-8")) | ||||
|     } | ||||
|     line = reader: readLine() | ||||
|   } | ||||
|   reader: close() | ||||
| } | ||||
|  | ||||
|  | ||||
| local function index = |posts, template, exchange| { | ||||
|   if exchange: getRequestMethod() == "POST" { | ||||
|     extract_post(exchange, posts) | ||||
|     redirect(exchange, "/") | ||||
|   } else { | ||||
|     respond(exchange, template(posts)) | ||||
|   } | ||||
| } | ||||
|  | ||||
| local function index_template = -> """ | ||||
| <%@params posts %> | ||||
| <!DOCTYPE html> | ||||
| <html> | ||||
|   <head> | ||||
|     <title>Golo Chat</title> | ||||
|   </head> | ||||
|   <body> | ||||
|   <form action="/" method="post"> | ||||
|     <input type="text" name="msg"> | ||||
|     <input type="submit" value="Send"> | ||||
|   </form> | ||||
|   <div> | ||||
|     <h3>Last posts</h3> | ||||
|     <% foreach post in posts { %> | ||||
|       <div> | ||||
|         <%= post %> | ||||
|       </div> | ||||
|     <% } %> | ||||
|   </div> | ||||
|   </body> | ||||
| </html> | ||||
| """ | ||||
|  | ||||
| function main = |args| { | ||||
|   let index_tpl = gololang.TemplateEngine(): compile(index_template()) | ||||
|   let posts = java.util.concurrent.ConcurrentLinkedDeque() | ||||
|   let server = HttpServer.create(InetSocketAddress("localhost", 8081), 0) | ||||
|   server: createContext("/", ^index: bindTo(posts): bindTo(index_tpl)) | ||||
|   server: start() | ||||
|   println(">>> http://localhost:8081/") | ||||
| } | ||||
							
								
								
									
										51
									
								
								samples/Golo/util-containers.golo
									
									
									
									
									
										Executable file
									
								
							
							
						
						
									
										51
									
								
								samples/Golo/util-containers.golo
									
									
									
									
									
										Executable file
									
								
							| @@ -0,0 +1,51 @@ | ||||
| # Copyright 2012-2014 Institut National des Sciences Appliquées de Lyon (INSA-Lyon) | ||||
| #  | ||||
| # Licensed under the Apache License, Version 2.0 (the "License"); | ||||
| # you may not use this file except in compliance with the License. | ||||
| # You may obtain a copy of the License at | ||||
| #  | ||||
| #     http://www.apache.org/licenses/LICENSE-2.0 | ||||
| #  | ||||
| # Unless required by applicable law or agreed to in writing, software | ||||
| # distributed under the License is distributed on an "AS IS" BASIS, | ||||
| # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. | ||||
| # See the License for the specific language governing permissions and | ||||
| # limitations under the License. | ||||
|  | ||||
| module MoreCoolContainers | ||||
|  | ||||
| function main = |args| { | ||||
|    | ||||
|   println(">>> DynamicVariable") | ||||
|  | ||||
|   let dyn = DynamicVariable("Foo") | ||||
|   println(dyn: value()) | ||||
|    | ||||
|   let t1 = Thread({ | ||||
|   dyn: withValue(666, { | ||||
|       println(dyn: value()) | ||||
|     }) | ||||
|   }) | ||||
|    | ||||
|   let t2 = Thread({ | ||||
|     dyn: withValue(69, { | ||||
|       println(dyn: value()) | ||||
|     }) | ||||
|   }) | ||||
|  | ||||
|   t1: start() | ||||
|   t2: start() | ||||
|   t1: join() | ||||
|   t2: join() | ||||
|   println(dyn: value()) | ||||
|  | ||||
|   println(">>> Observable") | ||||
|  | ||||
|   let foo = Observable("Foo") | ||||
|   foo: onChange(|v| -> println("foo = " + v)) | ||||
|  | ||||
|   let mapped = foo: map(|v| -> v + "!") | ||||
|   mapped: onChange(|v| -> println("mapped = " + v)) | ||||
|    | ||||
|   foo: set("69") | ||||
| } | ||||
							
								
								
									
										48
									
								
								samples/Golo/workers.golo
									
									
									
									
									
										Executable file
									
								
							
							
						
						
									
										48
									
								
								samples/Golo/workers.golo
									
									
									
									
									
										Executable file
									
								
							| @@ -0,0 +1,48 @@ | ||||
| # Copyright 2012-2014 Institut National des Sciences Appliquées de Lyon (INSA-Lyon) | ||||
| #  | ||||
| # Licensed under the Apache License, Version 2.0 (the "License"); | ||||
| # you may not use this file except in compliance with the License. | ||||
| # You may obtain a copy of the License at | ||||
| #  | ||||
| #     http://www.apache.org/licenses/LICENSE-2.0 | ||||
| #  | ||||
| # Unless required by applicable law or agreed to in writing, software | ||||
| # distributed under the License is distributed on an "AS IS" BASIS, | ||||
| # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. | ||||
| # See the License for the specific language governing permissions and | ||||
| # limitations under the License. | ||||
|  | ||||
| module Workers | ||||
|  | ||||
| import java.lang.Thread | ||||
| import java.util.concurrent | ||||
| import gololang.concurrent.workers.WorkerEnvironment | ||||
|  | ||||
| local function pusher = |queue, message| -> queue: offer(message) | ||||
|  | ||||
| local function generator = |port, message| { | ||||
|   foreach i in range(0, 100) { | ||||
|     port: send(message) | ||||
|   } | ||||
| } | ||||
|  | ||||
| function main = |args| { | ||||
|  | ||||
|   let env = WorkerEnvironment.builder(): withFixedThreadPool() | ||||
|   let queue = ConcurrentLinkedQueue() | ||||
|  | ||||
|   let pusherPort = env: spawn(^pusher: bindTo(queue)) | ||||
|   let generatorPort = env: spawn(^generator: bindTo(pusherPort)) | ||||
|  | ||||
|   let finishPort = env: spawn(|any| -> env: shutdown()) | ||||
|  | ||||
|   foreach i in range(0, 10) { | ||||
|     generatorPort: send("[" + i + "]") | ||||
|   } | ||||
|   Thread.sleep(2000_L) | ||||
|   finishPort: send("Die!") | ||||
|  | ||||
|   env: awaitTermination(2000) | ||||
|   println(queue: reduce("", |acc, next| -> acc + " " + next)) | ||||
| } | ||||
|  | ||||
							
								
								
									
										55
									
								
								samples/Hack/Assert.hh
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										55
									
								
								samples/Hack/Assert.hh
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,55 @@ | ||||
| <?hh // strict | ||||
| /** | ||||
|  * Copyright (c) 2014, Facebook, Inc. | ||||
|  * All rights reserved. | ||||
|  * | ||||
|  * This source code is licensed under the BSD-style license found in the | ||||
|  * LICENSE file in the root directory of this source tree. An additional grant | ||||
|  * of patent rights can be found in the PATENTS file in the same directory. | ||||
|  * | ||||
|  */ | ||||
|  | ||||
| final class AssertException extends Exception {} | ||||
|  | ||||
| final class Assert { | ||||
|   public static function isNum(mixed $x): num { | ||||
|     if (is_float($x)) { | ||||
|       return $x; | ||||
|     } else if (is_int($x)) { | ||||
|       return $x; | ||||
|     } | ||||
|     throw new AssertException('Expected an int or float value'); | ||||
|   } | ||||
|  | ||||
|   public static function isInt(mixed $x): int { | ||||
|     if (is_int($x)) { | ||||
|       return $x; | ||||
|     } | ||||
|     throw new AssertException('Expected an int'); | ||||
|   } | ||||
|  | ||||
|   public static function isFloat(mixed $x): float { | ||||
|     if (is_float($x)) { | ||||
|       return $x; | ||||
|     } | ||||
|     throw new AssertException('Expected a float'); | ||||
|   } | ||||
|  | ||||
|   public static function isString(mixed $x): string { | ||||
|     if (is_string($x)) { | ||||
|       return $x; | ||||
|     } | ||||
|     throw new AssertException('Expected a string'); | ||||
|   } | ||||
|  | ||||
|   // For arrays you need to check every element | ||||
|   public static function isArrayOf<T>( | ||||
|     (function(mixed): T) $fn, | ||||
|     mixed $x, | ||||
|   ): array<T> { | ||||
|     if (is_array($x)) { | ||||
|       return array_map($fn, $x); | ||||
|     } | ||||
|     throw new AssertException('Expected an array'); | ||||
|   } | ||||
| } | ||||
							
								
								
									
										52
									
								
								samples/Hack/AssertRecipe.hh
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										52
									
								
								samples/Hack/AssertRecipe.hh
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,52 @@ | ||||
| <?hh // strict | ||||
| /** | ||||
|  * Copyright (c) 2014, Facebook, Inc. | ||||
|  * All rights reserved. | ||||
|  * | ||||
|  * This source code is licensed under the BSD-style license found in the | ||||
|  * LICENSE file in the root directory of this source tree. An additional grant | ||||
|  * of patent rights can be found in the PATENTS file in the same directory. | ||||
|  * | ||||
|  */ | ||||
|  | ||||
| require_once $_SERVER['DOCUMENT_ROOT'].'/core/controller/recipe/init.php'; | ||||
| require_once "demo.php"; | ||||
|  | ||||
| class AssertRecipe extends Recipe implements RecipeWithDemo { | ||||
|  | ||||
|   protected function getName(): string { | ||||
|     return 'Assert'; | ||||
|   } | ||||
|  | ||||
|   <<Override>> | ||||
|   protected function getDescription(): ?string { | ||||
|     return 'When you have values with unknown types, it is useful to make '. | ||||
|       'some runtime assertions and have the type checker understand. This '. | ||||
|       'recipe demonstrates one approach.'; | ||||
|   } | ||||
|  | ||||
|   protected function getFilenames(): Vector<string> { | ||||
|     return Vector { | ||||
|       'Assert.php', | ||||
|     }; | ||||
|   } | ||||
|  | ||||
|   protected function getDocs(): Vector<(string, string)> { | ||||
|     return Vector{ | ||||
|       tuple ('Mixed Types', 'hack.annotations.mixedtypes'), | ||||
|       tuple ('Type Inference', 'hack.otherrulesandfeatures.typeinference'), | ||||
|     }; | ||||
|   } | ||||
|  | ||||
|   public function getDemoFilename(): string { | ||||
|     return 'demo.php'; | ||||
|   } | ||||
|  | ||||
|   public function getDemoResult(): string { | ||||
|     return assert_main(); | ||||
|   } | ||||
|  | ||||
|   public function getDemoXHP(): ?:xhp { | ||||
|     return null; | ||||
|   } | ||||
| } | ||||
							
								
								
									
										39
									
								
								samples/Hack/Controller.hh
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										39
									
								
								samples/Hack/Controller.hh
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,39 @@ | ||||
| <?hh // strict | ||||
| /** | ||||
|  * Copyright (c) 2014, Facebook, Inc. | ||||
|  * All rights reserved. | ||||
|  * | ||||
|  * This source code is licensed under the BSD-style license found in the | ||||
|  * LICENSE file in the root directory of this source tree. An additional grant | ||||
|  * of patent rights can be found in the PATENTS file in the same directory. | ||||
|  * | ||||
|  */ | ||||
|  | ||||
| require_once $_SERVER['DOCUMENT_ROOT'].'/core/startup/init.php'; | ||||
|  | ||||
| abstract class Controller { | ||||
|   protected function __construct() { | ||||
|     startup(); | ||||
|   } | ||||
|  | ||||
|   abstract protected function getCSS(): Set<string>; | ||||
|   abstract protected function getJS(): Set<string>; | ||||
|   abstract protected function getTitle(): string; | ||||
|   abstract protected function render(): :xhp; | ||||
|  | ||||
|   final protected function getHead(): :xhp { | ||||
|     $css = $this->getCSS()->toVector()->map( | ||||
|       ($css) ==> <link rel="stylesheet" type="text/css" href={$css} /> | ||||
|     ); | ||||
|     $js = $this->getJS()->toVector()->map( | ||||
|       ($js) ==> <script src={$js} /> | ||||
|     ); | ||||
|     return | ||||
|       <head> | ||||
|       <meta http-equiv="content-type" content="text/html; charset=UTF-8"/> | ||||
|         <title>{$this->getTitle()}</title> | ||||
|         {$css->toArray()} | ||||
|         {$js->toArray()} | ||||
|       </head>; | ||||
|   } | ||||
| } | ||||
							
								
								
									
										52
									
								
								samples/Hack/DBResultRecipe.hh
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										52
									
								
								samples/Hack/DBResultRecipe.hh
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,52 @@ | ||||
| <?hh // strict | ||||
| /** | ||||
|  * Copyright (c) 2014, Facebook, Inc. | ||||
|  * All rights reserved. | ||||
|  * | ||||
|  * This source code is licensed under the BSD-style license found in the | ||||
|  * LICENSE file in the root directory of this source tree. An additional grant | ||||
|  * of patent rights can be found in the PATENTS file in the same directory. | ||||
|  * | ||||
|  */ | ||||
|  | ||||
| require_once $_SERVER['DOCUMENT_ROOT'].'/core/controller/recipe/init.php'; | ||||
| require_once "demo.php"; | ||||
|  | ||||
| class DBResultRecipe extends Recipe implements RecipeWithDemo { | ||||
|  | ||||
|   protected function getName(): string { | ||||
|     return 'DB Result'; | ||||
|   } | ||||
|  | ||||
|   <<Override>> | ||||
|   protected function getDescription(): ?string { | ||||
|     return 'Fetching data from a DB introduces a few typing challenges. '. | ||||
|       'First, the data comes back untyped. Second, a row in a DB generally '. | ||||
|       'contains columns of different types.'; | ||||
|   } | ||||
|  | ||||
|   protected function getFilenames(): Vector<string> { | ||||
|     return Vector { | ||||
|       'FakeDB.php', | ||||
|     }; | ||||
|   } | ||||
|  | ||||
|   protected function getDocs(): Vector<(string, string)> { | ||||
|     return Vector{ | ||||
|       tuple ('Hack Shapes', 'hack.shapes'), | ||||
|       tuple ('Mixed Types', 'hack.annotations.mixedtypes'), | ||||
|     }; | ||||
|   } | ||||
|  | ||||
|   public function getDemoFilename(): string { | ||||
|     return 'demo.php'; | ||||
|   } | ||||
|  | ||||
|   public function getDemoResult(): string { | ||||
|     return db_result_main(); | ||||
|   } | ||||
|  | ||||
|   public function getDemoXHP(): ?:xhp { | ||||
|     return null; | ||||
|   } | ||||
| } | ||||
							
								
								
									
										22
									
								
								samples/Hack/Documentation.hh
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										22
									
								
								samples/Hack/Documentation.hh
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,22 @@ | ||||
| <?hh // strict | ||||
| /** | ||||
|  * Copyright (c) 2014, Facebook, Inc. | ||||
|  * All rights reserved. | ||||
|  * | ||||
|  * This source code is licensed under the BSD-style license found in the | ||||
|  * LICENSE file in the root directory of this source tree. An additional grant | ||||
|  * of patent rights can be found in the PATENTS file in the same directory. | ||||
|  * | ||||
|  */ | ||||
|  | ||||
| require_once $_SERVER['DOCUMENT_ROOT'].'/vendor/hhvm/xhp/src/init.php'; | ||||
|  | ||||
| final class :documentation extends :x:element { | ||||
|   attribute string name; | ||||
|  | ||||
|   protected function render(): :xhp { | ||||
|     $name = implode('.', explode(' ', $this->getAttribute('name'))).".php"; | ||||
|     $href = "http://hhvm.com/manual/en/$name"; | ||||
|     return <a class="docs button" href={$href} target="_blank">docs →</a>; | ||||
|   } | ||||
| } | ||||
							
								
								
									
										65
									
								
								samples/Hack/FakeDB.hh
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										65
									
								
								samples/Hack/FakeDB.hh
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,65 @@ | ||||
| <?hh // strict | ||||
|  | ||||
| type DBResultExtra = shape('age' => int); | ||||
| type DBResult = shape( | ||||
|   'id' => int, | ||||
|   'name' => string, | ||||
|   'extra' => DBResultExtra, | ||||
| ); | ||||
|  | ||||
| final class FakeDB { | ||||
|   public function getRawRows(): array<array<string, mixed>> { | ||||
|     $good_extra = json_encode(array('age' => 40)); | ||||
|     $bad_extra = 'corrupt data'; | ||||
|     // Real code would query a DB, but for now let's hardcode it | ||||
|     return array( | ||||
|       array( | ||||
|         'id' => 123, | ||||
|         'name' => 'Alice', | ||||
|         'extra' => $good_extra, | ||||
|       ), | ||||
|       array( | ||||
|         'id' => 456, | ||||
|         'name' => 'Bob', | ||||
|         'extra' => $bad_extra, | ||||
|       ), | ||||
|     ); | ||||
|   } | ||||
|  | ||||
|   /** | ||||
|    * When processing untyped data you need to check each piece of data and | ||||
|    * figure out whether to give up or recover when the data is bad | ||||
|    */ | ||||
|   public function processRow(array<string, mixed> $row): ?DBResult { | ||||
|     $row = Map::fromArray($row); | ||||
|     $id = $row->contains('id') ? $row['id'] : null; | ||||
|     $name = $row->contains('name') ? $row['name'] : null; | ||||
|     $extra = $row->contains('extra') ? json_decode($row['extra'], true) : null; | ||||
|  | ||||
|     // Ignore rows with invalid IDs or names | ||||
|     if (!is_int($id) || !is_string($name)) { | ||||
|       return null; | ||||
|     } | ||||
|  | ||||
|     // Try to recover from a bad extra column | ||||
|     if (!is_array($extra)) { | ||||
|       $extra = shape('age' => 0); | ||||
|     } else { | ||||
|       $extra = Map::fromArray($extra); | ||||
|       $extra = shape('age' => $extra->contains('age') ? $extra['age'] : 0); | ||||
|     } | ||||
|  | ||||
|     return shape('id' => $id, 'name' => $name, 'extra' => $extra); | ||||
|   } | ||||
|  | ||||
|   public function getDBResults(): Vector<DBResult> { | ||||
|     $ret = Vector {}; | ||||
|     foreach ($this->getRawRows() as $raw_row) { | ||||
|       $row = $this->processRow($raw_row); | ||||
|       if ($row !== null) { | ||||
|         $ret->add($row); | ||||
|       } | ||||
|     } | ||||
|     return $ret; | ||||
|   } | ||||
| } | ||||
							
								
								
									
										72
									
								
								samples/Hack/GetAndPostRecipe.hh
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										72
									
								
								samples/Hack/GetAndPostRecipe.hh
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,72 @@ | ||||
| <?hh // strict | ||||
| /** | ||||
|  * Copyright (c) 2014, Facebook, Inc. | ||||
|  * All rights reserved. | ||||
|  * | ||||
|  * This source code is licensed under the BSD-style license found in the | ||||
|  * LICENSE file in the root directory of this source tree. An additional grant | ||||
|  * of patent rights can be found in the PATENTS file in the same directory. | ||||
|  * | ||||
|  */ | ||||
|  | ||||
| require_once $_SERVER['DOCUMENT_ROOT'].'/core/controller/recipe/init.php'; | ||||
| require_once "demo.php"; | ||||
|  | ||||
| class GetAndPostRecipe extends Recipe implements RecipeWithDemo { | ||||
|  | ||||
|   protected function getName(): string { | ||||
|     return '$_GET and $_POST'; | ||||
|   } | ||||
|  | ||||
|   <<Override>> | ||||
|   protected function getDescription(): ?string { | ||||
|     return 'A small example of how to interact with superglobals and the '. | ||||
|       'untyped data they can contain.'; | ||||
|   } | ||||
|  | ||||
|   protected function getFilenames(): Vector<string> { | ||||
|     return Vector { | ||||
|       'NonStrictFile.php', | ||||
|       'StrictFile.php', | ||||
|     }; | ||||
|   } | ||||
|  | ||||
|   protected function getDocs(): Vector<(string, string)> { | ||||
|     return Vector { | ||||
|       tuple('invariant()', 'hack.otherrulesandfeatures.invariant'), | ||||
|     }; | ||||
|   } | ||||
|  | ||||
|   public function getDemoFilename(): string { | ||||
|     return 'demo.php'; | ||||
|   } | ||||
|  | ||||
|   public function getDemoResult(): string { | ||||
|     return get_and_post_main(); | ||||
|   } | ||||
|  | ||||
|   public function getDemoXHP(): :xhp { | ||||
|     $url = '/recipes/get-and-post/'; | ||||
|     return | ||||
|       <x:frag> | ||||
|         <div> | ||||
|           <a href={"$url?myIntParam=8675309#demo"} class="button">GET myIntParam=8675309</a> | ||||
|         </div> | ||||
|         <div> | ||||
|         <a href={"$url?myIntParam=boom#demo"} class="button">GET myIntParam=boom</a> | ||||
|         </div> | ||||
|         <div> | ||||
|         <form action={"$url#demo"} method="post"> | ||||
|           <input type="hidden" name="myIntParam" value="5551234"/> | ||||
|           <input type="submit" class="button" value="POST myIntParam=5551234"/> | ||||
|         </form> | ||||
|         </div> | ||||
|         <div> | ||||
|         <form action={"$url#demo"} method="post"> | ||||
|           <input type="hidden" name="myIntParam" value="boom"/> | ||||
|           <input type="submit" class="button" value="POST myIntParam=boom"/> | ||||
|         </form> | ||||
|         </div> | ||||
|       </x:frag>; | ||||
|   } | ||||
| } | ||||
							
								
								
									
										30
									
								
								samples/Hack/GetController.hh
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										30
									
								
								samples/Hack/GetController.hh
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,30 @@ | ||||
| <?hh // strict | ||||
| /** | ||||
|  * Copyright (c) 2014, Facebook, Inc. | ||||
|  * All rights reserved. | ||||
|  * | ||||
|  * This source code is licensed under the BSD-style license found in the | ||||
|  * LICENSE file in the root directory of this source tree. An additional grant | ||||
|  * of patent rights can be found in the PATENTS file in the same directory. | ||||
|  * | ||||
|  */ | ||||
|  | ||||
| abstract class GetController extends Controller { | ||||
|   final protected function __construct(private Request $request) { | ||||
|     parent::__construct(); | ||||
|   } | ||||
|  | ||||
|   final protected function getRequest(): Request { | ||||
|     return $this->request; | ||||
|   } | ||||
|  | ||||
|   final public function go(array<mixed, mixed> $get): void { | ||||
|     $request = new Request(Map::fromArray($get)); | ||||
|     $controller = new static($request); | ||||
|     echo "<!DOCTYPE html>"; | ||||
|     $head = $controller->getHead(); | ||||
|     $body = $controller->render(); | ||||
|     echo (string)$head; | ||||
|     echo (string)$body; | ||||
|   } | ||||
| } | ||||
							
								
								
									
										38
									
								
								samples/Hack/HomeController.hh
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										38
									
								
								samples/Hack/HomeController.hh
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,38 @@ | ||||
| <?hh // strict | ||||
| /** | ||||
|  * Copyright (c) 2014, Facebook, Inc. | ||||
|  * All rights reserved. | ||||
|  * | ||||
|  * This source code is licensed under the BSD-style license found in the | ||||
|  * LICENSE file in the root directory of this source tree. An additional grant | ||||
|  * of patent rights can be found in the PATENTS file in the same directory. | ||||
|  * | ||||
|  */ | ||||
|  | ||||
| require_once $_SERVER['DOCUMENT_ROOT'].'/core/controller/init.php'; | ||||
| require_once $_SERVER['DOCUMENT_ROOT'].'/core/controller/standard-page/init.php'; | ||||
| require_once $_SERVER['DOCUMENT_ROOT'].'/vendor/hhvm/xhp/src/init.php'; | ||||
|  | ||||
| class HomeController extends GetController { | ||||
|   use StandardPage; | ||||
|  | ||||
|   protected function getTitle(): string { | ||||
|     return 'Hack Cookbook'; | ||||
|   } | ||||
|  | ||||
|   protected function renderMainColumn(): :xhp { | ||||
|     return <div> | ||||
|       <h1>Cookbook</h1> | ||||
|       <p> | ||||
|         The Hack Cookbook helps you write Hack code by giving you examples of | ||||
|         Hack code. It is written in Hack and is open source. If you | ||||
|         <a href="http://github.com/facebook/hack-example-site"> | ||||
|           head over to GitHub, | ||||
|         </a> | ||||
|         you can read the code, check out the repository, and run it | ||||
|         yourself. The recipes in this cookbook are small examples that | ||||
|         illustrate how to use Hack to solve common and interesting problems. | ||||
|       </p> | ||||
|     </div>; | ||||
|   } | ||||
| } | ||||
							
								
								
									
										13
									
								
								samples/Hack/MySecureRequest.hh
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										13
									
								
								samples/Hack/MySecureRequest.hh
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,13 @@ | ||||
| <?hh // strict | ||||
|  | ||||
| require_once $_SERVER['DOCUMENT_ROOT'].'/core/funs/init.php'; | ||||
|  | ||||
| final class MySecureRequest { | ||||
|   public function __construct(private Map<string, mixed> $GETParams) {} | ||||
|   public function stringParam(string $name): UNESCAPED_STRING { | ||||
|     invariant($this->GETParams->contains($name), 'Unknown GET param: '.$name); | ||||
|     $raw_string = $this->GETParams[$name]; | ||||
|     invariant(is_string($raw_string), $name.' is not a string'); | ||||
|     return unescaped_string($raw_string); | ||||
|   } | ||||
| } | ||||
							
								
								
									
										104
									
								
								samples/Hack/Nav.hh
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										104
									
								
								samples/Hack/Nav.hh
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,104 @@ | ||||
| <?hh // strict | ||||
| /** | ||||
|  * Copyright (c) 2014, Facebook, Inc. | ||||
|  * All rights reserved. | ||||
|  * | ||||
|  * This source code is licensed under the BSD-style license found in the | ||||
|  * LICENSE file in the root directory of this source tree. An additional grant | ||||
|  * of patent rights can be found in the PATENTS file in the same directory. | ||||
|  * | ||||
|  */ | ||||
|  | ||||
| require_once $_SERVER['DOCUMENT_ROOT'].'/vendor/hhvm/xhp/src/init.php'; | ||||
|  | ||||
| type NavItem = shape( | ||||
|   'name' => string, | ||||
|   'location' => string, | ||||
| ); | ||||
|  | ||||
| type NavSection = shape( | ||||
|   'name' => string, | ||||
|   'location' => ?string, | ||||
|   'items' => Vector<NavItem>, | ||||
| ); | ||||
|  | ||||
| final class :hack:nav extends :x:element { | ||||
|   private function getNavSections(): Vector<NavSection> { | ||||
|     return Vector{ | ||||
|       shape( | ||||
|         'name' => 'Home', | ||||
|         'location' => '/', | ||||
|         'items' => Vector {}, | ||||
|       ), | ||||
|       shape( | ||||
|         'name' => 'GitHub', | ||||
|         'location' => 'http://github.com/facebook/hack-example-site', | ||||
|         'items' => Vector {}, | ||||
|       ), | ||||
|       shape( | ||||
|         'name' => 'Recipes', | ||||
|         'location' => null, | ||||
|         'items' => Vector { | ||||
|           shape( | ||||
|             'name' => '$_GET and $_POST', | ||||
|             'location' => '/recipes/get-and-post/', | ||||
|           ), | ||||
|           shape( | ||||
|             'name' => 'Assert', | ||||
|             'location' => '/recipes/assert/', | ||||
|           ), | ||||
|           shape( | ||||
|             'name' => 'DB Result', | ||||
|             'location' => '/recipes/db-result/', | ||||
|           ), | ||||
|           shape( | ||||
|             'name' => 'Unescaped String', | ||||
|             'location' => '/recipes/unescaped-string/', | ||||
|           ), | ||||
|           shape( | ||||
|             'name' => 'User ID', | ||||
|             'location' => '/recipes/user-id/', | ||||
|           ), | ||||
|         }, | ||||
|       ), | ||||
|     }; | ||||
|   } | ||||
|  | ||||
|   private function renderNavItems(Vector<NavItem> $items): :xhp { | ||||
|     $render_item = $item ==> | ||||
|       <li> | ||||
|         <a class="navItem" href={$item['location']}> | ||||
|           {$item['name']} | ||||
|         </a> | ||||
|       </li>; | ||||
|     return | ||||
|       <x:frag> | ||||
|         {$items->map($render_item)->toArray()} | ||||
|       </x:frag>; | ||||
|   } | ||||
|  | ||||
|   private function renderNavSection(NavSection $section): :xhp { | ||||
|     $section_item = <h3 class="navItem">{$section['name']}</h3>; | ||||
|     if ($section['location'] !== null) { | ||||
|       $section_item = <a href={$section['location']}>{$section_item}</a>; | ||||
|     } | ||||
|     return | ||||
|       <li class="navSectionItem"> | ||||
|         {$section_item} | ||||
|         <ul class="navItems"> | ||||
|           {$this->renderNavItems($section['items'])} | ||||
|         </ul> | ||||
|       </li>; | ||||
|   } | ||||
|  | ||||
|   public function render(): :xhp { | ||||
|     $sections = $this->getNavSections() | ||||
|       ->map($section ==> $this->renderNavSection($section)); | ||||
|     return | ||||
|       <div class="nav"> | ||||
|         <ul class="navSections"> | ||||
|           {$sections->toArray()} | ||||
|         </ul> | ||||
|       </div>; | ||||
|   } | ||||
| } | ||||
							
								
								
									
										27
									
								
								samples/Hack/NonStrictFile.hh
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										27
									
								
								samples/Hack/NonStrictFile.hh
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,27 @@ | ||||
| <?hh | ||||
| /** | ||||
|  * Copyright (c) 2014, Facebook, Inc. | ||||
|  * All rights reserved. | ||||
|  * | ||||
|  * This source code is licensed under the BSD-style license found in the | ||||
|  * LICENSE file in the root directory of this source tree. An additional grant | ||||
|  * of patent rights can be found in the PATENTS file in the same directory. | ||||
|  * | ||||
|  */ | ||||
|  | ||||
| function getGETParams(): Map<string, mixed> { | ||||
|   // $_GET is not defined in code so Hack doesn't know about it and you can't | ||||
|   // use it in strict mode. You can interact with it outside of strict mode, | ||||
|   // though. | ||||
|   return Map::fromArray($_GET); | ||||
| } | ||||
|  | ||||
| function getPOSTParams(): Map<string, mixed> { | ||||
|   // Same deal with $_POST and other magically defined globals | ||||
|   return Map::fromArray($_POST); | ||||
| } | ||||
|  | ||||
| // Same deal with $_SERVER | ||||
| function isGET(): bool { | ||||
|   return $_SERVER['REQUEST_METHOD'] === 'GET'; | ||||
| } | ||||
							
								
								
									
										93
									
								
								samples/Hack/Recipe.hh
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										93
									
								
								samples/Hack/Recipe.hh
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,93 @@ | ||||
| <?hh // strict | ||||
| /** | ||||
|  * Copyright (c) 2014, Facebook, Inc. | ||||
|  * All rights reserved. | ||||
|  * | ||||
|  * This source code is licensed under the BSD-style license found in the | ||||
|  * LICENSE file in the root directory of this source tree. An additional grant | ||||
|  * of patent rights can be found in the PATENTS file in the same directory. | ||||
|  * | ||||
|  */ | ||||
|  | ||||
| require_once $_SERVER['DOCUMENT_ROOT'].'/core/controller/init.php'; | ||||
| require_once $_SERVER['DOCUMENT_ROOT'].'/core/controller/standard-page/init.php'; | ||||
| require_once $_SERVER['DOCUMENT_ROOT'].'/core/myxhp/init.php'; | ||||
|  | ||||
| abstract class Recipe extends GetController { | ||||
|   use StandardPage; | ||||
|  | ||||
|   abstract protected function getName(): string; | ||||
|   abstract protected function getFilenames(): Vector<string>; | ||||
|   abstract protected function getDocs(): Vector<(string, string)>; | ||||
|  | ||||
|   protected function getDescription(): ?string { | ||||
|     return null; | ||||
|   } | ||||
|  | ||||
|   final protected function getTitle(): string { | ||||
|     return $this->getName().' - Hack Cookbook'; | ||||
|   } | ||||
|  | ||||
|   final protected function renderMainColumn(): :xhp { | ||||
|     $main_column = | ||||
|       <x:frag> | ||||
|         <h1>{$this->getName()}</h1> | ||||
|       </x:frag>; | ||||
|     $description = $this->getDescription(); | ||||
|     if ($description !== null) { | ||||
|       $main_column->appendChild(<p>{$description}</p>); | ||||
|     } | ||||
|     foreach ($this->getFilenames() as $filename) { | ||||
|       $file = | ||||
|         <div class="file"> | ||||
|           <div class="filename">{$filename}</div> | ||||
|           <phpfile filename={$filename}/> | ||||
|         </div>; | ||||
|       $main_column->appendChild($file); | ||||
|     } | ||||
|     $recipe = $this; | ||||
|     if ($recipe instanceof RecipeWithDemo) { | ||||
|       try { | ||||
|         $result = $recipe->getDemoResult(); | ||||
|       } catch (Exception $e) { | ||||
|         $result = sprintf( | ||||
|           "Demo threw an %s:\n%s", | ||||
|           get_class($e), | ||||
|           $e->getMessage(), | ||||
|         ); | ||||
|       } | ||||
|       $result = explode("\n", trim($result)); | ||||
|       $result = array_map($x ==> <x:frag>{$x}<br/></x:frag>, $result); | ||||
|       $demo = | ||||
|         <x:frag> | ||||
|           <div class="demo" id="demo"> | ||||
|             <h3>Demo</h3> | ||||
|             {$recipe->getDemoXHP()} | ||||
|             <div class="filename">{$recipe->getDemoFilename()}</div> | ||||
|             <phpfile filename={$recipe->getDemoFilename()}/> | ||||
|             <div class="filename">Output</div> | ||||
|             <div class="demoResult"> | ||||
|               {$result} | ||||
|             </div> | ||||
|           </div> | ||||
|         </x:frag>; | ||||
|       $main_column->appendChild($demo); | ||||
|     } | ||||
|     if (!$this->getDocs()->isEmpty()) { | ||||
|       $render_doc_link = function($doc) { | ||||
|         list($name, $link) = $doc; | ||||
|         $link = "http://hhvm.com/manual/en/$link.php"; | ||||
|         return <li><a href={$link}>{$name}</a></li>; | ||||
|       }; | ||||
|       $main_column->appendChild( | ||||
|         <div class="docs"> | ||||
|           <h3>Relevant Official Documentation</h3> | ||||
|           <ul> | ||||
|             {$this->getDocs()->map($render_doc_link)->toArray()} | ||||
|           </ul> | ||||
|         </div> | ||||
|       ); | ||||
|     } | ||||
|     return $main_column; | ||||
|   } | ||||
| } | ||||
							
								
								
									
										16
									
								
								samples/Hack/RecipeWithDemo.hh
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										16
									
								
								samples/Hack/RecipeWithDemo.hh
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,16 @@ | ||||
| <?hh // strict | ||||
| /** | ||||
|  * Copyright (c) 2014, Facebook, Inc. | ||||
|  * All rights reserved. | ||||
|  * | ||||
|  * This source code is licensed under the BSD-style license found in the | ||||
|  * LICENSE file in the root directory of this source tree. An additional grant | ||||
|  * of patent rights can be found in the PATENTS file in the same directory. | ||||
|  * | ||||
|  */ | ||||
|  | ||||
| interface RecipeWithDemo { | ||||
|   public function getDemoFilename(): string; | ||||
|   public function getDemoResult(): string; | ||||
|   public function getDemoXHP(): ?:xhp; | ||||
| } | ||||
							
								
								
									
										15
									
								
								samples/Hack/Request.hh
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										15
									
								
								samples/Hack/Request.hh
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,15 @@ | ||||
| <?hh // strict | ||||
| /** | ||||
|  * Copyright (c) 2014, Facebook, Inc. | ||||
|  * All rights reserved. | ||||
|  * | ||||
|  * This source code is licensed under the BSD-style license found in the | ||||
|  * LICENSE file in the root directory of this source tree. An additional grant | ||||
|  * of patent rights can be found in the PATENTS file in the same directory. | ||||
|  * | ||||
|  */ | ||||
|  | ||||
| final class Request { | ||||
|   public function __construct(private Map<string, mixed> $params) {} | ||||
| } | ||||
|  | ||||
							
								
								
									
										81
									
								
								samples/Hack/StandardPage.hh
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										81
									
								
								samples/Hack/StandardPage.hh
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,81 @@ | ||||
| <?hh // strict | ||||
| /** | ||||
|  * Copyright (c) 2014, Facebook, Inc. | ||||
|  * All rights reserved. | ||||
|  * | ||||
|  * This source code is licensed under the BSD-style license found in the | ||||
|  * LICENSE file in the root directory of this source tree. An additional grant | ||||
|  * of patent rights can be found in the PATENTS file in the same directory. | ||||
|  * | ||||
|  */ | ||||
|  | ||||
| trait StandardPage { | ||||
|   require extends Controller; | ||||
|  | ||||
|   abstract protected function renderMainColumn(): :xhp; | ||||
|  | ||||
|   protected function getExtraCSS(): Set<string> { | ||||
|     return Set {}; | ||||
|   } | ||||
|  | ||||
|   protected function getExtraJS(): Set<string> { | ||||
|     return Set {}; | ||||
|   } | ||||
|  | ||||
|   final protected function getCSS(): Set<string> { | ||||
|     return (Set { | ||||
|       '/css/base.css', | ||||
|     })->addAll($this->getExtraCSS()); | ||||
|   } | ||||
|  | ||||
|   final protected function getJS(): Set<string> { | ||||
|     return (Set { | ||||
|     })->addAll($this->getExtraJS()); | ||||
|   } | ||||
|  | ||||
|   final private function renderHeader(): :xhp { | ||||
|     return | ||||
|       <div class="hackHeader"> | ||||
|         <div class="width"> | ||||
|           <a href="http://hacklang.org/"> | ||||
|             <div class="logo">Hack</div> | ||||
|           </a> | ||||
|           <div class="headerNav"> | ||||
|           <ul> | ||||
|             <li> | ||||
|               <a href="http://hacklang.org/install/">Install</a> | ||||
|             </li> | ||||
|             <li> | ||||
|               <a href="http://hacklang.org/tutorial/">Tutorial</a> | ||||
|             </li> | ||||
|             <li> | ||||
|               <a href="/">Cookbook</a> | ||||
|             </li> | ||||
|             <li> | ||||
|               <a href="http://hhvm.com/manual">Docs</a> | ||||
|             </li> | ||||
|             <li> | ||||
|               <a href="http://github.com/facebook/hhvm">GitHub</a> | ||||
|             </li> | ||||
|             <li> | ||||
|               <a href="http://hhvm.com/">HHVM</a> | ||||
|             </li> | ||||
|           </ul> | ||||
|           </div> | ||||
|         </div> | ||||
|       </div>; | ||||
|   } | ||||
|  | ||||
|   final protected function render(): :xhp { | ||||
|     return | ||||
|       <div> | ||||
|         {$this->renderHeader()} | ||||
|         <div class="width"> | ||||
|           <div class="mainContainer"> | ||||
|             <div class="mainColumn">{$this->renderMainColumn()}</div> | ||||
|             <hack:nav/> | ||||
|           </div> | ||||
|         </div> | ||||
|     </div>; | ||||
|   } | ||||
| } | ||||
							
								
								
									
										46
									
								
								samples/Hack/StrictFile.hh
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										46
									
								
								samples/Hack/StrictFile.hh
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,46 @@ | ||||
| <?hh // strict | ||||
| /** | ||||
|  * Copyright (c) 2014, Facebook, Inc. | ||||
|  * All rights reserved. | ||||
|  * | ||||
|  * This source code is licensed under the BSD-style license found in the | ||||
|  * LICENSE file in the root directory of this source tree. An additional grant | ||||
|  * of patent rights can be found in the PATENTS file in the same directory. | ||||
|  * | ||||
|  */ | ||||
|  | ||||
| require_once $_SERVER['DOCUMENT_ROOT'].'/core/funs/init.php'; | ||||
|  | ||||
| abstract class MyRequest { | ||||
|   abstract public function getParams(): Map<string, mixed>; | ||||
|  | ||||
|   // Throws when things go wrong | ||||
|   public function intParamX(string $name): int { | ||||
|     $params = $this->getParams(); | ||||
|     invariant($params->contains($name), sprintf('Unknown param: %s', $name)); | ||||
|     $param = $params[$name]; | ||||
|     invariant(is_numeric($param), sprintf('Param %s is not an int', $name)); | ||||
|     return (int)$param; | ||||
|   } | ||||
|  | ||||
|   // A lenient version | ||||
|   public function intParam(string $name): ?int { | ||||
|     $params = $this->getParams(); | ||||
|     if (!$params->contains($name)) { return null; } | ||||
|     $param = $params[$name]; | ||||
|     if (!is_numeric($param)) { return null; } | ||||
|     return (int)$param; | ||||
|   } | ||||
| } | ||||
|  | ||||
| final class MyGETRequest extends MyRequest { | ||||
|   public function getParams(): Map<string, mixed> { | ||||
|     return getGETParams(); | ||||
|   } | ||||
| } | ||||
|  | ||||
| final class MyPOSTRequest extends MyRequest { | ||||
|   public function getParams(): Map<string, mixed> { | ||||
|     return getPOSTParams(); | ||||
|   } | ||||
| } | ||||
							
								
								
									
										16
									
								
								samples/Hack/UnescapedString.hh
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										16
									
								
								samples/Hack/UnescapedString.hh
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,16 @@ | ||||
| <?hh // strict | ||||
|  | ||||
| // Outside of this file, no one knows that UNESCAPED_STRING is a string | ||||
| newtype UNESCAPED_STRING = string; | ||||
|  | ||||
| // This is how we initially taint a string. | ||||
| function unescaped_string(string $s): UNESCAPED_STRING { | ||||
|   return $s; | ||||
| } | ||||
|  | ||||
| // This is the only thing you can do with an UNESCAPED_STRING (other than pass | ||||
| // it around) | ||||
| function escape_unescaped_string(UNESCAPED_STRING $s): string { | ||||
|   // Your use case will decide how you want to escape your strings | ||||
|   return sprintf('Escaped ---> "%s" <--- Escaped', $s); | ||||
| } | ||||
							
								
								
									
										59
									
								
								samples/Hack/UnescapedStringRecipe.hh
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										59
									
								
								samples/Hack/UnescapedStringRecipe.hh
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,59 @@ | ||||
| <?hh // strict | ||||
| /** | ||||
|  * Copyright (c) 2014, Facebook, Inc. | ||||
|  * All rights reserved. | ||||
|  * | ||||
|  * This source code is licensed under the BSD-style license found in the | ||||
|  * LICENSE file in the root directory of this source tree. An additional grant | ||||
|  * of patent rights can be found in the PATENTS file in the same directory. | ||||
|  * | ||||
|  */ | ||||
|  | ||||
| require_once $_SERVER['DOCUMENT_ROOT'].'/core/controller/recipe/init.php'; | ||||
| require_once "demo.php"; | ||||
|  | ||||
| class UnescapedStringRecipe extends Recipe implements RecipeWithDemo { | ||||
|  | ||||
|   protected function getName(): string { | ||||
|     return 'Unescaped string'; | ||||
|   } | ||||
|  | ||||
|   <<Override>> | ||||
|   protected function getDescription(): ?string { | ||||
|     return 'Forgetting to properly escape the strings you get from your users '. | ||||
|       'can lead to serious security holes. Hack can help by forcing you to '. | ||||
|       'escape these strings before using them as strings.'; | ||||
|   } | ||||
|  | ||||
|   protected function getFilenames(): Vector<string> { | ||||
|     return Vector { | ||||
|       'UnescapedString.php', | ||||
|       'MySecureRequest.php', | ||||
|     }; | ||||
|   } | ||||
|  | ||||
|   protected function getDocs(): Vector<(string, string)> { | ||||
|     return Vector{ | ||||
|       tuple('Opaque Type Aliasing',  'hack.typealiasing.opaquetypealiasing'), | ||||
|     }; | ||||
|   } | ||||
|  | ||||
|   public function getDemoFilename(): string { | ||||
|     return 'demo.php'; | ||||
|   } | ||||
|  | ||||
|   public function getDemoResult(): string { | ||||
|     return unescaped_string_main(); | ||||
|   } | ||||
|  | ||||
|   public function getDemoXHP(): ?:xhp { | ||||
|     $url = '/recipes/unescaped-string/'; | ||||
|     return | ||||
|       <x:frag> | ||||
|         Try setting the myStrParam GET param to something nice and innocent with this button... | ||||
|         <div> | ||||
|           <a href={"$url?myStrParam='); DROP TABLE important_stuff; --#demo"} class="button">GET myStrParam=Hello world</a> | ||||
|         </div> | ||||
|       </x:frag>; | ||||
|   } | ||||
| } | ||||
							
								
								
									
										33
									
								
								samples/Hack/UserID.hh
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										33
									
								
								samples/Hack/UserID.hh
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,33 @@ | ||||
| <?hh // strict | ||||
| /** | ||||
|  * Copyright (c) 2014, Facebook, Inc. | ||||
|  * All rights reserved. | ||||
|  * | ||||
|  * This source code is licensed under the BSD-style license found in the | ||||
|  * LICENSE file in the root directory of this source tree. An additional grant | ||||
|  * of patent rights can be found in the PATENTS file in the same directory. | ||||
|  * | ||||
|  */ | ||||
| require_once $_SERVER['DOCUMENT_ROOT'].'/core/funs/init.php'; | ||||
|  | ||||
| // Outside of this file, no one knows that these types are ints. They do know | ||||
| // that USER_ID is an ID and COW_ID is an ID | ||||
| newtype ID = int; | ||||
| newtype USER_ID as ID = ID; | ||||
| newtype COW_ID as ID = ID; | ||||
|  | ||||
| function assert_user_id(int $x): USER_ID { | ||||
|   // Everyone knows all user ids are odd | ||||
|   invariant($x % 2, sprintf('Invalid user ID: %d', $x)); | ||||
|   return $x; | ||||
| } | ||||
|  | ||||
| function assert_cow_id(int $x): COW_ID { | ||||
|   // Everyone knows all cow ids are even | ||||
|   invariant($x % 2 === 0, sprintf('Invalid cow ID: %d', $x)); | ||||
|   return $x; | ||||
| } | ||||
|  | ||||
| function id_to_int(ID $id): int { | ||||
|   return $id; | ||||
| } | ||||
							
								
								
									
										54
									
								
								samples/Hack/UserIDRecipe.hh
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										54
									
								
								samples/Hack/UserIDRecipe.hh
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,54 @@ | ||||
| <?hh // strict | ||||
| /** | ||||
|  * Copyright (c) 2014, Facebook, Inc. | ||||
|  * All rights reserved. | ||||
|  * | ||||
|  * This source code is licensed under the BSD-style license found in the | ||||
|  * LICENSE file in the root directory of this source tree. An additional grant | ||||
|  * of patent rights can be found in the PATENTS file in the same directory. | ||||
|  * | ||||
|  */ | ||||
|  | ||||
| require_once $_SERVER['DOCUMENT_ROOT'].'/core/controller/recipe/init.php'; | ||||
| require_once "demo.php"; | ||||
|  | ||||
| class UserIDRecipe extends Recipe implements RecipeWithDemo { | ||||
|  | ||||
|   protected function getName(): string { | ||||
|     return 'User ID'; | ||||
|   } | ||||
|  | ||||
|   <<Override>> | ||||
|   protected function getDescription(): ?string { | ||||
|     return 'Protect your user IDs from being confused with normal ints'; | ||||
|   } | ||||
|  | ||||
|   protected function getFilenames(): Vector<string> { | ||||
|     return Vector { | ||||
|       'UserID.php', | ||||
|       'UsingUserID.php', | ||||
|     }; | ||||
|   } | ||||
|  | ||||
|   protected function getDocs(): Vector<(string, string)> { | ||||
|     return Vector { | ||||
|       tuple('Opaque Type Aliasing',  'hack.typealiasing.opaquetypealiasing'), | ||||
|       tuple( | ||||
|         'Opaque Type Aliasing with Constraints', | ||||
|         'hack.typealiasing.opaquewithconstraints', | ||||
|       ), | ||||
|     }; | ||||
|   } | ||||
|  | ||||
|   public function getDemoFilename(): string { | ||||
|     return 'demo.php'; | ||||
|   } | ||||
|  | ||||
|   public function getDemoResult(): string { | ||||
|     return user_id_main(); | ||||
|   } | ||||
|  | ||||
|   public function getDemoXHP(): ?:xhp { | ||||
|     return null; | ||||
|   } | ||||
| } | ||||
							
								
								
									
										22
									
								
								samples/Hack/UsingUserID.hh
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										22
									
								
								samples/Hack/UsingUserID.hh
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,22 @@ | ||||
| <?hh // strict | ||||
| /** | ||||
|  * Copyright (c) 2014, Facebook, Inc. | ||||
|  * All rights reserved. | ||||
|  * | ||||
|  * This source code is licensed under the BSD-style license found in the | ||||
|  * LICENSE file in the root directory of this source tree. An additional grant | ||||
|  * of patent rights can be found in the PATENTS file in the same directory. | ||||
|  * | ||||
|  */ | ||||
|  | ||||
| function get_something_string(ID $id, string $something): string { | ||||
|   return sprintf("Awesome %s #%d\n", $something, id_to_int($id)); | ||||
| } | ||||
|  | ||||
| function get_user_string(USER_ID $id): string { | ||||
|   return get_something_string($id, 'user'); | ||||
| } | ||||
|  | ||||
| function get_cow_string(COW_ID $id): string { | ||||
|   return get_something_string($id, 'cow'); | ||||
| } | ||||
							
								
								
									
										43
									
								
								samples/Hack/error.hh
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										43
									
								
								samples/Hack/error.hh
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,43 @@ | ||||
| <?hh | ||||
| /** | ||||
|  * Copyright (c) 2014, Facebook, Inc. | ||||
|  * All rights reserved. | ||||
|  * | ||||
|  * This source code is licensed under the BSD-style license found in the | ||||
|  * LICENSE file in the root directory of this source tree. An additional grant | ||||
|  * of patent rights can be found in the PATENTS file in the same directory. | ||||
|  * | ||||
|  */ | ||||
|  | ||||
| final class TypehintViolationException extends Exception { | ||||
| } | ||||
|  | ||||
| function setup_errors(): void { | ||||
|   set_error_handler('handle_error', E_ALL); | ||||
| } | ||||
|  | ||||
| /** | ||||
|  * I want to turn failed typehints into exceptions so that I can handle them in | ||||
|  * my example code | ||||
|  */ | ||||
| function handle_error( | ||||
|   $errno, | ||||
|   $errstr, | ||||
|   $errfile, | ||||
|   $errline, | ||||
|   $errcontext = array(), | ||||
|   $errtrace = array(), | ||||
| ): bool { | ||||
|   if (E_RECOVERABLE_ERROR == $errno) { | ||||
|     // Transform typehint failures into an exception. | ||||
|     if (strpos($errstr, 'must be an instance of ') !== false) { | ||||
|       throw new TypehintViolationException($errstr); | ||||
|     } | ||||
|     // Transform nullable type violations to exceptions. | ||||
|     if ((strpos($errstr, 'must be of type ?') !== false) && | ||||
|         (strpos($errstr, 'Value returned from') === false)) { | ||||
|       throw new TypehintViolationException($errstr); | ||||
|     } | ||||
|   } | ||||
|   return false; | ||||
| } | ||||
							
								
								
									
										32
									
								
								samples/Hack/funs.hh
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										32
									
								
								samples/Hack/funs.hh
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,32 @@ | ||||
| <?hh | ||||
| /** | ||||
|  * Copyright (c) 2014, Facebook, Inc. | ||||
|  * All rights reserved. | ||||
|  * | ||||
|  * This source code is licensed under the BSD-style license found in the | ||||
|  * LICENSE file in the root directory of this source tree. An additional grant | ||||
|  * of patent rights can be found in the PATENTS file in the same directory. | ||||
|  * | ||||
|  */ | ||||
|  | ||||
| /** | ||||
|  * This file contains a bunch of php stubs for functions that have been added | ||||
|  * to hhvm (though aren't in a release yet). These are important because the | ||||
|  * Hack typechecker can understand them | ||||
|  */ | ||||
|  | ||||
| class InvariantViolationException extends Exception {} | ||||
|  | ||||
| function invariant(mixed $test, string $message): void { | ||||
|   if (!$test) { | ||||
|     invariant_violation($message); | ||||
|   } | ||||
| } | ||||
|  | ||||
| function invariant_violation(string $message): void { | ||||
|   throw new InvariantViolationException($message); | ||||
| } | ||||
|  | ||||
| function class_meth(string $class, string $method) { | ||||
|   return array($class, $method); | ||||
| } | ||||
							
								
								
									
										32
									
								
								samples/Hack/funs.php
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										32
									
								
								samples/Hack/funs.php
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,32 @@ | ||||
| <?hh | ||||
| /** | ||||
|  * Copyright (c) 2014, Facebook, Inc. | ||||
|  * All rights reserved. | ||||
|  * | ||||
|  * This source code is licensed under the BSD-style license found in the | ||||
|  * LICENSE file in the root directory of this source tree. An additional grant | ||||
|  * of patent rights can be found in the PATENTS file in the same directory. | ||||
|  * | ||||
|  */ | ||||
|  | ||||
| /** | ||||
|  * This file contains a bunch of php stubs for functions that have been added | ||||
|  * to hhvm (though aren't in a release yet). These are important because the | ||||
|  * Hack typechecker can understand them | ||||
|  */ | ||||
|  | ||||
| class InvariantViolationException extends Exception {} | ||||
|  | ||||
| function invariant(mixed $test, string $message): void { | ||||
|   if (!$test) { | ||||
|     invariant_violation($message); | ||||
|   } | ||||
| } | ||||
|  | ||||
| function invariant_violation(string $message): void { | ||||
|   throw new InvariantViolationException($message); | ||||
| } | ||||
|  | ||||
| function class_meth(string $class, string $method) { | ||||
|   return array($class, $method); | ||||
| } | ||||
							
								
								
									
										14
									
								
								samples/Hack/index.hh
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										14
									
								
								samples/Hack/index.hh
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,14 @@ | ||||
| <?hh | ||||
| /** | ||||
|  * Copyright (c) 2014, Facebook, Inc. | ||||
|  * All rights reserved. | ||||
|  * | ||||
|  * This source code is licensed under the BSD-style license found in the | ||||
|  * LICENSE file in the root directory of this source tree. An additional grant | ||||
|  * of patent rights can be found in the PATENTS file in the same directory. | ||||
|  * | ||||
|  */ | ||||
|  | ||||
| require_once 'HomeController.php'; | ||||
|  | ||||
| HomeController::go($_GET); | ||||
							
								
								
									
										31
									
								
								samples/Hack/phpfile.hh
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										31
									
								
								samples/Hack/phpfile.hh
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,31 @@ | ||||
| <?hh // strict | ||||
| /** | ||||
|  * Copyright (c) 2014, Facebook, Inc. | ||||
|  * All rights reserved. | ||||
|  * | ||||
|  * This source code is licensed under the BSD-style license found in the | ||||
|  * LICENSE file in the root directory of this source tree. An additional grant | ||||
|  * of patent rights can be found in the PATENTS file in the same directory. | ||||
|  * | ||||
|  */ | ||||
|  | ||||
| require_once $_SERVER['DOCUMENT_ROOT'].'/vendor/hhvm/xhp/src/init.php'; | ||||
|  | ||||
| final class :phpfile extends :x:primitive { | ||||
|   category %flow; | ||||
|  | ||||
|   attribute string filename; | ||||
|  | ||||
|   /** | ||||
|    * Ok, I'll admit this is kind of gross. I don't really want to implement | ||||
|    * syntax highlighting, so I'm relying on the built-in PHP support. XHP | ||||
|    * makes html strings sort of difficult to use (which is good cause they're | ||||
|    * dangerous). Anyway, this is one way around it :) | ||||
|    */ | ||||
|   protected function stringify(): string { | ||||
|     return | ||||
|       '<div class="code">'. | ||||
|       (string)highlight_file($this->getAttribute('filename'), /*ret*/ true). | ||||
|       '</div>'; | ||||
|   } | ||||
| } | ||||
							
								
								
									
										14
									
								
								samples/Hack/startup.hh
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										14
									
								
								samples/Hack/startup.hh
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,14 @@ | ||||
| <?hh // strict | ||||
| /** | ||||
|  * Copyright (c) 2014, Facebook, Inc. | ||||
|  * All rights reserved. | ||||
|  * | ||||
|  * This source code is licensed under the BSD-style license found in the | ||||
|  * LICENSE file in the root directory of this source tree. An additional grant | ||||
|  * of patent rights can be found in the PATENTS file in the same directory. | ||||
|  * | ||||
|  */ | ||||
|  | ||||
| function startup(): void { | ||||
|   setup_errors(); | ||||
| } | ||||
							
								
								
									
										68
									
								
								samples/Papyrus/CAMTEST_OverShoulderME.psc
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										68
									
								
								samples/Papyrus/CAMTEST_OverShoulderME.psc
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,68 @@ | ||||
| Scriptname CAMTEST_OverShoulderME extends activemagiceffect   | ||||
| {Play with camera effects} | ||||
|  | ||||
| ;--=== Imports ===-- | ||||
|  | ||||
| Import Utility | ||||
| Import Game | ||||
|  | ||||
| ;--=== Properties ===-- | ||||
|  | ||||
| Actor Property PlayerRef Auto | ||||
| ActorBase Property CAMTEST_CameraActor Auto | ||||
|  | ||||
| ;--=== Variables ===-- | ||||
|  | ||||
| Actor Player | ||||
|  | ||||
| Actor Camera | ||||
|  | ||||
| Actor Target | ||||
|  | ||||
| Float PosX | ||||
| Float PosY | ||||
| Float PosZ | ||||
| Float SpeedMult | ||||
|  | ||||
| ObjectReference Mist | ||||
| ObjectReference Fog | ||||
|  | ||||
| ;--=== Events ===-- | ||||
|  | ||||
| Event OnInit() | ||||
| 	Player = PlayerRef | ||||
| EndEvent | ||||
|  | ||||
| Event onEffectStart(Actor akTarget, Actor akCaster) | ||||
| 	Camera = Player.PlaceActorAtMe(CAMTEST_CameraActor) | ||||
| 	Camera.EnableAI(False) | ||||
| 	Camera.SetScale(0.1) | ||||
| 	Camera.TranslateTo(Player.X + 40,Player.Y,Player.Z,0,0,0,800,30) | ||||
| 	DisablePlayerControls(abMovement = true, abFighting = true, abCamSwitch = true,  abLooking = true, abSneaking = true, abMenu = true, abActivate = true, abJournalTabs = false) | ||||
| 	SetPlayerAIDriven(True) | ||||
| 	ForceThirdPerson() | ||||
| 	SetHUDCartMode() | ||||
| 	SetInChargen(True, True, False) | ||||
| 	SetCameraTarget(Camera) | ||||
| 	ForceFirstPerson() | ||||
| 	Wait(1) | ||||
| 	Camera.SplineTranslateTo(Player.X + 4000,Player.Y,Player.Z + 1000,15,0,Camera.GetHeadingAngle(Player) + Camera.GetAngleZ(),1800,800,100) | ||||
| ;	Camera.SetLookAt(Player) | ||||
| 	Wait(10) | ||||
| 	Camera.SplineTranslateTo(Player.X + 1000,Player.Y - 500,Player.Z + 500,25,0,Camera.GetHeadingAngle(Player) + Camera.GetAngleZ(),1800,800,100) | ||||
| 	Wait(10) | ||||
| 	SetHUDCartMode(False) | ||||
| 	SetCameraTarget(Player) | ||||
| 	SetInChargen(False, False, False) | ||||
| 	EnablePlayerControls() | ||||
| 	SetPlayerAIDriven(False) | ||||
| EndEvent | ||||
|  | ||||
| Event onUpdate() | ||||
| EndEvent | ||||
|  | ||||
| Event onEffectFinish(Actor akTarget, Actor akCaster) | ||||
| EndEvent | ||||
|  | ||||
| ;--=== Functions ===-- | ||||
|  | ||||
							
								
								
									
										1
									
								
								samples/Papyrus/vMFX_FXPlugin.psc
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										1
									
								
								samples/Papyrus/vMFX_FXPlugin.psc
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1 @@ | ||||
| Scriptname vMFX_FXPlugin extends Quest   | ||||
							
								
								
									
										120
									
								
								samples/Papyrus/vSCM_MetaQuestScript.psc
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										120
									
								
								samples/Papyrus/vSCM_MetaQuestScript.psc
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,120 @@ | ||||
| Scriptname vSCM_MetaQuestScript extends Quest   | ||||
| {Do initialization and track variables for scripts} | ||||
|  | ||||
| ;--=== Imports ===-- | ||||
|  | ||||
| Import Utility | ||||
| Import Game | ||||
|  | ||||
| ;--=== Properties ===-- | ||||
|  | ||||
| Actor Property PlayerRef Auto | ||||
|  | ||||
| Float Property ModVersion Auto Hidden | ||||
|  | ||||
| String Property ModName = "Smarter Combat Music" Auto Hidden | ||||
|  | ||||
| Message Property vSCM_ModLoadedMSG Auto | ||||
| Message Property vSCM_ModUpdatedMSG Auto | ||||
|  | ||||
| ;--=== Variables ===-- | ||||
|  | ||||
| Float _CurrentVersion | ||||
| String _sCurrentVersion | ||||
|  | ||||
| Bool _Running | ||||
|  | ||||
| Float _ScriptLatency | ||||
| Float _StartTime | ||||
| Float _EndTime | ||||
|  | ||||
| ;--=== Events ===-- | ||||
|  | ||||
| Event OnInit() | ||||
| 	If ModVersion == 0 | ||||
| 		DoUpkeep(True) | ||||
| 	EndIf | ||||
| EndEvent | ||||
|  | ||||
| Event OnReset() | ||||
| 	Debug.Trace("SCM: Metaquest event: OnReset") | ||||
| EndEvent | ||||
|  | ||||
| Event OnGameReloaded() | ||||
| 	Debug.Trace("SCM: Metaquest event: OnGameReloaded") | ||||
| EndEvent | ||||
|  | ||||
| ;--=== Functions ===-- | ||||
|  | ||||
| Function DoUpkeep(Bool DelayedStart = True) | ||||
| 	;FIXME: CHANGE THIS WHEN UPDATING! | ||||
| 	_CurrentVersion = 0.01 | ||||
| 	_sCurrentVersion = GetVersionString(_CurrentVersion) | ||||
| 	String sErrorMessage | ||||
| 	If DelayedStart | ||||
| 		Wait(RandomFloat(2,4)) | ||||
| 	EndIf | ||||
| 	Debug.Trace("SCM: " + ModName) | ||||
| 	Debug.Trace("SCM: Performing upkeep...") | ||||
| 	Debug.Trace("SCM: Loaded version is " + GetVersionString(ModVersion) + ", Current version is " + _sCurrentVersion) | ||||
| 	If ModVersion == 0 | ||||
| 		Debug.Trace("SCM: Newly installed, doing initialization...") | ||||
| 		DoInit() | ||||
| 		If ModVersion == _CurrentVersion | ||||
| 			Debug.Trace("SCM: Initialization succeeded.") | ||||
| 		Else | ||||
| 			Debug.Trace("SCM: WARNING! Initialization had a problem!") | ||||
| 		EndIf | ||||
| 	ElseIf ModVersion < _CurrentVersion | ||||
| 		Debug.Trace("SCM: Installed version is older. Starting the upgrade...") | ||||
| 		DoUpgrade() | ||||
| 		If ModVersion != _CurrentVersion | ||||
| 			Debug.Trace("SCM: WARNING! Upgrade failed!") | ||||
| 			Debug.MessageBox("WARNING! " + ModName + " upgrade failed for some reason. You should report this to the mod author.") | ||||
| 		EndIf | ||||
| 		Debug.Trace("SCM: Upgraded to " + _CurrentVersion) | ||||
| 		vSCM_ModUpdatedMSG.Show(_CurrentVersion) | ||||
| 	Else | ||||
| 		Debug.Trace("SCM: Loaded, no updates.") | ||||
| 		;CheckForOrphans() | ||||
| 	EndIf | ||||
| 	CheckForExtras() | ||||
| 	UpdateConfig() | ||||
| 	Debug.Trace("SCM: Upkeep complete!") | ||||
| EndFunction | ||||
|  | ||||
| Function DoInit() | ||||
| 	Debug.Trace("SCM: Initializing...") | ||||
| 	_Running = True | ||||
| 	ModVersion = _CurrentVersion | ||||
| 	vSCM_ModLoadedMSG.Show(_CurrentVersion) | ||||
| EndFunction | ||||
|  | ||||
| Function DoUpgrade() | ||||
| 	_Running = False | ||||
| 	If ModVersion < 0.01 | ||||
| 		Debug.Trace("SCM: Upgrading to 0.01...") | ||||
| 		ModVersion = 0.01 | ||||
| 	EndIf | ||||
| 	_Running = True | ||||
| 	Debug.Trace("SCM: Upgrade complete!") | ||||
| EndFunction | ||||
|  | ||||
| Function UpdateConfig() | ||||
| 	Debug.Trace("SCM: Updating configuration...") | ||||
|  | ||||
| 	Debug.Trace("SCM: Updated configuration values, some scripts may update in the background!") | ||||
| EndFunction | ||||
|  | ||||
| String Function GetVersionString(Float fVersion) | ||||
| 	Int Major = Math.Floor(fVersion) as Int | ||||
| 	Int Minor = ((fVersion - (Major as Float)) * 100.0) as Int | ||||
| 	If Minor < 10 | ||||
| 		Return Major + ".0" + Minor | ||||
| 	Else | ||||
| 		Return Major + "." + Minor | ||||
| 	EndIf | ||||
| EndFunction | ||||
|  | ||||
| Function CheckForExtras() | ||||
| EndFunction | ||||
							
								
								
									
										19
									
								
								samples/SuperCollider/WarpPreset.sc
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										19
									
								
								samples/SuperCollider/WarpPreset.sc
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,19 @@ | ||||
| WarpPreset { | ||||
| 	*new {|path| | ||||
| 		if(path.notNil) { | ||||
| 			^Object.readArchive(path); | ||||
| 		}; | ||||
|  | ||||
| 		^super.new.init(); | ||||
| 	} | ||||
|  | ||||
| 	init { | ||||
|  | ||||
| 	} | ||||
|  | ||||
| 	save { | ||||
| 		Dialog.savePanel({|path| | ||||
| 			this.writeArchive(path); | ||||
| 		}); | ||||
| 	} | ||||
| } | ||||
							
								
								
									
										286
									
								
								samples/SuperCollider/WarpTate.sc
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										286
									
								
								samples/SuperCollider/WarpTate.sc
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,286 @@ | ||||
| WarpTate { | ||||
| 	classvar <numSections = 8; | ||||
| 	// classvar <sectionDur = 3 * 60; | ||||
| 	classvar <sectionDur = 60; | ||||
|  | ||||
| 	var <sensorKeys; | ||||
| 	var <clock; | ||||
| 	var <tempo; | ||||
| 	var <>tempoChannel; | ||||
| 	var <>tempoControl; | ||||
| 	var <out; | ||||
| 	var <tracks; | ||||
| 	var <>sections; | ||||
| 	var <availableControls; | ||||
| 	var <controls; | ||||
| 	var <sensorVals; | ||||
| 	var <sensorPrevs; | ||||
| 	var <sensorMins; | ||||
| 	var <sensorMaxs; | ||||
| 	var <>sensorMinAdj; | ||||
| 	var <>sensorMaxAdj; | ||||
| 	var <doAdjusts; | ||||
| 	var <playRout; | ||||
|  | ||||
| 	*new { | ||||
| 		^super.new.init; | ||||
| 	} | ||||
|  | ||||
| 	init { | ||||
| 		tempo = 120; | ||||
| 		tempoChannel = 15; | ||||
| 		tempoControl = 3; | ||||
| 		clock = TempoClock.default | ||||
| 			.tempo_(2) | ||||
| 			.permanent_(true); | ||||
|  | ||||
| 		MIDIClient.init; | ||||
| 		out = MIDIOut.newByName("IAC Driver", "Bus 1"); | ||||
| 		out.latency = 0; | ||||
|  | ||||
| 		tracks = IdentityDictionary[]; | ||||
| 		sections = Array.newClear(WarpTate.numSections); | ||||
| 		// sections is a List of IdentityDictionary to be mapped to | ||||
| 		// WarpTrack settings var | ||||
| 		// e.g. List[IdentityDictionary[ | ||||
| 		//	 			'303_1' -> IdentityDictionary['notes' -> List[42]], | ||||
| 		// 				'808_1'	-> IdentityDictionary['notes' -> List[24]] | ||||
| 		// 			] | ||||
| 		// 		] | ||||
| 		sensorKeys = ['303a', '303b', '808a', '808b']; | ||||
|  | ||||
| 		// channel 16 reserved for tempo changes | ||||
| 		availableControls = 15.collect {|channel| | ||||
| 			(0..120).reject({|item, i| | ||||
| 				[ 0, 1, 2, 4, 5, 6, 7, 8, 10, 11, 12, 13, 64, 65, 66, 67, 68, | ||||
| 				69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 84, 91, 92, 93, 94, | ||||
| 				95, 96, 97, 98, 99, 100, 102 ].includes(item) | ||||
| 			}); | ||||
| 		}; | ||||
|  | ||||
| 		controls = (0..127).collect { IdentityDictionary[] }; | ||||
|  | ||||
| 		this.addOSCdefs(); | ||||
|  | ||||
| 		CmdPeriod.add({this.stop}); | ||||
| 	} | ||||
|  | ||||
| 	tempo_ {|argTempo| | ||||
| 		if(argTempo >= 50 && argTempo <= 177) { | ||||
| 			tempo = argTempo; | ||||
| 			clock.tempo = tempo / 60; | ||||
|  | ||||
| 			out.control(tempoChannel, tempoControl, tempo - 50); | ||||
| 		} { | ||||
| 			"Tempo out of Logic's range :(".postln; | ||||
| 		}; | ||||
| 	} | ||||
|  | ||||
| 	addTrack {|trackKey, channel, type| | ||||
| 		tracks[trackKey] = WarpTrack(this, trackKey, channel, type); | ||||
| 		^tracks[trackKey]; | ||||
| 	} | ||||
|  | ||||
| 	loadTrack {|preset, checkAvailable| | ||||
| 		var track = WarpTrack.load(this, preset, checkAvailable), | ||||
| 			trackKey = track.settings['key']; | ||||
|  | ||||
| 		tracks[trackKey] = track; | ||||
| 		^tracks[trackKey]; | ||||
| 	} | ||||
|  | ||||
| 	readTrack {|path| | ||||
| 		var track = WarpTrack.read(this, path), | ||||
| 			trackKey = track.settings['key']; | ||||
|  | ||||
| 		tracks[trackKey] = track; | ||||
| 		^tracks[trackKey]; | ||||
| 	} | ||||
|  | ||||
| 	removeTrack {|trackKey| | ||||
| 		tracks[trackKey].allOff(); | ||||
| 		tracks[trackKey] = nil; | ||||
| 	} | ||||
|  | ||||
| 	removeAllTracks { | ||||
| 		tracks = IdentityDictionary[]; | ||||
| 	} | ||||
|  | ||||
| 	on {|trackKey, note| | ||||
| 		tracks[trackKey].on(note); | ||||
| 	} | ||||
|  | ||||
| 	off {|trackKey, note| | ||||
| 		tracks[trackKey].off(note); | ||||
| 	} | ||||
|  | ||||
| 	hit {|trackKey, note=60, vel=127, dur=1| | ||||
| 		tracks[trackKey].hit(note, vel, dur); | ||||
| 	} | ||||
|  | ||||
| 	noteOn {|midiChannel, note, vel| | ||||
| 		out.noteOn(midiChannel, note, vel); | ||||
| 	} | ||||
|  | ||||
| 	noteOff {|midiChannel, note, vel| | ||||
| 		out.noteOff(midiChannel, note, vel); | ||||
| 	} | ||||
|  | ||||
| 	control {|midiChannel, num, val| | ||||
| 		out.control(midiChannel, num, val); | ||||
| 	} | ||||
|  | ||||
| 	isControlAvailable {|channel, controlNum| | ||||
| 		^controls[channel].keys.includes(controlNum.asSymbol).not; | ||||
| 	} | ||||
|  | ||||
| 	setControl {|channel, num, key| | ||||
| 		controls[channel][num.asSymbol] = key; | ||||
| 		availableControls[channel].remove(num); | ||||
| 	} | ||||
|  | ||||
| 	assign {|trackKey, paramKey, controlNum, learn=false| | ||||
| 		var channel = tracks[trackKey].settings['midiChannel']; | ||||
|  | ||||
| 		if(controlNum.notNil && this.isControlAvailable(channel, controlNum)) { | ||||
| 			tracks[trackKey].assign(paramKey, controlNum, learn); | ||||
| 			availableControls[channel].removeAt(0); | ||||
|  | ||||
| 		} { | ||||
| 			if(availableControls[channel].size > 0) { | ||||
| 				tracks[trackKey].assign(paramKey, availableControls[channel][0], learn); | ||||
| 				availableControls[channel].removeAt(0); | ||||
| 			} { | ||||
| 				"no controls left!".postln; | ||||
| 			}; | ||||
| 		}; | ||||
|  | ||||
| 		"Don't forget to turn off MIDI learn".postln | ||||
| 	} | ||||
|  | ||||
| 	setParam {|trackKey, paramKey, val| | ||||
| 		var track, param; | ||||
|  | ||||
| 		if((track = tracks[trackKey]).notNil) { | ||||
| 			if(track.params[paramKey].notNil) { | ||||
| 				track.setParam(paramKey, val); | ||||
| 			} { | ||||
| 				"paramKey doesn't exist".postln; | ||||
| 			}; | ||||
| 		} { | ||||
| 			"track key doesn't exist".postln; | ||||
| 		}; | ||||
| 	} | ||||
|  | ||||
| 	// sec takes IdentityDictionarys of WarpTrack settings | ||||
| 	addSection {|index, tempo=120, presets| | ||||
| 		// Add section with tempo | ||||
| 		sections[index] = IdentityDictionary[ | ||||
| 			'tempo' 	-> tempo, | ||||
| 			'tracks'	-> presets | ||||
| 		]; | ||||
|  | ||||
| 		presets.do {|preset, i| | ||||
| 			// create track if there ain't one with this key | ||||
| 			if(tracks.includesKey(preset['key']).not) { | ||||
| 				this.loadTrack(preset, true); | ||||
| 			}; | ||||
|  | ||||
| 			// store the preset | ||||
| 			// sections[index]['tracks'][preset['key']] = preset; | ||||
| 		}; | ||||
|  | ||||
| 		^sections; | ||||
| 	} | ||||
|  | ||||
| 	play { | ||||
|  | ||||
| 		if(sections.any {|item, i| item.notNil; }) { | ||||
| 			playRout = Routine { | ||||
| 				inf.do {|i| | ||||
| 					sections.do {|section| | ||||
| 						if(section.notNil) { | ||||
| 							if(i !== 0) { | ||||
| 								tracks.do {|track| | ||||
| 									track.allOff(); | ||||
| 								}; | ||||
| 								this.removeAllTracks(); | ||||
| 							}; | ||||
|  | ||||
| 							this.tempo = section['tempo']; | ||||
|  | ||||
| 							section['tracks'].do {|track, i| | ||||
| 								var newTrack = this.loadTrack(track, false); | ||||
| 								newTrack.play(); | ||||
| 							}; | ||||
| 							sectionDur.wait; | ||||
| 						}; | ||||
| 					}; | ||||
| 				} | ||||
| 			}; | ||||
| 			clock.playNextBar(playRout); | ||||
| 		} { | ||||
| 			"no sections added!".postln; | ||||
| 		}; | ||||
|  | ||||
| 	} | ||||
|  | ||||
| 	stop { | ||||
| 		playRout.stop; | ||||
|  | ||||
| 		tracks.do {|track| | ||||
| 			track.allOff(); | ||||
| 			out.allNotesOff(track.settings['midiChannel']); | ||||
| 		} | ||||
| 	} | ||||
|  | ||||
| 	addOSCdefs { | ||||
| 		sensorVals = 0!sensorKeys.size; | ||||
| 		sensorPrevs = 0!sensorKeys.size; | ||||
| 		sensorMins = 9999!sensorKeys.size; | ||||
| 		sensorMaxs = 0!sensorKeys.size; | ||||
| 		sensorMinAdj = sensorMinAdj ?? { 0.005 }; | ||||
| 		sensorMaxAdj = sensorMaxAdj ?? { 0.01 }; | ||||
| 		doAdjusts = false!sensorKeys.size; | ||||
|  | ||||
| 		sensorKeys.do {|sensorKey, i| | ||||
| 			OSCdef(("sensor_" ++ sensorKey).asSymbol, {|msg, time, addr, recvPort| | ||||
| 				var val = msg[1]; | ||||
|  | ||||
|  | ||||
| 				sensorPrevs[i] = sensorVals[i]; | ||||
| 				sensorVals[i] = val; | ||||
|  | ||||
| 				if(doAdjusts[i]) { | ||||
| 					sensorMins[i] = min(val, sensorMins[i]); | ||||
| 					sensorMaxs[i] = max(val, sensorMaxs[i]); | ||||
|  | ||||
| 					if(val < sensorMaxs[i]) { | ||||
| 						sensorMaxs[i] = sensorMaxs[i] - sensorMaxAdj; | ||||
| 					}; | ||||
|  | ||||
| 					if(val > sensorMins[i]) { | ||||
| 						sensorMins[i] = sensorMins[i] + sensorMinAdj; | ||||
| 					}; | ||||
| 				} { | ||||
| 					val = val.clip(sensorMins[i], sensorMaxs[i]); | ||||
| 				}; | ||||
|  | ||||
|  | ||||
| 				tracks.do {|track, j| | ||||
| 					if(track.settings['sensorFuncs'].includesKey(sensorKey)) { | ||||
| 						track.sensor( | ||||
| 							sensorKey, | ||||
| 							val.linlin( | ||||
| 								sensorMins[i], | ||||
| 								sensorMaxs[i], | ||||
| 								127, | ||||
| 								0 | ||||
| 							) | ||||
| 						); | ||||
| 					}; | ||||
| 				} | ||||
| 			}, ("/prox/" ++ sensorKey).asSymbol); | ||||
| 		} | ||||
| 	} | ||||
| } | ||||
							
								
								
									
										263
									
								
								samples/SuperCollider/WarpTrack.sc
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										263
									
								
								samples/SuperCollider/WarpTrack.sc
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,263 @@ | ||||
| WarpTrack { | ||||
| 	classvar <defaults; | ||||
|  | ||||
| 	var <parent; | ||||
| 	var <settings; | ||||
|  | ||||
| 	*initClass { | ||||
| 		defaults['303_1'] = defaults['303'].copy; | ||||
| 		defaults['303_1']['paramControls'].putPairs([ | ||||
| 			'Bus 1', 46, | ||||
| 			'Bus 2', 45, | ||||
| 			'Bus 3', 48, | ||||
| 			'echovol', 47 | ||||
| 		]); | ||||
| 		defaults['303_1']['params'].putPairs([ | ||||
| 			'Bus 1', 0, | ||||
| 			'Bus 2', 0, | ||||
| 			'Bus 3', 0, | ||||
| 			'echovol', 0 | ||||
| 		]); | ||||
|  | ||||
| 		defaults['303_2'] = defaults['303_1'].copy; | ||||
| 		defaults['303_2']['paramControls'].putPairs([ | ||||
| 		]); | ||||
| 		defaults['303_2']['params'].putPairs([ | ||||
| 		]); | ||||
|  | ||||
| 		defaults['808_1'] = defaults['808'].copy; | ||||
| 		defaults['808_1']['paramControls'].putPairs([ | ||||
| 			'bitcrusher', 88, | ||||
| 			'Send 1', 89, | ||||
| 			'Send 2', 90, | ||||
| 			'Send 3', 101 | ||||
| 		]); | ||||
| 		defaults['808_1']['params'].putPairs([ | ||||
| 			'bitcrusher', 0, | ||||
| 			'Send 1', 0, | ||||
| 			'Send 2', 0, | ||||
| 			'Send 3', 0 | ||||
| 		]); | ||||
|  | ||||
| 		defaults['808_2'] = defaults['808_1'].copy; | ||||
| 		defaults['808_2']['paramControls'].putPairs([]); | ||||
| 		defaults['808_2']['params'].putPairs([]); | ||||
| 	} | ||||
|  | ||||
| 	*new {|argParent, argKey, argMidiChannel, argType| | ||||
| 		^super.new.init(argParent, argKey, argMidiChannel, argType); | ||||
| 	} | ||||
|  | ||||
| 	*read {|argParent, path| | ||||
| 		^super.new.init(argParent).readPreset(path); | ||||
| 	} | ||||
|  | ||||
| 	*load {|argParent, preset, checkAvailable| | ||||
| 		^super.new.init(argParent).loadPreset(preset, checkAvailable); | ||||
| 	} | ||||
|  | ||||
| 	init {|argParent, argKey, argMidiChannel, argType| | ||||
| 		parent = argParent; | ||||
|  | ||||
| 		settings = IdentityDictionary[ | ||||
| 			'key'			-> argKey, | ||||
| 			'midiChannel'	-> argMidiChannel, | ||||
| 			'notes'			-> Set[], | ||||
| 			'params'		-> IdentityDictionary[], | ||||
| 			'paramControls'	-> IdentityDictionary[], | ||||
| 			'patternTrack'	-> true, | ||||
| 			'sensorFuncs'	-> IdentityDictionary[] | ||||
| 		]; | ||||
|  | ||||
| 		if(argType.notNil) { | ||||
| 			settings['type'] = argType; | ||||
| 			if(WarpTrack.defaults.keys.includes(argType)) { | ||||
| 				['paramControls', 'params'].do {|key, i| | ||||
| 					settings[key] = WarpTrack.defaults[argType][key]; | ||||
| 				} | ||||
| 			}; | ||||
|  | ||||
| 			this.initParams(); | ||||
| 		}; | ||||
| 	} | ||||
|  | ||||
| 	on {|note| | ||||
| 		var clock = parent.clock; | ||||
| 		var sub = 1 / (parent.clock.tempo * 16); // one sub division | ||||
|  | ||||
| 		clock.schedAbs(clock.nextBar - sub, { | ||||
| 			if(settings['patternTrack']) { | ||||
| 				this.allOff(); | ||||
| 			} { | ||||
| 				this.off(note); | ||||
| 			}; | ||||
| 		}); | ||||
|  | ||||
| 		parent.clock.playNextBar({ | ||||
| 			settings['notes'].add(note); | ||||
| 			parent.noteOn(settings['midiChannel'], note, 127); | ||||
| 		}); | ||||
| 	} | ||||
|  | ||||
| 	off {|note| | ||||
| 		// settings['notes'].remove(note); | ||||
| 		parent.noteOff(settings['midiChannel'], note, 0); | ||||
| 	} | ||||
|  | ||||
| 	hit {|note=60, vel=127, dur=1, quant=0| | ||||
| 		{ | ||||
| 			parent.noteOn(settings['midiChannel'], note, vel); | ||||
| 			dur.wait; | ||||
| 			parent.noteOff(settings['midiChannel'], note, vel); | ||||
| 		}.fork(parent.clock, quant:quant); | ||||
| 	} | ||||
|  | ||||
| 	allOff { | ||||
| 		settings['notes'].do {|note, i| | ||||
| 			this.off(note); | ||||
| 		}; | ||||
| 	} | ||||
|  | ||||
| 	assign {|paramKey, num, learn=false, init=true, checkAvailable=true| | ||||
| 		if(num.notNil) { | ||||
| 			this.assignAll(IdentityDictionary[paramKey -> num], learn, init, checkAvailable); | ||||
| 		} { | ||||
| 			parent.assign(settings['key'], paramKey, nil, learn); | ||||
| 		}; | ||||
| 	} | ||||
|  | ||||
| 	assignAll {|paramControls, learn=false, init=true, checkAvailable=true| | ||||
| 		var action = { | ||||
| 			var channel = settings['midiChannel']; | ||||
|  | ||||
| 			paramControls.keysValuesDo { |paramKey, num| | ||||
| 				if(checkAvailable.not || | ||||
| 					(checkAvailable && parent.isControlAvailable(channel, num))) { | ||||
| 					settings['paramControls'][paramKey] = num; | ||||
| 					if(init) { | ||||
| 						settings['params'][paramKey] = 0; | ||||
| 					}; | ||||
| 					parent.setControl(channel, num, paramKey); | ||||
| 					if(learn) { | ||||
| 						parent.control(channel, num, 127); | ||||
| 						0.05.wait; | ||||
| 						parent.control(channel, num, 0); | ||||
| 					}; | ||||
| 					paramKey ++ " assigned to controlNum " ++ num; | ||||
| 				} { | ||||
| 					("this controlNum " ++ num ++ " is already assigned!").postln; | ||||
| 				}; | ||||
| 			}; | ||||
| 		}; | ||||
|  | ||||
| 		if(learn) { | ||||
| 			action.fork; | ||||
| 		} { | ||||
| 			action.(); | ||||
| 		}; | ||||
|  | ||||
| 	} | ||||
|  | ||||
| 	initParams { | ||||
| 		settings['params'].keysValuesDo { |key, value| | ||||
| 			this.setParam(key, value); | ||||
| 		}; | ||||
| 		settings['paramControls'].keysValuesDo { |key, value| | ||||
| 			parent.setControl(settings['midiChannel'], value, key); | ||||
| 		}; | ||||
| 	} | ||||
|  | ||||
| 	setParam {|paramKey, val, quant| | ||||
| 		var func = { | ||||
| 			parent.control( | ||||
| 				settings['midiChannel'], | ||||
| 				settings['paramControls'][paramKey], | ||||
| 				val | ||||
| 			); | ||||
|  | ||||
| 			settings['params'][paramKey] = val; | ||||
| 		}; | ||||
|  | ||||
| 		if(quant.notNil) { | ||||
| 			{ | ||||
| 				func.(); | ||||
| 			}.fork(parent.clock, quant:quant); | ||||
| 		} { | ||||
| 			func.(); | ||||
| 		}; | ||||
| 	} | ||||
|  | ||||
| 	readPreset {|path, checkAvailable=true| | ||||
| 		this.loadPreset(Object.readArchive(path), checkAvailable); | ||||
| 	} | ||||
|  | ||||
| 	loadPreset {|preset, checkAvailable=true| | ||||
| 		// copy all settings except notes and paramControls | ||||
| 		preset.keys.reject({|settingKey, i| | ||||
| 			['notes', 'paramControls'].includes(settingKey); | ||||
| 		}).do {|presetKey, i| | ||||
| 			settings[presetKey] = preset[presetKey]; | ||||
| 		}; | ||||
|  | ||||
| 		// copy notes if it's a patternTrack | ||||
| 		if(preset['patternTrack']) { | ||||
| 			settings['notes'] = preset['notes']; | ||||
| 		}; | ||||
|  | ||||
| 		// assign all without learn or init | ||||
| 		this.assignAll( | ||||
| 			preset['paramControls'], | ||||
| 			false, | ||||
| 			false, | ||||
| 			checkAvailable | ||||
| 		); | ||||
|  | ||||
| 		this.initParams(); | ||||
|  | ||||
| 		// if(settings['notes'].size > 0) { | ||||
| 		// 	this.on(settings['notes'].asArray[0]); | ||||
| 		// }; | ||||
| 	} | ||||
|  | ||||
| 	sensor {|sensorKey, val| | ||||
| 		settings['sensorFuncs'][sensorKey].do {|func, i| | ||||
| 			func.(this, val); | ||||
| 		} | ||||
| 	} | ||||
|  | ||||
| 	addFunc {|sensorKey, funcKey, func| | ||||
| 		if(parent.sensorKeys.includes(sensorKey)) { | ||||
| 			if(settings['sensorFuncs'].includesKey(sensorKey).not) { | ||||
| 				settings['sensorFuncs'][sensorKey] = IdentityDictionary[]; | ||||
| 			}; | ||||
|  | ||||
| 			settings['sensorFuncs'][sensorKey][funcKey] = func; | ||||
| 		} { | ||||
| 			"parent doesn't have that sensor key".postln; | ||||
| 		}; | ||||
| 	} | ||||
|  | ||||
| 	removeFunc {|sensorKey, funcKey| | ||||
| 		settings['sensorFuncs'][sensorKey].removeAt(funcKey); | ||||
|  | ||||
| 		if(settings['sensorFuncs'][sensorKey].isEmpty) { | ||||
| 			settings['sensorFuncs'].removeAt(sensorKey); | ||||
| 		}; | ||||
| 	} | ||||
|  | ||||
| 	availableControls { | ||||
| 		^parent.availableControls[settings['midiChannel']].copy; | ||||
| 	} | ||||
|  | ||||
| 	save { | ||||
| 		Dialog.savePanel({|path| | ||||
| 			settings.writeArchive(path); | ||||
| 		}); | ||||
| 	} | ||||
|  | ||||
| 	play { | ||||
| 		if(settings['patternTrack'] && settings['notes'].notEmpty) { | ||||
| 			this.on(settings['notes'].choose); | ||||
| 		}; | ||||
| 	} | ||||
| } | ||||
							
								
								
									
										127
									
								
								samples/SuperCollider/WarpUtil.sc
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										127
									
								
								samples/SuperCollider/WarpUtil.sc
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,127 @@ | ||||
| WarpUtil { | ||||
| 	var <>parent; | ||||
| 	var <curSensor; | ||||
|  | ||||
| 	var <win; | ||||
| 	var <texts; | ||||
| 	var <sensorSlider; | ||||
| 	var <sliders; | ||||
| 	var <updateRout; | ||||
|  | ||||
| 	*new {|argParent| | ||||
| 		^super.new.init(argParent); | ||||
| 	} | ||||
|  | ||||
| 	init {|argParent| | ||||
| 		parent = argParent; | ||||
| 		texts = IdentityDictionary[]; | ||||
|  | ||||
| 		this.makeView(); | ||||
| 		this.startUpdate(); | ||||
| 	} | ||||
|  | ||||
| 	calibrate { | ||||
| 		{ | ||||
| 			parent.doAdjusts.size.do {|i| | ||||
| 				parent.sensorMaxs[i] = 0; | ||||
| 				parent.sensorMins[i] = 9999; | ||||
| 				parent.doAdjusts[i] = true; | ||||
| 			}; | ||||
|  | ||||
| 			sliders.do {|slider, i| | ||||
| 				if(parent.sensorKeys[i] !== curSensor) { | ||||
| 					slider.valueAction_(0); | ||||
| 					0.1.wait; | ||||
| 					slider.valueAction_(1); | ||||
| 				}; | ||||
| 			} | ||||
| 		}.fork(AppClock); | ||||
| 	} | ||||
|  | ||||
| 	stopCalibrate { | ||||
| 		parent.doAdjusts.size.do {|i| | ||||
| 			parent.doAdjusts[i] = false; | ||||
| 		} | ||||
| 	} | ||||
|  | ||||
| 	makeView { | ||||
| 		var width = 370; | ||||
|  | ||||
| 		if(win.notNil) { | ||||
| 			win.close; | ||||
| 		}; | ||||
|  | ||||
| 		win = Window("Sensor Inspector", Rect(256, 10, width, 424)).front; | ||||
| 		win.view.addFlowLayout; | ||||
|  | ||||
| 		['sensorVals', 'sensorPrevs', 'sensorMins', 'sensorMaxs'].do {|label, i| | ||||
| 			StaticText(win, (width * 0.5)@20) | ||||
| 				.string_(label.asString); | ||||
|  | ||||
| 			win.view.decorator.nextLine; | ||||
|  | ||||
|  | ||||
| 			texts[label] = StaticText(win, (width / 2)@40); | ||||
|  | ||||
| 			if(curSensor.notNil) { | ||||
| 				texts[label].string_( | ||||
| 					"\t" ++ parent.perform(label).at( | ||||
| 						parent.sensorKeys.indexOf(curSensor) | ||||
| 					); | ||||
| 				); | ||||
| 			}; | ||||
|  | ||||
| 			win.view.decorator.nextLine; | ||||
| 		}; | ||||
|  | ||||
| 		sensorSlider = EZSlider(win, 280@20, label: curSensor.asString); | ||||
|  | ||||
| 		sliders = parent.sensorKeys.collect { |sensorKey, i| | ||||
| 			EZSlider(win, 280@20, label: sensorKey.asString) | ||||
| 				.action_({|ez| | ||||
| 					NetAddr.localAddr.sendMsg( | ||||
| 						"/prox/" ++ sensorKey, | ||||
| 						ez.value * 100 | ||||
| 					); | ||||
| 				}); | ||||
| 		}; | ||||
| 	} | ||||
|  | ||||
| 	startUpdate { | ||||
| 		updateRout = Routine { | ||||
| 			inf.do {|i| | ||||
| 				var index; | ||||
|  | ||||
| 				if(curSensor.notNil) { | ||||
| 					index = parent.sensorKeys.indexOf(curSensor); | ||||
|  | ||||
| 					['sensorVals', 'sensorPrevs', 'sensorMins', | ||||
| 						'sensorMaxs'].do {|label, i| | ||||
|  | ||||
| 							texts[label] | ||||
| 							.string_("\t" ++ parent.perform(label)[index]); | ||||
| 					}; | ||||
|  | ||||
| 					sensorSlider.value = parent.sensorVals[index].linlin( | ||||
| 						parent.sensorMins[index], | ||||
| 						parent.sensorMaxs[index], | ||||
| 						0, | ||||
| 						1 | ||||
| 					); | ||||
| 				}; | ||||
| 				0.05.wait; | ||||
| 			} | ||||
| 		}; | ||||
|  | ||||
| 		updateRout.play(AppClock); | ||||
| 	} | ||||
|  | ||||
| 	stopUpdate { | ||||
| 		updateRout.stop(); | ||||
| 	} | ||||
|  | ||||
| 	curSensor_ {|argCurSensor| | ||||
| 		curSensor = argCurSensor; | ||||
| 		this.makeView(); | ||||
| 	} | ||||
| } | ||||
| @@ -304,6 +304,14 @@ class TestBlob < Test::Unit::TestCase | ||||
|     # Debian packaging | ||||
|     assert blob("debian/cron.d").vendored? | ||||
|  | ||||
|     # Minified JavaScript and CSS | ||||
|     assert blob("foo.min.js").vendored? | ||||
|     assert blob("foo.min.css").vendored? | ||||
|     assert blob("foo-min.js").vendored? | ||||
|     assert blob("foo-min.css").vendored? | ||||
|     assert !blob("foomin.css").vendored? | ||||
|     assert !blob("foo.min.txt").vendored? | ||||
|  | ||||
|     # Prototype | ||||
|     assert !blob("public/javascripts/application.js").vendored? | ||||
|     assert blob("public/javascripts/prototype.js").vendored? | ||||
|   | ||||
| @@ -40,25 +40,25 @@ class TestHeuristcs < Test::Unit::TestCase | ||||
|     match = Language.detect(blob) | ||||
|     assert_equal Language["Objective-C"], match | ||||
|   end | ||||
|    | ||||
|  | ||||
|   def test_pl_prolog_by_heuristics | ||||
|     languages = ["Perl", "Prolog"] | ||||
|     results = Heuristics.disambiguate_pl(fixture("Prolog/turing.pl"), languages) | ||||
|     assert_equal Language["Prolog"], results.first | ||||
|   end | ||||
|    | ||||
|  | ||||
|   def test_pl_perl_by_heuristics | ||||
|     languages = ["Perl", "Prolog"] | ||||
|     results = Heuristics.disambiguate_pl(fixture("Perl/perl-test.t"), languages) | ||||
|     assert_equal Language["Perl"], results.first | ||||
|   end | ||||
|    | ||||
|  | ||||
|   def test_ecl_prolog_by_heuristics | ||||
|     languages = ["ECL", "Prolog"] | ||||
|     results = Heuristics.disambiguate_ecl(fixture("Prolog/or-constraint.ecl"), languages) | ||||
|     assert_equal Language["Prolog"], results.first | ||||
|   end | ||||
|    | ||||
|  | ||||
|   def test_ecl_ecl_by_heuristics | ||||
|     languages = ["ECL", "Prolog"] | ||||
|     results = Heuristics.disambiguate_ecl(fixture("ECL/sample.ecl"), languages) | ||||
| @@ -77,6 +77,12 @@ class TestHeuristcs < Test::Unit::TestCase | ||||
|     assert_equal Language["IDL"], results.first | ||||
|   end | ||||
|  | ||||
|   def test_asc_asciidoc_by_heuristics | ||||
|     languages = ["AGS Script", "AsciiDoc"] | ||||
|     results = Heuristics.disambiguate_asc(fixture("AsciiDoc/list.asc"), languages) | ||||
|     assert_equal Language["AsciiDoc"], results.first | ||||
|   end | ||||
|  | ||||
|   def test_ts_typescript_by_heuristics | ||||
|     languages = ["TypeScript", "XML"] | ||||
|     results = Heuristics.disambiguate_ts(fixture("TypeScript/classes.ts"), languages) | ||||
| @@ -98,4 +104,22 @@ class TestHeuristcs < Test::Unit::TestCase | ||||
|       end | ||||
|     end | ||||
|   end | ||||
|  | ||||
|   def test_hack_by_heuristics | ||||
|     languages = ["Hack", "PHP"] | ||||
|     results = Heuristics.disambiguate_hack(fixture("Hack/funs.php"), languages) | ||||
|     assert_equal Language["Hack"], results.first | ||||
|   end | ||||
|  | ||||
|   def test_sc_supercollider_by_heuristics | ||||
|     languages = ["Scala", "SuperCollider"] | ||||
|     results = Heuristics.disambiguate_sc(fixture("SuperCollider/WarpPreset.sc"), languages) | ||||
|     assert_equal Language["SuperCollider"], results.first | ||||
|   end | ||||
|  | ||||
|   def test_sc_scala_by_heuristics | ||||
|     languages = ["Scala", "SuperCollider"] | ||||
|     results = Heuristics.disambiguate_sc(fixture("Scala/node11.sc"), languages) | ||||
|     assert_equal Language["Scala"], results.first | ||||
|   end | ||||
| end | ||||
|   | ||||
| @@ -241,6 +241,22 @@ class TestLanguage < Test::Unit::TestCase | ||||
|     end | ||||
|   end | ||||
|  | ||||
|   def test_find_by_extension | ||||
|     assert_equal [], Language.find_by_extension('.factor-rc') | ||||
|     assert_equal [], Language.find_by_extension('foo.rb') | ||||
|     assert_equal [Language['Ruby']], Language.find_by_extension('rb') | ||||
|     assert_equal [Language['Ruby']], Language.find_by_extension('.rb') | ||||
|     assert_equal [Language['M'], Language['Mathematica'], Language['Matlab'], Language['Mercury'], Language['Objective-C']], Language.find_by_extension('.m') | ||||
|   end | ||||
|  | ||||
|   def test_find_all_by_extension | ||||
|     Language.all.each do |language| | ||||
|       language.extensions.each do |extension| | ||||
|         assert_include Language.find_by_extension(extension), language | ||||
|       end | ||||
|     end | ||||
|   end | ||||
|  | ||||
|   def test_find_by_filename | ||||
|     assert_equal [Language['Shell']], Language.find_by_filename('PKGBUILD') | ||||
|     assert_equal [Language['Ruby']], Language.find_by_filename('foo.rb') | ||||
| @@ -303,6 +319,21 @@ class TestLanguage < Test::Unit::TestCase | ||||
|     assert_nil Language['defunkt'] | ||||
|   end | ||||
|  | ||||
|   def test_find_ignores_case | ||||
|     assert_equal 'AGS Script', Language['ags script'].name | ||||
|     assert_equal 'AGS Script', Language['ags sCRIPT'].name | ||||
|   end | ||||
|  | ||||
|   def test_find_by_name_ignores_case | ||||
|     assert_equal 'AGS Script', Language.find_by_name('ags script').name | ||||
|     assert_equal 'AGS Script', Language.find_by_name('ags sCRIPT').name | ||||
|   end | ||||
|  | ||||
|   def test_find_by_alias_ignores_case | ||||
|     refute_includes Language['AGS Script'].aliases, 'AGS' | ||||
|     assert_equal 'AGS Script', Language.find_by_alias('AGS').name | ||||
|   end | ||||
|  | ||||
|   def test_name | ||||
|     assert_equal 'Perl',   Language['Perl'].name | ||||
|     assert_equal 'Python', Language['Python'].name | ||||
|   | ||||
| @@ -16,11 +16,11 @@ class TestSamples < Test::Unit::TestCase | ||||
|       warn "Samples database is out of date. Run `bundle exec rake samples`." | ||||
|  | ||||
|       expected = Tempfile.new('expected.json') | ||||
|       expected.write Yajl::Encoder.encode(serialized, :pretty => true) | ||||
|       expected.write Yajl.dump(serialized, :pretty => true) | ||||
|       expected.close | ||||
|  | ||||
|       actual = Tempfile.new('actual.json') | ||||
|       actual.write Yajl::Encoder.encode(latest, :pretty => true) | ||||
|       actual.write Yajl.dump(latest, :pretty => true) | ||||
|       actual.close | ||||
|  | ||||
|       expected.unlink | ||||
|   | ||||
		Reference in New Issue
	
	Block a user