2 * This file is part of DisOrder.
3 * Copyright (C) 2004-2008 Richard Kettlewell
5 * This program is free software: you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License as published by
7 * the Free Software Foundation, either version 3 of the License, or
8 * (at your option) any later version.
10 * This program is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 * GNU General Public License for more details.
15 * You should have received a copy of the GNU General Public License
16 * along with this program. If not, see <http://www.gnu.org/licenses/>.
18 #include "disorder-server.h"
20 /* the head of the queue is played next, so normally we add to the tail */
21 struct queue_entry qhead
= {
26 /* the head of the recent list is the oldest thing, the tail the most recently
28 struct queue_entry phead
= {
35 void queue_fix_sofar(struct queue_entry
*q
) {
38 /* Fake up SOFAR field for currently-playing tracks that don't have it filled
39 * in by the speaker process. XXX this horrible bodge should go away when we
40 * have a more general implementation of pausing as that field will always
41 * have to be right for the playing track. */
42 if((q
->state
== playing_started
43 || q
->state
== playing_paused
)
44 && q
->type
& DISORDER_PLAYER_PAUSES
45 && (q
->type
& DISORDER_PLAYER_TYPEMASK
) != DISORDER_PLAYER_RAW
) {
47 if(q
->uptopause
== -1) /* Don't know how far thru. */
49 else if(q
->lastresumed
) /* Has been paused and resumed. */
50 sofar
= q
->uptopause
+ time(0) - q
->lastresumed
;
51 else /* Currently paused. */
53 } else /* Never been paused. */
54 sofar
= time(0) - q
->played
;
59 static void queue_read_error(const char *msg
,
61 fatal(0, "error parsing queue %s: %s", (const char *)u
, msg
);
64 static void queue_do_read(struct queue_entry
*head
, const char *path
) {
67 struct queue_entry
*q
;
70 if(!(fp
= fopen(path
, "r"))) {
72 return; /* no queue */
73 fatal(errno
, "error opening %s", path
);
75 head
->next
= head
->prev
= head
;
76 while(!inputline(path
, fp
, &buffer
, '\n')) {
77 if(buffer
[0] == '#') {
78 /* Version indicator */
79 version
= atoi(buffer
+ 1);
82 q
= xmalloc(sizeof *q
);
83 queue_unmarshall(q
, buffer
, queue_read_error
, (void *)path
);
85 /* Fix up origin field as best we can; will be wrong in some cases but
86 * hopefully not too horribly so. */
87 q
->origin
= q
->submitter ? origin_picked
: origin_random
;
88 if(q
->state
== playing_isscratch
)
89 q
->origin
= origin_scratch
;
94 fatal(0, "incomplete queue entry in %s", path
);
95 queue_insert_entry(head
->prev
, q
);
97 if(ferror(fp
)) fatal(errno
, "error reading %s", path
);
101 void queue_read(void) {
102 queue_do_read(&qhead
, config_get_file("queue"));
105 void recent_read(void) {
106 struct queue_entry
*q
;
108 queue_do_read(&phead
, config_get_file("recent"));
109 /* reset pcount after loading */
118 static void queue_do_write(const struct queue_entry
*head
, const char *path
) {
121 struct queue_entry
*q
;
123 byte_xasprintf(&tmp
, "%s.new", path
);
124 if(!(fp
= fopen(tmp
, "w"))) fatal(errno
, "error opening %s", tmp
);
125 /* Save version indicator */
126 if(fprintf(fp
, "#1\n") < 0)
127 fatal(errno
, "error writing %s", tmp
);
128 for(q
= head
->next
; q
!= head
; q
= q
->next
)
129 if(fprintf(fp
, "%s\n", queue_marshall(q
)) < 0)
130 fatal(errno
, "error writing %s", tmp
);
131 if(fclose(fp
) < 0) fatal(errno
, "error closing %s", tmp
);
132 if(rename(tmp
, path
) < 0) fatal(errno
, "error replacing %s", path
);
135 void queue_write(void) {
136 queue_do_write(&qhead
, config_get_file("queue"));
139 void recent_write(void) {
140 queue_do_write(&phead
, config_get_file("recent"));
143 struct queue_entry
*queue_find(const char *key
) {
144 struct queue_entry
*q
;
147 q
!= &qhead
&& strcmp(q
->track
, key
) && strcmp(q
->id
, key
);
150 return q
!= &qhead ? q
: 0;