2 This file is part of Smoothie (http://smoothieware.org/). The motion control part is heavily based on Grbl (https://github.com/simen/grbl).
3 Smoothie is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation, either version 3 of the License, or (at your option) any later version.
4 Smoothie is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.
5 You should have received a copy of the GNU General Public License along with Smoothie. If not, see <http://www.gnu.org/licenses/>.
8 #include "libs/Kernel.h"
9 #include "libs/utils.h"
10 #include "system_LPC17xx.h"
19 volatile bool _isr_context
= false;
21 uint16_t get_checksum(const string
&to_check
)
23 return get_checksum(to_check
.c_str());
26 uint16_t get_checksum(const char *to_check
)
28 // From: http://en.wikipedia.org/wiki/Fletcher%27s_checksum
31 const char *p
= to_check
;
33 while((c
= *p
++) != 0) {
34 sum1
= (sum1
+ c
) % 255;
35 sum2
= (sum2
+ sum1
) % 255;
37 return (sum2
<< 8) | sum1
;
40 void get_checksums(uint16_t check_sums
[], const string
&key
)
42 check_sums
[0] = 0x0000;
43 check_sums
[1] = 0x0000;
44 check_sums
[2] = 0x0000;
46 unsigned int counter
= 0;
47 while( begin_key
< key
.size() && counter
< 3 ) {
48 size_t end_key
= key
.find_first_of(".", begin_key
);
50 if(end_key
== string::npos
) {
51 key_node
= key
.substr(begin_key
);
53 key_node
= key
.substr(begin_key
, end_key
- begin_key
);
56 check_sums
[counter
] = get_checksum(key_node
);
57 if(end_key
== string::npos
) break;
58 begin_key
= end_key
+ 1;
65 if ((c
>= 'a') && (c
<= 'z')) return true;
66 if ((c
>= 'A') && (c
<= 'Z')) return true;
67 if ((c
== '_')) return true;
73 if ((c
>= '0') && (c
<= '9')) return true;
77 bool is_numeric(int c
)
79 if (is_digit(c
)) return true;
80 if ((c
== '.') || (c
== '-')) return true;
81 if ((c
== 'e')) return true;
85 bool is_alphanum(int c
)
87 return is_alpha(c
) || is_numeric(c
);
90 bool is_whitespace(int c
)
92 if ((c
== ' ') || (c
== '\t')) return true;
96 // Convert to lowercase
97 string
lc(const string
&str
)
101 lcstr
.append(1, ::tolower(c
));
106 // Remove non-number characters
107 string
remove_non_number( string str
)
109 string number_mask
= "0123456789-.abcdefpxABCDEFPX";
110 size_t found
= str
.find_first_not_of(number_mask
);
111 while (found
!= string::npos
) {
113 str
.replace(found
, 1, "");
114 found
= str
.find_first_not_of(number_mask
);
119 // Get the first parameter, and remove it from the original string
120 string
shift_parameter( string
¶meters
)
122 size_t beginning
= parameters
.find_first_of(" ");
123 if( beginning
== string::npos
) {
124 string temp
= parameters
;
128 string temp
= parameters
.substr( 0, beginning
);
129 parameters
= parameters
.substr(beginning
+ 1, parameters
.size());
133 // Separate command from arguments
134 string
get_arguments( string possible_command
)
136 size_t beginning
= possible_command
.find_first_of(" ");
137 if( beginning
== string::npos
) {
140 return possible_command
.substr( beginning
+ 1, possible_command
.size() - beginning
+ 1);
143 // Returns true if the file exists
144 bool file_exists( const string file_name
)
147 FILE *lp
= fopen(file_name
.c_str(), "r");
155 // Prepares and executes a watchdog reset for dfu or reboot
156 void system_reset( bool dfu
)
159 LPC_WDT
->WDCLKSEL
= 0x1; // Set CLK src to PCLK
160 uint32_t clk
= SystemCoreClock
/ 16; // WD has a fixed /4 prescaler, PCLK default is /4
161 LPC_WDT
->WDTC
= 1 * (float)clk
; // Reset in 1 second
162 LPC_WDT
->WDMOD
= 0x3; // Enabled and Reset
163 LPC_WDT
->WDFEED
= 0xAA; // Kick the dog!
164 LPC_WDT
->WDFEED
= 0x55;
170 // Convert a path indication ( absolute or relative ) into a path ( absolute )
171 string
absolute_from_relative( string path
)
173 string cwd
= THEKERNEL
->current_path
;
175 if ( path
.empty() ) {
176 return THEKERNEL
->current_path
;
179 if ( path
[0] == '/' ) {
183 while ( path
.substr(0, 3) == "../" ) {
184 path
= path
.substr(3);
185 unsigned found
= cwd
.find_last_of("/");
186 cwd
= cwd
.substr(0, found
);
189 if ( path
.substr(0, 2) == ".." ) {
190 path
= path
.substr(2);
191 unsigned found
= cwd
.find_last_of("/");
192 cwd
= cwd
.substr(0, found
);
195 if ( cwd
[cwd
.length() - 1] == '/' ) {
199 return cwd
+ '/' + path
;