From daemon@optimus.ietf.org Mon Jul 1 07:58:42 2002 Received: from optimus.ietf.org (ietf.org [132.151.1.19] (may be forged)) by ietf.org (8.9.1a/8.9.1a) with ESMTP id HAA29073 for ; Mon, 1 Jul 2002 07:58:42 -0400 (EDT) Received: (from daemon@localhost) by optimus.ietf.org (8.9.1a/8.9.1) id HAA18873 for diffserv-interest-archive@odin.ietf.org; Mon, 1 Jul 2002 07:59:31 -0400 (EDT) Received: from optimus.ietf.org (localhost [127.0.0.1]) by optimus.ietf.org (8.9.1a/8.9.1) with ESMTP id HAA18797; Mon, 1 Jul 2002 07:58:23 -0400 (EDT) Received: from ietf.org (odin [132.151.1.176]) by optimus.ietf.org (8.9.1a/8.9.1) with ESMTP id HAA18635 for ; Mon, 1 Jul 2002 07:53:01 -0400 (EDT) Received: from lit.a-star.edu.sg (rodin.krdl.org.sg [192.122.139.27]) by ietf.org (8.9.1a/8.9.1a) with ESMTP id HAA28754 for ; Mon, 1 Jul 2002 07:52:11 -0400 (EDT) From: munro@lit.a-star.edu.sg Received: from mailhost1 (localhost [127.0.0.1]) by lit.a-star.edu.sg (8.11.1/8.11.1) with ESMTP id g61Bq4624954 for ; Mon, 1 Jul 2002 19:52:04 +0800 (SGT) Received: from lit.org.sg (localhost [127.0.0.1]) by mailhost.lit.org.sg (iPlanet Messaging Server 5.2 HotFix 0.5 (built Jun 7 2002)) with ESMTP id <0GYK0014EJP4BM@mailhost.lit.org.sg> for diffserv-interest@ietf.org; Mon, 01 Jul 2002 19:53:32 +0800 (SGT) Received: from [192.168.133.63] by mailhost.lit.org.sg (mshttpd); Mon, 01 Jul 2002 19:53:28 +0800 Date: Mon, 01 Jul 2002 19:53:28 +0800 To: diffserv-interest@ietf.org Message-id: <372d238289.38289372d2@lit.org.sg> MIME-version: 1.0 X-Mailer: iPlanet Messenger Express 5.2 HotFix 0.5 (built Jun 7 2002) Content-type: text/plain; charset=us-ascii Content-language: en Content-transfer-encoding: 7BIT Content-disposition: inline X-Accept-Language: en Priority: normal Content-Transfer-Encoding: 7BIT Subject: [Diffserv-interest] Re: Diffserv-interest digest, Vol 1 #63 - 2 msgs Sender: diffserv-interest-admin@ietf.org Errors-To: diffserv-interest-admin@ietf.org X-Mailman-Version: 1.0 Precedence: bulk List-Id: Differentiated services general discussion X-BeenThere: diffserv-interest@ietf.org Content-Transfer-Encoding: 7BIT Hi all, Do we have pthreads support in the existing tcng tcsim . If not then ,can we achieve the same. Thanks in advance _______________________________________________ Diffserv-interest mailing list Diffserv-interest@ietf.org https://www1.ietf.org/mailman/listinfo/diffserv-interest From daemon@optimus.ietf.org Mon Jul 1 09:57:55 2002 Received: from optimus.ietf.org (ietf.org [132.151.1.19] (may be forged)) by ietf.org (8.9.1a/8.9.1a) with ESMTP id JAA06168 for ; Mon, 1 Jul 2002 09:57:55 -0400 (EDT) Received: (from daemon@localhost) by optimus.ietf.org (8.9.1a/8.9.1) id JAA29515 for diffserv-interest-archive@odin.ietf.org; Mon, 1 Jul 2002 09:58:42 -0400 (EDT) Received: from optimus.ietf.org (localhost [127.0.0.1]) by optimus.ietf.org (8.9.1a/8.9.1) with ESMTP id JAA28800; Mon, 1 Jul 2002 09:53:24 -0400 (EDT) Received: from ietf.org (odin [132.151.1.176]) by optimus.ietf.org (8.9.1a/8.9.1) with ESMTP id JAA28771 for ; Mon, 1 Jul 2002 09:53:22 -0400 (EDT) Received: from d12lmsgate.de.ibm.com (d12lmsgate.de.ibm.com [195.212.91.199]) by ietf.org (8.9.1a/8.9.1a) with ESMTP id JAA05776 for ; Mon, 1 Jul 2002 09:52:34 -0400 (EDT) Received: from d12relay01.de.ibm.com (d12relay01.de.ibm.com [9.165.215.22]) by d12lmsgate.de.ibm.com (8.12.3/8.12.3) with ESMTP id g61DqVrC010364; Mon, 1 Jul 2002 15:52:33 +0200 Received: from etzel.zurich.ibm.com (etzel.zurich.ibm.com [9.4.64.140]) by d12relay01.de.ibm.com (8.11.1m3/NCO/VER6.1) with SMTP id g61DqDu103990; Mon, 1 Jul 2002 15:52:13 +0200 Received: from dhcp23-199.zurich.ibm.com by etzel.zurich.ibm.com (AIX 4.3/UCB 5.64/4.03) id AA50236 from ; Mon, 1 Jul 2002 15:51:44 +0200 Message-Id: <3D205EA2.E85BC1D1@hursley.ibm.com> Date: Mon, 01 Jul 2002 15:52:34 +0200 From: Brian E Carpenter Organization: IBM X-Mailer: Mozilla 4.79 [en] (Windows NT 5.0; U) X-Accept-Language: en,fr,de Mime-Version: 1.0 To: Dan Grossman Cc: brunner@ccrle.nec.de, Kathleen Nichols , diffserv-interest@ietf.org Subject: Re: [Diffserv-interest] Re: [Diffserv] Hard questions (was:Diffserv PIB approved asInformational RFC) References: <3D1C4CD1.5D9FAE2A@hursley.ibm.com> <8301096.1025276134@[192.168.102.207]> <3D1CBC3A.55E72178@dma.isg.mot.com> Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit Content-Transfer-Encoding: 7bit Sender: diffserv-interest-admin@ietf.org Errors-To: diffserv-interest-admin@ietf.org X-Mailman-Version: 1.0 Precedence: bulk List-Id: Differentiated services general discussion X-BeenThere: diffserv-interest@ietf.org Content-Transfer-Encoding: 7bit I don't understand the doom and gloom. We set out to define domain-based service differentiation, because that's what users and service providers both told us they wanted. That's what we did. I count this as a success. It's no news that end-to-end QOS is a hard problem. But that wasn't the problem we tried to solve. It's a fact that some parts of the industry, that only started coming to the IETF since the diffserv effort began, appear to believe that e2e QOS is a simple matter that should have been fixed long ago. I haven't believed this since I read Kleinrock's two volumes on queueing theory many years ago. I find the phrase "e2e QOS guarantees" to be self-contradicting when applied to the Internet. Expecting complete consistency between alternative implementations of the "same" PDB isn't reasonable, but it doesn't matter in terms of interoperability. Everything is statistical anyway. Brian Dan Grossman wrote: > > > > > All this is very discouraging, perhaps indicative of a massive failure of the > Diffserv standardization exercise. It also raises questions as to whether the > historical accomodation between the IETF standarization process and the business > needs of its participants' employers hasn't in fact broken down. > > > I completely understand that. I even think since the definition of crisp > > PDB is very complicated, it adds value to solution, which people don't just > > want to give away for standardization. > > > > E.g., we the did the following PDB: > > - p2p > > Can you explain this one? > > > > > - guaranteed throughput no loss for packets within CIR profile > > - maximum delay bound > > > > We defined configuration rules for our DiffServ implementation. And we are > > sure this PDB is not implementable with some of the other DiffServ > > implementations (even if they conform to the standard). > > Is the problem that PHBs are underspecified? Or is the issue in classifiers, > conditioners, queuing systems and/or schedulers? > > > > > > > >From the process we actually first looked into our implementation and then > > tried to figure out how the PDB looks like. > > Can you explain a bit more, and, in particular, were you looking at quantifiable > parameters only, or were there also temporal or other behaviors that were > affected? > > > > > > > On the other hand, for the community and for helping the deployment, a > > small set of PDBs (even if they are very loose without stringent > > guarantees) would help. whether we are able to agree on them is a different > > question, because some of the people are not able to implement them with > > they DiffServ nodes. > > If this is true, then we have created a bunch of standards that don't advance > interoperability, and thus have failed. I knew that there were problems, but > didn't realize that it was this bad. Is there anything that can be learned > from this? _______________________________________________ Diffserv-interest mailing list Diffserv-interest@ietf.org https://www1.ietf.org/mailman/listinfo/diffserv-interest From daemon@optimus.ietf.org Mon Jul 1 12:18:40 2002 Received: from optimus.ietf.org (ietf.org [132.151.1.19] (may be forged)) by ietf.org (8.9.1a/8.9.1a) with ESMTP id MAA15765 for ; Mon, 1 Jul 2002 12:18:40 -0400 (EDT) Received: (from daemon@localhost) by optimus.ietf.org (8.9.1a/8.9.1) id MAA14710 for diffserv-interest-archive@odin.ietf.org; Mon, 1 Jul 2002 12:19:27 -0400 (EDT) Received: from optimus.ietf.org (localhost [127.0.0.1]) by optimus.ietf.org (8.9.1a/8.9.1) with ESMTP id MAA14548; Mon, 1 Jul 2002 12:17:16 -0400 (EDT) Received: from ietf.org (odin [132.151.1.176]) by optimus.ietf.org (8.9.1a/8.9.1) with ESMTP id MAA14521 for ; Mon, 1 Jul 2002 12:17:15 -0400 (EDT) Received: from tokyo.ccrle.nec.de (tokyo.ccrle.nec.de [195.37.70.2]) by ietf.org (8.9.1a/8.9.1a) with ESMTP id MAA15574 for ; Mon, 1 Jul 2002 12:16:27 -0400 (EDT) Received: from wallace.heidelberg.ccrle.nec.de (root@wallace.heidelberg.ccrle.nec.de [192.168.102.1]) by tokyo.ccrle.nec.de (8.11.6/8.11.6) with ESMTP id g61GGhK66953; Mon, 1 Jul 2002 18:16:43 +0200 (CEST) (envelope-from brunner@ccrle.nec.de) Received: from imap.heidelberg.ccrle.nec.de (imap.heidelberg.ccrle.nec.de [192.168.102.11]) by wallace.heidelberg.ccrle.nec.de (8.9.3/8.9.3/SuSE Linux 8.9.3-0.1) with ESMTP id SAA06053; Mon, 1 Jul 2002 18:11:21 +0200 Received: from [192.168.102.207] (marcus.heidelberg.ccrle.nec.de [192.168.102.207]) by imap.heidelberg.ccrle.nec.de (Postfix on SuSE Linux eMail Server 3.0) with ESMTP id 23A524F0D6; Mon, 1 Jul 2002 18:11:20 +0200 (CEST) Date: Mon, 01 Jul 2002 18:11:23 +0200 From: Marcus Brunner Reply-To: brunner@ccrle.nec.de To: Dan Grossman Cc: Brian E Carpenter , Kathleen Nichols , diffserv-interest@ietf.org Subject: Re: [Diffserv-interest] Re: [Diffserv] Hard questions (was:Diffserv PIB approved asInformational RFC) Message-ID: <30654578.1025547083@[192.168.102.207]> X-Mailer: Mulberry/2.2.0 (Win32) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii; FORMAT=flowed Content-Transfer-Encoding: 7bit Content-Disposition: inline Content-Transfer-Encoding: 7bit Sender: diffserv-interest-admin@ietf.org Errors-To: diffserv-interest-admin@ietf.org X-Mailman-Version: 1.0 Precedence: bulk List-Id: Differentiated services general discussion X-BeenThere: diffserv-interest@ietf.org Content-Transfer-Encoding: 7bit I don't feel this is discouraging. It means that IETF is in general doing a good job, because it tends to do very easy solutions. DiffServ is a good solution for a set of problem, but definitly not for all QoS related solutions. To provide hard guarntees is very diffucult in each network architecture. Additionally, I personally don't see the problem in the network, but on control and management side (or plane using ATM wording). --On Freitag, 28. Juni 2002 15:42 -0400 Dan Grossman wrote: >> > > All this is very discouraging, perhaps indicative of a massive failure of > the Diffserv standardization exercise. It also raises questions as to > whether the historical accomodation between the IETF standarization > process and the business needs of its participants' employers hasn't in > fact broken down. > >> I completely understand that. I even think since the definition of crisp >> PDB is very complicated, it adds value to solution, which people don't >> just want to give away for standardization. >> >> E.g., we the did the following PDB: >> - p2p > > Can you explain this one? > Sorry, point to point. >> >> - guaranteed throughput no loss for packets within CIR profile >> - maximum delay bound >> >> We defined configuration rules for our DiffServ implementation. And we >> are sure this PDB is not implementable with some of the other DiffServ >> implementations (even if they conform to the standard). > > Is the problem that PHBs are underspecified? Or is the issue in > classifiers, conditioners, queuing systems and/or schedulers? I think it is the problem of choosing classifier/ condtioner etc. implementations and their calibration/configuration. We honestly don't even use PHBs in their general specifications, however we also did not look in the new EF spec too thouroughly. >> >> >> > From the process we actually first looked into our implementation and >> > then >> tried to figure out how the PDB looks like. > > Can you explain a bit more, and, in particular, were you looking at > quantifiable parameters only, or were there also temporal or other > behaviors that were affected? quantifiable parameters only. (The project was actually to figure out hardware settings of some of the parameters such that we can provide a set of PDB.) >> >> >> On the other hand, for the community and for helping the deployment, a >> small set of PDBs (even if they are very loose without stringent >> guarantees) would help. whether we are able to agree on them is a >> different question, because some of the people are not able to implement >> them with they DiffServ nodes. > > If this is true, then we have created a bunch of standards that don't > advance interoperability, and thus have failed. I knew that there were > problems, but didn't realize that it was this bad. Is there anything > that can be learned from this? Depends a little on what level you want to interooperate (router to router, or network to network) he PDB I regard more a network to network issues, and there the management and control plane are the more unsolved problem. But there is hope. We are in contact with some customers which want to deploy first services, but this is not only technical, but also organisational and adminstative complex in large organisations. Marcus -------------------------------------- Dr. Marcus Brunner Network Laboratories NEC Europe Ltd. E-Mail: brunner@ccrle.nec.de WWW: http://www.ccrle.nec.de/ personal home page: http://www.brubers.org/marcus _______________________________________________ Diffserv-interest mailing list Diffserv-interest@ietf.org https://www1.ietf.org/mailman/listinfo/diffserv-interest From daemon@optimus.ietf.org Wed Jul 3 04:39:45 2002 Received: from optimus.ietf.org (ietf.org [132.151.1.19] (may be forged)) by ietf.org (8.9.1a/8.9.1a) with ESMTP id EAA01694 for ; Wed, 3 Jul 2002 04:39:45 -0400 (EDT) Received: (from daemon@localhost) by optimus.ietf.org (8.9.1a/8.9.1) id EAA21466 for diffserv-interest-archive@odin.ietf.org; Wed, 3 Jul 2002 04:40:32 -0400 (EDT) Received: from optimus.ietf.org (localhost [127.0.0.1]) by optimus.ietf.org (8.9.1a/8.9.1) with ESMTP id EAA21337; Wed, 3 Jul 2002 04:38:31 -0400 (EDT) Received: from ietf.org (odin [132.151.1.176]) by optimus.ietf.org (8.9.1a/8.9.1) with ESMTP id NAA11806 for ; Tue, 2 Jul 2002 13:36:59 -0400 (EDT) Received: from motgate3.mot.com (motgate3.mot.com [144.189.100.103]) by ietf.org (8.9.1a/8.9.1a) with ESMTP id NAA03218 for ; Tue, 2 Jul 2002 13:36:10 -0400 (EDT) Received: [from pobox.mot.com (pobox.mot.com [129.188.137.100]) by motgate3.mot.com (motgate3 2.1) with ESMTP id KAA02431; Tue, 2 Jul 2002 10:36:05 -0700 (MST)] Received: [from noah.dma.isg.mot.com (noah.dma.isg.mot.com [150.21.2.29]) by pobox.mot.com (MOT-pobox 2.0) with ESMTP id KAA04794; Tue, 2 Jul 2002 10:36:51 -0700 (MST)] Received: from dma.isg.mot.com (ma07-0056.dma.isg.mot.com [150.21.30.201]) by noah.dma.isg.mot.com (8.8.8+Sun/8.8.8) with ESMTP id NAA27984; Tue, 2 Jul 2002 13:36:46 -0400 (EDT) Message-ID: <3D21E4AE.3705063F@dma.isg.mot.com> Date: Tue, 02 Jul 2002 13:36:46 -0400 From: Dan Grossman X-Mailer: Mozilla 4.5 [en] (WinNT; U) X-Accept-Language: en MIME-Version: 1.0 To: brunner@ccrle.nec.de CC: Brian E Carpenter , Kathleen Nichols , diffserv-interest@ietf.org Subject: Re: [Diffserv-interest] Re: [Diffserv] Hard questions (was:DiffservPIB approved asInformational RFC) References: <30654578.1025547083@[192.168.102.207]> Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit Content-Transfer-Encoding: 7bit Sender: diffserv-interest-admin@ietf.org Errors-To: diffserv-interest-admin@ietf.org X-Mailman-Version: 1.0 Precedence: bulk List-Id: Differentiated services general discussion X-BeenThere: diffserv-interest@ietf.org Content-Transfer-Encoding: 7bit Marcus Brunner wrote: > I don't feel this is discouraging. It means that IETF is in general doing a > good job, because it tends to do very easy solutions. I'm don't understand this. Are you saying that IETF is doing a good job because its solutions are simple (regardless of how much complexity is needed to solve the problem) or because it does the easy bits and ignores the complex ones? > > DiffServ is a good solution for a set of problem, but definitly not for all > QoS related solutions. > > To provide hard guarntees is very diffucult in each network architecture. It was relatively easy in ATM , but I won't go there... > > Additionally, I personally don't see the problem in the network, but on > control and management side (or plane using ATM wording). So you're saying that the next steps toward QoS should be in the context of NSIS, control/management architectures, etc.? > > > > >> > >> E.g., we the did the following PDB: > >> - p2p > > > > Can you explain this one? > > > > Sorry, point to point. Point to point usually describes topology, not edge-to-edge transfer characteristics. What is it about point-to-point that requires a unique set of transfer characteristics, and what are they? > > > >> > >> - guaranteed throughput no loss for packets within CIR profile > >> - maximum delay bound > >> > >> We defined configuration rules for our DiffServ implementation. And we > >> are sure this PDB is not implementable with some of the other DiffServ > >> implementations (even if they conform to the standard). > > > > Is the problem that PHBs are underspecified? Or is the issue in > > classifiers, conditioners, queuing systems and/or schedulers? > > I think it is the problem of choosing classifier/ condtioner etc. > implementations and their calibration/configuration. We honestly don't even > use PHBs in their general specifications, however we also did not look in > the new EF spec too thouroughly. Was this a matter of some work that Diffserv didn't do, or was it that you disagreed with the PHBs that were specified? > > > >> > >> > >> > From the process we actually first looked into our implementation and > >> > then > >> tried to figure out how the PDB looks like. > > > > Can you explain a bit more, and, in particular, were you looking at > > quantifiable parameters only, or were there also temporal or other > > behaviors that were affected? > > quantifiable parameters only. (The project was actually to figure out > hardware settings of some of the parameters such that we can provide a set > of PDB.) So in our taxonomy, many of your issues were really edge-to-edge service issues rather than PDB issues? That is, we say that a PDB defines parameters, but does not specify their values. In a service, the values are filled in. Do you consider the former to be a significant issue, or are the problems only in the latter? > > > >> > >> > >> On the other hand, for the community and for helping the deployment, a > >> small set of PDBs (even if they are very loose without stringent > >> guarantees) would help. whether we are able to agree on them is a > >> different question, because some of the people are not able to implement > >> them with they DiffServ nodes. > > > > If this is true, then we have created a bunch of standards that don't > > advance interoperability, and thus have failed. I knew that there were > > problems, but didn't realize that it was this bad. Is there anything > > that can be learned from this? > > Depends a little on what level you want to interooperate (router to router, > or network to network) he PDB I regard more a network to network issues, > and there the management and control plane are the more unsolved problem. So you're saying that the what was done in the narrow confines of Diffserv was good enough, and that the problem is a matter of the broader architecture and mechanisms for control and management? Or should Diffserv have done more? What do you suggest as next steps? > > > But there is hope. We are in contact with some customers which want to > deploy first services, but this is not only technical, but also > organisational and adminstative complex in large organisations. > > Marcus > > -------------------------------------- > Dr. Marcus Brunner > Network Laboratories > NEC Europe Ltd. > > E-Mail: brunner@ccrle.nec.de > WWW: http://www.ccrle.nec.de/ > personal home page: http://www.brubers.org/marcus _______________________________________________ Diffserv-interest mailing list Diffserv-interest@ietf.org https://www1.ietf.org/mailman/listinfo/diffserv-interest From daemon@ns.ietf.org Wed Jul 3 08:29:30 2002 Received: from optimus.ietf.org (ietf.org [132.151.1.19] (may be forged)) by ietf.org (8.9.1a/8.9.1a) with ESMTP id IAA09365 for ; Wed, 3 Jul 2002 08:29:30 -0400 (EDT) Received: (from daemon@localhost) by optimus.ietf.org (8.9.1a/8.9.1) id IAA05117 for diffserv-interest-archive@odin.ietf.org; Wed, 3 Jul 2002 08:30:19 -0400 (EDT) Received: from optimus.ietf.org (localhost [127.0.0.1]) by optimus.ietf.org (8.9.1a/8.9.1) with ESMTP id IAA04902; Wed, 3 Jul 2002 08:29:03 -0400 (EDT) Received: from ietf.org (odin [132.151.1.176]) by optimus.ietf.org (8.9.1a/8.9.1) with ESMTP id IAA04856 for ; Wed, 3 Jul 2002 08:28:59 -0400 (EDT) Received: from tokyo.ccrle.nec.de (tokyo.ccrle.nec.de [195.37.70.2]) by ietf.org (8.9.1a/8.9.1a) with ESMTP id IAA09303 for ; Wed, 3 Jul 2002 08:28:09 -0400 (EDT) Received: from wallace.heidelberg.ccrle.nec.de (root@wallace.heidelberg.ccrle.nec.de [192.168.102.1]) by tokyo.ccrle.nec.de (8.11.6/8.11.6) with ESMTP id g63CSLI49647; Wed, 3 Jul 2002 14:28:21 +0200 (CEST) (envelope-from brunner@ccrle.nec.de) Received: from imap.heidelberg.ccrle.nec.de (imap.heidelberg.ccrle.nec.de [192.168.102.11]) by wallace.heidelberg.ccrle.nec.de (8.9.3/8.9.3/SuSE Linux 8.9.3-0.1) with ESMTP id OAA29122; Wed, 3 Jul 2002 14:22:52 +0200 Received: from [192.168.102.207] (marcus.heidelberg.ccrle.nec.de [192.168.102.207]) by imap.heidelberg.ccrle.nec.de (Postfix on SuSE Linux eMail Server 3.0) with ESMTP id F398749A15; Wed, 3 Jul 2002 14:22:51 +0200 (CEST) Date: Wed, 03 Jul 2002 14:22:52 +0200 From: Marcus Brunner Reply-To: brunner@ccrle.nec.de To: Dan Grossman Cc: Brian E Carpenter , Kathleen Nichols , diffserv-interest@ietf.org Subject: Re: [Diffserv-interest] Re: [Diffserv] Hard questions (was:DiffservPIB approved asInformational RFC) Message-ID: <13099556.1025706172@[192.168.102.207]> In-Reply-To: <3D21E4AE.3705063F@dma.isg.mot.com> References: <3D21E4AE.3705063F@dma.isg.mot.com> X-Mailer: Mulberry/2.2.0 (Win32) MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii; format=flowed Content-Transfer-Encoding: 7bit Content-Disposition: inline Content-Transfer-Encoding: 7bit Sender: diffserv-interest-admin@ietf.org Errors-To: diffserv-interest-admin@ietf.org X-Mailman-Version: 1.0 Precedence: bulk List-Id: Differentiated services general discussion X-BeenThere: diffserv-interest@ietf.org Content-Transfer-Encoding: 7bit >> I don't feel this is discouraging. It means that IETF is in general >> doing a good job, because it tends to do very easy solutions. > > I'm don't understand this. Are you saying that IETF is doing a good job > because its solutions are simple (regardless of how much complexity is > needed to solve the problem) or because it does the easy bits and ignores > the complex ones? > I think the first one. The complex solution will be propriatary anyway and only be standardized with big pressure from the market side. >> >> DiffServ is a good solution for a set of problem, but definitly not for >> all QoS related solutions. >> >> To provide hard guarntees is very diffucult in each network architecture. > > It was relatively easy in ATM , but I won't go there... Honestly it was not easy, and will never be. >> >> Additionally, I personally don't see the problem in the network, but on >> control and management side (or plane using ATM wording). > > So you're saying that the next steps toward QoS should be in the context > of NSIS, control/management architectures, etc.? I am not sure whether NSIS can solve the difficult part (I currently don't see the willingness). But it will add another standard piece to the solution. >> >> >> >> >> >> >> E.g., we the did the following PDB: >> >> - p2p >> > >> > Can you explain this one? >> > >> >> Sorry, point to point. > > Point to point usually describes topology, not edge-to-edge transfer > characteristics. What is it about point-to-point that requires a unique > set of transfer characteristics, and what are they? Yes, I means topology (without transfer characteristics). But we also looked into one-to-any type of services. >> >> >> >> >> >> - guaranteed throughput no loss for packets within CIR profile >> >> - maximum delay bound >> >> >> >> We defined configuration rules for our DiffServ implementation. And we >> >> are sure this PDB is not implementable with some of the other DiffServ >> >> implementations (even if they conform to the standard). >> > >> > Is the problem that PHBs are underspecified? Or is the issue in >> > classifiers, conditioners, queuing systems and/or schedulers? >> >> I think it is the problem of choosing classifier/ condtioner etc. >> implementations and their calibration/configuration. We honestly don't >> even use PHBs in their general specifications, however we also did not >> look in the new EF spec too thouroughly. > > Was this a matter of some work that Diffserv didn't do, or was it that you > disagreed with the PHBs that were specified? I think PHB are underspecified. >> >> >> >> >> >> >> >> > From the process we actually first looked into our implementation >> >> > and then >> >> tried to figure out how the PDB looks like. >> > >> > Can you explain a bit more, and, in particular, were you looking at >> > quantifiable parameters only, or were there also temporal or other >> > behaviors that were affected? >> >> quantifiable parameters only. (The project was actually to figure out >> hardware settings of some of the parameters such that we can provide a >> set of PDB.) > > So in our taxonomy, many of your issues were really edge-to-edge service > issues rather than PDB issues? That is, we say that a PDB defines > parameters, but does not specify their values. In a service, the values > are filled in. Do you consider the former to be a significant issue, or > are the problems only in the latter? Might be a problem, but finally you have to fill-in the parameters and provisiong your network, and I do not care what you call PDB and what service. >> >> >> >> >> >> >> >> On the other hand, for the community and for helping the deployment, a >> >> small set of PDBs (even if they are very loose without stringent >> >> guarantees) would help. whether we are able to agree on them is a >> >> different question, because some of the people are not able to >> >> implement them with they DiffServ nodes. >> > >> > If this is true, then we have created a bunch of standards that don't >> > advance interoperability, and thus have failed. I knew that there were >> > problems, but didn't realize that it was this bad. Is there anything >> > that can be learned from this? >> >> Depends a little on what level you want to interooperate (router to >> router, or network to network) he PDB I regard more a network to network >> issues, and there the management and control plane are the more unsolved >> problem. > > So you're saying that the what was done in the narrow confines of > Diffserv was good enough, and that the problem is a matter of the broader > architecture and mechanisms for control and management? Or should > Diffserv have done more? What do you suggest as next steps? I agree here with Brian, lets wait an see if there really is a market. We should not further invest in standardizing technologies if they are not taking off. Marcus >> >> >> But there is hope. We are in contact with some customers which want to >> deploy first services, but this is not only technical, but also >> organisational and adminstative complex in large organisations. >> >> Marcus >> >> -------------------------------------- >> Dr. Marcus Brunner >> Network Laboratories >> NEC Europe Ltd. >> >> E-Mail: brunner@ccrle.nec.de >> WWW: http://www.ccrle.nec.de/ >> personal home page: http://www.brubers.org/marcus > -------------------------------------- Dr. Marcus Brunner Network Laboratories NEC Europe Ltd. E-Mail: brunner@ccrle.nec.de WWW: http://www.ccrle.nec.de/ personal home page: http://www.brubers.org/marcus _______________________________________________ Diffserv-interest mailing list Diffserv-interest@ietf.org https://www1.ietf.org/mailman/listinfo/diffserv-interest From daemon@optimus.ietf.org Mon Jul 8 02:40:57 2002 Received: from optimus.ietf.org (ietf.org [132.151.1.19] (may be forged)) by ietf.org (8.9.1a/8.9.1a) with ESMTP id CAA05346 for ; Mon, 8 Jul 2002 02:40:57 -0400 (EDT) Received: (from daemon@localhost) by optimus.ietf.org (8.9.1a/8.9.1) id CAA25853 for diffserv-interest-archive@odin.ietf.org; Mon, 8 Jul 2002 02:41:49 -0400 (EDT) Received: from optimus.ietf.org (localhost [127.0.0.1]) by optimus.ietf.org (8.9.1a/8.9.1) with ESMTP id CAA25674; Mon, 8 Jul 2002 02:39:00 -0400 (EDT) Received: from ietf.org (odin [132.151.1.176]) by optimus.ietf.org (8.9.1a/8.9.1) with ESMTP id CAA25643 for ; Mon, 8 Jul 2002 02:38:57 -0400 (EDT) Received: from d12lmsgate-2.de.ibm.com (d12lmsgate-2.de.ibm.com [195.212.91.200]) by ietf.org (8.9.1a/8.9.1a) with ESMTP id CAA05273 for ; Mon, 8 Jul 2002 02:38:04 -0400 (EDT) Received: from d12relay01.de.ibm.com (d12relay01.de.ibm.com [9.165.215.22]) by d12lmsgate-2.de.ibm.com (8.12.3/8.12.3) with ESMTP id g686c6IS071070; Mon, 8 Jul 2002 08:38:07 +0200 Received: from etzel.zurich.ibm.com (etzel.zurich.ibm.com [9.4.64.140]) by d12relay01.de.ibm.com (8.11.1m3/NCO/VER6.2) with SMTP id g686c4G136836; Mon, 8 Jul 2002 08:38:04 +0200 Received: from dhcp23-199.zurich.ibm.com by etzel.zurich.ibm.com (AIX 4.3/UCB 5.64/4.03) id AA27380 from ; Mon, 8 Jul 2002 08:38:00 +0200 Message-Id: <3D29337A.B91C2A1A@hursley.ibm.com> Date: Mon, 08 Jul 2002 08:38:50 +0200 From: Brian E Carpenter Organization: IBM X-Mailer: Mozilla 4.79 [en] (Windows NT 5.0; U) X-Accept-Language: en,fr,de Mime-Version: 1.0 To: amoakoh@eleceng.adelaide.edu.au Cc: diffserv-interest@ietf.org, SYilmaz@hc.aselsan.com.tr References: <200207041600.MAA26663@optimus.ietf.org> <1161.211.228.103.200.1025851451.squirrel@www.eleceng.adelaide.edu.au> Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit Content-Transfer-Encoding: 7bit Subject: [Diffserv-interest] Re: [Diffserv] Re: diffserv for wireless (Semra YILMAZ) Sender: diffserv-interest-admin@ietf.org Errors-To: diffserv-interest-admin@ietf.org X-Mailman-Version: 1.0 Precedence: bulk List-Id: Differentiated services general discussion X-BeenThere: diffserv-interest@ietf.org Content-Transfer-Encoding: 7bit Switched to the diffserv-interest list. https://www1.ietf.org/mailman/listinfo/diffserv-interest amoakoh@eleceng.adelaide.edu.au wrote: > > ....yeah!, but, did the original IETF DiffServ architecture ever > considered wireless issues at all? No. There was an early suggestion to add a "receiver-controlled" mode to diffserv, but there was an explicit choice *not* to make the basic diffserv architecture dependent on level 2 in any way. > > Amoakoh > > > 2. RE: diffserv for wireless (Semra YILMAZ) > > From: Semra YILMAZ > > To: "'Brian E Carpenter '" , > > Subject: RE: [Diffserv] diffserv for wireless > > Date: Wed, 3 Jul 2002 21:43:07 +0300 > > > Thanks for your reply Brian. But i have tried diffserv in wireless but > > it does not work even it works in wired network. What do you mean by "does not work"? Brian > What can the reason > > be? Semra Yilmaz > _______________________________________________ Diffserv-interest mailing list Diffserv-interest@ietf.org https://www1.ietf.org/mailman/listinfo/diffserv-interest From daemon@optimus.ietf.org Mon Jul 8 12:19:11 2002 Received: from optimus.ietf.org (ietf.org [132.151.1.19] (may be forged)) by ietf.org (8.9.1a/8.9.1a) with ESMTP id MAA22671 for ; Mon, 8 Jul 2002 12:19:11 -0400 (EDT) Received: (from daemon@localhost) by optimus.ietf.org (8.9.1a/8.9.1) id MAA00479 for diffserv-interest-archive@odin.ietf.org; Mon, 8 Jul 2002 12:20:03 -0400 (EDT) Received: from optimus.ietf.org (localhost [127.0.0.1]) by optimus.ietf.org (8.9.1a/8.9.1) with ESMTP id MAA00382; Mon, 8 Jul 2002 12:18:58 -0400 (EDT) Received: from ietf.org (odin [132.151.1.176]) by optimus.ietf.org (8.9.1a/8.9.1) with ESMTP id MAA29972 for ; Mon, 8 Jul 2002 12:13:13 -0400 (EDT) Received: from papatya.aselsan.com.tr (hc.aselsan.com.tr [212.50.56.228]) by ietf.org (8.9.1a/8.9.1a) with ESMTP id MAA22309 for ; Mon, 8 Jul 2002 12:12:15 -0400 (EDT) Received: by hc.aselsan.com.tr with Internet Mail Service (5.5.2653.19) id ; Mon, 8 Jul 2002 19:12:20 +0300 Message-ID: <0850741D32AAD311AB0600805FCC0B97A7803B@hc.aselsan.com.tr> From: Semra YILMAZ To: "'Brian E Carpenter '" Cc: "'diffserv-interest@ietf.org '" Date: Mon, 8 Jul 2002 19:12:18 +0300 MIME-Version: 1.0 X-Mailer: Internet Mail Service (5.5.2653.19) Content-Type: multipart/mixed; boundary="----_=_NextPart_000_01C2269A.3B5D8940" Subject: [Diffserv-interest] RE: [Diffserv] Re: diffserv for wireless (Semra YILMAZ) Sender: diffserv-interest-admin@ietf.org Errors-To: diffserv-interest-admin@ietf.org X-Mailman-Version: 1.0 Precedence: bulk List-Id: Differentiated services general discussion X-BeenThere: diffserv-interest@ietf.org This message is in MIME format. Since your mail reader does not understand this format, some or all of this message may not be legible. ------_=_NextPart_000_01C2269A.3B5D8940 Content-Type: text/plain; charset="iso-8859-9" Hi Brian, When i apply my code for wired network, it runs. Let me explain detailed for wireless network; firstly i have created a script code without any queueing management and i have seen the number of dropped packets in my topology. But when i apply diffserv for this wireless network, the number of dropped packets has not been changed, that is, applying diffserv to my wireless scenerio has not affect my scnerio by means of the number of dropped packets. I attach my tcl code. wireless_diff1_not.tcl is the code without diffserv and wireless_diff1.tcl is the code with diffserv. Am i doing something wrong? Thanks in advance Semra Yilmaz -----Original Message----- From: Brian E Carpenter To: amoakoh@eleceng.adelaide.edu.au Cc: diffserv-interest@ietf.org; SYilmaz@hc.aselsan.com.tr Sent: 08.07.2002 09:38 Subject: Re: [Diffserv] Re: diffserv for wireless (Semra YILMAZ) Switched to the diffserv-interest list. https://www1.ietf.org/mailman/listinfo/diffserv-interest amoakoh@eleceng.adelaide.edu.au wrote: > > ....yeah!, but, did the original IETF DiffServ architecture ever > considered wireless issues at all? No. There was an early suggestion to add a "receiver-controlled" mode to diffserv, but there was an explicit choice *not* to make the basic diffserv architecture dependent on level 2 in any way. > > Amoakoh > > > 2. RE: diffserv for wireless (Semra YILMAZ) > > From: Semra YILMAZ > > To: "'Brian E Carpenter '" , > > Subject: RE: [Diffserv] diffserv for wireless > > Date: Wed, 3 Jul 2002 21:43:07 +0300 > > > Thanks for your reply Brian. But i have tried diffserv in wireless but > > it does not work even it works in wired network. What do you mean by "does not work"? Brian > What can the reason > > be? Semra Yilmaz > ------_=_NextPart_000_01C2269A.3B5D8940 Content-Type: application/octet-stream; name="wireless_diff1_not.tcl" Content-Disposition: attachment; filename="wireless_diff1_not.tcl" Content-Transfer-Encoding: quoted-printable set val(chan) Channel/WirelessChannel ;# channel type set val(prop) Propagation/TwoRayGround ;# radio-propagation = model set val(ant) Antenna/OmniAntenna ;# Antenna type set val(ll) LL ;# Link layer type set val(ifq) Queue/DropTail/PriQueue ;# Interface queue type set val(ifqlen) 50 ;# max packet in ifq set val(netif) Phy/WirelessPhy ;# network interface = type set val(mac) Mac/802_11 ;# MAC type set val(rp) DSDV ;# ad-hoc routing = protocol=20 set val(nn) 7 ;# number of = mobilenodes set val(x) 670 set val(y) 670 set val(seed) 0.0 set val(adhocRouting) DSR set val(stop) 80.0 ;# simulation time set simulation_time 60 =20 set ns [new Simulator] set tracefd [open out.tr w] $ns trace-all $tracefd set nf [open out.nam w] $ns namtrace-all-wireless $nf 670 670 $ns nam-end-wireless 80 =20 for {set i_ 1} {$i_ < 3} {incr i_} { set current_tr($i_) [open queuelen-$i_.tr w] set average_tr($i_) [open average-$i_.tr w] } =20 proc finish {} { global ns nf current_tr average_tr tracefd $ns flush-trace close $nf close $tracefd exec nam -a out.nam & for {set i_ 1} {$i_ < 3} {incr i_} { close $current_tr($i_) close $average_tr($i_) exec xgraph queuelen-$i_.tr average-$i_.tr -geometry 600x450 & } exit 0 } =20 set topo [new Topography] $topo load_flatgrid 670 670 create-god $val(nn) $ns node-config -adhocRouting $val(rp) \ -llType $val(ll) \ -macType $val(mac) \ -ifqType $val(ifq) \ -ifqLen $val(ifqlen) \ -antType $val(ant) \ -propType $val(prop) \ -phyType $val(netif) \ -channelType $val(chan) \ -topoInstance $topo \ -agentTrace ON \ -routerTrace ON \ -macTrace OFF \ -movementTrace OFF #for {set i 0} {$i < $val(nn) } {incr i} { # set n($i) [$ns node] # $n($i) random-motion 0 #} set n0 [$ns node] set n1 [$ns node] set n2 [$ns node] set n3 [$ns node] set n4 [$ns node] set n5 [$ns node] set n6 [$ns node] $n0 random-motion 0 $n1 random-motion 0 $n2 random-motion 0 $n3 random-motion 0 $n4 random-motion 0 $n5 random-motion 0 $n6 random-motion 0 =20 $ns color 1 Green $ns color 2 Red =20 # n0 n5 # \ /=20 # n2--n3--n4 # / \ # n1 n6 # =20 set god_ [God instance] $ns at 0.820000000000 "$n5 setdest 600 450 20" $ns at 0.800000000000 "$n4 setdest 500 300 25" $ns at 0.750000000000 "$n3 setdest 350 300 20" $ns at 0.700000000000 "$n6 setdest 600 200 25" $ns at 0.700000000000 "$n2 setdest 200 300 20" $ns at 0.600000000000 "$n1 setdest 100 200 25" $ns at 0.500000000000 "$n0 setdest 100 450 25" $god_ set-dist 0 4 3 $god_ set-dist 1 5 3 $n4 set Z_ 0.000000000000 $n4 set Y_ 300 $n4 set X_ 400 $n6 set Z_ 0.000000000000 $n6 set Y_ 200 $n6 set X_ 550 $n5 set Z_ 0.000000000000 $n5 set Y_ 470 $n5 set X_ 640 $n3 set Z_ 0.000000000000 $n3 set Y_ 285 $n3 set X_ 340 $n2 set Z_ 0.000000000000 $n2 set Y_ 315 $n2 set X_ 210 =09 $n1 set Z_ 0.000000000000 $n1 set Y_ 185 $n1 set X_ 115 $n0 set Z_ 0.000000000000 $n0 set Y_ 460 $n0 set X_ 115 =20 $ns duplex-link $n0 $n2 2Mb 15ms DropTail $ns duplex-link $n1 $n2 2Mb 15ms DropTail =20 $ns duplex-link $n2 $n3 409600 15ms DropTail #$ns simplex-link $n3 $n2 2Mb 15ms DropTail $ns duplex-link $n3 $n4 409600 10ms DropTail #$ns simplex-link $n4 $n3 409600 10ms DropTail =20 $ns duplex-link $n4 $n5 2Mb 60ms DropTail $ns duplex-link $n4 $n6 409600 60ms DropTail =20 #$ns duplex-link-op $n0 $n2 orient right-down #$ns duplex-link-op $n1 $n2 orient right-up #$ns duplex-link-op $n2 $n3 orient right #$ns duplex-link-op $n3 $n4 orient right #$ns duplex-link-op $n4 $n5 orient right-up #$ns duplex-link-op $n4 $n6 orient right-down =20 #$ns queue-limit $n3 $n4 100 #$ns queue-limit $n4 $n5 100 =20 $ns duplex-link-op $n3 $n4 queuePos 0.5 =20 #set qE1C [[$ns link $n2 $n3] queue] =20 #set qE2C [[$ns link $n4 $n3] queue] =20 #set qCE1 [[$ns link $n3 $n2] queue] =20 #set qCE2 [[$ns link $n3 $n4] queue] =20 =20 #$qE1C meanPktSize 1000 #$qE1C set numQueues_ 3 #$qE1C setNumPrec 3 =20 #$qE1C setSchedularMode RR=20 #$qE1C setMREDMode RIO-C =20 #$qE1C addPolicyEntry [$n0 id] -1 TokenBucket 18 5000000 4000 =20 #$qE1C addPolicyEntry [$n1 id] -1 TokenBucket 26 5000000 4000 =20 #$qE1C addPolicerEntry TokenBucket 18 20 =20 #$qE1C addPolicerEntry TokenBucket 26 28 =20 =20 #$qE1C addPHBEntry 18 1 0 #$qE1C addPHBEntry 20 1 1 =20 #$qE1C addPHBEntry 26 2 0 #$qE1C addPHBEntry 28 2 1 =20 #$qE1C configQ 0 0 8 16 = 0.02 #$qE1C configQ 0 1 4 8 = 0.10 #$qE1C configQ 0 2 2 4 = 0.50 =20 #$qE1C configQ 1 0 8 16 = 0.02 #$qE1C configQ 1 1 4 8 = 0.10 #$qE1C configQ 1 2 2 4 = 0.50 =20 #$qE1C configQ 2 0 8 16 = 0.02 #$qE1C configQ 2 1 4 8 = 0.10 #$qE1C configQ 2 2 2 4 = 0.50 =20 =20 #$qE2C meanPktSize 1000 #$qE2C set numQueues_ 3 #$qE2C setNumPrec 3 =20 #$qE2C setSchedularMode RR=20 #$qE2C setMREDMode RIO-C =20 #$qE2C addPolicyEntry -1 [$n0 id] TokenBucket 18 5000000 4000 =20 #$qE2C addPolicyEntry -1 [$n1 id] TokenBucket 26 5000000 4000 =20 #$qE2C addPolicerEntry TokenBucket 18 20 =20 #$qE2C addPolicerEntry TokenBucket 26 28 =20 =20 #$qE2C addPHBEntry 18 1 0 #$qE2C addPHBEntry 20 1 1 =20 #$qE2C addPHBEntry 26 2 0 #$qE2C addPHBEntry 28 2 1 =20 #$qE2C configQ 0 0 8 16 = 0.02 #$qE2C configQ 0 1 4 8 = 0.10 #$qE2C configQ 0 2 2 4 = 0.50 =20 #$qE2C configQ 1 0 8 16 = 0.02 #$qE2C configQ 1 1 4 8 = 0.10 #$qE2C configQ 1 2 2 4 = 0.50 =20 #$qE2C configQ 2 0 8 16 = 0.02 #$qE2C configQ 2 1 4 8 = 0.10 #$qE2C configQ 2 2 2 4 = 0.50 =20 #$qCE1 meanPktSize 1000 #$qCE1 set numQueues_ 3=20 #$qCE1 setNumPrec 3 #$qCE1 setSchedularMode RR=20 #$qCE1 setMREDMode RIO-C =20 #$qCE1 addPHBEntry 18 1 0 #$qCE1 addPHBEntry 20 1 1 #$qCE1 addPHBEntry 22 1 2 =20 #$qCE1 addPHBEntry 26 2 0 #$qCE1 addPHBEntry 28 2 1 #$qCE1 addPHBEntry 30 2 2 =20 #$qCE1 configQ 0 0 8 16 = 0.02 #$qCE1 configQ 0 1 4 8 = 0.10 #$qCE1 configQ 0 2 2 4 = 0.50 =20 #$qCE1 configQ 1 0 8 16 = 0.02 #$qCE1 configQ 1 1 4 8 = 0.10 #$qCE1 configQ 1 2 2 4 = 0.50 =20 #$qCE1 configQ 2 0 8 16 = 0.02 #$qCE1 configQ 2 1 4 8 = 0.10 #$qCE1 configQ 2 2 2 4 = 0.50 =20 #$qCE2 debugmessages 0 0 #$qCE2 debugmessages 1 0 #$qCE2 debugmessages 2 1 =20 #$qCE2 meanPktSize 1000 #$qCE2 set numQueues_ 3 #$qCE2 setNumPrec 3=20 #$qCE2 setSchedularMode RR =20 #$qCE2 setMREDMode RIO-D =20 #$qCE2 addPHBEntry 18 1 0 #$qCE2 addPHBEntry 20 1 1 #$qCE2 addPHBEntry 22 1 2 =20 #$qCE2 addPHBEntry 26 2 0 #$qCE2 addPHBEntry 28 2 1 #$qCE2 addPHBEntry 30 2 2 =20 #$qCE2 configQ 0 0 8 16 = 0.01 #$qCE2 configQ 0 1 4 8 = 0.02 #$qCE2 configQ 0 2 2 4 = 0.05 =20 #$qCE2 configQ 1 0 16 32 = 0.01 #$qCE2 configQ 1 1 8 16 = 0.02 #$qCE2 configQ 1 2 4 8 = 0.04 =20 #$qCE2 configQ 2 0 4 12 = 0.01 #$qCE2 configQ 2 1 4 8 = 0.02 #$qCE2 configQ 2 2 2 4 = 0.04 =20 #for {set s_count 0} {$s_count < 4} {incr s_count} { #set tcp($s_count) [new Agent/TCP/Reno] #$tcp($s_count) set class_ 2 #$ns attach-agent $n1 $tcp($s_count) #set ftp($s_count) [new Application/FTP] #$ftp($s_count) attach-agent $tcp($s_count) #set sink($s_count) [new Agent/TCPSink] #$ns attach-agent $n6 $sink($s_count) #$ns connect $tcp($s_count) $sink($s_count) #$tcp($s_count) set packetSize_ 1000 #} set udp [new Agent/UDP] $udp set class_ 2=20 set cbr [new Application/Traffic/CBR] $ns attach-agent $n1 $udp $cbr attach-agent $udp $cbr set packetSize_ 1000 $cbr set rate_ 320000 set null [new Agent/LossMonitor] $ns attach-agent $n6 $null $ns connect $udp $null=20 =20 set udp0 [new Agent/UDP] $udp0 set class_ 1=20 set cbr0 [new Application/Traffic/CBR] $ns attach-agent $n0 $udp0 $cbr0 attach-agent $udp0 $cbr0 set packetSize_ 1000 $cbr0 set rate_ 320000 set null0 [new Agent/LossMonitor] $ns attach-agent $n5 $null0 $ns connect $udp0 $null0 =20 #proc ds_stats {} { # global qE1C qCE1 qE2C qCE2 # puts "\n\n**** edge1 -> core ****" # $qE1C printStats # puts "\n\n**** core -> edge2 ****" # $qCE2 printStats # puts "\n\n**** edge2 -> core ****" # $qE2C printStats # puts "\n\n**** core -> edge1 ****" # $qCE1 printStats #} =20 #proc queue_stats {queue} { #global current_tr average_tr #set time 0.1 #set ns [Simulator instance] #set now [$ns now] #for {set i_ 1} {$i_ < 3} {incr i_} { #set current_ [$queue getCurrent $i_] #set average_ [$queue getAverage $i_] #puts $current_tr($i_) "$now $current_" #puts $average_tr($i_) "$now $average_" #} #$ns at [expr $now+$time] "queue_stats $queue" =20 #} =20 #for {set s_count 0} {$s_count < 4} {incr s_count} { #$ns at 0.$s_count "$ftp($s_count) start" #$ns at $simulation_time "$ftp($s_count) stop" #} $ns at 0.0 "$cbr start" #$ns at 0.0 "queue_stats $qCE2" $ns at $simulation_time "$cbr stop" #$ns at [expr $simulation_time + 5] "ds_stats" $ns at [expr $simulation_time + 5] "finish" =20 $ns at 0.0 "$cbr0 start" #$ns at 0.0 "queue_stats $qCE2" $ns at $simulation_time "$cbr0 stop" #$ns at [expr $simulation_time + 5] "ds_stats" $ns at [expr $simulation_time + 5] "finish" =20 $ns run ------_=_NextPart_000_01C2269A.3B5D8940 Content-Type: application/octet-stream; name="wireless_diff1.tcl" Content-Disposition: attachment; filename="wireless_diff1.tcl" Content-Transfer-Encoding: quoted-printable #her iki link icin cbr tan=FDml=FD.=09 set val(chan) Channel/WirelessChannel ;# channel type set val(prop) Propagation/TwoRayGround ;# radio-propagation = model set val(ant) Antenna/OmniAntenna ;# Antenna type set val(ll) LL ;# Link layer type set val(ifq) Queue/DropTail/PriQueue ;# Interface queue type set val(ifqlen) 50 ;# max packet in ifq set val(netif) Phy/WirelessPhy ;# network interface = type set val(mac) Mac/802_11 ;# MAC type set val(rp) DSDV ;# ad-hoc routing = protocol=20 set val(nn) 7 ;# number of = mobilenodes set val(x) 670 set val(y) 670 set val(seed) 0.0 set val(adhocRouting) DSR set val(stop) 80.0 ;# simulation time set simulation_time 60 =20 set ns [new Simulator] set tracefd [open out.tr w] $ns trace-all $tracefd set nf [open out.nam w] $ns namtrace-all-wireless $nf 670 670 $ns nam-end-wireless 80 =20 for {set i_ 1} {$i_ < 3} {incr i_} { set current_tr($i_) [open queuelen-$i_.tr w] set average_tr($i_) [open average-$i_.tr w] } =20 proc finish {} { global ns nf current_tr average_tr tracefd $ns flush-trace close $nf close $tracefd exec nam -a out.nam & for {set i_ 1} {$i_ < 3} {incr i_} { close $current_tr($i_) close $average_tr($i_) exec xgraph queuelen-$i_.tr average-$i_.tr -geometry 600x450 & } exit 0 } =20 set topo [new Topography] $topo load_flatgrid 670 670 create-god $val(nn) $ns node-config -adhocRouting $val(rp) \ -llType $val(ll) \ -macType $val(mac) \ -ifqType $val(ifq) \ -ifqLen $val(ifqlen) \ -antType $val(ant) \ -propType $val(prop) \ -phyType $val(netif) \ -channelType $val(chan) \ -topoInstance $topo \ -agentTrace ON \ -routerTrace ON \ -macTrace OFF \ -movementTrace OFF #for {set i 0} {$i < $val(nn) } {incr i} { # set n($i) [$ns node] # $n($i) random-motion 0 #} set n0 [$ns node] set n1 [$ns node] set n2 [$ns node] set n3 [$ns node] set n4 [$ns node] set n5 [$ns node] set n6 [$ns node] $n0 random-motion 0 $n1 random-motion 0 $n2 random-motion 0 $n3 random-motion 0 $n4 random-motion 0 $n5 random-motion 0 $n6 random-motion 0 =20 $ns color 1 Green $ns color 2 Red =20 # n0 n5 # \ /=20 # n2--n3--n4 # / \ # n1 n6 # =20 set god_ [God instance] $ns at 0.820000000000 "$n5 setdest 600 450 20" $ns at 0.800000000000 "$n4 setdest 500 300 25" $ns at 0.750000000000 "$n3 setdest 350 300 20" $ns at 0.700000000000 "$n6 setdest 600 200 25" $ns at 0.700000000000 "$n2 setdest 200 300 20" $ns at 0.600000000000 "$n1 setdest 100 200 25" $ns at 0.500000000000 "$n0 setdest 100 450 25" $god_ set-dist 0 4 3 $god_ set-dist 1 5 3 $n4 set Z_ 0.000000000000 $n4 set Y_ 300 $n4 set X_ 400 $n6 set Z_ 0.000000000000 $n6 set Y_ 200 $n6 set X_ 550 $n5 set Z_ 0.000000000000 $n5 set Y_ 470 $n5 set X_ 640 $n3 set Z_ 0.000000000000 $n3 set Y_ 285 $n3 set X_ 340 $n2 set Z_ 0.000000000000 $n2 set Y_ 315 $n2 set X_ 210 =09 $n1 set Z_ 0.000000000000 $n1 set Y_ 185 $n1 set X_ 115 $n0 set Z_ 0.000000000000 $n0 set Y_ 460 $n0 set X_ 115 =20 $ns duplex-link $n0 $n2 2Mb 15ms DropTail $ns duplex-link $n1 $n2 2Mb 15ms DropTail =20 $ns simplex-link $n2 $n3 2Mb 15ms dsRED/edge $ns simplex-link $n3 $n2 2Mb 15ms dsRED/core=20 $ns simplex-link $n3 $n4 409600 10ms dsRED/core=20 $ns simplex-link $n4 $n3 409600 10ms dsRED/edge =20 $ns duplex-link $n4 $n5 2Mb 60ms DropTail $ns duplex-link $n4 $n6 409600 60ms DropTail =20 #$ns duplex-link-op $n0 $n2 orient right-down #$ns duplex-link-op $n1 $n2 orient right-up #$ns duplex-link-op $n2 $n3 orient right #$ns duplex-link-op $n3 $n4 orient right #$ns duplex-link-op $n4 $n5 orient right-up #$ns duplex-link-op $n4 $n6 orient right-down =20 #$ns queue-limit $n3 $n4 100 #$ns queue-limit $n4 $n5 100 =20 $ns duplex-link-op $n3 $n4 queuePos 0.5 =20 set qE1C [[$ns link $n2 $n3] queue] =20 set qE2C [[$ns link $n4 $n3] queue] =20 set qCE1 [[$ns link $n3 $n2] queue] =20 set qCE2 [[$ns link $n3 $n4] queue] =20 =20 $qE1C meanPktSize 1000 $qE1C set numQueues_ 3 $qE1C setNumPrec 3 =20 $qE1C setSchedularMode RR=20 $qE1C setMREDMode RIO-C =20 $qE1C addPolicyEntry [$n0 id] -1 TokenBucket 18 5000000 4000 =20 $qE1C addPolicyEntry [$n1 id] -1 TokenBucket 26 5000000 4000 =20 $qE1C addPolicerEntry TokenBucket 18 20 =20 $qE1C addPolicerEntry TokenBucket 26 28 =20 =20 $qE1C addPHBEntry 18 1 0 $qE1C addPHBEntry 20 1 1 =20 $qE1C addPHBEntry 26 2 0 $qE1C addPHBEntry 28 2 1 =20 $qE1C configQ 0 0 8 16 = 0.02 $qE1C configQ 0 1 4 8 = 0.10 $qE1C configQ 0 2 2 4 = 0.50 =20 $qE1C configQ 1 0 8 16 = 0.02 $qE1C configQ 1 1 4 8 = 0.10 $qE1C configQ 1 2 2 4 = 0.50 =20 $qE1C configQ 2 0 8 16 = 0.02 $qE1C configQ 2 1 4 8 = 0.10 $qE1C configQ 2 2 2 4 = 0.50 =20 =20 $qE2C meanPktSize 1000 $qE2C set numQueues_ 3 $qE2C setNumPrec 3 =20 $qE2C setSchedularMode RR=20 $qE2C setMREDMode RIO-C =20 $qE2C addPolicyEntry -1 [$n0 id] TokenBucket 18 5000000 4000 =20 $qE2C addPolicyEntry -1 [$n1 id] TokenBucket 26 5000000 4000 =20 $qE2C addPolicerEntry TokenBucket 18 20 =20 $qE2C addPolicerEntry TokenBucket 26 28 =20 =20 $qE2C addPHBEntry 18 1 0 $qE2C addPHBEntry 20 1 1 =20 $qE2C addPHBEntry 26 2 0 $qE2C addPHBEntry 28 2 1 =20 $qE2C configQ 0 0 8 16 = 0.02 $qE2C configQ 0 1 4 8 = 0.10 $qE2C configQ 0 2 2 4 = 0.50 =20 $qE2C configQ 1 0 8 16 = 0.02 $qE2C configQ 1 1 4 8 = 0.10 $qE2C configQ 1 2 2 4 = 0.50 =20 $qE2C configQ 2 0 8 16 = 0.02 $qE2C configQ 2 1 4 8 = 0.10 $qE2C configQ 2 2 2 4 = 0.50 =20 $qCE1 meanPktSize 1000 $qCE1 set numQueues_ 3=20 $qCE1 setNumPrec 3 $qCE1 setSchedularMode RR=20 $qCE1 setMREDMode RIO-C =20 $qCE1 addPHBEntry 18 1 0 $qCE1 addPHBEntry 20 1 1 $qCE1 addPHBEntry 22 1 2 =20 $qCE1 addPHBEntry 26 2 0 $qCE1 addPHBEntry 28 2 1 $qCE1 addPHBEntry 30 2 2 =20 $qCE1 configQ 0 0 8 16 = 0.02 $qCE1 configQ 0 1 4 8 = 0.10 $qCE1 configQ 0 2 2 4 = 0.50 =20 $qCE1 configQ 1 0 8 16 = 0.02 $qCE1 configQ 1 1 4 8 = 0.10 $qCE1 configQ 1 2 2 4 = 0.50 =20 $qCE1 configQ 2 0 8 16 = 0.02 $qCE1 configQ 2 1 4 8 = 0.10 $qCE1 configQ 2 2 2 4 = 0.50 =20 #$qCE2 debugmessages 0 0 #$qCE2 debugmessages 1 0 #$qCE2 debugmessages 2 1 =20 $qCE2 meanPktSize 1000 $qCE2 set numQueues_ 3 $qCE2 setNumPrec 3=20 $qCE2 setSchedularMode RR =20 $qCE2 setMREDMode RIO-D =20 $qCE2 addPHBEntry 18 1 0 $qCE2 addPHBEntry 20 1 1 $qCE2 addPHBEntry 22 1 2 =20 $qCE2 addPHBEntry 26 2 0 $qCE2 addPHBEntry 28 2 1 $qCE2 addPHBEntry 30 2 2 =20 $qCE2 configQ 0 0 8 16 = 0.01 $qCE2 configQ 0 1 4 8 = 0.02 $qCE2 configQ 0 2 2 4 = 0.05 =20 $qCE2 configQ 1 0 16 32 = 0.01 $qCE2 configQ 1 1 8 16 = 0.02 $qCE2 configQ 1 2 4 8 = 0.04 =20 $qCE2 configQ 2 0 4 12 = 0.01 $qCE2 configQ 2 1 4 8 = 0.02 $qCE2 configQ 2 2 2 4 = 0.04 =20 #for {set s_count 0} {$s_count < 4} {incr s_count} { #set tcp($s_count) [new Agent/TCP/Reno] #$tcp($s_count) set class_ 2 #$ns attach-agent $n1 $tcp($s_count) #set ftp($s_count) [new Application/FTP] #$ftp($s_count) attach-agent $tcp($s_count) #set sink($s_count) [new Agent/TCPSink] #$ns attach-agent $n6 $sink($s_count) #$ns connect $tcp($s_count) $sink($s_count) #$tcp($s_count) set packetSize_ 1000 #} =20 set udp [new Agent/UDP] $udp set class_ 2=20 set cbr [new Application/Traffic/CBR] $ns attach-agent $n1 $udp $cbr attach-agent $udp $cbr set packetSize_ 10000 $cbr set rate_ 3200000 set null [new Agent/LossMonitor] $ns attach-agent $n6 $null $ns connect $udp $null set udp0 [new Agent/UDP] $udp0 set class_ 1=20 set cbr0 [new Application/Traffic/CBR] $ns attach-agent $n0 $udp0 $cbr0 attach-agent $udp0 $cbr0 set packetSize_ 10000 $cbr0 set rate_ 3200000 set null0 [new Agent/LossMonitor] $ns attach-agent $n5 $null0 $ns connect $udp0 $null0 =20 #proc ds_stats {} { # global qE1C qCE1 qE2C qCE2 # puts "\n\n**** edge1 -> core ****" # $qE1C printStats # puts "\n\n**** core -> edge2 ****" # $qCE2 printStats # puts "\n\n**** edge2 -> core ****" # $qE2C printStats # puts "\n\n**** core -> edge1 ****" # $qCE1 printStats #} =20 proc queue_stats {queue} { global current_tr average_tr set time 0.1 set ns [Simulator instance] set now [$ns now] for {set i_ 1} {$i_ < 3} {incr i_} { set current_ [$queue getCurrent $i_] set average_ [$queue getAverage $i_] puts $current_tr($i_) "$now $current_" puts $average_tr($i_) "$now $average_" } $ns at [expr $now+$time] "queue_stats $queue" =20 } =20 #for {set s_count 0} {$s_count < 4} {incr s_count} { #$ns at 0.$s_count "$ftp($s_count) start" #$ns at $simulation_time "$ftp($s_count) stop" #} =20 $ns at 0.0 "$cbr start" #$ns at 0.0 "queue_stats $qCE2" $ns at $simulation_time "$cbr stop" #$ns at [expr $simulation_time + 5] "ds_stats" #$ns at [expr $simulation_time + 5] "finish" $ns at 0.0 "$cbr0 start" $ns at 0.0 "queue_stats $qCE2" $ns at $simulation_time "$cbr0 stop" #$ns at [expr $simulation_time + 5] "ds_stats" $ns at [expr $simulation_time + 5] "finish" =20 $ns run ------_=_NextPart_000_01C2269A.3B5D8940-- _______________________________________________ Diffserv-interest mailing list Diffserv-interest@ietf.org https://www1.ietf.org/mailman/listinfo/diffserv-interest From daemon@optimus.ietf.org Tue Jul 9 02:33:41 2002 Received: from optimus.ietf.org (ietf.org [132.151.1.19] (may be forged)) by ietf.org (8.9.1a/8.9.1a) with ESMTP id CAA13525 for ; Tue, 9 Jul 2002 02:33:41 -0400 (EDT) Received: (from daemon@localhost) by optimus.ietf.org (8.9.1a/8.9.1) id CAA07504 for diffserv-interest-archive@odin.ietf.org; Tue, 9 Jul 2002 02:34:34 -0400 (EDT) Received: from optimus.ietf.org (localhost [127.0.0.1]) by optimus.ietf.org (8.9.1a/8.9.1) with ESMTP id CAA07388; Tue, 9 Jul 2002 02:32:31 -0400 (EDT) Received: from ietf.org (odin [132.151.1.176]) by optimus.ietf.org (8.9.1a/8.9.1) with ESMTP id QAA20719 for ; Mon, 8 Jul 2002 16:16:22 -0400 (EDT) Received: from papatya.aselsan.com.tr (hc.aselsan.com.tr [212.50.56.228]) by ietf.org (8.9.1a/8.9.1a) with ESMTP id QAA06826 for ; Mon, 8 Jul 2002 16:15:27 -0400 (EDT) Received: by hc.aselsan.com.tr with Internet Mail Service (5.5.2653.19) id ; Mon, 8 Jul 2002 23:15:32 +0300 Message-ID: <0850741D32AAD311AB0600805FCC0B97A7803C@hc.aselsan.com.tr> From: Semra YILMAZ To: "'brian@hursley.ibm.com '" Cc: "'diffserv-interest@ietf.org '" Date: Mon, 8 Jul 2002 23:15:30 +0300 MIME-Version: 1.0 X-Mailer: Internet Mail Service (5.5.2653.19) Content-Type: multipart/mixed; boundary="----_=_NextPart_000_01C226BC.35145FB0" Subject: [Diffserv-interest] Diffserv for wireless Sender: diffserv-interest-admin@ietf.org Errors-To: diffserv-interest-admin@ietf.org X-Mailman-Version: 1.0 Precedence: bulk List-Id: Differentiated services general discussion X-BeenThere: diffserv-interest@ietf.org This message is in MIME format. Since your mail reader does not understand this format, some or all of this message may not be legible. ------_=_NextPart_000_01C226BC.35145FB0 Content-Type: text/plain Hi Brian, When i apply my code for wired network, it runs. Let me explain detailed for wireless network; The first case: i have created a script code without any queueing management and i have seen the number of dropped packets in my topology. But when i apply diffserv for this wireless network, the number of dropped packets has not been changed, that is, applying diffserv to my wireless scenerio has not affect my scnerio by means of the number of dropped packets. This topology uses a DSDV routing protocol. Second case: i have changed the routing protocol as DSR, and the result was like that: without using diffserv i have seen the number of dropped packets (1788 packets), then i have used diffserv and this time the number of dropped packets was more (37832 packets). I think this should be reverse, that is, when i use diffserv, the number of dropped packets in the topology should be less, shouldn't be? I attach my tcl code. wireless_diff1_not.tcl is the code without diffserv and wireless_diff1.tcl is the code with diffserv for second case. Am i doing something wrong? Thanks in advance Semra Yilmaz ------_=_NextPart_000_01C226BC.35145FB0 Content-Type: application/octet-stream; name="wireless_diff1.tcl" Content-Disposition: attachment; filename="wireless_diff1.tcl" Content-Transfer-Encoding: quoted-printable #her iki link icin cbr tan=FDml=FD.=09 set val(chan) Channel/WirelessChannel ;# channel type set val(prop) Propagation/TwoRayGround ;# radio-propagation = model set val(ant) Antenna/OmniAntenna ;# Antenna type set val(ll) LL ;# Link layer type set val(ifq) Queue/DropTail/PriQueue ;# Interface queue type set val(ifqlen) 50 ;# max packet in ifq set val(netif) Phy/WirelessPhy ;# network interface = type set val(mac) Mac/802_11 ;# MAC type set val(rp) DSR ;# ad-hoc routing = protocol=20 set val(nn) 7 ;# number of = mobilenodes set val(x) 670 set val(y) 670 set val(seed) 0.0 #set val(adhocRouting) DSR set val(stop) 50.0 ;# simulation time set simulation_time 50 =20 set ns [new Simulator] set tracefd [open out.tr w] $ns trace-all $tracefd set nf [open out.nam w] $ns namtrace-all-wireless $nf 670 670 $ns nam-end-wireless 50 =20 for {set i_ 1} {$i_ < 3} {incr i_} { set current_tr($i_) [open queuelen-$i_.tr w] set average_tr($i_) [open average-$i_.tr w] } =20 proc finish {} { global ns nf current_tr average_tr tracefd $ns flush-trace close $nf close $tracefd exec nam -a out.nam & for {set i_ 1} {$i_ < 3} {incr i_} { close $current_tr($i_) close $average_tr($i_) exec xgraph queuelen-$i_.tr average-$i_.tr -geometry 600x450 & } exit 0 } =20 set topo [new Topography] $topo load_flatgrid 670 670 create-god $val(nn) $ns node-config -adhocRouting $val(rp) \ -llType $val(ll) \ -macType $val(mac) \ -ifqType $val(ifq) \ -ifqLen $val(ifqlen) \ -antType $val(ant) \ -propType $val(prop) \ -phyType $val(netif) \ -channelType $val(chan) \ -topoInstance $topo \ -agentTrace ON \ -routerTrace ON \ -macTrace OFF \ -movementTrace OFF #for {set i 0} {$i < $val(nn) } {incr i} { # set n($i) [$ns node] # $n($i) random-motion 0 #} set n0 [$ns node] set n1 [$ns node] set n2 [$ns node] set n3 [$ns node] set n4 [$ns node] set n5 [$ns node] set n6 [$ns node] $n0 random-motion 0 $n1 random-motion 0 $n2 random-motion 0 $n3 random-motion 0 $n4 random-motion 0 $n5 random-motion 0 $n6 random-motion 0 =20 $ns color 1 Green $ns color 2 Red =20 # n0 n5 # \ /=20 # n2--n3--n4 # / \ # n1 n6 # =20 set god_ [God instance] $ns at 0.820000000000 "$n5 setdest 600 450 20" $ns at 0.800000000000 "$n4 setdest 500 300 25" $ns at 0.750000000000 "$n3 setdest 350 300 20" $ns at 0.700000000000 "$n6 setdest 600 200 25" $ns at 0.700000000000 "$n2 setdest 200 300 20" $ns at 0.600000000000 "$n1 setdest 100 200 25" $ns at 0.500000000000 "$n0 setdest 100 450 25" $god_ set-dist 0 4 3 $god_ set-dist 1 5 3 $n4 set Z_ 0.000000000000 $n4 set Y_ 300 $n4 set X_ 400 $n6 set Z_ 0.000000000000 $n6 set Y_ 200 $n6 set X_ 550 $n5 set Z_ 0.000000000000 $n5 set Y_ 470 $n5 set X_ 640 $n3 set Z_ 0.000000000000 $n3 set Y_ 285 $n3 set X_ 340 $n2 set Z_ 0.000000000000 $n2 set Y_ 315 $n2 set X_ 210 =09 $n1 set Z_ 0.000000000000 $n1 set Y_ 185 $n1 set X_ 115 $n0 set Z_ 0.000000000000 $n0 set Y_ 460 $n0 set X_ 115 =20 $ns duplex-link $n0 $n2 2Mb 15ms DropTail $ns duplex-link $n1 $n2 2Mb 15ms DropTail =20 $ns simplex-link $n2 $n3 2Mb 15ms dsRED/edge $ns simplex-link $n3 $n2 2Mb 15ms dsRED/core=20 $ns simplex-link $n3 $n4 409600 10ms dsRED/core=20 $ns simplex-link $n4 $n3 409600 10ms dsRED/edge =20 $ns duplex-link $n4 $n5 2Mb 60ms DropTail $ns duplex-link $n4 $n6 409600 60ms DropTail =20 #$ns duplex-link-op $n0 $n2 orient right-down #$ns duplex-link-op $n1 $n2 orient right-up #$ns duplex-link-op $n2 $n3 orient right #$ns duplex-link-op $n3 $n4 orient right #$ns duplex-link-op $n4 $n5 orient right-up #$ns duplex-link-op $n4 $n6 orient right-down =20 #$ns queue-limit $n3 $n4 100 #$ns queue-limit $n4 $n5 100 =20 $ns duplex-link-op $n3 $n4 queuePos 0.5 =20 set qE1C [[$ns link $n2 $n3] queue] =20 set qE2C [[$ns link $n4 $n3] queue] =20 set qCE1 [[$ns link $n3 $n2] queue] =20 set qCE2 [[$ns link $n3 $n4] queue] =20 =20 $qE1C meanPktSize 1000 $qE1C set numQueues_ 3 $qE1C setNumPrec 3 =20 $qE1C setSchedularMode RR=20 $qE1C setMREDMode RIO-C =20 $qE1C addPolicyEntry [$n0 id] -1 TokenBucket 18 5000000 4000 =20 $qE1C addPolicyEntry [$n1 id] -1 TokenBucket 26 5000000 4000 =20 $qE1C addPolicerEntry TokenBucket 18 20 =20 $qE1C addPolicerEntry TokenBucket 26 28 =20 =20 $qE1C addPHBEntry 18 1 0 $qE1C addPHBEntry 20 1 1 =20 $qE1C addPHBEntry 26 2 0 $qE1C addPHBEntry 28 2 1 =20 $qE1C configQ 0 0 8 16 = 0.02 $qE1C configQ 0 1 4 8 = 0.10 $qE1C configQ 0 2 2 4 = 0.50 =20 $qE1C configQ 1 0 8 16 = 0.02 $qE1C configQ 1 1 4 8 = 0.10 $qE1C configQ 1 2 2 4 = 0.50 =20 $qE1C configQ 2 0 8 16 = 0.02 $qE1C configQ 2 1 4 8 = 0.10 $qE1C configQ 2 2 2 4 = 0.50 =20 =20 $qE2C meanPktSize 1000 $qE2C set numQueues_ 3 $qE2C setNumPrec 3 =20 $qE2C setSchedularMode RR=20 $qE2C setMREDMode RIO-C =20 $qE2C addPolicyEntry -1 [$n0 id] TokenBucket 18 5000000 4000 =20 $qE2C addPolicyEntry -1 [$n1 id] TokenBucket 26 5000000 4000 =20 $qE2C addPolicerEntry TokenBucket 18 20 =20 $qE2C addPolicerEntry TokenBucket 26 28 =20 =20 $qE2C addPHBEntry 18 1 0 $qE2C addPHBEntry 20 1 1 =20 $qE2C addPHBEntry 26 2 0 $qE2C addPHBEntry 28 2 1 =20 $qE2C configQ 0 0 8 16 = 0.02 $qE2C configQ 0 1 4 8 = 0.10 $qE2C configQ 0 2 2 4 = 0.50 =20 $qE2C configQ 1 0 8 16 = 0.02 $qE2C configQ 1 1 4 8 = 0.10 $qE2C configQ 1 2 2 4 = 0.50 =20 $qE2C configQ 2 0 8 16 = 0.02 $qE2C configQ 2 1 4 8 = 0.10 $qE2C configQ 2 2 2 4 = 0.50 =20 $qCE1 meanPktSize 1000 $qCE1 set numQueues_ 3=20 $qCE1 setNumPrec 3 $qCE1 setSchedularMode RR=20 $qCE1 setMREDMode RIO-C =20 $qCE1 addPHBEntry 18 1 0 $qCE1 addPHBEntry 20 1 1 $qCE1 addPHBEntry 22 1 2 =20 $qCE1 addPHBEntry 26 2 0 $qCE1 addPHBEntry 28 2 1 $qCE1 addPHBEntry 30 2 2 =20 $qCE1 configQ 0 0 8 16 = 0.02 $qCE1 configQ 0 1 4 8 = 0.10 $qCE1 configQ 0 2 2 4 = 0.50 =20 $qCE1 configQ 1 0 8 16 = 0.02 $qCE1 configQ 1 1 4 8 = 0.10 $qCE1 configQ 1 2 2 4 = 0.50 =20 $qCE1 configQ 2 0 8 16 = 0.02 $qCE1 configQ 2 1 4 8 = 0.10 $qCE1 configQ 2 2 2 4 = 0.50 =20 #$qCE2 debugmessages 0 0 #$qCE2 debugmessages 1 0 #$qCE2 debugmessages 2 1 =20 $qCE2 meanPktSize 1000 $qCE2 set numQueues_ 3 $qCE2 setNumPrec 3=20 $qCE2 setSchedularMode RR =20 $qCE2 setMREDMode RIO-D =20 $qCE2 addPHBEntry 18 1 0 $qCE2 addPHBEntry 20 1 1 $qCE2 addPHBEntry 22 1 2 =20 $qCE2 addPHBEntry 26 2 0 $qCE2 addPHBEntry 28 2 1 $qCE2 addPHBEntry 30 2 2 =20 $qCE2 configQ 0 0 8 16 = 0.01 $qCE2 configQ 0 1 4 8 = 0.02 $qCE2 configQ 0 2 2 4 = 0.05 =20 $qCE2 configQ 1 0 16 32 = 0.01 $qCE2 configQ 1 1 8 16 = 0.02 $qCE2 configQ 1 2 4 8 = 0.04 =20 $qCE2 configQ 2 0 4 12 = 0.01 $qCE2 configQ 2 1 4 8 = 0.02 $qCE2 configQ 2 2 2 4 = 0.04 =20 #for {set s_count 0} {$s_count < 4} {incr s_count} { #set tcp($s_count) [new Agent/TCP/Reno] #$tcp($s_count) set class_ 2 #$ns attach-agent $n1 $tcp($s_count) #set ftp($s_count) [new Application/FTP] #$ftp($s_count) attach-agent $tcp($s_count) #set sink($s_count) [new Agent/TCPSink] #$ns attach-agent $n6 $sink($s_count) #$ns connect $tcp($s_count) $sink($s_count) #$tcp($s_count) set packetSize_ 1000 #} =20 set udp [new Agent/UDP] $udp set class_ 2=20 set cbr [new Application/Traffic/CBR] $ns attach-agent $n1 $udp $cbr attach-agent $udp $cbr set packetSize_ 10000 $cbr set rate_ 3200000 set null [new Agent/LossMonitor] $ns attach-agent $n6 $null $ns connect $udp $null set udp0 [new Agent/UDP] $udp0 set class_ 1=20 set cbr0 [new Application/Traffic/CBR] $ns attach-agent $n0 $udp0 $cbr0 attach-agent $udp0 $cbr0 set packetSize_ 10000 $cbr0 set rate_ 3200000 set null0 [new Agent/LossMonitor] $ns attach-agent $n5 $null0 $ns connect $udp0 $null0 =20 #proc ds_stats {} { # global qE1C qCE1 qE2C qCE2 # puts "\n\n**** edge1 -> core ****" # $qE1C printStats # puts "\n\n**** core -> edge2 ****" # $qCE2 printStats # puts "\n\n**** edge2 -> core ****" # $qE2C printStats # puts "\n\n**** core -> edge1 ****" # $qCE1 printStats #} =20 proc queue_stats {queue} { global current_tr average_tr set time 0.1 set ns [Simulator instance] set now [$ns now] for {set i_ 1} {$i_ < 3} {incr i_} { set current_ [$queue getCurrent $i_] set average_ [$queue getAverage $i_] puts $current_tr($i_) "$now $current_" puts $average_tr($i_) "$now $average_" } $ns at [expr $now+$time] "queue_stats $queue" =20 } =20 #for {set s_count 0} {$s_count < 4} {incr s_count} { #$ns at 0.$s_count "$ftp($s_count) start" #$ns at $simulation_time "$ftp($s_count) stop" #} =20 $ns at 0.0 "$cbr start" #$ns at 0.0 "queue_stats $qCE2" $ns at $simulation_time "$cbr stop" #$ns at [expr $simulation_time + 5] "ds_stats" #$ns at [expr $simulation_time + 5] "finish" $ns at 0.0 "$cbr0 start" $ns at 0.0 "queue_stats $qCE2" $ns at $simulation_time "$cbr0 stop" #$ns at [expr $simulation_time + 5] "ds_stats" $ns at [expr $simulation_time + 5] "finish" =20 $ns run ------_=_NextPart_000_01C226BC.35145FB0 Content-Type: application/octet-stream; name="wireless_diff1_not.tcl" Content-Disposition: attachment; filename="wireless_diff1_not.tcl" Content-Transfer-Encoding: quoted-printable set val(chan) Channel/WirelessChannel ;# channel type set val(prop) Propagation/TwoRayGround ;# radio-propagation = model set val(ant) Antenna/OmniAntenna ;# Antenna type set val(ll) LL ;# Link layer type set val(ifq) Queue/DropTail/PriQueue ;# Interface queue type set val(ifqlen) 50 ;# max packet in ifq set val(netif) Phy/WirelessPhy ;# network interface = type set val(mac) Mac/802_11 ;# MAC type set val(rp) DSR ;# ad-hoc routing = protocol=20 set val(nn) 7 ;# number of = mobilenodes set val(x) 670 set val(y) 670 set val(seed) 0.0 #set val(adhocRouting) DSR set val(stop) 50.0 ;# simulation time set simulation_time 50 =20 set ns [new Simulator] set tracefd [open out.tr w] $ns trace-all $tracefd set nf [open out.nam w] $ns namtrace-all-wireless $nf 670 670 $ns nam-end-wireless 50 =20 for {set i_ 1} {$i_ < 3} {incr i_} { set current_tr($i_) [open queuelen-$i_.tr w] set average_tr($i_) [open average-$i_.tr w] } =20 proc finish {} { global ns nf current_tr average_tr tracefd $ns flush-trace close $nf close $tracefd exec nam -a out.nam & for {set i_ 1} {$i_ < 3} {incr i_} { close $current_tr($i_) close $average_tr($i_) exec xgraph queuelen-$i_.tr average-$i_.tr -geometry 600x450 & } exit 0 } =20 set topo [new Topography] $topo load_flatgrid 670 670 create-god $val(nn) $ns node-config -adhocRouting $val(rp) \ -llType $val(ll) \ -macType $val(mac) \ -ifqType $val(ifq) \ -ifqLen $val(ifqlen) \ -antType $val(ant) \ -propType $val(prop) \ -phyType $val(netif) \ -channelType $val(chan) \ -topoInstance $topo \ -agentTrace ON \ -routerTrace ON \ -macTrace OFF \ -movementTrace OFF #for {set i 0} {$i < $val(nn) } {incr i} { # set n($i) [$ns node] # $n($i) random-motion 0 #} set n0 [$ns node] set n1 [$ns node] set n2 [$ns node] set n3 [$ns node] set n4 [$ns node] set n5 [$ns node] set n6 [$ns node] $n0 random-motion 0 $n1 random-motion 0 $n2 random-motion 0 $n3 random-motion 0 $n4 random-motion 0 $n5 random-motion 0 $n6 random-motion 0 =20 $ns color 1 Green $ns color 2 Red =20 # n0 n5 # \ /=20 # n2--n3--n4 # / \ # n1 n6 # =20 set god_ [God instance] $ns at 0.820000000000 "$n5 setdest 600 450 20" $ns at 0.800000000000 "$n4 setdest 500 300 25" $ns at 0.750000000000 "$n3 setdest 350 300 20" $ns at 0.700000000000 "$n6 setdest 600 200 25" $ns at 0.700000000000 "$n2 setdest 200 300 20" $ns at 0.600000000000 "$n1 setdest 100 200 25" $ns at 0.500000000000 "$n0 setdest 100 450 25" $god_ set-dist 0 4 3 $god_ set-dist 1 5 3 $n4 set Z_ 0.000000000000 $n4 set Y_ 300 $n4 set X_ 400 $n6 set Z_ 0.000000000000 $n6 set Y_ 200 $n6 set X_ 550 $n5 set Z_ 0.000000000000 $n5 set Y_ 470 $n5 set X_ 640 $n3 set Z_ 0.000000000000 $n3 set Y_ 285 $n3 set X_ 340 $n2 set Z_ 0.000000000000 $n2 set Y_ 315 $n2 set X_ 210 =09 $n1 set Z_ 0.000000000000 $n1 set Y_ 185 $n1 set X_ 115 $n0 set Z_ 0.000000000000 $n0 set Y_ 460 $n0 set X_ 115 =20 $ns duplex-link $n0 $n2 2Mb 15ms DropTail $ns duplex-link $n1 $n2 2Mb 15ms DropTail =20 $ns duplex-link $n2 $n3 409600 15ms DropTail #$ns simplex-link $n3 $n2 2Mb 15ms DropTail $ns duplex-link $n3 $n4 409600 10ms DropTail #$ns simplex-link $n4 $n3 409600 10ms DropTail =20 $ns duplex-link $n4 $n5 2Mb 60ms DropTail $ns duplex-link $n4 $n6 409600 60ms DropTail =20 #$ns duplex-link-op $n0 $n2 orient right-down #$ns duplex-link-op $n1 $n2 orient right-up #$ns duplex-link-op $n2 $n3 orient right #$ns duplex-link-op $n3 $n4 orient right #$ns duplex-link-op $n4 $n5 orient right-up #$ns duplex-link-op $n4 $n6 orient right-down =20 #$ns queue-limit $n3 $n4 100 #$ns queue-limit $n4 $n5 100 =20 $ns duplex-link-op $n3 $n4 queuePos 0.5 =20 #set qE1C [[$ns link $n2 $n3] queue] =20 #set qE2C [[$ns link $n4 $n3] queue] =20 #set qCE1 [[$ns link $n3 $n2] queue] =20 #set qCE2 [[$ns link $n3 $n4] queue] =20 =20 #$qE1C meanPktSize 1000 #$qE1C set numQueues_ 3 #$qE1C setNumPrec 3 =20 #$qE1C setSchedularMode RR=20 #$qE1C setMREDMode RIO-C =20 #$qE1C addPolicyEntry [$n0 id] -1 TokenBucket 18 5000000 4000 =20 #$qE1C addPolicyEntry [$n1 id] -1 TokenBucket 26 5000000 4000 =20 #$qE1C addPolicerEntry TokenBucket 18 20 =20 #$qE1C addPolicerEntry TokenBucket 26 28 =20 =20 #$qE1C addPHBEntry 18 1 0 #$qE1C addPHBEntry 20 1 1 =20 #$qE1C addPHBEntry 26 2 0 #$qE1C addPHBEntry 28 2 1 =20 #$qE1C configQ 0 0 8 16 = 0.02 #$qE1C configQ 0 1 4 8 = 0.10 #$qE1C configQ 0 2 2 4 = 0.50 =20 #$qE1C configQ 1 0 8 16 = 0.02 #$qE1C configQ 1 1 4 8 = 0.10 #$qE1C configQ 1 2 2 4 = 0.50 =20 #$qE1C configQ 2 0 8 16 = 0.02 #$qE1C configQ 2 1 4 8 = 0.10 #$qE1C configQ 2 2 2 4 = 0.50 =20 =20 #$qE2C meanPktSize 1000 #$qE2C set numQueues_ 3 #$qE2C setNumPrec 3 =20 #$qE2C setSchedularMode RR=20 #$qE2C setMREDMode RIO-C =20 #$qE2C addPolicyEntry -1 [$n0 id] TokenBucket 18 5000000 4000 =20 #$qE2C addPolicyEntry -1 [$n1 id] TokenBucket 26 5000000 4000 =20 #$qE2C addPolicerEntry TokenBucket 18 20 =20 #$qE2C addPolicerEntry TokenBucket 26 28 =20 =20 #$qE2C addPHBEntry 18 1 0 #$qE2C addPHBEntry 20 1 1 =20 #$qE2C addPHBEntry 26 2 0 #$qE2C addPHBEntry 28 2 1 =20 #$qE2C configQ 0 0 8 16 = 0.02 #$qE2C configQ 0 1 4 8 = 0.10 #$qE2C configQ 0 2 2 4 = 0.50 =20 #$qE2C configQ 1 0 8 16 = 0.02 #$qE2C configQ 1 1 4 8 = 0.10 #$qE2C configQ 1 2 2 4 = 0.50 =20 #$qE2C configQ 2 0 8 16 = 0.02 #$qE2C configQ 2 1 4 8 = 0.10 #$qE2C configQ 2 2 2 4 = 0.50 =20 #$qCE1 meanPktSize 1000 #$qCE1 set numQueues_ 3=20 #$qCE1 setNumPrec 3 #$qCE1 setSchedularMode RR=20 #$qCE1 setMREDMode RIO-C =20 #$qCE1 addPHBEntry 18 1 0 #$qCE1 addPHBEntry 20 1 1 #$qCE1 addPHBEntry 22 1 2 =20 #$qCE1 addPHBEntry 26 2 0 #$qCE1 addPHBEntry 28 2 1 #$qCE1 addPHBEntry 30 2 2 =20 #$qCE1 configQ 0 0 8 16 = 0.02 #$qCE1 configQ 0 1 4 8 = 0.10 #$qCE1 configQ 0 2 2 4 = 0.50 =20 #$qCE1 configQ 1 0 8 16 = 0.02 #$qCE1 configQ 1 1 4 8 = 0.10 #$qCE1 configQ 1 2 2 4 = 0.50 =20 #$qCE1 configQ 2 0 8 16 = 0.02 #$qCE1 configQ 2 1 4 8 = 0.10 #$qCE1 configQ 2 2 2 4 = 0.50 =20 #$qCE2 debugmessages 0 0 #$qCE2 debugmessages 1 0 #$qCE2 debugmessages 2 1 =20 #$qCE2 meanPktSize 1000 #$qCE2 set numQueues_ 3 #$qCE2 setNumPrec 3=20 #$qCE2 setSchedularMode RR =20 #$qCE2 setMREDMode RIO-D =20 #$qCE2 addPHBEntry 18 1 0 #$qCE2 addPHBEntry 20 1 1 #$qCE2 addPHBEntry 22 1 2 =20 #$qCE2 addPHBEntry 26 2 0 #$qCE2 addPHBEntry 28 2 1 #$qCE2 addPHBEntry 30 2 2 =20 #$qCE2 configQ 0 0 8 16 = 0.01 #$qCE2 configQ 0 1 4 8 = 0.02 #$qCE2 configQ 0 2 2 4 = 0.05 =20 #$qCE2 configQ 1 0 16 32 = 0.01 #$qCE2 configQ 1 1 8 16 = 0.02 #$qCE2 configQ 1 2 4 8 = 0.04 =20 #$qCE2 configQ 2 0 4 12 = 0.01 #$qCE2 configQ 2 1 4 8 = 0.02 #$qCE2 configQ 2 2 2 4 = 0.04 =20 #for {set s_count 0} {$s_count < 4} {incr s_count} { #set tcp($s_count) [new Agent/TCP/Reno] #$tcp($s_count) set class_ 2 #$ns attach-agent $n1 $tcp($s_count) #set ftp($s_count) [new Application/FTP] #$ftp($s_count) attach-agent $tcp($s_count) #set sink($s_count) [new Agent/TCPSink] #$ns attach-agent $n6 $sink($s_count) #$ns connect $tcp($s_count) $sink($s_count) #$tcp($s_count) set packetSize_ 1000 #} set udp [new Agent/UDP] $udp set class_ 2=20 set cbr [new Application/Traffic/CBR] $ns attach-agent $n1 $udp $cbr attach-agent $udp $cbr set packetSize_ 1000 $cbr set rate_ 320000 set null [new Agent/LossMonitor] $ns attach-agent $n6 $null $ns connect $udp $null=20 =20 set udp0 [new Agent/UDP] $udp0 set class_ 1=20 set cbr0 [new Application/Traffic/CBR] $ns attach-agent $n0 $udp0 $cbr0 attach-agent $udp0 $cbr0 set packetSize_ 1000 $cbr0 set rate_ 320000 set null0 [new Agent/LossMonitor] $ns attach-agent $n5 $null0 $ns connect $udp0 $null0 =20 #proc ds_stats {} { # global qE1C qCE1 qE2C qCE2 # puts "\n\n**** edge1 -> core ****" # $qE1C printStats # puts "\n\n**** core -> edge2 ****" # $qCE2 printStats # puts "\n\n**** edge2 -> core ****" # $qE2C printStats # puts "\n\n**** core -> edge1 ****" # $qCE1 printStats #} =20 #proc queue_stats {queue} { #global current_tr average_tr #set time 0.1 #set ns [Simulator instance] #set now [$ns now] #for {set i_ 1} {$i_ < 3} {incr i_} { #set current_ [$queue getCurrent $i_] #set average_ [$queue getAverage $i_] #puts $current_tr($i_) "$now $current_" #puts $average_tr($i_) "$now $average_" #} #$ns at [expr $now+$time] "queue_stats $queue" =20 #} =20 #for {set s_count 0} {$s_count < 4} {incr s_count} { #$ns at 0.$s_count "$ftp($s_count) start" #$ns at $simulation_time "$ftp($s_count) stop" #} $ns at 0.0 "$cbr start" #$ns at 0.0 "queue_stats $qCE2" $ns at $simulation_time "$cbr stop" #$ns at [expr $simulation_time + 5] "ds_stats" $ns at [expr $simulation_time + 5] "finish" =20 $ns at 0.0 "$cbr0 start" #$ns at 0.0 "queue_stats $qCE2" $ns at $simulation_time "$cbr0 stop" #$ns at [expr $simulation_time + 5] "ds_stats" $ns at [expr $simulation_time + 5] "finish" =20 $ns run ------_=_NextPart_000_01C226BC.35145FB0-- _______________________________________________ Diffserv-interest mailing list Diffserv-interest@ietf.org https://www1.ietf.org/mailman/listinfo/diffserv-interest