From owner-FreeBSD-users-jp@jp.freebsd.org  Sat Apr  3 20:04:28 1999
Received: (from daemon@localhost)
	by jaz.jp.freebsd.org (8.9.2+3.1W/8.7.3) id UAA11359;
	Sat, 3 Apr 1999 20:04:28 +0900 (JST)
	(envelope-from owner-FreeBSD-users-jp@jp.FreeBSD.org)
Received: from april.on.rim.or.jp (root@april.on.rim.or.jp [202.247.131.85])
	by jaz.jp.freebsd.org (8.9.2+3.1W/8.7.3) with ESMTP id UAA11354
	for <FreeBSD-users-jp@jp.freebsd.org>; Sat, 3 Apr 1999 20:04:26 +0900 (JST)
	(envelope-from ryo2@on.rim.or.jp)
Received: from quill.on.rim.or.jp (ppp075.jp.rim.or.jp [202.247.164.75])
	by april.on.rim.or.jp (8.8.8/3.6W-RIMNET-98-06-09) with ESMTP id UAA13835;
	Sat, 3 Apr 1999 20:04:22 +0900 (JST)
Message-Id: <199904031104.UAA13835@april.on.rim.or.jp>
Received: from localhost by quill.on.rim.or.jp (8.8.8/3.5Wpl5-97111919)
	id UAA07230; Sat, 3 Apr 1999 20:03:31 +0900 (JST)
To: FreeBSD-users-jp@jp.freebsd.org, neko@sx.miracle.ne.jp
From: Yoshishige ARAI <ryo2@on.rim.or.jp>
In-Reply-To: Your message of "Sat, 03 Apr 1999 00:48:08 +0900"
	<19990403004808U.neko@sx.miracle.ne.jp>
References: <19990403004808U.neko@sx.miracle.ne.jp>
X-Mailer: Mew version 1.93 on XEmacs 20.4 (Emerald)
Mime-Version: 1.0
Content-Type: Multipart/Mixed;
	boundary="--Next_Part(Sat_Apr__3_20:01:55_1999_809)--"
Content-Transfer-Encoding: 7bit
Date: Sat, 03 Apr 1999 20:03:30 +0900 (JST)
X-Dispatcher: imput version 980905(IM100)
Lines: 164
Reply-To: FreeBSD-users-jp@jp.freebsd.org
Precedence: list
X-Distribute: distribute version 2.1 (Alpha) patchlevel 24e+981115
X-Sequence: FreeBSD-users-jp 40796
Subject: [FreeBSD-users-jp 40796] Re: ppp.conf
 =?ISO-2022-JP?B?GyRCJEskRCQkJEYbKEI=?= 
Errors-To: owner-FreeBSD-users-jp@jp.freebsd.org
Sender: owner-FreeBSD-users-jp@jp.freebsd.org
X-Originator: ryo2@on.rim.or.jp

----Next_Part(Sat_Apr__3_20:01:55_1999_809)--
Content-Type: Text/Plain; charset=iso-2022-jp
Content-Transfer-Encoding: 7bit

$B$"$i$$$G$9!#(B

On Sat, 03 Apr 1999 00:48:08 +0900 ([FreeBSD-users-jp 40779] Re: ppp.conf $B$K$D$$$F(B )
shoo kajitani <neko@sx.miracle.ne.jp> wrote:

$B3aC+(B> $B$=$l$K$D$$$F$O(B[FreeBSD-users-jp 40687]$B$GD{@5$7$?$D$b$j$@$C$?$N(B
$B3aC+(B> $B$G$9$,!"9T$-0c$$$K$J$C$F$?$_$?$$$G$9$M!#(B

$BA0$NLk$K%a!<%k=q$$$F!"D+=P$,$1$K%a!<%k=P$7$?$i$b$&D{@5$,=P$F$$$?$N$r8+(B
$BF($7$F$^$7$?!#(B($B$3$l$@$+$i(B users-jp $B$OL}CG$,$J$i$J$$(B)

On Sat, 03 Apr 1999 00:48:08 +0900 ([FreeBSD-users-jp 40779] Re: ppp.conf $B$K$D$$$F(B )
shoo kajitani <neko@sx.miracle.ne.jp> wrote:

$B3aC+(B> $B$G!"F0$+$=$&$H;W$C$?$N$G$9$,!"(B

$B3aC+(B> INF$B%U%!%$%k(B mdmnit.inf $B$NCf$+$i%b%G%`$NDj5A$r8+$D$1$k;v$,=PMh$^$;$s$G$7$?!#(B

$B3aC+(B> $B$H!"$O$8$a$NJ}$G%3%1$F$7$^$$$^$7$?!#;d$K$O$3$NA0=q$$$?%l%Y%k$N(B

$B$3$l$OBgJQ<:Ni$7$^$7$?!#(B ([A-Z\\d]+) $B$,$^$:$+$C$?$G$9!#(B
get_entries $B$C$FH=$j$K$/$+$C$?$G$9$+(B? $B!d3aC+$5$s(B
get_entries("BLOCKNAME", $B@55,I=8=(B) $B$G3F9T$K%^%C%A$7$?(B $1$B$N%j%9%H$rJV$7!"(B
$B@55,I=8=$K(B()$B$rFs$DF~$l$F!"(B
get_entries("BLOCKNAME", $B@55,I=8=(B, TRUE)$B$H$9$l$P!"(BA{$1}= $2 $B$G$"$k$h$&(B
$B$JO"A[G[Ns$rJV$7$^$9!#(B

On Fri, 02 Apr 1999 02:32:06 +0900 ([FreeBSD-users-jp 40690] Re: ppp.conf $B$K$D$$$F(B )
Issei Suzuki <issei@issei.org> wrote:

$BNkLZ(B>   http://msdn.microsoft.com/library/ $B$+$i(B

$B$3$s$JJ8=q$,L5$$$N$+$H;W$C$F$$$^$7$?$,!"C5$;$P$"$k$s$G$9$M!#(B
RTS/CTS$B@)8f$O!"(BFlowControl_Hard $B$GNI$$$h$&$G$9$,!"(B

$B3aC+(B> $B!&%-%c%j%"$N8!=P$H(BCD$B$N?.9f$rO"F0$5$;$k(B
$B3aC+(B> $B!&(BDTR$B$,%*%U$K$J$C$?$i2s@~$r@ZCG$9$k(B

$B$3$l$K$D$$$F$O!"(BUS Robotics$B$N%b%G%`%+!<%IIUB0$N(B inf$B$G$O!"=i4|2=%3%^%s(B
$B%I$K4^$^$l$F$7$^$C$F$$$F!"@hDx$N(B Microsoft$B$N%I%-%e%a%s%H$K$b=q$+$l$F$$(B
$B$^$;$s$G$7$?!#(B
$BB>!"(B"<cr>" $B$b(B HKR, Settings, Terminator $B$GDj5A$9$k$b$N$N$h$&$J$N$G!"(B
$B$=$3$b4^$a$F=$@5$7$?$b$N$rE:IU$7$^$9!#(B
--------
$B9S0fNI=E(B(Yoshishige Arai)
ryo2@on.rim.or.jp

----Next_Part(Sat_Apr__3_20:01:55_1999_809)--
Content-Type: Text/Plain; charset=iso-2022-jp
Content-Transfer-Encoding: 7bit
Content-Description: getmdminit.pl
Content-Disposition: attachment; filename=getmdminit.pl

#!/usr/bin/perl

($prog) = ($0 =~ /([^\/]+)$/);
print "***** Windows$BMQ%b%G%`(BINF$B%U%!%$%k%A%'%C%+!<(B *****\n";
print "$prog $B$O!"%b%G%`$N=i4|2=%3%^%s%I$rC5$7=P$9(BTool$B$G$9!#(B\n";
print "Written by shoo kajitani.\n\n";

$inffile = $ARGV[0];

while($inffile eq "") {
    print "INF$B%U%!%$%k$r;XDj$7$F2<$5$$(B(Ctrl-C$B$G=*N;(B): ";
    chop($inffile = <STDIN>);
}
open(INF,"$inffile") || die "INF$B%U%!%$%k(B $inffile $B$r3+$/;v$,$G$-$^$;$s$G$7$?!#(B\n"; 
@inf = <INF>;
close(INF);

@manifacturer = &get_entries("Manufacturer", '%(\S+)%\s*=');
%items = &get_entries("Strings", '(\S+)\s*=(.+)', TRUE);
delete $items{'ClassName'};
foreach (@manifacturer) { delete $items{$_}; }

scalar(%items)
    || die "INF$B%U%!%$%k(B $inffile $B$NCf$+$i%b%G%`$NDj5A$r8+$D$1$k;v$,=PMh$^$;$s$G$7$?!#(B\n";
$i = 0;
foreach (sort keys %items) {
    $modem{++$i} = $_;
    print sprintf("%2d) %s\t%s\n", $i,$_,$items{$_});
}

print "$B$"$J$?$N%b%G%`$O$I$l$G$9$+!#(B";
while(!defined($modem{$modem_number})) {
    print "$BHV9f$rF~NO$7$F2<$5$$(B(Ctrl-C$B$G=*N;(B): ";
    chop($modem_number = <STDIN>);
    unless($modem{$modem_number}) {
	print "$BHV9f$,@5$7$/$J$$$h$&$G$9!#(B";
	next;
    }
    print "$modem{$modem_number} $B$G$9$M!#(B\n\n";
    foreach (@inf) {
	/^%$modem{$modem_number}%\s*=\s*/i && ($modem_tmp = $', last);
    }
    if ($modem_tmp =~ /^[\w\d]+/i) {
	$modem_name = $&;
	foreach (&get_entries($modem_name, 'AddReg\s*=(.*)')) {
	    @checklist = split(/,/);
	}
	foreach $x (@checklist) {
	    $x =~ s/[ \r\n\t]//g;
	    %tmp = &get_entries($x, 'HKR,\s*Settings,\s*([^,\s]+),.*,\s*"(.+)"', TRUE);
	    foreach (keys %tmp) {
		$settings{$_} = $tmp{$_};
	    }
	    %items = &get_entries($x, 'HKR,\s*Init,.*(\d+).*"AT\s*(.+)"', TRUE);
	    foreach (sort {$a <=> $b} keys %items) {
		$at_commands .= $items{$_};
	    }
	}
    }
}

$at_commands =~ s/\s//g;
$settings{'Terminator'} || ($settings{'Terminator'} = "<cr>");
$at_commands =~ s/$settings{'Terminator'}//g;
print (($at_commands ne "")? "$B=i4|2=%3%^%s%I$O(B AT$at_commands $B$N$h$&$G$9!#(B\n"
       :"$B=i4|2=%3%^%s%I$,8+$D$+$j$^$;$s$G$7$?!#(B\n\n");
$settings{'FlowControl_Hard'}
  && print "$B%O!<%I%&%'%"%U%m!<@)8f%3%^%s%I$O(B $settings{'FlowControl_Hard'} $B$G$9!#(B\n";
$settings{'Blind_On'}
  && print "$B9=FbEEOC!"(BPBX $BEy$G$O%@%$%"%k%H!<%s8!=P$r$7$J$$%3%^%s%I(B ".
	"$settings{'Blind_On'} $B$b2C$($F2<$5$$!#(B\n";

print <<EOF;
$BK\Ev$+$J$!!#(B:-)\n
$BF0$+$J$$>l9g$O!"(B
$B=i4|2=%3%^%s%I$r(B ATE1Q0 $B$K$7$F$_$F2<$5$$!#(B
$B$=$l$G$bF0$+$J$$$d$&$J$i(B http://www.jp.freebsd.org/ $B$G(B
$B$"$J$?$N%b%G%`$N7?HV$r8!:w$7$F$_$^$;$&!#$=$l$G$b2?$b(B
$B>pJs$,F@$i$l$J$1$l$P(B FreeBSD-users-jp ML $B$d!"(BNews Group
fj.os.bsd.freebsd $B$G?R$M$F$_$^$;$&!#(B
EOF

exit(0);

sub get_entries {
    local($name, $regex, $assoc_required) = @_;
    local($in_the_block, $s1, $s2, @matched, %matched) = ();

    foreach (@inf) {
	if($in_the_block) {
	    (/^;/ || /^[\s\t]*$/)&& next;
	    /^\[/ && last;
	    if($assoc_required) {
	      (($s1, $s2) = /^$regex/) && ($matched{$s1} = $s2);
	    } else {
	      /^$regex/ && push(@matched, $1);
	    }
	} elsif (/^\[$name\]/i) {
	    $in_the_block = TRUE;
	}
    }
    ($assoc_required)? %matched:@matched;
}

sub TRUE {1;}

----Next_Part(Sat_Apr__3_20:01:55_1999_809)----
