summaryrefslogtreecommitdiff
path: root/Build/source/texk/kpathsea/win32/mktexupd.c
diff options
context:
space:
mode:
Diffstat (limited to 'Build/source/texk/kpathsea/win32/mktexupd.c')
-rw-r--r--Build/source/texk/kpathsea/win32/mktexupd.c94
1 files changed, 0 insertions, 94 deletions
diff --git a/Build/source/texk/kpathsea/win32/mktexupd.c b/Build/source/texk/kpathsea/win32/mktexupd.c
deleted file mode 100644
index 343891f979f..00000000000
--- a/Build/source/texk/kpathsea/win32/mktexupd.c
+++ /dev/null
@@ -1,94 +0,0 @@
-/* mktexupd.c
-
- Copyright 2000, 2016 Akira Kakuto.
-
- This library is free software; you can redistribute it and/or
- modify it under the terms of the GNU Lesser General Public
- License as published by the Free Software Foundation; either
- version 2.1 of the License, or (at your option) any later version.
-
- This library 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
- Lesser General Public License for more details.
-
- You should have received a copy of the GNU Lesser General Public License
- along with this library; if not, see <http://www.gnu.org/licenses/>.
-*/
-
-#include <kpathsea/kpathsea.h>
-#include "mktex.h"
-
-#define MBUF 512
-#define SBUF 512
-#define LBUF 512
-
-void
-mktexupd (char *s)
-{
- char fname[MBUF];
- char lsrname[SBUF];
- char path[LBUF];
- char **pathbuff;
- int i, j, numtree;
- char *pa, *pb;
- int existflag = 0;
- FILE *f;
-
- if (!(pathbuff = mkpaths (&numtree))) {
- fprintf (stderr, "Maybe you are not using ls-R.\n");
- return;
- }
-
- for (i = 0; i < numtree; i++) {
- j = (int)strlen (pathbuff[i]);
- if (pathbuff[i][j - 1] == '/')
- pathbuff[i][j - 1] = '\0';
- }
-
- strcpy (path, s);
- pa = strrchr (path, '/');
- if (pa == NULL) {
- fprintf (stderr, "Path name of the file may be incorrect.\n");
- for (i = 0; i < numtree; i++)
- free (pathbuff[i]);
- free (pathbuff);
- return;
- }
-
- *pa = '\0';
- pa++;
- strcpy (fname, pa);
-
- for (i = 0; i < numtree; i++) {
- j = (int)strlen (pathbuff[i]);
- if (j && strnicmp (path, pathbuff[i], j) == 0) {
- existflag = 1;
- break;
- }
- }
-
- if (existflag) {
- strcpy (lsrname, pathbuff[i]);
- strcat (lsrname, "/ls-R");
- if (_access (lsrname, 0) != 0) {
- for (j = 0; j < numtree; j++)
- free (pathbuff[j]);
- free (pathbuff);
- return;
- }
- pa = path;
- pb = pathbuff[i];
- while (tolower (*pa) == tolower (*pb) && *pb) {
- pa++;
- pb++;
- }
- f = fopen (lsrname, "ab");
- fprintf (f, "\n.%s:\n%s\n", pa, fname);
- fclose (f);
- } else
- fprintf(stderr, "mktexupd failed\n");
- for (i = 0; i < numtree; i++)
- free (pathbuff[i]);
- free (pathbuff);
-}