2 // System.Web.UI.WebControls.AdRotator
5 // Ben Maurer <bmaurer@novell.com>
7 // Copyright (C) 2005 Novell, Inc (http://www.novell.com)
9 // Permission is hereby granted, free of charge, to any person obtaining
10 // a copy of this software and associated documentation files (the
11 // "Software"), to deal in the Software without restriction, including
12 // without limitation the rights to use, copy, modify, merge, publish,
13 // distribute, sublicense, and/or sell copies of the Software, and to
14 // permit persons to whom the Software is furnished to do so, subject to
15 // the following conditions:
17 // The above copyright notice and this permission notice shall be
18 // included in all copies or substantial portions of the Software.
20 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
21 // EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
22 // MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
23 // NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
24 // LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
25 // OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
26 // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
30 using System.Collections;
31 using System.ComponentModel;
32 using System.Security.Permissions;
33 using System.Web.Util;
35 namespace System.Web.UI.WebControls {
38 [AspNetHostingPermissionAttribute (SecurityAction.LinkDemand, Level = AspNetHostingPermissionLevel.Minimal)]
39 [AspNetHostingPermissionAttribute (SecurityAction.InheritanceDemand, Level = AspNetHostingPermissionLevel.Minimal)]
41 [DefaultEvent("AdCreated")]
42 [DefaultProperty("AdvertisementFile")]
43 [Designer("System.Web.UI.Design.WebControls.AdRotatorDesigner, " + Consts.AssemblySystem_Design, "System.ComponentModel.Design.IDesigner")]
45 [ToolboxData("<{0}:AdRotator runat=\"server\"></{0}:AdRotator>")]
47 [ToolboxData("<{0}:AdRotator runat=\"server\" Height=\"60px\" Width=\"468px\"></{0}:AdRotator>")]
49 public class AdRotator :
57 protected internal override void OnInit (EventArgs e)
68 override void OnPreRender (EventArgs eee)
72 if (ad_file != "" && ad_file != null) {
73 ReadAdsFromFile (Page.MapPath (ad_file));
77 AdCreatedEventArgs e = new AdCreatedEventArgs (ht);
84 [MonoTODO ("Not implemented")]
85 protected internal override void PerformDataBinding (IEnumerable data)
87 throw new NotImplementedException ();
90 [MonoTODO ("Not implemented")]
91 protected override void PerformSelect ()
93 throw new NotImplementedException ();
97 AdCreatedEventArgs createdargs;
104 override void Render (HtmlTextWriter w)
106 AdCreatedEventArgs e = createdargs;
108 base.AddAttributesToRender (w);
110 if (e.NavigateUrl != null && e.NavigateUrl.Length > 0)
111 w.AddAttribute (HtmlTextWriterAttribute.Href, ResolveAdUrl (e.NavigateUrl));
112 if (Target != null && Target.Length > 0)
113 w.AddAttribute (HtmlTextWriterAttribute.Target, Target);
115 w.RenderBeginTag (HtmlTextWriterTag.A);
117 if (e.NavigateUrl != null && e.NavigateUrl.Length > 0)
118 w.AddAttribute (HtmlTextWriterAttribute.Src, ResolveAdUrl (e.ImageUrl));
120 w.AddAttribute (HtmlTextWriterAttribute.Alt, e.AlternateText == null ? "" : e.AlternateText);
121 w.AddAttribute (HtmlTextWriterAttribute.Border, "0");
122 w.RenderBeginTag (HtmlTextWriterTag.Img);
123 w.RenderEndTag (); // img
124 w.RenderEndTag (); // a
127 string ResolveAdUrl (string url)
131 if (AdvertisementFile != null && AdvertisementFile.Length > 0 && path [0] != '/' && path [0] != '~')
132 return UrlUtils.Combine (UrlUtils.GetDirectory (ResolveUrl (AdvertisementFile)), path);
134 return ResolveUrl (path);
138 // We take all the ads in the ad file and add up their
139 // impression weight. We then take a random number [0,
140 // TotalImpressions). We then choose the ad that is
141 // that number or less impressions for the beginning
142 // of the file. This lets us respect the weights
145 Hashtable ChooseAd ()
147 // cache for performance
148 string KeywordFilter = this.KeywordFilter;
153 foreach (Hashtable a in ads) {
154 if (KeywordFilter == "" || KeywordFilter == (string) a ["Keyword"])
155 total_imp += a ["Impressions"] != null ? int.Parse ((string) a ["Impressions"]) : 1;
158 int r = new Random ().Next (total_imp);
160 foreach (Hashtable a in ads) {
161 if (KeywordFilter != "" && KeywordFilter != (string) a ["Keyword"])
163 cur_imp += a ["Impressions"] != null ? int.Parse ((string) a ["Impressions"]) : 1;
170 throw new Exception ("I should only get here if no ads matched");
175 ArrayList ads = new ArrayList ();
177 void ReadAdsFromFile (string s)
179 XmlDocument d = new XmlDocument ();
182 } catch (Exception e) {
183 throw new HttpException ("AdRotator could not parse the xml file", e);
188 foreach (XmlNode n in d.DocumentElement.ChildNodes) {
190 Hashtable ad = new Hashtable ();
192 foreach (XmlNode nn in n.ChildNodes)
193 ad.Add (nn.Name, nn.InnerText);
206 [Editor("System.Web.UI.Design.XmlUrlEditor, " + Consts.AssemblySystem_Design, typeof(System.Drawing.Design.UITypeEditor))]
207 [WebSysDescription("")]
208 [WebCategory("Behavior")]
209 public string AdvertisementFile {
220 [DefaultValue ("AlternateText")]
221 [WebSysDescriptionAttribute ("")]
222 [WebCategoryAttribute ("Behavior")]
223 [MonoTODO ("Not implemented")]
224 public string AlternateTextField
227 throw new NotImplementedException ();
230 throw new NotImplementedException ();
236 [DesignerSerializationVisibility(DesignerSerializationVisibility.Hidden)]
237 [EditorBrowsable(EditorBrowsableState.Never)]
238 public override FontInfo Font {
245 [DefaultValue ("ImageUrl")]
246 [MonoTODO ("Not implemented")]
247 [WebSysDescriptionAttribute ("")]
248 [WebCategoryAttribute ("Behavior")]
249 public string ImageUrlField
252 throw new NotImplementedException ();
255 throw new NotImplementedException ();
263 [WebSysDescription("")]
264 [WebCategory("Behavior")]
265 public string KeywordFilter {
267 return ViewState.GetString ("KeywordFilter", "");
270 ViewState ["KeywordFilter"] = value;
276 [DefaultValue ("NavigateUrl")]
277 [MonoTODO ("Not implemented")]
278 [WebSysDescriptionAttribute ("")]
279 [WebCategoryAttribute ("Behavior")]
280 public string NavigateUrlField
283 throw new NotImplementedException ();
286 throw new NotImplementedException ();
292 [DefaultValue("_top")]
293 [TypeConverter(typeof(System.Web.UI.WebControls.TargetConverter))]
294 [WebSysDescription("")]
295 [WebCategory("Behavior")]
296 public string Target {
298 return ViewState.GetString ("Target", "_top");
301 ViewState ["Target"] = value;
307 /* all these are listed in corcompare */
308 public override string UniqueID
311 return base.UniqueID;
315 protected override HtmlTextWriterTag TagKey
323 protected virtual void OnAdCreated (AdCreatedEventArgs e)
325 AdCreatedEventHandler h = (AdCreatedEventHandler) Events [AdCreatedEvent];
330 static readonly object AdCreatedEvent = new object ();
332 [WebSysDescription("")]
333 [WebCategory("Action")]
334 public event AdCreatedEventHandler AdCreated {
335 add { Events.AddHandler (AdCreatedEvent, value); }
336 remove { Events.RemoveHandler (AdCreatedEvent, value); }