Temporary fix to avoid showing emails
[rails.git] / app / controllers / amf_controller.rb
1 # amf_controller is a semi-standalone API for Flash clients, particularly
2 # Potlatch. All interaction between Potlatch (as a .SWF application) and the
3 # OSM database takes place using this controller. Messages are
4 # encoded in the Actionscript Message Format (AMF).
5 #
6 # Helper functions are in /lib/potlatch.rb
7 #
8 # Author::  editions Systeme D / Richard Fairhurst 2004-2008
9 # Licence:: public domain.
10 #
11 # == General structure
12 #
13 # Apart from the amf_read and amf_write methods (which distribute the requests
14 # from the AMF message), each method generally takes arguments in the order
15 # they were sent by the Potlatch SWF. Do not assume typing has been preserved.
16 # Methods all return an array to the SWF.
17 #
18 # == API 0.6
19 #
20 # Note that this requires a patched version of composite_primary_keys 1.1.0
21 # (see http://groups.google.com/group/compositekeys/t/a00e7562b677e193)
22 # if you are to run with POTLATCH_USE_SQL=false .
23 #
24 # == Debugging
25 #
26 # Any method that returns a status code (0 for ok) can also send:
27 # return(-1,"message")        <-- just puts up a dialogue
28 # return(-2,"message")        <-- also asks the user to e-mail me
29 # return(-3,["type",v],id)    <-- version conflict
30 # return(-4,"type",id)        <-- object not found
31 # -5 indicates the method wasn't called (due to a previous error)
32 #
33 # To write to the Rails log, use logger.info("message").
34
35 # Remaining issues:
36 # * version conflict when POIs and ways are reverted
37
38 class AmfController < ApplicationController
39   include Potlatch
40
41   skip_before_action :verify_authenticity_token
42   before_action :check_api_writable
43
44   # Main AMF handlers: process the raw AMF string (using AMF library) and
45   # calls each action (private method) accordingly.
46
47   def amf_read
48     self.status = :ok
49     self.content_type = Mime::AMF
50     self.response_body = Dispatcher.new(request.raw_post) do |message, *args|
51       logger.info("Executing AMF #{message}(#{args.join(',')})")
52
53       case message
54       when "getpresets" then        result = getpresets(*args)
55       when "whichways" then         result = whichways(*args)
56       when "whichways_deleted" then result = whichways_deleted(*args)
57       when "getway" then            result = getway(args[0].to_i)
58       when "getrelation" then       result = getrelation(args[0].to_i)
59       when "getway_old" then        result = getway_old(args[0].to_i, args[1])
60       when "getway_history" then    result = getway_history(args[0].to_i)
61       when "getnode_history" then   result = getnode_history(args[0].to_i)
62       when "findgpx" then           result = findgpx(*args)
63       when "findrelations" then     result = findrelations(*args)
64       when "getpoi" then            result = getpoi(*args)
65       end
66
67       result
68     end
69   end
70
71   def amf_write
72     renumberednodes = {}              # Shared across repeated putways
73     renumberedways = {}               # Shared across repeated putways
74     err = false                       # Abort batch on error
75
76     self.status = :ok
77     self.content_type = Mime::AMF
78     self.response_body = Dispatcher.new(request.raw_post) do |message, *args|
79       logger.info("Executing AMF #{message}")
80
81       if err
82         result = [-5, nil]
83       else
84         case message
85         when "putway" then
86           orn = renumberednodes.dup
87           result = putway(renumberednodes, *args)
88           result[4] = renumberednodes.reject { |k, _v| orn.key?(k) }
89           renumberedways[result[2]] = result[3] if result[0] == 0 && result[2] != result[3]
90         when "putrelation" then
91           result = putrelation(renumberednodes, renumberedways, *args)
92         when "deleteway" then
93           result = deleteway(*args)
94         when "putpoi" then
95           result = putpoi(*args)
96           renumberednodes[result[2]] = result[3] if result[0] == 0 && result[2] != result[3]
97         when "startchangeset" then
98           result = startchangeset(*args)
99         end
100
101         err = true if result[0] == -3  # If a conflict is detected, don't execute any more writes
102       end
103
104       result
105     end
106   end
107
108   private
109
110   def amf_handle_error(call, rootobj, rootid)
111     yield
112   rescue OSM::APIAlreadyDeletedError => ex
113     return [-4, ex.object, ex.object_id]
114   rescue OSM::APIVersionMismatchError => ex
115     return [-3, [rootobj, rootid], [ex.type.downcase, ex.id, ex.latest]]
116   rescue OSM::APIUserChangesetMismatchError => ex
117     return [-2, ex.to_s]
118   rescue OSM::APIBadBoundingBox => ex
119     return [-2, "Sorry - I can't get the map for that area. The server said: #{ex}"]
120   rescue OSM::APIError => ex
121     return [-1, ex.to_s]
122   rescue StandardError => ex
123     return [-2, "An unusual error happened (in #{call}). The server said: #{ex}"]
124   end
125
126   def amf_handle_error_with_timeout(call, rootobj, rootid)
127     amf_handle_error(call, rootobj, rootid) do
128       OSM::Timer.timeout(API_TIMEOUT, OSM::APITimeoutError) do
129         yield
130       end
131     end
132   end
133
134   # Start new changeset
135   # Returns success_code,success_message,changeset id
136
137   def startchangeset(usertoken, cstags, closeid, closecomment, opennew)
138     amf_handle_error("'startchangeset'", nil, nil) do
139       user = getuser(usertoken)
140       return -1, "You are not logged in, so Potlatch can't write any changes to the database." unless user
141       return -1, t("application.setup_user_auth.blocked") if user.blocks.active.exists?
142       return -1, "You must accept the contributor terms before you can edit." if REQUIRE_TERMS_AGREED && user.terms_agreed.nil?
143
144       if cstags
145         return -1, "One of the tags is invalid. Linux users may need to upgrade to Flash Player 10.1." unless tags_ok(cstags)
146         cstags = strip_non_xml_chars cstags
147       end
148
149       # close previous changeset and add comment
150       if closeid
151         cs = Changeset.find(closeid.to_i)
152         cs.set_closed_time_now
153         if cs.user_id != user.id
154           fail OSM::APIUserChangesetMismatchError.new
155         elsif closecomment.empty?
156           cs.save!
157         else
158           cs.tags["comment"] = closecomment
159           # in case closecomment has chars not allowed in xml
160           cs.tags = strip_non_xml_chars cs.tags
161           cs.save_with_tags!
162         end
163       end
164
165       # open a new changeset
166       if opennew != 0
167         cs = Changeset.new
168         cs.tags = cstags
169         cs.user_id = user.id
170         unless closecomment.empty?
171           cs.tags["comment"] = closecomment
172           # in case closecomment has chars not allowed in xml
173           cs.tags = strip_non_xml_chars cs.tags
174         end
175         # smsm1 doesn't like the next two lines and thinks they need to be abstracted to the model more/better
176         cs.created_at = Time.now.getutc
177         cs.closed_at = cs.created_at + Changeset::IDLE_TIMEOUT
178         cs.save_with_tags!
179         return [0, "", cs.id]
180       else
181         return [0, "", nil]
182       end
183     end
184   end
185
186   # Return presets (default tags, localisation etc.):
187   # uses POTLATCH_PRESETS global, set up in OSM::Potlatch.
188
189   def getpresets(usertoken, lang) #:doc:
190     user = getuser(usertoken)
191
192     if user && !user.languages.empty?
193       http_accept_language.user_preferred_languages = user.languages
194     end
195
196     lang = http_accept_language.compatible_language_from(getlocales)
197     (real_lang, localised) = getlocalized(lang)
198
199     # Tell Potlatch what language it's using
200     localised["__potlatch_locale"] = real_lang
201
202     # Get help from i18n but delete it so we won't pass it around
203     # twice for nothing
204     help = localised["help_html"]
205     localised.delete("help_html")
206
207     # Populate icon names
208     POTLATCH_PRESETS[10].each do |id|
209       POTLATCH_PRESETS[11][id] = localised["preset_icon_#{id}"]
210       localised.delete("preset_icon_#{id}")
211     end
212
213     POTLATCH_PRESETS + [localised, help]
214   end
215
216   def getlocalized(lang)
217     # What we end up actually using. Reported in Potlatch's created_by=* string
218     loaded_lang = "en"
219
220     # Load English defaults
221     en = YAML.load(File.open("#{Rails.root}/config/potlatch/locales/en.yml"))["en"]
222
223     if lang == "en"
224       return [loaded_lang, en]
225     else
226       # Use English as a fallback
227       begin
228         other = YAML.load(File.open("#{Rails.root}/config/potlatch/locales/#{lang}.yml"))[lang]
229         loaded_lang = lang
230       rescue
231         other = en
232       end
233
234       # We have to return a flat list and some of the keys won't be
235       # translated (probably)
236       return [loaded_lang, en.merge(other)]
237     end
238   end
239
240   ##
241   # Find all the ways, POI nodes (i.e. not part of ways), and relations
242   # in a given bounding box. Nodes are returned in full; ways and relations
243   # are IDs only.
244   #
245   # return is of the form:
246   # [success_code, success_message,
247   #  [[way_id, way_version], ...],
248   #  [[node_id, lat, lon, [tags, ...], node_version], ...],
249   #  [[rel_id, rel_version], ...]]
250   # where the ways are any visible ways which refer to any visible
251   # nodes in the bbox, nodes are any visible nodes in the bbox but not
252   # used in any way, rel is any relation which refers to either a way
253   # or node that we're returning.
254   def whichways(xmin, ymin, xmax, ymax) #:doc:
255     amf_handle_error_with_timeout("'whichways'", nil, nil) do
256       enlarge = [(xmax - xmin) / 8, 0.01].min
257       xmin -= enlarge
258       ymin -= enlarge
259       xmax += enlarge
260       ymax += enlarge
261
262       # check boundary is sane and area within defined
263       # see /config/application.yml
264       bbox = BoundingBox.new(xmin, ymin, xmax, ymax)
265       bbox.check_boundaries
266       bbox.check_size
267
268       if POTLATCH_USE_SQL
269         ways = sql_find_ways_in_area(bbox)
270         points = sql_find_pois_in_area(bbox)
271         relations = sql_find_relations_in_area_and_ways(bbox, ways.collect { |x| x[0] })
272       else
273         # find the way ids in an area
274         nodes_in_area = Node.bbox(bbox).visible.includes(:ways)
275         ways = nodes_in_area.inject([]) do |sum, node|
276           visible_ways = node.ways.select(&:visible?)
277           sum + visible_ways.collect { |w| [w.id, w.version] }
278         end.uniq
279         ways.delete([])
280
281         # find the node ids in an area that aren't part of ways
282         nodes_not_used_in_area = nodes_in_area.select { |node| node.ways.empty? }
283         points = nodes_not_used_in_area.collect { |n| [n.id, n.lon, n.lat, n.tags, n.version] }.uniq
284
285         # find the relations used by those nodes and ways
286         relations = Relation.nodes(nodes_in_area.collect(&:id)).visible +
287                     Relation.ways(ways.collect { |w| w[0] }).visible
288         relations = relations.collect { |relation| [relation.id, relation.version] }.uniq
289       end
290
291       [0, "", ways, points, relations]
292     end
293   end
294
295   # Find deleted ways in current bounding box (similar to whichways, but ways
296   # with a deleted node only - not POIs or relations).
297
298   def whichways_deleted(xmin, ymin, xmax, ymax) #:doc:
299     amf_handle_error_with_timeout("'whichways_deleted'", nil, nil) do
300       enlarge = [(xmax - xmin) / 8, 0.01].min
301       xmin -= enlarge
302       ymin -= enlarge
303       xmax += enlarge
304       ymax += enlarge
305
306       # check boundary is sane and area within defined
307       # see /config/application.yml
308       bbox = BoundingBox.new(xmin, ymin, xmax, ymax)
309       bbox.check_boundaries
310       bbox.check_size
311
312       nodes_in_area = Node.bbox(bbox).joins(:ways_via_history).where(:current_ways => { :visible => false })
313       way_ids = nodes_in_area.collect { |node| node.ways_via_history.invisible.collect(&:id) }.flatten.uniq
314
315       [0, "", way_ids]
316     end
317   end
318
319   # Get a way including nodes and tags.
320   # Returns the way id, a Potlatch-style array of points, a hash of tags, the version number, and the user ID.
321
322   def getway(wayid) #:doc:
323     amf_handle_error_with_timeout("'getway' #{wayid}", "way", wayid) do
324       if POTLATCH_USE_SQL
325         points = sql_get_nodes_in_way(wayid)
326         tags = sql_get_tags_in_way(wayid)
327         version = sql_get_way_version(wayid)
328         uid = sql_get_way_user(wayid)
329       else
330         # Ideally we would do ":include => :nodes" here but if we do that
331         # then rails only seems to return the first copy of a node when a
332         # way includes a node more than once
333         way = Way.where(:id => wayid).first
334
335         # check case where way has been deleted or doesn't exist
336         return [-4, "way", wayid] if way.nil? || !way.visible
337
338         points = way.nodes.preload(:node_tags).collect do |node|
339           nodetags = node.tags
340           nodetags.delete("created_by")
341           [node.lon, node.lat, node.id, nodetags, node.version]
342         end
343         tags = way.tags
344         version = way.version
345         uid = way.changeset.user.id
346       end
347
348       [0, "", wayid, points, tags, version, uid]
349     end
350   end
351
352   # Get an old version of a way, and all constituent nodes.
353   #
354   # For undelete (version<0), always uses the most recent version of each node,
355   # even if it's moved.  For revert (version >= 0), uses the node in existence
356   # at the time, generating a new id if it's still visible and has been moved/
357   # retagged.
358   #
359   # Returns:
360   # 0. success code,
361   # 1. id,
362   # 2. array of points,
363   # 3. hash of tags,
364   # 4. version,
365   # 5. is this the current, visible version? (boolean)
366
367   def getway_old(id, timestamp) #:doc:
368     amf_handle_error_with_timeout("'getway_old' #{id}, #{timestamp}", "way", id) do
369       if timestamp == ""
370         # undelete
371         old_way = OldWay.where(:visible => true, :way_id => id).unredacted.order("version DESC").first
372         points = old_way.get_nodes_undelete unless old_way.nil?
373       else
374         begin
375           # revert
376           timestamp = DateTime.strptime(timestamp.to_s, "%d %b %Y, %H:%M:%S")
377           old_way = OldWay.where("way_id = ? AND timestamp <= ?", id, timestamp).unredacted.order("timestamp DESC").first
378           unless old_way.nil?
379             if old_way.visible
380               points = old_way.get_nodes_revert(timestamp)
381             else
382               return [-1, "Sorry, the way was deleted at that time - please revert to a previous version.", id]
383             end
384           end
385         rescue ArgumentError
386           # thrown by date parsing method. leave old_way as nil for
387           # the error handler below.
388           old_way = nil
389         end
390       end
391
392       if old_way.nil?
393         return [-1, "Sorry, the server could not find a way at that time.", id]
394       else
395         curway = Way.find(id)
396         old_way.tags["history"] = "Retrieved from v#{old_way.version}"
397         return [0, "", id, points, old_way.tags, curway.version, (curway.version == old_way.version && curway.visible)]
398       end
399     end
400   end
401
402   # Find history of a way.
403   # Returns 'way', id, and an array of previous versions:
404   # - formerly [old_way.version, old_way.timestamp.strftime("%d %b %Y, %H:%M"), old_way.visible ? 1 : 0, user, uid]
405   # - now [timestamp,user,uid]
406   #
407   # Heuristic: Find all nodes that have ever been part of the way;
408   # get a list of their revision dates; add revision dates of the way;
409   # sort and collapse list (to within 2 seconds); trim all dates before the
410   # start date of the way.
411
412   def getway_history(wayid) #:doc:
413     revdates = []
414     revusers = {}
415     Way.find(wayid).old_ways.unredacted.collect do |a|
416       revdates.push(a.timestamp)
417       revusers[a.timestamp.to_i] = change_user(a) unless revusers.key?(a.timestamp.to_i)
418       a.nds.each do |n|
419         Node.find(n).old_nodes.unredacted.collect do |o|
420           revdates.push(o.timestamp)
421           revusers[o.timestamp.to_i] = change_user(o) unless revusers.key?(o.timestamp.to_i)
422         end
423       end
424     end
425     waycreated = revdates[0]
426     revdates.uniq!
427     revdates.sort!
428     revdates.reverse!
429
430     # Remove any dates (from nodes) before first revision date of way
431     revdates.delete_if { |d| d < waycreated }
432     # Remove any elements where 2 seconds doesn't elapse before next one
433     revdates.delete_if { |d| revdates.include?(d + 1) || revdates.include?(d + 2) }
434     # Collect all in one nested array
435     revdates.collect! { |d| [(d + 1).strftime("%d %b %Y, %H:%M:%S")] + revusers[d.to_i] }
436     revdates.uniq!
437
438     return ["way", wayid, revdates]
439   rescue ActiveRecord::RecordNotFound
440     return ["way", wayid, []]
441   end
442
443   # Find history of a node. Returns 'node', id, and an array of previous versions as above.
444
445   def getnode_history(nodeid) #:doc:
446     history = Node.find(nodeid).old_nodes.unredacted.reverse.collect do |old_node|
447       [(old_node.timestamp + 1).strftime("%d %b %Y, %H:%M:%S")] + change_user(old_node)
448     end
449     return ["node", nodeid, history]
450   rescue ActiveRecord::RecordNotFound
451     return ["node", nodeid, []]
452   end
453
454   def change_user(obj)
455     user_object = obj.changeset.user
456     user = user_object.data_public? ? user_object.display_name : "anonymous"
457     uid  = user_object.data_public? ? user_object.id : 0
458     [user, uid]
459   end
460
461   # Find GPS traces with specified name/id.
462   # Returns array listing GPXs, each one comprising id, name and description.
463
464   def findgpx(searchterm, usertoken)
465     amf_handle_error_with_timeout("'findgpx'", nil, nil) do
466       user = getuser(usertoken)
467
468       return -1, "You must be logged in to search for GPX traces." unless user
469       return -1, t("application.setup_user_auth.blocked") if user.blocks.active.exists?
470
471       query = Trace.visible_to(user)
472       if searchterm.to_i > 0
473         query = query.where(:id => searchterm.to_i)
474       else
475         query = query.where("MATCH(name) AGAINST (?)", searchterm).limit(21)
476       end
477       gpxs = query.collect do |gpx|
478         [gpx.id, gpx.name, gpx.description]
479       end
480       [0, "", gpxs]
481     end
482   end
483
484   # Get a relation with all tags and members.
485   # Returns:
486   # 0. success code?
487   # 1. object type?
488   # 2. relation id,
489   # 3. hash of tags,
490   # 4. list of members,
491   # 5. version.
492
493   def getrelation(relid) #:doc:
494     amf_handle_error("'getrelation' #{relid}", "relation", relid) do
495       rel = Relation.where(:id => relid).first
496
497       return [-4, "relation", relid] if rel.nil? || !rel.visible
498       [0, "", relid, rel.tags, rel.members, rel.version]
499     end
500   end
501
502   # Find relations with specified name/id.
503   # Returns array of relations, each in same form as getrelation.
504
505   def findrelations(searchterm)
506     rels = []
507     if searchterm.to_i > 0
508       rel = Relation.where(:id => searchterm.to_i).first
509       if rel && rel.visible
510         rels.push([rel.id, rel.tags, rel.members, rel.version])
511       end
512     else
513       RelationTag.where("v like ?", "%#{searchterm}%").limit(11).each do |t|
514         if t.relation.visible
515           rels.push([t.relation.id, t.relation.tags, t.relation.members, t.relation.version])
516         end
517       end
518     end
519     rels
520   end
521
522   # Save a relation.
523   # Returns
524   # 0. 0 (success),
525   # 1. original relation id (unchanged),
526   # 2. new relation id,
527   # 3. version.
528
529   def putrelation(renumberednodes, renumberedways, usertoken, changeset_id, version, relid, tags, members, visible) #:doc:
530     amf_handle_error("'putrelation' #{relid}", "relation", relid)  do
531       user = getuser(usertoken)
532
533       return -1, "You are not logged in, so the relation could not be saved." unless user
534       return -1, t("application.setup_user_auth.blocked") if user.blocks.active.exists?
535       return -1, "You must accept the contributor terms before you can edit." if REQUIRE_TERMS_AGREED && user.terms_agreed.nil?
536
537       return -1, "One of the tags is invalid. Linux users may need to upgrade to Flash Player 10.1." unless tags_ok(tags)
538       tags = strip_non_xml_chars tags
539
540       relid = relid.to_i
541       visible = (visible.to_i != 0)
542
543       new_relation = nil
544       relation = nil
545       Relation.transaction do
546         # create a new relation, or find the existing one
547         relation = Relation.find(relid) if relid > 0
548         # We always need a new node, based on the data that has been sent to us
549         new_relation = Relation.new
550
551         # check the members are all positive, and correctly type
552         typedmembers = []
553         members.each do |m|
554           mid = m[1].to_i
555           if mid < 0
556             mid = renumberednodes[mid] if m[0] == "Node"
557             mid = renumberedways[mid] if m[0] == "Way"
558           end
559           if mid
560             typedmembers << [m[0], mid, m[2].delete("\000-\037\ufffe\uffff", "^\011\012\015")]
561           end
562         end
563
564         # assign new contents
565         new_relation.members = typedmembers
566         new_relation.tags = tags
567         new_relation.visible = visible
568         new_relation.changeset_id = changeset_id
569         new_relation.version = version
570
571         if relid <= 0
572           # We're creating the relation
573           new_relation.create_with_history(user)
574         elsif visible
575           # We're updating the relation
576           new_relation.id = relid
577           relation.update_from(new_relation, user)
578         else
579           # We're deleting the relation
580           new_relation.id = relid
581           relation.delete_with_history!(new_relation, user)
582         end
583       end # transaction
584
585       if relid <= 0
586         return [0, "", relid, new_relation.id, new_relation.version]
587       else
588         return [0, "", relid, relid, relation.version]
589       end
590     end
591   end
592
593   # Save a way to the database, including all nodes. Any nodes in the previous
594   # version and no longer used are deleted.
595   #
596   # Parameters:
597   # 0. hash of renumbered nodes (added by amf_controller)
598   # 1. current user token (for authentication)
599   # 2. current changeset
600   # 3. new way version
601   # 4. way ID
602   # 5. list of nodes in way
603   # 6. hash of way tags
604   # 7. array of nodes to change (each one is [lon,lat,id,version,tags]),
605   # 8. hash of nodes to delete (id->version).
606   #
607   # Returns:
608   # 0. '0' (code for success),
609   # 1. message,
610   # 2. original way id (unchanged),
611   # 3. new way id,
612   # 4. hash of renumbered nodes (old id=>new id),
613   # 5. way version,
614   # 6. hash of changed node versions (node=>version)
615   # 7. hash of deleted node versions (node=>version)
616
617   def putway(renumberednodes, usertoken, changeset_id, wayversion, originalway, pointlist, attributes, nodes, deletednodes) #:doc:
618     amf_handle_error("'putway' #{originalway}", "way", originalway) do
619       # -- Initialise
620
621       user = getuser(usertoken)
622       return -1, "You are not logged in, so the way could not be saved." unless user
623       return -1, t("application.setup_user_auth.blocked") if user.blocks.active.exists?
624       return -1, "You must accept the contributor terms before you can edit." if REQUIRE_TERMS_AGREED && user.terms_agreed.nil?
625
626       return -2, "Server error - way is only #{pointlist.length} points long." if pointlist.length < 2
627
628       return -1, "One of the tags is invalid. Linux users may need to upgrade to Flash Player 10.1." unless tags_ok(attributes)
629       attributes = strip_non_xml_chars attributes
630
631       originalway = originalway.to_i
632       pointlist.collect!(&:to_i)
633
634       way = nil # this is returned, so scope it outside the transaction
635       nodeversions = {}
636       Way.transaction do
637         # -- Update each changed node
638
639         nodes.each do |a|
640           lon = a[0].to_f
641           lat = a[1].to_f
642           id = a[2].to_i
643           version = a[3].to_i
644
645           return -2, "Server error - node with id 0 found in way #{originalway}." if id == 0
646           return -2, "Server error - node with latitude -90 found in way #{originalway}." if lat == 90
647
648           id = renumberednodes[id]  if renumberednodes[id]
649
650           node = Node.new
651           node.changeset_id = changeset_id
652           node.lat = lat
653           node.lon = lon
654           node.tags = a[4]
655
656           # fixup node tags in a way as well
657           return -1, "One of the tags is invalid. Linux users may need to upgrade to Flash Player 10.1." unless tags_ok(node.tags)
658           node.tags = strip_non_xml_chars node.tags
659
660           node.tags.delete("created_by")
661           node.version = version
662           if id <= 0
663             # We're creating the node
664             node.create_with_history(user)
665             renumberednodes[id] = node.id
666             nodeversions[node.id] = node.version
667           else
668             # We're updating an existing node
669             previous = Node.find(id)
670             node.id = id
671             previous.update_from(node, user)
672             nodeversions[previous.id] = previous.version
673           end
674         end
675
676         # -- Save revised way
677
678         pointlist.collect! do|a|
679           renumberednodes[a] ? renumberednodes[a] : a
680         end # renumber nodes
681         new_way = Way.new
682         new_way.tags = attributes
683         new_way.nds = pointlist
684         new_way.changeset_id = changeset_id
685         new_way.version = wayversion
686         if originalway <= 0
687           new_way.create_with_history(user)
688           way = new_way # so we can get way.id and way.version
689         else
690           way = Way.find(originalway)
691           if way.tags != attributes || way.nds != pointlist || !way.visible?
692             new_way.id = originalway
693             way.update_from(new_way, user)
694           end
695         end
696
697         # -- Delete unwanted nodes
698
699         deletednodes.each do |id, v|
700           node = Node.find(id.to_i)
701           new_node = Node.new
702           new_node.changeset_id = changeset_id
703           new_node.version = v.to_i
704           new_node.id = id.to_i
705           begin
706             node.delete_with_history!(new_node, user)
707           rescue OSM::APIPreconditionFailedError
708             # We don't do anything here as the node is being used elsewhere
709             # and we don't want to delete it
710           end
711         end
712       end # transaction
713
714       [0, "", originalway, way.id, renumberednodes, way.version, nodeversions, deletednodes]
715     end
716   end
717
718   # Save POI to the database.
719   # Refuses save if the node has since become part of a way.
720   # Returns array with:
721   # 0. 0 (success),
722   # 1. success message,
723   # 2. original node id (unchanged),
724   # 3. new node id,
725   # 4. version.
726
727   def putpoi(usertoken, changeset_id, version, id, lon, lat, tags, visible) #:doc:
728     amf_handle_error("'putpoi' #{id}", "node", id) do
729       user = getuser(usertoken)
730       return -1, "You are not logged in, so the point could not be saved." unless user
731       return -1, t("application.setup_user_auth.blocked") if user.blocks.active.exists?
732       return -1, "You must accept the contributor terms before you can edit." if REQUIRE_TERMS_AGREED && user.terms_agreed.nil?
733
734       return -1, "One of the tags is invalid. Linux users may need to upgrade to Flash Player 10.1." unless tags_ok(tags)
735       tags = strip_non_xml_chars tags
736
737       id = id.to_i
738       visible = (visible.to_i == 1)
739       node = nil
740       new_node = nil
741       Node.transaction do
742         if id > 0
743           begin
744             node = Node.find(id)
745           rescue ActiveRecord::RecordNotFound
746             return [-4, "node", id]
747           end
748
749           unless visible || node.ways.empty?
750             return -1, "Point #{id} has since become part of a way, so you cannot save it as a POI.", id, id, version
751           end
752         end
753         # We always need a new node, based on the data that has been sent to us
754         new_node = Node.new
755
756         new_node.changeset_id = changeset_id
757         new_node.version = version
758         new_node.lat = lat
759         new_node.lon = lon
760         new_node.tags = tags
761         if id <= 0
762           # We're creating the node
763           new_node.create_with_history(user)
764         elsif visible
765           # We're updating the node
766           new_node.id = id
767           node.update_from(new_node, user)
768         else
769           # We're deleting the node
770           new_node.id = id
771           node.delete_with_history!(new_node, user)
772         end
773       end # transaction
774
775       if id <= 0
776         return [0, "", id, new_node.id, new_node.version]
777       else
778         return [0, "", id, node.id, node.version]
779       end
780     end
781   end
782
783   # Read POI from database
784   # (only called on revert: POIs are usually read by whichways).
785   #
786   # Returns array of id, long, lat, hash of tags, (current) version.
787
788   def getpoi(id, timestamp) #:doc:
789     amf_handle_error("'getpoi' #{id}", "node", id) do
790       id = id.to_i
791       n = Node.where(:id => id).first
792       if n
793         v = n.version
794         unless timestamp == ""
795           n = OldNode.where("node_id = ? AND timestamp <= ?", id, timestamp).unredacted.order("timestamp DESC").first
796         end
797       end
798
799       if n
800         return [0, "", id, n.lon, n.lat, n.tags, v]
801       else
802         return [-4, "node", id]
803       end
804     end
805   end
806
807   # Delete way and all constituent nodes.
808   # Params:
809   # * The user token
810   # * the changeset id
811   # * the id of the way to change
812   # * the version of the way that was downloaded
813   # * a hash of the id and versions of all the nodes that are in the way, if any
814   # of the nodes have been changed by someone else then, there is a problem!
815   # Returns 0 (success), unchanged way id, new way version, new node versions.
816
817   def deleteway(usertoken, changeset_id, way_id, way_version, deletednodes) #:doc:
818     amf_handle_error("'deleteway' #{way_id}", "way", way_id) do
819       user = getuser(usertoken)
820       return -1, "You are not logged in, so the way could not be deleted." unless user
821       return -1, t("application.setup_user_auth.blocked") if user.blocks.active.exists?
822       return -1, "You must accept the contributor terms before you can edit." if REQUIRE_TERMS_AGREED && user.terms_agreed.nil?
823
824       way_id = way_id.to_i
825       nodeversions = {}
826       old_way = nil # returned, so scope it outside the transaction
827       # Need a transaction so that if one item fails to delete, the whole delete fails.
828       Way.transaction do
829         # -- Delete the way
830
831         old_way = Way.find(way_id)
832         delete_way = Way.new
833         delete_way.version = way_version
834         delete_way.changeset_id = changeset_id
835         delete_way.id = way_id
836         old_way.delete_with_history!(delete_way, user)
837
838         # -- Delete unwanted nodes
839
840         deletednodes.each do |id, v|
841           node = Node.find(id.to_i)
842           new_node = Node.new
843           new_node.changeset_id = changeset_id
844           new_node.version = v.to_i
845           new_node.id = id.to_i
846           begin
847             node.delete_with_history!(new_node, user)
848             nodeversions[node.id] = node.version
849           rescue OSM::APIPreconditionFailedError
850             # We don't do anything with the exception as the node is in use
851             # elsewhere and we don't want to delete it
852           end
853         end
854       end # transaction
855       [0, "", way_id, old_way.version, nodeversions]
856     end
857   end
858
859   # ====================================================================
860   # Support functions
861
862   # Authenticate token
863   # (can also be of form user:pass)
864   # When we are writing to the api, we need the actual user model,
865   # not just the id, hence this abstraction
866
867   def getuser(token) #:doc:
868     if token =~ /^(.+)\:(.+)$/
869       user = User.authenticate(:username => $1, :password => $2)
870     else
871       user = User.authenticate(:token => token)
872     end
873     user
874   end
875
876   def getlocales
877     Dir.glob("#{Rails.root}/config/potlatch/locales/*").collect { |f| File.basename(f, ".yml") }
878   end
879
880   ##
881   # check that all key-value pairs are valid UTF-8.
882   def tags_ok(tags)
883     tags.each do |k, v|
884       return false unless UTF8.valid? k
885       return false unless UTF8.valid? v
886     end
887     true
888   end
889
890   ##
891   # strip characters which are invalid in XML documents from the strings
892   # in the +tags+ hash.
893   def strip_non_xml_chars(tags)
894     new_tags = {}
895     unless tags.nil?
896       tags.each do |k, v|
897         new_k = k.delete "\000-\037\ufffe\uffff", "^\011\012\015"
898         new_v = v.delete "\000-\037\ufffe\uffff", "^\011\012\015"
899         new_tags[new_k] = new_v
900       end
901     end
902     new_tags
903   end
904
905   # ====================================================================
906   # Alternative SQL queries for getway/whichways
907
908   def sql_find_ways_in_area(bbox)
909     sql = <<-EOF
910     SELECT DISTINCT current_ways.id AS wayid,current_ways.version AS version
911       FROM current_way_nodes
912     INNER JOIN current_nodes ON current_nodes.id=current_way_nodes.node_id
913     INNER JOIN current_ways  ON current_ways.id =current_way_nodes.id
914        WHERE current_nodes.visible=TRUE
915        AND current_ways.visible=TRUE
916        AND #{OSM.sql_for_area(bbox, "current_nodes.")}
917     EOF
918     ActiveRecord::Base.connection.select_all(sql).collect { |a| [a["wayid"].to_i, a["version"].to_i] }
919   end
920
921   def sql_find_pois_in_area(bbox)
922     pois = []
923     sql = <<-EOF
924       SELECT current_nodes.id,current_nodes.latitude*0.0000001 AS lat,current_nodes.longitude*0.0000001 AS lon,current_nodes.version
925       FROM current_nodes
926        LEFT OUTER JOIN current_way_nodes cwn ON cwn.node_id=current_nodes.id
927        WHERE current_nodes.visible=TRUE
928        AND cwn.id IS NULL
929        AND #{OSM.sql_for_area(bbox, "current_nodes.")}
930     EOF
931     ActiveRecord::Base.connection.select_all(sql).each do |row|
932       poitags = {}
933       ActiveRecord::Base.connection.select_all("SELECT k,v FROM current_node_tags WHERE id=#{row['id']}").each do |n|
934         poitags[n["k"]] = n["v"]
935       end
936       pois << [row["id"].to_i, row["lon"].to_f, row["lat"].to_f, poitags, row["version"].to_i]
937     end
938     pois
939   end
940
941   def sql_find_relations_in_area_and_ways(bbox, way_ids)
942     # ** It would be more Potlatchy to get relations for nodes within ways
943     #    during 'getway', not here
944     sql = <<-EOF
945       SELECT DISTINCT cr.id AS relid,cr.version AS version
946       FROM current_relations cr
947       INNER JOIN current_relation_members crm ON crm.id=cr.id
948       INNER JOIN current_nodes cn ON crm.member_id=cn.id AND crm.member_type='Node'
949        WHERE #{OSM.sql_for_area(bbox, "cn.")}
950       EOF
951     unless way_ids.empty?
952       sql += <<-EOF
953        UNION
954         SELECT DISTINCT cr.id AS relid,cr.version AS version
955         FROM current_relations cr
956         INNER JOIN current_relation_members crm ON crm.id=cr.id
957          WHERE crm.member_type='Way'
958          AND crm.member_id IN (#{way_ids.join(',')})
959         EOF
960     end
961     ActiveRecord::Base.connection.select_all(sql).collect { |a| [a["relid"].to_i, a["version"].to_i] }
962   end
963
964   def sql_get_nodes_in_way(wayid)
965     points = []
966     sql = <<-EOF
967       SELECT latitude*0.0000001 AS lat,longitude*0.0000001 AS lon,current_nodes.id,current_nodes.version
968       FROM current_way_nodes,current_nodes
969        WHERE current_way_nodes.id=#{wayid.to_i}
970        AND current_way_nodes.node_id=current_nodes.id
971        AND current_nodes.visible=TRUE
972       ORDER BY sequence_id
973     EOF
974     ActiveRecord::Base.connection.select_all(sql).each do |row|
975       nodetags = {}
976       ActiveRecord::Base.connection.select_all("SELECT k,v FROM current_node_tags WHERE id=#{row['id']}").each do |n|
977         nodetags[n["k"]] = n["v"]
978       end
979       nodetags.delete("created_by")
980       points << [row["lon"].to_f, row["lat"].to_f, row["id"].to_i, nodetags, row["version"].to_i]
981     end
982     points
983   end
984
985   def sql_get_tags_in_way(wayid)
986     tags = {}
987     ActiveRecord::Base.connection.select_all("SELECT k,v FROM current_way_tags WHERE id=#{wayid.to_i}").each do |row|
988       tags[row["k"]] = row["v"]
989     end
990     tags
991   end
992
993   def sql_get_way_version(wayid)
994     ActiveRecord::Base.connection.select_one("SELECT version FROM current_ways WHERE id=#{wayid.to_i}")["version"]
995   end
996
997   def sql_get_way_user(wayid)
998     ActiveRecord::Base.connection.select_one("SELECT user FROM current_ways,changesets WHERE current_ways.id=#{wayid.to_i} AND current_ways.changeset=changesets.id")["user"]
999   end
1000 end