1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108 |
- #include "Marlin.h"
- #include "cmdqueue.h"
- #include "cardreader.h"
- #include "ultralcd.h"
- #include "stepper.h"
- #include "temperature.h"
- #include "language.h"
- #ifdef SDSUPPORT
- #define LONGEST_FILENAME (longFilename[0] ? longFilename : filename)
- CardReader::CardReader()
- {
- #ifdef SDCARD_SORT_ALPHA
- sort_count = 0;
- #endif
- filesize = 0;
- sdpos = 0;
- sdprinting = false;
- cardOK = false;
- saving = false;
- logging = false;
- autostart_atmillis=0;
- workDirDepth = 0;
- file_subcall_ctr=0;
- memset(workDirParents, 0, sizeof(workDirParents));
- presort_flag = false;
- autostart_stilltocheck=true; //the SD start is delayed, because otherwise the serial cannot answer fast enough to make contact with the host software.
- lastnr=0;
- //power to SD reader
- #if SDPOWER > -1
- SET_OUTPUT(SDPOWER);
- WRITE(SDPOWER,HIGH);
- #endif //SDPOWER
-
- autostart_atmillis=_millis()+5000;
- }
- char *createFilename(char *buffer,const dir_t &p) //buffer>12characters
- {
- char *pos=buffer;
- for (uint8_t i = 0; i < 11; i++)
- {
- if (p.name[i] == ' ')continue;
- if (i == 8)
- {
- *pos++='.';
- }
- *pos++=p.name[i];
- }
- *pos++=0;
- return buffer;
- }
- /**
- +* Dive into a folder and recurse depth-first to perform a pre-set operation lsAction:
- +* LS_Count - Add +1 to nrFiles for every file within the parent
- +* LS_GetFilename - Get the filename of the file indexed by nrFiles
- +* LS_SerialPrint - Print the full path and size of each file to serial output
- +* LS_SerialPrint_LFN - Print the full path, long filename and size of each file to serial output
- +*/
- void CardReader::lsDive(const char *prepend, SdFile parent, const char * const match/*=NULL*/) {
- static uint8_t recursionCnt = 0;
- // RAII incrementer for the recursionCnt
- class _incrementer
- {
- public:
- _incrementer() {recursionCnt++;}
- ~_incrementer() {recursionCnt--;}
- } recursionCntIncrementer;
-
- dir_t p;
- uint8_t cnt = 0;
- // Read the next entry from a directory
- for (position = parent.curPosition(); parent.readDir(p, longFilename) > 0; position = parent.curPosition()) {
- if (recursionCnt > MAX_DIR_DEPTH)
- return;
- else if (DIR_IS_SUBDIR(&p) && lsAction != LS_Count && lsAction != LS_GetFilename) { // If the entry is a directory and the action is LS_SerialPrint
-
- // Get the short name for the item, which we know is a folder
- char lfilename[FILENAME_LENGTH];
- createFilename(lfilename, p);
- // Allocate enough stack space for the full path to a folder, trailing slash, and nul
- bool prepend_is_empty = (prepend[0] == '\0');
- int len = (prepend_is_empty ? 1 : strlen(prepend)) + strlen(lfilename) + 1 + 1;
- char path[len];
- // Append the FOLDERNAME12/ to the passed string.
- // It contains the full path to the "parent" argument.
- // We now have the full path to the item in this folder.
- strcpy(path, prepend_is_empty ? "/" : prepend); // root slash if prepend is empty
- strcat(path, lfilename); // FILENAME_LENGTH-1 characters maximum
- strcat(path, "/"); // 1 character
- // Serial.print(path);
- // Get a new directory object using the full path
- // and dive recursively into it.
-
- if (lsAction == LS_SerialPrint_LFN)
- printf_P(PSTR("DIR_ENTER: %s \"%s\"\n"), path, longFilename[0] ? longFilename : lfilename);
-
- SdFile dir;
- if (!dir.open(parent, lfilename, O_READ)) {
- if (lsAction == LS_SerialPrint || lsAction == LS_SerialPrint_LFN) {
- //SERIAL_ECHO_START();
- //SERIAL_ECHOPGM(_i("Cannot open subdir"));////MSG_SD_CANT_OPEN_SUBDIR
- //SERIAL_ECHOLN(lfilename);
- }
- }
- lsDive(path, dir);
- // close() is done automatically by destructor of SdFile
-
- if (lsAction == LS_SerialPrint_LFN)
- puts_P(PSTR("DIR_EXIT"));
- }
- else {
- uint8_t pn0 = p.name[0];
- if (pn0 == DIR_NAME_FREE) break;
- if (pn0 == DIR_NAME_DELETED || pn0 == '.') continue;
- if (longFilename[0] == '.') continue;
- if (!DIR_IS_FILE_OR_SUBDIR(&p) || (p.attributes & DIR_ATT_HIDDEN)) continue;
- filenameIsDir = DIR_IS_SUBDIR(&p);
- if (!filenameIsDir && (p.name[8] != 'G' || p.name[9] == '~')) continue;
- switch (lsAction) {
- case LS_Count:
- nrFiles++;
- break;
-
- case LS_SerialPrint_LFN:
- case LS_SerialPrint:
- createFilename(filename, p);
- SERIAL_PROTOCOL(prepend);
- SERIAL_PROTOCOL(filename);
- MYSERIAL.write(' ');
-
- if (lsAction == LS_SerialPrint_LFN)
- printf_P(PSTR("\"%s\" "), LONGEST_FILENAME);
-
- SERIAL_PROTOCOLLN(p.fileSize);
- manage_heater();
- break;
-
- case LS_GetFilename:
- //SERIAL_ECHOPGM("File: ");
- createFilename(filename, p);
- // cluster = parent.curCluster();
- // position = parent.curPosition();
- /*MYSERIAL.println(filename);
- SERIAL_ECHOPGM("Write date: ");
- writeDate = p.lastWriteDate;
- MYSERIAL.println(writeDate);
- writeTime = p.lastWriteTime;
- SERIAL_ECHOPGM("Creation date: ");
- MYSERIAL.println(p.creationDate);
- SERIAL_ECHOPGM("Access date: ");
- MYSERIAL.println(p.lastAccessDate);
- SERIAL_ECHOLNPGM("");*/
- crmodDate = p.lastWriteDate;
- crmodTime = p.lastWriteTime;
- // There are scenarios when simple modification time is not enough (on MS Windows)
- // For example - extract an old g-code from an archive onto the SD card.
- // In such case the creation time is current time (which is correct), but the modification time
- // stays the same - i.e. old.
- // Therefore let's pick the most recent timestamp from both creation and modification timestamps
- if( crmodDate < p.creationDate || ( crmodDate == p.creationDate && crmodTime < p.creationTime ) ){
- crmodDate = p.creationDate;
- crmodTime = p.creationTime;
- }
- //writeDate = p.lastAccessDate;
- if (match != NULL) {
- if (strcasecmp(match, filename) == 0) return;
- }
- else if (cnt == nrFiles) return;
- cnt++;
- break;
- }
- }
- } // while readDir
- }
- void CardReader::ls(bool printLFN)
- {
- lsAction = printLFN ? LS_SerialPrint_LFN : LS_SerialPrint;
- //if(lsAction==LS_Count)
- //nrFiles=0;
- root.rewind();
- lsDive("",root);
- }
- void CardReader::initsd()
- {
- cardOK = false;
- if(root.isOpen())
- root.close();
- #ifdef SDSLOW
- if (!card.init(SPI_HALF_SPEED,SDSS)
- #if defined(LCD_SDSS) && (LCD_SDSS != SDSS)
- && !card.init(SPI_HALF_SPEED,LCD_SDSS)
- #endif
- )
- #else
- if (!card.init(SPI_FULL_SPEED,SDSS)
- #if defined(LCD_SDSS) && (LCD_SDSS != SDSS)
- && !card.init(SPI_FULL_SPEED,LCD_SDSS)
- #endif
- )
- #endif
- {
- //if (!card.init(SPI_HALF_SPEED,SDSS))
- SERIAL_ECHO_START;
- SERIAL_ECHOLNRPGM(_n("SD init fail"));////MSG_SD_INIT_FAIL
- }
- else if (!volume.init(&card))
- {
- SERIAL_ERROR_START;
- SERIAL_ERRORLNRPGM(_n("volume.init failed"));////MSG_SD_VOL_INIT_FAIL
- }
- else if (!root.openRoot(&volume))
- {
- SERIAL_ERROR_START;
- SERIAL_ERRORLNRPGM(_n("openRoot failed"));////MSG_SD_OPENROOT_FAIL
- }
- else
- {
- cardOK = true;
- SERIAL_ECHO_START;
- SERIAL_ECHOLNRPGM(_n("SD card ok"));////MSG_SD_CARD_OK
- }
- workDir=root;
- curDir=&root;
- workDirDepth = 0;
- #ifdef SDCARD_SORT_ALPHA
- presort();
- #endif
- /*
- if(!workDir.openRoot(&volume))
- {
- SERIAL_ECHOLNPGM(MSG_SD_WORKDIR_FAIL);
- }
- */
-
- }
- void CardReader::setroot(bool doPresort)
- {
- workDir=root;
- workDirDepth = 0;
-
- curDir=&workDir;
- #ifdef SDCARD_SORT_ALPHA
- if (doPresort)
- presort();
- else
- presort_flag = true;
- #endif
- }
- void CardReader::release()
- {
- sdprinting = false;
- cardOK = false;
- SERIAL_ECHO_START;
- SERIAL_ECHOLNRPGM(_n("SD card released"));////MSG_SD_CARD_RELEASED
- }
- void CardReader::startFileprint()
- {
- if(cardOK)
- {
- sdprinting = true;
- Stopped = false;
- #ifdef SDCARD_SORT_ALPHA
- //flush_presort();
- #endif
- }
- }
- void CardReader::openLogFile(const char* name)
- {
- logging = true;
- openFileWrite(name);
- }
- void CardReader::getDirName(char* name, uint8_t level)
- {
- workDirParents[level].getFilename(name);
- }
- uint16_t CardReader::getWorkDirDepth() {
- return workDirDepth;
- }
- void CardReader::getAbsFilename(char *t)
- {
- uint8_t cnt=0;
- *t='/';t++;cnt++;
- for(uint8_t i=0;i<workDirDepth;i++)
- {
- workDirParents[i].getFilename(t); //SDBaseFile.getfilename!
- while(*t!=0 && cnt< MAXPATHNAMELENGTH)
- {t++;cnt++;} //crawl counter forward.
- }
- if(cnt<MAXPATHNAMELENGTH-13)
- file.getFilename(t);
- else
- t[0]=0;
- }
- void CardReader::printAbsFilenameFast()
- {
- SERIAL_PROTOCOL('/');
- for (uint8_t i = 0; i < getWorkDirDepth(); i++)
- {
- SERIAL_PROTOCOL(dir_names[i]);
- SERIAL_PROTOCOL('/');
- }
- SERIAL_PROTOCOL(LONGEST_FILENAME);
- }
- /**
- * @brief Dive into subfolder
- *
- * Method sets curDir to point to root, in case fileName is null.
- * Method sets curDir to point to workDir, in case fileName path is relative
- * (doesn't start with '/')
- * Method sets curDir to point to dir, which is specified by absolute path
- * specified by fileName. In such case fileName is updated so it points to
- * file name without the path.
- *
- * @param[in,out] fileName
- * expects file name including path
- * in case of absolute path, file name without path is returned
- */
- bool CardReader::diveSubfolder (const char *&fileName)
- {
- curDir=&root;
- if (!fileName)
- return 1;
- const char *dirname_start, *dirname_end;
- if (fileName[0] == '/') // absolute path
- {
- setroot(false);
- dirname_start = fileName + 1;
- while (*dirname_start)
- {
- dirname_end = strchr(dirname_start, '/');
- //SERIAL_ECHO("start:");SERIAL_ECHOLN((int)(dirname_start-name));
- //SERIAL_ECHO("end :");SERIAL_ECHOLN((int)(dirname_end-name));
- if (dirname_end && dirname_end > dirname_start)
- {
- const size_t maxLen = 12;
- char subdirname[maxLen+1];
- const size_t len = ((static_cast<size_t>(dirname_end-dirname_start))>maxLen) ? maxLen : (dirname_end-dirname_start);
- strncpy(subdirname, dirname_start, len);
- subdirname[len] = 0;
- if (!chdir(subdirname, false))
- return 0;
- curDir = &workDir;
- dirname_start = dirname_end + 1;
- }
- else // the reminder after all /fsa/fdsa/ is the filename
- {
- fileName = dirname_start;
- //SERIAL_ECHOLN("remaider");
- //SERIAL_ECHOLN(fname);
- break;
- }
- }
- }
- else //relative path
- {
- curDir = &workDir;
- }
- return 1;
- }
- static const char ofKill[] PROGMEM = "trying to call sub-gcode files with too many levels.";
- static const char ofSubroutineCallTgt[] PROGMEM = "SUBROUTINE CALL target:\"";
- static const char ofParent[] PROGMEM = "\" parent:\"";
- static const char ofPos[] PROGMEM = "\" pos";
- static const char ofNowDoingFile[] PROGMEM = "Now doing file: ";
- static const char ofNowFreshFile[] PROGMEM = "Now fresh file: ";
- static const char ofFileOpened[] PROGMEM = "File opened: ";
- static const char ofSize[] PROGMEM = " Size: ";
- static const char ofFileSelected[] PROGMEM = "File selected";
- static const char ofSDPrinting[] PROGMEM = "SD-PRINTING";
- static const char ofWritingToFile[] PROGMEM = "Writing to file: ";
- void CardReader::openFileReadFilteredGcode(const char* name, bool replace_current/* = false*/){
- if(!cardOK)
- return;
-
- if(file.isOpen()){ //replacing current file by new file, or subfile call
- if(!replace_current){
- if((int)file_subcall_ctr>(int)SD_PROCEDURE_DEPTH-1){
- // SERIAL_ERROR_START;
- // SERIAL_ERRORPGM("trying to call sub-gcode files with too many levels. MAX level is:");
- // SERIAL_ERRORLN(SD_PROCEDURE_DEPTH);
- kill(ofKill, 1);
- return;
- }
-
- SERIAL_ECHO_START;
- SERIAL_ECHORPGM(ofSubroutineCallTgt);
- SERIAL_ECHO(name);
- SERIAL_ECHORPGM(ofParent);
-
- //store current filename and position
- getAbsFilename(filenames[file_subcall_ctr]);
-
- SERIAL_ECHO(filenames[file_subcall_ctr]);
- SERIAL_ECHORPGM(ofPos);
- SERIAL_ECHOLN(sdpos);
- filespos[file_subcall_ctr]=sdpos;
- file_subcall_ctr++;
- } else {
- SERIAL_ECHO_START;
- SERIAL_ECHORPGM(ofNowDoingFile);
- SERIAL_ECHOLN(name);
- }
- file.close();
- } else { //opening fresh file
- file_subcall_ctr=0; //resetting procedure depth in case user cancels print while in procedure
- SERIAL_ECHO_START;
- SERIAL_ECHORPGM(ofNowFreshFile);
- SERIAL_ECHOLN(name);
- }
- sdprinting = false;
-
- const char *fname=name;
- if (!diveSubfolder(fname))
- return;
-
- if (file.openFilteredGcode(curDir, fname)) {
- getfilename(0, fname);
- filesize = file.fileSize();
- SERIAL_PROTOCOLRPGM(ofFileOpened);////MSG_SD_FILE_OPENED
- printAbsFilenameFast();
- SERIAL_PROTOCOLRPGM(ofSize);////MSG_SD_SIZE
- SERIAL_PROTOCOLLN(filesize);
- sdpos = 0;
-
- SERIAL_PROTOCOLLNRPGM(ofFileSelected);////MSG_SD_FILE_SELECTED
- lcd_setstatuspgm(ofFileSelected);
- scrollstuff = 0;
- } else {
- SERIAL_PROTOCOLRPGM(MSG_SD_OPEN_FILE_FAIL);
- SERIAL_PROTOCOL(fname);
- SERIAL_PROTOCOLLN('.');
- }
- }
- void CardReader::openFileWrite(const char* name)
- {
- if(!cardOK)
- return;
- if(file.isOpen()){ //replacing current file by new file, or subfile call
- #if 0
- // I doubt chained files support is necessary for file saving:
- // Intentionally disabled because it takes a lot of code size while being not used
- if((int)file_subcall_ctr>(int)SD_PROCEDURE_DEPTH-1){
- // SERIAL_ERROR_START;
- // SERIAL_ERRORPGM("trying to call sub-gcode files with too many levels. MAX level is:");
- // SERIAL_ERRORLN(SD_PROCEDURE_DEPTH);
- kill(ofKill, 1);
- return;
- }
-
- SERIAL_ECHO_START;
- SERIAL_ECHORPGM(ofSubroutineCallTgt);
- SERIAL_ECHO(name);
- SERIAL_ECHORPGM(ofParent);
-
- //store current filename and position
- getAbsFilename(filenames[file_subcall_ctr]);
-
- SERIAL_ECHO(filenames[file_subcall_ctr]);
- SERIAL_ECHORPGM(ofPos);
- SERIAL_ECHOLN(sdpos);
- filespos[file_subcall_ctr]=sdpos;
- file_subcall_ctr++;
- file.close();
- #else
- SERIAL_ECHOLNPGM("File already opened");
- #endif
- } else { //opening fresh file
- file_subcall_ctr=0; //resetting procedure depth in case user cancels print while in procedure
- SERIAL_ECHO_START;
- SERIAL_ECHORPGM(ofNowFreshFile);
- SERIAL_ECHOLN(name);
- }
- sdprinting = false;
-
- const char *fname=name;
- if (!diveSubfolder(fname))
- return;
-
- //write
- if (!file.open(curDir, fname, O_CREAT | O_APPEND | O_WRITE | O_TRUNC)){
- SERIAL_PROTOCOLRPGM(MSG_SD_OPEN_FILE_FAIL);
- SERIAL_PROTOCOL(fname);
- SERIAL_PROTOCOLLN('.');
- } else {
- saving = true;
- getfilename(0, fname);
- SERIAL_PROTOCOLRPGM(ofWritingToFile);////MSG_SD_WRITE_TO_FILE
- printAbsFilenameFast();
- SERIAL_PROTOCOLLN();
-
- SERIAL_PROTOCOLLNRPGM(ofFileSelected);////MSG_SD_FILE_SELECTED
- lcd_setstatuspgm(ofFileSelected);
- scrollstuff = 0;
- }
- }
- void CardReader::removeFile(const char* name)
- {
- if(!cardOK) return;
- file.close();
- sdprinting = false;
- const char *fname=name;
- if (!diveSubfolder(fname))
- return;
- if (file.remove(curDir, fname))
- {
- SERIAL_PROTOCOLPGM("File deleted:");
- SERIAL_PROTOCOLLN(fname);
- sdpos = 0;
- #ifdef SDCARD_SORT_ALPHA
- presort();
- #endif
- }
- else
- {
- SERIAL_PROTOCOLPGM("Deletion failed, File: ");
- SERIAL_PROTOCOL(fname);
- SERIAL_PROTOCOLLN('.');
- }
-
- }
- uint32_t CardReader::getFileSize()
- {
- return filesize;
- }
- void CardReader::getStatus(bool arg_P)
- {
- if (isPrintPaused)
- {
- if (saved_printing && (saved_printing_type == PRINTING_TYPE_SD))
- SERIAL_PROTOCOLLNPGM("SD print paused");
- else
- SERIAL_PROTOCOLLNPGM("Print saved");
- }
- else if (sdprinting)
- {
- if (arg_P)
- {
- printAbsFilenameFast();
- SERIAL_PROTOCOLLN();
- }
- else
- SERIAL_PROTOCOLLN(LONGEST_FILENAME);
-
- SERIAL_PROTOCOLRPGM(_N("SD printing byte "));////MSG_SD_PRINTING_BYTE
- SERIAL_PROTOCOL(sdpos);
- SERIAL_PROTOCOL('/');
- SERIAL_PROTOCOLLN(filesize);
- uint16_t time = ( _millis() - starttime ) / 60000U;
- SERIAL_PROTOCOL(itostr2(time/60));
- SERIAL_PROTOCOL(':');
- SERIAL_PROTOCOLLN(itostr2(time%60));
- }
- else
- SERIAL_PROTOCOLLNPGM("Not SD printing");
- }
- void CardReader::write_command(char *buf)
- {
- char* begin = buf;
- char* npos = 0;
- char* end = buf + strlen(buf) - 1;
- file.writeError = false;
- if((npos = strchr(buf, 'N')) != NULL)
- {
- begin = strchr(npos, ' ') + 1;
- end = strchr(npos, '*') - 1;
- }
- end[1] = '\r';
- end[2] = '\n';
- end[3] = '\0';
- file.write(begin);
- if (file.writeError)
- {
- SERIAL_ERROR_START;
- SERIAL_ERRORLNRPGM(MSG_SD_ERR_WRITE_TO_FILE);
- }
- }
- #define CHUNK_SIZE 64
- void CardReader::write_command_no_newline(char *buf)
- {
- file.write(buf, CHUNK_SIZE);
- if (file.writeError)
- {
- SERIAL_ERROR_START;
- SERIAL_ERRORLNRPGM(MSG_SD_ERR_WRITE_TO_FILE);
- SERIAL_PROTOCOLLNPGM("An error while writing to the SD Card.");
- }
- }
- void CardReader::checkautostart(bool force)
- {
- if(!force)
- {
- if(!autostart_stilltocheck)
- return;
- if(autostart_atmillis<_millis())
- return;
- }
- autostart_stilltocheck=false;
- if(!cardOK)
- {
- initsd();
- if(!cardOK) //fail
- return;
- }
-
- char autoname[30];
- sprintf_P(autoname, PSTR("auto%i.g"), lastnr);
- for(int8_t i=0;i<(int8_t)strlen(autoname);i++)
- autoname[i]=tolower(autoname[i]);
- dir_t p;
- root.rewind();
-
- bool found=false;
- while (root.readDir(p, NULL) > 0)
- {
- for(int8_t i=0;i<(int8_t)strlen((char*)p.name);i++)
- p.name[i]=tolower(p.name[i]);
- //Serial.print((char*)p.name);
- //Serial.print(" ");
- //Serial.println(autoname);
- if(p.name[9]!='~') //skip safety copies
- if(strncmp((char*)p.name,autoname,5)==0)
- {
- char cmd[30];
- // M23: Select SD file
- sprintf_P(cmd, PSTR("M23 %s"), autoname);
- enquecommand(cmd);
- // M24: Start/resume SD print
- enquecommand_P(PSTR("M24"));
- found=true;
- }
- }
- if(!found)
- lastnr=-1;
- else
- lastnr++;
- }
- void CardReader::closefile(bool store_location)
- {
- file.sync();
- file.close();
- saving = false;
- logging = false;
-
- if(store_location)
- {
- //future: store printer state, filename and position for continuing a stopped print
- // so one can unplug the printer and continue printing the next day.
-
- }
-
- }
- void CardReader::getfilename(uint16_t nr, const char * const match/*=NULL*/)
- {
- curDir=&workDir;
- lsAction=LS_GetFilename;
- nrFiles=nr;
- curDir->rewind();
- lsDive("",*curDir,match);
-
- }
- void CardReader::getfilename_simple(uint32_t position, const char * const match/*=NULL*/)
- {
- curDir = &workDir;
- lsAction = LS_GetFilename;
- nrFiles = 0;
- curDir->seekSet(position);
- lsDive("", *curDir, match);
- }
- void CardReader::getfilename_next(uint32_t position, const char * const match/*=NULL*/)
- {
- curDir = &workDir;
- lsAction = LS_GetFilename;
- nrFiles = 1;
- curDir->seekSet(position);
- lsDive("", *curDir, match);
- }
- uint16_t CardReader::getnrfilenames()
- {
- curDir=&workDir;
- lsAction=LS_Count;
- nrFiles=0;
- curDir->rewind();
- lsDive("",*curDir);
- //SERIAL_ECHOLN(nrFiles);
- return nrFiles;
- }
- bool CardReader::chdir(const char * relpath, bool doPresort)
- {
- SdFile newfile;
- SdFile *parent=&root;
-
- if(workDir.isOpen())
- parent=&workDir;
-
- if(!newfile.open(*parent,relpath, O_READ) || ((workDirDepth + 1) >= MAX_DIR_DEPTH))
- {
- SERIAL_ECHO_START;
- SERIAL_ECHORPGM(_n("Cannot enter subdir: "));////MSG_SD_CANT_ENTER_SUBDIR
- SERIAL_ECHOLN(relpath);
- return 0;
- }
- else
- {
- strcpy(dir_names[workDirDepth], relpath);
- puts(relpath);
- if (workDirDepth < MAX_DIR_DEPTH) {
- for (int d = ++workDirDepth; d--;)
- workDirParents[d+1] = workDirParents[d];
- workDirParents[0]=*parent;
- }
- workDir=newfile;
- #ifdef SDCARD_SORT_ALPHA
- if (doPresort)
- presort();
- else
- presort_flag = true;
- #endif
- return 1;
- }
- }
- void CardReader::updir()
- {
- if(workDirDepth > 0)
- {
- --workDirDepth;
- workDir = workDirParents[0];
- for (unsigned int d = 0; d < workDirDepth; d++)
- {
- workDirParents[d] = workDirParents[d+1];
- }
- #ifdef SDCARD_SORT_ALPHA
- presort();
- #endif
- }
- }
- #ifdef SDCARD_SORT_ALPHA
- /**
- * Get the name of a file in the current directory by sort-index
- */
- void CardReader::getfilename_sorted(const uint16_t nr) {
- if (nr < sort_count)
- getfilename_simple(sort_positions[nr]);
- else
- getfilename(nr);
- }
- /**
- * Read all the files and produce a sort key
- *
- * We can do this in 3 ways...
- * - Minimal RAM: Read two filenames at a time sorting along...
- * - Some RAM: Buffer the directory just for this sort
- * - Most RAM: Buffer the directory and return filenames from RAM
- */
- void CardReader::presort() {
- if (farm_mode || IS_SD_INSERTED == false) return; //sorting is not used in farm mode
- uint8_t sdSort = eeprom_read_byte((uint8_t*)EEPROM_SD_SORT);
- if (sdSort == SD_SORT_NONE) return; //sd sort is turned off
- KEEPALIVE_STATE(IN_HANDLER);
- // Throw away old sort index
- flush_presort();
- // If there are files, sort up to the limit
- uint16_t fileCnt = getnrfilenames();
- if (fileCnt > 0) {
- // Never sort more than the max allowed
- // If you use folders to organize, 20 may be enough
- if (fileCnt > SDSORT_LIMIT) {
- lcd_show_fullscreen_message_and_wait_P(_i("Some files will not be sorted. Max. No. of files in 1 folder for sorting is 100."));////MSG_FILE_CNT c=20 r=6
- fileCnt = SDSORT_LIMIT;
- }
- lcd_clear();
- // By default re-read the names from SD for every compare
- // retaining only two filenames at a time. This is very
- // slow but is safest and uses minimal RAM.
- char name1[LONG_FILENAME_LENGTH];
- uint16_t crmod_time_bckp;
- uint16_t crmod_date_bckp;
- #if HAS_FOLDER_SORTING
- uint16_t dirCnt = 0;
- #endif
- if (fileCnt > 1) {
- // Init sort order.
- uint8_t sort_order[fileCnt];
- for (uint16_t i = 0; i < fileCnt; i++) {
- if (!IS_SD_INSERTED) return;
- manage_heater();
- if (i == 0)
- getfilename(0);
- else
- getfilename_next(position);
- sort_order[i] = i;
- sort_positions[i] = position;
- #if HAS_FOLDER_SORTING
- if (filenameIsDir) dirCnt++;
- #endif
- }
- #ifdef QUICKSORT
- quicksort(0, fileCnt - 1);
- #elif defined(SHELLSORT)
- #define _SORT_CMP_NODIR() (strcasecmp(name2, name1) < 0)
- #define _SORT_CMP_TIME_NODIR() (((crmod_date_bckp == crmodDate) && (crmod_time_bckp < crmodTime)) || (crmod_date_bckp < crmodDate))
- #if HAS_FOLDER_SORTING
- #define _SORT_CMP_DIR(fs) ((dir1 == filenameIsDir) ? _SORT_CMP_NODIR() : (fs < 0 ? filenameIsDir : !filenameIsDir))
- #define _SORT_CMP_TIME_DIR(fs) ((dir1 == filenameIsDir) ? _SORT_CMP_TIME_NODIR() : (fs < 0 ? filenameIsDir : !filenameIsDir))
- #endif
- for (uint8_t runs = 0; runs < 2; runs++)
- {
- uint8_t* sortingBaseArray;
- //run=0: sorts all files and moves folders to the beginning
- //run=1: assumes all folders are at the beginning of the list and sorts them
-
- lcd_set_cursor(0, 1);
- lcd_printf_P(PSTR("%-20.20S"), (runs == 0)?_i("Sorting files"):_i("Sorting folders"));
-
- uint16_t sortCountFiles = 0;
- if (runs == 0)
- {
- sortingBaseArray = sort_order;
- sortCountFiles = fileCnt;
- }
- #if HAS_FOLDER_SORTING
- else
- {
- sortingBaseArray = sort_order + (fileCnt - dirCnt);
- sortCountFiles = dirCnt;
- }
- #endif
- if (sortCountFiles < 2) break;
-
- uint16_t counter = 0;
- uint16_t total = 0;
- for (uint16_t i = sortCountFiles/2; i > 0; i /= 2) total += sortCountFiles - i; //total runs for progress bar
-
- for (uint16_t gap = sortCountFiles/2; gap > 0; gap /= 2)
- {
- for (uint16_t i = gap; i < sortCountFiles; i++)
- {
- if (!IS_SD_INSERTED) return;
-
- int8_t percent = (counter * 100) / total;
- lcd_set_cursor(0, 2);
- for (int column = 0; column < 20; column++) {
- if (column < (percent / 5)) lcd_print('\xFF'); //simple progress bar
- else lcd_print(' ');
- }
- counter++;
-
- manage_heater();
- uint8_t orderBckp = sortingBaseArray[i];
- getfilename_simple(sort_positions[orderBckp]);
- strcpy(name1, LONGEST_FILENAME); // save (or getfilename below will trounce it)
- crmod_date_bckp = crmodDate;
- crmod_time_bckp = crmodTime;
- #if HAS_FOLDER_SORTING
- bool dir1 = filenameIsDir;
- #endif
-
- uint16_t j = i;
- getfilename_simple(sort_positions[sortingBaseArray[j - gap]]);
- char *name2 = LONGEST_FILENAME; // use the string in-place
- #if HAS_FOLDER_SORTING
- while (j >= gap && ((sdSort == SD_SORT_TIME)?_SORT_CMP_TIME_DIR(FOLDER_SORTING):_SORT_CMP_DIR(FOLDER_SORTING)))
- #else
- while (j >= gap && ((sdSort == SD_SORT_TIME)?_SORT_CMP_TIME_NODIR():_SORT_CMP_NODIR()))
- #endif
- {
- sortingBaseArray[j] = sortingBaseArray[j - gap];
- j -= gap;
- #ifdef SORTING_DUMP
- for (uint16_t z = 0; z < sortCountFiles; z++)
- {
- printf_P(PSTR("%2u "), sortingBaseArray[z]);
- }
- printf_P(PSTR("i%2d j%2d gap%2d orderBckp%2d\n"), i, j, gap, orderBckp);
- #endif
- if (j < gap) break;
- getfilename_simple(sort_positions[sortingBaseArray[j - gap]]);
- name2 = LONGEST_FILENAME; // use the string in-place
- }
- sortingBaseArray[j] = orderBckp;
- }
- }
- }
-
- #ifdef SORTING_DUMP
- for (uint16_t z = 0; z < fileCnt; z++)
- printf_P(PSTR("%2u "), sort_order[z]);
- SERIAL_PROTOCOLLN();
- #endif
- #else //Bubble Sort
- uint32_t counter = 0;
- uint16_t total = 0.5*(fileCnt - 1)*(fileCnt);
- // Compare names from the array or just the two buffered names
- #define _SORT_CMP_NODIR() (strcasecmp(name1, name2) < 0) //true if lowercase(name1) < lowercase(name2)
- #define _SORT_CMP_TIME_NODIR() (((crmod_date_bckp == crmodDate) && (crmod_time_bckp > crmodTime)) || (crmod_date_bckp > crmodDate))
- #if HAS_FOLDER_SORTING
- #define _SORT_CMP_DIR(fs) ((dir1 == filenameIsDir) ? _SORT_CMP_NODIR() : (fs < 0 ? dir1 : !dir1))
- #define _SORT_CMP_TIME_DIR(fs) ((dir1 == filenameIsDir) ? _SORT_CMP_TIME_NODIR() : (fs < 0 ? dir1 : !dir1))
- #endif
- lcd_set_cursor(0, 1);
- lcd_printf_P(PSTR("%-20.20S"), _i("Sorting files"));
- for (uint16_t i = fileCnt; --i;) {
- if (!IS_SD_INSERTED) return;
- bool didSwap = false;
- int8_t percent = (counter * 100) / total;//((counter * 100) / pow((fileCnt-1),2));
- lcd_set_cursor(0, 2);
- for (int column = 0; column < 20; column++) {
- if (column < (percent / 5)) lcd_print('\xFF'); //simple progress bar
- else lcd_print(' ');
- }
- counter++;
- for (uint16_t j = 0; j < i; ++j) {
- if (!IS_SD_INSERTED) return;
- #ifdef SORTING_DUMP
- for (uint16_t z = 0; z < fileCnt; z++)
- {
- printf_P(PSTR("%2u "), sort_order[z]);
- }
- MYSERIAL.println();
- #endif
- manage_heater();
- const uint16_t o1 = sort_order[j], o2 = sort_order[j + 1];
- counter++;
- getfilename_simple(sort_positions[o1]);
- strcpy(name1, LONGEST_FILENAME); // save (or getfilename below will trounce it)
- crmod_date_bckp = crmodDate;
- crmod_time_bckp = crmodTime;
- #if HAS_FOLDER_SORTING
- bool dir1 = filenameIsDir;
- #endif
- getfilename_simple(sort_positions[o2]);
- char *name2 = LONGEST_FILENAME; // use the string in-place
- // Sort the current pair according to settings.
- if (
- #if HAS_FOLDER_SORTING
- (sdSort == SD_SORT_TIME && _SORT_CMP_TIME_DIR(FOLDER_SORTING)) || (sdSort == SD_SORT_ALPHA && _SORT_CMP_DIR(FOLDER_SORTING))
- #else
- (sdSort == SD_SORT_TIME && _SORT_CMP_TIME_NODIR()) || (sdSort == SD_SORT_ALPHA && _SORT_CMP_NODIR())
- #endif
- )
- {
- sort_order[j] = o2;
- sort_order[j + 1] = o1;
- didSwap = true;
- }
- }
- if (!didSwap) break;
- } //end of bubble sort loop
- #endif
- uint8_t sort_order_reverse_index[fileCnt];
- for (uint8_t i = 0; i < fileCnt; i++)
- sort_order_reverse_index[sort_order[i]] = i;
- for (uint8_t i = 0; i < fileCnt; i++)
- {
- if (sort_order_reverse_index[i] != i)
- {
- uint32_t el = sort_positions[i];
- uint8_t idx = sort_order_reverse_index[i];
- while (idx != i)
- {
- uint32_t el1 = sort_positions[idx];
- uint8_t idx1 = sort_order_reverse_index[idx];
- sort_order_reverse_index[idx] = idx;
- sort_positions[idx] = el;
- idx = idx1;
- el = el1;
- }
- sort_order_reverse_index[idx] = idx;
- sort_positions[idx] = el;
- }
- }
- lcd_set_cursor(0, 2);
- for (int column = 0; column <= 19; column++)
- lcd_print('\xFF'); //simple progress bar
- _delay(300);
- lcd_clear();
- }
- else {
- getfilename(0);
- sort_positions[0] = position;
- }
- sort_count = fileCnt;
- }
- lcd_update(2);
- KEEPALIVE_STATE(NOT_BUSY);
- lcd_timeoutToStatus.start();
- }
- void CardReader::flush_presort() {
- if (sort_count > 0) {
- sort_count = 0;
- }
- }
- #endif // SDCARD_SORT_ALPHA
- void CardReader::printingHasFinished()
- {
- st_synchronize();
- if(file_subcall_ctr>0) //heading up to a parent file that called current as a procedure.
- {
- file.close();
- file_subcall_ctr--;
- openFileReadFilteredGcode(filenames[file_subcall_ctr],true);
- setIndex(filespos[file_subcall_ctr]);
- startFileprint();
- }
- else
- {
- quickStop();
- file.close();
- sdprinting = false;
- if(SD_FINISHED_STEPPERRELEASE)
- {
- finishAndDisableSteppers();
- //enquecommand_P(PSTR(SD_FINISHED_RELEASECOMMAND));
- }
- autotempShutdown();
- #ifdef SDCARD_SORT_ALPHA
- //presort();
- #endif
- }
- }
- bool CardReader::ToshibaFlashAir_GetIP(uint8_t *ip)
- {
- memset(ip, 0, 4);
- return card.readExtMemory(1, 1, 0x400+0x150, 4, ip);
- }
- #endif //SDSUPPORT
|