cafe-grader-judge-scripts

Commit r129:0d09bc291a32 public

parent | child
Description:
fixed compiler for c++
Commit status:
[Not Reviewed]
References:
default
Diff options:
Raw Diff | Patch Diff | Download Diff | Show whitespace | Increase context
Comments:
0 Commit comments 0 Inline Comments
Unresolved TODOs:
There are no unresolved TODOs
Side by Side Unified
Expand All Files Collapse All Files Wide Mode Diff
Add another comment
Browse Files

r129:0d09bc291a32 - - 1 file changed: 1 inserted, 1 deleted

Show file before | Show file after | Raw diff | Download diff | Show whitespace Increase context Show commentsHide comments
@@ -13,118 +13,118
13 13
14 14 def talk(msg)
15 15 if ENV['TALKATIVE']!=nil
16 16 puts str
17 17 end
18 18
19 19 if ENV['GRADER_LOGGING']!=nil
20 20 log_fname = ENV['GRADER_LOGGING']
21 21 fp = File.open(log_fname,"a")
22 22 fp.puts("run: #{Time.new.strftime("%H:%M")} #{msg}")
23 23 fp.close
24 24 end
25 25 end
26 26
27 27 C_COMPILER = "gcc"
28 28 CPLUSPLUS_COMPILER = "g++"
29 29 PASCAL_COMPILER = "fpc"
30 30
31 31 C_OPTIONS = "-O2 -s -static -std=c99 -DCONTEST -lm -Wall"
32 32 CPLUSPLUS_OPTIONS = "-O2 -s -static -DCONTEST -lm -Wall"
33 33 PASCAL_OPTIONS = "-O1 -XS -dCONTEST"
34 34
35 35 # Check for the correct number of arguments. Otherwise, print usage.
36 36 if ARGV.length == 0 or ARGV.length > 4
37 37 puts "Usage: compile <language> [<source-file>] [<output-file>] [<message-file>]"
38 38 puts
39 39 puts "<source-file> is defaulted to \"source\"."
40 40 puts "<output-file> is defaulted to \"a.out\"."
41 41 puts "<message-file> is defaulted to \"compiler_message\"."
42 42 puts
43 43 exit(127)
44 44 end
45 45
46 46 PARAMS = {
47 47 :source_file => [1,'source'],
48 48 :output_file => [2,'a.out'],
49 49 :message_file => [3,'compiler_message']
50 50 }
51 51
52 52 params = {}
53 53 params[:prog_lang] = ARGV[0]
54 54 PARAMS.each_key do |param_name|
55 55 index, default = PARAMS[param_name]
56 56 if ARGV.length > index
57 57 params[param_name] = ARGV[index]
58 58 else
59 59 params[param_name] = default
60 60 end
61 61 talk "#{param_name}: #{params[param_name]}"
62 62 end
63 63
64 64 # Remove any remaining output files or message files.
65 65 if FileTest.exists? params[:output_file]
66 66 FileUtils.rm(params[:output_file])
67 67 end
68 68 if FileTest.exists? params[:message_file]
69 69 FileUtils.rm(params[:message_file])
70 70 end
71 71
72 72 # Check if the source file exists before attempt compiling.
73 73 if !FileTest.exists? params[:source_file]
74 74 talk("ERROR: The source file does not exist!")
75 75 open(params[:message_file],"w") do |f|
76 76 f.puts "ERROR: The source file did not exist."
77 77 end
78 78 exit(127)
79 79 end
80 80
81 81 if params[:prog_lang]=='cpp':
82 82 params[:prog_lang] = 'c++'
83 83 end
84 84
85 85 forbidden_functions = ['system', 'fopen', 'freopen', 'open', 'remove', 'rename']
86 86 redefine_list = []
87 87 forbidden_count = 0
88 88 forbidden_key = (rand(8999) + 1000).to_s
89 89 forbidden_functions.each do |f|
90 90 redefine_list << "-D#{f}=forbidden#{forbidden_key}#{forbidden_count}"
91 91 forbidden_count += 1
92 92 end
93 93 redefine_str = redefine_list.join ' '
94 94 puts redefine_str
95 95
96 96 # Compile.
97 97 case params[:prog_lang]
98 98
99 99 when "c"
100 100 command = "#{C_COMPILER} -E #{params[:source_file]} -o source_prep.c"
101 101 system(command)
102 102 command = "#{C_COMPILER} source_prep.c #{redefine_str} -o #{params[:output_file]} #{C_OPTIONS} 2> #{params[:message_file]}"
103 103 puts command
104 104 system(command)
105 105
106 106 when "c++"
107 107 command = "#{CPLUSPLUS_COMPILER} -E #{params[:source_file]} -o source_prep.cpp"
108 108 system(command)
109 - command = "#{CPLUSPLUS_COMPILER} #{redefine_str} #{params[:source_file]} -o #{params[:output_file]} #{CPLUSPLUS_OPTIONS} 2> #{params[:message_file]}"
109 + command = "#{CPLUSPLUS_COMPILER} #{redefine_str} source_prep.cpp -o #{params[:output_file]} #{CPLUSPLUS_OPTIONS} 2> #{params[:message_file]}"
110 110 system(command)
111 111
112 112 when "pas"
113 113 command = "#{PASCAL_COMPILER} #{params[:source_file]} -ooutpas #{PASCAL_OPTIONS} > #{params[:message_file]}"
114 114 system(command)
115 115 FileUtils.mv("output", params[:output_file])
116 116
117 117 else
118 118 talk("ERROR: Invalid language specified!")
119 119 open(params[:message_file],"w") do |f|
120 120 f.puts "ERROR: Invalid language specified!"
121 121 end
122 122 exit(127)
123 123 end
124 124
125 125 # Report success or failure.
126 126 if FileTest.exists? params[:output_file]
127 127 talk "Compilation was successful!"
128 128 else
129 129 talk "ERROR: Something was wrong during the compilation!"
130 130 end
You need to be logged in to leave comments. Login now