1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
|
% import.sty Ver 3.0 17-Dec-1997 Donald Arseneau (asnd@reg.triumf.ca)
%
% Allow input of a file with its own inputs from another directory.
%
% \import {full_path} {file} \subimport {path_extension} {file}
% Also \includefrom, \subincludefrom, and * variants.
%
% This software is free of any restrictions.
%
% For example, if a remote file "/usr5/friend/work/report.tex" has contents:
% My graph: \includegraphics{picture}
% \input{explanation}
% then you can safely input that file in your own document with the command
% "\import{/usr5/friend/work/}{report}"; the explanation and picture will
% be taken from the remote directory. You can then import documents from
% other friends, even if they use the same file names.
%
% The "\subimport" command allows imported files to import files themselves,
% using their own directory as the root of a "path_extension". Do not use
% both "\import" and "\subimport" in the same file.
%
% For example, if a file is imported (using either command) from directory
% "abc/" and that file contains the command "\subimport{lmn/}{xyz}" then
% file "abc/lmn/xyz.tex" is input, and any "\input" commands in that file
% will read files from directory "abc/lmn/".
%
% Note that the sub-import path is merely appended to the current import
% path. Mistakes from this method must be rectified by "\import@path@fix".
%
% Depending on on how your \TeX\ system is configured, if a file with the
% same name as the import file exists in the current directory or in the
% TEXINPUTS path, that other file will be read in preference to one in the
% import directory. So here is the real behavior of the previous example:
% Given the sequence "\import{abc/}{one}", "\subimport{lmn/uvw/}{two}" (in
% file one), "\input{three}" (in file two), LaTeX first looks for three.tex
% in the TEXINPUTS search path; if not found, it tries "abc/lmn/uvw/three";
% if that doesn't exist, it tries "abc/three"; if still not found, it tries
% the defined "\input@path", if there is one.
%
% To avoid searching the TEXINPUTS path when importing files, use the `star'
% versions of the commands: "\import*" and "\subimport*".
%
% A hook "\import@path@fix" is provided to reformat the import path
% to fit the syntax of a particular operating system. It *could* be
% defined to convert unix-style path names to the local format, but
% all it does now is remove "][" from VMS sub-import directories.
%
% Presently, the paths are defined ``locally'' so input files must have
% balanced grouping.
\newcommand{\import}{\global\let\import@path\@empty \@doimport\input}
\newcommand{\subimport}{\@doimport\input}
\newcommand{\includefrom}{\global\let\import@path\@empty \@doimport\include}
\newcommand{\subincludefrom}{\@doimport\include}
\def\@doimport#1{\@ifstar
{\@sub@import#1\@iffileonpath}{\@sub@import#1\IfFileExists}}
% #1 = import command, #2 = switch for *, #3 = import path extension
\def\@sub@import#1#2#3{%
\begingroup
\protected@edef\@tempa{\endgroup
\let\noexpand\IfFileExists\noexpand#2
\noexpand\@import \noexpand#1% param 1
{\@ifundefined{input@path}{}{\input@path}}% 2
{\@ifundefined{Ginput@path}{}{\Ginput@path}}% 3
{\import@path#3}{\import@path}% 4,5
{\ifx\IfFileExists\im@@IfFileExists \noexpand\im@@IfFileExists
\else \noexpand\IfFileExists \fi}}% 6
\@tempa}
%
% #1 = import command (\input or \include)
% #2 = previous input path list. #3 = previous graphics input path list.
% #4 = full path added to each. #5 = previous import path.
% #6 = previous \IfFileExists. #7 = file name.
%
\def\@import#1#2#3#4#5#6#7{%
\gdef\import@path{#4}%
\protected@edef\input@path{{\import@path@fix{#4}}#2}%
\protected@edef\Ginput@path{{\import@path@fix{#4}}#3}%
#1{#7}%
\let\IfFileExists#6% restore after \import*
\gdef\import@path{#5}%
\def\input@path{#2}\ifx\input@path\@empty \let\input@path\@undefined \fi
\def\Ginput@path{#3}\ifx\Ginput@path\@empty \let\Ginput@path\@undefined \fi
}
\let\im@@IfFileExists\IfFileExists
\gdef\import@path{}
\let\import@path@fix\@firstofone % default
% Check for vms file names and set \import@path@fix appropriately
\gdef\@gtempa{[]}
\ifx\@gtempa\@currdir % VMS directory syntax
\gdef\import@path@fix#1{\@gobbleVMSbrack#1][>}
\gdef\@gobbleVMSbrack#1][#2{#1\ifx>#2\@empty
\expandafter \strip@prefix \fi % Gobble up to >
\@gobbleVMSbrack #2}
\fi
|
