• Home
• org.iplantc
• clavin
• 1.3.3
• source code
• file_utils__init.class

×

Project download

Many resources are needed to download a project. Please understand that we have to compensate our server costs. Thank you in advance.
Project price only 1 $

You can buy this project and download/modify it how often you want.

clojure_commons.file_utils__init.class Maven / Gradle / Ivy

????1'
 clojure_commons/file_utils__init

java/lang/Object
load
()V
const__0
Lclojure/lang/Var;		
clojure/lang/Var

getRawRoot
()Ljava/lang/Object;


clojure/lang/IFn
const__1
Lclojure/lang/AFn;	
invoke
&(Ljava/lang/Object;)Ljava/lang/Object;
0clojure_commons/file_utils$loading__4910__auto__

 
clojure/lang/Symbol"
const__2$	%
equals
(Ljava/lang/Object;)Z'(
#)
"clojure_commons/file_utils$fn__310+
,
java/util/concurrent/Callable.
clojure/lang/LockingTransaction0
runInTransaction
3(Ljava/util/concurrent/Callable;)Ljava/lang/Object;23
14
const__36	7

setDynamic
(Z)Lclojure/lang/Var;9:
;
	const__11=	>
clojure/lang/IPersistentMap@
setMeta
 (Lclojure/lang/IPersistentMap;)VBC
D
	const__12
Ljava/lang/Object;FG	H
bindRoot
(Ljava/lang/Object;)VJK
L
	const__13N	O
	const__17Q	R
$clojure_commons/file_utils$path_joinT
U
	const__18W	X
	const__21Z	[
(clojure_commons/file_utils$rm_last_slash]
^
	const__22`	a
	const__25c	d
#clojure_commons/file_utils$basenamef
g
	const__26i	j
	const__29l	m
"clojure_commons/file_utils$dirnameo
p
	const__30r	s
	const__33u	v
-clojure_commons/file_utils$add_trailing_slashx
y
	const__34{	|
	const__37~	
)clojure_commons/file_utils$normalize_path?
?
	const__38?	?
	const__41?	?
#clojure_commons/file_utils$abs_path?
?
	const__42?	?
	const__45?	?
*clojure_commons/file_utils$abs_path_QMARK_?
?
	const__46?	?
	const__49?	?
&clojure_commons/file_utils$file_QMARK_?
?
	const__50?	?
	const__53?	?
%clojure_commons/file_utils$dir_QMARK_?
?
	const__54?	?
	const__57?	?
(clojure_commons/file_utils$exists_QMARK_?
?
	const__58?	?
	const__61?	?
%clojure_commons/file_utils$rec_delete?
?
	const__62?	?
	const__66?	?
&clojure_commons/file_utils$mk_temp_dir?
?
	const__67?	?
	const__70?	?
#clojure_commons/file_utils$temp_dir?
?
	const__71?	?
	const__74?	?
(clojure_commons/file_utils$with_temp_dir?
?
setMacro?
?
	const__75?	?
	const__78?	?
+clojure_commons/file_utils$with_temp_dir_in?
?
const__4
Lclojure/lang/Keyword;
const__5
const__6
const__7
const__8
const__9
	const__10
	const__14
	const__15
	const__16
	const__19
	const__20
	const__23
	const__24
	const__27
	const__28
	const__31
	const__32
	const__35
	const__36
	const__39
	const__40
	const__43
	const__44
	const__47
	const__48
	const__51
	const__52
	const__55
	const__56
	const__59
	const__60
	const__63
	const__64
	const__65
	const__68
	const__69
	const__72
	const__73
	const__76
	const__77
__init0
clojure.core

in-ns

clojure/lang/RT

var
8(Ljava/lang/String;Ljava/lang/String;)Lclojure/lang/Var;





clojure-commons.file-utils

intern
;(Ljava/lang/String;Ljava/lang/String;)Lclojure/lang/Symbol;


#

clojure/lang/AFn

*max-temp-dir-attempts*

doc
 
keyword
<(Ljava/lang/String;Ljava/lang/String;)Lclojure/lang/Keyword;
"
#


$
clojure/lang/Keyword
&??	
(
file
*??	
,
column
.??	
0
java/lang/Integer
2
valueOf
(I)Ljava/lang/Integer;
4
5

3
6?G	
8
line
:??	
<?G	
>
dynamic
@??	
B
java/lang/Boolean
D
TRUE
Ljava/lang/Boolean;
F
G	
E
H
GThe maximum number of times to attempt to create a temporary directory.
J
clojure_commons/file_utils.clj
L
map
2([Ljava/lang/Object;)Lclojure/lang/IPersistentMap;
N
O


P

java/lang/Long
T
(J)Ljava/lang/Long;
4
V

U
W
	path-join
Y?G	
[
arglists
]??	
_

&
a
paths
c
vector
5([Ljava/lang/Object;)Lclojure/lang/IPersistentVector;
e
f


g
java/util/Arrays
i
asList
%([Ljava/lang/Object;)Ljava/util/List;
k
l

j
m
clojure/lang/PersistentList
o
create
0(Ljava/util/List;)Lclojure/lang/IPersistentList;
q
r

p
s?G	
u
?Joins paths together and returns the resulting path as a string. nil and empty strings are 
   silently discarded.

   Parameters:
     paths - a parameter list of names to join together to form a path.

   Returns:
     It returns the path as a string.
w

rm-last-slash
y?G	
{
path
}?G	

?Returns a new version of 'path' with the last slash removed.

   Parameters:
     path - String containing a path.

   Returns: New version of 'path' with the trailing slash removed.
?
basename
??G	
??G	
?

Returns the basename of 'path'.

   This works by calling getName() on a java.io.File instance. It's prefered
   over last-dir-in-path for that reason.

   Parameters:
     path - String containing the path for an item in iRODS.

   Returns:
     String containing the basename of path.
?
dirname
??G	
??G	
?
?Returns the dirname of 'path'.

   This works by calling getParent() on a java.io.File instance.

   Parameters:
     path - String containing the path for an item in iRODS.

   Returns:
     String containing the dirname of path.
?
add-trailing-slash
??G	
?
input-string
??G	
?
GAdds a trailing slash to 'input-string' if it doesn't already have one.
?
normalize-path
??G	
?
	file-path
??G	
?
~Normalizes a file path on Unix systems by eliminating '.' and '..' from it.
   No attempts are made to resolve symbolic links.
?
abs-path
??G	
??G	
?
$Converts a path to an absolute path.
?
	abs-path?
??G	
??G	
?
7Returns true if the path passed in is an absolute path.
?
file?
??G	
??G	
?
!Tests whether the path is a file.
?
dir?
??G	
??G	
?
&Tests whether the path is a directory.
?
exists?
??G	
?
	filepaths
??G	
?
6Tests whether the given paths exist on the filesystem.
?

rec-delete
?
G	
?

f
?

G	
?

LRecursively deletes all files in a directory structure rooted at the given
   directory.  Note that this recursion does consume stack space.  This
   shouldn't be a problem, however, because a directory structure that is deep
   enough to cause a stack overflow will probably create a path that is too
   long for the OS to support.
?
mk-temp-dir
?
G	
?
name-fn
?
G	
?
private
?
?	
?
HAttempts to create a temporary directory named by the provided function.
?
temp-dir
?
G	
?
prefix
?
err-fn
?
parent
?
G	
?
vCreates a temporary directory.  This function is used by the with-temp-dir
   macro to create the temporary directory.
?

with-temp-dir
?
G	
?
sym
?
body
?
G	
?
?Creates a temporary directory and binds a file representing the path to the
   temporary directory within the user's current working directory.  The body
   is executed in a try expression with a finally clause that recursively
   deletes the directory.  If the directory can't be created then the provided
   error function will be called with three arguments: the path to the parent
   directory, the directory name prefix and the base name that was used.  The
   dynamic variable, *max-temp-dir-attempts*, can be used to specify the
   maximum number of times to try to create the temporary directory.  The
   default value of this variable is 10.

with-temp-dir-in
	G	

G	
?Creates a temporary directory inside a specified parent directory and binds a
   file representing the path to the temporary directory to a provided symbol.
   The body is executed in a try expression with a finally clause that
   recursively deletes the directory.  If the directory can't be created then
   the provided error function will be called with three arguments: the path to
   the parent directory, the directory name prefix and the base name that was
   used.  The dynamic variable, *max-temp-dir-attempts*, can be used to specify
   the maximum number of times to try to create the temporary directory  The
   default value of this variable is 10.	



 clojure_commons.file_utils__init
java/lang/Class
forName
%(Ljava/lang/String;)Ljava/lang/Class;

getClassLoader
()Ljava/lang/ClassLoader;

clojure/lang/Compiler
pushNSandLoader
(Ljava/lang/ClassLoader;)V

 
popThreadBindings"
#
Code
LineNumberTable!O$6???????G???G??=FGN?G???GQW?G?GZ`?G?Gci?G?Glr?G?Gu{?G?G~??G?G???G?G???G?G???G?G???G?G??
G

G??
G
G
???
G
G??
G
G??
	G

G?	
%&
??
?????Y???!
??#?&?*?
?W?,Y?-?/?5W
?8??
7?
??Y?Y

??
S?
hS?
n?
t?
?
?Y

^?
%SY?Y?Y

??
S?
hS?
n?
tSY

/?
%SY?
7SY

!?
%SY
?SY

;?
%SY>?
7SY

+?
%SY	
MS?
Q?
?w

??
??}E?
7?
??Y?Y

??
S?
hS?
n?
t?
?
?Y

^?
%SY?Y?Y

??
S?
hS?
n?
tSY

/?
%SY?
7SY

!?
%SY
?SY

;?
%SYE?
7SY

+?
%SY	
MS?
Q?
??

??
???Q?
7?
??Y?Y

??
S?
hS?
n?
t?
?
?Y

^?
%SY?Y?Y

??
S?
hS?
n?
tSY

/?
%SY?
7SY

!?
%SY
?SY

;?
%SYQ?
7SY

+?
%SY	
MS?
Q?
??

??
???V?
7?
??Y?Y

??
S?
hS?
n?
t?
?
?Y

^?
%SY?Y?Y

??
S?
hS?
n?
tSY

/?
%SY?
7SY

!?
%SY
?SY

;?
%SYV?
7SY

+?
%SY	
MS?
Q?
??

??
???[?
7?
??Y?Y

??
S?
hS?
n?
t?
?
?Y

^?
%SY?Y?Y

??
S?
hS?
n?
tSY

/?
%SY?
7SY

!?
%SY
?SY

;?
%SY[?
7SY

+?
%SY	
MS?
Q?
??

??
???`?
7?
??Y?Y

??
S?
hS?
n?
t?
?
?Y

^?
%SY?Y?Y

??
S?
hS?
n?
tSY

/?
%SY?
7SY

!?
%SY
?SY

;?
%SY`?
7SY

+?
%SY	
MS?
Q?
??

ȸ
???e?
7?
??Y?Y

b?
SY

̸
S?
hS?
n?
t?
?
?Y

^?
%SY?Y?Y

b?
SY

̸
S?
hS?
n?
tSY

/?
%SY?
7SY

!?
%SY
?SY

;?
%SYe?
7SY

+?
%SY	
MS?
Q?
??

Ҹ
???j?
7?
??Y?Y

ָ
S?
hS?
n?
t?
?
?Y

^?
%SY?Y?Y

ָ
S?
hS?
n?
tSY

/?
%SY?
7SY

!?
%SY
?SY

;?
%SYj?
7SY

+?
%SY	
MS?
Q?
??

ܸ
???u?
7?
??Y?Y

?
S?
hS?
n?
t?
?

?
%?
'?
??Y

^?
%SY?Y?Y

?
S?
hS?
n?
tSY

/?
%SY?
7SY

?
%SY?
ISY

!?
%SY
?SY

;?
%SY	u?
7SY


+?
%SY
MS?
Q?
??

?
???~?
7?
??Y?Y

?
SY

?
S?
hSY?Y

?
SY

?
SY

?
S?
hS?
n?
t?
?
?Y

^?
%SY?Y?Y

?
SY

?
S?
hSY?Y

?
SY

?
SY

?
S?
hS?
n?
tSY

/?
%SY?
7SY

!?
%SY
?SY

;?
%SY~?
7SY

+?
%SY	
MS?
Q?
??

??
?????
7?
??Y?Y

??
SY

?
SY

?
SY

b?
SY

??
S?
hS?
n?
t?
?Y

^?
%SY?Y?Y

??
SY

?
SY

?
SY

b?
SY

??
S?
hS?
n?
tSY

/?
%SY?
7SY

!?
%SYSY

;?
%SY??
7SY

+?
%SY	
MS?
Q?
??
?
?????
7??Y?Y

??
SY

?
SY

?
SY

?
SY

b?
SY

??
S?
hS?
n?
t?
?Y

^?
%SY?Y?Y

??
SY

?
SY

?
SY

?
SY

b?
SY

??
S?
hS?
n?
tSY

/?
%SY?
7SY

!?
%SY
SY

;?
%SY??
7SY

+?
%SY	
MS?
Q?
?ݱ	
%1
?
????!?$??$??