My Marlin configs for Fabrikator Mini and CTC i3 Pro B
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602
  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. char 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. #if ENABLED(SDEXTRASLOW)
  157. #define SPI_SPEED SPI_QUARTER_SPEED
  158. #elif ENABLED(SDSLOW)
  159. #define SPI_SPEED SPI_HALF_SPEED
  160. #else
  161. #define SPI_SPEED SPI_FULL_SPEED
  162. #endif
  163. if (!card.init(SPI_SPEED,SDSS)
  164. #if defined(LCD_SDSS) && (LCD_SDSS != SDSS)
  165. && !card.init(SPI_SPEED, LCD_SDSS)
  166. #endif
  167. ) {
  168. //if (!card.init(SPI_HALF_SPEED,SDSS))
  169. SERIAL_ECHO_START;
  170. SERIAL_ECHOLNPGM(MSG_SD_INIT_FAIL);
  171. }
  172. else if (!volume.init(&card)) {
  173. SERIAL_ERROR_START;
  174. SERIAL_ERRORLNPGM(MSG_SD_VOL_INIT_FAIL);
  175. }
  176. else if (!root.openRoot(&volume)) {
  177. SERIAL_ERROR_START;
  178. SERIAL_ERRORLNPGM(MSG_SD_OPENROOT_FAIL);
  179. }
  180. else {
  181. cardOK = true;
  182. SERIAL_ECHO_START;
  183. SERIAL_ECHOLNPGM(MSG_SD_CARD_OK);
  184. }
  185. workDir = root;
  186. curDir = &root;
  187. /*
  188. if (!workDir.openRoot(&volume)) {
  189. SERIAL_ECHOLNPGM(MSG_SD_WORKDIR_FAIL);
  190. }
  191. */
  192. }
  193. void CardReader::setroot() {
  194. /*if (!workDir.openRoot(&volume)) {
  195. SERIAL_ECHOLNPGM(MSG_SD_WORKDIR_FAIL);
  196. }*/
  197. workDir = root;
  198. curDir = &workDir;
  199. }
  200. void CardReader::release() {
  201. sdprinting = false;
  202. cardOK = false;
  203. }
  204. void CardReader::startFileprint() {
  205. if (cardOK)
  206. sdprinting = true;
  207. }
  208. void CardReader::pauseSDPrint() {
  209. if (sdprinting) sdprinting = false;
  210. }
  211. void CardReader::openLogFile(char* name) {
  212. logging = true;
  213. openFile(name, false);
  214. }
  215. void CardReader::getAbsFilename(char *t) {
  216. uint8_t cnt = 0;
  217. *t = '/'; t++; cnt++;
  218. for (uint8_t i = 0; i < workDirDepth; i++) {
  219. workDirParents[i].getFilename(t); //SDBaseFile.getfilename!
  220. while (*t && cnt < MAXPATHNAMELENGTH) { t++; cnt++; } //crawl counter forward.
  221. }
  222. if (cnt < MAXPATHNAMELENGTH - FILENAME_LENGTH)
  223. file.getFilename(t);
  224. else
  225. t[0] = 0;
  226. }
  227. void CardReader::openFile(char* name, bool read, bool replace_current/*=true*/) {
  228. if (!cardOK) return;
  229. if (file.isOpen()) { //replacing current file by new file, or subfile call
  230. if (!replace_current) {
  231. if (file_subcall_ctr > SD_PROCEDURE_DEPTH - 1) {
  232. SERIAL_ERROR_START;
  233. SERIAL_ERRORPGM("trying to call sub-gcode files with too many levels. MAX level is:");
  234. SERIAL_ERRORLN(SD_PROCEDURE_DEPTH);
  235. kill(PSTR(MSG_KILLED));
  236. return;
  237. }
  238. SERIAL_ECHO_START;
  239. SERIAL_ECHOPGM("SUBROUTINE CALL target:\"");
  240. SERIAL_ECHO(name);
  241. SERIAL_ECHOPGM("\" parent:\"");
  242. //store current filename and position
  243. getAbsFilename(filenames[file_subcall_ctr]);
  244. SERIAL_ECHO(filenames[file_subcall_ctr]);
  245. SERIAL_ECHOPGM("\" pos");
  246. SERIAL_ECHOLN(sdpos);
  247. filespos[file_subcall_ctr] = sdpos;
  248. file_subcall_ctr++;
  249. }
  250. else {
  251. SERIAL_ECHO_START;
  252. SERIAL_ECHOPGM("Now doing file: ");
  253. SERIAL_ECHOLN(name);
  254. }
  255. file.close();
  256. }
  257. else { //opening fresh file
  258. file_subcall_ctr = 0; //resetting procedure depth in case user cancels print while in procedure
  259. SERIAL_ECHO_START;
  260. SERIAL_ECHOPGM("Now fresh file: ");
  261. SERIAL_ECHOLN(name);
  262. }
  263. sdprinting = false;
  264. SdFile myDir;
  265. curDir = &root;
  266. char *fname = name;
  267. char *dirname_start, *dirname_end;
  268. if (name[0] == '/') {
  269. dirname_start = &name[1];
  270. while (dirname_start > 0) {
  271. dirname_end = strchr(dirname_start, '/');
  272. //SERIAL_ECHO("start:");SERIAL_ECHOLN((int)(dirname_start - name));
  273. //SERIAL_ECHO("end :");SERIAL_ECHOLN((int)(dirname_end - name));
  274. if (dirname_end > 0 && dirname_end > dirname_start) {
  275. char subdirname[FILENAME_LENGTH];
  276. strncpy(subdirname, dirname_start, dirname_end - dirname_start);
  277. subdirname[dirname_end - dirname_start] = 0;
  278. SERIAL_ECHOLN(subdirname);
  279. if (!myDir.open(curDir, subdirname, O_READ)) {
  280. SERIAL_PROTOCOLPGM(MSG_SD_OPEN_FILE_FAIL);
  281. SERIAL_PROTOCOL(subdirname);
  282. SERIAL_PROTOCOLCHAR('.');
  283. return;
  284. }
  285. else {
  286. //SERIAL_ECHOLN("dive ok");
  287. }
  288. curDir = &myDir;
  289. dirname_start = dirname_end + 1;
  290. }
  291. else { // the remainder after all /fsa/fdsa/ is the filename
  292. fname = dirname_start;
  293. //SERIAL_ECHOLN("remainder");
  294. //SERIAL_ECHOLN(fname);
  295. break;
  296. }
  297. }
  298. }
  299. else { //relative path
  300. curDir = &workDir;
  301. }
  302. if (read) {
  303. if (file.open(curDir, fname, O_READ)) {
  304. filesize = file.fileSize();
  305. SERIAL_PROTOCOLPGM(MSG_SD_FILE_OPENED);
  306. SERIAL_PROTOCOL(fname);
  307. SERIAL_PROTOCOLPGM(MSG_SD_SIZE);
  308. SERIAL_PROTOCOLLN(filesize);
  309. sdpos = 0;
  310. SERIAL_PROTOCOLLNPGM(MSG_SD_FILE_SELECTED);
  311. getfilename(0, fname);
  312. lcd_setstatus(longFilename[0] ? longFilename : fname);
  313. }
  314. else {
  315. SERIAL_PROTOCOLPGM(MSG_SD_OPEN_FILE_FAIL);
  316. SERIAL_PROTOCOL(fname);
  317. SERIAL_PROTOCOLPGM(".\n");
  318. }
  319. }
  320. else { //write
  321. if (!file.open(curDir, fname, O_CREAT | O_APPEND | O_WRITE | O_TRUNC)) {
  322. SERIAL_PROTOCOLPGM(MSG_SD_OPEN_FILE_FAIL);
  323. SERIAL_PROTOCOL(fname);
  324. SERIAL_PROTOCOLPGM(".\n");
  325. }
  326. else {
  327. saving = true;
  328. SERIAL_PROTOCOLPGM(MSG_SD_WRITE_TO_FILE);
  329. SERIAL_PROTOCOLLN(name);
  330. lcd_setstatus(fname);
  331. }
  332. }
  333. }
  334. void CardReader::removeFile(char* name) {
  335. if (!cardOK) return;
  336. file.close();
  337. sdprinting = false;
  338. SdFile myDir;
  339. curDir = &root;
  340. char *fname = name;
  341. char *dirname_start, *dirname_end;
  342. if (name[0] == '/') {
  343. dirname_start = strchr(name, '/') + 1;
  344. while (dirname_start > 0) {
  345. dirname_end = strchr(dirname_start, '/');
  346. //SERIAL_ECHO("start:");SERIAL_ECHOLN((int)(dirname_start - name));
  347. //SERIAL_ECHO("end :");SERIAL_ECHOLN((int)(dirname_end - name));
  348. if (dirname_end > 0 && dirname_end > dirname_start) {
  349. char subdirname[FILENAME_LENGTH];
  350. strncpy(subdirname, dirname_start, dirname_end - dirname_start);
  351. subdirname[dirname_end - dirname_start] = 0;
  352. SERIAL_ECHOLN(subdirname);
  353. if (!myDir.open(curDir, subdirname, O_READ)) {
  354. SERIAL_PROTOCOLPGM("open failed, File: ");
  355. SERIAL_PROTOCOL(subdirname);
  356. SERIAL_PROTOCOLCHAR('.');
  357. return;
  358. }
  359. else {
  360. //SERIAL_ECHOLN("dive ok");
  361. }
  362. curDir = &myDir;
  363. dirname_start = dirname_end + 1;
  364. }
  365. else { // the remainder after all /fsa/fdsa/ is the filename
  366. fname = dirname_start;
  367. //SERIAL_ECHOLN("remainder");
  368. //SERIAL_ECHOLN(fname);
  369. break;
  370. }
  371. }
  372. }
  373. else { // relative path
  374. curDir = &workDir;
  375. }
  376. if (file.remove(curDir, fname)) {
  377. SERIAL_PROTOCOLPGM("File deleted:");
  378. SERIAL_PROTOCOLLN(fname);
  379. sdpos = 0;
  380. }
  381. else {
  382. SERIAL_PROTOCOLPGM("Deletion failed, File: ");
  383. SERIAL_PROTOCOL(fname);
  384. SERIAL_PROTOCOLCHAR('.');
  385. }
  386. }
  387. void CardReader::getStatus() {
  388. if (cardOK) {
  389. SERIAL_PROTOCOLPGM(MSG_SD_PRINTING_BYTE);
  390. SERIAL_PROTOCOL(sdpos);
  391. SERIAL_PROTOCOLCHAR('/');
  392. SERIAL_PROTOCOLLN(filesize);
  393. }
  394. else {
  395. SERIAL_PROTOCOLLNPGM(MSG_SD_NOT_PRINTING);
  396. }
  397. }
  398. void CardReader::write_command(char *buf) {
  399. char* begin = buf;
  400. char* npos = 0;
  401. char* end = buf + strlen(buf) - 1;
  402. file.writeError = false;
  403. if ((npos = strchr(buf, 'N')) != NULL) {
  404. begin = strchr(npos, ' ') + 1;
  405. end = strchr(npos, '*') - 1;
  406. }
  407. end[1] = '\r';
  408. end[2] = '\n';
  409. end[3] = '\0';
  410. file.write(begin);
  411. if (file.writeError) {
  412. SERIAL_ERROR_START;
  413. SERIAL_ERRORLNPGM(MSG_SD_ERR_WRITE_TO_FILE);
  414. }
  415. }
  416. void CardReader::checkautostart(bool force) {
  417. if (!force && (!autostart_stilltocheck || next_autostart_ms < millis()))
  418. return;
  419. autostart_stilltocheck = false;
  420. if (!cardOK) {
  421. initsd();
  422. if (!cardOK) return; // fail
  423. }
  424. char autoname[10];
  425. sprintf_P(autoname, PSTR("auto%i.g"), autostart_index);
  426. for (int8_t i = 0; i < (int8_t)strlen(autoname); i++) autoname[i] = tolower(autoname[i]);
  427. dir_t p;
  428. root.rewind();
  429. bool found = false;
  430. while (root.readDir(p, NULL) > 0) {
  431. for (int8_t i = 0; i < (int8_t)strlen((char*)p.name); i++) p.name[i] = tolower(p.name[i]);
  432. if (p.name[9] != '~' && strncmp((char*)p.name, autoname, 5) == 0) {
  433. char cmd[4 + (FILENAME_LENGTH + 1) * MAX_DIR_DEPTH + 2];
  434. sprintf_P(cmd, PSTR("M23 %s"), autoname);
  435. enqueuecommand(cmd);
  436. enqueuecommands_P(PSTR("M24"));
  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. enqueuecommands_P(PSTR(SD_FINISHED_RELEASECOMMAND));
  514. }
  515. autotempShutdown();
  516. }
  517. }
  518. #endif //SDSUPPORT