Subversion Repositories wimsdev

Rev

Rev 5181 | Rev 7867 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 5181 Rev 7269
Line 22... Line 22...
22
!endif
22
!endif
23
	style=!record 0 of style.css
23
	style=!record 0 of style.css
24
    wims =!record 0 of wims.sty
24
    wims =!record 0 of wims.sty
25
    fichier_test=!record 0 of fichier_test.tex
25
    fichier_test=!record 0 of fichier_test.tex
26
    !filewrite getfile/style.css $style
26
    !filewrite getfile/style.css $style
27
    !filewrite getfile/wims.sty $wims 
27
    !filewrite getfile/wims.sty $wims
28
    !filewrite getfile/fichier_test.tex  $fichier_test
28
    !filewrite getfile/fichier_test.tex  $fichier_test
29
    
29
 
30
    
30
 
31
!if $wims_deposit!=noname.file and $wims_deposit!=$empty
31
!if $wims_deposit!=noname.file and $wims_deposit!=$empty
32
  !sh cd $wims_home/$wims_sesdir\
32
  !sh cd $wims_home/$wims_sesdir\
33
  	mkdir -p latex2wims\
33
  	mkdir -p latex2wims\
34
  	mkdir -p getfile\
34
  	mkdir -p getfile\
35
	  mv user-deposit latex2wims/$wims_deposit
35
	  mv user-deposit latex2wims/$wims_deposit
Line 37... Line 37...
37
 
37
 
38
!ifval $exemple=1
38
!ifval $exemple=1
39
    style=!record 0 of style.css
39
    style=!record 0 of style.css
40
    wims =!record 0 of wims.sty
40
    wims =!record 0 of wims.sty
41
    fichier_test=!record 0 of fichier_test.tex
41
    fichier_test=!record 0 of fichier_test.tex
42
    !filewrite wimshome/$wims_sesdir/latex2wims/style.css $style 
42
    !filewrite wimshome/$wims_sesdir/latex2wims/style.css $style
43
    !filewrite wimshome/$wims_sesdir/latex2wims/wims.sty $wims 
43
    !filewrite wimshome/$wims_sesdir/latex2wims/wims.sty $wims
44
    !filewrite wimshome/$wims_sesdir/latex2wims/fichier_test.tex  $fichier_test
44
    !filewrite wimshome/$wims_sesdir/latex2wims/fichier_test.tex  $fichier_test
45
    !!!reset exemple
45
    !!!reset exemple
46
!endif
46
!endif
47
 
47
 
48
# Enregistrer
48
# Enregistrer
Line 53... Line 53...
53
fichiers=!replace internal / by , in $test
53
fichiers=!replace internal / by , in $test
54
fichiers=!column -1 of $fichiers
54
fichiers=!column -1 of $fichiers
55
 
55
 
56
Fichiers=!replace internal , by $ $  in $fichiers
56
Fichiers=!replace internal , by $ $  in $fichiers
57
cnt_fichier=!itemcnt $fichiers
57
cnt_fichier=!itemcnt $fichiers
58
!if $cnt_fichier >0 
58
!if $cnt_fichier >0
59
    date=!sh cd $wims_home/$wims_sesdir/latex2wims; ls -al $Fichiers | awk '{ print $$6 " " $$7 " " $$8 }' 
59
    date=!sh cd $wims_home/$wims_sesdir/latex2wims; ls -al $Fichiers | awk '{ print $$6 " " $$7 " " $$8 }'
60
    date=!trim $date 
60
    date=!trim $date
61
    date= !lines2items $date
61
    date= !lines2items $date
62
!endif 
62
!endif
63
 
63
 
64
!if $cnt_fichier=1
64
!if $cnt_fichier=1
65
  principal=1
65
  principal=1
66
!endif
66
!endif
67
 
67
 
68
 
68
 
69
!if $execut=2 and $cnt_fichier=0
69
!if $execut=2 and $cnt_fichier=0
70
  error=$error fichier
70
  error=$error fichier
71
  execut=1
71
  execut=1
72
!endif 
72
!endif
73
 
73
 
74
!if $execut=2 and $principal=$empty
74
!if $execut=2 and $principal=$empty
75
  error = $error principal
75
  error = $error principal
76
  execut=1
76
  execut=1
77
!endif
77
!endif
Line 98... Line 98...
98
       !if $list_module=$empty
98
       !if $list_module=$empty
99
         error = $error documentempty
99
         error = $error documentempty
100
       !endif
100
       !endif
101
!endif
101
!endif
102
!if $principal!=$empty and ($execut=2 or $execut=3) and $document!=$empty and $document!=$choix
102
!if $principal!=$empty and ($execut=2 or $execut=3) and $document!=$empty and $document!=$choix
-
 
103
   !default subdoc=1
103
    execut=3
104
    execut=3
104
    !if $confirm=0 
105
    !if $confirm=0
105
      auth_name1=!word 2 of $auth_name
106
      auth_name1=!word 2 of $auth_name
106
      fichier_p=!item $principal of $fichiers
107
      fichier_p=!item $principal of $fichiers
107
      !!!mexec dos2unix $fichier_p
108
      !!!mexec dos2unix $fichier_p
108
      docdir=$wims_home/public_html/modules/devel/$wims_developer/$document
109
      docdir=$wims_home/public_html/modules/devel/$wims_developer/$document
-
 
110
      docdirw=wimshome/public_html/modules/devel/$wims_developer/$document
-
 
111
###common_files ?
-
 
112
      !read $docdir/.def
-
 
113
      !if $common_files=yes
-
 
114
        docfile=doc/files
-
 
115
      !else
-
 
116
        docfile=doc/$subdoc/files
-
 
117
      !endif
109
      !sh rm -r $docdir/doc/1/* ; mkdir -p $docdir/doc/1/src
118
      !sh rm -r $docdir/doc/$subdoc/* ; mkdir -p $docdir/doc/$subdoc/src; mkdir -p $docdir/doc/srctex
-
 
119
!! inutile de passer par le repertoire provisoire - latex2wims envoyait directement des ficiers dans 
-
 
120
 
110
      dir=$wims_home/$wims_sesdir/latex2wims/
121
      dir=$wims_home/$wims_sesdir/latex2wims/
-
 
122
!!!forget about that by using just src2def : --author=$auth_name1 --email=$auth_email --verbose=1
111
      !mexec latex2wims.pl --dir=$dir --docdir=$docdir --author=$auth_name1 --email=$auth_email --worksheet=$wksheet --verbose=1 $fichier_p
123
      !!!mexec latex2wims.pl --subdir=$subdoc --dir=$dir --docdir=$docdir --author=$auth_name1 --email=$auth_email --worksheet=$wksheet --verbose=1 $fichier_p
-
 
124
      !sh cp $dir/* $docdir/doc/srctex/
-
 
125
!! create the file OIndex in srctex
112
      
126
      Oindex=
-
 
127
      Oindex=!append line $subdoc $fichier_p to $Oindex
-
 
128
      Oindex=!replace internal .tex by in $Oindex
-
 
129
      !filewrite $docdirw/doc/srctex/0index $Oindex
113
      
130
 
114
      images=!sh cd $wims_home\
131
      images=!sh cd $wims_home\
115
      ls $wims_sesdir/latex2wims/*
132
      ls $wims_sesdir/latex2wims/*
116
      images=!replace internal / by , in $images
133
      images=!replace internal / by , in $images
117
      images=!column -1 of $images
134
      images=!column -1 of $images
118
      cnt_images=!itemcnt $images
135
      cnt_images=!itemcnt $images
119
      !for i = 1 to $cnt_images
136
      !for i = 1 to $cnt_images
120
        !if .css isin $(images[$i]) or .sty isin $(images[$i]) or .tex isin $(images[$i])
137
        !if .css isin $(images[$i]) or .sty isin $(images[$i]) or .tex isin $(images[$i])
121
         images=!replace item number $i by in $images
138
         images=!replace item number $i by in $images
122
        !endif
139
        !endif
123
      !next
140
      !next
124
 
-
 
-
 
141
!!image transfer
125
      images=!items2words $images
142
      images=!items2words $images
126
      images=!trim $images
143
      images=!trim $images
127
      images=!singlespace $images
144
      images=!singlespace $images
128
      !sh mkdir -p $docdir/doc/1/files\
145
      !sh mkdir -p $docdir/doc/$subdoc/$docfiles\
129
      for a in $images ; do cp $wims_home/$wims_sesdir/latex2wims/$$a $docdir/doc/1/files/$$a ; done\
146
       for a in $images ; do cp $wims_home/$wims_sesdir/latex2wims/$$a $docdir/doc/$doc/$docfiles/$$a ; done
-
 
147
!!now src2def make latex2wims       
130
     cd $docdir \
148
       !sh cd $docdir \
131
     src2def 2>/dev/null
149
       src2def 2>/dev/null
132
   !else
150
   !else
133
    !if $confirm=1
151
    !if $confirm=1
134
      execut=1
152
      execut=1
135
      !reset confirm
153
      !reset confirm
136
    !else
154
    !else