1 /* Project 16 Source Code~
\r
2 * Copyright (C) 2012-2017 sparky4 & pngwen & andrius4669 & joncampbell123 & yakui-lover
\r
4 * This file is part of Project 16.
\r
6 * Project 16 is free software; you can redistribute it and/or modify
\r
7 * it under the terms of the GNU General Public License as published by
\r
8 * the Free Software Foundation; either version 3 of the License, or
\r
9 * (at your option) any later version.
\r
11 * Project 16 is distributed in the hope that it will be useful,
\r
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
\r
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
\r
14 * GNU General Public License for more details.
\r
16 * You should have received a copy of the GNU General Public License
\r
17 * along with this program. If not, see <http://www.gnu.org/licenses/>, or
\r
18 * write to the Free Software Foundation, Inc., 51 Franklin Street,
\r
19 * Fifth Floor, Boston, MA 02110-1301 USA.
\r
23 #include "src/lib/16_head.h"
\r
28 long int save_pos, size_of_file;
\r
30 save_pos = ftell(fp);
\r
31 fseek(fp, 0L, SEEK_END);
\r
32 size_of_file = ftell(fp);
\r
33 fseek(fp, save_pos, SEEK_SET);
\r
34 return(size_of_file);
\r
37 //from http://stackoverflow.com/questions/2736753/how-to-remove-extension-from-file-name
\r
38 // remove_ext: removes the "extension" from a file spec.
\r
39 // mystr is the string to process.
\r
40 // dot is the extension separator.
\r
41 // sep is the path separator (0 means to ignore).
\r
42 // Returns an allocated string identical to the original but
\r
43 // with the extension removed. It must be freed when you're
\r
44 // finished with it.
\r
45 // If you pass in NULL or the new string can't be allocated,
\r
48 char *remove_ext (char* mystr, char dot, char sep) {
\r
49 char *retstr, *lastdot, *lastsep;
\r
51 // Error checks and allocate string.
\r
55 if ((retstr = malloc(strlen (mystr) + 1)) == NULL)
\r
58 // Make a copy and find the relevant characters.
\r
60 strcpy (retstr, mystr);
\r
61 lastdot = strrchr (retstr, dot);
\r
62 lastsep = (sep == 0) ? NULL : strrchr (retstr, sep);
\r
64 // If it has an extension separator.
\r
66 if (lastdot != NULL) {
\r
67 // and it's before the extenstion separator.
\r
69 if (lastsep != NULL) {
\r
70 if (lastsep < lastdot) {
\r
76 // Has extension separator with no path separator.
\r
82 // Return the modified string.
\r
89 //from http://quiz.geeksforgeeks.org/c-program-cyclically-rotate-array-one/
\r
90 void rotateR(byte *arr, byte n)
\r
92 byte x = arr[n-1], i;
\r
93 for (i = n-1; i > 0; i--)
\r
98 void rotateL(byte *arr, byte n)
\r
100 byte x = arr[n+1], i;
\r
101 for (i = n+1; i > 0; i++)
\r
106 void printmeminfoline(byte *strc, const byte *pee, size_t h_total, size_t h_used, size_t h_free)
\r
109 strcat(strc,pee); strcat(strc," "); ultoa((dword)h_total,str,10); strcat(strc,str);
\r
110 if(strlen(str)<=4) strcat(strc," "); //printf("%u\n", strlen(str));
\r
111 strcat(strc," "); ultoa((dword)h_used,str,10); strcat(strc,str); strcat(strc," "); strcat(strc," ");
\r
112 ultoa((dword)h_free,str,10); strcat(strc,str);
\r
116 ///////////////////////////////////////////////////////////////////////////
\r
118 // US_CheckParm() - checks to see if a string matches one of a set of
\r
119 // strings. The check is case insensitive. The routine returns the
\r
120 // index of the string that matched, or -1 if no matches were found
\r
122 ///////////////////////////////////////////////////////////////////////////
\r
124 US_CheckParm(char *parm,char **strings)
\r
130 while (!isalpha(*parm)) // Skip non-alphas
\r
133 for (i = 0;*strings && **strings;i++)
\r
135 for (s = *strings++,p = parm,cs = cp = 0;cs == cp;)
\r
152 byte dirchar(byte in)
\r