My Marlin configs for Fabrikator Mini and CTC i3 Pro B
Ви не можете вибрати більше 25 тем Теми мають розпочинатися з літери або цифри, можуть містити дефіси (-) і не повинні перевищувати 35 символів.

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603
  1. #include "Marlin.h"
  2. #include "cardreader.h"
  3. #include "ultralcd.h"
  4. #include "stepper.h"
  5. #include "temperature.h"
  6. #include "language.h"
  7. #if ENABLED(SDSUPPORT)
  8. CardReader::CardReader() {
  9. filesize = 0;
  10. sdpos = 0;
  11. sdprinting = false;
  12. cardOK = false;
  13. saving = false;
  14. logging = false;
  15. workDirDepth = 0;
  16. file_subcall_ctr = 0;
  17. memset(workDirParents, 0, sizeof(workDirParents));
  18. autostart_stilltocheck = true; //the SD start is delayed, because otherwise the serial cannot answer fast enough to make contact with the host software.
  19. autostart_index = 0;
  20. //power to SD reader
  21. #if SDPOWER > -1
  22. OUT_WRITE(SDPOWER, HIGH);
  23. #endif //SDPOWER
  24. next_autostart_ms = millis() + 5000;
  25. }
  26. char *createFilename(char *buffer, const dir_t &p) { //buffer > 12characters
  27. char *pos = buffer;
  28. for (uint8_t i = 0; i < 11; i++) {
  29. if (p.name[i] == ' ') continue;
  30. if (i == 8) *pos++ = '.';
  31. *pos++ = p.name[i];
  32. }
  33. *pos++ = 0;
  34. return buffer;
  35. }
  36. /**
  37. * Dive into a folder and recurse depth-first to perform a pre-set operation lsAction:
  38. * LS_Count - Add +1 to nrFiles for every file within the parent
  39. * LS_GetFilename - Get the filename of the file indexed by nrFiles
  40. * LS_SerialPrint - Print the full path of each file to serial output
  41. */
  42. void CardReader::lsDive(const char *prepend, SdFile parent, const char * const match/*=NULL*/) {
  43. dir_t p;
  44. uint8_t cnt = 0;
  45. // Read the next entry from a directory
  46. while (parent.readDir(p, longFilename) > 0) {
  47. // If the entry is a directory and the action is LS_SerialPrint
  48. if (DIR_IS_SUBDIR(&p) && lsAction != LS_Count && lsAction != LS_GetFilename) {
  49. // Get the short name for the item, which we know is a folder
  50. char lfilename[FILENAME_LENGTH];
  51. createFilename(lfilename, p);
  52. // Allocate enough stack space for the full path to a folder, trailing slash, and nul
  53. boolean prepend_is_empty = (prepend[0] == '\0');
  54. int len = (prepend_is_empty ? 1 : strlen(prepend)) + strlen(lfilename) + 1 + 1;
  55. char path[len];
  56. // Append the FOLDERNAME12/ to the passed string.
  57. // It contains the full path to the "parent" argument.
  58. // We now have the full path to the item in this folder.
  59. strcpy(path, prepend_is_empty ? "/" : prepend); // root slash if prepend is empty
  60. strcat(path, lfilename); // FILENAME_LENGTH-1 characters maximum
  61. strcat(path, "/"); // 1 character
  62. // Serial.print(path);
  63. // Get a new directory object using the full path
  64. // and dive recursively into it.
  65. SdFile dir;
  66. if (!dir.open(parent, lfilename, O_READ)) {
  67. if (lsAction == LS_SerialPrint) {
  68. SERIAL_ECHO_START;
  69. SERIAL_ECHOLN(MSG_SD_CANT_OPEN_SUBDIR);
  70. SERIAL_ECHOLN(lfilename);
  71. }
  72. }
  73. lsDive(path, dir);
  74. // close() is done automatically by destructor of SdFile
  75. }
  76. else {
  77. uint8_t pn0 = p.name[0];
  78. if (pn0 == DIR_NAME_FREE) break;
  79. if (pn0 == DIR_NAME_DELETED || pn0 == '.') continue;
  80. if (longFilename[0] == '.') continue;
  81. if (!DIR_IS_FILE_OR_SUBDIR(&p)) continue;
  82. filenameIsDir = DIR_IS_SUBDIR(&p);
  83. if (!filenameIsDir && (p.name[8] != 'G' || p.name[9] == '~')) continue;
  84. switch (lsAction) {
  85. case LS_Count:
  86. nrFiles++;
  87. break;
  88. case LS_SerialPrint:
  89. createFilename(filename, p);
  90. SERIAL_PROTOCOL(prepend);
  91. SERIAL_PROTOCOLLN(filename);
  92. break;
  93. case LS_GetFilename:
  94. createFilename(filename, p);
  95. if (match != NULL) {
  96. if (strcasecmp(match, filename) == 0) return;
  97. }
  98. else if (cnt == nrFiles) return;
  99. cnt++;
  100. break;
  101. }
  102. }
  103. } // while readDir
  104. }
  105. void CardReader::ls() {
  106. lsAction = LS_SerialPrint;
  107. root.rewind();
  108. lsDive("", root);
  109. }
  110. #if ENABLED(LONG_FILENAME_HOST_SUPPORT)
  111. /**
  112. * Get a long pretty path based on a DOS 8.3 path
  113. */
  114. void CardReader::printLongPath(char *path) {
  115. lsAction = LS_GetFilename;
  116. int i, pathLen = strlen(path);
  117. // SERIAL_ECHOPGM("Full Path: "); SERIAL_ECHOLN(path);
  118. // Zero out slashes to make segments
  119. for (i = 0; i < pathLen; i++) if (path[i] == '/') path[i] = '\0';
  120. SdFile diveDir = root; // start from the root for segment 1
  121. for (i = 0; i < pathLen;) {
  122. if (path[i] == '\0') i++; // move past a single nul
  123. char *segment = &path[i]; // The segment after most slashes
  124. // If a segment is empty (extra-slash) then exit
  125. if (!*segment) break;
  126. // Go to the next segment
  127. while (path[++i]) { }
  128. // SERIAL_ECHOPGM("Looking for segment: "); SERIAL_ECHOLN(segment);
  129. // Find the item, setting the long filename
  130. diveDir.rewind();
  131. lsDive("", diveDir, segment);
  132. // Print /LongNamePart to serial output
  133. SERIAL_PROTOCOLCHAR('/');
  134. SERIAL_PROTOCOL(longFilename[0] ? longFilename : "???");
  135. // If the filename was printed then that's it
  136. if (!filenameIsDir) break;
  137. // SERIAL_ECHOPGM("Opening dir: "); SERIAL_ECHOLN(segment);
  138. // Open the sub-item as the new dive parent
  139. SdFile dir;
  140. if (!dir.open(diveDir, segment, O_READ)) {
  141. SERIAL_EOL;
  142. SERIAL_ECHO_START;
  143. SERIAL_ECHOPGM(MSG_SD_CANT_OPEN_SUBDIR);
  144. SERIAL_ECHO(segment);
  145. break;
  146. }
  147. diveDir.close();
  148. diveDir = dir;
  149. } // while i<pathLen
  150. SERIAL_EOL;
  151. }
  152. #endif // LONG_FILENAME_HOST_SUPPORT
  153. void CardReader::initsd() {
  154. cardOK = false;
  155. if (root.isOpen()) root.close();
  156. #ifndef SPI_SPEED
  157. #define SPI_SPEED SPI_FULL_SPEED
  158. #endif
  159. if (!card.init(SPI_SPEED,SDSS)
  160. #if defined(LCD_SDSS) && (LCD_SDSS != SDSS)
  161. && !card.init(SPI_SPEED, LCD_SDSS)
  162. #endif
  163. ) {
  164. //if (!card.init(SPI_HALF_SPEED,SDSS))
  165. SERIAL_ECHO_START;
  166. SERIAL_ECHOLNPGM(MSG_SD_INIT_FAIL);
  167. }
  168. else if (!volume.init(&card)) {
  169. SERIAL_ERROR_START;
  170. SERIAL_ERRORLNPGM(MSG_SD_VOL_INIT_FAIL);
  171. }
  172. else if (!root.openRoot(&volume)) {
  173. SERIAL_ERROR_START;
  174. SERIAL_ERRORLNPGM(MSG_SD_OPENROOT_FAIL);
  175. }
  176. else {
  177. cardOK = true;
  178. SERIAL_ECHO_START;
  179. SERIAL_ECHOLNPGM(MSG_SD_CARD_OK);
  180. }
  181. workDir = root;
  182. curDir = &root;
  183. /*
  184. if (!workDir.openRoot(&volume)) {
  185. SERIAL_ECHOLNPGM(MSG_SD_WORKDIR_FAIL);
  186. }
  187. */
  188. }
  189. void CardReader::setroot() {
  190. /*if (!workDir.openRoot(&volume)) {
  191. SERIAL_ECHOLNPGM(MSG_SD_WORKDIR_FAIL);
  192. }*/
  193. workDir = root;
  194. curDir = &workDir;
  195. }
  196. void CardReader::release() {
  197. sdprinting = false;
  198. cardOK = false;
  199. }
  200. void CardReader::openAndPrintFile(const char *name) {
  201. char cmd[4 + (FILENAME_LENGTH + 1) * MAX_DIR_DEPTH + 2]; // Room for "M23 ", names with slashes, a null, and one extra
  202. sprintf_P(cmd, PSTR("M23 %s"), name);
  203. for (char *c = &cmd[4]; *c; c++) *c = tolower(*c);
  204. enqueue_and_echo_command(cmd);
  205. enqueue_and_echo_commands_P(PSTR("M24"));
  206. }
  207. void CardReader::startFileprint() {
  208. if (cardOK)
  209. sdprinting = true;
  210. }
  211. void CardReader::pauseSDPrint() {
  212. if (sdprinting) sdprinting = false;
  213. }
  214. void CardReader::openLogFile(char* name) {
  215. logging = true;
  216. openFile(name, false);
  217. }
  218. void CardReader::getAbsFilename(char *t) {
  219. uint8_t cnt = 0;
  220. *t = '/'; t++; cnt++;
  221. for (uint8_t i = 0; i < workDirDepth; i++) {
  222. workDirParents[i].getFilename(t); //SDBaseFile.getfilename!
  223. while (*t && cnt < MAXPATHNAMELENGTH) { t++; cnt++; } //crawl counter forward.
  224. }
  225. if (cnt < MAXPATHNAMELENGTH - (FILENAME_LENGTH))
  226. file.getFilename(t);
  227. else
  228. t[0] = 0;
  229. }
  230. void CardReader::openFile(char* name, bool read, bool replace_current/*=true*/) {
  231. if (!cardOK) return;
  232. if (file.isOpen()) { //replacing current file by new file, or subfile call
  233. if (!replace_current) {
  234. if (file_subcall_ctr > SD_PROCEDURE_DEPTH - 1) {
  235. SERIAL_ERROR_START;
  236. SERIAL_ERRORPGM("trying to call sub-gcode files with too many levels. MAX level is:");
  237. SERIAL_ERRORLN(SD_PROCEDURE_DEPTH);
  238. kill(PSTR(MSG_KILLED));
  239. return;
  240. }
  241. SERIAL_ECHO_START;
  242. SERIAL_ECHOPGM("SUBROUTINE CALL target:\"");
  243. SERIAL_ECHO(name);
  244. SERIAL_ECHOPGM("\" parent:\"");
  245. //store current filename and position
  246. getAbsFilename(filenames[file_subcall_ctr]);
  247. SERIAL_ECHO(filenames[file_subcall_ctr]);
  248. SERIAL_ECHOPGM("\" pos");
  249. SERIAL_ECHOLN(sdpos);
  250. filespos[file_subcall_ctr] = sdpos;
  251. file_subcall_ctr++;
  252. }
  253. else {
  254. SERIAL_ECHO_START;
  255. SERIAL_ECHOPGM("Now doing file: ");
  256. SERIAL_ECHOLN(name);
  257. }
  258. file.close();
  259. }
  260. else { //opening fresh file
  261. file_subcall_ctr = 0; //resetting procedure depth in case user cancels print while in procedure
  262. SERIAL_ECHO_START;
  263. SERIAL_ECHOPGM("Now fresh file: ");
  264. SERIAL_ECHOLN(name);
  265. }
  266. sdprinting = false;
  267. SdFile myDir;
  268. curDir = &root;
  269. char *fname = name;
  270. char *dirname_start, *dirname_end;
  271. if (name[0] == '/') {
  272. dirname_start = &name[1];
  273. while (dirname_start > 0) {
  274. dirname_end = strchr(dirname_start, '/');
  275. //SERIAL_ECHO("start:");SERIAL_ECHOLN((int)(dirname_start - name));
  276. //SERIAL_ECHO("end :");SERIAL_ECHOLN((int)(dirname_end - name));
  277. if (dirname_end > 0 && dirname_end > dirname_start) {
  278. char subdirname[FILENAME_LENGTH];
  279. strncpy(subdirname, dirname_start, dirname_end - dirname_start);
  280. subdirname[dirname_end - dirname_start] = 0;
  281. SERIAL_ECHOLN(subdirname);
  282. if (!myDir.open(curDir, subdirname, O_READ)) {
  283. SERIAL_PROTOCOLPGM(MSG_SD_OPEN_FILE_FAIL);
  284. SERIAL_PROTOCOL(subdirname);
  285. SERIAL_PROTOCOLCHAR('.');
  286. return;
  287. }
  288. else {
  289. //SERIAL_ECHOLN("dive ok");
  290. }
  291. curDir = &myDir;
  292. dirname_start = dirname_end + 1;
  293. }
  294. else { // the remainder after all /fsa/fdsa/ is the filename
  295. fname = dirname_start;
  296. //SERIAL_ECHOLN("remainder");
  297. //SERIAL_ECHOLN(fname);
  298. break;
  299. }
  300. }
  301. }
  302. else { //relative path
  303. curDir = &workDir;
  304. }
  305. if (read) {
  306. if (file.open(curDir, fname, O_READ)) {
  307. filesize = file.fileSize();
  308. SERIAL_PROTOCOLPGM(MSG_SD_FILE_OPENED);
  309. SERIAL_PROTOCOL(fname);
  310. SERIAL_PROTOCOLPGM(MSG_SD_SIZE);
  311. SERIAL_PROTOCOLLN(filesize);
  312. sdpos = 0;
  313. SERIAL_PROTOCOLLNPGM(MSG_SD_FILE_SELECTED);
  314. getfilename(0, fname);
  315. lcd_setstatus(longFilename[0] ? longFilename : fname);
  316. }
  317. else {
  318. SERIAL_PROTOCOLPGM(MSG_SD_OPEN_FILE_FAIL);
  319. SERIAL_PROTOCOL(fname);
  320. SERIAL_PROTOCOLPGM(".\n");
  321. }
  322. }
  323. else { //write
  324. if (!file.open(curDir, fname, O_CREAT | O_APPEND | O_WRITE | O_TRUNC)) {
  325. SERIAL_PROTOCOLPGM(MSG_SD_OPEN_FILE_FAIL);
  326. SERIAL_PROTOCOL(fname);
  327. SERIAL_PROTOCOLPGM(".\n");
  328. }
  329. else {
  330. saving = true;
  331. SERIAL_PROTOCOLPGM(MSG_SD_WRITE_TO_FILE);
  332. SERIAL_PROTOCOLLN(name);
  333. lcd_setstatus(fname);
  334. }
  335. }
  336. }
  337. void CardReader::removeFile(char* name) {
  338. if (!cardOK) return;
  339. file.close();
  340. sdprinting = false;
  341. SdFile myDir;
  342. curDir = &root;
  343. char *fname = name;
  344. char *dirname_start, *dirname_end;
  345. if (name[0] == '/') {
  346. dirname_start = strchr(name, '/') + 1;
  347. while (dirname_start > 0) {
  348. dirname_end = strchr(dirname_start, '/');
  349. //SERIAL_ECHO("start:");SERIAL_ECHOLN((int)(dirname_start - name));
  350. //SERIAL_ECHO("end :");SERIAL_ECHOLN((int)(dirname_end - name));
  351. if (dirname_end > 0 && dirname_end > dirname_start) {
  352. char subdirname[FILENAME_LENGTH];
  353. strncpy(subdirname, dirname_start, dirname_end - dirname_start);
  354. subdirname[dirname_end - dirname_start] = 0;
  355. SERIAL_ECHOLN(subdirname);
  356. if (!myDir.open(curDir, subdirname, O_READ)) {
  357. SERIAL_PROTOCOLPGM("open failed, File: ");
  358. SERIAL_PROTOCOL(subdirname);
  359. SERIAL_PROTOCOLCHAR('.');
  360. return;
  361. }
  362. else {
  363. //SERIAL_ECHOLN("dive ok");
  364. }
  365. curDir = &myDir;
  366. dirname_start = dirname_end + 1;
  367. }
  368. else { // the remainder after all /fsa/fdsa/ is the filename
  369. fname = dirname_start;
  370. //SERIAL_ECHOLN("remainder");
  371. //SERIAL_ECHOLN(fname);
  372. break;
  373. }
  374. }
  375. }
  376. else { // relative path
  377. curDir = &workDir;
  378. }
  379. if (file.remove(curDir, fname)) {
  380. SERIAL_PROTOCOLPGM("File deleted:");
  381. SERIAL_PROTOCOLLN(fname);
  382. sdpos = 0;
  383. }
  384. else {
  385. SERIAL_PROTOCOLPGM("Deletion failed, File: ");
  386. SERIAL_PROTOCOL(fname);
  387. SERIAL_PROTOCOLCHAR('.');
  388. }
  389. }
  390. void CardReader::getStatus() {
  391. if (cardOK) {
  392. SERIAL_PROTOCOLPGM(MSG_SD_PRINTING_BYTE);
  393. SERIAL_PROTOCOL(sdpos);
  394. SERIAL_PROTOCOLCHAR('/');
  395. SERIAL_PROTOCOLLN(filesize);
  396. }
  397. else {
  398. SERIAL_PROTOCOLLNPGM(MSG_SD_NOT_PRINTING);
  399. }
  400. }
  401. void CardReader::write_command(char *buf) {
  402. char* begin = buf;
  403. char* npos = 0;
  404. char* end = buf + strlen(buf) - 1;
  405. file.writeError = false;
  406. if ((npos = strchr(buf, 'N')) != NULL) {
  407. begin = strchr(npos, ' ') + 1;
  408. end = strchr(npos, '*') - 1;
  409. }
  410. end[1] = '\r';
  411. end[2] = '\n';
  412. end[3] = '\0';
  413. file.write(begin);
  414. if (file.writeError) {
  415. SERIAL_ERROR_START;
  416. SERIAL_ERRORLNPGM(MSG_SD_ERR_WRITE_TO_FILE);
  417. }
  418. }
  419. void CardReader::checkautostart(bool force) {
  420. if (!force && (!autostart_stilltocheck || next_autostart_ms < millis()))
  421. return;
  422. autostart_stilltocheck = false;
  423. if (!cardOK) {
  424. initsd();
  425. if (!cardOK) return; // fail
  426. }
  427. char autoname[10];
  428. sprintf_P(autoname, PSTR("auto%i.g"), autostart_index);
  429. for (int8_t i = 0; i < (int8_t)strlen(autoname); i++) autoname[i] = tolower(autoname[i]);
  430. dir_t p;
  431. root.rewind();
  432. bool found = false;
  433. while (root.readDir(p, NULL) > 0) {
  434. for (int8_t i = 0; i < (int8_t)strlen((char*)p.name); i++) p.name[i] = tolower(p.name[i]);
  435. if (p.name[9] != '~' && strncmp((char*)p.name, autoname, 5) == 0) {
  436. openAndPrintFile(autoname);
  437. found = true;
  438. }
  439. }
  440. if (!found)
  441. autostart_index = -1;
  442. else
  443. autostart_index++;
  444. }
  445. void CardReader::closefile(bool store_location) {
  446. file.sync();
  447. file.close();
  448. saving = logging = false;
  449. if (store_location) {
  450. //future: store printer state, filename and position for continuing a stopped print
  451. // so one can unplug the printer and continue printing the next day.
  452. }
  453. }
  454. /**
  455. * Get the name of a file in the current directory by index
  456. */
  457. void CardReader::getfilename(uint16_t nr, const char * const match/*=NULL*/) {
  458. curDir = &workDir;
  459. lsAction = LS_GetFilename;
  460. nrFiles = nr;
  461. curDir->rewind();
  462. lsDive("", *curDir, match);
  463. }
  464. uint16_t CardReader::getnrfilenames() {
  465. curDir = &workDir;
  466. lsAction = LS_Count;
  467. nrFiles = 0;
  468. curDir->rewind();
  469. lsDive("", *curDir);
  470. //SERIAL_ECHOLN(nrFiles);
  471. return nrFiles;
  472. }
  473. void CardReader::chdir(const char * relpath) {
  474. SdFile newfile;
  475. SdFile *parent = &root;
  476. if (workDir.isOpen()) parent = &workDir;
  477. if (!newfile.open(*parent, relpath, O_READ)) {
  478. SERIAL_ECHO_START;
  479. SERIAL_ECHOPGM(MSG_SD_CANT_ENTER_SUBDIR);
  480. SERIAL_ECHOLN(relpath);
  481. }
  482. else {
  483. if (workDirDepth < MAX_DIR_DEPTH) {
  484. ++workDirDepth;
  485. for (int d = workDirDepth; d--;) workDirParents[d + 1] = workDirParents[d];
  486. workDirParents[0] = *parent;
  487. }
  488. workDir = newfile;
  489. }
  490. }
  491. void CardReader::updir() {
  492. if (workDirDepth > 0) {
  493. --workDirDepth;
  494. workDir = workDirParents[0];
  495. for (uint16_t d = 0; d < workDirDepth; d++)
  496. workDirParents[d] = workDirParents[d+1];
  497. }
  498. }
  499. void CardReader::printingHasFinished() {
  500. st_synchronize();
  501. if (file_subcall_ctr > 0) { // Heading up to a parent file that called current as a procedure.
  502. file.close();
  503. file_subcall_ctr--;
  504. openFile(filenames[file_subcall_ctr], true, true);
  505. setIndex(filespos[file_subcall_ctr]);
  506. startFileprint();
  507. }
  508. else {
  509. file.close();
  510. sdprinting = false;
  511. if (SD_FINISHED_STEPPERRELEASE) {
  512. //finishAndDisableSteppers();
  513. enqueue_and_echo_commands_P(PSTR(SD_FINISHED_RELEASECOMMAND));
  514. }
  515. autotempShutdown();
  516. }
  517. }
  518. #endif //SDSUPPORT