File: hns-setup.ja

package info (click to toggle)
hns2 2.00.pl4-2
  • links: PTS
  • area: main
  • in suites: potato
  • size: 1,404 kB
  • ctags: 592
  • sloc: perl: 4,738; lisp: 1,584; sh: 936; makefile: 363
file content (297 lines) | stat: -rw-r--r-- 6,904 bytes parent folder | download
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
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
#!/bin/sh 
# HyperNikkiSystem Setup Script for hns-2.00
# version 1.0.5
# 1999/5/20

# Takuro KITAME <kitame@h14m.org>
# Copyright (C) 1999  Takuro KITAME, HyperNikkiSystem Project

# changed for perl version [1999/04/11]
#  by TANAKA Tomonari <tom@morito.mgmt.waseda.ac.jp>

# $Id: hns-setup.ja,v 1.7.2.1 1999/06/11 00:17:51 kenji Exp $

VERSION=`head -2 /usr/doc/hns2/README | tail -1`

hnsinstall() {
 echo
 echo "󥹥ȡ..."
 echo

 PERL=`which perl`
 SENDMAIL=`which sendmail`
 NKF=`which nkf`
 if test "$PERL" = "" || $PERL -e 'exit ($] >= 5)'; then
   PERL=`which perl5`
   if test "$PERL" = "" || $PERL -e 'exit ($] >= 5)'; then
     { echo "顼: Perl5 ޤ"; PERL="No"; }
   fi
 fi 
 if test "$SENDMAIL" = ""; then
   { echo "顼: sendmail ޤ"; SENDMAIL="No"; }
 fi
 if test "$NKF" = ""; then
   { echo "顼: nkf ޤ"; NKF="No"; }
 fi
 echo "perl5   : $PERL"
 echo "sendmail: $SENDMAIL"
 echo "nkf     : $NKF"
 echo

 mkdir /tmp/hns-setup-`whoami`/
 cp -pr /usr/share/hns2/* /tmp/hns-setup-`whoami`/
 cd /tmp/hns-setup-`whoami`/

 make NIKKITITLE="$TITLE" \
      USERMAIL="$MAIL" \
      DIARYDIR="$DIARY" \
      HTMLDIR=$HTML \
      DIARYMAIL="$TOMAIL" \
      FROMADDR="$FROMMAIL" \
      PASSWORD="$PASSWD" \
      UNAGIUSE="$UNAGI" \
      PERL_PATH="$PERL" \
      SENDMAIL_PATH="$SENDMAIL" \
      NKF_PATH="$NKF" \
      MYDIARYURI="$URL" \
      THEME="$THEME" \
      ANTENNA="$ANTENNA" \
      install > /dev/null
 
 rm -rf /tmp/hns-setup-`whoami`

 # Save Setting information
 rm -f $HNSSETUP
 echo "DEFTITLE=\"$TITLE\"" > $HNSSETUP
 echo "DEFMAIL=\"$MAIL\"" >> $HNSSETUP
 echo "DEFDIARY=\"$DIARY\"" >> $HNSSETUP
 echo "DEFHTML=\"$HTML\"" >> $HNSSETUP
 echo "DEFUNAGI=\"$UNAGI\"" >> $HNSSETUP
 echo "DEFTOMAIL=\"$TOMAIL2\"" >> $HNSSETUP
 echo "DEFFROMMAIL=\"$FROMMAIL2\"" >> $HNSSETUP
 echo "DEFPASSWD=\"$PASSWD\"" >> $HNSSETUP
 echo "DEFURL=\"$URL\"" >> $HNSSETUP
 echo "DEFTHEME=\"$THEME\"" >> $HNSSETUP
 echo "DEFANTENNA=\"$ANTENNA\"" >> $HNSSETUP
 echo  >> $HNSSETUP

 chmod 600 $HNSSETUP

 echo 
 echo "󥹥ȡ봰λ"
 echo " $HNSSETUP ¸ޤ"
 echo ": Ť config.ph  config.ph-old Ȥ¸ޤ"
 echo "$HTML ˤ config.ph 򤪹ߤ˽Ʋ"
 echo
 echo "ϥѡƥѤ꤬Ȥޤ"
}

## default setting
 DEFTITLE="HNS: Hoge's Diary"
 DEFMAIL="hoge@foo.bar.jp"
 DEFDIARY="$HOME/diary"
 DEFHTML="$HOME/public_html/diary"
 DEFTOMAIL="hoge@foo.bar.jp"
 DEFFROMMAIL="hoge@foo.bar.jp"
 DEFPASSWD="hogehoge"
 DEFUNAGI="OFF"
 DEFURL="http://www.foo.bar.jp/~hoge/diary/"
 DEFTHEME="japanese"
 DEFANTENNA="OK"

HNSSETUP=$HOME/.hnssetup2

echo "ϥѡƥ $VERSION Υ󥹥ȡԤޤ"
echo "󥹥ȡɬ READMEեɤߤ"
echo

if [ -f $HNSSETUP ]; then
# source $HNSSETUP
 eval `cat $HNSSETUP`
 echo "󤬸Ĥޤ"
 echo 
 echo "  Υȥ         : $DEFTITLE"
 echo "  ᡼롦ɥ쥹       : $DEFMAIL"
 echo "  ǥ쥯ȥ       : $DEFDIARY"
 echo "  ǥ쥯ȥ : $DEFHTML"
 echo "  Namazu ե    : $DEFUNAGI"
 echo "  URL                : $DEFURL"
 echo "  ơ̾               : $DEFTHEME"
 echo "  ƥʤؤϿ   : $DEFANTENNA"
 echo
 echo "  mail2nikki: "
 echo "   To:ɥ쥹           : $DEFTOMAIL" 
 echo "   From:ɥ쥹         : $DEFFROMMAIL" 
 echo "   ѥ            : $DEFPASSWD" 
 echo
 echo -n "ǤǤ? [Y/n]: "
 read YN
 test -n "$YN" || YN="Y"
 if [ $YN = Y -o $YN = y ]; then
    SYSTEM=$DEFSYSTEM
    TITLE=$DEFTITLE
    MAIL=$DEFMAIL
    DIARY=$DEFDIARY
    HTML=$DEFHTML
    TOMAIL=$DEFTOMAIL
     TOMAIL2=$TOMAIL
     TMPMAIL=`echo $TOMAIL | sed 's/@/\\\@/'`
     TOMAIL=`echo $TMPMAIL | sed 's/@/\\\@/'`
    FROMMAIL=$DEFFROMMAIL
     FROMMAIL2=$FROMMAIL
     TMPMAIL=`echo $FROMMAIL | sed 's/@/\\\@/'`
     FROMMAIL=`echo $TMPMAIL | sed 's/@/\\\@/'`
    PASSWD=$DEFPASSWD
    UNAGI=$DEFUNAGI
    URL=$DEFURL
    THEME=$DEFTHEME
    ANTENNA=$DEFANTENNA
    hnsinstall
    exit 0;
 fi
fi

echo "ΥȥϤƤ: [$DEFTITLE]"
echo -n "> "
read TITLE
if [ -z "$TITLE" ]; then
    TITLE=$DEFTITLE
fi

echo
echo "URLϤƤ: [$DEFURL]"
echo -n "> "
read URL
if [ -z "$URL" ]; then
    URL=$DEFURL
fi

echo
echo "᡼롦ɥ쥹ϤƤ: [$DEFMAIL]"
echo -n "> "
read MAIL
if [ -z "$MAIL" ]; then
    MAIL=$DEFMAIL
fi

echo
echo "mail2nikkiѤ To:ɥ쥹 ϤƤ: [$MAIL]"
echo -n "> "
read TOMAIL
if [ -z "$TOMAIL" ]; then
    TOMAIL=$MAIL
fi
TOMAIL2=$TOMAIL
TMPMAIL=`echo $TOMAIL | sed 's/@/\\\@/'`
TOMAIL=`echo $TMPMAIL | sed 's/@/\\\@/'`

echo
echo "mail2nikkiѤ From:ɥ쥹ϤƤ: [$MAIL]"
echo -n "> "
read FROMMAIL
if [ -z "$FROMMAIL" ]; then
    FROMMAIL=$MAIL
fi
FROMMAIL2=$FROMMAIL
TMPMAIL=`echo $FROMMAIL | sed 's/@/\\\@/'`
FROMMAIL=`echo $TMPMAIL | sed 's/@/\\\@/'`

echo
echo "mail2nikkiѤΥѥɤϤƤ: [$DEFPASSWD]"
echo -n "> "
read PASSWD
if [ -z "$PASSWD" ]; then
    PASSWD=$DEFPASSWD
fi

echo
echo -n "Namazu θեɽޤ? [y/N]: "
read yn
test -n "$yn" || yn="N"
case "$yn" in
	 [Yy]*)
    UNAGI=ON
    ;;
   *)
    UNAGI=OFF
    ;;
esac

echo
echo "ơ̾ϤƤ: [$DEFTHEME]"
echo -n "> "
read THEME
if [ -z "$THEME" ]; then
    THEME=$DEFTHEME
fi

echo
echo -n "ª줿硤ƥʤϿƤǤ? [Y/n]: "
read yn
test -n "$yn" || yn="Y"
case "$yn" in
         [Yy]*)
    ANTENNA=OK
    ;;
   *)
    ANTENNA=NG
    ;;
esac

echo
echo "ǥ쥯ȥ $DEFDIARY Ǥ"
echo "ǥ쥯ȥ $DEFHTML Ǥ"
echo -n "Υǥ쥯ȥѹޤ? [y/N]:"
read yn
test -n "$yn" || yn="N"

case "$yn" in
	 [Yy]*)
		  echo
	    echo "ǥ쥯ȥϤƤ: [$DEFDIARY]"
			echo -n "> "
			read DIARY
      if [ -z "$DIARY" ]; then
        DIARY=$DEFDIARY
      fi
      echo
	    echo "ǥ쥯ȥϤƤ: [$DEFHTML]"
			echo -n "> "
			read HTML
      if [ -z "$HTML" ]; then
        HTML=$DEFHTML
      fi
     ;;
   *)
        DIARY=$DEFDIARY
        HTML=$DEFHTML
    ;;
esac

echo
echo " Υȥ         : $TITLE"
echo " ᡼롦ɥ쥹       : $MAIL"
echo " ǥ쥯ȥ       : $DIARY"
echo " ǥ쥯ȥ : $HTML"
echo " Namazu ե    : $UNAGI"
echo " URL                : $URL"
echo " ơ̾               : $THEME"
echo " ƥʤؤϿ   : $ANTENNA"
echo
echo " mail2nikki: "
echo "  To:ɥ쥹           : $TOMAIL2"
echo "  From:ɥ쥹         : $FROMMAIL2" 
echo "  ѥ            : $PASSWD" 
echo
echo -n "ǤǤ? [y/N]: "
read YN
test -n "$YN" || YN="N"
if [ $YN = Y -o $YN = y ]; then
    hnsinstall
    exit
else
    echo "󥹥ȡߤޤ"
    echo
    exit
fi