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.ImageUrl != null && e.ImageUrl.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] != '~'
133 && !Uri.IsWellFormedUriString (path, UriKind.Absolute)
136 return UrlUtils.Combine (UrlUtils.GetDirectory (ResolveUrl (AdvertisementFile)), path);
138 return ResolveUrl (path);
142 // We take all the ads in the ad file and add up their
143 // impression weight. We then take a random number [0,
144 // TotalImpressions). We then choose the ad that is
145 // that number or less impressions for the beginning
146 // of the file. This lets us respect the weights
149 Hashtable ChooseAd ()
151 // cache for performance
152 string KeywordFilter = this.KeywordFilter;
157 foreach (Hashtable a in ads) {
158 if (KeywordFilter == "" || KeywordFilter == (string) a ["Keyword"])
159 total_imp += a ["Impressions"] != null ? int.Parse ((string) a ["Impressions"]) : 1;
162 int r = new Random ().Next (total_imp);
164 foreach (Hashtable a in ads) {
165 if (KeywordFilter != "" && KeywordFilter != (string) a ["Keyword"])
167 cur_imp += a ["Impressions"] != null ? int.Parse ((string) a ["Impressions"]) : 1;
174 throw new Exception ("I should only get here if no ads matched");
179 ArrayList ads = new ArrayList ();
181 void ReadAdsFromFile (string s)
183 XmlDocument d = new XmlDocument ();
186 } catch (Exception e) {
187 throw new HttpException ("AdRotator could not parse the xml file", e);
192 foreach (XmlNode n in d.DocumentElement.ChildNodes) {
194 Hashtable ad = new Hashtable ();
196 foreach (XmlNode nn in n.ChildNodes)
197 ad.Add (nn.Name, nn.InnerText);
210 [Editor("System.Web.UI.Design.XmlUrlEditor, " + Consts.AssemblySystem_Design, typeof(System.Drawing.Design.UITypeEditor))]
211 [WebSysDescription("")]
212 [WebCategory("Behavior")]
213 public string AdvertisementFile {
224 [DefaultValue ("AlternateText")]
225 [WebSysDescriptionAttribute ("")]
226 [WebCategoryAttribute ("Behavior")]
227 [MonoTODO ("Not implemented")]
228 public string AlternateTextField
231 throw new NotImplementedException ();
234 throw new NotImplementedException ();
240 [DesignerSerializationVisibility(DesignerSerializationVisibility.Hidden)]
241 [EditorBrowsable(EditorBrowsableState.Never)]
242 public override FontInfo Font {
249 [DefaultValue ("ImageUrl")]
250 [MonoTODO ("Not implemented")]
251 [WebSysDescriptionAttribute ("")]
252 [WebCategoryAttribute ("Behavior")]
253 public string ImageUrlField
256 throw new NotImplementedException ();
259 throw new NotImplementedException ();
267 [WebSysDescription("")]
268 [WebCategory("Behavior")]
269 public string KeywordFilter {
271 return ViewState.GetString ("KeywordFilter", "");
274 ViewState ["KeywordFilter"] = value;
280 [DefaultValue ("NavigateUrl")]
281 [MonoTODO ("Not implemented")]
282 [WebSysDescriptionAttribute ("")]
283 [WebCategoryAttribute ("Behavior")]
284 public string NavigateUrlField
287 throw new NotImplementedException ();
290 throw new NotImplementedException ();
296 [DefaultValue("_top")]
297 [TypeConverter(typeof(System.Web.UI.WebControls.TargetConverter))]
298 [WebSysDescription("")]
299 [WebCategory("Behavior")]
300 public string Target {
302 return ViewState.GetString ("Target", "_top");
305 ViewState ["Target"] = value;
311 /* all these are listed in corcompare */
312 public override string UniqueID
315 return base.UniqueID;
319 protected override HtmlTextWriterTag TagKey
327 protected virtual void OnAdCreated (AdCreatedEventArgs e)
329 AdCreatedEventHandler h = (AdCreatedEventHandler) Events [AdCreatedEvent];
334 static readonly object AdCreatedEvent = new object ();
336 [WebSysDescription("")]
337 [WebCategory("Action")]
338 public event AdCreatedEventHandler AdCreated {
339 add { Events.AddHandler (AdCreatedEvent, value); }
340 remove { Events.RemoveHandler (AdCreatedEvent, value); }